[SCM] Lisaac compiler branch, master, updated. e9a433b9130542bd564d954c4d2b5711b320500f

Benoit Sonntag sonntag at icps.u-strasbg.fr
Thu Jul 30 02:01:09 UTC 2009


The following commit has been merged in the master branch:
commit 7757df4f7780f14d1eede2e606b023bcf649e930
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Thu Jul 30 04:00:20 2009 +0200

    Shorter nearly end

diff --git a/bin/shorter.c b/bin/shorter.c
index edee747..65fe967 100644
--- a/bin/shorter.c
+++ b/bin/shorter.c
@@ -79,9 +79,9 @@ typedef char __CHARACTER;
 typedef struct STRING_struct __STRING;
 struct STRING_struct {
   unsigned long __id;
-  __INTEGER count__WFC;
-  __INTEGER capacity__YBS;
-  __CHARACTER *storage__BCS;
+  __INTEGER count__4FC;
+  __INTEGER capacity__ACS;
+  __CHARACTER *storage__JCS;
 };
 __STRING STRING_={__STRING__};
 #define STRING__ (&STRING_)
@@ -96,9 +96,9 @@ typedef unsigned long __UINTEGER_32;
 #define __ARRAYED_COLLECTIONoSTRINGo__ 0
 typedef struct ARRAYED_COLLECTIONoSTRINGo_struct __ARRAYED_COLLECTIONoSTRINGo;
 struct ARRAYED_COLLECTIONoSTRINGo_struct {
-  __INTEGER upper__GKC;
-  __INTEGER capacity__MGT;
-  void **storage__XGT;
+  __INTEGER upper__OKC;
+  __INTEGER capacity__UGT;
+  void **storage__5GT;
 };
 __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define ARRAYED_COLLECTIONoSTRINGo__ (&ARRAYED_COLLECTIONoSTRINGo_)
@@ -107,7 +107,7 @@ __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define __FAST_ARRAYoSTRINGo__ 1
 typedef struct FAST_ARRAYoSTRINGo_struct __FAST_ARRAYoSTRINGo;
 struct FAST_ARRAYoSTRINGo_struct {
-  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__DKC;
+  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__LKC;
 };
 __FAST_ARRAYoSTRINGo FAST_ARRAYoSTRINGo_;
 #define FAST_ARRAYoSTRINGo__ (&FAST_ARRAYoSTRINGo_)
@@ -125,9 +125,9 @@ __ITM_TYPE_MONO ITM_TYPE_MONO_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_MONOo__ 3
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct __ARRAYED_COLLECTIONoITM_TYPE_MONOo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MONOo_struct {
-  __INTEGER upper__KIV;
-  __INTEGER capacity__5NV;
-  void **storage__RMV;
+  __INTEGER upper__SIV;
+  __INTEGER capacity__HOV;
+  void **storage__ZMV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_TYPE_MONOo_)
@@ -136,7 +136,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define __FAST_ARRAYoITM_TYPE_MONOo__ 4
 typedef struct FAST_ARRAYoITM_TYPE_MONOo_struct __FAST_ARRAYoITM_TYPE_MONOo;
 struct FAST_ARRAYoITM_TYPE_MONOo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__ZXC;
+  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__BYC;
 };
 __FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
 #define FAST_ARRAYoITM_TYPE_MONOo__ (&FAST_ARRAYoITM_TYPE_MONOo_)
@@ -145,9 +145,9 @@ __FAST_ARRAYoITM_TYPE_MONOo FAST_ARRAYoITM_TYPE_MONOo_;
 #define __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 5
 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__Y2T;
-  void *item__L3T;
-  void *next__D3T;
+  void *key__A3T;
+  void *item__T3T;
+  void *next__L3T;
 };
 __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_)
@@ -156,9 +156,9 @@ __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARY_NODE
 #define __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ 6
 typedef struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__H2T;
-  __INTEGER count__MFZ;
-  void **buckets__M2T;
+  __INTEGER capacity__P2T;
+  __INTEGER count__UFZ;
+  void **buckets__U2T;
 };
 __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo_)
@@ -169,7 +169,7 @@ typedef struct STRING_CONSTANT_struct __STRING_CONSTANT;
 struct STRING_CONSTANT_struct {
   unsigned long __id;
   __INTEGER count__DD;
-  __CHARACTER *storage__VQO;
+  __CHARACTER *storage__3QO;
 };
 __STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
 #define STRING_CONSTANT__ (&STRING_CONSTANT_)
@@ -178,9 +178,9 @@ __STRING_CONSTANT STRING_CONSTANT_={__STRING_CONSTANT__};
 #define __ARRAYED_COLLECTIONoSTRING_CONSTANTo__ 7
 typedef struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct __ARRAYED_COLLECTIONoSTRING_CONSTANTo;
 struct ARRAYED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__15OD;
-  __INTEGER capacity__WBPD;
-  void **storage__RCPD;
+  __INTEGER upper__DAPD;
+  __INTEGER capacity__4BPD;
+  void **storage__ZCPD;
 };
 __ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
 #define ARRAYED_COLLECTIONoSTRING_CONSTANTo__ (&ARRAYED_COLLECTIONoSTRING_CONSTANTo_)
@@ -189,7 +189,7 @@ __ARRAYED_COLLECTIONoSTRING_CONSTANTo ARRAYED_COLLECTIONoSTRING_CONSTANTo_;
 #define __FAST_ARRAYoSTRING_CONSTANTo__ 8
 typedef struct FAST_ARRAYoSTRING_CONSTANTo_struct __FAST_ARRAYoSTRING_CONSTANTo;
 struct FAST_ARRAYoSTRING_CONSTANTo_struct {
-  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__H5I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__P5I;
 };
 __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define FAST_ARRAYoSTRING_CONSTANTo__ (&FAST_ARRAYoSTRING_CONSTANTo_)
@@ -198,10 +198,10 @@ __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define __MEMORY__ 9
 typedef struct MEMORY_struct __MEMORY;
 struct MEMORY_struct {
-  volatile __UINTEGER_32 map_previous_linear__HTB;
-  volatile __UINTEGER_32 map_size_and_id__ITB;
-  void *map_next_free__JTB;
-  void *map_previous_free__KTB;
+  volatile __UINTEGER_32 map_previous_linear__PTB;
+  volatile __UINTEGER_32 map_size_and_id__QTB;
+  void *map_next_free__RTB;
+  void *map_previous_free__STB;
 } __attribute__ ((packed));
 __MEMORY MEMORY_;
 #define MEMORY__ (&MEMORY_)
@@ -210,8 +210,8 @@ __MEMORY MEMORY_;
 #define __HASHED_SET_NODEoABSTRACT_STRINGo__ 10
 typedef struct HASHED_SET_NODEoABSTRACT_STRINGo_struct __HASHED_SET_NODEoABSTRACT_STRINGo;
 struct HASHED_SET_NODEoABSTRACT_STRINGo_struct {
-  void *item__KZR;
-  void *next__WZR;
+  void *item__SZR;
+  void *next__4ZR;
 };
 __HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
 #define HASHED_SET_NODEoABSTRACT_STRINGo__ (&HASHED_SET_NODEoABSTRACT_STRINGo_)
@@ -220,9 +220,9 @@ __HASHED_SET_NODEoABSTRACT_STRINGo HASHED_SET_NODEoABSTRACT_STRINGo_;
 #define __HASHED_SEToABSTRACT_STRINGo__ 11
 typedef struct HASHED_SEToABSTRACT_STRINGo_struct __HASHED_SEToABSTRACT_STRINGo;
 struct HASHED_SEToABSTRACT_STRINGo_struct {
-  __INTEGER capacity__ZYR;
-  __INTEGER count__5ZR;
-  void **buckets__4YR;
+  __INTEGER capacity__BZR;
+  __INTEGER count__H0R;
+  void **buckets__GZR;
 };
 __HASHED_SEToABSTRACT_STRINGo HASHED_SEToABSTRACT_STRINGo_;
 #define HASHED_SEToABSTRACT_STRINGo__ (&HASHED_SEToABSTRACT_STRINGo_)
@@ -234,7 +234,7 @@ typedef unsigned long __POSITION;
 #define __ITM_OBJECT__ 12
 typedef struct ITM_OBJECT_struct __ITM_OBJECT;
 struct ITM_OBJECT_struct {
-  __POSITION position__NDJ;
+  __POSITION position__VDJ;
 };
 __ITM_OBJECT ITM_OBJECT_;
 #define ITM_OBJECT__ (&ITM_OBJECT_)
@@ -245,7 +245,7 @@ typedef struct NAMED_struct __NAMED;
 struct NAMED_struct {
   __ITM_OBJECT parent_itm_object__4;
   void *name__LI;
-  __CHARACTER style__BEU;
+  __CHARACTER style__JEU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -255,17 +255,17 @@ __NAMED NAMED_;
 typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
-  void *source__NBC;
-  void *last_slot__O1C;
-  void *type_style__X2C;
-  void *shortname__FIE;
-  void *default_value__TUE;
-  void *type_c__OWE;
-  __INTEGER index__VMG;
-  void *filename__UPG;
-  void *first_slot__CGZB;
-  void *idf_generic_list__UME;
-  void *slot_list__2US;
+  void *source__VBC;
+  void *last_slot__W1C;
+  void *type_style__52C;
+  void *shortname__NIE;
+  void *default_value__1UE;
+  void *type_c__WWE;
+  __INTEGER index__3MG;
+  void *filename__2PG;
+  void *first_slot__KGZB;
+  void *idf_generic_list__2ME;
+  void *slot_list__EVS;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -277,8 +277,8 @@ typedef char __BOOLEAN;
 #define __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ 15
 typedef struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_struct {
-  void *key__Z2R;
-  void *next__E3R;
+  void *key__B3R;
+  void *next__M3R;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
@@ -287,9 +287,9 @@ __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRIN
 #define __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ 16
 typedef struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__I2R;
-  __INTEGER count__N3R;
-  void **buckets__N2R;
+  __INTEGER capacity__Q2R;
+  __INTEGER count__V3R;
+  void **buckets__V2R;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -301,7 +301,7 @@ typedef unsigned char __UINTEGER_8;
 #define __TYPE_FULL__ 17
 typedef struct TYPE_FULL_struct __TYPE_FULL;
 struct TYPE_FULL_struct {
-  __UINTEGER_8 flag__YFS;
+  __UINTEGER_8 flag__AGS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -319,9 +319,9 @@ __TYPE_ID TYPE_ID_={__TYPE_ID__};
 #define __ARRAYED_COLLECTIONoTYPE_IDo__ 18
 typedef struct ARRAYED_COLLECTIONoTYPE_IDo_struct __ARRAYED_COLLECTIONoTYPE_IDo;
 struct ARRAYED_COLLECTIONoTYPE_IDo_struct {
-  __INTEGER upper__S4R;
-  __INTEGER capacity__U4R;
-  void **storage__Q5R;
+  __INTEGER upper__04R;
+  __INTEGER capacity__24R;
+  void **storage__Y5R;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
@@ -330,7 +330,7 @@ __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define __FAST_ARRAYoTYPE_IDo__ 19
 typedef struct FAST_ARRAYoTYPE_IDo_struct __FAST_ARRAYoTYPE_IDo;
 struct FAST_ARRAYoTYPE_IDo_struct {
-  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__UAB;
+  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__0AB;
 };
 __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 #define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)
@@ -340,7 +340,7 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__VNT;
+  void *name__3NT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -349,7 +349,7 @@ __ENTRY ENTRY_;
 #define __ENTRY_UNIX__ 21
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__YED;
+  __ENTRY parent_entry__AFD;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
@@ -358,7 +358,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__IFRD;
+  void *list__QFRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -368,8 +368,8 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__ZED;
-  __DIRECTORY parent_directory__0ED;
+  __ENTRY_UNIX parent_entry_unix__BFD;
+  __DIRECTORY parent_directory__CFD;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
@@ -378,9 +378,9 @@ __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 23
 typedef struct HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
-  void *key__LDT;
-  void *next__WDT;
-  void *item__HY3;
+  void *key__TDT;
+  void *next__4DT;
+  void *item__PY3;
 };
 __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -389,9 +389,9 @@ __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DI
 #define __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 24
 typedef struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__0CT;
-  __INTEGER count__IMY;
-  void **buckets__5CT;
+  __INTEGER capacity__CDT;
+  __INTEGER count__QMY;
+  void **buckets__HDT;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -401,13 +401,13 @@ __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTION
 typedef struct ITM_SLOT_struct __ITM_SLOT;
 struct ITM_SLOT_struct {
   unsigned long __id;
-  __NAMED parent_named__P5;
-  void *id_section__Y1C;
-  void *result_type__04FC;
-  void *next__OHHC;
-  void *comment__WJJD;
-  __CHARACTER affect__JAGC;
-  void *argument_list__GEHC;
+  __NAMED parent_named__V5;
+  void *id_section__A2C;
+  void *result_type__C5FC;
+  void *next__WHHC;
+  void *comment__4JJD;
+  __CHARACTER affect__RAGC;
+  void *argument_list__OEHC;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -417,9 +417,9 @@ __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 typedef struct ITM_SLOT_OPERATOR_struct __ITM_SLOT_OPERATOR;
 struct ITM_SLOT_OPERATOR_struct {
   unsigned long __id;
-  __ITM_SLOT parent_itm_slot__OU5B;
-  __INTEGER priority_and_level__K0HC;
-  void *pretty_name__V0HC;
+  __ITM_SLOT parent_itm_slot__WU5B;
+  __INTEGER priority_and_level__S0HC;
+  void *pretty_name__30HC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
@@ -428,8 +428,8 @@ __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define __SECTION___ 25
 typedef struct SECTION__struct __SECTION_;
 struct SECTION__struct {
-  void *name__CZDC;
-  void *type_list__RXFC;
+  void *name__KZDC;
+  void *type_list__ZXFC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
@@ -438,9 +438,9 @@ __SECTION_ SECTION__;
 #define __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ 26
 typedef struct HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_struct __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo;
 struct HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_struct {
-  void *key__R1S;
-  void *item__0SOB;
-  void *next__31S;
+  void *key__Z1S;
+  void *item__CTOB;
+  void *next__F2S;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -449,9 +449,9 @@ __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABS
 #define __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ 27
 typedef struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo;
 struct HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_struct {
-  __INTEGER capacity__A1S;
-  __INTEGER count__G2S;
-  void **buckets__F1S;
+  __INTEGER capacity__I1S;
+  __INTEGER count__O2S;
+  void **buckets__N1S;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -460,7 +460,7 @@ __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRI
 #define __LINKED_COLLECTIONoSTRING_CONSTANTo__ 28
 typedef struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct __LINKED_COLLECTIONoSTRING_CONSTANTo;
 struct LINKED_COLLECTIONoSTRING_CONSTANTo_struct {
-  __INTEGER upper__5CD;
+  __INTEGER upper__HDD;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -470,10 +470,10 @@ __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 typedef struct LINKED_LISToSTRING_CONSTANTo_struct __LINKED_LISToSTRING_CONSTANTo;
 struct LINKED_LISToSTRING_CONSTANTo_struct {
   __LINKED_COLLECTIONoSTRING_CONSTANTo parent_linked_collection__LD;
-  __INTEGER mem_idx__OUEC;
-  void *first_link__EUEC;
-  void *last_link__NUEC;
-  void *mem_lnk__QUEC;
+  __INTEGER mem_idx__WUEC;
+  void *first_link__MUEC;
+  void *last_link__VUEC;
+  void *mem_lnk__YUEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -491,7 +491,7 @@ __PARSER PARSER_;
 #define __ITM_ARGUMENT__ 31
 typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
 struct ITM_ARGUMENT_struct {
-  __ITM_OBJECT parent_itm_code__S4M;
+  __ITM_OBJECT parent_itm_code__04M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -500,9 +500,9 @@ __ITM_ARGUMENT ITM_ARGUMENT_;
 #define __ARRAYED_COLLECTIONoITM_ARGUMENTo__ 32
 typedef struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct __ARRAYED_COLLECTIONoITM_ARGUMENTo;
 struct ARRAYED_COLLECTIONoITM_ARGUMENTo_struct {
-  __INTEGER upper__45GC;
-  __INTEGER capacity__AAHC;
-  void **storage__2AHC;
+  __INTEGER upper__GAHC;
+  __INTEGER capacity__IAHC;
+  void **storage__EBHC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -511,7 +511,7 @@ __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define __FAST_ARRAYoITM_ARGUMENTo__ 33
 typedef struct FAST_ARRAYoITM_ARGUMENTo_struct __FAST_ARRAYoITM_ARGUMENTo;
 struct FAST_ARRAYoITM_ARGUMENTo_struct {
-  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__FCZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__NCZB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -521,7 +521,7 @@ __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 typedef struct ITM_TYPE_MULTI_struct __ITM_TYPE_MULTI;
 struct ITM_TYPE_MULTI_struct {
   unsigned long __id;
-  void *list_type__AKP;
+  void *list_type__IKP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -531,7 +531,7 @@ __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 typedef struct ITM_EXPRESSION_struct __ITM_EXPRESSION;
 struct ITM_EXPRESSION_struct {
   unsigned long __id;
-  void *value_list__1JV;
+  void *value_list__DKV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -541,7 +541,7 @@ __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 typedef struct ITM_RESULT_struct __ITM_RESULT;
 struct ITM_RESULT_struct {
   unsigned long __id;
-  void *value__MLFC;
+  void *value__ULFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -550,9 +550,9 @@ __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ 34
 typedef struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_struct {
-  void *key__PBGC;
-  void *item__CCGC;
-  void *next__0BGC;
+  void *key__XBGC;
+  void *item__KCGC;
+  void *next__CCGC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -561,9 +561,9 @@ __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SL
 #define __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ 35
 typedef struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__24BC;
-  __INTEGER count__OPGC;
-  void **buckets__DBGC;
+  __INTEGER capacity__E5BC;
+  __INTEGER count__WPGC;
+  void **buckets__LBGC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
@@ -573,8 +573,8 @@ __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_
 typedef struct ITM_TYPE_BLOCK_struct __ITM_TYPE_BLOCK;
 struct ITM_TYPE_BLOCK_struct {
   unsigned long __id;
-  void *type_argument__WMN;
-  void *type_result__ANN;
+  void *type_argument__4MN;
+  void *type_result__INN;
 };
 __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 #define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
@@ -584,7 +584,7 @@ __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 typedef struct ITM_TYPE_SIMPLE_struct __ITM_TYPE_SIMPLE;
 struct ITM_TYPE_SIMPLE_struct {
   unsigned long __id;
-  void *name__KYP;
+  void *name__SYP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
@@ -594,8 +594,8 @@ __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 typedef struct ITM_TYPE_STYLE_struct __ITM_TYPE_STYLE;
 struct ITM_TYPE_STYLE_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type_simple__BSN;
-  void *style__TYP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__JSN;
+  void *style__1YP;
 };
 __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 #define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
@@ -605,8 +605,8 @@ __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 typedef struct ITM_TYPE_GENERIC_struct __ITM_TYPE_GENERIC;
 struct ITM_TYPE_GENERIC_struct {
   unsigned long __id;
-  __ITM_TYPE_STYLE parent_itm_type_style__CSN;
-  void *list_type__3YP;
+  __ITM_TYPE_STYLE parent_itm_type_style__KSN;
+  void *list_type__FZP;
 };
 __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 #define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
@@ -616,9 +616,9 @@ __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 typedef struct ITM_ARG_struct __ITM_ARG;
 struct ITM_ARG_struct {
   unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__ZHHB;
-  void *name__10HC;
-  void *type__20HC;
+  __ITM_ARGUMENT parent_itm_argument__BIHB;
+  void *name__D1HC;
+  void *type__E1HC;
 };
 __ITM_ARG ITM_ARG_={__ITM_ARG__};
 #define ITM_ARG__ (&ITM_ARG_)
@@ -628,9 +628,9 @@ __ITM_ARG ITM_ARG_={__ITM_ARG__};
 typedef struct ITM_ARGS_struct __ITM_ARGS;
 struct ITM_ARGS_struct {
   unsigned long __id;
-  __ITM_ARGUMENT parent_itm_argument__DDFE;
-  void *type__MBPF;
-  void *name__LBPF;
+  __ITM_ARGUMENT parent_itm_argument__ABFE;
+  void *type__QNPF;
+  void *name__PNPF;
 };
 __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 #define ITM_ARGS__ (&ITM_ARGS_)
@@ -640,7 +640,7 @@ __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 typedef struct ITM_TYPE_PARAMETER_struct __ITM_TYPE_PARAMETER;
 struct ITM_TYPE_PARAMETER_struct {
   unsigned long __id;
-  __ITM_TYPE_SIMPLE parent_itm_type__3DE;
+  __ITM_TYPE_SIMPLE parent_itm_type__FEE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -650,8 +650,8 @@ __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 typedef struct FILE_UNIX_struct __FILE_UNIX;
 struct FILE_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__2CF;
-  __POINTER stream__EJRD;
+  __ENTRY_UNIX parent_entry_unix__EDF;
+  __POINTER stream__MJRD;
 };
 __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define FILE_UNIX__ (&FILE_UNIX_)
@@ -660,9 +660,9 @@ __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ 36
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo;
 struct ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_struct {
-  __INTEGER upper__WBBC;
-  __INTEGER capacity__YBBC;
-  void **storage__UCBC;
+  __INTEGER upper__4BBC;
+  __INTEGER capacity__ACBC;
+  void **storage__2CBC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -671,7 +671,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_
 #define __FAST_ARRAYoITM_TYPE_PARAMETERo__ 37
 typedef struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct __FAST_ARRAYoITM_TYPE_PARAMETERo;
 struct FAST_ARRAYoITM_TYPE_PARAMETERo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__TME;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__1ME;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -680,7 +680,7 @@ __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define __LIP_CODE__ 38
 typedef struct LIP_CODE_struct __LIP_CODE;
 struct LIP_CODE_struct {
-  __ITM_OBJECT parent_itm_object__5DE;
+  __ITM_OBJECT parent_itm_object__HEE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
@@ -690,9 +690,9 @@ __LIP_CODE LIP_CODE_;
 typedef struct LIP_AFFECT_struct __LIP_AFFECT;
 struct LIP_AFFECT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__JUPB;
-  void *name__WGFC;
-  void *value__IHFC;
+  __LIP_CODE parent_lip_code__RUPB;
+  void *name__4GFC;
+  void *value__QHFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
@@ -702,9 +702,9 @@ __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 typedef struct LIP_CALL_struct __LIP_CALL;
 struct LIP_CALL_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__314B;
-  void *argument__15TE;
-  void *name__GAUE;
+  __LIP_CODE parent_lip_code__F24B;
+  void *argument__45TE;
+  void *name__JAUE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
@@ -714,10 +714,10 @@ __LIP_CALL LIP_CALL_={__LIP_CALL__};
 typedef struct LIP_IF_struct __LIP_IF;
 struct LIP_IF_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__4OYC;
-  void *condition__ADQD;
-  void *then__WDQD;
-  void *else__NEQD;
+  __LIP_CODE parent_lip_code__GPYC;
+  void *condition__IDQD;
+  void *then__4DQD;
+  void *else__VEQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
@@ -727,8 +727,8 @@ __LIP_IF LIP_IF_={__LIP_IF__};
 typedef struct LIP_PRINT_struct __LIP_PRINT;
 struct LIP_PRINT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__QPYC;
-  void *message__KEUE;
+  __LIP_CODE parent_lip_code__YPYC;
+  void *message__NEUE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -737,8 +737,8 @@ __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define __HASHED_SET_NODEoSTRING_CONSTANTo__ 39
 typedef struct HASHED_SET_NODEoSTRING_CONSTANTo_struct __HASHED_SET_NODEoSTRING_CONSTANTo;
 struct HASHED_SET_NODEoSTRING_CONSTANTo_struct {
-  void *item__1EV;
-  void *next__GFV;
+  void *item__DFV;
+  void *next__OFV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -747,9 +747,9 @@ __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define __HASHED_SEToSTRING_CONSTANTo__ 40
 typedef struct HASHED_SEToSTRING_CONSTANTo_struct __HASHED_SEToSTRING_CONSTANTo;
 struct HASHED_SEToSTRING_CONSTANTo_struct {
-  __INTEGER capacity__KIT;
-  __INTEGER count__YHY;
-  void **buckets__PEV;
+  __INTEGER capacity__SIT;
+  __INTEGER count__AIY;
+  void **buckets__XEV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
@@ -758,7 +758,7 @@ __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define __ITM_CODE__ 41
 typedef struct ITM_CODE_struct __ITM_CODE;
 struct ITM_CODE_struct {
-  __ITM_OBJECT parent_itm_object__XDE;
+  __ITM_OBJECT parent_itm_object__5DE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
@@ -767,9 +767,9 @@ __ITM_CODE ITM_CODE_;
 #define __ARRAYED_COLLECTIONoITM_CODEo__ 42
 typedef struct ARRAYED_COLLECTIONoITM_CODEo_struct __ARRAYED_COLLECTIONoITM_CODEo;
 struct ARRAYED_COLLECTIONoITM_CODEo_struct {
-  __INTEGER upper__2HL;
-  __INTEGER capacity__0XT;
-  void **storage__FYT;
+  __INTEGER upper__EIL;
+  __INTEGER capacity__CYT;
+  void **storage__NYT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
@@ -778,7 +778,7 @@ __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define __FAST_ARRAYoITM_CODEo__ 43
 typedef struct FAST_ARRAYoITM_CODEo_struct __FAST_ARRAYoITM_CODEo;
 struct FAST_ARRAYoITM_CODEo_struct {
-  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__RTF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__ZTF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
@@ -787,9 +787,9 @@ __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define __ARRAYED_COLLECTIONoLIP_CODEo__ 44
 typedef struct ARRAYED_COLLECTIONoLIP_CODEo_struct __ARRAYED_COLLECTIONoLIP_CODEo;
 struct ARRAYED_COLLECTIONoLIP_CODEo_struct {
-  __INTEGER upper__2DQD;
-  __INTEGER capacity__1PTD;
-  void **storage__GQTD;
+  __INTEGER upper__EEQD;
+  __INTEGER capacity__DQTD;
+  void **storage__OQTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
@@ -798,7 +798,7 @@ __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define __FAST_ARRAYoLIP_CODEo__ 45
 typedef struct FAST_ARRAYoLIP_CODEo_struct __FAST_ARRAYoLIP_CODEo;
 struct FAST_ARRAYoLIP_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__NLYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__VLYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
@@ -816,8 +816,8 @@ __HASHED_DICTIONARY_NODEoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoL
 #define __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ 47
 typedef struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__3URD;
-  void **buckets__CVRD;
+  __INTEGER capacity__FVRD;
+  void **buckets__KVRD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
@@ -827,10 +827,10 @@ __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DA
 typedef struct LIP_BINARY_struct __LIP_BINARY;
 struct LIP_BINARY_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__2PZB;
-  void *left__MZQD;
-  void *right__PZQD;
-  __CHARACTER operator__SZQD;
+  __LIP_CODE parent_lip_code__EQZB;
+  void *left__UZQD;
+  void *right__XZQD;
+  __CHARACTER operator__0ZQD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
@@ -840,9 +840,9 @@ __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 typedef struct LIP_UNARY_struct __LIP_UNARY;
 struct LIP_UNARY_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__L14B;
-  void *value__J2QD;
-  __CHARACTER operator__M2QD;
+  __LIP_CODE parent_lip_code__T14B;
+  void *value__R2QD;
+  __CHARACTER operator__U2QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
@@ -852,7 +852,7 @@ __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 typedef struct LIP_INTEGER_struct __LIP_INTEGER;
 struct LIP_INTEGER_struct {
   unsigned long __id;
-  __INTEGER value__0B3F;
+  __INTEGER value__3Y3F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
@@ -862,7 +862,7 @@ __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 typedef struct LIP_STRING_struct __LIP_STRING;
 struct LIP_STRING_struct {
   unsigned long __id;
-  void *value__TBUE;
+  void *value__WBUE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
@@ -871,8 +871,8 @@ __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define __ITM_LOCAL__ 48
 typedef struct ITM_LOCAL_struct __ITM_LOCAL;
 struct ITM_LOCAL_struct {
-  __ITM_OBJECT parent_itm_object__50H;
-  void *name__42K;
+  __ITM_OBJECT parent_itm_object__H1H;
+  void *name__G3K;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
@@ -881,9 +881,9 @@ __ITM_LOCAL ITM_LOCAL_;
 #define __ARRAYED_COLLECTIONoITM_LOCALo__ 49
 typedef struct ARRAYED_COLLECTIONoITM_LOCALo_struct __ARRAYED_COLLECTIONoITM_LOCALo;
 struct ARRAYED_COLLECTIONoITM_LOCALo_struct {
-  __INTEGER upper__10K;
-  __INTEGER capacity__XKU;
-  void **storage__CLU;
+  __INTEGER upper__D1K;
+  __INTEGER capacity__5KU;
+  void **storage__KLU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
@@ -892,7 +892,7 @@ __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define __FAST_ARRAYoITM_LOCALo__ 50
 typedef struct FAST_ARRAYoITM_LOCALo_struct __FAST_ARRAYoITM_LOCALo;
 struct FAST_ARRAYoITM_LOCALo_struct {
-  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__E1H;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__M1H;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -967,8 +967,8 @@ __SHORTER SHORTER_;
 #define __FILE_SYSTEM__ 58
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__OFD;
-  int parent_directory__PFD;
+  void *parent_directory__WFD;
+  int parent_directory__XFD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
@@ -977,9 +977,9 @@ __FILE_SYSTEM FILE_SYSTEM_;
 #define __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ 59
 typedef struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_struct {
-  void *key__BOBC;
-  void *item__U3GD;
-  void *next__MOBC;
+  void *key__JOBC;
+  void *item__23GD;
+  void *next__UOBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
@@ -988,9 +988,9 @@ __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTO
 #define __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ 60
 typedef struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_struct {
-  __INTEGER capacity__QNBC;
-  __INTEGER count__VOBC;
-  void **buckets__VNBC;
+  __INTEGER capacity__YNBC;
+  __INTEGER count__3OBC;
+  void **buckets__3NBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
@@ -1000,8 +1000,8 @@ __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRIN
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__3CU;
-  void **storage__KTT;
+  __INTEGER capacity__FDU;
+  void **storage__STT;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
@@ -1028,8 +1028,8 @@ __FS_MIN FS_MIN_;
 #define __LINKED_LIST_NODEoSTRING_CONSTANTo__ 64
 typedef struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct __LINKED_LIST_NODEoSTRING_CONSTANTo;
 struct LINKED_LIST_NODEoSTRING_CONSTANTo_struct {
-  void *item__0VHD;
-  void *next__MOOD;
+  void *item__CWHD;
+  void *next__UOOD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
@@ -1047,7 +1047,7 @@ __TYPE TYPE_;
 #define __ARRAYED_COLLECTIONoSLOTo__ 66
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__UES;
+  __INTEGER capacity__2ES;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
@@ -1056,7 +1056,7 @@ __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define __FAST_ARRAYoSLOTo__ 67
 typedef struct FAST_ARRAYoSLOTo_struct __FAST_ARRAYoSLOTo;
 struct FAST_ARRAYoSLOTo_struct {
-  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__V5;
+  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__15;
 };
 __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)
@@ -1065,7 +1065,7 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define __LINKED_COLLECTIONoENTRYo__ 68
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__VM3D;
+  __INTEGER upper__QM3D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
@@ -1074,11 +1074,11 @@ __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define __LINKED_LISToENTRYo__ 69
 typedef struct LINKED_LISToENTRYo_struct __LINKED_LISToENTRYo;
 struct LINKED_LISToENTRYo_struct {
-  __LINKED_COLLECTIONoENTRYo parent_linked_collection__HFRD;
-  __INTEGER mem_idx__J1VE;
-  void *first_link__C1VE;
-  void *mem_lnk__K1VE;
-  void *last_link__L1VE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__PFRD;
+  __INTEGER mem_idx__M1VE;
+  void *first_link__F1VE;
+  void *mem_lnk__N1VE;
+  void *last_link__O1VE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
@@ -1087,8 +1087,8 @@ __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define __LINKED_LIST_NODEoENTRYo__ 70
 typedef struct LINKED_LIST_NODEoENTRYo_struct __LINKED_LIST_NODEoENTRYo;
 struct LINKED_LIST_NODEoENTRYo_struct {
-  void *item__FOWE;
-  void *next__05EF;
+  void *item__IOWE;
+  void *next__2KFF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
@@ -1097,9 +1097,9 @@ __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ 71
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER upper__FVV;
-  __INTEGER capacity__AZV;
-  void **storage__1ZV;
+  __INTEGER upper__NVV;
+  __INTEGER capacity__IZV;
+  void **storage__D0V;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1108,7 +1108,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoIT
 #define __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ 72
 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__JUP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__RUP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1126,8 +1126,8 @@ __ALIAS_ARRAYoITM_TYPE_MONOo ALIAS_ARRAYoITM_TYPE_MONOo_;
 #define __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__ 74
 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__CAW;
-  void *next__OAW;
+  void *item__KAW;
+  void *next__WAW;
 };
 __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_)
@@ -1136,9 +1136,9 @@ __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo HASHED_SET_NODEoFAST_ARRAYoITM_TYPE
 #define __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ 75
 typedef struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo;
 struct HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_struct {
-  __INTEGER capacity__R5V;
-  __INTEGER count__FIW;
-  void **buckets__W5V;
+  __INTEGER capacity__Z5V;
+  __INTEGER count__NIW;
+  void **buckets__45V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1147,9 +1147,9 @@ __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ 76
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct __ARRAYED_COLLECTIONoITM_TYPE_MULTIo;
 struct ARRAYED_COLLECTIONoITM_TYPE_MULTIo_struct {
-  __INTEGER upper__WJP;
-  __INTEGER capacity__31V;
-  void **storage__I2V;
+  __INTEGER upper__4JP;
+  __INTEGER capacity__F2V;
+  void **storage__Q2V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
@@ -1158,7 +1158,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define __FAST_ARRAYoITM_TYPE_MULTIo__ 77
 typedef struct FAST_ARRAYoITM_TYPE_MULTIo_struct __FAST_ARRAYoITM_TYPE_MULTIo;
 struct FAST_ARRAYoITM_TYPE_MULTIo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__MJP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__UJP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
@@ -1167,9 +1167,9 @@ __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ 78
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo;
 struct ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_struct {
-  __INTEGER upper__IMN;
-  __INTEGER capacity__GKV;
-  void **storage__RKV;
+  __INTEGER upper__QMN;
+  __INTEGER capacity__OKV;
+  void **storage__ZKV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
@@ -1178,7 +1178,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define __FAST_ARRAYoITM_TYPE_BLOCKo__ 79
 typedef struct FAST_ARRAYoITM_TYPE_BLOCKo_struct __FAST_ARRAYoITM_TYPE_BLOCKo;
 struct FAST_ARRAYoITM_TYPE_BLOCKo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__4LN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__GMN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
@@ -1187,7 +1187,7 @@ __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define __ITM_CONSTANT__ 80
 typedef struct ITM_CONSTANT_struct __ITM_CONSTANT;
 struct ITM_CONSTANT_struct {
-  __ITM_CODE parent_itm_code__1VF;
+  __ITM_CODE parent_itm_code__DWF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
@@ -1197,7 +1197,7 @@ __ITM_CONSTANT ITM_CONSTANT_;
 typedef struct ITM_REAL_struct __ITM_REAL;
 struct ITM_REAL_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__FRO;
+  __ITM_CONSTANT parent_itm_constant__NRO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
@@ -1207,7 +1207,7 @@ __ITM_REAL ITM_REAL_={__ITM_REAL__};
 typedef struct ITM_NUMBER_struct __ITM_NUMBER;
 struct ITM_NUMBER_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__XRO;
+  __ITM_CONSTANT parent_itm_constant__5RO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
@@ -1217,7 +1217,7 @@ __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 typedef struct ITM_CHARACTER_struct __ITM_CHARACTER;
 struct ITM_CHARACTER_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__JSO;
+  __ITM_CONSTANT parent_itm_constant__RSO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
@@ -1227,7 +1227,7 @@ __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 typedef struct ITM_STRING_struct __ITM_STRING;
 struct ITM_STRING_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__0SO;
+  __ITM_CONSTANT parent_itm_constant__CTO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
@@ -1236,9 +1236,9 @@ __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define __ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ 81
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct __ARRAYED_COLLECTIONoITM_TYPE_GENERICo;
 struct ARRAYED_COLLECTIONoITM_TYPE_GENERICo_struct {
-  __INTEGER upper__AYP;
-  __INTEGER capacity__TBW;
-  void **storage__4BW;
+  __INTEGER upper__IYP;
+  __INTEGER capacity__1BW;
+  void **storage__GCW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
@@ -1247,7 +1247,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define __FAST_ARRAYoITM_TYPE_GENERICo__ 82
 typedef struct FAST_ARRAYoITM_TYPE_GENERICo_struct __FAST_ARRAYoITM_TYPE_GENERICo;
 struct FAST_ARRAYoITM_TYPE_GENERICo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__WXP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__4XP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
@@ -1256,9 +1256,9 @@ __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define __ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ 83
 typedef struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct __ARRAYED_COLLECTIONoITM_TYPE_STYLEo;
 struct ARRAYED_COLLECTIONoITM_TYPE_STYLEo_struct {
-  __INTEGER upper__POR;
-  __INTEGER capacity__1LW;
-  void **storage__GMW;
+  __INTEGER upper__XOR;
+  __INTEGER capacity__DMW;
+  void **storage__OMW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
@@ -1267,7 +1267,7 @@ __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define __FAST_ARRAYoITM_TYPE_STYLEo__ 84
 typedef struct FAST_ARRAYoITM_TYPE_STYLEo_struct __FAST_ARRAYoITM_TYPE_STYLEo;
 struct FAST_ARRAYoITM_TYPE_STYLEo_struct {
-  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__FOR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__NOR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
@@ -1277,7 +1277,7 @@ __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 typedef struct ITM_LIST_struct __ITM_LIST;
 struct ITM_LIST_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__K5E;
+  __ITM_CODE parent_itm_code__S5E;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
@@ -1286,9 +1286,9 @@ __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ 85
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_struct {
-  __INTEGER upper__J1T;
-  __INTEGER capacity__2IU;
-  void **storage__HJU;
+  __INTEGER upper__R1T;
+  __INTEGER capacity__EJU;
+  void **storage__PJU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
@@ -1297,7 +1297,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LO
 #define __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ 86
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__URI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__2RI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
@@ -1315,9 +1315,9 @@ __ALIAS_ARRAYoITM_LOCALo ALIAS_ARRAYoITM_LOCALo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ 88
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_struct {
-  __INTEGER upper__IWT;
-  __INTEGER capacity__05T;
-  void **storage__WAU;
+  __INTEGER upper__QWT;
+  __INTEGER capacity__CAU;
+  void **storage__4AU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
@@ -1326,7 +1326,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_COD
 #define __FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ 89
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoITM_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoITM_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__A4H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__I4H;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
@@ -1344,9 +1344,9 @@ __ALIAS_ARRAYoITM_CODEo ALIAS_ARRAYoITM_CODEo_;
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ 91
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __INTEGER upper__0SU;
-  __INTEGER capacity__5UU;
-  void **storage__KVU;
+  __INTEGER upper__CTU;
+  __INTEGER capacity__HVU;
+  void **storage__SVU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1355,7 +1355,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYo
 #define __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ 92
 typedef struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo;
 struct FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__J5K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__R5K;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1374,7 +1374,7 @@ __ALIAS_ARRAYoSTRING_CONSTANTo ALIAS_ARRAYoSTRING_CONSTANTo_;
 typedef struct ITM_LIST_IDF_struct __ITM_LIST_IDF;
 struct ITM_LIST_IDF_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__WCJ;
+  __ITM_CODE parent_itm_code__4CJ;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
@@ -1384,7 +1384,7 @@ __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 typedef struct ITM_LDOTS_struct __ITM_LDOTS;
 struct ITM_LDOTS_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_constant__QUF;
+  __ITM_CODE parent_itm_constant__YUF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
@@ -1394,7 +1394,7 @@ __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 typedef struct ITM_PROTOTYPE_struct __ITM_PROTOTYPE;
 struct ITM_PROTOTYPE_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__2VF;
+  __ITM_CONSTANT parent_itm_constant__EWF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
@@ -1403,7 +1403,7 @@ __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define __ITM_WRITE__ 94
 typedef struct ITM_WRITE_struct __ITM_WRITE;
 struct ITM_WRITE_struct {
-  __ITM_CODE parent_itm_code__LDJ;
+  __ITM_CODE parent_itm_code__TDJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
@@ -1413,7 +1413,7 @@ __ITM_WRITE ITM_WRITE_;
 typedef struct ITM_WRITE_VALUE_struct __ITM_WRITE_VALUE;
 struct ITM_WRITE_VALUE_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__MDJ;
+  __ITM_WRITE parent_itm_write__UDJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
@@ -1423,7 +1423,7 @@ __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 typedef struct ITM_WRITE_CAST_struct __ITM_WRITE_CAST;
 struct ITM_WRITE_CAST_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__DEJ;
+  __ITM_WRITE parent_itm_write__LEJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
@@ -1433,7 +1433,7 @@ __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 typedef struct ITM_READ_struct __ITM_READ;
 struct ITM_READ_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__QGJ;
+  __ITM_CODE parent_itm_code__YGJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
@@ -1443,7 +1443,7 @@ __ITM_READ ITM_READ_={__ITM_READ__};
 typedef struct ITM_WRITE_CODE_struct __ITM_WRITE_CODE;
 struct ITM_WRITE_CODE_struct {
   unsigned long __id;
-  __ITM_WRITE parent_itm_write__OHJ;
+  __ITM_WRITE parent_itm_write__WHJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
@@ -1453,8 +1453,8 @@ __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 typedef struct ITM_OPERATOR_struct __ITM_OPERATOR;
 struct ITM_OPERATOR_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__EFL;
-  void *name__PIL;
+  __ITM_CODE parent_itm_code__MFL;
+  void *name__XIL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
@@ -1464,7 +1464,7 @@ __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 typedef struct ITM_READ_ARG1_struct __ITM_READ_ARG1;
 struct ITM_READ_ARG1_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__KIL;
+  __ITM_READ parent_itm_read__SIL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
@@ -1474,7 +1474,7 @@ __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 typedef struct ITM_READ_ARG2_struct __ITM_READ_ARG2;
 struct ITM_READ_ARG2_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__XKL;
+  __ITM_READ parent_itm_read__5KL;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
@@ -1484,7 +1484,7 @@ __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 typedef struct ITM_OLD_struct __ITM_OLD;
 struct ITM_OLD_struct {
   unsigned long __id;
-  __ITM_CODE parent_itm_code__N2L;
+  __ITM_CODE parent_itm_code__V2L;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
@@ -1493,7 +1493,7 @@ __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define __ITM_EXTERN__ 95
 typedef struct ITM_EXTERN_struct __ITM_EXTERN;
 struct ITM_EXTERN_struct {
-  __ITM_CODE parent_itm_code__O4M;
+  __ITM_CODE parent_itm_code__W4M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
@@ -1503,8 +1503,8 @@ __ITM_EXTERN ITM_EXTERN_;
 typedef struct ITM_EXTERNAL_TYPE_struct __ITM_EXTERNAL_TYPE;
 struct ITM_EXTERNAL_TYPE_struct {
   unsigned long __id;
-  __ITM_EXTERN parent_itm_extern__P4M;
-  __BOOLEAN is_persistant__MHN;
+  __ITM_EXTERN parent_itm_extern__X4M;
+  __BOOLEAN is_persistant__UHN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
@@ -1514,7 +1514,7 @@ __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 typedef struct ITM_BLOCK_struct __ITM_BLOCK;
 struct ITM_BLOCK_struct {
   unsigned long __id;
-  void *list__ANDC;
+  void *list__INDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
@@ -1524,7 +1524,7 @@ __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 typedef struct ITM_EXTERNAL_struct __ITM_EXTERNAL;
 struct ITM_EXTERNAL_struct {
   unsigned long __id;
-  __ITM_EXTERN parent_itm_extern__UFN;
+  __ITM_EXTERN parent_itm_extern__2FN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
@@ -1534,7 +1534,7 @@ __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 typedef struct ITM_READ_ARGS_struct __ITM_READ_ARGS;
 struct ITM_READ_ARGS_struct {
   unsigned long __id;
-  __ITM_READ parent_itm_read__KDO;
+  __ITM_READ parent_itm_read__SDO;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
@@ -1543,8 +1543,8 @@ __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ 96
 typedef struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo;
 struct HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_struct {
-  void *item__RJPF;
-  void *next__3JPF;
+  void *item__VVPF;
+  void *next__BWPF;
 };
 __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1553,9 +1553,9 @@ __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING
 #define __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ 97
 typedef struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo;
 struct HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_struct {
-  __INTEGER capacity__AJPF;
-  __INTEGER count__XNPF;
-  void **buckets__FJPF;
+  __INTEGER capacity__EVPF;
+  __INTEGER count__1ZPF;
+  void **buckets__JVPF;
 };
 __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1564,9 +1564,9 @@ __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANTo
 #define __ARRAYED_COLLECTIONoLIP_INTEGERo__ 98
 typedef struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct __ARRAYED_COLLECTIONoLIP_INTEGERo;
 struct ARRAYED_COLLECTIONoLIP_INTEGERo_struct {
-  __INTEGER upper__BWWE;
-  __INTEGER capacity__D0WE;
-  void **storage__O0WE;
+  __INTEGER upper__EWWE;
+  __INTEGER capacity__G0WE;
+  void **storage__R0WE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1575,7 +1575,7 @@ __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define __FAST_ARRAYoLIP_INTEGERo__ 99
 typedef struct FAST_ARRAYoLIP_INTEGERo_struct __FAST_ARRAYoLIP_INTEGERo;
 struct FAST_ARRAYoLIP_INTEGERo_struct {
-  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__DKSE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__TJSE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1584,9 +1584,9 @@ __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define __ARRAYED_COLLECTIONoLIP_STRINGo__ 100
 typedef struct ARRAYED_COLLECTIONoLIP_STRINGo_struct __ARRAYED_COLLECTIONoLIP_STRINGo;
 struct ARRAYED_COLLECTIONoLIP_STRINGo_struct {
-  __INTEGER upper__4XOF;
-  __INTEGER capacity__S4OF;
-  void **storage__34OF;
+  __INTEGER upper__CEPF;
+  __INTEGER capacity__WKPF;
+  void **storage__BLPF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1595,7 +1595,7 @@ __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define __FAST_ARRAYoLIP_STRINGo__ 101
 typedef struct FAST_ARRAYoLIP_STRINGo_struct __FAST_ARRAYoLIP_STRINGo;
 struct FAST_ARRAYoLIP_STRINGo_struct {
-  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__0BFF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__2MFF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1605,7 +1605,7 @@ __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 typedef struct LIP_BOOLEAN_struct __LIP_BOOLEAN;
 struct LIP_BOOLEAN_struct {
   unsigned long __id;
-  __BOOLEAN value__PDQD;
+  __BOOLEAN value__XDQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1618,8 +1618,8 @@ __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 typedef struct LIP_VALUE_struct __LIP_VALUE;
 struct LIP_VALUE_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__2HFE;
-  void *value__FKUE;
+  __LIP_CODE parent_lip_code__ZFFE;
+  void *value__IKUE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1628,9 +1628,9 @@ __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ 102
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_struct {
-  __INTEGER upper__POTD;
-  __INTEGER capacity__QAUD;
-  void **storage__MBUD;
+  __INTEGER upper__XOTD;
+  __INTEGER capacity__YAUD;
+  void **storage__UBUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1639,7 +1639,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_COD
 #define __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ 103
 typedef struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo;
 struct FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__FKID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__NKID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1684,9 +1684,9 @@ __LIP_SLOT_DATA LIP_SLOT_DATA_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ 108
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct __ARRAYED_COLLECTIONoLIP_SLOT_DATAo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_DATAo_struct {
-  __INTEGER upper__UAPF;
-  __INTEGER capacity__1GPF;
-  void **storage__GHPF;
+  __INTEGER upper__YMPF;
+  __INTEGER capacity__5SPF;
+  void **storage__KTPF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1695,7 +1695,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define __FAST_ARRAYoLIP_SLOT_DATAo__ 109
 typedef struct FAST_ARRAYoLIP_SLOT_DATAo_struct __FAST_ARRAYoLIP_SLOT_DATAo;
 struct FAST_ARRAYoLIP_SLOT_DATAo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__EJUE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__HJUE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1713,9 +1713,9 @@ __LIP_SLOT_CODE LIP_SLOT_CODE_;
 #define __ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ 111
 typedef struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct __ARRAYED_COLLECTIONoLIP_SLOT_CODEo;
 struct ARRAYED_COLLECTIONoLIP_SLOT_CODEo_struct {
-  __INTEGER upper__C3JF;
-  __INTEGER capacity__2BPF;
-  void **storage__HCPF;
+  __INTEGER upper__EIKF;
+  __INTEGER capacity__AOPF;
+  void **storage__LOPF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1724,7 +1724,7 @@ __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define __FAST_ARRAYoLIP_SLOT_CODEo__ 112
 typedef struct FAST_ARRAYoLIP_SLOT_CODEo_struct __FAST_ARRAYoLIP_SLOT_CODEo;
 struct FAST_ARRAYoLIP_SLOT_CODEo_struct {
-  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__Y2JF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__0HKF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1733,9 +1733,9 @@ __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ 113
 typedef struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_struct {
-  void *key__OPEC;
-  void *item__BQEC;
-  void *next__ZPEC;
+  void *key__WPEC;
+  void *item__JQEC;
+  void *next__BQEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1744,9 +1744,9 @@ __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTIO
 #define __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ 114
 typedef struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_struct {
-  __INTEGER capacity__3OEC;
-  __INTEGER count__5YFC;
-  void **buckets__CPEC;
+  __INTEGER capacity__FPEC;
+  __INTEGER count__HZFC;
+  void **buckets__KPEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1755,9 +1755,9 @@ __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_
 #define __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 115
 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__HSEC;
-  void *key__UREC;
-  void *next__5REC;
+  void *item__PSEC;
+  void *key__2REC;
+  void *next__HSEC;
 };
 __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_)
@@ -1766,9 +1766,9 @@ __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARY_N
 #define __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__ 116
 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__DREC;
-  __INTEGER count__Z1FC;
-  void **buckets__IREC;
+  __INTEGER capacity__LREC;
+  __INTEGER count__B2FC;
+  void **buckets__QREC;
 };
 __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_)
@@ -1777,9 +1777,9 @@ __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo HASHED_DICTIONARYoSECTIO
 #define __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ 117
 typedef struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo;
 struct ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_struct {
-  __INTEGER upper__QTGC;
-  __INTEGER capacity__YKHC;
-  void **storage__DLHC;
+  __INTEGER upper__YTGC;
+  __INTEGER capacity__ALHC;
+  void **storage__LLHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1788,7 +1788,7 @@ __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM
 #define __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ 118
 typedef struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo;
 struct FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_struct {
-  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__VU1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__3U1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1806,9 +1806,9 @@ __ALIAS_ARRAYoITM_ARGUMENTo ALIAS_ARRAYoITM_ARGUMENTo_;
 #define __ARRAYED_COLLECTIONoITM_SLOTo__ 120
 typedef struct ARRAYED_COLLECTIONoITM_SLOTo_struct __ARRAYED_COLLECTIONoITM_SLOTo;
 struct ARRAYED_COLLECTIONoITM_SLOTo_struct {
-  __INTEGER upper__M2XD;
-  __INTEGER capacity__GRVE;
-  void **storage__A4VE;
+  __INTEGER upper__12XD;
+  __INTEGER capacity__JRVE;
+  void **storage__D4VE;
 };
 __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define ARRAYED_COLLECTIONoITM_SLOTo__ (&ARRAYED_COLLECTIONoITM_SLOTo_)
@@ -1817,7 +1817,7 @@ __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define __FAST_ARRAYoITM_SLOTo__ 121
 typedef struct FAST_ARRAYoITM_SLOTo_struct __FAST_ARRAYoITM_SLOTo;
 struct FAST_ARRAYoITM_SLOTo_struct {
-  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__4JTD;
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__GKTD;
 };
 __FAST_ARRAYoITM_SLOTo FAST_ARRAYoITM_SLOTo_;
 #define FAST_ARRAYoITM_SLOTo__ (&FAST_ARRAYoITM_SLOTo_)
@@ -1869,99 +1869,103 @@ void *table_type[122];
 //==========================//
 
 void *parent_numeric__J;
-__POINTER begin_memory__PVH;
-__UINTEGER_32 nb_page__4RJ;
-__UINTEGER_64 capacity_max__YA5;
-void *first_free__XDVB;
-__INTEGER type_error__ONG;
-void *msg_err__PNG;
+__POINTER begin_memory__XVH;
+__UINTEGER_32 nb_page__GSJ;
+__UINTEGER_64 capacity_max__AB5;
+void *first_free__5DVB;
+__INTEGER type_error__WNG;
+void *msg_err__XNG;
 void *prototype_list__BJ;
-void *prototype_dico__PTS;
-void *list_tmp__5JTD;
-void *list_id__WAB;
-void *string_tmp__TED;
-void *string_tmp2__Z0AC;
-void *alias__EFD;
-void *string_tmp3__50AC;
-void *bucket_name__DVOB;
-void *bucket_list__4WOB;
+void *prototype_dico__XTS;
+void *list_tmp__HKTD;
+void *str_tmp__C52E;
+void *str_tmp2__EB3E;
+void *str_tmp3__EF3E;
+void *list_id__2AB;
+void *string_tmp__1ED;
+void *string_tmp2__B1AC;
+void *alias__MFD;
+void *string_tmp3__H1AC;
+void *bucket_name__LVOB;
+void *bucket_list__GXOB;
 void *short_dico__QD;
-void *object__JBC;
-void *source__PBC;
-__INTEGER position__SBC;
-__INTEGER pos_cur__VBC;
-__INTEGER pos_line__WBC;
-__INTEGER pos_col__XBC;
-__BOOLEAN is_active_short__4BC;
-void *key_comment_default__ACC;
-__INTEGER short_derive__BCC;
-void *short_local__JCC;
-__BOOLEAN is_catch_comment__AXC;
-void *last_string__I0C;
-void *last_section__X0C;
-void *token__GCD;
-void *last_comment__00D;
-void *last_slot__Q2D;
-__INTEGER begin_position__LBE;
-__BOOLEAN is_parameter_type__IKE;
-void *last_group__1TF;
-__INTEGER old_position__DRI;
-__INTEGER old_pos_cur__FRI;
-__INTEGER old_pos_line__HRI;
-__INTEGER old_pos_col__JRI;
-__INTEGER old_short_derive__LRI;
-__INTEGER_64 last_integer__ZRO;
-void *dico__NJP;
-void *dico__5LN;
-void *type_void__4VF;
-void *dico__STI;
-void *type_self__HUN;
-void *type_null__5UN;
-void *dico__GOR;
-void *dico__XXP;
-void *list_data__OONC;
-void *stack__FJUE;
-void *list_method__Z2JF;
-void *storage__EKSE;
-void *storage__1BFF;
-__UINTEGER_32 clone_allocation_size__3SB;
-__POINTER get_begin_memory__ICQB;
+void *object__RBC;
+void *source__XBC;
+__INTEGER position__0BC;
+__INTEGER pos_cur__3BC;
+__INTEGER pos_line__4BC;
+__INTEGER pos_col__5BC;
+__BOOLEAN is_active_short__GCC;
+void *key_comment_default__ICC;
+__INTEGER short_derive__JCC;
+void *short_local__RCC;
+__BOOLEAN is_catch_comment__IXC;
+void *last_string__Q0C;
+void *last_section__50C;
+void *token__OCD;
+void *last_comment__C1D;
+void *last_slot__Y2D;
+__INTEGER begin_position__TBE;
+__BOOLEAN is_parameter_type__QKE;
+void *last_group__DUF;
+__INTEGER old_position__LRI;
+__INTEGER old_pos_cur__NRI;
+__INTEGER old_pos_line__PRI;
+__INTEGER old_pos_col__RRI;
+__INTEGER old_short_derive__TRI;
+__INTEGER_64 last_integer__BSO;
+void *dico__VJP;
+void *dico__HMN;
+void *type_void__GWF;
+void *dico__0TI;
+void *type_self__PUN;
+void *type_null__HVN;
+void *dico__OOR;
+void *dico__5XP;
+void *list_data__WONC;
+void *stack__IJUE;
+void *list_method__1HKF;
+void *storage__UJSE;
+void *storage__3MFF;
+__UINTEGER_32 clone_allocation_size__FTB;
+__POINTER get_begin_memory__QCQB;
 void *list__FK;
-void *free__BOP;
+void *free__JOP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *output_decl__3FE;
-void *string_tmp2__BAJ;
-void *path_file__PDWF;
+void *output_decl__FGE;
+void *string_tmp2__JAJ;
+void *string_tmp3__DFYD;
+void *path_file__TPWF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
-__BOOLEAN is_shorter__5Y;
-__BOOLEAN is_short_code__P1;
-__BOOLEAN is_short_private__31;
+__BOOLEAN is_shorter__FZ;
+__BOOLEAN is_short_code__V1;
+__BOOLEAN is_short_private__D2;
 void *directory_list__YB;
 void *file_list__0B;
 void *current_list__2B;
 void *input_name__3B;
 void *proto_input__BI;
 void *output_name__DI;
-void *format_name__B1;
-void *string_tmp__KWX;
-__INTEGER index_count__D5;
-void *free_list__KUP;
-void *empty_list__RVP;
-void *bucket__2VP;
-void *free_list__VRI;
-void *free_list__B4H;
-void *free_list__K5K;
-void *empty_list__GNLF;
-void *bucket__QNLF;
-void *true__GZKF;
-void *free_list__GKID;
-__INTEGER last_integer__3HUE;
-void *last_string__PIUE;
-__BOOLEAN push_back_flag__3YLF;
-__CHARACTER memory__BGLF;
-void *free_list__WU1B;
+void *format_name__H1;
+void *string_tmp__SWX;
+__INTEGER index_count__J5;
+void *free_list__SUP;
+void *empty_list__ZVP;
+void *bucket__EWP;
+void *free_list__3RI;
+void *free_list__J4H;
+void *free_list__S5K;
+void *empty_list__SYLF;
+void *bucket__2YLF;
+void *true__SELF;
+void *free_list__OKID;
+__INTEGER last_integer__AIUE;
+void *last_string__SIUE;
+__BOOLEAN push_back_flag__JEMF;
+__CHARACTER memory__NRLF;
+void *free_list__4U1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2106,24 +2110,26 @@ __STRING_CONSTANT __string_132={__STRING_CONSTANT__,10,"slot_style"};
 __STRING_CONSTANT __string_133={__STRING_CONSTANT__,5,"block"};
 __STRING_CONSTANT __string_134={__STRING_CONSTANT__,5,"local"};
 __STRING_CONSTANT __string_135={__STRING_CONSTANT__,7,"warning"};
-__STRING_CONSTANT __string_136={__STRING_CONSTANT__,5,"title"};
-__STRING_CONSTANT __string_137={__STRING_CONSTANT__,11,"table_begin"};
-__STRING_CONSTANT __string_138={__STRING_CONSTANT__,10,"table_item"};
-__STRING_CONSTANT __string_139={__STRING_CONSTANT__,15,"table_slot_name"};
-__STRING_CONSTANT __string_140={__STRING_CONSTANT__,18,"table_slot_comment"};
-__STRING_CONSTANT __string_141={__STRING_CONSTANT__,9,"table_end"};
-__STRING_CONSTANT __string_142={__STRING_CONSTANT__,9,"sub_title"};
-__STRING_CONSTANT __string_143={__STRING_CONSTANT__,10,"slot_title"};
-__STRING_CONSTANT __string_144={__STRING_CONSTANT__,12,"subsub_title"};
-__STRING_CONSTANT __string_145={__STRING_CONSTANT__,14,"prototype_path"};
-__STRING_CONSTANT __string_146={__STRING_CONSTANT__,5,"index"};
-__STRING_CONSTANT __string_147={__STRING_CONSTANT__,20,"directory_list_begin"};
-__STRING_CONSTANT __string_148={__STRING_CONSTANT__,19,"directory_list_item"};
-__STRING_CONSTANT __string_149={__STRING_CONSTANT__,18,"directory_list_end"};
-__STRING_CONSTANT __string_150={__STRING_CONSTANT__,15,"file_list_begin"};
-__STRING_CONSTANT __string_151={__STRING_CONSTANT__,14,"file_list_item"};
-__STRING_CONSTANT __string_152={__STRING_CONSTANT__,13,"file_list_end"};
-__STRING_CONSTANT __string_153={__STRING_CONSTANT__,1979,"------------------\
+__STRING_CONSTANT __string_136={__STRING_CONSTANT__,10,"identifier"};
+__STRING_CONSTANT __string_137={__STRING_CONSTANT__,15,"identifier_slot"};
+__STRING_CONSTANT __string_138={__STRING_CONSTANT__,5,"title"};
+__STRING_CONSTANT __string_139={__STRING_CONSTANT__,11,"table_begin"};
+__STRING_CONSTANT __string_140={__STRING_CONSTANT__,10,"table_item"};
+__STRING_CONSTANT __string_141={__STRING_CONSTANT__,15,"table_slot_name"};
+__STRING_CONSTANT __string_142={__STRING_CONSTANT__,18,"table_slot_comment"};
+__STRING_CONSTANT __string_143={__STRING_CONSTANT__,9,"table_end"};
+__STRING_CONSTANT __string_144={__STRING_CONSTANT__,9,"sub_title"};
+__STRING_CONSTANT __string_145={__STRING_CONSTANT__,10,"slot_title"};
+__STRING_CONSTANT __string_146={__STRING_CONSTANT__,12,"subsub_title"};
+__STRING_CONSTANT __string_147={__STRING_CONSTANT__,14,"prototype_path"};
+__STRING_CONSTANT __string_148={__STRING_CONSTANT__,5,"index"};
+__STRING_CONSTANT __string_149={__STRING_CONSTANT__,20,"directory_list_begin"};
+__STRING_CONSTANT __string_150={__STRING_CONSTANT__,19,"directory_list_item"};
+__STRING_CONSTANT __string_151={__STRING_CONSTANT__,18,"directory_list_end"};
+__STRING_CONSTANT __string_152={__STRING_CONSTANT__,15,"file_list_begin"};
+__STRING_CONSTANT __string_153={__STRING_CONSTANT__,14,"file_list_item"};
+__STRING_CONSTANT __string_154={__STRING_CONSTANT__,13,"file_list_end"};
+__STRING_CONSTANT __string_155={__STRING_CONSTANT__,1979,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2151,129 +2157,126 @@ isaac/lib                         \n                                        \
                                            \n            post in : https://g\
 na.org/bugs/?group=isaac     \n            mail to : sonntag at icps.u-strasbg.\
 fr             \n"};
-__STRING_CONSTANT __string_154={__STRING_CONSTANT__,8,"shorter/"};
-__STRING_CONSTANT __string_155={__STRING_CONSTANT__,3,".li"};
-__STRING_CONSTANT __string_156={__STRING_CONSTANT__,20,"Error: File format `"};
-__STRING_CONSTANT __string_157={__STRING_CONSTANT__,16,"' is not open !\n"};
-__STRING_CONSTANT __string_158={__STRING_CONSTANT__,26,"Incorrect slot ident\
+__STRING_CONSTANT __string_156={__STRING_CONSTANT__,8,"shorter/"};
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,3,".li"};
+__STRING_CONSTANT __string_158={__STRING_CONSTANT__,20,"Error: File format `"};
+__STRING_CONSTANT __string_159={__STRING_CONSTANT__,16,"' is not open !\n"};
+__STRING_CONSTANT __string_160={__STRING_CONSTANT__,26,"Incorrect slot ident\
 ifier."};
-__STRING_CONSTANT __string_159={__STRING_CONSTANT__,23,"Double definition sl\
+__STRING_CONSTANT __string_161={__STRING_CONSTANT__,23,"Double definition sl\
 ot."};
-__STRING_CONSTANT __string_160={__STRING_CONSTANT__,26,"Assignment ':=' is n\
+__STRING_CONSTANT __string_162={__STRING_CONSTANT__,26,"Assignment ':=' is n\
 eeded."};
-__STRING_CONSTANT __string_161={__STRING_CONSTANT__,28,"Incorrect format exp\
+__STRING_CONSTANT __string_163={__STRING_CONSTANT__,28,"Incorrect format exp\
 ression."};
-__STRING_CONSTANT __string_162={__STRING_CONSTANT__,21,"Incorrect definition."};
-__STRING_CONSTANT __string_163={__STRING_CONSTANT__,20,"Added ';' is needed."};
-__STRING_CONSTANT __string_164={__STRING_CONSTANT__,17,"Incorrect symbol."};
-__STRING_CONSTANT __string_165={__STRING_CONSTANT__,18,"Error: directory `"};
-__STRING_CONSTANT __string_166={__STRING_CONSTANT__,13,"\' not found.\n"};
-__STRING_CONSTANT __string_167={__STRING_CONSTANT__,12,"\' not open.\n"};
-__STRING_CONSTANT __string_168={__STRING_CONSTANT__,14,"directory_list"};
-__STRING_CONSTANT __string_169={__STRING_CONSTANT__,9,"file_list"};
-__STRING_CONSTANT __string_170={__STRING_CONSTANT__,22,"Inherit/Insert Summa\
+__STRING_CONSTANT __string_164={__STRING_CONSTANT__,21,"Incorrect definition."};
+__STRING_CONSTANT __string_165={__STRING_CONSTANT__,20,"Added ';' is needed."};
+__STRING_CONSTANT __string_166={__STRING_CONSTANT__,17,"Incorrect symbol."};
+__STRING_CONSTANT __string_167={__STRING_CONSTANT__,18,"Error: directory `"};
+__STRING_CONSTANT __string_168={__STRING_CONSTANT__,13,"\' not found.\n"};
+__STRING_CONSTANT __string_169={__STRING_CONSTANT__,12,"\' not open.\n"};
+__STRING_CONSTANT __string_170={__STRING_CONSTANT__,14,"directory_list"};
+__STRING_CONSTANT __string_171={__STRING_CONSTANT__,9,"file_list"};
+__STRING_CONSTANT __string_172={__STRING_CONSTANT__,22,"Inherit/Insert Summa\
 ry"};
-__STRING_CONSTANT __string_171={__STRING_CONSTANT__,7,"inherit"};
-__STRING_CONSTANT __string_172={__STRING_CONSTANT__,6,"insert"};
-__STRING_CONSTANT __string_173={__STRING_CONSTANT__,14," No developed."};
-__STRING_CONSTANT __string_174={__STRING_CONSTANT__,6,"create"};
-__STRING_CONSTANT __string_175={__STRING_CONSTANT__,19,"Constructor Summary"};
-__STRING_CONSTANT __string_176={__STRING_CONSTANT__,12,"Slot Summary"};
-__STRING_CONSTANT __string_177={__STRING_CONSTANT__,21,"Inherit/Insert Detail"};
-__STRING_CONSTANT __string_178={__STRING_CONSTANT__,7," line #"};
-__STRING_CONSTANT __string_179={__STRING_CONSTANT__,8,"Section:"};
-__STRING_CONSTANT __string_180={__STRING_CONSTANT__,8,"Profile:"};
-__STRING_CONSTANT __string_181={__STRING_CONSTANT__,12,"Description:"};
-__STRING_CONSTANT __string_182={__STRING_CONSTANT__,11,"Parameters:"};
-__STRING_CONSTANT __string_183={__STRING_CONSTANT__,10,"Contracts:"};
-__STRING_CONSTANT __string_184={__STRING_CONSTANT__,9,"See also:"};
-__STRING_CONSTANT __string_185={__STRING_CONSTANT__,18,"Constructor Detail"};
-__STRING_CONSTANT __string_186={__STRING_CONSTANT__,11,"Slot Detail"};
-__STRING_CONSTANT __string_187={__STRING_CONSTANT__,19,"Not enough memory.\n"};
-__STRING_CONSTANT __string_188={__STRING_CONSTANT__,4,"_add"};
-__STRING_CONSTANT __string_189={__STRING_CONSTANT__,4,"_sub"};
-__STRING_CONSTANT __string_190={__STRING_CONSTANT__,9,"_logicnot"};
-__STRING_CONSTANT __string_191={__STRING_CONSTANT__,4,"_not"};
-__STRING_CONSTANT __string_192={__STRING_CONSTANT__,4,"_div"};
-__STRING_CONSTANT __string_193={__STRING_CONSTANT__,4,"_mul"};
-__STRING_CONSTANT __string_194={__STRING_CONSTANT__,4,"_xor"};
-__STRING_CONSTANT __string_195={__STRING_CONSTANT__,4,"_mod"};
-__STRING_CONSTANT __string_196={__STRING_CONSTANT__,8,"_greater"};
-__STRING_CONSTANT __string_197={__STRING_CONSTANT__,5,"_less"};
-__STRING_CONSTANT __string_198={__STRING_CONSTANT__,6,"_equal"};
-__STRING_CONSTANT __string_199={__STRING_CONSTANT__,7,"_notdiv"};
-__STRING_CONSTANT __string_200={__STRING_CONSTANT__,3,"_or"};
-__STRING_CONSTANT __string_201={__STRING_CONSTANT__,4,"_and"};
-__STRING_CONSTANT __string_202={__STRING_CONSTANT__,7,"_dollar"};
-__STRING_CONSTANT __string_203={__STRING_CONSTANT__,6,"_diese"};
-__STRING_CONSTANT __string_204={__STRING_CONSTANT__,3,"_at"};
-__STRING_CONSTANT __string_205={__STRING_CONSTANT__,4,"_ask"};
-__STRING_CONSTANT __string_206={__STRING_CONSTANT__,26,"End of comment not f\
+__STRING_CONSTANT __string_173={__STRING_CONSTANT__,7,"inherit"};
+__STRING_CONSTANT __string_174={__STRING_CONSTANT__,6,"insert"};
+__STRING_CONSTANT __string_175={__STRING_CONSTANT__,14," No developed."};
+__STRING_CONSTANT __string_176={__STRING_CONSTANT__,6,"create"};
+__STRING_CONSTANT __string_177={__STRING_CONSTANT__,19,"Constructor Summary"};
+__STRING_CONSTANT __string_178={__STRING_CONSTANT__,12,"Slot Summary"};
+__STRING_CONSTANT __string_179={__STRING_CONSTANT__,21,"Inherit/Insert Detail"};
+__STRING_CONSTANT __string_180={__STRING_CONSTANT__,7," line #"};
+__STRING_CONSTANT __string_181={__STRING_CONSTANT__,8,"Section:"};
+__STRING_CONSTANT __string_182={__STRING_CONSTANT__,8,"Profile:"};
+__STRING_CONSTANT __string_183={__STRING_CONSTANT__,18,"Constructor Detail"};
+__STRING_CONSTANT __string_184={__STRING_CONSTANT__,11,"Slot Detail"};
+__STRING_CONSTANT __string_185={__STRING_CONSTANT__,19,"Not enough memory.\n"};
+__STRING_CONSTANT __string_186={__STRING_CONSTANT__,4,"_add"};
+__STRING_CONSTANT __string_187={__STRING_CONSTANT__,4,"_sub"};
+__STRING_CONSTANT __string_188={__STRING_CONSTANT__,9,"_logicnot"};
+__STRING_CONSTANT __string_189={__STRING_CONSTANT__,4,"_not"};
+__STRING_CONSTANT __string_190={__STRING_CONSTANT__,4,"_div"};
+__STRING_CONSTANT __string_191={__STRING_CONSTANT__,4,"_mul"};
+__STRING_CONSTANT __string_192={__STRING_CONSTANT__,4,"_xor"};
+__STRING_CONSTANT __string_193={__STRING_CONSTANT__,4,"_mod"};
+__STRING_CONSTANT __string_194={__STRING_CONSTANT__,8,"_greater"};
+__STRING_CONSTANT __string_195={__STRING_CONSTANT__,5,"_less"};
+__STRING_CONSTANT __string_196={__STRING_CONSTANT__,6,"_equal"};
+__STRING_CONSTANT __string_197={__STRING_CONSTANT__,7,"_notdiv"};
+__STRING_CONSTANT __string_198={__STRING_CONSTANT__,3,"_or"};
+__STRING_CONSTANT __string_199={__STRING_CONSTANT__,4,"_and"};
+__STRING_CONSTANT __string_200={__STRING_CONSTANT__,7,"_dollar"};
+__STRING_CONSTANT __string_201={__STRING_CONSTANT__,6,"_diese"};
+__STRING_CONSTANT __string_202={__STRING_CONSTANT__,3,"_at"};
+__STRING_CONSTANT __string_203={__STRING_CONSTANT__,4,"_ask"};
+__STRING_CONSTANT __string_204={__STRING_CONSTANT__,26,"End of comment not f\
 ound !"};
-__STRING_CONSTANT __string_207={__STRING_CONSTANT__,24,"Identifier is incorr\
+__STRING_CONSTANT __string_205={__STRING_CONSTANT__,24,"Identifier is incorr\
 ect."};
-__STRING_CONSTANT __string_208={__STRING_CONSTANT__,22,"Line counter overflo\
+__STRING_CONSTANT __string_206={__STRING_CONSTANT__,22,"Line counter overflo\
 w."};
-__STRING_CONSTANT __string_209={__STRING_CONSTANT__,40,"Column counter overf\
+__STRING_CONSTANT __string_207={__STRING_CONSTANT__,40,"Column counter overf\
 low (line too long)."};
-__STRING_CONSTANT __string_210={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
-__STRING_CONSTANT __string_211={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
-__STRING_CONSTANT __string_212={__STRING_CONSTANT__,20,"--WARNING----------\n"};
-__STRING_CONSTANT __string_213={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
-__STRING_CONSTANT __string_214={__STRING_CONSTANT__,6,"\nLine "};
-__STRING_CONSTANT __string_215={__STRING_CONSTANT__,8," column "};
-__STRING_CONSTANT __string_216={__STRING_CONSTANT__,4," in "};
-__STRING_CONSTANT __string_217={__STRING_CONSTANT__,3,"):\n"};
-__STRING_CONSTANT __string_218={__STRING_CONSTANT__,2,"^\n"};
-__STRING_CONSTANT __string_219={__STRING_CONSTANT__,21,"Variable not `token'."};
-__STRING_CONSTANT __string_220={__STRING_CONSTANT__,13,"Crash system."};
-__STRING_CONSTANT __string_221={__STRING_CONSTANT__,1,"."};
-__STRING_CONSTANT __string_222={__STRING_CONSTANT__,20,"Warning: directory `"};
-__STRING_CONSTANT __string_223={__STRING_CONSTANT__,36,"Error: Double defini\
+__STRING_CONSTANT __string_208={__STRING_CONSTANT__,20,"--SYNTAX-----------\n"};
+__STRING_CONSTANT __string_209={__STRING_CONSTANT__,20,"--SEMANTIC---------\n"};
+__STRING_CONSTANT __string_210={__STRING_CONSTANT__,20,"--WARNING----------\n"};
+__STRING_CONSTANT __string_211={__STRING_CONSTANT__,20,"--MESSAGE----------\n"};
+__STRING_CONSTANT __string_212={__STRING_CONSTANT__,6,"\nLine "};
+__STRING_CONSTANT __string_213={__STRING_CONSTANT__,8," column "};
+__STRING_CONSTANT __string_214={__STRING_CONSTANT__,4," in "};
+__STRING_CONSTANT __string_215={__STRING_CONSTANT__,3,"):\n"};
+__STRING_CONSTANT __string_216={__STRING_CONSTANT__,2,"^\n"};
+__STRING_CONSTANT __string_217={__STRING_CONSTANT__,21,"Variable not `token'."};
+__STRING_CONSTANT __string_218={__STRING_CONSTANT__,13,"Crash system."};
+__STRING_CONSTANT __string_219={__STRING_CONSTANT__,1,"."};
+__STRING_CONSTANT __string_220={__STRING_CONSTANT__,20,"Warning: directory `"};
+__STRING_CONSTANT __string_221={__STRING_CONSTANT__,36,"Error: Double defini\
 tion prototype:\n"};
-__STRING_CONSTANT __string_224={__STRING_CONSTANT__,4,".txt"};
-__STRING_CONSTANT __string_225={__STRING_CONSTANT__,12,"Error: File "};
-__STRING_CONSTANT __string_226={__STRING_CONSTANT__,18," is not created !\n"};
-__STRING_CONSTANT __string_227={__STRING_CONSTANT__,15," is not open !\n"};
-__STRING_CONSTANT __string_228={__STRING_CONSTANT__,20,"`Section' is needed."};
-__STRING_CONSTANT __string_229={__STRING_CONSTANT__,27,"Section `Header' is \
+__STRING_CONSTANT __string_222={__STRING_CONSTANT__,4,".txt"};
+__STRING_CONSTANT __string_223={__STRING_CONSTANT__,12,"Error: File "};
+__STRING_CONSTANT __string_224={__STRING_CONSTANT__,18," is not created !\n"};
+__STRING_CONSTANT __string_225={__STRING_CONSTANT__,15," is not open !\n"};
+__STRING_CONSTANT __string_226={__STRING_CONSTANT__,20,"`Section' is needed."};
+__STRING_CONSTANT __string_227={__STRING_CONSTANT__,27,"Section `Header' is \
 needed."};
-__STRING_CONSTANT __string_230={__STRING_CONSTANT__,22,"Slot `name' not foun\
+__STRING_CONSTANT __string_228={__STRING_CONSTANT__,22,"Slot `name' not foun\
 d."};
-__STRING_CONSTANT __string_231={__STRING_CONSTANT__,23,"Incorrect type secti\
+__STRING_CONSTANT __string_229={__STRING_CONSTANT__,23,"Incorrect type secti\
 on."};
-__STRING_CONSTANT __string_232={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
+__STRING_CONSTANT __string_230={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
 ert' must to be first section."};
-__STRING_CONSTANT __string_233={__STRING_CONSTANT__,78,"`Section Inherit' is\
+__STRING_CONSTANT __string_231={__STRING_CONSTANT__,78,"`Section Inherit' is\
  not possible with Expanded object (Use `Section Insert')."};
-__STRING_CONSTANT __string_234={__STRING_CONSTANT__,31,"No argument for inte\
+__STRING_CONSTANT __string_232={__STRING_CONSTANT__,31,"No argument for inte\
 rrupt slot."};
-__STRING_CONSTANT __string_235={__STRING_CONSTANT__,33,"No argument for inhe\
+__STRING_CONSTANT __string_233={__STRING_CONSTANT__,33,"No argument for inhe\
 ritance slot."};
-__STRING_CONSTANT __string_236={__STRING_CONSTANT__,27,"Incorrect slot decla\
+__STRING_CONSTANT __string_234={__STRING_CONSTANT__,27,"Incorrect slot decla\
 ration."};
-__STRING_CONSTANT __string_237={__STRING_CONSTANT__,22,"Incorrect result typ\
+__STRING_CONSTANT __string_235={__STRING_CONSTANT__,22,"Incorrect result typ\
 e."};
-__STRING_CONSTANT __string_238={__STRING_CONSTANT__,20,"Added ')' is needed."};
-__STRING_CONSTANT __string_239={__STRING_CONSTANT__,36,"Incorrect type for i\
+__STRING_CONSTANT __string_236={__STRING_CONSTANT__,20,"Added ')' is needed."};
+__STRING_CONSTANT __string_237={__STRING_CONSTANT__,36,"Incorrect type for i\
 nheritance slot."};
-__STRING_CONSTANT __string_240={__STRING_CONSTANT__,21,"Incorrect expression."};
-__STRING_CONSTANT __string_241={__STRING_CONSTANT__,7,"__init_"};
-__STRING_CONSTANT __string_242={__STRING_CONSTANT__,10,"Added ';'."};
-__STRING_CONSTANT __string_243={__STRING_CONSTANT__,24,"Double slot declarat\
+__STRING_CONSTANT __string_238={__STRING_CONSTANT__,21,"Incorrect expression."};
+__STRING_CONSTANT __string_239={__STRING_CONSTANT__,7,"__init_"};
+__STRING_CONSTANT __string_240={__STRING_CONSTANT__,10,"Added ';'."};
+__STRING_CONSTANT __string_241={__STRING_CONSTANT__,24,"Double slot declarat\
 ion."};
-__STRING_CONSTANT __string_244={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
+__STRING_CONSTANT __string_242={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
 t yet implemented."};
-__STRING_CONSTANT __string_245={__STRING_CONSTANT__,9,"Postfix '"};
-__STRING_CONSTANT __string_246={__STRING_CONSTANT__,7,"Infix '"};
-__STRING_CONSTANT __string_247={__STRING_CONSTANT__,8,"Prefix '"};
-__STRING_CONSTANT __string_248={__STRING_CONSTANT__,1,"+"};
-__STRING_CONSTANT __string_249={__STRING_CONSTANT__,1,"-"};
-__STRING_CONSTANT __string_250={__STRING_CONSTANT__,29,"Unterminated string \
+__STRING_CONSTANT __string_243={__STRING_CONSTANT__,9,"Postfix '"};
+__STRING_CONSTANT __string_244={__STRING_CONSTANT__,7,"Infix '"};
+__STRING_CONSTANT __string_245={__STRING_CONSTANT__,8,"Prefix '"};
+__STRING_CONSTANT __string_246={__STRING_CONSTANT__,12,"Description:"};
+__STRING_CONSTANT __string_247={__STRING_CONSTANT__,1,"+"};
+__STRING_CONSTANT __string_248={__STRING_CONSTANT__,1,"-"};
+__STRING_CONSTANT __string_249={__STRING_CONSTANT__,29,"Unterminated string \
 constant."};
-__STRING_CONSTANT __string_251={__STRING_CONSTANT__,27,"Incorrect style slot\
+__STRING_CONSTANT __string_250={__STRING_CONSTANT__,27,"Incorrect style slot\
  ('-')."};
-__STRING_CONSTANT __string_252={__STRING_CONSTANT__,2509,"#include <pthread.\
+__STRING_CONSTANT __string_251={__STRING_CONSTANT__,2509,"#include <pthread.\
 h>\n#include <limits.h>\n\nvoid print_char(char car);\nint die_with_code(int\
  code);\n\nstatic pthread_key_t current_thread;\nstatic pthread_attr_t threa\
 d_attr;\npthread_t c_thread;\nint thread_counter;\n\nstatic char thread_stac\
@@ -2309,128 +2312,128 @@ stack[thread_counter++],PTHREAD_STACK_MIN);\n    if ((thread_counter>512) ||\
 while (*msg != 0) print_char(*(msg++));\n      die_with_code(1);\n    };\n  \
 } else {\n    node->object = obj;\n    pthread_mutex_unlock(&node->mutex);\n\
   };\n};\n\n"};
-__STRING_CONSTANT __string_253={__STRING_CONSTANT__,11,"Added ':='."};
-__STRING_CONSTANT __string_254={__STRING_CONSTANT__,31,"Prototype identifier\
+__STRING_CONSTANT __string_252={__STRING_CONSTANT__,11,"Added ':='."};
+__STRING_CONSTANT __string_253={__STRING_CONSTANT__,31,"Prototype identifier\
  is needed."};
-__STRING_CONSTANT __string_255={__STRING_CONSTANT__,34,"Incorrect name (file\
+__STRING_CONSTANT __string_254={__STRING_CONSTANT__,34,"Incorrect name (file\
 name != name)."};
-__STRING_CONSTANT __string_256={__STRING_CONSTANT__,24,"Object can't be gene\
+__STRING_CONSTANT __string_255={__STRING_CONSTANT__,24,"Object can't be gene\
 ric."};
-__STRING_CONSTANT __string_257={__STRING_CONSTANT__,10,"Added ':'."};
-__STRING_CONSTANT __string_258={__STRING_CONSTANT__,12,"Type needed."};
-__STRING_CONSTANT __string_259={__STRING_CONSTANT__,27,"Sorry, not yet imple\
+__STRING_CONSTANT __string_256={__STRING_CONSTANT__,10,"Added ':'."};
+__STRING_CONSTANT __string_257={__STRING_CONSTANT__,12,"Type needed."};
+__STRING_CONSTANT __string_258={__STRING_CONSTANT__,27,"Sorry, not yet imple\
 mented."};
-__STRING_CONSTANT __string_260={__STRING_CONSTANT__,36,"Identifier parameter\
+__STRING_CONSTANT __string_259={__STRING_CONSTANT__,36,"Identifier parameter\
  type is needed."};
-__STRING_CONSTANT __string_261={__STRING_CONSTANT__,10,"Added ')'."};
-__STRING_CONSTANT __string_262={__STRING_CONSTANT__,28,"Invalid generic list\
+__STRING_CONSTANT __string_260={__STRING_CONSTANT__,10,"Added ')'."};
+__STRING_CONSTANT __string_261={__STRING_CONSTANT__,28,"Invalid generic list\
  number."};
-__STRING_CONSTANT __string_263={__STRING_CONSTANT__,34,"Slot `name' must to \
+__STRING_CONSTANT __string_262={__STRING_CONSTANT__,34,"Slot `name' must to \
 be first slot."};
-__STRING_CONSTANT __string_264={__STRING_CONSTANT__,20,"Incorrect type list."};
-__STRING_CONSTANT __string_265={__STRING_CONSTANT__,19,"Incorrect external."};
-__STRING_CONSTANT __string_266={__STRING_CONSTANT__,3,"// "};
-__STRING_CONSTANT __string_267={__STRING_CONSTANT__,15,"Incorrect expr."};
-__STRING_CONSTANT __string_268={__STRING_CONSTANT__,33,"Double `default' slo\
+__STRING_CONSTANT __string_263={__STRING_CONSTANT__,20,"Incorrect type list."};
+__STRING_CONSTANT __string_264={__STRING_CONSTANT__,19,"Incorrect external."};
+__STRING_CONSTANT __string_265={__STRING_CONSTANT__,3,"// "};
+__STRING_CONSTANT __string_266={__STRING_CONSTANT__,15,"Incorrect expr."};
+__STRING_CONSTANT __string_267={__STRING_CONSTANT__,33,"Double `default' slo\
 t definition."};
-__STRING_CONSTANT __string_269={__STRING_CONSTANT__,30,"Double `type' slot d\
+__STRING_CONSTANT __string_268={__STRING_CONSTANT__,30,"Double `type' slot d\
 efinition."};
-__STRING_CONSTANT __string_270={__STRING_CONSTANT__,17,"Incorrect number."};
-__STRING_CONSTANT __string_271={__STRING_CONSTANT__,21,"Added '<-' is needed."};
-__STRING_CONSTANT __string_272={__STRING_CONSTANT__,20,"Added '(' is needed."};
-__STRING_CONSTANT __string_273={__STRING_CONSTANT__,17,"Unreachable code."};
-__STRING_CONSTANT __string_274={__STRING_CONSTANT__,17,"Incorrect string."};
-__STRING_CONSTANT __string_275={__STRING_CONSTANT__,15,"Incorrect slot."};
-__STRING_CONSTANT __string_276={__STRING_CONSTANT__,59,"For a section, the p\
+__STRING_CONSTANT __string_269={__STRING_CONSTANT__,17,"Incorrect number."};
+__STRING_CONSTANT __string_270={__STRING_CONSTANT__,21,"Added '<-' is needed."};
+__STRING_CONSTANT __string_271={__STRING_CONSTANT__,20,"Added '(' is needed."};
+__STRING_CONSTANT __string_272={__STRING_CONSTANT__,17,"Unreachable code."};
+__STRING_CONSTANT __string_273={__STRING_CONSTANT__,17,"Incorrect string."};
+__STRING_CONSTANT __string_274={__STRING_CONSTANT__,15,"Incorrect slot."};
+__STRING_CONSTANT __string_275={__STRING_CONSTANT__,59,"For a section, the p\
 rototype name only (without '['...']')."};
-__STRING_CONSTANT __string_277={__STRING_CONSTANT__,14,"Slot deferred."};
-__STRING_CONSTANT __string_278={__STRING_CONSTANT__,15,"Incorrect type."};
-__STRING_CONSTANT __string_279={__STRING_CONSTANT__,22,"Type `SELF' is neede\
+__STRING_CONSTANT __string_276={__STRING_CONSTANT__,14,"Slot deferred."};
+__STRING_CONSTANT __string_277={__STRING_CONSTANT__,15,"Incorrect type."};
+__STRING_CONSTANT __string_278={__STRING_CONSTANT__,22,"Type `SELF' is neede\
 d."};
-__STRING_CONSTANT __string_280={__STRING_CONSTANT__,20,"Added ':' is needed."};
-__STRING_CONSTANT __string_281={__STRING_CONSTANT__,30,"Incorrect argument i\
+__STRING_CONSTANT __string_279={__STRING_CONSTANT__,20,"Added ':' is needed."};
+__STRING_CONSTANT __string_280={__STRING_CONSTANT__,30,"Incorrect argument i\
 dentifier."};
-__STRING_CONSTANT __string_282={__STRING_CONSTANT__,24,"Incorrect argument t\
+__STRING_CONSTANT __string_281={__STRING_CONSTANT__,24,"Incorrect argument t\
 ype."};
-__STRING_CONSTANT __string_283={__STRING_CONSTANT__,30,"Incorrect argument d\
+__STRING_CONSTANT __string_282={__STRING_CONSTANT__,30,"Incorrect argument d\
 efinition."};
-__STRING_CONSTANT __string_284={__STRING_CONSTANT__,19,"Operator is needed."};
-__STRING_CONSTANT __string_285={__STRING_CONSTANT__,19,"Incorrect operator."};
-__STRING_CONSTANT __string_286={__STRING_CONSTANT__,10,"Added `''."};
-__STRING_CONSTANT __string_287={__STRING_CONSTANT__,29,"Operator declaration\
+__STRING_CONSTANT __string_283={__STRING_CONSTANT__,19,"Operator is needed."};
+__STRING_CONSTANT __string_284={__STRING_CONSTANT__,19,"Incorrect operator."};
+__STRING_CONSTANT __string_285={__STRING_CONSTANT__,10,"Added `''."};
+__STRING_CONSTANT __string_286={__STRING_CONSTANT__,29,"Operator declaration\
  invalid."};
-__STRING_CONSTANT __string_288={__STRING_CONSTANT__,39,"Not associativity fo\
+__STRING_CONSTANT __string_287={__STRING_CONSTANT__,39,"Not associativity fo\
 r postfix operator."};
-__STRING_CONSTANT __string_289={__STRING_CONSTANT__,38,"Not associativity fo\
+__STRING_CONSTANT __string_288={__STRING_CONSTANT__,38,"Not associativity fo\
 r prefix operator."};
-__STRING_CONSTANT __string_290={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
+__STRING_CONSTANT __string_289={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
 n External'."};
-__STRING_CONSTANT __string_291={__STRING_CONSTANT__,7,"Added '"};
-__STRING_CONSTANT __string_292={__STRING_CONSTANT__,2,"'."};
-__STRING_CONSTANT __string_293={__STRING_CONSTANT__,10,"Added '}'."};
-__STRING_CONSTANT __string_294={__STRING_CONSTANT__,27,"`Expanded' is not po\
+__STRING_CONSTANT __string_290={__STRING_CONSTANT__,7,"Added '"};
+__STRING_CONSTANT __string_291={__STRING_CONSTANT__,2,"'."};
+__STRING_CONSTANT __string_292={__STRING_CONSTANT__,10,"Added '}'."};
+__STRING_CONSTANT __string_293={__STRING_CONSTANT__,27,"`Expanded' is not po\
 ssible."};
-__STRING_CONSTANT __string_295={__STRING_CONSTANT__,10,"Added ']'."};
-__STRING_CONSTANT __string_296={__STRING_CONSTANT__,45,"Impossible '<-' styl\
+__STRING_CONSTANT __string_294={__STRING_CONSTANT__,10,"Added ']'."};
+__STRING_CONSTANT __string_295={__STRING_CONSTANT__,45,"Impossible '<-' styl\
 e assignment with vector."};
-__STRING_CONSTANT __string_297={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
+__STRING_CONSTANT __string_296={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
 mented !"};
-__STRING_CONSTANT __string_298={__STRING_CONSTANT__,1,"{"};
-__STRING_CONSTANT __string_299={__STRING_CONSTANT__,1,"}"};
-__STRING_CONSTANT __string_300={__STRING_CONSTANT__,24,"Unknown escape seque\
+__STRING_CONSTANT __string_297={__STRING_CONSTANT__,1,"{"};
+__STRING_CONSTANT __string_298={__STRING_CONSTANT__,1,"}"};
+__STRING_CONSTANT __string_299={__STRING_CONSTANT__,24,"Unknown escape seque\
 nce."};
-__STRING_CONSTANT __string_301={__STRING_CONSTANT__,39,"Invalid range charac\
+__STRING_CONSTANT __string_300={__STRING_CONSTANT__,39,"Invalid range charac\
 ter number [0,255]."};
-__STRING_CONSTANT __string_302={__STRING_CONSTANT__,23,"Character '\' is nee\
+__STRING_CONSTANT __string_301={__STRING_CONSTANT__,23,"Character '\' is nee\
 ded."};
-__STRING_CONSTANT __string_303={__STRING_CONSTANT__,24,"Incorrect Result num\
+__STRING_CONSTANT __string_302={__STRING_CONSTANT__,24,"Incorrect Result num\
 ber."};
-__STRING_CONSTANT __string_304={__STRING_CONSTANT__,25,"Incorrect live type \
+__STRING_CONSTANT __string_303={__STRING_CONSTANT__,25,"Incorrect live type \
 list."};
-__STRING_CONSTANT __string_305={__STRING_CONSTANT__,23,"Incorrect octal numb\
+__STRING_CONSTANT __string_304={__STRING_CONSTANT__,23,"Incorrect octal numb\
 er."};
-__STRING_CONSTANT __string_306={__STRING_CONSTANT__,24,"Incorrect binary num\
+__STRING_CONSTANT __string_305={__STRING_CONSTANT__,24,"Incorrect binary num\
 ber."};
-__STRING_CONSTANT __string_307={__STRING_CONSTANT__,25,"Incorrect decimal nu\
+__STRING_CONSTANT __string_306={__STRING_CONSTANT__,25,"Incorrect decimal nu\
 mber."};
-__STRING_CONSTANT __string_308={__STRING_CONSTANT__,6,"Slot `"};
-__STRING_CONSTANT __string_309={__STRING_CONSTANT__,12,"' not found."};
-__STRING_CONSTANT __string_310={__STRING_CONSTANT__,30,"No argument for `exi\
+__STRING_CONSTANT __string_307={__STRING_CONSTANT__,6,"Slot `"};
+__STRING_CONSTANT __string_308={__STRING_CONSTANT__,12,"' not found."};
+__STRING_CONSTANT __string_309={__STRING_CONSTANT__,30,"No argument for `exi\
 t' method."};
-__STRING_CONSTANT __string_311={__STRING_CONSTANT__,23,"String argument need\
+__STRING_CONSTANT __string_310={__STRING_CONSTANT__,23,"String argument need\
 ed."};
-__STRING_CONSTANT __string_312={__STRING_CONSTANT__,17,"Invalid argument."};
-__STRING_CONSTANT __string_313={__STRING_CONSTANT__,21,"No expression result."};
-__STRING_CONSTANT __string_314={__STRING_CONSTANT__,15,"BOOLEAN needed."};
-__STRING_CONSTANT __string_315={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
-__STRING_CONSTANT __string_316={__STRING_CONSTANT__,22,"Prototype name neede\
+__STRING_CONSTANT __string_311={__STRING_CONSTANT__,17,"Invalid argument."};
+__STRING_CONSTANT __string_312={__STRING_CONSTANT__,21,"No expression result."};
+__STRING_CONSTANT __string_313={__STRING_CONSTANT__,15,"BOOLEAN needed."};
+__STRING_CONSTANT __string_314={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
+__STRING_CONSTANT __string_315={__STRING_CONSTANT__,22,"Prototype name neede\
 d."};
-__STRING_CONSTANT __string_317={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
+__STRING_CONSTANT __string_316={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_318={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
+__STRING_CONSTANT __string_317={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_319={__STRING_CONSTANT__,7,"Style `"};
-__STRING_CONSTANT __string_320={__STRING_CONSTANT__,32,"' for parameter type\
+__STRING_CONSTANT __string_318={__STRING_CONSTANT__,7,"Style `"};
+__STRING_CONSTANT __string_319={__STRING_CONSTANT__,32,"' for parameter type\
  is ignored."};
-__STRING_CONSTANT __string_321={__STRING_CONSTANT__,10,"' ignored."};
-__STRING_CONSTANT __string_322={__STRING_CONSTANT__,21,"Incorrect identifier."};
-__STRING_CONSTANT __string_323={__STRING_CONSTANT__,21,"Incorrect local type."};
-__STRING_CONSTANT __string_324={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
+__STRING_CONSTANT __string_320={__STRING_CONSTANT__,10,"' ignored."};
+__STRING_CONSTANT __string_321={__STRING_CONSTANT__,21,"Incorrect identifier."};
+__STRING_CONSTANT __string_322={__STRING_CONSTANT__,21,"Incorrect local type."};
+__STRING_CONSTANT __string_323={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
 ession."};
-__STRING_CONSTANT __string_325={__STRING_CONSTANT__,18,"Incorrect message."};
-__STRING_CONSTANT __string_326={__STRING_CONSTANT__,22,"Incorrect real numbe\
+__STRING_CONSTANT __string_324={__STRING_CONSTANT__,18,"Incorrect message."};
+__STRING_CONSTANT __string_325={__STRING_CONSTANT__,22,"Incorrect real numbe\
 r."};
-__STRING_CONSTANT __string_327={__STRING_CONSTANT__,28,"Character constant t\
+__STRING_CONSTANT __string_326={__STRING_CONSTANT__,28,"Character constant t\
 oo long."};
-__STRING_CONSTANT __string_328={__STRING_CONSTANT__,32,"Unterminated charact\
+__STRING_CONSTANT __string_327={__STRING_CONSTANT__,32,"Unterminated charact\
 er constant."};
-__STRING_CONSTANT __string_329={__STRING_CONSTANT__,37,"Incorrect multiple r\
+__STRING_CONSTANT __string_328={__STRING_CONSTANT__,37,"Incorrect multiple r\
 esult expression."};
-__STRING_CONSTANT __string_330={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
+__STRING_CONSTANT __string_329={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
 M.read_integer.\n"};
-__STRING_CONSTANT __string_331={__STRING_CONSTANT__,21,"Incorrect directory `"};
-__STRING_CONSTANT __string_332={__STRING_CONSTANT__,19,"Incorrect argument."};
-__STRING_CONSTANT __string_333={__STRING_CONSTANT__,15,"Type incorrect."};
+__STRING_CONSTANT __string_330={__STRING_CONSTANT__,21,"Incorrect directory `"};
+__STRING_CONSTANT __string_331={__STRING_CONSTANT__,19,"Incorrect argument."};
+__STRING_CONSTANT __string_332={__STRING_CONSTANT__,15,"Type incorrect."};
 
 //==========================//
 // FUNCTION HEADER          //
@@ -2439,211 +2442,212 @@ __STRING_CONSTANT __string_333={__STRING_CONSTANT__,15,"Type incorrect."};
 // Debug Manager
 void print_string(char *str);
 // Source code
-static __STRING* create__NBB(__INTEGER needed_capacity__PBB);
-static __POINTER new_lab__MRJ(__UINTEGER_32 t__ORJ);
-static void** create__ZFRB(__INTEGER nb_elements__1FRB);
-static void add_last__ZLT(__STRING *Self__0LT,__CHARACTER ch__1LT);
-static void add_last__ASV(__FAST_ARRAYoSTRINGo *Self__BSV,void *element__CSV);
-static __INTEGER prime_number_ceiling__X41(__INTEGER integer__Z41);
-static void** create__XB4(__INTEGER nb_elements__ZB4);
-static void** create__HITC(__INTEGER nb_elements__JITC);
-static void** create__GFSB(__INTEGER nb_elements__IFSB);
-static void** create__BG4(__INTEGER nb_elements__DG4);
-static void** create__MZ2(__INTEGER nb_elements__OZ2);
-static void** create__MJRB(__INTEGER nb_elements__OJRB);
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__IFR(__INTEGER new_count__KFR);
-static void** create__1ZBB(__INTEGER nb_elements__3ZBB);
-static void** create__VLXB(__INTEGER nb_elements__XLXB);
-static void** create__QUWB(__INTEGER nb_elements__SUWB);
-static void** create__PSXB(__INTEGER nb_elements__RSXB);
-static void** create__VH5(__INTEGER nb_elements__XH5);
-static void fast_put__to__TOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UOZ,void *v__VOZ,void *k__WOZ);
-static void** create__1HYB(__INTEGER nb_elements__3HYB);
-static void* get__DTI(void *n__FTI);
-static void** create__EHQB(__INTEGER nb_elements__GHQB);
-static void** create__U1PB(__INTEGER nb_elements__W1PB);
-static void** create__53ZB(__INTEGER nb_elements__B4ZB);
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__BHRC(__INTEGER new_count__DHRC);
-static void** create__ZKTF(__INTEGER nb_elements__1KTF);
-static void** create__3RFF(__INTEGER nb_elements__5RFF);
-static void** create__SNXF(__INTEGER nb_elements__UNXF);
-static void** create__K4IE(__INTEGER nb_elements__M4IE);
-static void* new_page__OA5();
-static void to_busy__index__TTFC(__MEMORY *Self__UTFC,__UINTEGER_32 sz__VTFC,__UINTEGER_32 idx__WTFC);
-static void** create__31XC(__INTEGER nb_elements__51XC);
-static void** create__ABYC(__INTEGER nb_elements__CBYC);
-static void** create__ELBD(__INTEGER nb_elements__GLBD);
-static void** create__ILEF(__INTEGER nb_elements__KLEF);
-static void** create__BK2(__INTEGER nb_elements__DK2);
-static void add__IYR(__HASHED_SEToABSTRACT_STRINGo *Self__JYR,void *e__KYR);
-static void* operator__name__WGB(void *op__ZGB);
-static void print__WHD(__STRING_CONSTANT *Self__XHD);
-static void* get__IWB(void *str__KWB);
-static void copy__ZCS(__STRING *Self__0CS,void *other__1CS);
-static void append__BOS(__STRING *Self__COS,void *other__DOS);
-static void* parent_directory__OED();
-static void* get_entry__T0AC(void *p__V0AC);
-static void put_string__U1F(void *s__W1F);
-static __PROTOTYPE* create__name__generic_count__ZAC(void *f__1AC,void *n__2AC);
-static __BOOLEAN read_space__3RD();
-static __BOOLEAN read_identifier__LAL();
-static __POSITION current_position__JXF();
-static void put_error__text__KNG(__INTEGER type__MNG,void *txt__NNG);
-static void put_position__UOG(__POSITION Self__VOG);
-static __BOOLEAN read_symbol__DXJ(void *st__FXJ);
-static __BOOLEAN read_short_elt__LLKB();
-static void fast_put__to__Y1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__Z1R,void *k__11R);
-static __TYPE_FULL* create__with__SQB(void *typ__UQB,__UINTEGER_8 code__VQB);
-static void** create__CZNB(__INTEGER nb_elements__EZNB);
-static void add_last__O4R(__FAST_ARRAYoTYPE_IDo *Self__P4R,void *element__Q4R);
-static __BOOLEAN open__ZERD(__DIRECTORY_UNIX *Self__0ERD);
-static void check_in__begin__4QQC(void *entry__ARQC,__INTEGER n__BRQC);
-static void* add_ext__EBF(void *n__GBF);
-static void save_file__with__PDC(void *n__RDC,void *buf__SDC);
-static void resize__YXZ(__STRING *Self__ZXZ,__INTEGER new_count__0XZ);
-static void move__to__by__BWCC(__CHARACTER *Self__CWCC,__INTEGER lower__DWCC,__INTEGER upper__EWCC,__INTEGER offset__FWCC);
-static __BOOLEAN __infix_equal_equal__45DB(__STRING_CONSTANT *Self__55DB,void *other__AAEB);
-static void* at__QL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RL4,void *k__SL4);
-static void go_on__CBC(void *obj__EBC);
-static void put__to__like__1ZXD(void *tok__3ZXD,void *buf__4ZXD,void *key__5ZXD);
-static void shorter_get_all_slot_in__E1XD(__PROTOTYPE *Self__F1XD,void *lst__G1XD);
-static void pretty_name_in__AJ3F(__ITM_SLOT *Self__BJ3F,void *buffer__CJ3F);
-static void pretty_name_in__VK3F(__ITM_SLOT_OPERATOR *Self__WK3F,void *buffer__XK3F);
-static void get_all_comment_slot__in__302E(__PROTOTYPE *Self__402E,void *n__502E,void *buf__A12E);
-static void append_in__OIH(__UINTEGER_32 Self__PIH,void *buffer__QIH);
-static void append_in__MM3F(__SECTION_ *Self__NM3F,void *buf__OM3F);
-static void shorter_profile_in__ON3F(__ITM_SLOT *Self__PN3F,void *buf__QN3F);
-static void shorter_profile_in__LO3F(__ITM_SLOT_OPERATOR *Self__MO3F,void *buf__NO3F);
-static __CHARACTER* create__BMEB(__INTEGER nb_elements__DMEB);
-static __POINTER realloc_dynamic__old_size__new_size__RELC(__POINTER p__TELC,__UINTEGER_32 old_sz__UELC,__UINTEGER_32 new_sz__VELC);
-static void** create__TBRB(__INTEGER nb_elements__VBRB);
-static void* fast_reference_at__Y1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__Z1T,void *k__01T);
-static void** create__RLHE(__INTEGER nb_elements__TLHE);
-static __BOOLEAN has__1PW(__HASHED_SEToABSTRACT_STRINGo *Self__2PW,void *e__3PW);
-static void increase_capacity__4RNB(__HASHED_SEToABSTRACT_STRINGo *Self__5RNB);
-static void put_string__YHF(void *s__0HF);
-static __BOOLEAN fast_has__OAY(__HASHED_SEToABSTRACT_STRINGo *Self__PAY,void *e__QAY);
-static void* physical_get_entry__JCF(void *new_path__LCF);
-static void put__to__R0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__S0S,void *v__T0S,void *k__U0S);
-static void reduce_path__Q3HC(void *st__S3HC);
-static void* reference_at__EU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__FU0C,void *k__GU0C);
-static void* physical_get_entry__YW0C(void *new_path__0W0C);
-static void** create__VY1C(__INTEGER nb_elements__XY1C);
-static void** create__3QSC(__INTEGER nb_elements__5QSC);
-static void short__token__to__LBD(void *key__NBD,__INTEGER beg__OBD,__INTEGER end__PBD);
-static __INTEGER first_substring_index__JIZE(__STRING *Self__KIZE);
-static __BOOLEAN read_string__LFQ();
-static void reduce_path__BE3E(void *st__DE3E);
-static void* item__FZPE(__DIRECTORY_UNIX *Self__GZPE,__INTEGER i__HZPE);
-static void* item__Y0ND(__LINKED_LISToSTRING_CONSTANTo *Self__Z0ND,__INTEGER i__00ND);
-static void** create__T23(__INTEGER nb_elements__V23);
-static __BOOLEAN read_word__QPF(void *st__SPF);
-static __BOOLEAN read_slot_header__SDE(__BOOLEAN first__UDE);
-static void* get_name__0UOB(void *n__2UOB);
-static void* read_type_list__IMO(__PARSER *Self__JMO,__BOOLEAN is_section__KMO);
-static __INTEGER hash_code__P50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Q50);
-static __CHARACTER read_style__XRF();
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__RL5B(__INTEGER new_count__TL5B);
-static void* read_loc_arg__with_self__IEHB(__PARSER *Self__JEHB,__BOOLEAN mute__KEHB,__BOOLEAN self_first__LEHB);
-static void* read_slot_operator__FU5B(void *list_arg__HU5B);
-static void add_last__05GC(__FAST_ARRAYoITM_ARGUMENTo *Self__15GC,void *element__25GC);
-static void* read_slot_keyword__SZ5B(void *list_arg__UZ5B);
-static void** create__WPBD(__INTEGER nb_elements__YPBD);
-static void set_argument_list__VCHC(__ITM_SLOT *Self__WCHC,void *p__XCHC);
-static __ITM_TYPE_MULTI* get__CJP(void *lt__EJP);
-static void* read_type__DCM(__PARSER *Self__ECM,__BOOLEAN is_local__FCM);
-static void set_result_type__Q3FC(__ITM_SLOT *Self__R3FC,void *t__S3FC);
-static void* read_contract__HTF(__PARSER *Self__ITF);
-static void* read_expr__44I(__PARSER *Self__54I);
-static void set_value__type__ZFHC(__ITM_SLOT *Self__0FHC,void *e__1FHC,void *p__2FHC);
-static __POSITION position__FD5B(__ITM_EXPRESSION *Self__GD5B);
-static __POSITION position__FJHC(__ITM_RESULT *Self__GJHC);
-static void fast_put__to__BOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__COGC,void *v__DOGC,void *k__EOGC);
-static void* fast_reference_at__QAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__RAGC,void *k__SAGC);
-static void* fast_reference_at__GB5D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HB5D,void *k__IB5D);
-static void append_in__OGPD(__ITM_TYPE_BLOCK *Self__PGPD,void *buffer__QGPD);
-static void append_in__SHPD(__ITM_TYPE_GENERIC *Self__THPD,void *buffer__UHPD);
-static void put__to__like__U25F(void *tok__W25F,void *buf__X25F,void *key__Y25F);
-static void shorter_in__VZ5F(__ITM_ARG *Self__WZ5F,void *buf__XZ5F);
-static void shorter_in__M05F(__ITM_ARGS *Self__N05F,void *buf__O05F);
-static void shorter_in__S3BG(__ITM_TYPE_PARAMETER *Self__T3BG,void *buf__U3BG);
-static void shorter_in__D4BG(__ITM_TYPE_SIMPLE *Self__E4BG,void *buf__F4BG);
-static void shorter_raw_in__JIEG(__ITM_TYPE_MULTI *Self__KIEG,void *buf__LIEG);
-static void shorter_in__U4BG(__ITM_TYPE_BLOCK *Self__V4BG,void *buf__W4BG);
-static void shorter_in__25BG(__ITM_TYPE_GENERIC *Self__35BG,void *buf__45BG);
-static void put__to__like__MGEG(void *tok__OGEG,void *buf__PGEG,void *key__QGEG);
-static void put__to__like__DECG(void *tok__FECG,void *buf__GECG,void *key__HECG);
-static void set_path__ONT(__DIRECTORY_UNIX *Self__PNT,void *n__QNT);
-static void set_path__JOT(__FILE_UNIX *Self__KOT,void *n__LOT);
-static void insert_string__to__0XU(__STRING *Self__1XU,void *s__2XU,__INTEGER i__3XU);
-static void read_escape_character__WAKF();
-static __BOOLEAN read_cap_identifier__SZJ();
-static void add_last__SBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__TBBC,void *element__UBBC);
-static __BOOLEAN read_external__ATO();
-static void* read_expr_primary__I4M(__PARSER *Self__J4M);
-static __BOOLEAN read_integer__A2P();
-static void* readlip_expr__JTPB();
-static void run__QGFC(__LIP_AFFECT *Self__RGFC);
-static void run__T5TE(__LIP_CALL *Self__U5TE);
-static void run__2CQD(__LIP_IF *Self__3CQD);
-static void run__HEUE(__LIP_PRINT *Self__IEUE);
-static void add_last__0NV(__FAST_ARRAYoITM_TYPE_MONOo *Self__1NV,void *element__2NV);
-static void* alias__GVP(void *tmp__IVP);
-static void add__CMHB(__HASHED_SEToSTRING_CONSTANTo *Self__DMHB,void *e__EMHB);
-static void add_last__RBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__SBPD,void *element__TBPD);
-static void free__0S5(void *tmp__2S5);
-static void free__2MQ(void *tmp__4MQ);
-static __INTEGER hash_code__BTQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__CTQF);
-static void copy__22RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__32RD,void *other__42RD);
-static __BOOLEAN read_operator__HNM();
-static void* operator__name__3DO(void *typ__5DO,void *op__AEO);
-static void append_in__SIBC(__ITM_TYPE_MULTI *Self__TIBC,void *buffer__UIBC);
-static void* read_prototype__HON(__PARSER *Self__ION,void *styl__JON);
-static void read_def_local__30H(__PARSER *Self__40H);
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__SVI(__INTEGER new_count__UVI);
-static void add_last__U5U(__FAST_ARRAYoITM_CODEo *Self__V5U,void *element__W5U);
-static void* copy__Q5H(void *tmp__S5H);
-static __BOOLEAN fast_has__3DV(__HASHED_SEToSTRING_CONSTANTo *Self__4DV,void *e__5DV);
-static void restore_context__TDL();
-static void* read_expr_message__0VL(__PARSER *Self__1VL);
-static void free__YVI(void *tmp__0VI);
-static void display_raw__TLIC(__ITM_TYPE_MULTI *Self__ULIC,void *buffer__VLIC);
-static void put__to__like__PBFG(void *tok__RBFG,void *buf__SBFG,void *key__TBFG);
-static void put__to__like__FCCG(void *tok__HCCG,void *buf__ICCG,void *key__JCCG);
-static void put__to__like__YBEG(void *tok__0BEG,void *buf__1BEG);
-static void put__to__like__EEEG(void *tok__GEEG,void *buf__HEEG,void *key__IEEG);
-static __BOOLEAN is_hexadecimal_digit__CSJE(__CHARACTER Self__DSJE);
-static void* read_constant__1QO();
-static void* read_group__JBHB(__PARSER *Self__KBHB);
-static void* readlip_expr_operator__MOZB(__PARSER *Self__NOZB);
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__2QKD(__INTEGER new_count__4QKD);
-static void add_last__JJUD(__FAST_ARRAYoLIP_CODEo *Self__KJUD,void *element__LJUD);
-static void* copy__ILID(void *tmp__KLID);
-static void* fast_reference_at__OURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__PURD,void *k__QURD);
-static void* run_expr__GZQD(__LIP_BINARY *Self__HZQD);
-static void* run_expr__F2QD(__LIP_UNARY *Self__G2QD);
-static void* run_expr__FGUE(__LIP_CALL *Self__GGUE);
-static void* get__0JSE(__LIP_INTEGER *Self__1JSE,__INTEGER i__2JSE);
-static void* get__RBFF(__LIP_STRING *Self__SBFF,void *str__TBFF);
-static void free__SW2F(__LIP_INTEGER *Self__TW2F);
-static void free__EVGG(__LIP_STRING *Self__FVGG);
-static void load_directory__is_recursive__5BWF(__LIP_CALL *Self__ACWF,void *path__BCWF,__BOOLEAN is_rec__CCWF);
-static void append_in__C2GG(__LIP_STRING *Self__D2GG,void *str__E2GG);
-static void print_positif__Z4JG(__INTEGER Self__04JG);
-static __BOOLEAN has__TLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ULMB,void *e__VLMB);
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__QJK(__INTEGER new_count__SJK);
-static void add_last__F2U(__FAST_ARRAYoITM_LOCALo *Self__G2U,void *element__H2U);
-static void free__WJK(void *tmp__YJK);
-static void* copy__53J(void *tmp__B4J);
-static void** create__HTQB(__INTEGER nb_elements__JTQB);
-static void* read_send_msg__M4N(__PARSER *Self__N4N,void *first_arg__O4N);
-static void* readlip_expr_cmp__A11B(__PARSER *Self__B11B);
-static void** create__WYIE(__INTEGER nb_elements__YYIE);
-static void** create__HRQB(__INTEGER nb_elements__JRQB);
-static void* read_argument__TOP(__PARSER *Self__UOP);
-static void* readlip_expr_binary__3N3B(__PARSER *Self__4N3B);
-static void* readlip_expr_unary__4Z4B(__PARSER *Self__5Z4B);
-static void* readlip_expr_base__RGFE(__PARSER *Self__SGFE);
+static __STRING* create__TBB(__INTEGER needed_capacity__VBB);
+static __POINTER new_lab__URJ(__UINTEGER_32 t__WRJ);
+static void** create__BGRB(__INTEGER nb_elements__DGRB);
+static void add_last__BMT(__STRING *Self__CMT,__CHARACTER ch__DMT);
+static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV);
+static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51);
+static void** create__5B4(__INTEGER nb_elements__BC4);
+static void** create__PITC(__INTEGER nb_elements__RITC);
+static void** create__OFSB(__INTEGER nb_elements__QFSB);
+static void** create__JG4(__INTEGER nb_elements__LG4);
+static void** create__UZ2(__INTEGER nb_elements__WZ2);
+static void** create__UJRB(__INTEGER nb_elements__WJRB);
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__QFR(__INTEGER new_count__SFR);
+static void** create__D0BB(__INTEGER nb_elements__F0BB);
+static void** create__3LXB(__INTEGER nb_elements__5LXB);
+static void** create__YUWB(__INTEGER nb_elements__0UWB);
+static void** create__XSXB(__INTEGER nb_elements__ZSXB);
+static void** create__3H5(__INTEGER nb_elements__5H5);
+static void fast_put__to__1OZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__2OZ,void *v__3OZ,void *k__4OZ);
+static void** create__DIYB(__INTEGER nb_elements__FIYB);
+static void* get__LTI(void *n__NTI);
+static void** create__MHQB(__INTEGER nb_elements__OHQB);
+static void** create__21PB(__INTEGER nb_elements__41PB);
+static void** create__H4ZB(__INTEGER nb_elements__J4ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__JHRC(__INTEGER new_count__LHRC);
+static void** create__3WTF(__INTEGER nb_elements__5WTF);
+static void** create__52FF(__INTEGER nb_elements__B3FF);
+static void** create__Y0XF(__INTEGER nb_elements__00XF);
+static void** create__C0IE(__INTEGER nb_elements__E0IE);
+static void* new_page__WA5();
+static void to_busy__index__1TFC(__MEMORY *Self__2TFC,__UINTEGER_32 sz__3TFC,__UINTEGER_32 idx__4TFC);
+static void** create__F2XC(__INTEGER nb_elements__H2XC);
+static void** create__IBYC(__INTEGER nb_elements__KBYC);
+static void** create__MLBD(__INTEGER nb_elements__OLBD);
+static void** create__UVEF(__INTEGER nb_elements__WVEF);
+static void** create__JK2(__INTEGER nb_elements__LK2);
+static void add__QYR(__HASHED_SEToABSTRACT_STRINGo *Self__RYR,void *e__SYR);
+static void* operator__name__4GB(void *op__BHB);
+static void print__4HD(__STRING_CONSTANT *Self__5HD);
+static void* get__QWB(void *str__SWB);
+static void copy__BDS(__STRING *Self__CDS,void *other__DDS);
+static void append__JOS(__STRING *Self__KOS,void *other__LOS);
+static void* parent_directory__WED();
+static void* get_entry__10AC(void *p__30AC);
+static void put_string__21F(void *s__41F);
+static __PROTOTYPE* create__name__generic_count__BBC(void *f__DBC,void *n__EBC);
+static __BOOLEAN read_space__FSD();
+static __BOOLEAN read_identifier__TAL();
+static __POSITION current_position__RXF();
+static void put_error__text__SNG(__INTEGER type__UNG,void *txt__VNG);
+static void put_position__2OG(__POSITION Self__3OG);
+static __BOOLEAN read_symbol__LXJ(void *st__NXJ);
+static __BOOLEAN read_short_elt__TLKB();
+static void fast_put__to__A2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__B2R,void *k__D2R);
+static __TYPE_FULL* create__with__0QB(void *typ__2QB,__UINTEGER_8 code__3QB);
+static void** create__KZNB(__INTEGER nb_elements__MZNB);
+static void add_last__W4R(__FAST_ARRAYoTYPE_IDo *Self__X4R,void *element__Y4R);
+static __BOOLEAN open__BFRD(__DIRECTORY_UNIX *Self__CFRD);
+static void check_in__begin__GRQC(void *entry__IRQC,__INTEGER n__JRQC);
+static void* add_ext__MBF(void *n__OBF);
+static void save_file__with__XDC(void *n__ZDC,void *buf__0DC);
+static void resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ);
+static void move__to__by__JWCC(__CHARACTER *Self__KWCC,__INTEGER lower__LWCC,__INTEGER upper__MWCC,__INTEGER offset__NWCC);
+static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB);
+static void* at__YL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ZL4,void *k__0L4);
+static void go_on__KBC(void *obj__MBC);
+static void put__to__like__D0XD(void *tok__F0XD,void *buf__G0XD,void *key__H0XD);
+static void shorter_get_all_slot_in__T1XD(__PROTOTYPE *Self__U1XD,void *lst__V1XD);
+static void pretty_name_in__DA4F(__ITM_SLOT *Self__EA4F,void *buffer__FA4F);
+static void pretty_name_in__YB4F(__ITM_SLOT_OPERATOR *Self__ZB4F,void *buffer__0B4F);
+static void get_all_comment_slot__in__A12E(__PROTOTYPE *Self__B12E,void *n__C12E,void *buf__D12E);
+static void shorter_comment__in__light__V42E(void *str__X42E,void *buf__Y42E,__BOOLEAN is_light__Z42E);
+static void append_in__WIH(__UINTEGER_32 Self__XIH,void *buffer__YIH);
+static void append_in__PD4F(__SECTION_ *Self__QD4F,void *buf__RD4F);
+static void shorter_profile_in__RE4F(__ITM_SLOT *Self__SE4F,void *buf__TE4F);
+static void shorter_profile_in__OF4F(__ITM_SLOT_OPERATOR *Self__PF4F,void *buf__QF4F);
+static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB);
+static __POINTER realloc_dynamic__old_size__new_size__ZELC(__POINTER p__1ELC,__UINTEGER_32 old_sz__2ELC,__UINTEGER_32 new_sz__3ELC);
+static void** create__1BRB(__INTEGER nb_elements__3BRB);
+static void* fast_reference_at__A2T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__B2T,void *k__C2T);
+static void** create__OJHE(__INTEGER nb_elements__QJHE);
+static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW);
+static void increase_capacity__GSNB(__HASHED_SEToABSTRACT_STRINGo *Self__HSNB);
+static void put_string__AIF(void *s__CIF);
+static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY);
+static void* physical_get_entry__RCF(void *new_path__TCF);
+static void put__to__Z0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__00S,void *v__10S,void *k__20S);
+static void reduce_path__Y3HC(void *st__03HC);
+static void* reference_at__MU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NU0C,void *k__OU0C);
+static void* physical_get_entry__AX0C(void *new_path__CX0C);
+static void** create__3Y1C(__INTEGER nb_elements__5Y1C);
+static void** create__FRSC(__INTEGER nb_elements__HRSC);
+static void short__token__to__TBD(void *key__VBD,__INTEGER beg__WBD,__INTEGER end__XBD);
+static __INTEGER first_substring_index__MIZE(__STRING *Self__NIZE);
+static __BOOLEAN read_string__TFQ();
+static void reduce_path__NO3E(void *st__PO3E);
+static void* item__1WPE(__DIRECTORY_UNIX *Self__2WPE,__INTEGER i__3WPE);
+static void* item__A1ND(__LINKED_LISToSTRING_CONSTANTo *Self__B1ND,__INTEGER i__C1ND);
+static void** create__123(__INTEGER nb_elements__323);
+static __BOOLEAN read_word__YPF(void *st__0PF);
+static __BOOLEAN read_slot_header__0DE(__BOOLEAN first__2DE);
+static void* get_name__CVOB(void *n__EVOB);
+static void* read_type_list__QMO(__PARSER *Self__RMO,__BOOLEAN is_section__SMO);
+static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50);
+static __CHARACTER read_style__5RF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__ZL5B(__INTEGER new_count__1L5B);
+static void* read_loc_arg__with_self__QEHB(__PARSER *Self__REHB,__BOOLEAN mute__SEHB,__BOOLEAN self_first__TEHB);
+static void* read_slot_operator__NU5B(void *list_arg__PU5B);
+static void add_last__CAHC(__FAST_ARRAYoITM_ARGUMENTo *Self__DAHC,void *element__EAHC);
+static void* read_slot_keyword__0Z5B(void *list_arg__2Z5B);
+static void** create__4PBD(__INTEGER nb_elements__AQBD);
+static void set_argument_list__3CHC(__ITM_SLOT *Self__4CHC,void *p__5CHC);
+static __ITM_TYPE_MULTI* get__KJP(void *lt__MJP);
+static void* read_type__LCM(__PARSER *Self__MCM,__BOOLEAN is_local__NCM);
+static void set_result_type__Y3FC(__ITM_SLOT *Self__Z3FC,void *t__03FC);
+static void* read_contract__PTF(__PARSER *Self__QTF);
+static void* read_expr__G5I(__PARSER *Self__H5I);
+static void set_value__type__BGHC(__ITM_SLOT *Self__CGHC,void *e__DGHC,void *p__EGHC);
+static __POSITION position__ND5B(__ITM_EXPRESSION *Self__OD5B);
+static __POSITION position__NJHC(__ITM_RESULT *Self__OJHC);
+static void fast_put__to__JOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KOGC,void *v__LOGC,void *k__MOGC);
+static void* fast_reference_at__YAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZAGC,void *k__0AGC);
+static void* fast_reference_at__EHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FHNE,void *k__GHNE);
+static void append_in__WGPD(__ITM_TYPE_BLOCK *Self__XGPD,void *buffer__YGPD);
+static void append_in__0HPD(__ITM_TYPE_GENERIC *Self__1HPD,void *buffer__2HPD);
+static void put__to__like__IUAG(void *tok__KUAG,void *buf__LUAG,void *key__MUAG);
+static void shorter_in__JRAG(__ITM_ARG *Self__KRAG,void *buf__LRAG);
+static void shorter_in__ASAG(__ITM_ARGS *Self__BSAG,void *buf__CSAG);
+static void shorter_in__RVCG(__ITM_TYPE_PARAMETER *Self__SVCG,void *buf__TVCG);
+static void shorter_in__CWCG(__ITM_TYPE_SIMPLE *Self__DWCG,void *buf__EWCG);
+static void shorter_raw_in__BCFG(__ITM_TYPE_MULTI *Self__CCFG,void *buf__DCFG);
+static void shorter_in__TWCG(__ITM_TYPE_BLOCK *Self__UWCG,void *buf__VWCG);
+static void shorter_in__1XCG(__ITM_TYPE_GENERIC *Self__2XCG,void *buf__3XCG);
+static void put__to__like__35EG(void *tok__55EG,void *buf__AAFG,void *key__BAFG);
+static void put__to__like__J2CG(void *tok__L2CG,void *buf__M2CG,void *key__N2CG);
+static void set_path__WNT(__DIRECTORY_UNIX *Self__XNT,void *n__YNT);
+static void set_path__ROT(__FILE_UNIX *Self__SOT,void *n__TOT);
+static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU);
+static void read_escape_character__YLKF();
+static __BOOLEAN read_cap_identifier__0ZJ();
+static void add_last__0BBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__1BBC,void *element__2BBC);
+static __BOOLEAN read_external__ITO();
+static void* read_expr_primary__Q4M(__PARSER *Self__R4M);
+static __BOOLEAN read_integer__I2P();
+static void* readlip_expr__RTPB();
+static void run__YGFC(__LIP_AFFECT *Self__ZGFC);
+static void run__W5TE(__LIP_CALL *Self__X5TE);
+static void run__EDQD(__LIP_IF *Self__FDQD);
+static void run__KEUE(__LIP_PRINT *Self__LEUE);
+static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV);
+static void* alias__OVP(void *tmp__QVP);
+static void add__KMHB(__HASHED_SEToSTRING_CONSTANTo *Self__LMHB,void *e__MMHB);
+static void add_last__ZBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__0BPD,void *element__1BPD);
+static void free__CT5(void *tmp__ET5);
+static void free__ENQ(void *tmp__GNQ);
+static __INTEGER hash_code__F5QF(__FAST_ARRAYoSTRING_CONSTANTo *Self__G5QF);
+static void copy__E3RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__F3RD,void *other__G3RD);
+static __BOOLEAN read_operator__PNM();
+static void* operator__name__FEO(void *typ__HEO,void *op__IEO);
+static void append_in__0IBC(__ITM_TYPE_MULTI *Self__1IBC,void *buffer__2IBC);
+static void* read_prototype__PON(__PARSER *Self__QON,void *styl__RON);
+static void read_def_local__F1H(__PARSER *Self__G1H);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__0VI(__INTEGER new_count__2VI);
+static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U);
+static void* copy__Y5H(void *tmp__05H);
+static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV);
+static void restore_context__1DL();
+static void* read_expr_message__CWL(__PARSER *Self__DWL);
+static void free__AWI(void *tmp__CWI);
+static void display_raw__1LIC(__ITM_TYPE_MULTI *Self__2LIC,void *buffer__3LIC);
+static void put__to__like__H1FG(void *tok__J1FG,void *buf__K1FG,void *key__L1FG);
+static void put__to__like__E0CG(void *tok__G0CG,void *buf__H0CG,void *key__I0CG);
+static void put__to__like__10EG(void *tok__30EG,void *buf__40EG);
+static void put__to__like__O3EG(void *tok__Q3EG,void *buf__R3EG,void *key__S3EG);
+static __BOOLEAN is_hexadecimal_digit__0NJE(__CHARACTER Self__1NJE);
+static void* read_constant__DRO();
+static void* read_group__RBHB(__PARSER *Self__SBHB);
+static void* readlip_expr_operator__UOZB(__PARSER *Self__VOZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__ERKD(__INTEGER new_count__GRKD);
+static void add_last__RJUD(__FAST_ARRAYoLIP_CODEo *Self__SJUD,void *element__TJUD);
+static void* copy__QLID(void *tmp__SLID);
+static void* fast_reference_at__WURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__XURD,void *k__YURD);
+static void* run_expr__OZQD(__LIP_BINARY *Self__PZQD);
+static void* run_expr__N2QD(__LIP_UNARY *Self__O2QD);
+static void* run_expr__IGUE(__LIP_CALL *Self__JGUE);
+static void* get__KJSE(__LIP_INTEGER *Self__LJSE,__INTEGER i__MJSE);
+static void* get__TMFF(__LIP_STRING *Self__UMFF,void *str__VMFF);
+static void free__VN3F(__LIP_INTEGER *Self__WN3F);
+static void free__4RHG(__LIP_STRING *Self__5RHG);
+static void load_directory__is_recursive__DOWF(__LIP_CALL *Self__EOWF,void *path__FOWF,__BOOLEAN is_rec__GOWF);
+static void append_in__2YHG(__LIP_STRING *Self__3YHG,void *str__4YHG);
+static void print_positif__C1KG(__INTEGER Self__D1KG);
+static __BOOLEAN has__1LMB(__HASHED_SEToSTRING_CONSTANTo *Self__2LMB,void *e__3LMB);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__YJK(__INTEGER new_count__0JK);
+static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U);
+static void free__4JK(void *tmp__AKK);
+static void* copy__H4J(void *tmp__J4J);
+static void** create__PTQB(__INTEGER nb_elements__RTQB);
+static void* read_send_msg__U4N(__PARSER *Self__V4N,void *first_arg__W4N);
+static void* readlip_expr_cmp__I11B(__PARSER *Self__J11B);
+static void** create__OUIE(__INTEGER nb_elements__QUIE);
+static void** create__PRQB(__INTEGER nb_elements__RRQB);
+static void* read_argument__1OP(__PARSER *Self__2OP);
+static void* readlip_expr_binary__FO3B(__PARSER *Self__GO3B);
+static void* readlip_expr_unary__G04B(__PARSER *Self__H04B);
+static void* readlip_expr_base__OEFE(__PARSER *Self__PEFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2651,4599 +2655,4605 @@ static void* readlip_expr_base__RGFE(__PARSER *Self__SGFE);
 
 int main(int argc,char **argv)
 {
-  void *str__DHD,*cmd__1Y;
-  __INTEGER new_count__GYIH,typ_id__5XIH,Self__HHF,limit_up__IHF;
-  __INTEGER idx__NVGH,i__IOEB,typ_id__BUG,new_capacity__DKY;
-  __INTEGER typ_id__I4DB,new_capacity__KVJC,typ_id__KNJ,typ_id__RNH;
-  __INTEGER new_capacity__DMY,typ_id__TOC,new_capacity__ALX,typ_id__H0Q;
-  __INTEGER typ_id__EER,new_capacity__0I1,typ_id__USQ,typ_id__00O;
-  __INTEGER typ_id__B3Q,typ_id__PLK,new_capacity__HFZ,typ_id__RWQ;
-  __INTEGER typ_id__NVR,typ_id__MIK,typ_id__V4J,typ_id__LLM;
-  __INTEGER typ_id__VHNF,new_capacity__IYQF,typ_id__H4F,typ_id__LFTE;
-  __INTEGER typ_id__KSLF,typ_id__W3MF,typ_id__5UMD,typ_id__QVED;
-  __INTEGER new_capacity__TAXD,Self__X2XE,typ_id__SYMF,Self__GC5F;
-  __INTEGER typ_id__RJMF,Self__5A5F,typ_id__K3YB,new_capacity__AGOC;
-  __INTEGER typ_id__PAZB,new_capacity__1JOC,typ_id__JK5B,typ_id__EEIE;
-  __INTEGER typ_id__JUB,new_capacity__2ZW,j__2Y,idx__5KC,typ_id__SVGH;
-  __INTEGER typ_id__KHKB,result__2VGH,__tmp__4VGH,Self__5VGH;
-  __INTEGER result__BWGH,__tmp__DWGH,Self__EWGH,idx__AQEB,idx__4HZB;
-  __INTEGER new_capacity__5HZB,i__AIZB,result__GWGH,__tmp__IWGH;
-  __INTEGER Self__JWGH,typ_id__NKZB,typ_id__NWGH,typ_id__XWGH;
-  __INTEGER typ_id__BXGH,typ_id__GPED,typ_id__SYB,Self__FLWD;
-  __INTEGER typ_id__U2B,typ_id__LXGH,typ_id__G4B,result__VXGH;
-  __INTEGER __tmp__XXGH,Self__YXGH,result__0XGH,__tmp__2XGH,Self__3XGH;
-  __INTEGER result__DYGH,__tmp__FYGH,Self__GYGH,result__IYGH;
-  __INTEGER __tmp__KYGH,Self__LYGH,result__RYGH,__tmp__TYGH,Self__UYGH;
-  __INTEGER result__WYGH,__tmp__YYGH,Self__ZYGH,i__WNDH,j__YNDH;
-  __INTEGER Self__TVFH,result__1YGH,__tmp__3YGH,Self__4YGH,result__EZGH;
-  __INTEGER __tmp__GZGH,Self__HZGH,result__JZGH,__tmp__LZGH,Self__MZGH;
-  __INTEGER i__CODH,j__EODH,Self__5VFH,result__OZGH,__tmp__QZGH;
-  __INTEGER Self__RZGH,result__TZGH,__tmp__VZGH,Self__WZGH,i1__SGJH;
-  __INTEGER i2__TGJH,__tmp__0ZGH,Self__2ZGH,result__B0GH,len__G0GH;
-  __INTEGER __tmp__H0GH,__tmp__J0GH,Self__K0GH,result__WSC,n__NWFH;
-  __INTEGER Self__XGJH,Self__C1QC,limit_up__D1QC,__tmp__TBYD,Self__IE5D;
-  __INTEGER i__2GJH,i__BHJH,__tmp__RFYD,Self__0E5D,i__GHJH,i__LHJH;
-  __INTEGER i__QHJH,__tmp__PJYD,Self__MF5D,i__VHJH,i__0HJH,i__5HJH;
-  __INTEGER __tmp__NNYD,Self__4F5D,__tmp__1PYD,Self__NG5D,i__EIJH;
-  __INTEGER __tmp__JSYD,Self__2G5D,i__JIJH;
-  __POINTER ptr__4XIH,ptr_table__IYIH,next__HYIH,result__JYIH;
-  __POINTER ptr_table__NYIH,next__MYIH,result__OYIH,ptr__2TG;
-  __POINTER ptr_table__SYIH,next__RYIH,result__TYIH,ptr_table__XYIH;
-  __POINTER next__WYIH,result__YYIH,ptr__D4DB,ptr_table__2YIH;
-  __POINTER next__1YIH,result__3YIH,ptr_table__BZIH,next__AZIH;
-  __POINTER result__CZIH,ptr__FNJ,ptr_table__GZIH,next__FZIH;
-  __POINTER result__HZIH,ptr_table__LZIH,next__KZIH,result__MZIH;
-  __POINTER ptr__MNH,ptr_table__QZIH,next__PZIH,result__RZIH;
-  __POINTER ptr_table__VZIH,next__UZIH,result__WZIH,ptr__OOC;
-  __POINTER ptr_table__0ZIH,next__ZZIH,result__1ZIH,ptr_table__5ZIH;
-  __POINTER next__4ZIH,result__A0IH,ptr__C0Q,ptr_table__E0IH,next__D0IH;
-  __POINTER result__F0IH,ptr_table__J0IH,next__I0IH,result__K0IH;
-  __POINTER ptr__5DR,ptr_table__O0IH,next__N0IH,result__P0IH;
-  __POINTER ptr_table__T0IH,next__S0IH,result__U0IH,ptr__PSQ;
-  __POINTER ptr_table__Y0IH,next__X0IH,result__Z0IH,ptr_table__30IH;
-  __POINTER next__20IH,result__40IH,ptr__V0O,ptr_table__C1IH,next__B1IH;
-  __POINTER result__D1IH,ptr_table__H1IH,next__G1IH,result__I1IH;
-  __POINTER ptr__22Q,ptr_table__M1IH,next__L1IH,result__N1IH;
-  __POINTER ptr_table__R1IH,next__Q1IH,result__S1IH,ptr__KLK;
-  __POINTER ptr_table__W1IH,next__V1IH,result__X1IH,ptr_table__11IH;
-  __POINTER next__01IH,result__21IH,ptr__MWQ,ptr_table__A2IH,next__51IH;
-  __POINTER result__B2IH,ptr_table__F2IH,next__E2IH,result__G2IH;
-  __POINTER ptr__IVR,ptr_table__K2IH,next__J2IH,result__L2IH;
-  __POINTER ptr_table__P2IH,next__O2IH,result__Q2IH,ptr__HIK;
-  __POINTER ptr_table__U2IH,next__T2IH,result__V2IH,ptr_table__Z2IH;
-  __POINTER next__Y2IH,result__02IH,ptr__Q4J,ptr_table__42IH,next__32IH;
-  __POINTER result__52IH,ptr_table__D3IH,next__C3IH,result__E3IH;
-  __POINTER ptr__GLM,ptr_table__I3IH,next__H3IH,result__J3IH;
-  __POINTER ptr_table__N3IH,next__M3IH,result__O3IH,ptr__QHNF;
-  __POINTER ptr_table__S3IH,next__R3IH,result__T3IH,ptr_table__X3IH;
-  __POINTER next__W3IH,result__Y3IH,ptr__C4F,ptr_table__23IH,next__13IH;
-  __POINTER result__33IH,ptr_table__B4IH,next__A4IH,result__C4IH;
-  __POINTER ptr__GFTE,ptr_table__G4IH,next__F4IH,result__H4IH;
-  __POINTER ptr_table__L4IH,next__K4IH,result__M4IH,ptr__FSLF;
-  __POINTER ptr_table__Q4IH,next__P4IH,result__R4IH,ptr_table__V4IH;
-  __POINTER next__U4IH,result__W4IH,ptr__R3MF,ptr_table__04IH;
-  __POINTER next__Z4IH,result__14IH,ptr_table__54IH,next__44IH;
-  __POINTER result__A5IH,ptr__0UMD,ptr_table__E5IH,next__D5IH;
-  __POINTER result__F5IH,ptr_table__J5IH,next__I5IH,result__K5IH;
-  __POINTER ptr__LVED,ptr_table__O5IH,next__N5IH,result__P5IH;
-  __POINTER ptr_table__T5IH,next__S5IH,result__U5IH,result__JKDH;
-  __POINTER ptr_table__Y5IH,next__X5IH,result__Z5IH,ptr__NYMF;
-  __POINTER ptr_table__AAJH,next__55IH,result__BAJH,ptr_table__FAJH;
-  __POINTER next__EAJH,result__GAJH,result__RKDH,ptr_table__KAJH;
-  __POINTER next__JAJH,result__LAJH,ptr__MJMF,ptr_table__SAJH;
-  __POINTER next__RAJH,result__TAJH,ptr_table__XAJH,next__WAJH;
-  __POINTER result__YAJH,result__ZKDH,ptr_table__2AJH,next__1AJH;
-  __POINTER result__3AJH,ptr__F3YB,ptr_table__EBJH,next__DBJH;
-  __POINTER result__FBJH,ptr_table__JBJH,next__IBJH,result__KBJH;
-  __POINTER ptr__KAZB,ptr_table__OBJH,next__NBJH,result__PBJH;
-  __POINTER ptr_table__TBJH,next__SBJH,result__UBJH,ptr__EK5B;
-  __POINTER ptr_table__YBJH,next__XBJH,result__ZBJH,ptr_table__3BJH;
-  __POINTER next__2BJH,result__4BJH,ptr__5DIE,ptr_table__CCJH;
-  __POINTER next__BCJH,result__DCJH,ptr_table__HCJH,next__GCJH;
-  __POINTER result__ICJH,ptr__EUB,ptr_table__MCJH,next__LCJH;
-  __POINTER result__NCJH,ptr_table__RCJH,next__QCJH,result__SCJH;
-  __POINTER ptr__RVGH,ptr_table__WCJH,next__VCJH,result__XCJH;
-  __POINTER ptr_table__1CJH,next__0CJH,result__2CJH,ptr__FHKB;
-  __POINTER ptr_table__DDJH,next__CDJH,result__EDJH,ptr_table__IDJH;
-  __POINTER next__HDJH,result__JDJH,ptr__IKZB,ptr_table__NDJH;
-  __POINTER next__MDJH,result__ODJH,ptr_table__SDJH,next__RDJH;
-  __POINTER result__TDJH,ptr__MWGH,ptr_table__XDJH,next__WDJH;
-  __POINTER result__YDJH,ptr_table__2DJH,next__1DJH,result__3DJH;
-  __POINTER ptr__WWGH,ptr_table__BEJH,next__AEJH,result__CEJH;
-  __POINTER ptr_table__GEJH,next__FEJH,result__HEJH,ptr__AXGH;
-  __POINTER ptr_table__OEJH,next__NEJH,result__PEJH,ptr_table__TEJH;
-  __POINTER next__SEJH,result__UEJH,ptr__BPED,ptr_table__YEJH;
-  __POINTER next__XEJH,result__ZEJH,ptr_table__3EJH,next__2EJH;
-  __POINTER result__4EJH,ptr__NYB,ptr_table__CFJH,next__BFJH;
-  __POINTER result__DFJH,ptr_table__HFJH,next__GFJH,result__IFJH;
-  __POINTER result__BNDH,ptr_table__MFJH,next__LFJH,result__NFJH;
-  __POINTER ptr__P2B,ptr_table__UFJH,next__TFJH,result__VFJH;
-  __POINTER ptr_table__ZFJH,next__YFJH,result__0FJH,ptr__KXGH;
-  __POINTER ptr_table__4FJH,next__3FJH,result__5FJH,ptr_table__DGJH;
-  __POINTER next__CGJH,result__EGJH,ptr__B4B,ptr_table__IGJH,next__HGJH;
-  __POINTER result__JGJH,ptr_table__NGJH,next__MGJH,result__OGJH;
-  __UINTEGER_32 sz__AYIH,a__BYIH,new_size__CYIH,t__DYIH,a__EYIH;
-  __UINTEGER_32 new_size__QYIH,lab_type__PYIH,sz__4TG,a__CMFH;
-  __UINTEGER_32 new_size__DMFH,t__HMFH,a__GMFH,new_size__0YIH;
-  __UINTEGER_32 lab_type__ZYIH,sz__F4DB,a__KMFH,new_size__LMFH,t__PMFH;
-  __UINTEGER_32 a__OMFH,new_size__EZIH,lab_type__DZIH,sz__HNJ,a__SMFH;
-  __UINTEGER_32 new_size__TMFH,t__XMFH,a__WMFH,new_size__OZIH;
-  __UINTEGER_32 lab_type__NZIH,sz__ONH,a__0MFH,new_size__1MFH,t__5MFH;
-  __UINTEGER_32 a__4MFH,new_size__YZIH,lab_type__XZIH,sz__QOC,a__CNFH;
-  __UINTEGER_32 new_size__DNFH,t__HNFH,a__GNFH,new_size__C0IH;
-  __UINTEGER_32 lab_type__B0IH,sz__E0Q,a__KNFH,new_size__LNFH,t__PNFH;
-  __UINTEGER_32 a__ONFH,new_size__M0IH,lab_type__L0IH,sz__BER,a__SNFH;
-  __UINTEGER_32 new_size__TNFH,t__XNFH,a__WNFH,new_size__W0IH;
-  __UINTEGER_32 lab_type__V0IH,sz__RSQ,a__0NFH,new_size__1NFH,t__5NFH;
-  __UINTEGER_32 a__4NFH,new_size__A1IH,lab_type__50IH,sz__X0O,a__COFH;
-  __UINTEGER_32 new_size__DOFH,t__HOFH,a__GOFH,new_size__K1IH;
-  __UINTEGER_32 lab_type__J1IH,sz__42Q,a__KOFH,new_size__LOFH,t__POFH;
-  __UINTEGER_32 a__OOFH,new_size__U1IH,lab_type__T1IH,sz__MLK,a__SOFH;
-  __UINTEGER_32 new_size__TOFH,t__XOFH,a__WOFH,new_size__41IH;
-  __UINTEGER_32 lab_type__31IH,sz__OWQ,a__FVDH,new_size__GVDH,t__KVDH;
-  __UINTEGER_32 a__JVDH,new_size__I2IH,lab_type__H2IH,sz__KVR,a__0OFH;
-  __UINTEGER_32 new_size__1OFH,t__5OFH,a__4OFH,new_size__S2IH;
-  __UINTEGER_32 lab_type__R2IH,sz__JIK,a__CPFH,new_size__DPFH,t__HPFH;
-  __UINTEGER_32 a__GPFH,new_size__22IH,lab_type__12IH,sz__S4J,a__KPFH;
-  __UINTEGER_32 new_size__LPFH,t__PPFH,a__OPFH,new_size__G3IH;
-  __UINTEGER_32 lab_type__F3IH,sz__ILM,a__SPFH,new_size__TPFH,t__XPFH;
-  __UINTEGER_32 a__WPFH,new_size__Q3IH,lab_type__P3IH,sz__SHNF,a__0PFH;
-  __UINTEGER_32 new_size__1PFH,t__5PFH,a__4PFH,new_size__03IH;
-  __UINTEGER_32 lab_type__Z3IH,sz__E4F,a__PQDH,new_size__0XG,t__DZG;
-  __UINTEGER_32 a__VQDH,new_size__E4IH,lab_type__D4IH,sz__IFTE,a__CQFH;
-  __UINTEGER_32 new_size__DQFH,t__HQFH,a__GQFH,new_size__O4IH;
-  __UINTEGER_32 lab_type__N4IH,sz__HSLF,a__KQFH,new_size__LQFH,t__PQFH;
-  __UINTEGER_32 a__OQFH,new_size__Y4IH,lab_type__X4IH,sz__T3MF,a__SQFH;
-  __UINTEGER_32 new_size__TQFH,t__XQFH,a__WQFH,new_size__C5IH;
-  __UINTEGER_32 lab_type__B5IH,sz__2UMD,a__0QFH,new_size__1QFH,t__5QFH;
-  __UINTEGER_32 a__4QFH,new_size__M5IH,lab_type__L5IH,sz__NVED,a__CRFH;
-  __UINTEGER_32 new_size__DRFH,t__HRFH,a__GRFH,new_size__W5IH;
-  __UINTEGER_32 lab_type__V5IH,sz__KKDH,a__PKDH,new_size__LKDH;
-  __UINTEGER_32 new_size2__MKDH,a__KRFH,new_size__LRFH,sz__PYMF,a__RRFH;
-  __UINTEGER_32 new_size__SRFH,t__WRFH,a__VRFH,new_size__IAJH;
-  __UINTEGER_32 lab_type__HAJH,sz__SKDH,a__XKDH,new_size__TKDH;
-  __UINTEGER_32 new_size2__UKDH,a__ZRFH,new_size__0RFH,sz__OJMF,a__ASFH;
-  __UINTEGER_32 new_size__BSFH,t__FSFH,a__ESFH,new_size__0AJH;
-  __UINTEGER_32 lab_type__ZAJH,sz__0KDH,a__5KDH,new_size__1KDH;
-  __UINTEGER_32 new_size2__2KDH,a__ISFH,new_size__JSFH,sz__H3YB,a__PSFH;
-  __UINTEGER_32 new_size__QSFH,t__USFH,a__TSFH,new_size__MBJH;
-  __UINTEGER_32 lab_type__LBJH,sz__MAZB,a__XSFH,new_size__YSFH,t__2SFH;
-  __UINTEGER_32 a__1SFH,new_size__WBJH,lab_type__VBJH,sz__GK5B,a__5SFH;
-  __UINTEGER_32 new_size__ATFH,t__ETFH,a__DTFH,new_size__ACJH;
-  __UINTEGER_32 lab_type__5BJH,sz__BEIE,a__HTFH,new_size__ITFH,t__MTFH;
-  __UINTEGER_32 a__LTFH,new_size__KCJH,lab_type__JCJH,sz__GUB,a__PTFH;
-  __UINTEGER_32 new_size__QTFH,t__UTFH,a__TTFH,new_size__UCJH;
-  __UINTEGER_32 lab_type__TCJH,sz__TVGH,a__UVGH,new_size__VVGH,t__WVGH;
-  __UINTEGER_32 a__XVGH,new_size__4CJH,lab_type__3CJH,sz__HHKB,a__YTFH;
-  __UINTEGER_32 new_size__ZTFH,t__3TFH,a__2TFH,new_size__LDJH;
-  __UINTEGER_32 lab_type__KDJH,sz__KKZB,a__DUFH,new_size__EUFH,t__IUFH;
-  __UINTEGER_32 a__HUFH,new_size__VDJH,lab_type__UDJH,sz__OWGH,a__PWGH;
-  __UINTEGER_32 new_size__QWGH,t__RWGH,a__SWGH,new_size__5DJH;
-  __UINTEGER_32 lab_type__4DJH,sz__YWGH,a__ZWGH,new_size__0WGH,t__1WGH;
-  __UINTEGER_32 a__2WGH,new_size__JEJH,lab_type__IEJH,sz__CXGH,a__DXGH;
-  __UINTEGER_32 new_size__EXGH,t__FXGH,a__GXGH,new_size__WEJH;
-  __UINTEGER_32 lab_type__VEJH,sz__DPED,a__WLEH,new_size__XLEH,t__1LEH;
-  __UINTEGER_32 a__0LEH,new_size__AFJH,lab_type__5EJH,sz__PYB,a__RUFH;
-  __UINTEGER_32 new_size__SUFH,t__WUFH,a__VUFH,new_size__KFJH;
-  __UINTEGER_32 lab_type__JFJH,sz__CNDH,a__HNDH,new_size__DNDH;
-  __UINTEGER_32 new_size2__ENDH,a__ZUFH,new_size__0UFH,sz__R2B,a__AVFH;
-  __UINTEGER_32 new_size__BVFH,t__FVFH,a__EVFH,new_size__2FJH;
-  __UINTEGER_32 lab_type__1FJH,sz__MXGH,a__NXGH,new_size__OXGH,t__PXGH;
-  __UINTEGER_32 a__QXGH,new_size__GGJH,lab_type__FGJH,sz__D4B,a__W5DH;
-  __UINTEGER_32 new_size__X5DH,t__15DH,a__05DH,new_size__QGJH;
-  __UINTEGER_32 lab_type__PGJH;
-  __STRING *Self__GOEB,*new__CA0G,*new__EA0G,*Self__VNDH,*Self__BODH;
-  __STRING *Self__YZGH,*Self__KWFH,*Self__MWFH,*Self__WGJH;
-  __ITM_TYPE_PARAMETER *result__LWQ,*Self__L3V;
-  __LIP_BOOLEAN *result__Q3MF;
-  void *result__25IH,*result__OAJH,*result__ABJH,*result__QFJH;
-  void *txt__1,*fmt_name__KNC,*k__ZVGH,*__tmp__2ND,*k__YPEB;
-  void *element__NUFH,*i__UWGH,*element__AUEC,*i__IXGH,*__tmp__4B;
-  void *__tmp__2H,*__tmp__GDYD,*__tmp__TDYD,*__tmp__2DYD,*__tmp__REYD;
-  void *__tmp__SKTD,*__tmp__EHYD,*__tmp__RHYD,*__tmp__0HYD,*__tmp__PIYD;
-  void *__tmp__2KTD,*__tmp__CLYD,*__tmp__PLYD,*__tmp__YLYD,*__tmp__NMYD;
-  void *__tmp__BPYD,*__tmp__2LTD,*__tmp__PRYD,*__tmp__GMTD,*__tmp__3TYD;
+  void *str__LHD,*cmd__BZ;
+  __INTEGER new_count__G0JH,typ_id__5ZJH,Self__PHF,limit_up__QHF;
+  __INTEGER idx__IXHH,i__QOEB,typ_id__JUG,new_capacity__LKY;
+  __INTEGER typ_id__Q4DB,new_capacity__SVJC,typ_id__SNJ,typ_id__ZNH;
+  __INTEGER new_capacity__LMY,typ_id__1OC,new_capacity__ILX,typ_id__P0Q;
+  __INTEGER typ_id__MER,new_capacity__CJ1,typ_id__2SQ,typ_id__C1O;
+  __INTEGER typ_id__J3Q,typ_id__XLK,new_capacity__PFZ,typ_id__ZWQ;
+  __INTEGER typ_id__VVR,typ_id__UIK,typ_id__34J,typ_id__TLM;
+  __INTEGER typ_id__RTNF,new_capacity__MERF,typ_id__P4F,typ_id__OFTE;
+  __INTEGER typ_id__W3LF,typ_id__SJNF,typ_id__HVMD,typ_id__YVED;
+  __INTEGER new_capacity__1AXD,Self__02XE,typ_id__KENF,Self__0Z5F;
+  __INTEGER typ_id__JVMF,Self__TY5F,typ_id__S3YB,new_capacity__IGOC;
+  __INTEGER typ_id__XAZB,new_capacity__DKOC,typ_id__RK5B,typ_id__25HE;
+  __INTEGER typ_id__RUB,new_capacity__E0W,j__CZ,idx__HLC,typ_id__NXHH;
+  __INTEGER typ_id__SHKB,result__XXHH,__tmp__ZXHH,Self__0XHH;
+  __INTEGER result__2XHH,__tmp__4XHH,Self__5XHH,idx__IQEB,idx__GIZB;
+  __INTEGER new_capacity__HIZB,i__IIZB,result__BYHH,__tmp__DYHH;
+  __INTEGER Self__EYHH,typ_id__VKZB,typ_id__IYHH,typ_id__SYHH;
+  __INTEGER typ_id__2YHH,typ_id__OPED,typ_id__0YB,Self__NLWD;
+  __INTEGER typ_id__22B,typ_id__GZHH,typ_id__O4B,result__QZHH;
+  __INTEGER __tmp__SZHH,Self__TZHH,result__VZHH,__tmp__XZHH,Self__YZHH;
+  __INTEGER result__4ZHH,__tmp__A0HH,Self__B0HH,result__D0HH;
+  __INTEGER __tmp__F0HH,Self__G0HH,result__M0HH,__tmp__O0HH,Self__P0HH;
+  __INTEGER result__R0HH,__tmp__T0HH,Self__U0HH,i__OOEH,j__QOEH;
+  __INTEGER Self__DXGH,result__W0HH,__tmp__Y0HH,Self__Z0HH,result__50HH;
+  __INTEGER __tmp__B1HH,Self__C1HH,result__E1HH,__tmp__G1HH,Self__H1HH;
+  __INTEGER i__0OEH,j__2OEH,Self__PXGH,result__J1HH,__tmp__L1HH;
+  __INTEGER Self__M1HH,result__O1HH,__tmp__Q1HH,Self__R1HH,i1__SIKH;
+  __INTEGER i2__TIKH,__tmp__V1HH,Self__X1HH,result__21HH,len__B2HH;
+  __INTEGER __tmp__C2HH,__tmp__E2HH,Self__F2HH,result__4SC,n__3XGH;
+  __INTEGER Self__XIKH,Self__K1QC,limit_up__L1QC,__tmp__CCYD,Self__FC5D;
+  __INTEGER i__2IKH,i__BJKH,__tmp__EGYD,Self__XC5D,i__GJKH,i__LJKH;
+  __INTEGER i__QJKH,__tmp__FKYD,Self__JD5D,i__VJKH,i__0JKH,i__5JKH;
+  __INTEGER __tmp__GOYD,Self__1D5D,__tmp__KQYD,Self__KE5D,i__EKKH;
+  __INTEGER __tmp__OSYD,Self__ZE5D,i__JKKH;
+  __POINTER ptr__4ZJH,ptr_table__I0JH,next__H0JH,result__J0JH;
+  __POINTER ptr_table__N0JH,next__M0JH,result__O0JH,ptr__EUG;
+  __POINTER ptr_table__S0JH,next__R0JH,result__T0JH,ptr_table__X0JH;
+  __POINTER next__W0JH,result__Y0JH,ptr__L4DB,ptr_table__20JH;
+  __POINTER next__10JH,result__30JH,ptr_table__B1JH,next__A1JH;
+  __POINTER result__C1JH,ptr__NNJ,ptr_table__G1JH,next__F1JH;
+  __POINTER result__H1JH,ptr_table__L1JH,next__K1JH,result__M1JH;
+  __POINTER ptr__UNH,ptr_table__Q1JH,next__P1JH,result__R1JH;
+  __POINTER ptr_table__V1JH,next__U1JH,result__W1JH,ptr__WOC;
+  __POINTER ptr_table__01JH,next__Z1JH,result__11JH,ptr_table__51JH;
+  __POINTER next__41JH,result__A2JH,ptr__K0Q,ptr_table__E2JH,next__D2JH;
+  __POINTER result__F2JH,ptr_table__J2JH,next__I2JH,result__K2JH;
+  __POINTER ptr__HER,ptr_table__O2JH,next__N2JH,result__P2JH;
+  __POINTER ptr_table__T2JH,next__S2JH,result__U2JH,ptr__XSQ;
+  __POINTER ptr_table__Y2JH,next__X2JH,result__Z2JH,ptr_table__32JH;
+  __POINTER next__22JH,result__42JH,ptr__30O,ptr_table__C3JH,next__B3JH;
+  __POINTER result__D3JH,ptr_table__H3JH,next__G3JH,result__I3JH;
+  __POINTER ptr__E3Q,ptr_table__M3JH,next__L3JH,result__N3JH;
+  __POINTER ptr_table__R3JH,next__Q3JH,result__S3JH,ptr__SLK;
+  __POINTER ptr_table__W3JH,next__V3JH,result__X3JH,ptr_table__13JH;
+  __POINTER next__03JH,result__23JH,ptr__UWQ,ptr_table__A4JH,next__53JH;
+  __POINTER result__B4JH,ptr_table__F4JH,next__E4JH,result__G4JH;
+  __POINTER ptr__QVR,ptr_table__K4JH,next__J4JH,result__L4JH;
+  __POINTER ptr_table__P4JH,next__O4JH,result__Q4JH,ptr__PIK;
+  __POINTER ptr_table__U4JH,next__T4JH,result__V4JH,ptr_table__Z4JH;
+  __POINTER next__Y4JH,result__04JH,ptr__Y4J,ptr_table__44JH,next__34JH;
+  __POINTER result__54JH,ptr_table__D5JH,next__C5JH,result__E5JH;
+  __POINTER ptr__OLM,ptr_table__I5JH,next__H5JH,result__J5JH;
+  __POINTER ptr_table__N5JH,next__M5JH,result__O5JH,ptr__MTNF;
+  __POINTER ptr_table__S5JH,next__R5JH,result__T5JH,ptr_table__X5JH;
+  __POINTER next__W5JH,result__Y5JH,ptr__K4F,ptr_table__25JH,next__15JH;
+  __POINTER result__35JH,ptr_table__BAKH,next__AAKH,result__CAKH;
+  __POINTER ptr__JFTE,ptr_table__GAKH,next__FAKH,result__HAKH;
+  __POINTER ptr_table__LAKH,next__KAKH,result__MAKH,ptr__R3LF;
+  __POINTER ptr_table__QAKH,next__PAKH,result__RAKH,ptr_table__VAKH;
+  __POINTER next__UAKH,result__WAKH,ptr__NJNF,ptr_table__0AKH;
+  __POINTER next__ZAKH,result__1AKH,ptr_table__5AKH,next__4AKH;
+  __POINTER result__ABKH,ptr__CVMD,ptr_table__EBKH,next__DBKH;
+  __POINTER result__FBKH,ptr_table__JBKH,next__IBKH,result__KBKH;
+  __POINTER ptr__TVED,ptr_table__OBKH,next__NBKH,result__PBKH;
+  __POINTER ptr_table__TBKH,next__SBKH,result__UBKH,result__BLEH;
+  __POINTER ptr_table__YBKH,next__XBKH,result__ZBKH,ptr__FENF;
+  __POINTER ptr_table__ACKH,next__5BKH,result__BCKH,ptr_table__FCKH;
+  __POINTER next__ECKH,result__GCKH,result__JLEH,ptr_table__KCKH;
+  __POINTER next__JCKH,result__LCKH,ptr__EVMF,ptr_table__SCKH;
+  __POINTER next__RCKH,result__TCKH,ptr_table__XCKH,next__WCKH;
+  __POINTER result__YCKH,result__RLEH,ptr_table__2CKH,next__1CKH;
+  __POINTER result__3CKH,ptr__N3YB,ptr_table__EDKH,next__DDKH;
+  __POINTER result__FDKH,ptr_table__JDKH,next__IDKH,result__KDKH;
+  __POINTER ptr__SAZB,ptr_table__ODKH,next__NDKH,result__PDKH;
+  __POINTER ptr_table__TDKH,next__SDKH,result__UDKH,ptr__MK5B;
+  __POINTER ptr_table__YDKH,next__XDKH,result__ZDKH,ptr_table__3DKH;
+  __POINTER next__2DKH,result__4DKH,ptr__X5HE,ptr_table__CEKH;
+  __POINTER next__BEKH,result__DEKH,ptr_table__HEKH,next__GEKH;
+  __POINTER result__IEKH,ptr__MUB,ptr_table__MEKH,next__LEKH;
+  __POINTER result__NEKH,ptr_table__REKH,next__QEKH,result__SEKH;
+  __POINTER ptr__MXHH,ptr_table__WEKH,next__VEKH,result__XEKH;
+  __POINTER ptr_table__1EKH,next__0EKH,result__2EKH,ptr__NHKB;
+  __POINTER ptr_table__DFKH,next__CFKH,result__EFKH,ptr_table__IFKH;
+  __POINTER next__HFKH,result__JFKH,ptr__QKZB,ptr_table__NFKH;
+  __POINTER next__MFKH,result__OFKH,ptr_table__SFKH,next__RFKH;
+  __POINTER result__TFKH,ptr__HYHH,ptr_table__XFKH,next__WFKH;
+  __POINTER result__YFKH,ptr_table__2FKH,next__1FKH,result__3FKH;
+  __POINTER ptr__RYHH,ptr_table__BGKH,next__AGKH,result__CGKH;
+  __POINTER ptr_table__GGKH,next__FGKH,result__HGKH,ptr__1YHH;
+  __POINTER ptr_table__OGKH,next__NGKH,result__PGKH,ptr_table__TGKH;
+  __POINTER next__SGKH,result__UGKH,ptr__JPED,ptr_table__YGKH;
+  __POINTER next__XGKH,result__ZGKH,ptr_table__3GKH,next__2GKH;
+  __POINTER result__4GKH,ptr__VYB,ptr_table__CHKH,next__BHKH;
+  __POINTER result__DHKH,ptr_table__HHKH,next__GHKH,result__IHKH;
+  __POINTER result__ZNEH,ptr_table__MHKH,next__LHKH,result__NHKH;
+  __POINTER ptr__X2B,ptr_table__UHKH,next__THKH,result__VHKH;
+  __POINTER ptr_table__ZHKH,next__YHKH,result__0HKH,ptr__FZHH;
+  __POINTER ptr_table__4HKH,next__3HKH,result__5HKH,ptr_table__DIKH;
+  __POINTER next__CIKH,result__EIKH,ptr__J4B,ptr_table__IIKH,next__HIKH;
+  __POINTER result__JIKH,ptr_table__NIKH,next__MIKH,result__OIKH;
+  __UINTEGER_32 sz__A0JH,a__B0JH,new_size__C0JH,t__D0JH,a__E0JH;
+  __UINTEGER_32 new_size__Q0JH,lab_type__P0JH,sz__GUG,a__SNGH;
+  __UINTEGER_32 new_size__TNGH,t__XNGH,a__WNGH,new_size__00JH;
+  __UINTEGER_32 lab_type__Z0JH,sz__N4DB,a__0NGH,new_size__1NGH,t__5NGH;
+  __UINTEGER_32 a__4NGH,new_size__E1JH,lab_type__D1JH,sz__PNJ,a__COGH;
+  __UINTEGER_32 new_size__DOGH,t__HOGH,a__GOGH,new_size__O1JH;
+  __UINTEGER_32 lab_type__N1JH,sz__WNH,a__KOGH,new_size__LOGH,t__POGH;
+  __UINTEGER_32 a__OOGH,new_size__Y1JH,lab_type__X1JH,sz__YOC,a__SOGH;
+  __UINTEGER_32 new_size__TOGH,t__XOGH,a__WOGH,new_size__C2JH;
+  __UINTEGER_32 lab_type__B2JH,sz__M0Q,a__0OGH,new_size__1OGH,t__5OGH;
+  __UINTEGER_32 a__4OGH,new_size__M2JH,lab_type__L2JH,sz__JER,a__CPGH;
+  __UINTEGER_32 new_size__DPGH,t__HPGH,a__GPGH,new_size__W2JH;
+  __UINTEGER_32 lab_type__V2JH,sz__ZSQ,a__KPGH,new_size__LPGH,t__PPGH;
+  __UINTEGER_32 a__OPGH,new_size__A3JH,lab_type__52JH,sz__50O,a__SPGH;
+  __UINTEGER_32 new_size__TPGH,t__XPGH,a__WPGH,new_size__K3JH;
+  __UINTEGER_32 lab_type__J3JH,sz__G3Q,a__0PGH,new_size__1PGH,t__5PGH;
+  __UINTEGER_32 a__4PGH,new_size__U3JH,lab_type__T3JH,sz__ULK,a__CQGH;
+  __UINTEGER_32 new_size__DQGH,t__HQGH,a__GQGH,new_size__43JH;
+  __UINTEGER_32 lab_type__33JH,sz__WWQ,a__3VEH,new_size__4VEH,t__CWEH;
+  __UINTEGER_32 a__BWEH,new_size__I4JH,lab_type__H4JH,sz__SVR,a__KQGH;
+  __UINTEGER_32 new_size__LQGH,t__PQGH,a__OQGH,new_size__S4JH;
+  __UINTEGER_32 lab_type__R4JH,sz__RIK,a__SQGH,new_size__TQGH,t__XQGH;
+  __UINTEGER_32 a__WQGH,new_size__24JH,lab_type__14JH,sz__04J,a__0QGH;
+  __UINTEGER_32 new_size__1QGH,t__5QGH,a__4QGH,new_size__G5JH;
+  __UINTEGER_32 lab_type__F5JH,sz__QLM,a__CRGH,new_size__DRGH,t__HRGH;
+  __UINTEGER_32 a__GRGH,new_size__Q5JH,lab_type__P5JH,sz__OTNF,a__KRGH;
+  __UINTEGER_32 new_size__LRGH,t__PRGH,a__ORGH,new_size__05JH;
+  __UINTEGER_32 lab_type__Z5JH,sz__M4F,a__HREH,new_size__CYG,t__LZG;
+  __UINTEGER_32 a__NREH,new_size__EAKH,lab_type__DAKH,sz__LFTE,a__SRGH;
+  __UINTEGER_32 new_size__TRGH,t__XRGH,a__WRGH,new_size__OAKH;
+  __UINTEGER_32 lab_type__NAKH,sz__T3LF,a__0RGH,new_size__1RGH,t__5RGH;
+  __UINTEGER_32 a__4RGH,new_size__YAKH,lab_type__XAKH,sz__PJNF,a__CSGH;
+  __UINTEGER_32 new_size__DSGH,t__HSGH,a__GSGH,new_size__CBKH;
+  __UINTEGER_32 lab_type__BBKH,sz__EVMD,a__KSGH,new_size__LSGH,t__PSGH;
+  __UINTEGER_32 a__OSGH,new_size__MBKH,lab_type__LBKH,sz__VVED,a__SSGH;
+  __UINTEGER_32 new_size__TSGH,t__XSGH,a__WSGH,new_size__WBKH;
+  __UINTEGER_32 lab_type__VBKH,sz__CLEH,a__HLEH,new_size__DLEH;
+  __UINTEGER_32 new_size2__ELEH,a__0SGH,new_size__1SGH,sz__HENF,a__BTGH;
+  __UINTEGER_32 new_size__CTGH,t__GTGH,a__FTGH,new_size__ICKH;
+  __UINTEGER_32 lab_type__HCKH,sz__KLEH,a__PLEH,new_size__LLEH;
+  __UINTEGER_32 new_size2__MLEH,a__JTGH,new_size__KTGH,sz__GVMF,a__QTGH;
+  __UINTEGER_32 new_size__RTGH,t__VTGH,a__UTGH,new_size__0CKH;
+  __UINTEGER_32 lab_type__ZCKH,sz__SLEH,a__XLEH,new_size__TLEH;
+  __UINTEGER_32 new_size2__ULEH,a__YTGH,new_size__ZTGH,sz__P3YB,a__5TGH;
+  __UINTEGER_32 new_size__AUGH,t__EUGH,a__DUGH,new_size__MDKH;
+  __UINTEGER_32 lab_type__LDKH,sz__UAZB,a__HUGH,new_size__IUGH,t__MUGH;
+  __UINTEGER_32 a__LUGH,new_size__WDKH,lab_type__VDKH,sz__OK5B,a__PUGH;
+  __UINTEGER_32 new_size__QUGH,t__UUGH,a__TUGH,new_size__AEKH;
+  __UINTEGER_32 lab_type__5DKH,sz__Z5HE,a__XUGH,new_size__YUGH,t__2UGH;
+  __UINTEGER_32 a__1UGH,new_size__KEKH,lab_type__JEKH,sz__OUB,a__5UGH;
+  __UINTEGER_32 new_size__AVGH,t__EVGH,a__DVGH,new_size__UEKH;
+  __UINTEGER_32 lab_type__TEKH,sz__OXHH,a__PXHH,new_size__QXHH,t__RXHH;
+  __UINTEGER_32 a__SXHH,new_size__4EKH,lab_type__3EKH,sz__PHKB,a__IVGH;
+  __UINTEGER_32 new_size__JVGH,t__NVGH,a__MVGH,new_size__LFKH;
+  __UINTEGER_32 lab_type__KFKH,sz__SKZB,a__TVGH,new_size__UVGH,t__YVGH;
+  __UINTEGER_32 a__XVGH,new_size__VFKH,lab_type__UFKH,sz__JYHH,a__KYHH;
+  __UINTEGER_32 new_size__LYHH,t__MYHH,a__NYHH,new_size__5FKH;
+  __UINTEGER_32 lab_type__4FKH,sz__TYHH,a__UYHH,new_size__VYHH,t__WYHH;
+  __UINTEGER_32 a__XYHH,new_size__JGKH,lab_type__IGKH,sz__3YHH,a__4YHH;
+  __UINTEGER_32 new_size__5YHH,t__AZHH,a__BZHH,new_size__WGKH;
+  __UINTEGER_32 lab_type__VGKH,sz__LPED,a__GNFH,new_size__HNFH,t__LNFH;
+  __UINTEGER_32 a__KNFH,new_size__AHKH,lab_type__5GKH,sz__XYB,a__BWGH;
+  __UINTEGER_32 new_size__CWGH,t__GWGH,a__FWGH,new_size__KHKH;
+  __UINTEGER_32 lab_type__JHKH,sz__0NEH,a__5NEH,new_size__1NEH;
+  __UINTEGER_32 new_size2__2NEH,a__JWGH,new_size__KWGH,sz__Z2B,a__QWGH;
+  __UINTEGER_32 new_size__RWGH,t__VWGH,a__UWGH,new_size__2HKH;
+  __UINTEGER_32 lab_type__1HKH,sz__HZHH,a__IZHH,new_size__JZHH,t__KZHH;
+  __UINTEGER_32 a__LZHH,new_size__GIKH,lab_type__FIKH,sz__L4B,a__UAFH;
+  __UINTEGER_32 new_size__VAFH,t__ZAFH,a__YAFH,new_size__QIKH;
+  __UINTEGER_32 lab_type__PIKH;
+  __STRING *Self__OOEB,*new__R30G,*new__T30G,*Self__NOEH,*Self__ZOEH;
+  __STRING *Self__T1HH,*Self__0XGH,*Self__2XGH,*Self__WIKH;
+  __ITM_TYPE_PARAMETER *result__TWQ,*Self__T3V;
+  __LIP_BOOLEAN *result__MJNF;
+  void *result__2BKH,*result__OCKH,*result__ADKH,*result__QHKH;
+  void *txt__1,*fmt_name__SNC,*k__UXHH,*__tmp__EOD,*k__AQEB;
+  void *element__3VGH,*i__PYHH,*element__IUEC,*i__DZHH,*__tmp__4B;
+  void *__tmp__2H,*__tmp__VDYD,*__tmp__CEYD,*__tmp__LEYD,*__tmp__AFYD;
+  void *__tmp__0KTD,*__tmp__XHYD,*__tmp__EIYD,*__tmp__NIYD,*__tmp__CJYD;
+  void *__tmp__ELTD,*__tmp__YLYD,*__tmp__FMYD,*__tmp__OMYD,*__tmp__DNYD;
+  void *__tmp__YPYD,*__tmp__EMTD,*__tmp__2RYD,*__tmp__OMTD,*__tmp__AUYD;
   void *p__AB;
-  __STRING_CONSTANT *result__QVGH,*Self__NWS,*Self__VTFH,*Self__ENS;
-  __STRING_CONSTANT *Self__3VGH,*Self__CWGH,*Self__HWGH,*Self__BA0G;
-  __STRING_CONSTANT *Self__DA0G,*Self__UGJH,*Self__4GJH,*Self__DHJH;
-  __STRING_CONSTANT *Self__IHJH,*Self__NHJH,*Self__SHJH,*Self__XHJH;
-  __STRING_CONSTANT *Self__2HJH,*Self__BIJH,*Self__GIJH,*Self__LIJH;
-  __POSITION pos__W1ZG,pos__A2ZG,pos__S3ZG,pos__U3ZG,pos__W3ZG;
-  __POSITION pos__Y3ZG,pos__03ZG,__tmp__JOYD,__tmp__OOYD,__tmp__XQYD;
-  __POSITION __tmp__2QYD,__tmp__FTYD,__tmp__KTYD;
-  __TYPE_ID *result__JXGH,*result__A4B;
+  __STRING_CONSTANT *result__LXHH,*Self__VWS,*Self__FVGH,*Self__MNS;
+  __STRING_CONSTANT *Self__YXHH,*Self__3XHH,*Self__CYHH,*Self__Q30G;
+  __STRING_CONSTANT *Self__S30G,*Self__UIKH,*Self__4IKH,*Self__DJKH;
+  __STRING_CONSTANT *Self__IJKH,*Self__NJKH,*Self__SJKH,*Self__XJKH;
+  __STRING_CONSTANT *Self__2JKH,*Self__BKKH,*Self__GKKH,*Self__LKKH;
+  __POSITION pos__FZ0G,pos__PZ0G,pos__B10G,pos__D10G,pos__F10G;
+  __POSITION pos__H10G,pos__J10G,__tmp__CPYD,__tmp__HPYD,__tmp__GRYD;
+  __POSITION __tmp__LRYD,__tmp__KTYD,__tmp__PTYD;
+  __TYPE_ID *result__EZHH,*result__I4B;
   void *ent__TB;
-  __DIRECTORY_UNIX *Self__IISD;
-  void *dir__KISD,*dir__SISD,*__tmp__AD,*dir__SB;
-  __FILE_UNIX *Self__4IRD;
-  __PROTOTYPE *Self__WJTD;
-  void *s__PBYD,*s__NFYD,*s__LJYD,*s__JNYD,*s__XPYD,*s__FSYD;
-  void *__tmp__IKTD,*__tmp__QCYD,*__tmp__OGYD,*__tmp__ELTD,*__tmp__MKYD;
-  void *__tmp__SLTD,*__tmp__XOYD,*__tmp__FRYD,*__tmp__OMTD,*__tmp__TTYD;
-  __SECTION_ *Self__3T0G,*Self__4T0G,*Self__5T0G,*Self__AU0G,*Self__BU0G;
-  __SECTION_ *Self__CU0G,*Self__FU0G;
-  void *__tmp__4CYD,*__tmp__2GYD,*__tmp__0KYD;
-  void *__tmp__ADYD,*ts__3CYD,*__tmp__4GYD,*ts__1GYD,*__tmp__2KYD;
-  void *ts__ZKYD;
-  __CHARACTER *arg__CHD,*Self__OVGH,*p__HOEB,*path__4Y,*Self__TKC;
-  __CHARACTER *Self__UVFH,*model__VVFH,*Self__AWFH,*model__BWFH;
-  __CHARACTER *__tmp__ZZGH,*Self__1ZGH;
-  __FAST_ARRAYoSTRINGo *result__3XIH,*Self__FYIH,*result__B4F,*Self__DGT;
-  void *result__BHD;
-  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__1TG,*Self__YIT;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__C4DB;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__0MCC;
-  __FAST_ARRAYoPROTOTYPEo *result__ENJ,*Self__UCU;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__LNH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5MT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YVGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WPEB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RXGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GVFH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5XGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KVFH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NYGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__OVFH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3VVB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__AZGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0VFH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NCT;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GWFH;
-  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__NOC,*Self__OPS;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__B0Q,*Self__X3V;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__4DR,*Self__JFW;
-  __FAST_ARRAYoITM_TYPE_MULTIo *result__OSQ,*Self__U1V;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *result__U0O,*Self__3JV;
-  __FAST_ARRAYoITM_TYPE_GENERICo *result__12Q,*Self__KBW;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__JLK;
-  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__PLU;
-  __FAST_ARRAYoITM_TYPE_STYLEo *result__HVR,*Self__SLW;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__GIK,*Self__TIU;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__P4J,*Self__IFU;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__FLM,*Self__WUU;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__PHNF,*Self__XLPF;
-  __FAST_ARRAYoLIP_INTEGERo *result__FFTE,*Self__0ZWE;
-  __FAST_ARRAYoLIP_STRINGo *result__ESLF,*Self__J4OF;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__ZUMD,*Self__KFUD;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__KVED;
-  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__SLSD;
-  void **Result__VVHE;
-  __FAST_ARRAYoLIP_SLOT_DATAo *result__MYMF,*Self__SGPF;
-  void **Result__EG0F;
-  __FAST_ARRAYoLIP_SLOT_CODEo *result__LJMF,*Self__TBPF;
-  void **Result__LB0F;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__E3YB;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__CXFC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__JAZB;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__B0FC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__DK5B,*Self__PKHC;
-  __FAST_ARRAYoITM_SLOTo *result__4DIE,*Self__N3VE;
-  __HASHED_SEToABSTRACT_STRINGo *result__DUB,*Self__HCS;
-  __BOOLEAN __tmp__I0,__tmp__D1,result__55NB,__tmp__R1,result__RAOB;
-  __BOOLEAN __tmp__51,result__DBOB,__tmp__M2,result__VBOB,__tmp__P4;
-  __BOOLEAN result__5CJH,result__ISEB,result__KEJH,result__1GG;
-  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__RGJH;
-  __BOOLEAN is_first_cur__OBYD,__tmp__NDYD,__tmp__KDYD,result__1GJH;
-  __BOOLEAN __tmp__BEYD,result__AHJH,__tmp__CEYD,__tmp__FEYD;
-  __BOOLEAN is_first_cur__MFYD,result__FHJH,__tmp__LHYD,__tmp__IHYD;
-  __BOOLEAN result__KHJH,__tmp__5HYD,result__PHJH,__tmp__AIYD;
-  __BOOLEAN __tmp__DIYD,is_first_cur__KJYD,result__UHJH,__tmp__JLTD;
-  __BOOLEAN __tmp__JLYD,__tmp__GLYD,result__ZHJH,__tmp__3LYD;
-  __BOOLEAN result__4HJH,__tmp__4LYD,__tmp__BMYD,is_first__INYD;
-  __BOOLEAN is_first__WPYD,result__DIJH,is_first__ESYD,result__IIJH;
-  __BOOLEAN __tmp__TMTD;
-  __CHARACTER result__ADJH,result__LEJH,result__K2BH,result__ETBH;
-  __CHARACTER Self__YGJH,result__ZGJH,__tmp__XCYD,__tmp__VGYD;
-  __CHARACTER __tmp__TKYD;
-  __LINKED_LISToSTRING_CONSTANTo *result__EHKB,*Self__OUFH,*Self__5TEC;
-  void *node__0VGH,*node__BQEB,*node1__CIZB,*node2__DIZB,*__tmp__OREB;
-  void *node__TXGH,*node__IVFH,*node__BYGH,*node__MVFH,*node__PYGH;
-  void *node__QVFH,*node__HWVB,*node__CZGH,*node__2VFH,*node__YCT;
-  void *node__IWFH;
-  void **old_buckets__BIZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__HKZB;
-  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1DGC;
-  void *def__GSEB;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__LWGH,*Self__TWGH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__VWGH,*Self__3WGH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__5WGH,*Self__HXGH;
-  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__APED,*Self__ALSD;
-  __FAST_ARRAYoSLOTo *result__MYB,*Self__LES;
-  void **Result__MI1C;
-  __FAST_ARRAYoTYPE_IDo *result__O2B,*Self__KHS;
+  __DIRECTORY_UNIX *Self__QISD;
+  void *dir__SISD,*dir__0ISD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__GJRD;
+  __PROTOTYPE *Self__4JTD;
+  void *s__4BYD,*s__AGYD,*s__BKYD,*s__COYD,*s__GQYD,*s__KSYD;
+  void *__tmp__QKTD,*__tmp__5CYD,*__tmp__BHYD,*__tmp__MLTD,*__tmp__CLYD;
+  void *__tmp__0LTD,*__tmp__QPYD,*__tmp__URYD,*__tmp__WMTD,*__tmp__YTYD;
+  __SECTION_ *Self__OR1G,*Self__PR1G,*Self__QR1G,*Self__RR1G,*Self__SR1G;
+  __SECTION_ *Self__TR1G,*Self__WR1G;
+  void *__tmp__NDYD,*__tmp__PHYD,*__tmp__QLYD;
+  void *__tmp__PDYD,*ts__MDYD,*__tmp__RHYD,*ts__OHYD,*__tmp__SLYD;
+  void *ts__PLYD;
+  __CHARACTER *arg__KHD,*Self__JXHH,*p__POEB,*path__EZ,*Self__1KC;
+  __CHARACTER *Self__EXGH,*model__FXGH,*Self__QXGH,*model__RXGH;
+  __CHARACTER *__tmp__U1HH,*Self__W1HH;
+  __FAST_ARRAYoSTRINGo *result__3ZJH,*Self__F0JH,*result__J4F,*Self__LGT;
+  void *result__JHD;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__DUG,*Self__AJT;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__K4DB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__CNCC;
+  __FAST_ARRAYoPROTOTYPEo *result__MNJ,*Self__2CU;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__TNH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HNT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__TXHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__4PEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MZHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WWGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0ZHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0WGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__I0HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__4WGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FWVB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__10HH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__KXGH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__VCT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WXGH;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__VOC,*Self__WPS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__J0Q,*Self__53V;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__GER,*Self__RFW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__WSQ,*Self__21V;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__20O,*Self__FKV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__D3Q,*Self__SBW;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__RLK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__XLU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__PVR,*Self__0LW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__OIK,*Self__1IU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__X4J,*Self__QFU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__NLM,*Self__4UU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__LTNF,*Self__1XPF;
+  __FAST_ARRAYoLIP_INTEGERo *result__IFTE,*Self__3ZWE;
+  __FAST_ARRAYoLIP_STRINGo *result__Q3LF,*Self__NKPF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__BVMD,*Self__SFUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__SVED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__0LSD;
+  void **Result__STHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__EENF,*Self__WSPF;
+  void **Result__KU0F;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__DVMF,*Self__XNPF;
+  void **Result__RP0F;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__M3YB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__KXFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__RAZB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__J0FC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__LK5B,*Self__XKHC;
+  __FAST_ARRAYoITM_SLOTo *result__W5HE,*Self__Q3VE;
+  __HASHED_SEToABSTRACT_STRINGo *result__LUB,*Self__PCS;
+  __BOOLEAN __tmp__O0,__tmp__J1,result__HAOB,__tmp__X1,result__ZAOB;
+  __BOOLEAN __tmp__F2,result__LBOB,__tmp__S2,result__3BOB,__tmp__V4;
+  __BOOLEAN result__5EKH,result__QSEB,result__KGKH,result__DHG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__RIKH;
+  __BOOLEAN is_first_cur__3BYD,__tmp__2DYD,__tmp__ZDYD,result__1IKH;
+  __BOOLEAN __tmp__QEYD,result__AJKH,__tmp__REYD,__tmp__UEYD;
+  __BOOLEAN is_first_cur__5FYD,result__FJKH,__tmp__4HYD,__tmp__1HYD;
+  __BOOLEAN result__KJKH,__tmp__SIYD,result__PJKH,__tmp__TIYD;
+  __BOOLEAN __tmp__WIYD,is_first_cur__AKYD,result__UJKH,__tmp__RLTD;
+  __BOOLEAN __tmp__5LYD,__tmp__2LYD,result__ZJKH,__tmp__TMYD;
+  __BOOLEAN result__4JKH,__tmp__UMYD,__tmp__XMYD,is_first__BOYD;
+  __BOOLEAN is_first__FQYD,result__DKKH,is_first__JSYD,result__IKKH;
+  __BOOLEAN __tmp__1MTD;
+  __CHARACTER result__AFKH,result__LGKH,result__21CH,result__HSCH;
+  __CHARACTER Self__YIKH,result__ZIKH,__tmp__GDYD,__tmp__IHYD;
+  __CHARACTER __tmp__JLYD;
+  __LINKED_LISToSTRING_CONSTANTo *result__MHKB,*Self__4VGH,*Self__HUEC;
+  void *node__VXHH,*node__JQEB,*node1__KIZB,*node2__LIZB,*__tmp__WREB;
+  void *node__OZHH,*node__YWGH,*node__2ZHH,*node__2WGH,*node__K0HH;
+  void *node__AXGH,*node__PWVB,*node__30HH,*node__MXGH,*node__ADT;
+  void *node__YXGH;
+  void **old_buckets__JIZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__PKZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DEGC;
+  void *def__OSEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__GYHH,*Self__OYHH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__QYHH,*Self__YYHH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__0YHH,*Self__CZHH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__IPED,*Self__ILSD;
+  __FAST_ARRAYoSLOTo *result__UYB,*Self__TES;
+  void **Result__UI1C;
+  __FAST_ARRAYoTYPE_IDo *result__W2B,*Self__SHS;
   arg_count  = argc;
   arg_vector = argv;
   parent_numeric__J=NUMERIC__;
-  clone_allocation_size__3SB= 0;
+  clone_allocation_size__FTB= 0;
   STRING_CONSTANT__->count__DD=((__INTEGER )((0)));
-  STRING__->count__WFC= 0;
-  STRING_CONSTANT__->storage__VQO=((__CHARACTER *)(NULL));
-  STRING__->storage__BCS=NULL;
-  nb_page__4RJ= 0;
-  MEMORY__->map_size_and_id__ITB= 0;
-  capacity_max__YA5= 0;
-  get_begin_memory__ICQB=((__POINTER )(NULL));
-  begin_memory__PVH=((__POINTER )(NULL));
-  MEMORY__->map_previous_linear__HTB= 0;
-  first_free__XDVB=NULL;
-  MEMORY__->map_next_free__JTB=NULL;
-  MEMORY__->map_previous_free__KTB=NULL;
-  STRING__->capacity__YBS= 0;
-  HASHED_SEToABSTRACT_STRINGo__->buckets__4YR=NULL;
-  HASHED_SEToABSTRACT_STRINGo__->capacity__ZYR= 0;
-  HASHED_SEToABSTRACT_STRINGo__->count__5ZR= 0;
+  STRING__->count__4FC= 0;
+  STRING_CONSTANT__->storage__3QO=((__CHARACTER *)(NULL));
+  STRING__->storage__JCS=NULL;
+  nb_page__GSJ= 0;
+  MEMORY__->map_size_and_id__QTB= 0;
+  capacity_max__AB5= 0;
+  get_begin_memory__QCQB=((__POINTER )(NULL));
+  begin_memory__XVH=((__POINTER )(NULL));
+  MEMORY__->map_previous_linear__PTB= 0;
+  first_free__5DVB=NULL;
+  MEMORY__->map_next_free__RTB=NULL;
+  MEMORY__->map_previous_free__STB=NULL;
+  STRING__->capacity__ACS= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__GZR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__BZR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__H0R= 0;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__KZR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__WZR=NULL;
-  string_tmp__VH=create__NBB( 256);
-  is_shorter__5Y=FALSE__;
-  ARRAYED_COLLECTIONoSTRINGo__->upper__GKC= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->capacity__MGT= 0;
-  ARRAYED_COLLECTIONoSTRINGo__->storage__XGT=NULL;
-  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__DKC=(*ARRAYED_COLLECTIONoSTRINGo__);
-  arg__CHD=NULL;
-  str__DHD=NULL;
-  new_count__GYIH=((__INTEGER )(arg_count));
-  result__3XIH=NULL;
-  ptr__4XIH=((__POINTER )(NULL));
-  typ_id__5XIH= 0;
-  sz__AYIH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__AYIH ==  0)) {
-    result__3XIH=FAST_ARRAYoSTRINGo__;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__SZR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__4ZR=NULL;
+  string_tmp__VH=create__TBB( 256);
+  is_shorter__FZ=FALSE__;
+  ARRAYED_COLLECTIONoSTRINGo__->upper__OKC= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__UGT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__5GT=NULL;
+  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__LKC=(*ARRAYED_COLLECTIONoSTRINGo__);
+  arg__KHD=NULL;
+  str__LHD=NULL;
+  new_count__G0JH=((__INTEGER )(arg_count));
+  result__3ZJH=NULL;
+  ptr__4ZJH=((__POINTER )(NULL));
+  typ_id__5ZJH= 0;
+  sz__A0JH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__A0JH ==  0)) {
+    result__3ZJH=FAST_ARRAYoSTRINGo__;
   } else {
-    typ_id__5XIH=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__AYIH);
-    if ((typ_id__5XIH == (__INTEGER)(-  1))) {
-      a__BYIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AYIH + a__BYIH) & (__UINTEGER_32)(~ a__BYIH));
-      ptr_table__IYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CYIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__HYIH=((__POINTER )(NULL));
-      result__JYIH=((__POINTER *)ptr_table__IYIH)[ 0];
-      if ((result__JYIH == (void *)NULL)) {
-        result__JYIH=new_lab__MRJ(new_size__CYIH);
-        next__HYIH=(void *)((unsigned long)result__JYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYIH)));
-        ((__POINTER *)next__HYIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IYIH)[ 0]=next__HYIH;
-      } else {
-        next__HYIH=((__POINTER *)result__JYIH)[ 0];
-        if ((next__HYIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CYIH <<  1)) <=  4096)) {
-            next__HYIH=(void *)((unsigned long)result__JYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYIH)));
-          } else {
-            next__HYIH=new_lab__MRJ(new_size__CYIH);
-          };
-          ((__POINTER *)next__HYIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IYIH)[ 0]=next__HYIH;
-        } else {
-          ((__POINTER *)result__JYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JYIH=next__HYIH;
-        };
-      };
-      ptr__4XIH=result__JYIH;
-    } else {
-      t__DYIH=((__UINTEGER_32 )typ_id__5XIH);
-      a__EYIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AYIH + a__EYIH) & (__UINTEGER_32)(~ a__EYIH));
-      ptr_table__NYIH=((__POINTER )(&(table_type[(t__DYIH)])));
-      lab_type__PYIH=(__UINTEGER_32)(t__DYIH |  1);
-      next__MYIH=((__POINTER )(NULL));
-      result__OYIH=((__POINTER *)ptr_table__NYIH)[ 0];
-      if ((result__OYIH == (void *)NULL)) {
-        result__OYIH=new_lab__MRJ(lab_type__PYIH);
-        next__MYIH=(void *)((unsigned long)result__OYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QYIH)));
-        ((__POINTER *)next__MYIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NYIH)[ 0]=next__MYIH;
-      } else {
-        next__MYIH=((__POINTER *)result__OYIH)[ 0];
-        if ((next__MYIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QYIH <<  1)) <=  4096)) {
-            next__MYIH=(void *)((unsigned long)result__OYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QYIH)));
-          } else {
-            next__MYIH=new_lab__MRJ(lab_type__PYIH);
-          };
-          ((__POINTER *)next__MYIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NYIH)[ 0]=next__MYIH;
-        } else {
-          ((__POINTER *)result__OYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OYIH=next__MYIH;
-        };
-      };
-      ptr__4XIH=result__OYIH;
-    };
-    result__3XIH=((__FAST_ARRAYoSTRINGo *)ptr__4XIH);
-    *(result__3XIH) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__FYIH=((__FAST_ARRAYoSTRINGo *)result__3XIH);
-  if ((Self__FYIH->parent_arrayed_collection__DKC.capacity__MGT < new_count__GYIH)) {
-    Self__FYIH->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB(new_count__GYIH);
-    Self__FYIH->parent_arrayed_collection__DKC.capacity__MGT=new_count__GYIH;
-  };
-  Self__FYIH->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(-  1);
-  result__BHD=result__3XIH;
-  Self__HHF= 0;
-  limit_up__IHF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
-  while ((Self__HHF <= limit_up__IHF)) {
-    arg__CHD=((__CHARACTER *)(arg_vector[(Self__HHF)]));
-    Self__OVGH=((__CHARACTER *)arg__CHD);
-    idx__NVGH= 0;
-    while ((! ((idx__NVGH >  1024) || ('\0' == Self__OVGH[idx__NVGH])))) {
-      idx__NVGH=(__INTEGER)(idx__NVGH +  1);
-    };
-    str__DHD=create__NBB(idx__NVGH);
-    Self__GOEB=((__STRING *)str__DHD);
-    p__HOEB=arg__CHD;
-    i__IOEB= 0;
-    Self__GOEB->count__WFC= 0;
-    while ((((__CHARACTER *)p__HOEB)[i__IOEB] != '\0')) {
-      add_last__ZLT(Self__GOEB,((__CHARACTER *)p__HOEB)[i__IOEB]);
-      i__IOEB=(__INTEGER)(i__IOEB +  1);
-    };
-    add_last__ASV(result__BHD,str__DHD);
-    Self__HHF=(__INTEGER)(Self__HHF +  1);
+    typ_id__5ZJH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__A0JH);
+    if ((typ_id__5ZJH == (__INTEGER)(-  1))) {
+      a__B0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__C0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__A0JH + a__B0JH) & (__UINTEGER_32)(~ a__B0JH));
+      ptr_table__I0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C0JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__H0JH=((__POINTER )(NULL));
+      result__J0JH=((__POINTER *)ptr_table__I0JH)[ 0];
+      if ((result__J0JH == (void *)NULL)) {
+        result__J0JH=new_lab__URJ(new_size__C0JH);
+        next__H0JH=(void *)((unsigned long)result__J0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C0JH)));
+        ((__POINTER *)next__H0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__I0JH)[ 0]=next__H0JH;
+      } else {
+        next__H0JH=((__POINTER *)result__J0JH)[ 0];
+        if ((next__H0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J0JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__C0JH <<  1)) <=  4096)) {
+            next__H0JH=(void *)((unsigned long)result__J0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C0JH)));
+          } else {
+            next__H0JH=new_lab__URJ(new_size__C0JH);
+          };
+          ((__POINTER *)next__H0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I0JH)[ 0]=next__H0JH;
+        } else {
+          ((__POINTER *)result__J0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__J0JH=next__H0JH;
+        };
+      };
+      ptr__4ZJH=result__J0JH;
+    } else {
+      t__D0JH=((__UINTEGER_32 )typ_id__5ZJH);
+      a__E0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Q0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__A0JH + a__E0JH) & (__UINTEGER_32)(~ a__E0JH));
+      ptr_table__N0JH=((__POINTER )(&(table_type[(t__D0JH)])));
+      lab_type__P0JH=(__UINTEGER_32)(t__D0JH |  1);
+      next__M0JH=((__POINTER )(NULL));
+      result__O0JH=((__POINTER *)ptr_table__N0JH)[ 0];
+      if ((result__O0JH == (void *)NULL)) {
+        result__O0JH=new_lab__URJ(lab_type__P0JH);
+        next__M0JH=(void *)((unsigned long)result__O0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0JH)));
+        ((__POINTER *)next__M0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__N0JH)[ 0]=next__M0JH;
+      } else {
+        next__M0JH=((__POINTER *)result__O0JH)[ 0];
+        if ((next__M0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O0JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Q0JH <<  1)) <=  4096)) {
+            next__M0JH=(void *)((unsigned long)result__O0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0JH)));
+          } else {
+            next__M0JH=new_lab__URJ(lab_type__P0JH);
+          };
+          ((__POINTER *)next__M0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N0JH)[ 0]=next__M0JH;
+        } else {
+          ((__POINTER *)result__O0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__O0JH=next__M0JH;
+        };
+      };
+      ptr__4ZJH=result__O0JH;
+    };
+    result__3ZJH=((__FAST_ARRAYoSTRINGo *)ptr__4ZJH);
+    *(result__3ZJH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__F0JH=((__FAST_ARRAYoSTRINGo *)result__3ZJH);
+  if ((Self__F0JH->parent_arrayed_collection__LKC.capacity__UGT < new_count__G0JH)) {
+    Self__F0JH->parent_arrayed_collection__LKC.storage__5GT=create__BGRB(new_count__G0JH);
+    Self__F0JH->parent_arrayed_collection__LKC.capacity__UGT=new_count__G0JH;
+  };
+  Self__F0JH->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(-  1);
+  result__JHD=result__3ZJH;
+  Self__PHF= 0;
+  limit_up__QHF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__PHF <= limit_up__QHF)) {
+    arg__KHD=((__CHARACTER *)(arg_vector[(Self__PHF)]));
+    Self__JXHH=((__CHARACTER *)arg__KHD);
+    idx__IXHH= 0;
+    while ((! ((idx__IXHH >  1024) || ('\0' == Self__JXHH[idx__IXHH])))) {
+      idx__IXHH=(__INTEGER)(idx__IXHH +  1);
+    };
+    str__LHD=create__TBB(idx__IXHH);
+    Self__OOEB=((__STRING *)str__LHD);
+    p__POEB=arg__KHD;
+    i__QOEB= 0;
+    Self__OOEB->count__4FC= 0;
+    while ((((__CHARACTER *)p__POEB)[i__QOEB] != '\0')) {
+      add_last__BMT(Self__OOEB,((__CHARACTER *)p__POEB)[i__QOEB]);
+      i__QOEB=(__INTEGER)(i__QOEB +  1);
+    };
+    add_last__ISV(result__JHD,str__LHD);
+    Self__PHF=(__INTEGER)(Self__PHF +  1);
   };
   output_name__DI=NULL;
-  format_name__B1=NULL;
-  is_short_code__P1=FALSE__;
-  is_short_private__31=FALSE__;
+  format_name__H1=NULL;
+  is_short_code__V1=FALSE__;
+  is_short_private__D2=FALSE__;
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__PFD=1;
-  string_tmp__TED=create__NBB( 255);
+  FILE_SYSTEM__->parent_directory__XFD=1;
+  string_tmp__1ED=create__TBB( 255);
   ENTRY__->path__BD=NULL;
-  ENTRY__->name__VNT=NULL;
-  ENTRY_UNIX__->parent_entry__YED=(*ENTRY__);
-  FILE_UNIX__->parent_entry_unix__2CF=(*ENTRY_UNIX__);
-  DIRECTORY_UNIX__->parent_entry_unix__ZED=(*ENTRY_UNIX__);
-  DIRECTORY__->list__IFRD=NULL;
-  DIRECTORY_UNIX__->parent_directory__0ED=(*DIRECTORY__);
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__F1S=NULL;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__A1S= 0;
-  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__G2S= 0;
-  result__1TG=NULL;
-  ptr__2TG=((__POINTER )(NULL));
-  typ_id__BUG= 0;
-  sz__4TG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
-  if ((sz__4TG ==  0)) {
-    result__1TG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+  ENTRY__->name__3NT=NULL;
+  ENTRY_UNIX__->parent_entry__AFD=(*ENTRY__);
+  FILE_UNIX__->parent_entry_unix__EDF=(*ENTRY_UNIX__);
+  DIRECTORY_UNIX__->parent_entry_unix__BFD=(*ENTRY_UNIX__);
+  DIRECTORY__->list__QFRD=NULL;
+  DIRECTORY_UNIX__->parent_directory__CFD=(*DIRECTORY__);
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__N1S=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__I1S= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__O2S= 0;
+  result__DUG=NULL;
+  ptr__EUG=((__POINTER )(NULL));
+  typ_id__JUG= 0;
+  sz__GUG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__GUG ==  0)) {
+    result__DUG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    typ_id__BUG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4TG);
-    if ((typ_id__BUG == (__INTEGER)(-  1))) {
-      a__CMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TG + a__CMFH) & (__UINTEGER_32)(~ a__CMFH));
-      ptr_table__SYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RYIH=((__POINTER )(NULL));
-      result__TYIH=((__POINTER *)ptr_table__SYIH)[ 0];
-      if ((result__TYIH == (void *)NULL)) {
-        result__TYIH=new_lab__MRJ(new_size__DMFH);
-        next__RYIH=(void *)((unsigned long)result__TYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DMFH)));
-        ((__POINTER *)next__RYIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SYIH)[ 0]=next__RYIH;
-      } else {
-        next__RYIH=((__POINTER *)result__TYIH)[ 0];
-        if ((next__RYIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DMFH <<  1)) <=  4096)) {
-            next__RYIH=(void *)((unsigned long)result__TYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DMFH)));
-          } else {
-            next__RYIH=new_lab__MRJ(new_size__DMFH);
-          };
-          ((__POINTER *)next__RYIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SYIH)[ 0]=next__RYIH;
-        } else {
-          ((__POINTER *)result__TYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TYIH=next__RYIH;
-        };
-      };
-      ptr__2TG=result__TYIH;
-    } else {
-      t__HMFH=((__UINTEGER_32 )typ_id__BUG);
-      a__GMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0YIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TG + a__GMFH) & (__UINTEGER_32)(~ a__GMFH));
-      ptr_table__XYIH=((__POINTER )(&(table_type[(t__HMFH)])));
-      lab_type__ZYIH=(__UINTEGER_32)(t__HMFH |  1);
-      next__WYIH=((__POINTER )(NULL));
-      result__YYIH=((__POINTER *)ptr_table__XYIH)[ 0];
-      if ((result__YYIH == (void *)NULL)) {
-        result__YYIH=new_lab__MRJ(lab_type__ZYIH);
-        next__WYIH=(void *)((unsigned long)result__YYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YIH)));
-        ((__POINTER *)next__WYIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XYIH)[ 0]=next__WYIH;
-      } else {
-        next__WYIH=((__POINTER *)result__YYIH)[ 0];
-        if ((next__WYIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YYIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0YIH <<  1)) <=  4096)) {
-            next__WYIH=(void *)((unsigned long)result__YYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YIH)));
-          } else {
-            next__WYIH=new_lab__MRJ(lab_type__ZYIH);
-          };
-          ((__POINTER *)next__WYIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XYIH)[ 0]=next__WYIH;
-        } else {
-          ((__POINTER *)result__YYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YYIH=next__WYIH;
-        };
-      };
-      ptr__2TG=result__YYIH;
-    };
-    result__1TG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__2TG);
-    *(result__1TG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
-  };
-  Self__YIT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__1TG);
-  new_capacity__DKY=prime_number_ceiling__X41( 193);
-  Self__YIT->buckets__F1S=create__XB4(new_capacity__DKY);
-  Self__YIT->capacity__A1S=new_capacity__DKY;
-  Self__YIT->count__G2S= 0;
-  alias__EFD=result__1TG;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__R1S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__31S=NULL;
-  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__0SOB=NULL;
-  string_tmp2__Z0AC=create__NBB( 255);
-  string_tmp3__50AC=create__NBB( 255);
-  ITM_OBJECT__->position__NDJ=((__POSITION ) 0);
+    typ_id__JUG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__GUG);
+    if ((typ_id__JUG == (__INTEGER)(-  1))) {
+      a__SNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUG + a__SNGH) & (__UINTEGER_32)(~ a__SNGH));
+      ptr_table__S0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__R0JH=((__POINTER )(NULL));
+      result__T0JH=((__POINTER *)ptr_table__S0JH)[ 0];
+      if ((result__T0JH == (void *)NULL)) {
+        result__T0JH=new_lab__URJ(new_size__TNGH);
+        next__R0JH=(void *)((unsigned long)result__T0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNGH)));
+        ((__POINTER *)next__R0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S0JH)[ 0]=next__R0JH;
+      } else {
+        next__R0JH=((__POINTER *)result__T0JH)[ 0];
+        if ((next__R0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T0JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TNGH <<  1)) <=  4096)) {
+            next__R0JH=(void *)((unsigned long)result__T0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNGH)));
+          } else {
+            next__R0JH=new_lab__URJ(new_size__TNGH);
+          };
+          ((__POINTER *)next__R0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S0JH)[ 0]=next__R0JH;
+        } else {
+          ((__POINTER *)result__T0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__T0JH=next__R0JH;
+        };
+      };
+      ptr__EUG=result__T0JH;
+    } else {
+      t__XNGH=((__UINTEGER_32 )typ_id__JUG);
+      a__WNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__00JH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUG + a__WNGH) & (__UINTEGER_32)(~ a__WNGH));
+      ptr_table__X0JH=((__POINTER )(&(table_type[(t__XNGH)])));
+      lab_type__Z0JH=(__UINTEGER_32)(t__XNGH |  1);
+      next__W0JH=((__POINTER )(NULL));
+      result__Y0JH=((__POINTER *)ptr_table__X0JH)[ 0];
+      if ((result__Y0JH == (void *)NULL)) {
+        result__Y0JH=new_lab__URJ(lab_type__Z0JH);
+        next__W0JH=(void *)((unsigned long)result__Y0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00JH)));
+        ((__POINTER *)next__W0JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X0JH)[ 0]=next__W0JH;
+      } else {
+        next__W0JH=((__POINTER *)result__Y0JH)[ 0];
+        if ((next__W0JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y0JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__00JH <<  1)) <=  4096)) {
+            next__W0JH=(void *)((unsigned long)result__Y0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00JH)));
+          } else {
+            next__W0JH=new_lab__URJ(lab_type__Z0JH);
+          };
+          ((__POINTER *)next__W0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X0JH)[ 0]=next__W0JH;
+        } else {
+          ((__POINTER *)result__Y0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y0JH=next__W0JH;
+        };
+      };
+      ptr__EUG=result__Y0JH;
+    };
+    result__DUG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__EUG);
+    *(result__DUG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__AJT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__DUG);
+  new_capacity__LKY=prime_number_ceiling__541( 193);
+  Self__AJT->buckets__N1S=create__5B4(new_capacity__LKY);
+  Self__AJT->capacity__I1S=new_capacity__LKY;
+  Self__AJT->count__O2S= 0;
+  alias__MFD=result__DUG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__Z1S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__F2S=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__CTOB=NULL;
+  string_tmp2__B1AC=create__TBB( 255);
+  string_tmp3__H1AC=create__TBB( 255);
+  ITM_OBJECT__->position__VDJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__BEU='\0';
+  NAMED__->style__JEU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__VNBC=NULL;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__QNBC= 0;
-  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__VOBC= 0;
-  result__C4DB=NULL;
-  ptr__D4DB=((__POINTER )(NULL));
-  typ_id__I4DB= 0;
-  sz__F4DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
-  if ((sz__F4DB ==  0)) {
-    result__C4DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__3NBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__YNBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__3OBC= 0;
+  result__K4DB=NULL;
+  ptr__L4DB=((__POINTER )(NULL));
+  typ_id__Q4DB= 0;
+  sz__N4DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__N4DB ==  0)) {
+    result__K4DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    typ_id__I4DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__F4DB);
-    if ((typ_id__I4DB == (__INTEGER)(-  1))) {
-      a__KMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__F4DB + a__KMFH) & (__UINTEGER_32)(~ a__KMFH));
-      ptr_table__2YIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1YIH=((__POINTER )(NULL));
-      result__3YIH=((__POINTER *)ptr_table__2YIH)[ 0];
-      if ((result__3YIH == (void *)NULL)) {
-        result__3YIH=new_lab__MRJ(new_size__LMFH);
-        next__1YIH=(void *)((unsigned long)result__3YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMFH)));
-        ((__POINTER *)next__1YIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2YIH)[ 0]=next__1YIH;
-      } else {
-        next__1YIH=((__POINTER *)result__3YIH)[ 0];
-        if ((next__1YIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3YIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LMFH <<  1)) <=  4096)) {
-            next__1YIH=(void *)((unsigned long)result__3YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LMFH)));
-          } else {
-            next__1YIH=new_lab__MRJ(new_size__LMFH);
-          };
-          ((__POINTER *)next__1YIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2YIH)[ 0]=next__1YIH;
-        } else {
-          ((__POINTER *)result__3YIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1YIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3YIH=next__1YIH;
-        };
-      };
-      ptr__D4DB=result__3YIH;
-    } else {
-      t__PMFH=((__UINTEGER_32 )typ_id__I4DB);
-      a__OMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__EZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__F4DB + a__OMFH) & (__UINTEGER_32)(~ a__OMFH));
-      ptr_table__BZIH=((__POINTER )(&(table_type[(t__PMFH)])));
-      lab_type__DZIH=(__UINTEGER_32)(t__PMFH |  1);
-      next__AZIH=((__POINTER )(NULL));
-      result__CZIH=((__POINTER *)ptr_table__BZIH)[ 0];
-      if ((result__CZIH == (void *)NULL)) {
-        result__CZIH=new_lab__MRJ(lab_type__DZIH);
-        next__AZIH=(void *)((unsigned long)result__CZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EZIH)));
-        ((__POINTER *)next__AZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__BZIH)[ 0]=next__AZIH;
-      } else {
-        next__AZIH=((__POINTER *)result__CZIH)[ 0];
-        if ((next__AZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EZIH <<  1)) <=  4096)) {
-            next__AZIH=(void *)((unsigned long)result__CZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EZIH)));
-          } else {
-            next__AZIH=new_lab__MRJ(lab_type__DZIH);
-          };
-          ((__POINTER *)next__AZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BZIH)[ 0]=next__AZIH;
-        } else {
-          ((__POINTER *)result__CZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__CZIH=next__AZIH;
-        };
-      };
-      ptr__D4DB=result__CZIH;
-    };
-    result__C4DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__D4DB);
-    *(result__C4DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
-  };
-  Self__0MCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__C4DB);
-  new_capacity__KVJC=prime_number_ceiling__X41( 193);
-  Self__0MCC->buckets__VNBC=create__HITC(new_capacity__KVJC);
-  Self__0MCC->capacity__QNBC=new_capacity__KVJC;
-  Self__0MCC->count__VOBC= 0;
-  prototype_dico__PTS=result__C4DB;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__BOBC=NULL;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__MOBC=NULL;
-  PROTOTYPE__->filename__UPG=NULL;
-  PROTOTYPE__->shortname__FIE=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__WBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__YBBC= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__UCBC=NULL;
-  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__TME=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
-  ITM_TYPE_SIMPLE__->name__KYP=NULL;
-  ITM_TYPE_PARAMETER__->parent_itm_type__3DE=(*ITM_TYPE_SIMPLE__);
-  PROTOTYPE__->idf_generic_list__UME=NULL;
+    typ_id__Q4DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__N4DB);
+    if ((typ_id__Q4DB == (__INTEGER)(-  1))) {
+      a__0NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1NGH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4DB + a__0NGH) & (__UINTEGER_32)(~ a__0NGH));
+      ptr_table__20JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1NGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__10JH=((__POINTER )(NULL));
+      result__30JH=((__POINTER *)ptr_table__20JH)[ 0];
+      if ((result__30JH == (void *)NULL)) {
+        result__30JH=new_lab__URJ(new_size__1NGH);
+        next__10JH=(void *)((unsigned long)result__30JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NGH)));
+        ((__POINTER *)next__10JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__20JH)[ 0]=next__10JH;
+      } else {
+        next__10JH=((__POINTER *)result__30JH)[ 0];
+        if ((next__10JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__30JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1NGH <<  1)) <=  4096)) {
+            next__10JH=(void *)((unsigned long)result__30JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NGH)));
+          } else {
+            next__10JH=new_lab__URJ(new_size__1NGH);
+          };
+          ((__POINTER *)next__10JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__20JH)[ 0]=next__10JH;
+        } else {
+          ((__POINTER *)result__30JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__10JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__30JH=next__10JH;
+        };
+      };
+      ptr__L4DB=result__30JH;
+    } else {
+      t__5NGH=((__UINTEGER_32 )typ_id__Q4DB);
+      a__4NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__E1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4DB + a__4NGH) & (__UINTEGER_32)(~ a__4NGH));
+      ptr_table__B1JH=((__POINTER )(&(table_type[(t__5NGH)])));
+      lab_type__D1JH=(__UINTEGER_32)(t__5NGH |  1);
+      next__A1JH=((__POINTER )(NULL));
+      result__C1JH=((__POINTER *)ptr_table__B1JH)[ 0];
+      if ((result__C1JH == (void *)NULL)) {
+        result__C1JH=new_lab__URJ(lab_type__D1JH);
+        next__A1JH=(void *)((unsigned long)result__C1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E1JH)));
+        ((__POINTER *)next__A1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__B1JH)[ 0]=next__A1JH;
+      } else {
+        next__A1JH=((__POINTER *)result__C1JH)[ 0];
+        if ((next__A1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C1JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__E1JH <<  1)) <=  4096)) {
+            next__A1JH=(void *)((unsigned long)result__C1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E1JH)));
+          } else {
+            next__A1JH=new_lab__URJ(lab_type__D1JH);
+          };
+          ((__POINTER *)next__A1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__B1JH)[ 0]=next__A1JH;
+        } else {
+          ((__POINTER *)result__C1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__C1JH=next__A1JH;
+        };
+      };
+      ptr__L4DB=result__C1JH;
+    };
+    result__K4DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__L4DB);
+    *(result__K4DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__CNCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__K4DB);
+  new_capacity__SVJC=prime_number_ceiling__541( 193);
+  Self__CNCC->buckets__3NBC=create__PITC(new_capacity__SVJC);
+  Self__CNCC->capacity__YNBC=new_capacity__SVJC;
+  Self__CNCC->count__3OBC= 0;
+  prototype_dico__XTS=result__K4DB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__JOBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__UOBC=NULL;
+  PROTOTYPE__->filename__2PG=NULL;
+  PROTOTYPE__->shortname__NIE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__4BBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__ACBC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__2CBC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__1ME=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__SYP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__FEE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__2ME=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__KTT=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__3CU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__STT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__FDU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  result__ENJ=NULL;
-  ptr__FNJ=((__POINTER )(NULL));
-  typ_id__KNJ= 0;
-  sz__HNJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
-  if ((sz__HNJ ==  0)) {
-    result__ENJ=FAST_ARRAYoPROTOTYPEo__;
+  result__MNJ=NULL;
+  ptr__NNJ=((__POINTER )(NULL));
+  typ_id__SNJ= 0;
+  sz__PNJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__PNJ ==  0)) {
+    result__MNJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    typ_id__KNJ=__FAST_ARRAYoPROTOTYPEo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HNJ);
-    if ((typ_id__KNJ == (__INTEGER)(-  1))) {
-      a__SMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNJ + a__SMFH) & (__UINTEGER_32)(~ a__SMFH));
-      ptr_table__GZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FZIH=((__POINTER )(NULL));
-      result__HZIH=((__POINTER *)ptr_table__GZIH)[ 0];
-      if ((result__HZIH == (void *)NULL)) {
-        result__HZIH=new_lab__MRJ(new_size__TMFH);
-        next__FZIH=(void *)((unsigned long)result__HZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMFH)));
-        ((__POINTER *)next__FZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GZIH)[ 0]=next__FZIH;
-      } else {
-        next__FZIH=((__POINTER *)result__HZIH)[ 0];
-        if ((next__FZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TMFH <<  1)) <=  4096)) {
-            next__FZIH=(void *)((unsigned long)result__HZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMFH)));
-          } else {
-            next__FZIH=new_lab__MRJ(new_size__TMFH);
-          };
-          ((__POINTER *)next__FZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GZIH)[ 0]=next__FZIH;
-        } else {
-          ((__POINTER *)result__HZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HZIH=next__FZIH;
-        };
-      };
-      ptr__FNJ=result__HZIH;
-    } else {
-      t__XMFH=((__UINTEGER_32 )typ_id__KNJ);
-      a__WMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HNJ + a__WMFH) & (__UINTEGER_32)(~ a__WMFH));
-      ptr_table__LZIH=((__POINTER )(&(table_type[(t__XMFH)])));
-      lab_type__NZIH=(__UINTEGER_32)(t__XMFH |  1);
-      next__KZIH=((__POINTER )(NULL));
-      result__MZIH=((__POINTER *)ptr_table__LZIH)[ 0];
-      if ((result__MZIH == (void *)NULL)) {
-        result__MZIH=new_lab__MRJ(lab_type__NZIH);
-        next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZIH)));
-        ((__POINTER *)next__KZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
-      } else {
-        next__KZIH=((__POINTER *)result__MZIH)[ 0];
-        if ((next__KZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OZIH <<  1)) <=  4096)) {
-            next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZIH)));
-          } else {
-            next__KZIH=new_lab__MRJ(lab_type__NZIH);
-          };
-          ((__POINTER *)next__KZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
-        } else {
-          ((__POINTER *)result__MZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MZIH=next__KZIH;
-        };
-      };
-      ptr__FNJ=result__MZIH;
-    };
-    result__ENJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__FNJ);
-    *(result__ENJ) = *(FAST_ARRAYoPROTOTYPEo__);
-  };
-  Self__UCU=((__FAST_ARRAYoPROTOTYPEo *)result__ENJ);
-  if ((Self__UCU->parent_arrayed_collection__AJ.capacity__3CU <  512)) {
-    Self__UCU->parent_arrayed_collection__AJ.storage__KTT=create__GFSB( 512);
-    Self__UCU->parent_arrayed_collection__AJ.capacity__3CU= 512;
-  };
-  Self__UCU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
-  prototype_list__BJ=result__ENJ;
-  PROTOTYPE__->index__VMG= 0;
-  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__U3GD=NULL;
-  string_tmp__KWX=create__NBB( 128);
-  PROTOTYPE__->source__NBC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__DBGC=NULL;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__24BC= 0;
-  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__OPGC= 0;
-  PROTOTYPE__->slot_list__2US=NULL;
-  object__JBC=NULL;
-  source__PBC=NULL;
-  position__SBC= 0;
-  pos_cur__VBC= 0;
-  pos_line__WBC= 0;
-  pos_col__XBC= 0;
-  key_comment_default__ACC=NULL;
-  is_catch_comment__AXC=FALSE__;
-  is_active_short__4BC=FALSE__;
-  output_code__SI=create__NBB( 4000000);
-  short_derive__BCC= 0;
-  last_comment__00D=create__NBB( 256);
-  last_slot__Q2D=NULL;
-  ITM_SLOT__->comment__WJJD=NULL;
-  ITM_SLOT__->parent_named__P5=(*NAMED__);
-  ITM_SLOT__->id_section__Y1C=NULL;
-  ITM_SLOT__->result_type__04FC=NULL;
-  ITM_SLOT__->affect__JAGC='\0';
-  ITM_SLOT__->argument_list__GEHC=NULL;
-  ITM_SLOT__->next__OHHC=NULL;
-  ITM_SLOT_OPERATOR__->parent_itm_slot__OU5B=(*ITM_SLOT__);
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__5CT=NULL;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__0CT= 0;
-  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__IMY= 0;
-  result__LNH=NULL;
-  ptr__MNH=((__POINTER )(NULL));
-  typ_id__RNH= 0;
-  sz__ONH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-  if ((sz__ONH ==  0)) {
-    result__LNH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    typ_id__SNJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__PNJ);
+    if ((typ_id__SNJ == (__INTEGER)(-  1))) {
+      a__COGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PNJ + a__COGH) & (__UINTEGER_32)(~ a__COGH));
+      ptr_table__G1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__F1JH=((__POINTER )(NULL));
+      result__H1JH=((__POINTER *)ptr_table__G1JH)[ 0];
+      if ((result__H1JH == (void *)NULL)) {
+        result__H1JH=new_lab__URJ(new_size__DOGH);
+        next__F1JH=(void *)((unsigned long)result__H1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOGH)));
+        ((__POINTER *)next__F1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__G1JH)[ 0]=next__F1JH;
+      } else {
+        next__F1JH=((__POINTER *)result__H1JH)[ 0];
+        if ((next__F1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H1JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DOGH <<  1)) <=  4096)) {
+            next__F1JH=(void *)((unsigned long)result__H1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOGH)));
+          } else {
+            next__F1JH=new_lab__URJ(new_size__DOGH);
+          };
+          ((__POINTER *)next__F1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__G1JH)[ 0]=next__F1JH;
+        } else {
+          ((__POINTER *)result__H1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__H1JH=next__F1JH;
+        };
+      };
+      ptr__NNJ=result__H1JH;
+    } else {
+      t__HOGH=((__UINTEGER_32 )typ_id__SNJ);
+      a__GOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__O1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__PNJ + a__GOGH) & (__UINTEGER_32)(~ a__GOGH));
+      ptr_table__L1JH=((__POINTER )(&(table_type[(t__HOGH)])));
+      lab_type__N1JH=(__UINTEGER_32)(t__HOGH |  1);
+      next__K1JH=((__POINTER )(NULL));
+      result__M1JH=((__POINTER *)ptr_table__L1JH)[ 0];
+      if ((result__M1JH == (void *)NULL)) {
+        result__M1JH=new_lab__URJ(lab_type__N1JH);
+        next__K1JH=(void *)((unsigned long)result__M1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1JH)));
+        ((__POINTER *)next__K1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__L1JH)[ 0]=next__K1JH;
+      } else {
+        next__K1JH=((__POINTER *)result__M1JH)[ 0];
+        if ((next__K1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M1JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__O1JH <<  1)) <=  4096)) {
+            next__K1JH=(void *)((unsigned long)result__M1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1JH)));
+          } else {
+            next__K1JH=new_lab__URJ(lab_type__N1JH);
+          };
+          ((__POINTER *)next__K1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__L1JH)[ 0]=next__K1JH;
+        } else {
+          ((__POINTER *)result__M1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__M1JH=next__K1JH;
+        };
+      };
+      ptr__NNJ=result__M1JH;
+    };
+    result__MNJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__NNJ);
+    *(result__MNJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__2CU=((__FAST_ARRAYoPROTOTYPEo *)result__MNJ);
+  if ((Self__2CU->parent_arrayed_collection__AJ.capacity__FDU <  512)) {
+    Self__2CU->parent_arrayed_collection__AJ.storage__STT=create__OFSB( 512);
+    Self__2CU->parent_arrayed_collection__AJ.capacity__FDU= 512;
+  };
+  Self__2CU->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__MNJ;
+  PROTOTYPE__->index__3MG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__23GD=NULL;
+  string_tmp__SWX=create__TBB( 128);
+  PROTOTYPE__->source__VBC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__LBGC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__E5BC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__WPGC= 0;
+  PROTOTYPE__->slot_list__EVS=NULL;
+  object__RBC=NULL;
+  source__XBC=NULL;
+  position__0BC= 0;
+  pos_cur__3BC= 0;
+  pos_line__4BC= 0;
+  pos_col__5BC= 0;
+  key_comment_default__ICC=NULL;
+  is_catch_comment__IXC=FALSE__;
+  is_active_short__GCC=FALSE__;
+  output_code__SI=create__TBB( 4000000);
+  short_derive__JCC= 0;
+  last_comment__C1D=create__TBB( 256);
+  last_slot__Y2D=NULL;
+  ITM_SLOT__->comment__4JJD=NULL;
+  ITM_SLOT__->parent_named__V5=(*NAMED__);
+  ITM_SLOT__->id_section__A2C=NULL;
+  ITM_SLOT__->result_type__C5FC=NULL;
+  ITM_SLOT__->affect__RAGC='\0';
+  ITM_SLOT__->argument_list__OEHC=NULL;
+  ITM_SLOT__->next__WHHC=NULL;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__WU5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__HDT=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__CDT= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__QMY= 0;
+  result__TNH=NULL;
+  ptr__UNH=((__POINTER )(NULL));
+  typ_id__ZNH= 0;
+  sz__WNH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__WNH ==  0)) {
+    result__TNH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    typ_id__RNH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ONH);
-    if ((typ_id__RNH == (__INTEGER)(-  1))) {
-      a__0MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1MFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONH + a__0MFH) & (__UINTEGER_32)(~ a__0MFH));
-      ptr_table__QZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1MFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__PZIH=((__POINTER )(NULL));
-      result__RZIH=((__POINTER *)ptr_table__QZIH)[ 0];
-      if ((result__RZIH == (void *)NULL)) {
-        result__RZIH=new_lab__MRJ(new_size__1MFH);
-        next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MFH)));
-        ((__POINTER *)next__PZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
-      } else {
-        next__PZIH=((__POINTER *)result__RZIH)[ 0];
-        if ((next__PZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1MFH <<  1)) <=  4096)) {
-            next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MFH)));
-          } else {
-            next__PZIH=new_lab__MRJ(new_size__1MFH);
-          };
-          ((__POINTER *)next__PZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
-        } else {
-          ((__POINTER *)result__RZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RZIH=next__PZIH;
-        };
-      };
-      ptr__MNH=result__RZIH;
-    } else {
-      t__5MFH=((__UINTEGER_32 )typ_id__RNH);
-      a__4MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONH + a__4MFH) & (__UINTEGER_32)(~ a__4MFH));
-      ptr_table__VZIH=((__POINTER )(&(table_type[(t__5MFH)])));
-      lab_type__XZIH=(__UINTEGER_32)(t__5MFH |  1);
-      next__UZIH=((__POINTER )(NULL));
-      result__WZIH=((__POINTER *)ptr_table__VZIH)[ 0];
-      if ((result__WZIH == (void *)NULL)) {
-        result__WZIH=new_lab__MRJ(lab_type__XZIH);
-        next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZIH)));
-        ((__POINTER *)next__UZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
-      } else {
-        next__UZIH=((__POINTER *)result__WZIH)[ 0];
-        if ((next__UZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YZIH <<  1)) <=  4096)) {
-            next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZIH)));
-          } else {
-            next__UZIH=new_lab__MRJ(lab_type__XZIH);
-          };
-          ((__POINTER *)next__UZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
-        } else {
-          ((__POINTER *)result__WZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WZIH=next__UZIH;
-        };
-      };
-      ptr__MNH=result__WZIH;
-    };
-    result__LNH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__MNH);
-    *(result__LNH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-  };
-  Self__5MT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-  new_capacity__DMY=prime_number_ceiling__X41( 193);
-  Self__5MT->buckets__5CT=create__BG4(new_capacity__DMY);
-  Self__5MT->capacity__0CT=new_capacity__DMY;
-  Self__5MT->count__IMY= 0;
-  short_dico__QD=result__LNH;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__LDT=NULL;
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__WDT=NULL;
-  token__GCD=create__NBB( 100);
-  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__HY3=NULL;
-  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__5CD= 0;
+    typ_id__ZNH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WNH);
+    if ((typ_id__ZNH == (__INTEGER)(-  1))) {
+      a__KOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WNH + a__KOGH) & (__UINTEGER_32)(~ a__KOGH));
+      ptr_table__Q1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__P1JH=((__POINTER )(NULL));
+      result__R1JH=((__POINTER *)ptr_table__Q1JH)[ 0];
+      if ((result__R1JH == (void *)NULL)) {
+        result__R1JH=new_lab__URJ(new_size__LOGH);
+        next__P1JH=(void *)((unsigned long)result__R1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOGH)));
+        ((__POINTER *)next__P1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Q1JH)[ 0]=next__P1JH;
+      } else {
+        next__P1JH=((__POINTER *)result__R1JH)[ 0];
+        if ((next__P1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R1JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LOGH <<  1)) <=  4096)) {
+            next__P1JH=(void *)((unsigned long)result__R1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOGH)));
+          } else {
+            next__P1JH=new_lab__URJ(new_size__LOGH);
+          };
+          ((__POINTER *)next__P1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Q1JH)[ 0]=next__P1JH;
+        } else {
+          ((__POINTER *)result__R1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__R1JH=next__P1JH;
+        };
+      };
+      ptr__UNH=result__R1JH;
+    } else {
+      t__POGH=((__UINTEGER_32 )typ_id__ZNH);
+      a__OOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Y1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__WNH + a__OOGH) & (__UINTEGER_32)(~ a__OOGH));
+      ptr_table__V1JH=((__POINTER )(&(table_type[(t__POGH)])));
+      lab_type__X1JH=(__UINTEGER_32)(t__POGH |  1);
+      next__U1JH=((__POINTER )(NULL));
+      result__W1JH=((__POINTER *)ptr_table__V1JH)[ 0];
+      if ((result__W1JH == (void *)NULL)) {
+        result__W1JH=new_lab__URJ(lab_type__X1JH);
+        next__U1JH=(void *)((unsigned long)result__W1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1JH)));
+        ((__POINTER *)next__U1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__V1JH)[ 0]=next__U1JH;
+      } else {
+        next__U1JH=((__POINTER *)result__W1JH)[ 0];
+        if ((next__U1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W1JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Y1JH <<  1)) <=  4096)) {
+            next__U1JH=(void *)((unsigned long)result__W1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1JH)));
+          } else {
+            next__U1JH=new_lab__URJ(lab_type__X1JH);
+          };
+          ((__POINTER *)next__U1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__V1JH)[ 0]=next__U1JH;
+        } else {
+          ((__POINTER *)result__W1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__W1JH=next__U1JH;
+        };
+      };
+      ptr__UNH=result__W1JH;
+    };
+    result__TNH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__UNH);
+    *(result__TNH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__HNT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+  new_capacity__LMY=prime_number_ceiling__541( 193);
+  Self__HNT->buckets__HDT=create__JG4(new_capacity__LMY);
+  Self__HNT->capacity__CDT=new_capacity__LMY;
+  Self__HNT->count__QMY= 0;
+  short_dico__QD=result__TNH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__TDT=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__4DT=NULL;
+  token__OCD=create__TBB( 100);
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__PY3=NULL;
+  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__HDD= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_CONSTANTo__);
-  LINKED_LISToSTRING_CONSTANTo__->mem_idx__OUEC= 0;
-  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__QUEC=NULL;
-  LINKED_LISToSTRING_CONSTANTo__->first_link__EUEC=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__MOOD=NULL;
-  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__0VHD=NULL;
-  type_error__ONG= 0;
-  msg_err__PNG=create__NBB( 256);
-  begin_position__LBE= 0;
-  last_string__I0C=NULL;
-  string_tmp2__BAJ=create__NBB( 256);
-  last_integer__ZRO= 0;
-  LINKED_LISToSTRING_CONSTANTo__->last_link__NUEC=NULL;
-  index_count__D5= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__N2R=NULL;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__I2R= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__N3R= 0;
-  result__NOC=NULL;
-  ptr__OOC=((__POINTER )(NULL));
-  typ_id__TOC= 0;
-  sz__QOC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
-  if ((sz__QOC ==  0)) {
-    result__NOC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__WUEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__YUEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__MUEC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__UOOD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__CWHD=NULL;
+  type_error__WNG= 0;
+  msg_err__XNG=create__TBB( 256);
+  begin_position__TBE= 0;
+  last_string__Q0C=NULL;
+  string_tmp2__JAJ=create__TBB( 256);
+  last_integer__BSO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__VUEC=NULL;
+  index_count__J5= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__V2R=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__Q2R= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__V3R= 0;
+  result__VOC=NULL;
+  ptr__WOC=((__POINTER )(NULL));
+  typ_id__1OC= 0;
+  sz__YOC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
+  if ((sz__YOC ==  0)) {
+    result__VOC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
   } else {
-    typ_id__TOC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QOC);
-    if ((typ_id__TOC == (__INTEGER)(-  1))) {
-      a__CNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__QOC + a__CNFH) & (__UINTEGER_32)(~ a__CNFH));
-      ptr_table__0ZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__ZZIH=((__POINTER )(NULL));
-      result__1ZIH=((__POINTER *)ptr_table__0ZIH)[ 0];
-      if ((result__1ZIH == (void *)NULL)) {
-        result__1ZIH=new_lab__MRJ(new_size__DNFH);
-        next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNFH)));
-        ((__POINTER *)next__ZZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
-      } else {
-        next__ZZIH=((__POINTER *)result__1ZIH)[ 0];
-        if ((next__ZZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1ZIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DNFH <<  1)) <=  4096)) {
-            next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNFH)));
-          } else {
-            next__ZZIH=new_lab__MRJ(new_size__DNFH);
-          };
-          ((__POINTER *)next__ZZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
-        } else {
-          ((__POINTER *)result__1ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__1ZIH=next__ZZIH;
-        };
-      };
-      ptr__OOC=result__1ZIH;
-    } else {
-      t__HNFH=((__UINTEGER_32 )typ_id__TOC);
-      a__GNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__C0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__QOC + a__GNFH) & (__UINTEGER_32)(~ a__GNFH));
-      ptr_table__5ZIH=((__POINTER )(&(table_type[(t__HNFH)])));
-      lab_type__B0IH=(__UINTEGER_32)(t__HNFH |  1);
-      next__4ZIH=((__POINTER )(NULL));
-      result__A0IH=((__POINTER *)ptr_table__5ZIH)[ 0];
-      if ((result__A0IH == (void *)NULL)) {
-        result__A0IH=new_lab__MRJ(lab_type__B0IH);
-        next__4ZIH=(void *)((unsigned long)result__A0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C0IH)));
-        ((__POINTER *)next__4ZIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5ZIH)[ 0]=next__4ZIH;
-      } else {
-        next__4ZIH=((__POINTER *)result__A0IH)[ 0];
-        if ((next__4ZIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__C0IH <<  1)) <=  4096)) {
-            next__4ZIH=(void *)((unsigned long)result__A0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C0IH)));
-          } else {
-            next__4ZIH=new_lab__MRJ(lab_type__B0IH);
-          };
-          ((__POINTER *)next__4ZIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5ZIH)[ 0]=next__4ZIH;
-        } else {
-          ((__POINTER *)result__A0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4ZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__A0IH=next__4ZIH;
-        };
-      };
-      ptr__OOC=result__A0IH;
-    };
-    result__NOC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__OOC);
-    *(result__NOC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
-  };
-  Self__OPS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__NOC);
-  new_capacity__ALX=prime_number_ceiling__X41( 193);
-  Self__OPS->buckets__N2R=create__MZ2(new_capacity__ALX);
-  Self__OPS->capacity__I2R=new_capacity__ALX;
-  Self__OPS->count__N3R= 0;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__Z2R=NULL;
-  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__E3R=NULL;
-  ARRAYED_COLLECTIONoSLOTo__->capacity__UES= 0;
-  FAST_ARRAYoSLOTo__->parent_arrayed_collection__V5=(*ARRAYED_COLLECTIONoSLOTo__);
-  TYPE_FULL__->flag__YFS= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->upper__S4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__U4R= 0;
-  ARRAYED_COLLECTIONoTYPE_IDo__->storage__Q5R=NULL;
-  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__UAB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
-  list_id__WAB=NULL;
+    typ_id__1OC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__YOC);
+    if ((typ_id__1OC == (__INTEGER)(-  1))) {
+      a__SOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YOC + a__SOGH) & (__UINTEGER_32)(~ a__SOGH));
+      ptr_table__01JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__Z1JH=((__POINTER )(NULL));
+      result__11JH=((__POINTER *)ptr_table__01JH)[ 0];
+      if ((result__11JH == (void *)NULL)) {
+        result__11JH=new_lab__URJ(new_size__TOGH);
+        next__Z1JH=(void *)((unsigned long)result__11JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOGH)));
+        ((__POINTER *)next__Z1JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__01JH)[ 0]=next__Z1JH;
+      } else {
+        next__Z1JH=((__POINTER *)result__11JH)[ 0];
+        if ((next__Z1JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__11JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TOGH <<  1)) <=  4096)) {
+            next__Z1JH=(void *)((unsigned long)result__11JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOGH)));
+          } else {
+            next__Z1JH=new_lab__URJ(new_size__TOGH);
+          };
+          ((__POINTER *)next__Z1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__01JH)[ 0]=next__Z1JH;
+        } else {
+          ((__POINTER *)result__11JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__11JH=next__Z1JH;
+        };
+      };
+      ptr__WOC=result__11JH;
+    } else {
+      t__XOGH=((__UINTEGER_32 )typ_id__1OC);
+      a__WOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__C2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__YOC + a__WOGH) & (__UINTEGER_32)(~ a__WOGH));
+      ptr_table__51JH=((__POINTER )(&(table_type[(t__XOGH)])));
+      lab_type__B2JH=(__UINTEGER_32)(t__XOGH |  1);
+      next__41JH=((__POINTER )(NULL));
+      result__A2JH=((__POINTER *)ptr_table__51JH)[ 0];
+      if ((result__A2JH == (void *)NULL)) {
+        result__A2JH=new_lab__URJ(lab_type__B2JH);
+        next__41JH=(void *)((unsigned long)result__A2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2JH)));
+        ((__POINTER *)next__41JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__51JH)[ 0]=next__41JH;
+      } else {
+        next__41JH=((__POINTER *)result__A2JH)[ 0];
+        if ((next__41JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__C2JH <<  1)) <=  4096)) {
+            next__41JH=(void *)((unsigned long)result__A2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2JH)));
+          } else {
+            next__41JH=new_lab__URJ(lab_type__B2JH);
+          };
+          ((__POINTER *)next__41JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__51JH)[ 0]=next__41JH;
+        } else {
+          ((__POINTER *)result__A2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__41JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__A2JH=next__41JH;
+        };
+      };
+      ptr__WOC=result__A2JH;
+    };
+    result__VOC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__WOC);
+    *(result__VOC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
+  };
+  Self__WPS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__VOC);
+  new_capacity__ILX=prime_number_ceiling__541( 193);
+  Self__WPS->buckets__V2R=create__UZ2(new_capacity__ILX);
+  Self__WPS->capacity__Q2R=new_capacity__ILX;
+  Self__WPS->count__V3R= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__B3R=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__M3R=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__2ES= 0;
+  FAST_ARRAYoSLOTo__->parent_arrayed_collection__15=(*ARRAYED_COLLECTIONoSLOTo__);
+  TYPE_FULL__->flag__AGS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__04R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__24R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__Y5R=NULL;
+  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__0AB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
+  list_id__2AB=NULL;
   directory_list__YB=NULL;
   file_list__0B=NULL;
   current_list__2B=NULL;
-  LINKED_COLLECTIONoENTRYo__->upper__VM3D= 0;
-  LINKED_LISToENTRYo__->parent_linked_collection__HFRD=(*LINKED_COLLECTIONoENTRYo__);
-  LINKED_LISToENTRYo__->first_link__C1VE=NULL;
-  LINKED_LISToENTRYo__->mem_idx__J1VE= 0;
-  LINKED_LISToENTRYo__->mem_lnk__K1VE=NULL;
-  LINKED_LISToENTRYo__->last_link__L1VE=NULL;
-  LINKED_LIST_NODEoENTRYo__->item__FOWE=NULL;
-  LINKED_LIST_NODEoENTRYo__->next__05EF=NULL;
-  FILE_UNIX__->stream__EJRD=((__POINTER )(NULL));
+  LINKED_COLLECTIONoENTRYo__->upper__QM3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__PFRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__F1VE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__M1VE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__N1VE=NULL;
+  LINKED_LISToENTRYo__->last_link__O1VE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__IOWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__2KFF=NULL;
+  FILE_UNIX__->stream__MJRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__PEV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__KIT= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__YHY= 0;
-  short_local__JCC=NULL;
-  output_decl__3FE=create__NBB( 60000);
-  PROTOTYPE__->type_style__X2C=NULL;
-  is_parameter_type__IKE=FALSE__;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__FVV= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__AZV= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__1ZV=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__JUP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__KIV= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__RMV=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__5NV= 0;
-  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__ZXC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
-  result__B0Q=NULL;
-  ptr__C0Q=((__POINTER )(NULL));
-  typ_id__H0Q= 0;
-  sz__E0Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__E0Q ==  0)) {
-    result__B0Q=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
-  } else {
-    typ_id__H0Q=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__E0Q);
-    if ((typ_id__H0Q == (__INTEGER)(-  1))) {
-      a__KNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0Q + a__KNFH) & (__UINTEGER_32)(~ a__KNFH));
-      ptr_table__E0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__D0IH=((__POINTER )(NULL));
-      result__F0IH=((__POINTER *)ptr_table__E0IH)[ 0];
-      if ((result__F0IH == (void *)NULL)) {
-        result__F0IH=new_lab__MRJ(new_size__LNFH);
-        next__D0IH=(void *)((unsigned long)result__F0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNFH)));
-        ((__POINTER *)next__D0IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__E0IH)[ 0]=next__D0IH;
-      } else {
-        next__D0IH=((__POINTER *)result__F0IH)[ 0];
-        if ((next__D0IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LNFH <<  1)) <=  4096)) {
-            next__D0IH=(void *)((unsigned long)result__F0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNFH)));
-          } else {
-            next__D0IH=new_lab__MRJ(new_size__LNFH);
-          };
-          ((__POINTER *)next__D0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__E0IH)[ 0]=next__D0IH;
-        } else {
-          ((__POINTER *)result__F0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__F0IH=next__D0IH;
-        };
-      };
-      ptr__C0Q=result__F0IH;
-    } else {
-      t__PNFH=((__UINTEGER_32 )typ_id__H0Q);
-      a__ONFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__M0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0Q + a__ONFH) & (__UINTEGER_32)(~ a__ONFH));
-      ptr_table__J0IH=((__POINTER )(&(table_type[(t__PNFH)])));
-      lab_type__L0IH=(__UINTEGER_32)(t__PNFH |  1);
-      next__I0IH=((__POINTER )(NULL));
-      result__K0IH=((__POINTER *)ptr_table__J0IH)[ 0];
-      if ((result__K0IH == (void *)NULL)) {
-        result__K0IH=new_lab__MRJ(lab_type__L0IH);
-        next__I0IH=(void *)((unsigned long)result__K0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0IH)));
-        ((__POINTER *)next__I0IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__J0IH)[ 0]=next__I0IH;
-      } else {
-        next__I0IH=((__POINTER *)result__K0IH)[ 0];
-        if ((next__I0IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__M0IH <<  1)) <=  4096)) {
-            next__I0IH=(void *)((unsigned long)result__K0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0IH)));
-          } else {
-            next__I0IH=new_lab__MRJ(lab_type__L0IH);
-          };
-          ((__POINTER *)next__I0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__J0IH)[ 0]=next__I0IH;
-        } else {
-          ((__POINTER *)result__K0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__K0IH=next__I0IH;
-        };
-      };
-      ptr__C0Q=result__K0IH;
-    };
-    result__B0Q=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__C0Q);
-    *(result__B0Q) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__X3V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__B0Q);
-  if ((Self__X3V->parent_arrayed_collection__JUP.capacity__AZV <  5)) {
-    Self__X3V->parent_arrayed_collection__JUP.storage__1ZV=create__MJRB( 5);
-    Self__X3V->parent_arrayed_collection__JUP.capacity__AZV= 5;
-  };
-  Self__X3V->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(-  1);
-  free_list__KUP=result__B0Q;
-  empty_list__RVP=create_with_capacity__IFR( 0);
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__W5V=NULL;
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__R5V= 0;
-  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__FIW= 0;
-  result__4DR=NULL;
-  ptr__5DR=((__POINTER )(NULL));
-  typ_id__EER= 0;
-  sz__BER=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__BER ==  0)) {
-    result__4DR=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
-  } else {
-    typ_id__EER=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BER);
-    if ((typ_id__EER == (__INTEGER)(-  1))) {
-      a__SNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BER + a__SNFH) & (__UINTEGER_32)(~ a__SNFH));
-      ptr_table__O0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__N0IH=((__POINTER )(NULL));
-      result__P0IH=((__POINTER *)ptr_table__O0IH)[ 0];
-      if ((result__P0IH == (void *)NULL)) {
-        result__P0IH=new_lab__MRJ(new_size__TNFH);
-        next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNFH)));
-        ((__POINTER *)next__N0IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
-      } else {
-        next__N0IH=((__POINTER *)result__P0IH)[ 0];
-        if ((next__N0IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TNFH <<  1)) <=  4096)) {
-            next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TNFH)));
-          } else {
-            next__N0IH=new_lab__MRJ(new_size__TNFH);
-          };
-          ((__POINTER *)next__N0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
-        } else {
-          ((__POINTER *)result__P0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__P0IH=next__N0IH;
-        };
-      };
-      ptr__5DR=result__P0IH;
-    } else {
-      t__XNFH=((__UINTEGER_32 )typ_id__EER);
-      a__WNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__W0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__BER + a__WNFH) & (__UINTEGER_32)(~ a__WNFH));
-      ptr_table__T0IH=((__POINTER )(&(table_type[(t__XNFH)])));
-      lab_type__V0IH=(__UINTEGER_32)(t__XNFH |  1);
-      next__S0IH=((__POINTER )(NULL));
-      result__U0IH=((__POINTER *)ptr_table__T0IH)[ 0];
-      if ((result__U0IH == (void *)NULL)) {
-        result__U0IH=new_lab__MRJ(lab_type__V0IH);
-        next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0IH)));
-        ((__POINTER *)next__S0IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
-      } else {
-        next__S0IH=((__POINTER *)result__U0IH)[ 0];
-        if ((next__S0IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W0IH <<  1)) <=  4096)) {
-            next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0IH)));
-          } else {
-            next__S0IH=new_lab__MRJ(lab_type__V0IH);
-          };
-          ((__POINTER *)next__S0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
-        } else {
-          ((__POINTER *)result__U0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__U0IH=next__S0IH;
-        };
-      };
-      ptr__5DR=result__U0IH;
-    };
-    result__4DR=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__5DR);
-    *(result__4DR) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__JFW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__4DR);
-  new_capacity__0I1=prime_number_ceiling__X41( 53);
-  Self__JFW->buckets__W5V=create__1ZBB(new_capacity__0I1);
-  Self__JFW->capacity__R5V=new_capacity__0I1;
-  Self__JFW->count__FIW= 0;
-  bucket__2VP=result__4DR;
-  ITM_TYPE_STYLE__->parent_itm_type_simple__BSN=(*ITM_TYPE_SIMPLE__);
-  ITM_TYPE_STYLE__->style__TYP=NULL;
-  ITM_TYPE_GENERIC__->parent_itm_type_style__CSN=(*ITM_TYPE_STYLE__);
-  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__CAW=NULL;
-  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__OAW=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__WJP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__31V= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__I2V=NULL;
-  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__MJP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
-  result__OSQ=NULL;
-  ptr__PSQ=((__POINTER )(NULL));
-  typ_id__USQ= 0;
-  sz__RSQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
-  if ((sz__RSQ ==  0)) {
-    result__OSQ=FAST_ARRAYoITM_TYPE_MULTIo__;
-  } else {
-    typ_id__USQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__RSQ);
-    if ((typ_id__USQ == (__INTEGER)(-  1))) {
-      a__0NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1NFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSQ + a__0NFH) & (__UINTEGER_32)(~ a__0NFH));
-      ptr_table__Y0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1NFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__X0IH=((__POINTER )(NULL));
-      result__Z0IH=((__POINTER *)ptr_table__Y0IH)[ 0];
-      if ((result__Z0IH == (void *)NULL)) {
-        result__Z0IH=new_lab__MRJ(new_size__1NFH);
-        next__X0IH=(void *)((unsigned long)result__Z0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NFH)));
-        ((__POINTER *)next__X0IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Y0IH)[ 0]=next__X0IH;
-      } else {
-        next__X0IH=((__POINTER *)result__Z0IH)[ 0];
-        if ((next__X0IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z0IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1NFH <<  1)) <=  4096)) {
-            next__X0IH=(void *)((unsigned long)result__Z0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NFH)));
-          } else {
-            next__X0IH=new_lab__MRJ(new_size__1NFH);
-          };
-          ((__POINTER *)next__X0IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Y0IH)[ 0]=next__X0IH;
-        } else {
-          ((__POINTER *)result__Z0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__Z0IH=next__X0IH;
-        };
-      };
-      ptr__PSQ=result__Z0IH;
-    } else {
-      t__5NFH=((__UINTEGER_32 )typ_id__USQ);
-      a__4NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__A1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__RSQ + a__4NFH) & (__UINTEGER_32)(~ a__4NFH));
-      ptr_table__30IH=((__POINTER )(&(table_type[(t__5NFH)])));
-      lab_type__50IH=(__UINTEGER_32)(t__5NFH |  1);
-      next__20IH=((__POINTER )(NULL));
-      result__40IH=((__POINTER *)ptr_table__30IH)[ 0];
-      if ((result__40IH == (void *)NULL)) {
-        result__40IH=new_lab__MRJ(lab_type__50IH);
-        next__20IH=(void *)((unsigned long)result__40IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A1IH)));
-        ((__POINTER *)next__20IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__30IH)[ 0]=next__20IH;
-      } else {
-        next__20IH=((__POINTER *)result__40IH)[ 0];
-        if ((next__20IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__40IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__A1IH <<  1)) <=  4096)) {
-            next__20IH=(void *)((unsigned long)result__40IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A1IH)));
-          } else {
-            next__20IH=new_lab__MRJ(lab_type__50IH);
-          };
-          ((__POINTER *)next__20IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__30IH)[ 0]=next__20IH;
-        } else {
-          ((__POINTER *)result__40IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__20IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__40IH=next__20IH;
-        };
-      };
-      ptr__PSQ=result__40IH;
-    };
-    result__OSQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__PSQ);
-    *(result__OSQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
-  };
-  Self__U1V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__OSQ);
-  if ((Self__U1V->parent_arrayed_collection__MJP.capacity__31V <  32)) {
-    Self__U1V->parent_arrayed_collection__MJP.storage__I2V=create__VLXB( 32);
-    Self__U1V->parent_arrayed_collection__MJP.capacity__31V= 32;
-  };
-  Self__U1V->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(-  1);
-  dico__NJP=result__OSQ;
-  ITM_TYPE_MULTI__->list_type__AKP=NULL;
-  ITM_TYPE_BLOCK__->type_argument__WMN=NULL;
-  ITM_TYPE_GENERIC__->list_type__3YP=NULL;
-  ITM_TYPE_BLOCK__->type_result__ANN=NULL;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__IMN= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__GKV= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__RKV=NULL;
-  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__4LN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
-  result__U0O=NULL;
-  ptr__V0O=((__POINTER )(NULL));
-  typ_id__00O= 0;
-  sz__X0O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
-  if ((sz__X0O ==  0)) {
-    result__U0O=FAST_ARRAYoITM_TYPE_BLOCKo__;
-  } else {
-    typ_id__00O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__X0O);
-    if ((typ_id__00O == (__INTEGER)(-  1))) {
-      a__COFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__X0O + a__COFH) & (__UINTEGER_32)(~ a__COFH));
-      ptr_table__C1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DOFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__B1IH=((__POINTER )(NULL));
-      result__D1IH=((__POINTER *)ptr_table__C1IH)[ 0];
-      if ((result__D1IH == (void *)NULL)) {
-        result__D1IH=new_lab__MRJ(new_size__DOFH);
-        next__B1IH=(void *)((unsigned long)result__D1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOFH)));
-        ((__POINTER *)next__B1IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__C1IH)[ 0]=next__B1IH;
-      } else {
-        next__B1IH=((__POINTER *)result__D1IH)[ 0];
-        if ((next__B1IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DOFH <<  1)) <=  4096)) {
-            next__B1IH=(void *)((unsigned long)result__D1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DOFH)));
-          } else {
-            next__B1IH=new_lab__MRJ(new_size__DOFH);
-          };
-          ((__POINTER *)next__B1IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__C1IH)[ 0]=next__B1IH;
-        } else {
-          ((__POINTER *)result__D1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__D1IH=next__B1IH;
-        };
-      };
-      ptr__V0O=result__D1IH;
-    } else {
-      t__HOFH=((__UINTEGER_32 )typ_id__00O);
-      a__GOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__K1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__X0O + a__GOFH) & (__UINTEGER_32)(~ a__GOFH));
-      ptr_table__H1IH=((__POINTER )(&(table_type[(t__HOFH)])));
-      lab_type__J1IH=(__UINTEGER_32)(t__HOFH |  1);
-      next__G1IH=((__POINTER )(NULL));
-      result__I1IH=((__POINTER *)ptr_table__H1IH)[ 0];
-      if ((result__I1IH == (void *)NULL)) {
-        result__I1IH=new_lab__MRJ(lab_type__J1IH);
-        next__G1IH=(void *)((unsigned long)result__I1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K1IH)));
-        ((__POINTER *)next__G1IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__H1IH)[ 0]=next__G1IH;
-      } else {
-        next__G1IH=((__POINTER *)result__I1IH)[ 0];
-        if ((next__G1IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__K1IH <<  1)) <=  4096)) {
-            next__G1IH=(void *)((unsigned long)result__I1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K1IH)));
-          } else {
-            next__G1IH=new_lab__MRJ(lab_type__J1IH);
-          };
-          ((__POINTER *)next__G1IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__H1IH)[ 0]=next__G1IH;
-        } else {
-          ((__POINTER *)result__I1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__I1IH=next__G1IH;
-        };
-      };
-      ptr__V0O=result__I1IH;
-    };
-    result__U0O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__V0O);
-    *(result__U0O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
-  };
-  Self__3JV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__U0O);
-  if ((Self__3JV->parent_arrayed_collection__4LN.capacity__GKV <  32)) {
-    Self__3JV->parent_arrayed_collection__4LN.storage__RKV=create__QUWB( 32);
-    Self__3JV->parent_arrayed_collection__4LN.capacity__GKV= 32;
-  };
-  Self__3JV->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(-  1);
-  dico__5LN=result__U0O;
-  ITM_CODE__->parent_itm_object__XDE=(*ITM_OBJECT__);
-  ITM_CONSTANT__->parent_itm_code__1VF=(*ITM_CODE__);
-  ITM_REAL__->parent_itm_constant__FRO=(*ITM_CONSTANT__);
-  ITM_NUMBER__->parent_itm_constant__XRO=(*ITM_CONSTANT__);
-  ITM_CHARACTER__->parent_itm_constant__JSO=(*ITM_CONSTANT__);
-  ITM_STRING__->parent_itm_constant__0SO=(*ITM_CONSTANT__);
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__AYP= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__TBW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__4BW=NULL;
-  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__WXP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
-  result__12Q=NULL;
-  ptr__22Q=((__POINTER )(NULL));
-  typ_id__B3Q= 0;
-  sz__42Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
-  if ((sz__42Q ==  0)) {
-    result__12Q=FAST_ARRAYoITM_TYPE_GENERICo__;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__XEV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__SIT= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__AIY= 0;
+  short_local__RCC=NULL;
+  output_decl__FGE=create__TBB( 60000);
+  PROTOTYPE__->type_style__52C=NULL;
+  is_parameter_type__QKE=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__NVV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__IZV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__D0V=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__RUP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__SIV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__ZMV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__HOV= 0;
+  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__BYC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
+  result__J0Q=NULL;
+  ptr__K0Q=((__POINTER )(NULL));
+  typ_id__P0Q= 0;
+  sz__M0Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__M0Q ==  0)) {
+    result__J0Q=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__B3Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__42Q);
-    if ((typ_id__B3Q == (__INTEGER)(-  1))) {
-      a__KOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__42Q + a__KOFH) & (__UINTEGER_32)(~ a__KOFH));
-      ptr_table__M1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LOFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__L1IH=((__POINTER )(NULL));
-      result__N1IH=((__POINTER *)ptr_table__M1IH)[ 0];
-      if ((result__N1IH == (void *)NULL)) {
-        result__N1IH=new_lab__MRJ(new_size__LOFH);
-        next__L1IH=(void *)((unsigned long)result__N1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOFH)));
-        ((__POINTER *)next__L1IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__M1IH)[ 0]=next__L1IH;
-      } else {
-        next__L1IH=((__POINTER *)result__N1IH)[ 0];
-        if ((next__L1IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LOFH <<  1)) <=  4096)) {
-            next__L1IH=(void *)((unsigned long)result__N1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOFH)));
-          } else {
-            next__L1IH=new_lab__MRJ(new_size__LOFH);
-          };
-          ((__POINTER *)next__L1IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__M1IH)[ 0]=next__L1IH;
-        } else {
-          ((__POINTER *)result__N1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__N1IH=next__L1IH;
-        };
-      };
-      ptr__22Q=result__N1IH;
-    } else {
-      t__POFH=((__UINTEGER_32 )typ_id__B3Q);
-      a__OOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__U1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__42Q + a__OOFH) & (__UINTEGER_32)(~ a__OOFH));
-      ptr_table__R1IH=((__POINTER )(&(table_type[(t__POFH)])));
-      lab_type__T1IH=(__UINTEGER_32)(t__POFH |  1);
-      next__Q1IH=((__POINTER )(NULL));
-      result__S1IH=((__POINTER *)ptr_table__R1IH)[ 0];
-      if ((result__S1IH == (void *)NULL)) {
-        result__S1IH=new_lab__MRJ(lab_type__T1IH);
-        next__Q1IH=(void *)((unsigned long)result__S1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1IH)));
-        ((__POINTER *)next__Q1IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__R1IH)[ 0]=next__Q1IH;
-      } else {
-        next__Q1IH=((__POINTER *)result__S1IH)[ 0];
-        if ((next__Q1IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__U1IH <<  1)) <=  4096)) {
-            next__Q1IH=(void *)((unsigned long)result__S1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1IH)));
-          } else {
-            next__Q1IH=new_lab__MRJ(lab_type__T1IH);
-          };
-          ((__POINTER *)next__Q1IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__R1IH)[ 0]=next__Q1IH;
-        } else {
-          ((__POINTER *)result__S1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__S1IH=next__Q1IH;
-        };
-      };
-      ptr__22Q=result__S1IH;
-    };
-    result__12Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__22Q);
-    *(result__12Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
-  };
-  Self__KBW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__12Q);
-  if ((Self__KBW->parent_arrayed_collection__WXP.capacity__TBW <  32)) {
-    Self__KBW->parent_arrayed_collection__WXP.storage__4BW=create__PSXB( 32);
-    Self__KBW->parent_arrayed_collection__WXP.capacity__TBW= 32;
-  };
-  Self__KBW->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(-  1);
-  dico__XXP=result__12Q;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__M2T=NULL;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__H2T= 0;
-  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__MFZ= 0;
-  result__JLK=NULL;
-  ptr__KLK=((__POINTER )(NULL));
-  typ_id__PLK= 0;
-  sz__MLK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-  if ((sz__MLK ==  0)) {
-    result__JLK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    typ_id__P0Q=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__M0Q);
+    if ((typ_id__P0Q == (__INTEGER)(-  1))) {
+      a__0OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1OGH=(__UINTEGER_32)((__UINTEGER_32)(sz__M0Q + a__0OGH) & (__UINTEGER_32)(~ a__0OGH));
+      ptr_table__E2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1OGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__D2JH=((__POINTER )(NULL));
+      result__F2JH=((__POINTER *)ptr_table__E2JH)[ 0];
+      if ((result__F2JH == (void *)NULL)) {
+        result__F2JH=new_lab__URJ(new_size__1OGH);
+        next__D2JH=(void *)((unsigned long)result__F2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OGH)));
+        ((__POINTER *)next__D2JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__E2JH)[ 0]=next__D2JH;
+      } else {
+        next__D2JH=((__POINTER *)result__F2JH)[ 0];
+        if ((next__D2JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1OGH <<  1)) <=  4096)) {
+            next__D2JH=(void *)((unsigned long)result__F2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OGH)));
+          } else {
+            next__D2JH=new_lab__URJ(new_size__1OGH);
+          };
+          ((__POINTER *)next__D2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__E2JH)[ 0]=next__D2JH;
+        } else {
+          ((__POINTER *)result__F2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__F2JH=next__D2JH;
+        };
+      };
+      ptr__K0Q=result__F2JH;
+    } else {
+      t__5OGH=((__UINTEGER_32 )typ_id__P0Q);
+      a__4OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__M2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__M0Q + a__4OGH) & (__UINTEGER_32)(~ a__4OGH));
+      ptr_table__J2JH=((__POINTER )(&(table_type[(t__5OGH)])));
+      lab_type__L2JH=(__UINTEGER_32)(t__5OGH |  1);
+      next__I2JH=((__POINTER )(NULL));
+      result__K2JH=((__POINTER *)ptr_table__J2JH)[ 0];
+      if ((result__K2JH == (void *)NULL)) {
+        result__K2JH=new_lab__URJ(lab_type__L2JH);
+        next__I2JH=(void *)((unsigned long)result__K2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2JH)));
+        ((__POINTER *)next__I2JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__J2JH)[ 0]=next__I2JH;
+      } else {
+        next__I2JH=((__POINTER *)result__K2JH)[ 0];
+        if ((next__I2JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__M2JH <<  1)) <=  4096)) {
+            next__I2JH=(void *)((unsigned long)result__K2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M2JH)));
+          } else {
+            next__I2JH=new_lab__URJ(lab_type__L2JH);
+          };
+          ((__POINTER *)next__I2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__J2JH)[ 0]=next__I2JH;
+        } else {
+          ((__POINTER *)result__K2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__K2JH=next__I2JH;
+        };
+      };
+      ptr__K0Q=result__K2JH;
+    };
+    result__J0Q=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__K0Q);
+    *(result__J0Q) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__53V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__J0Q);
+  if ((Self__53V->parent_arrayed_collection__RUP.capacity__IZV <  5)) {
+    Self__53V->parent_arrayed_collection__RUP.storage__D0V=create__UJRB( 5);
+    Self__53V->parent_arrayed_collection__RUP.capacity__IZV= 5;
+  };
+  Self__53V->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(-  1);
+  free_list__SUP=result__J0Q;
+  empty_list__ZVP=create_with_capacity__QFR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__45V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__Z5V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__NIW= 0;
+  result__GER=NULL;
+  ptr__HER=((__POINTER )(NULL));
+  typ_id__MER= 0;
+  sz__JER=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__JER ==  0)) {
+    result__GER=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__PLK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MLK);
-    if ((typ_id__PLK == (__INTEGER)(-  1))) {
-      a__SOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLK + a__SOFH) & (__UINTEGER_32)(~ a__SOFH));
-      ptr_table__W1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TOFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__V1IH=((__POINTER )(NULL));
-      result__X1IH=((__POINTER *)ptr_table__W1IH)[ 0];
-      if ((result__X1IH == (void *)NULL)) {
-        result__X1IH=new_lab__MRJ(new_size__TOFH);
-        next__V1IH=(void *)((unsigned long)result__X1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOFH)));
-        ((__POINTER *)next__V1IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__W1IH)[ 0]=next__V1IH;
-      } else {
-        next__V1IH=((__POINTER *)result__X1IH)[ 0];
-        if ((next__V1IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X1IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TOFH <<  1)) <=  4096)) {
-            next__V1IH=(void *)((unsigned long)result__X1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOFH)));
-          } else {
-            next__V1IH=new_lab__MRJ(new_size__TOFH);
-          };
-          ((__POINTER *)next__V1IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__W1IH)[ 0]=next__V1IH;
-        } else {
-          ((__POINTER *)result__X1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__X1IH=next__V1IH;
-        };
-      };
-      ptr__KLK=result__X1IH;
-    } else {
-      t__XOFH=((__UINTEGER_32 )typ_id__PLK);
-      a__WOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__41IH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLK + a__WOFH) & (__UINTEGER_32)(~ a__WOFH));
-      ptr_table__11IH=((__POINTER )(&(table_type[(t__XOFH)])));
-      lab_type__31IH=(__UINTEGER_32)(t__XOFH |  1);
-      next__01IH=((__POINTER )(NULL));
-      result__21IH=((__POINTER *)ptr_table__11IH)[ 0];
-      if ((result__21IH == (void *)NULL)) {
-        result__21IH=new_lab__MRJ(lab_type__31IH);
-        next__01IH=(void *)((unsigned long)result__21IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__41IH)));
-        ((__POINTER *)next__01IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__11IH)[ 0]=next__01IH;
-      } else {
-        next__01IH=((__POINTER *)result__21IH)[ 0];
-        if ((next__01IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__21IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__41IH <<  1)) <=  4096)) {
-            next__01IH=(void *)((unsigned long)result__21IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__41IH)));
-          } else {
-            next__01IH=new_lab__MRJ(lab_type__31IH);
-          };
-          ((__POINTER *)next__01IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__11IH)[ 0]=next__01IH;
-        } else {
-          ((__POINTER *)result__21IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__01IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__21IH=next__01IH;
-        };
-      };
-      ptr__KLK=result__21IH;
-    };
-    result__JLK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__KLK);
-    *(result__JLK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
-  };
-  Self__PLU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__JLK);
-  new_capacity__HFZ=prime_number_ceiling__X41( 193);
-  Self__PLU->buckets__M2T=create__VH5(new_capacity__HFZ);
-  Self__PLU->capacity__H2T=new_capacity__HFZ;
-  Self__PLU->count__MFZ= 0;
-  dico__STI=result__JLK;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__Y2T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__D3T=NULL;
-  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__L3T=NULL;
-  result__LWQ=NULL;
-  ptr__MWQ=((__POINTER )(NULL));
-  typ_id__RWQ= 0;
-  sz__OWQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-  if ((sz__OWQ ==  0)) {
-    result__LWQ=ITM_TYPE_PARAMETER__;
+    typ_id__MER=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__JER);
+    if ((typ_id__MER == (__INTEGER)(-  1))) {
+      a__CPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__JER + a__CPGH) & (__UINTEGER_32)(~ a__CPGH));
+      ptr_table__O2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__N2JH=((__POINTER )(NULL));
+      result__P2JH=((__POINTER *)ptr_table__O2JH)[ 0];
+      if ((result__P2JH == (void *)NULL)) {
+        result__P2JH=new_lab__URJ(new_size__DPGH);
+        next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPGH)));
+        ((__POINTER *)next__N2JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O2JH)[ 0]=next__N2JH;
+      } else {
+        next__N2JH=((__POINTER *)result__P2JH)[ 0];
+        if ((next__N2JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DPGH <<  1)) <=  4096)) {
+            next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPGH)));
+          } else {
+            next__N2JH=new_lab__URJ(new_size__DPGH);
+          };
+          ((__POINTER *)next__N2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__O2JH)[ 0]=next__N2JH;
+        } else {
+          ((__POINTER *)result__P2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__P2JH=next__N2JH;
+        };
+      };
+      ptr__HER=result__P2JH;
+    } else {
+      t__HPGH=((__UINTEGER_32 )typ_id__MER);
+      a__GPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__JER + a__GPGH) & (__UINTEGER_32)(~ a__GPGH));
+      ptr_table__T2JH=((__POINTER )(&(table_type[(t__HPGH)])));
+      lab_type__V2JH=(__UINTEGER_32)(t__HPGH |  1);
+      next__S2JH=((__POINTER )(NULL));
+      result__U2JH=((__POINTER *)ptr_table__T2JH)[ 0];
+      if ((result__U2JH == (void *)NULL)) {
+        result__U2JH=new_lab__URJ(lab_type__V2JH);
+        next__S2JH=(void *)((unsigned long)result__U2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2JH)));
+        ((__POINTER *)next__S2JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__T2JH)[ 0]=next__S2JH;
+      } else {
+        next__S2JH=((__POINTER *)result__U2JH)[ 0];
+        if ((next__S2JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__W2JH <<  1)) <=  4096)) {
+            next__S2JH=(void *)((unsigned long)result__U2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2JH)));
+          } else {
+            next__S2JH=new_lab__URJ(lab_type__V2JH);
+          };
+          ((__POINTER *)next__S2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T2JH)[ 0]=next__S2JH;
+        } else {
+          ((__POINTER *)result__U2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__U2JH=next__S2JH;
+        };
+      };
+      ptr__HER=result__U2JH;
+    };
+    result__GER=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__HER);
+    *(result__GER) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__RFW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__GER);
+  new_capacity__CJ1=prime_number_ceiling__541( 53);
+  Self__RFW->buckets__45V=create__D0BB(new_capacity__CJ1);
+  Self__RFW->capacity__Z5V=new_capacity__CJ1;
+  Self__RFW->count__NIW= 0;
+  bucket__EWP=result__GER;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__JSN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__1YP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__KSN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__KAW=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__WAW=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__4JP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__F2V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__Q2V=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__UJP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__WSQ=NULL;
+  ptr__XSQ=((__POINTER )(NULL));
+  typ_id__2SQ= 0;
+  sz__ZSQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__ZSQ ==  0)) {
+    result__WSQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    typ_id__RWQ=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OWQ);
-    if ((typ_id__RWQ == (__INTEGER)(-  1))) {
-      a__FVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GVDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWQ + a__FVDH) & (__UINTEGER_32)(~ a__FVDH));
-      ptr_table__A2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GVDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__51IH=((__POINTER )(NULL));
-      result__B2IH=((__POINTER *)ptr_table__A2IH)[ 0];
-      if ((result__B2IH == (void *)NULL)) {
-        result__B2IH=new_lab__MRJ(new_size__GVDH);
-        next__51IH=(void *)((unsigned long)result__B2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GVDH)));
-        ((__POINTER *)next__51IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__A2IH)[ 0]=next__51IH;
-      } else {
-        next__51IH=((__POINTER *)result__B2IH)[ 0];
-        if ((next__51IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GVDH <<  1)) <=  4096)) {
-            next__51IH=(void *)((unsigned long)result__B2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GVDH)));
-          } else {
-            next__51IH=new_lab__MRJ(new_size__GVDH);
-          };
-          ((__POINTER *)next__51IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__A2IH)[ 0]=next__51IH;
-        } else {
-          ((__POINTER *)result__B2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__B2IH=next__51IH;
-        };
-      };
-      ptr__MWQ=result__B2IH;
-    } else {
-      t__KVDH=((__UINTEGER_32 )typ_id__RWQ);
-      a__JVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__I2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWQ + a__JVDH) & (__UINTEGER_32)(~ a__JVDH));
-      ptr_table__F2IH=((__POINTER )(&(table_type[(t__KVDH)])));
-      lab_type__H2IH=(__UINTEGER_32)(t__KVDH |  1);
-      next__E2IH=((__POINTER )(NULL));
-      result__G2IH=((__POINTER *)ptr_table__F2IH)[ 0];
-      if ((result__G2IH == (void *)NULL)) {
-        result__G2IH=new_lab__MRJ(lab_type__H2IH);
-        next__E2IH=(void *)((unsigned long)result__G2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2IH)));
-        ((__POINTER *)next__E2IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__F2IH)[ 0]=next__E2IH;
-      } else {
-        next__E2IH=((__POINTER *)result__G2IH)[ 0];
-        if ((next__E2IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__I2IH <<  1)) <=  4096)) {
-            next__E2IH=(void *)((unsigned long)result__G2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2IH)));
-          } else {
-            next__E2IH=new_lab__MRJ(lab_type__H2IH);
-          };
-          ((__POINTER *)next__E2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__F2IH)[ 0]=next__E2IH;
-        } else {
-          ((__POINTER *)result__G2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__G2IH=next__E2IH;
-        };
-      };
-      ptr__MWQ=result__G2IH;
-    };
-    result__LWQ=((__ITM_TYPE_PARAMETER *)ptr__MWQ);
-    *(result__LWQ) = *(ITM_TYPE_PARAMETER__);
-  };
-  Self__L3V=((__ITM_TYPE_PARAMETER *)result__LWQ);
-  Self__L3V->parent_itm_type__3DE.name__KYP=(&__string_1);
-  fast_put__to__TOZ(result__JLK,Self__L3V,(&__string_1));
-  type_self__HUN=result__LWQ;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__POR= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__1LW= 0;
-  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__GMW=NULL;
-  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__FOR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
-  result__HVR=NULL;
-  ptr__IVR=((__POINTER )(NULL));
-  typ_id__NVR= 0;
-  sz__KVR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
-  if ((sz__KVR ==  0)) {
-    result__HVR=FAST_ARRAYoITM_TYPE_STYLEo__;
+    typ_id__2SQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ZSQ);
+    if ((typ_id__2SQ == (__INTEGER)(-  1))) {
+      a__KPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSQ + a__KPGH) & (__UINTEGER_32)(~ a__KPGH));
+      ptr_table__Y2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__X2JH=((__POINTER )(NULL));
+      result__Z2JH=((__POINTER *)ptr_table__Y2JH)[ 0];
+      if ((result__Z2JH == (void *)NULL)) {
+        result__Z2JH=new_lab__URJ(new_size__LPGH);
+        next__X2JH=(void *)((unsigned long)result__Z2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPGH)));
+        ((__POINTER *)next__X2JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Y2JH)[ 0]=next__X2JH;
+      } else {
+        next__X2JH=((__POINTER *)result__Z2JH)[ 0];
+        if ((next__X2JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z2JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LPGH <<  1)) <=  4096)) {
+            next__X2JH=(void *)((unsigned long)result__Z2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPGH)));
+          } else {
+            next__X2JH=new_lab__URJ(new_size__LPGH);
+          };
+          ((__POINTER *)next__X2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Y2JH)[ 0]=next__X2JH;
+        } else {
+          ((__POINTER *)result__Z2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Z2JH=next__X2JH;
+        };
+      };
+      ptr__XSQ=result__Z2JH;
+    } else {
+      t__PPGH=((__UINTEGER_32 )typ_id__2SQ);
+      a__OPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__A3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSQ + a__OPGH) & (__UINTEGER_32)(~ a__OPGH));
+      ptr_table__32JH=((__POINTER )(&(table_type[(t__PPGH)])));
+      lab_type__52JH=(__UINTEGER_32)(t__PPGH |  1);
+      next__22JH=((__POINTER )(NULL));
+      result__42JH=((__POINTER *)ptr_table__32JH)[ 0];
+      if ((result__42JH == (void *)NULL)) {
+        result__42JH=new_lab__URJ(lab_type__52JH);
+        next__22JH=(void *)((unsigned long)result__42JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3JH)));
+        ((__POINTER *)next__22JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__32JH)[ 0]=next__22JH;
+      } else {
+        next__22JH=((__POINTER *)result__42JH)[ 0];
+        if ((next__22JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__42JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__A3JH <<  1)) <=  4096)) {
+            next__22JH=(void *)((unsigned long)result__42JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3JH)));
+          } else {
+            next__22JH=new_lab__URJ(lab_type__52JH);
+          };
+          ((__POINTER *)next__22JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__32JH)[ 0]=next__22JH;
+        } else {
+          ((__POINTER *)result__42JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__22JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__42JH=next__22JH;
+        };
+      };
+      ptr__XSQ=result__42JH;
+    };
+    result__WSQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__XSQ);
+    *(result__WSQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__21V=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__WSQ);
+  if ((Self__21V->parent_arrayed_collection__UJP.capacity__F2V <  32)) {
+    Self__21V->parent_arrayed_collection__UJP.storage__Q2V=create__3LXB( 32);
+    Self__21V->parent_arrayed_collection__UJP.capacity__F2V= 32;
+  };
+  Self__21V->parent_arrayed_collection__UJP.upper__4JP=(__INTEGER)(-  1);
+  dico__VJP=result__WSQ;
+  ITM_TYPE_MULTI__->list_type__IKP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__4MN=NULL;
+  ITM_TYPE_GENERIC__->list_type__FZP=NULL;
+  ITM_TYPE_BLOCK__->type_result__INN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__QMN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__OKV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__ZKV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__GMN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__20O=NULL;
+  ptr__30O=((__POINTER )(NULL));
+  typ_id__C1O= 0;
+  sz__50O=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__50O ==  0)) {
+    result__20O=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    typ_id__NVR=__FAST_ARRAYoITM_TYPE_STYLEo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KVR);
-    if ((typ_id__NVR == (__INTEGER)(-  1))) {
-      a__0OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1OFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVR + a__0OFH) & (__UINTEGER_32)(~ a__0OFH));
-      ptr_table__K2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1OFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__J2IH=((__POINTER )(NULL));
-      result__L2IH=((__POINTER *)ptr_table__K2IH)[ 0];
-      if ((result__L2IH == (void *)NULL)) {
-        result__L2IH=new_lab__MRJ(new_size__1OFH);
-        next__J2IH=(void *)((unsigned long)result__L2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OFH)));
-        ((__POINTER *)next__J2IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__K2IH)[ 0]=next__J2IH;
-      } else {
-        next__J2IH=((__POINTER *)result__L2IH)[ 0];
-        if ((next__J2IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1OFH <<  1)) <=  4096)) {
-            next__J2IH=(void *)((unsigned long)result__L2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OFH)));
-          } else {
-            next__J2IH=new_lab__MRJ(new_size__1OFH);
-          };
-          ((__POINTER *)next__J2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__K2IH)[ 0]=next__J2IH;
-        } else {
-          ((__POINTER *)result__L2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__L2IH=next__J2IH;
-        };
-      };
-      ptr__IVR=result__L2IH;
-    } else {
-      t__5OFH=((__UINTEGER_32 )typ_id__NVR);
-      a__4OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__S2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__KVR + a__4OFH) & (__UINTEGER_32)(~ a__4OFH));
-      ptr_table__P2IH=((__POINTER )(&(table_type[(t__5OFH)])));
-      lab_type__R2IH=(__UINTEGER_32)(t__5OFH |  1);
-      next__O2IH=((__POINTER )(NULL));
-      result__Q2IH=((__POINTER *)ptr_table__P2IH)[ 0];
-      if ((result__Q2IH == (void *)NULL)) {
-        result__Q2IH=new_lab__MRJ(lab_type__R2IH);
-        next__O2IH=(void *)((unsigned long)result__Q2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2IH)));
-        ((__POINTER *)next__O2IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__P2IH)[ 0]=next__O2IH;
-      } else {
-        next__O2IH=((__POINTER *)result__Q2IH)[ 0];
-        if ((next__O2IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__S2IH <<  1)) <=  4096)) {
-            next__O2IH=(void *)((unsigned long)result__Q2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2IH)));
-          } else {
-            next__O2IH=new_lab__MRJ(lab_type__R2IH);
-          };
-          ((__POINTER *)next__O2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__P2IH)[ 0]=next__O2IH;
-        } else {
-          ((__POINTER *)result__Q2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__Q2IH=next__O2IH;
-        };
-      };
-      ptr__IVR=result__Q2IH;
-    };
-    result__HVR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__IVR);
-    *(result__HVR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
-  };
-  Self__SLW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__HVR);
-  if ((Self__SLW->parent_arrayed_collection__FOR.capacity__1LW <  32)) {
-    Self__SLW->parent_arrayed_collection__FOR.storage__GMW=create__1HYB( 32);
-    Self__SLW->parent_arrayed_collection__FOR.capacity__1LW= 32;
-  };
-  Self__SLW->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(-  1);
-  dico__GOR=result__HVR;
-  type_null__5UN=get__DTI((&__string_2));
-  ITM_LIST__->parent_itm_code__K5E=(*ITM_CODE__);
-  last_group__1TF=NULL;
-  old_position__DRI= 0;
-  old_pos_cur__FRI= 0;
-  old_pos_line__HRI= 0;
-  old_pos_col__JRI= 0;
-  old_short_derive__LRI= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__J1T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__2IU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__HJU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__URI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
-  ARRAYED_COLLECTIONoITM_LOCALo__->upper__10K= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__XKU= 0;
-  ARRAYED_COLLECTIONoITM_LOCALo__->storage__CLU=NULL;
-  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__E1H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
-  result__GIK=NULL;
-  ptr__HIK=((__POINTER )(NULL));
-  typ_id__MIK= 0;
-  sz__JIK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
-  if ((sz__JIK ==  0)) {
-    result__GIK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    typ_id__C1O=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__50O);
+    if ((typ_id__C1O == (__INTEGER)(-  1))) {
+      a__SPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__50O + a__SPGH) & (__UINTEGER_32)(~ a__SPGH));
+      ptr_table__C3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__B3JH=((__POINTER )(NULL));
+      result__D3JH=((__POINTER *)ptr_table__C3JH)[ 0];
+      if ((result__D3JH == (void *)NULL)) {
+        result__D3JH=new_lab__URJ(new_size__TPGH);
+        next__B3JH=(void *)((unsigned long)result__D3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPGH)));
+        ((__POINTER *)next__B3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__C3JH)[ 0]=next__B3JH;
+      } else {
+        next__B3JH=((__POINTER *)result__D3JH)[ 0];
+        if ((next__B3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D3JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TPGH <<  1)) <=  4096)) {
+            next__B3JH=(void *)((unsigned long)result__D3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPGH)));
+          } else {
+            next__B3JH=new_lab__URJ(new_size__TPGH);
+          };
+          ((__POINTER *)next__B3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__C3JH)[ 0]=next__B3JH;
+        } else {
+          ((__POINTER *)result__D3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__D3JH=next__B3JH;
+        };
+      };
+      ptr__30O=result__D3JH;
+    } else {
+      t__XPGH=((__UINTEGER_32 )typ_id__C1O);
+      a__WPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__K3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__50O + a__WPGH) & (__UINTEGER_32)(~ a__WPGH));
+      ptr_table__H3JH=((__POINTER )(&(table_type[(t__XPGH)])));
+      lab_type__J3JH=(__UINTEGER_32)(t__XPGH |  1);
+      next__G3JH=((__POINTER )(NULL));
+      result__I3JH=((__POINTER *)ptr_table__H3JH)[ 0];
+      if ((result__I3JH == (void *)NULL)) {
+        result__I3JH=new_lab__URJ(lab_type__J3JH);
+        next__G3JH=(void *)((unsigned long)result__I3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3JH)));
+        ((__POINTER *)next__G3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__H3JH)[ 0]=next__G3JH;
+      } else {
+        next__G3JH=((__POINTER *)result__I3JH)[ 0];
+        if ((next__G3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I3JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__K3JH <<  1)) <=  4096)) {
+            next__G3JH=(void *)((unsigned long)result__I3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3JH)));
+          } else {
+            next__G3JH=new_lab__URJ(lab_type__J3JH);
+          };
+          ((__POINTER *)next__G3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__H3JH)[ 0]=next__G3JH;
+        } else {
+          ((__POINTER *)result__I3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__I3JH=next__G3JH;
+        };
+      };
+      ptr__30O=result__I3JH;
+    };
+    result__20O=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__30O);
+    *(result__20O) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__FKV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__20O);
+  if ((Self__FKV->parent_arrayed_collection__GMN.capacity__OKV <  32)) {
+    Self__FKV->parent_arrayed_collection__GMN.storage__ZKV=create__YUWB( 32);
+    Self__FKV->parent_arrayed_collection__GMN.capacity__OKV= 32;
+  };
+  Self__FKV->parent_arrayed_collection__GMN.upper__QMN=(__INTEGER)(-  1);
+  dico__HMN=result__20O;
+  ITM_CODE__->parent_itm_object__5DE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__DWF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__NRO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__5RO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__RSO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__CTO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__IYP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__1BW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__GCW=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__4XP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__D3Q=NULL;
+  ptr__E3Q=((__POINTER )(NULL));
+  typ_id__J3Q= 0;
+  sz__G3Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__G3Q ==  0)) {
+    result__D3Q=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    typ_id__MIK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JIK);
-    if ((typ_id__MIK == (__INTEGER)(-  1))) {
-      a__CPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIK + a__CPFH) & (__UINTEGER_32)(~ a__CPFH));
-      ptr_table__U2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DPFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__T2IH=((__POINTER )(NULL));
-      result__V2IH=((__POINTER *)ptr_table__U2IH)[ 0];
-      if ((result__V2IH == (void *)NULL)) {
-        result__V2IH=new_lab__MRJ(new_size__DPFH);
-        next__T2IH=(void *)((unsigned long)result__V2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPFH)));
-        ((__POINTER *)next__T2IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__U2IH)[ 0]=next__T2IH;
-      } else {
-        next__T2IH=((__POINTER *)result__V2IH)[ 0];
-        if ((next__T2IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V2IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DPFH <<  1)) <=  4096)) {
-            next__T2IH=(void *)((unsigned long)result__V2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPFH)));
-          } else {
-            next__T2IH=new_lab__MRJ(new_size__DPFH);
-          };
-          ((__POINTER *)next__T2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__U2IH)[ 0]=next__T2IH;
-        } else {
-          ((__POINTER *)result__V2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__V2IH=next__T2IH;
-        };
-      };
-      ptr__HIK=result__V2IH;
-    } else {
-      t__HPFH=((__UINTEGER_32 )typ_id__MIK);
-      a__GPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__22IH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIK + a__GPFH) & (__UINTEGER_32)(~ a__GPFH));
-      ptr_table__Z2IH=((__POINTER )(&(table_type[(t__HPFH)])));
-      lab_type__12IH=(__UINTEGER_32)(t__HPFH |  1);
-      next__Y2IH=((__POINTER )(NULL));
-      result__02IH=((__POINTER *)ptr_table__Z2IH)[ 0];
-      if ((result__02IH == (void *)NULL)) {
-        result__02IH=new_lab__MRJ(lab_type__12IH);
-        next__Y2IH=(void *)((unsigned long)result__02IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22IH)));
-        ((__POINTER *)next__Y2IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Z2IH)[ 0]=next__Y2IH;
-      } else {
-        next__Y2IH=((__POINTER *)result__02IH)[ 0];
-        if ((next__Y2IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__02IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__22IH <<  1)) <=  4096)) {
-            next__Y2IH=(void *)((unsigned long)result__02IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22IH)));
-          } else {
-            next__Y2IH=new_lab__MRJ(lab_type__12IH);
-          };
-          ((__POINTER *)next__Y2IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Z2IH)[ 0]=next__Y2IH;
-        } else {
-          ((__POINTER *)result__02IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__02IH=next__Y2IH;
-        };
-      };
-      ptr__HIK=result__02IH;
-    };
-    result__GIK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__HIK);
-    *(result__GIK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
-  };
-  Self__TIU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__GIK);
-  if ((Self__TIU->parent_arrayed_collection__URI.capacity__2IU <  5)) {
-    Self__TIU->parent_arrayed_collection__URI.storage__HJU=create__EHQB( 5);
-    Self__TIU->parent_arrayed_collection__URI.capacity__2IU= 5;
-  };
-  Self__TIU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(-  1);
-  free_list__VRI=result__GIK;
-  ITM_LOCAL__->parent_itm_object__50H=(*ITM_OBJECT__);
-  ITM_LOCAL__->name__42K=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->item__1EV=NULL;
-  HASHED_SET_NODEoSTRING_CONSTANTo__->next__GFV=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__IWT= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__05T= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__WAU=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__A4H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
-  ARRAYED_COLLECTIONoITM_CODEo__->upper__2HL= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->capacity__0XT= 0;
-  ARRAYED_COLLECTIONoITM_CODEo__->storage__FYT=NULL;
-  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__RTF=(*ARRAYED_COLLECTIONoITM_CODEo__);
-  result__P4J=NULL;
-  ptr__Q4J=((__POINTER )(NULL));
-  typ_id__V4J= 0;
-  sz__S4J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
-  if ((sz__S4J ==  0)) {
-    result__P4J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    typ_id__J3Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__G3Q);
+    if ((typ_id__J3Q == (__INTEGER)(-  1))) {
+      a__0PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1PGH=(__UINTEGER_32)((__UINTEGER_32)(sz__G3Q + a__0PGH) & (__UINTEGER_32)(~ a__0PGH));
+      ptr_table__M3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__L3JH=((__POINTER )(NULL));
+      result__N3JH=((__POINTER *)ptr_table__M3JH)[ 0];
+      if ((result__N3JH == (void *)NULL)) {
+        result__N3JH=new_lab__URJ(new_size__1PGH);
+        next__L3JH=(void *)((unsigned long)result__N3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PGH)));
+        ((__POINTER *)next__L3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__M3JH)[ 0]=next__L3JH;
+      } else {
+        next__L3JH=((__POINTER *)result__N3JH)[ 0];
+        if ((next__L3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N3JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1PGH <<  1)) <=  4096)) {
+            next__L3JH=(void *)((unsigned long)result__N3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PGH)));
+          } else {
+            next__L3JH=new_lab__URJ(new_size__1PGH);
+          };
+          ((__POINTER *)next__L3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__M3JH)[ 0]=next__L3JH;
+        } else {
+          ((__POINTER *)result__N3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__N3JH=next__L3JH;
+        };
+      };
+      ptr__E3Q=result__N3JH;
+    } else {
+      t__5PGH=((__UINTEGER_32 )typ_id__J3Q);
+      a__4PGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__U3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__G3Q + a__4PGH) & (__UINTEGER_32)(~ a__4PGH));
+      ptr_table__R3JH=((__POINTER )(&(table_type[(t__5PGH)])));
+      lab_type__T3JH=(__UINTEGER_32)(t__5PGH |  1);
+      next__Q3JH=((__POINTER )(NULL));
+      result__S3JH=((__POINTER *)ptr_table__R3JH)[ 0];
+      if ((result__S3JH == (void *)NULL)) {
+        result__S3JH=new_lab__URJ(lab_type__T3JH);
+        next__Q3JH=(void *)((unsigned long)result__S3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U3JH)));
+        ((__POINTER *)next__Q3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__R3JH)[ 0]=next__Q3JH;
+      } else {
+        next__Q3JH=((__POINTER *)result__S3JH)[ 0];
+        if ((next__Q3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S3JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__U3JH <<  1)) <=  4096)) {
+            next__Q3JH=(void *)((unsigned long)result__S3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U3JH)));
+          } else {
+            next__Q3JH=new_lab__URJ(lab_type__T3JH);
+          };
+          ((__POINTER *)next__Q3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__R3JH)[ 0]=next__Q3JH;
+        } else {
+          ((__POINTER *)result__S3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__S3JH=next__Q3JH;
+        };
+      };
+      ptr__E3Q=result__S3JH;
+    };
+    result__D3Q=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__E3Q);
+    *(result__D3Q) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__SBW=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__D3Q);
+  if ((Self__SBW->parent_arrayed_collection__4XP.capacity__1BW <  32)) {
+    Self__SBW->parent_arrayed_collection__4XP.storage__GCW=create__XSXB( 32);
+    Self__SBW->parent_arrayed_collection__4XP.capacity__1BW= 32;
+  };
+  Self__SBW->parent_arrayed_collection__4XP.upper__IYP=(__INTEGER)(-  1);
+  dico__5XP=result__D3Q;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__U2T=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__P2T= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__UFZ= 0;
+  result__RLK=NULL;
+  ptr__SLK=((__POINTER )(NULL));
+  typ_id__XLK= 0;
+  sz__ULK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__ULK ==  0)) {
+    result__RLK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    typ_id__V4J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__S4J);
-    if ((typ_id__V4J == (__INTEGER)(-  1))) {
-      a__KPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__S4J + a__KPFH) & (__UINTEGER_32)(~ a__KPFH));
-      ptr_table__42IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LPFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__32IH=((__POINTER )(NULL));
-      result__52IH=((__POINTER *)ptr_table__42IH)[ 0];
-      if ((result__52IH == (void *)NULL)) {
-        result__52IH=new_lab__MRJ(new_size__LPFH);
-        next__32IH=(void *)((unsigned long)result__52IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPFH)));
-        ((__POINTER *)next__32IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__42IH)[ 0]=next__32IH;
-      } else {
-        next__32IH=((__POINTER *)result__52IH)[ 0];
-        if ((next__32IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__52IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LPFH <<  1)) <=  4096)) {
-            next__32IH=(void *)((unsigned long)result__52IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPFH)));
-          } else {
-            next__32IH=new_lab__MRJ(new_size__LPFH);
-          };
-          ((__POINTER *)next__32IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__42IH)[ 0]=next__32IH;
-        } else {
-          ((__POINTER *)result__52IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__32IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__52IH=next__32IH;
-        };
-      };
-      ptr__Q4J=result__52IH;
-    } else {
-      t__PPFH=((__UINTEGER_32 )typ_id__V4J);
-      a__OPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__G3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__S4J + a__OPFH) & (__UINTEGER_32)(~ a__OPFH));
-      ptr_table__D3IH=((__POINTER )(&(table_type[(t__PPFH)])));
-      lab_type__F3IH=(__UINTEGER_32)(t__PPFH |  1);
-      next__C3IH=((__POINTER )(NULL));
-      result__E3IH=((__POINTER *)ptr_table__D3IH)[ 0];
-      if ((result__E3IH == (void *)NULL)) {
-        result__E3IH=new_lab__MRJ(lab_type__F3IH);
-        next__C3IH=(void *)((unsigned long)result__E3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3IH)));
-        ((__POINTER *)next__C3IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__D3IH)[ 0]=next__C3IH;
-      } else {
-        next__C3IH=((__POINTER *)result__E3IH)[ 0];
-        if ((next__C3IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G3IH <<  1)) <=  4096)) {
-            next__C3IH=(void *)((unsigned long)result__E3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3IH)));
-          } else {
-            next__C3IH=new_lab__MRJ(lab_type__F3IH);
-          };
-          ((__POINTER *)next__C3IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__D3IH)[ 0]=next__C3IH;
-        } else {
-          ((__POINTER *)result__E3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__E3IH=next__C3IH;
-        };
-      };
-      ptr__Q4J=result__E3IH;
-    };
-    result__P4J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__Q4J);
-    *(result__P4J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
-  };
-  Self__IFU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__P4J);
-  if ((Self__IFU->parent_arrayed_collection__A4H.capacity__05T <  5)) {
-    Self__IFU->parent_arrayed_collection__A4H.storage__WAU=create__U1PB( 5);
-    Self__IFU->parent_arrayed_collection__A4H.capacity__05T= 5;
-  };
-  Self__IFU->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(-  1);
-  free_list__B4H=result__P4J;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__0SU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__5UU= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__KVU=NULL;
-  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__J5K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__15OD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__WBPD= 0;
-  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__RCPD=NULL;
-  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__H5I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
-  result__FLM=NULL;
-  ptr__GLM=((__POINTER )(NULL));
-  typ_id__LLM= 0;
-  sz__ILM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__ILM ==  0)) {
-    result__FLM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
-  } else {
-    typ_id__LLM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ILM);
-    if ((typ_id__LLM == (__INTEGER)(-  1))) {
-      a__SPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILM + a__SPFH) & (__UINTEGER_32)(~ a__SPFH));
-      ptr_table__I3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TPFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__H3IH=((__POINTER )(NULL));
-      result__J3IH=((__POINTER *)ptr_table__I3IH)[ 0];
-      if ((result__J3IH == (void *)NULL)) {
-        result__J3IH=new_lab__MRJ(new_size__TPFH);
-        next__H3IH=(void *)((unsigned long)result__J3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPFH)));
-        ((__POINTER *)next__H3IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__I3IH)[ 0]=next__H3IH;
-      } else {
-        next__H3IH=((__POINTER *)result__J3IH)[ 0];
-        if ((next__H3IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TPFH <<  1)) <=  4096)) {
-            next__H3IH=(void *)((unsigned long)result__J3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TPFH)));
-          } else {
-            next__H3IH=new_lab__MRJ(new_size__TPFH);
-          };
-          ((__POINTER *)next__H3IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__I3IH)[ 0]=next__H3IH;
-        } else {
-          ((__POINTER *)result__J3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__J3IH=next__H3IH;
-        };
-      };
-      ptr__GLM=result__J3IH;
-    } else {
-      t__XPFH=((__UINTEGER_32 )typ_id__LLM);
-      a__WPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__Q3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILM + a__WPFH) & (__UINTEGER_32)(~ a__WPFH));
-      ptr_table__N3IH=((__POINTER )(&(table_type[(t__XPFH)])));
-      lab_type__P3IH=(__UINTEGER_32)(t__XPFH |  1);
-      next__M3IH=((__POINTER )(NULL));
-      result__O3IH=((__POINTER *)ptr_table__N3IH)[ 0];
-      if ((result__O3IH == (void *)NULL)) {
-        result__O3IH=new_lab__MRJ(lab_type__P3IH);
-        next__M3IH=(void *)((unsigned long)result__O3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q3IH)));
-        ((__POINTER *)next__M3IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__N3IH)[ 0]=next__M3IH;
-      } else {
-        next__M3IH=((__POINTER *)result__O3IH)[ 0];
-        if ((next__M3IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q3IH <<  1)) <=  4096)) {
-            next__M3IH=(void *)((unsigned long)result__O3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q3IH)));
-          } else {
-            next__M3IH=new_lab__MRJ(lab_type__P3IH);
-          };
-          ((__POINTER *)next__M3IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__N3IH)[ 0]=next__M3IH;
-        } else {
-          ((__POINTER *)result__O3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__O3IH=next__M3IH;
-        };
-      };
-      ptr__GLM=result__O3IH;
-    };
-    result__FLM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__GLM);
-    *(result__FLM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__WUU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__FLM);
-  if ((Self__WUU->parent_arrayed_collection__J5K.capacity__5UU <  5)) {
-    Self__WUU->parent_arrayed_collection__J5K.storage__KVU=create__53ZB( 5);
-    Self__WUU->parent_arrayed_collection__J5K.capacity__5UU= 5;
-  };
-  Self__WUU->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(-  1);
-  free_list__K5K=result__FLM;
-  ITM_LIST_IDF__->parent_itm_code__WCJ=(*ITM_CODE__);
-  ITM_LDOTS__->parent_itm_constant__QUF=(*ITM_CODE__);
-  ITM_PROTOTYPE__->parent_itm_constant__2VF=(*ITM_CONSTANT__);
-  ITM_WRITE__->parent_itm_code__LDJ=(*ITM_CODE__);
-  ITM_WRITE_VALUE__->parent_itm_write__MDJ=(*ITM_WRITE__);
-  ITM_WRITE_CAST__->parent_itm_write__DEJ=(*ITM_WRITE__);
-  ITM_READ__->parent_itm_code__QGJ=(*ITM_CODE__);
-  ITM_WRITE_CODE__->parent_itm_write__OHJ=(*ITM_WRITE__);
-  ITM_OPERATOR__->parent_itm_code__EFL=(*ITM_CODE__);
-  ITM_READ_ARG1__->parent_itm_read__KIL=(*ITM_READ__);
-  ITM_READ_ARG2__->parent_itm_read__XKL=(*ITM_READ__);
-  ITM_EXPRESSION__->value_list__1JV=NULL;
-  ITM_OLD__->parent_itm_code__N2L=(*ITM_CODE__);
-  ITM_EXTERN__->parent_itm_code__O4M=(*ITM_CODE__);
-  ITM_EXTERNAL_TYPE__->parent_itm_extern__P4M=(*ITM_EXTERN__);
-  ITM_BLOCK__->list__ANDC=NULL;
-  ITM_EXTERNAL__->parent_itm_extern__UFN=(*ITM_EXTERN__);
-  ITM_READ_ARGS__->parent_itm_read__KDO=(*ITM_READ__);
-  ITM_RESULT__->value__MLFC=NULL;
-  ITM_OPERATOR__->name__PIL=NULL;
-  ITM_ARGUMENT__->parent_itm_code__S4M=(*ITM_OBJECT__);
-  ITM_ARG__->parent_itm_argument__ZHHB=(*ITM_ARGUMENT__);
-  ITM_ARG__->name__10HC=NULL;
-  ITM_ARG__->type__20HC=NULL;
-  empty_list__GNLF=create_with_capacity__BHRC( 0);
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__FJPF=NULL;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__AJPF= 0;
-  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__XNPF= 0;
-  result__PHNF=NULL;
-  ptr__QHNF=((__POINTER )(NULL));
-  typ_id__VHNF= 0;
-  sz__SHNF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
-  if ((sz__SHNF ==  0)) {
-    result__PHNF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    typ_id__XLK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ULK);
+    if ((typ_id__XLK == (__INTEGER)(-  1))) {
+      a__CQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ULK + a__CQGH) & (__UINTEGER_32)(~ a__CQGH));
+      ptr_table__W3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__V3JH=((__POINTER )(NULL));
+      result__X3JH=((__POINTER *)ptr_table__W3JH)[ 0];
+      if ((result__X3JH == (void *)NULL)) {
+        result__X3JH=new_lab__URJ(new_size__DQGH);
+        next__V3JH=(void *)((unsigned long)result__X3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQGH)));
+        ((__POINTER *)next__V3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__W3JH)[ 0]=next__V3JH;
+      } else {
+        next__V3JH=((__POINTER *)result__X3JH)[ 0];
+        if ((next__V3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X3JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DQGH <<  1)) <=  4096)) {
+            next__V3JH=(void *)((unsigned long)result__X3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQGH)));
+          } else {
+            next__V3JH=new_lab__URJ(new_size__DQGH);
+          };
+          ((__POINTER *)next__V3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__W3JH)[ 0]=next__V3JH;
+        } else {
+          ((__POINTER *)result__X3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__X3JH=next__V3JH;
+        };
+      };
+      ptr__SLK=result__X3JH;
+    } else {
+      t__HQGH=((__UINTEGER_32 )typ_id__XLK);
+      a__GQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__43JH=(__UINTEGER_32)((__UINTEGER_32)(sz__ULK + a__GQGH) & (__UINTEGER_32)(~ a__GQGH));
+      ptr_table__13JH=((__POINTER )(&(table_type[(t__HQGH)])));
+      lab_type__33JH=(__UINTEGER_32)(t__HQGH |  1);
+      next__03JH=((__POINTER )(NULL));
+      result__23JH=((__POINTER *)ptr_table__13JH)[ 0];
+      if ((result__23JH == (void *)NULL)) {
+        result__23JH=new_lab__URJ(lab_type__33JH);
+        next__03JH=(void *)((unsigned long)result__23JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43JH)));
+        ((__POINTER *)next__03JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__13JH)[ 0]=next__03JH;
+      } else {
+        next__03JH=((__POINTER *)result__23JH)[ 0];
+        if ((next__03JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__23JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__43JH <<  1)) <=  4096)) {
+            next__03JH=(void *)((unsigned long)result__23JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43JH)));
+          } else {
+            next__03JH=new_lab__URJ(lab_type__33JH);
+          };
+          ((__POINTER *)next__03JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__13JH)[ 0]=next__03JH;
+        } else {
+          ((__POINTER *)result__23JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__03JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__23JH=next__03JH;
+        };
+      };
+      ptr__SLK=result__23JH;
+    };
+    result__RLK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__SLK);
+    *(result__RLK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__XLU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__RLK);
+  new_capacity__PFZ=prime_number_ceiling__541( 193);
+  Self__XLU->buckets__U2T=create__3H5(new_capacity__PFZ);
+  Self__XLU->capacity__P2T=new_capacity__PFZ;
+  Self__XLU->count__UFZ= 0;
+  dico__0TI=result__RLK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__A3T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__L3T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__T3T=NULL;
+  result__TWQ=NULL;
+  ptr__UWQ=((__POINTER )(NULL));
+  typ_id__ZWQ= 0;
+  sz__WWQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__WWQ ==  0)) {
+    result__TWQ=ITM_TYPE_PARAMETER__;
   } else {
-    typ_id__VHNF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SHNF);
-    if ((typ_id__VHNF == (__INTEGER)(-  1))) {
-      a__0PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1PFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SHNF + a__0PFH) & (__UINTEGER_32)(~ a__0PFH));
-      ptr_table__S3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__R3IH=((__POINTER )(NULL));
-      result__T3IH=((__POINTER *)ptr_table__S3IH)[ 0];
-      if ((result__T3IH == (void *)NULL)) {
-        result__T3IH=new_lab__MRJ(new_size__1PFH);
-        next__R3IH=(void *)((unsigned long)result__T3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
-        ((__POINTER *)next__R3IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__S3IH)[ 0]=next__R3IH;
-      } else {
-        next__R3IH=((__POINTER *)result__T3IH)[ 0];
-        if ((next__R3IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1PFH <<  1)) <=  4096)) {
-            next__R3IH=(void *)((unsigned long)result__T3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
-          } else {
-            next__R3IH=new_lab__MRJ(new_size__1PFH);
-          };
-          ((__POINTER *)next__R3IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__S3IH)[ 0]=next__R3IH;
-        } else {
-          ((__POINTER *)result__T3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__T3IH=next__R3IH;
-        };
-      };
-      ptr__QHNF=result__T3IH;
-    } else {
-      t__5PFH=((__UINTEGER_32 )typ_id__VHNF);
-      a__4PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__03IH=(__UINTEGER_32)((__UINTEGER_32)(sz__SHNF + a__4PFH) & (__UINTEGER_32)(~ a__4PFH));
-      ptr_table__X3IH=((__POINTER )(&(table_type[(t__5PFH)])));
-      lab_type__Z3IH=(__UINTEGER_32)(t__5PFH |  1);
-      next__W3IH=((__POINTER )(NULL));
-      result__Y3IH=((__POINTER *)ptr_table__X3IH)[ 0];
-      if ((result__Y3IH == (void *)NULL)) {
-        result__Y3IH=new_lab__MRJ(lab_type__Z3IH);
-        next__W3IH=(void *)((unsigned long)result__Y3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03IH)));
-        ((__POINTER *)next__W3IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__X3IH)[ 0]=next__W3IH;
-      } else {
-        next__W3IH=((__POINTER *)result__Y3IH)[ 0];
-        if ((next__W3IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y3IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__03IH <<  1)) <=  4096)) {
-            next__W3IH=(void *)((unsigned long)result__Y3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03IH)));
-          } else {
-            next__W3IH=new_lab__MRJ(lab_type__Z3IH);
-          };
-          ((__POINTER *)next__W3IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__X3IH)[ 0]=next__W3IH;
-        } else {
-          ((__POINTER *)result__Y3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__Y3IH=next__W3IH;
-        };
-      };
-      ptr__QHNF=result__Y3IH;
-    };
-    result__PHNF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__QHNF);
-    *(result__PHNF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
-  };
-  Self__XLPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__PHNF);
-  new_capacity__IYQF=prime_number_ceiling__X41( 53);
-  Self__XLPF->buckets__FJPF=create__ZKTF(new_capacity__IYQF);
-  Self__XLPF->capacity__AJPF=new_capacity__IYQF;
-  Self__XLPF->count__XNPF= 0;
-  bucket__QNLF=result__PHNF;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__RJPF=NULL;
-  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__3JPF=NULL;
-  ITM_ARGS__->parent_itm_argument__DDFE=(*ITM_ARGUMENT__);
-  ITM_ARGS__->name__LBPF=NULL;
-  ITM_ARGS__->type__MBPF=NULL;
-  ITM_EXTERNAL_TYPE__->is_persistant__MHN=FALSE__;
-  result__B4F=NULL;
-  ptr__C4F=((__POINTER )(NULL));
-  typ_id__H4F= 0;
-  sz__E4F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
-  if ((sz__E4F ==  0)) {
-    result__B4F=FAST_ARRAYoSTRINGo__;
+    typ_id__ZWQ=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WWQ);
+    if ((typ_id__ZWQ == (__INTEGER)(-  1))) {
+      a__3VEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4VEH=(__UINTEGER_32)((__UINTEGER_32)(sz__WWQ + a__3VEH) & (__UINTEGER_32)(~ a__3VEH));
+      ptr_table__A4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4VEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__53JH=((__POINTER )(NULL));
+      result__B4JH=((__POINTER *)ptr_table__A4JH)[ 0];
+      if ((result__B4JH == (void *)NULL)) {
+        result__B4JH=new_lab__URJ(new_size__4VEH);
+        next__53JH=(void *)((unsigned long)result__B4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4VEH)));
+        ((__POINTER *)next__53JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__A4JH)[ 0]=next__53JH;
+      } else {
+        next__53JH=((__POINTER *)result__B4JH)[ 0];
+        if ((next__53JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B4JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4VEH <<  1)) <=  4096)) {
+            next__53JH=(void *)((unsigned long)result__B4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4VEH)));
+          } else {
+            next__53JH=new_lab__URJ(new_size__4VEH);
+          };
+          ((__POINTER *)next__53JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__A4JH)[ 0]=next__53JH;
+        } else {
+          ((__POINTER *)result__B4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__53JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__B4JH=next__53JH;
+        };
+      };
+      ptr__UWQ=result__B4JH;
+    } else {
+      t__CWEH=((__UINTEGER_32 )typ_id__ZWQ);
+      a__BWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__I4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__WWQ + a__BWEH) & (__UINTEGER_32)(~ a__BWEH));
+      ptr_table__F4JH=((__POINTER )(&(table_type[(t__CWEH)])));
+      lab_type__H4JH=(__UINTEGER_32)(t__CWEH |  1);
+      next__E4JH=((__POINTER )(NULL));
+      result__G4JH=((__POINTER *)ptr_table__F4JH)[ 0];
+      if ((result__G4JH == (void *)NULL)) {
+        result__G4JH=new_lab__URJ(lab_type__H4JH);
+        next__E4JH=(void *)((unsigned long)result__G4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I4JH)));
+        ((__POINTER *)next__E4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F4JH)[ 0]=next__E4JH;
+      } else {
+        next__E4JH=((__POINTER *)result__G4JH)[ 0];
+        if ((next__E4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G4JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__I4JH <<  1)) <=  4096)) {
+            next__E4JH=(void *)((unsigned long)result__G4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I4JH)));
+          } else {
+            next__E4JH=new_lab__URJ(lab_type__H4JH);
+          };
+          ((__POINTER *)next__E4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F4JH)[ 0]=next__E4JH;
+        } else {
+          ((__POINTER *)result__G4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__G4JH=next__E4JH;
+        };
+      };
+      ptr__UWQ=result__G4JH;
+    };
+    result__TWQ=((__ITM_TYPE_PARAMETER *)ptr__UWQ);
+    *(result__TWQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__T3V=((__ITM_TYPE_PARAMETER *)result__TWQ);
+  Self__T3V->parent_itm_type__FEE.name__SYP=(&__string_1);
+  fast_put__to__1OZ(result__RLK,Self__T3V,(&__string_1));
+  type_self__PUN=result__TWQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__XOR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__DMW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__OMW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__NOR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__PVR=NULL;
+  ptr__QVR=((__POINTER )(NULL));
+  typ_id__VVR= 0;
+  sz__SVR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__SVR ==  0)) {
+    result__PVR=FAST_ARRAYoITM_TYPE_STYLEo__;
   } else {
-    typ_id__H4F=__FAST_ARRAYoSTRINGo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__E4F);
-    if ((typ_id__H4F == (__INTEGER)(-  1))) {
-      a__PQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0XG=(__UINTEGER_32)((__UINTEGER_32)(sz__E4F + a__PQDH) & (__UINTEGER_32)(~ a__PQDH));
-      ptr_table__23IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0XG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__13IH=((__POINTER )(NULL));
-      result__33IH=((__POINTER *)ptr_table__23IH)[ 0];
-      if ((result__33IH == (void *)NULL)) {
-        result__33IH=new_lab__MRJ(new_size__0XG);
-        next__13IH=(void *)((unsigned long)result__33IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XG)));
-        ((__POINTER *)next__13IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__23IH)[ 0]=next__13IH;
-      } else {
-        next__13IH=((__POINTER *)result__33IH)[ 0];
-        if ((next__13IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__33IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0XG <<  1)) <=  4096)) {
-            next__13IH=(void *)((unsigned long)result__33IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XG)));
-          } else {
-            next__13IH=new_lab__MRJ(new_size__0XG);
-          };
-          ((__POINTER *)next__13IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__23IH)[ 0]=next__13IH;
-        } else {
-          ((__POINTER *)result__33IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__13IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__33IH=next__13IH;
-        };
-      };
-      ptr__C4F=result__33IH;
-    } else {
-      t__DZG=((__UINTEGER_32 )typ_id__H4F);
-      a__VQDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__E4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__E4F + a__VQDH) & (__UINTEGER_32)(~ a__VQDH));
-      ptr_table__B4IH=((__POINTER )(&(table_type[(t__DZG)])));
-      lab_type__D4IH=(__UINTEGER_32)(t__DZG |  1);
-      next__A4IH=((__POINTER )(NULL));
-      result__C4IH=((__POINTER *)ptr_table__B4IH)[ 0];
-      if ((result__C4IH == (void *)NULL)) {
-        result__C4IH=new_lab__MRJ(lab_type__D4IH);
-        next__A4IH=(void *)((unsigned long)result__C4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4IH)));
-        ((__POINTER *)next__A4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__B4IH)[ 0]=next__A4IH;
-      } else {
-        next__A4IH=((__POINTER *)result__C4IH)[ 0];
-        if ((next__A4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__E4IH <<  1)) <=  4096)) {
-            next__A4IH=(void *)((unsigned long)result__C4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4IH)));
-          } else {
-            next__A4IH=new_lab__MRJ(lab_type__D4IH);
-          };
-          ((__POINTER *)next__A4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__B4IH)[ 0]=next__A4IH;
-        } else {
-          ((__POINTER *)result__C4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__C4IH=next__A4IH;
-        };
-      };
-      ptr__C4F=result__C4IH;
-    };
-    result__B4F=((__FAST_ARRAYoSTRINGo *)ptr__C4F);
-    *(result__B4F) = *(FAST_ARRAYoSTRINGo__);
-  };
-  Self__DGT=((__FAST_ARRAYoSTRINGo *)result__B4F);
-  if ((Self__DGT->parent_arrayed_collection__DKC.capacity__MGT <  5)) {
-    Self__DGT->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB( 5);
-    Self__DGT->parent_arrayed_collection__DKC.capacity__MGT= 5;
-  };
-  Self__DGT->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(-  1);
-  free__BOP=result__B4F;
-  type_void__4VF=get__DTI((&__string_3));
-  PROTOTYPE__->default_value__TUE=NULL;
-  PROTOTYPE__->type_c__OWE=NULL;
-  LIP_CODE__->parent_itm_object__5DE=(*ITM_OBJECT__);
-  LIP_UNARY__->parent_lip_code__L14B=(*LIP_CODE__);
-  LIP_UNARY__->operator__M2QD='\0';
-  LIP_UNARY__->value__J2QD=NULL;
-  LIP_CALL__->parent_lip_code__314B=(*LIP_CODE__);
-  LIP_CALL__->name__GAUE=NULL;
-  LIP_CALL__->argument__15TE=NULL;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__BWWE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__D0WE= 0;
-  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__O0WE=NULL;
-  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__DKSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
-  result__FFTE=NULL;
-  ptr__GFTE=((__POINTER )(NULL));
-  typ_id__LFTE= 0;
-  sz__IFTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
-  if ((sz__IFTE ==  0)) {
-    result__FFTE=FAST_ARRAYoLIP_INTEGERo__;
+    typ_id__VVR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SVR);
+    if ((typ_id__VVR == (__INTEGER)(-  1))) {
+      a__KQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SVR + a__KQGH) & (__UINTEGER_32)(~ a__KQGH));
+      ptr_table__K4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__J4JH=((__POINTER )(NULL));
+      result__L4JH=((__POINTER *)ptr_table__K4JH)[ 0];
+      if ((result__L4JH == (void *)NULL)) {
+        result__L4JH=new_lab__URJ(new_size__LQGH);
+        next__J4JH=(void *)((unsigned long)result__L4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQGH)));
+        ((__POINTER *)next__J4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__K4JH)[ 0]=next__J4JH;
+      } else {
+        next__J4JH=((__POINTER *)result__L4JH)[ 0];
+        if ((next__J4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L4JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LQGH <<  1)) <=  4096)) {
+            next__J4JH=(void *)((unsigned long)result__L4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQGH)));
+          } else {
+            next__J4JH=new_lab__URJ(new_size__LQGH);
+          };
+          ((__POINTER *)next__J4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K4JH)[ 0]=next__J4JH;
+        } else {
+          ((__POINTER *)result__L4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__L4JH=next__J4JH;
+        };
+      };
+      ptr__QVR=result__L4JH;
+    } else {
+      t__PQGH=((__UINTEGER_32 )typ_id__VVR);
+      a__OQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__S4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__SVR + a__OQGH) & (__UINTEGER_32)(~ a__OQGH));
+      ptr_table__P4JH=((__POINTER )(&(table_type[(t__PQGH)])));
+      lab_type__R4JH=(__UINTEGER_32)(t__PQGH |  1);
+      next__O4JH=((__POINTER )(NULL));
+      result__Q4JH=((__POINTER *)ptr_table__P4JH)[ 0];
+      if ((result__Q4JH == (void *)NULL)) {
+        result__Q4JH=new_lab__URJ(lab_type__R4JH);
+        next__O4JH=(void *)((unsigned long)result__Q4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4JH)));
+        ((__POINTER *)next__O4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__P4JH)[ 0]=next__O4JH;
+      } else {
+        next__O4JH=((__POINTER *)result__Q4JH)[ 0];
+        if ((next__O4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q4JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__S4JH <<  1)) <=  4096)) {
+            next__O4JH=(void *)((unsigned long)result__Q4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4JH)));
+          } else {
+            next__O4JH=new_lab__URJ(lab_type__R4JH);
+          };
+          ((__POINTER *)next__O4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P4JH)[ 0]=next__O4JH;
+        } else {
+          ((__POINTER *)result__Q4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Q4JH=next__O4JH;
+        };
+      };
+      ptr__QVR=result__Q4JH;
+    };
+    result__PVR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__QVR);
+    *(result__PVR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__0LW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__PVR);
+  if ((Self__0LW->parent_arrayed_collection__NOR.capacity__DMW <  32)) {
+    Self__0LW->parent_arrayed_collection__NOR.storage__OMW=create__DIYB( 32);
+    Self__0LW->parent_arrayed_collection__NOR.capacity__DMW= 32;
+  };
+  Self__0LW->parent_arrayed_collection__NOR.upper__XOR=(__INTEGER)(-  1);
+  dico__OOR=result__PVR;
+  type_null__HVN=get__LTI((&__string_2));
+  ITM_LIST__->parent_itm_code__S5E=(*ITM_CODE__);
+  last_group__DUF=NULL;
+  old_position__LRI= 0;
+  old_pos_cur__NRI= 0;
+  old_pos_line__PRI= 0;
+  old_pos_col__RRI= 0;
+  old_short_derive__TRI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__R1T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__EJU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__PJU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__2RI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__D1K= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__5KU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__KLU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__M1H=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__OIK=NULL;
+  ptr__PIK=((__POINTER )(NULL));
+  typ_id__UIK= 0;
+  sz__RIK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__RIK ==  0)) {
+    result__OIK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
   } else {
-    typ_id__LFTE=__FAST_ARRAYoLIP_INTEGERo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IFTE);
-    if ((typ_id__LFTE == (__INTEGER)(-  1))) {
-      a__CQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFTE + a__CQFH) & (__UINTEGER_32)(~ a__CQFH));
-      ptr_table__G4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__F4IH=((__POINTER )(NULL));
-      result__H4IH=((__POINTER *)ptr_table__G4IH)[ 0];
-      if ((result__H4IH == (void *)NULL)) {
-        result__H4IH=new_lab__MRJ(new_size__DQFH);
-        next__F4IH=(void *)((unsigned long)result__H4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
-        ((__POINTER *)next__F4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__G4IH)[ 0]=next__F4IH;
+    typ_id__UIK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__RIK);
+    if ((typ_id__UIK == (__INTEGER)(-  1))) {
+      a__SQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__RIK + a__SQGH) & (__UINTEGER_32)(~ a__SQGH));
+      ptr_table__U4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__T4JH=((__POINTER )(NULL));
+      result__V4JH=((__POINTER *)ptr_table__U4JH)[ 0];
+      if ((result__V4JH == (void *)NULL)) {
+        result__V4JH=new_lab__URJ(new_size__TQGH);
+        next__T4JH=(void *)((unsigned long)result__V4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQGH)));
+        ((__POINTER *)next__T4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__U4JH)[ 0]=next__T4JH;
       } else {
-        next__F4IH=((__POINTER *)result__H4IH)[ 0];
-        if ((next__F4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DQFH <<  1)) <=  4096)) {
-            next__F4IH=(void *)((unsigned long)result__H4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
+        next__T4JH=((__POINTER *)result__V4JH)[ 0];
+        if ((next__T4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V4JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TQGH <<  1)) <=  4096)) {
+            next__T4JH=(void *)((unsigned long)result__V4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQGH)));
           } else {
-            next__F4IH=new_lab__MRJ(new_size__DQFH);
+            next__T4JH=new_lab__URJ(new_size__TQGH);
           };
-          ((__POINTER *)next__F4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__G4IH)[ 0]=next__F4IH;
+          ((__POINTER *)next__T4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__U4JH)[ 0]=next__T4JH;
         } else {
-          ((__POINTER *)result__H4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__H4IH=next__F4IH;
+          ((__POINTER *)result__V4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__V4JH=next__T4JH;
         };
       };
-      ptr__GFTE=result__H4IH;
+      ptr__PIK=result__V4JH;
     } else {
-      t__HQFH=((__UINTEGER_32 )typ_id__LFTE);
-      a__GQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__O4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFTE + a__GQFH) & (__UINTEGER_32)(~ a__GQFH));
-      ptr_table__L4IH=((__POINTER )(&(table_type[(t__HQFH)])));
-      lab_type__N4IH=(__UINTEGER_32)(t__HQFH |  1);
-      next__K4IH=((__POINTER )(NULL));
-      result__M4IH=((__POINTER *)ptr_table__L4IH)[ 0];
-      if ((result__M4IH == (void *)NULL)) {
-        result__M4IH=new_lab__MRJ(lab_type__N4IH);
-        next__K4IH=(void *)((unsigned long)result__M4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4IH)));
-        ((__POINTER *)next__K4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__L4IH)[ 0]=next__K4IH;
-      } else {
-        next__K4IH=((__POINTER *)result__M4IH)[ 0];
-        if ((next__K4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__O4IH <<  1)) <=  4096)) {
-            next__K4IH=(void *)((unsigned long)result__M4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4IH)));
-          } else {
-            next__K4IH=new_lab__MRJ(lab_type__N4IH);
-          };
-          ((__POINTER *)next__K4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__L4IH)[ 0]=next__K4IH;
-        } else {
-          ((__POINTER *)result__M4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__M4IH=next__K4IH;
-        };
-      };
-      ptr__GFTE=result__M4IH;
-    };
-    result__FFTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__GFTE);
-    *(result__FFTE) = *(FAST_ARRAYoLIP_INTEGERo__);
-  };
-  Self__0ZWE=((__FAST_ARRAYoLIP_INTEGERo *)result__FFTE);
-  if ((Self__0ZWE->parent_arrayed_collection__DKSE.capacity__D0WE <  10)) {
-    Self__0ZWE->parent_arrayed_collection__DKSE.storage__O0WE=create__3RFF( 10);
-    Self__0ZWE->parent_arrayed_collection__DKSE.capacity__D0WE= 10;
-  };
-  Self__0ZWE->parent_arrayed_collection__DKSE.upper__BWWE=(__INTEGER)(-  1);
-  storage__EKSE=result__FFTE;
-  LIP_INTEGER__->value__0B3F= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__4XOF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__S4OF= 0;
-  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__34OF=NULL;
-  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__0BFF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
-  result__ESLF=NULL;
-  ptr__FSLF=((__POINTER )(NULL));
-  typ_id__KSLF= 0;
-  sz__HSLF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
-  if ((sz__HSLF ==  0)) {
-    result__ESLF=FAST_ARRAYoLIP_STRINGo__;
+      t__XQGH=((__UINTEGER_32 )typ_id__UIK);
+      a__WQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__24JH=(__UINTEGER_32)((__UINTEGER_32)(sz__RIK + a__WQGH) & (__UINTEGER_32)(~ a__WQGH));
+      ptr_table__Z4JH=((__POINTER )(&(table_type[(t__XQGH)])));
+      lab_type__14JH=(__UINTEGER_32)(t__XQGH |  1);
+      next__Y4JH=((__POINTER )(NULL));
+      result__04JH=((__POINTER *)ptr_table__Z4JH)[ 0];
+      if ((result__04JH == (void *)NULL)) {
+        result__04JH=new_lab__URJ(lab_type__14JH);
+        next__Y4JH=(void *)((unsigned long)result__04JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__24JH)));
+        ((__POINTER *)next__Y4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Z4JH)[ 0]=next__Y4JH;
+      } else {
+        next__Y4JH=((__POINTER *)result__04JH)[ 0];
+        if ((next__Y4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__04JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__24JH <<  1)) <=  4096)) {
+            next__Y4JH=(void *)((unsigned long)result__04JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__24JH)));
+          } else {
+            next__Y4JH=new_lab__URJ(lab_type__14JH);
+          };
+          ((__POINTER *)next__Y4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z4JH)[ 0]=next__Y4JH;
+        } else {
+          ((__POINTER *)result__04JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__04JH=next__Y4JH;
+        };
+      };
+      ptr__PIK=result__04JH;
+    };
+    result__OIK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__PIK);
+    *(result__OIK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__1IU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__OIK);
+  if ((Self__1IU->parent_arrayed_collection__2RI.capacity__EJU <  5)) {
+    Self__1IU->parent_arrayed_collection__2RI.storage__PJU=create__MHQB( 5);
+    Self__1IU->parent_arrayed_collection__2RI.capacity__EJU= 5;
+  };
+  Self__1IU->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(-  1);
+  free_list__3RI=result__OIK;
+  ITM_LOCAL__->parent_itm_object__H1H=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__G3K=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__DFV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__OFV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__QWT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__CAU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__4AU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__I4H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__EIL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__CYT= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__NYT=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__ZTF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__X4J=NULL;
+  ptr__Y4J=((__POINTER )(NULL));
+  typ_id__34J= 0;
+  sz__04J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__04J ==  0)) {
+    result__X4J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+  } else {
+    typ_id__34J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__04J);
+    if ((typ_id__34J == (__INTEGER)(-  1))) {
+      a__0QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1QGH=(__UINTEGER_32)((__UINTEGER_32)(sz__04J + a__0QGH) & (__UINTEGER_32)(~ a__0QGH));
+      ptr_table__44JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1QGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__34JH=((__POINTER )(NULL));
+      result__54JH=((__POINTER *)ptr_table__44JH)[ 0];
+      if ((result__54JH == (void *)NULL)) {
+        result__54JH=new_lab__URJ(new_size__1QGH);
+        next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QGH)));
+        ((__POINTER *)next__34JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
+      } else {
+        next__34JH=((__POINTER *)result__54JH)[ 0];
+        if ((next__34JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__54JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1QGH <<  1)) <=  4096)) {
+            next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QGH)));
+          } else {
+            next__34JH=new_lab__URJ(new_size__1QGH);
+          };
+          ((__POINTER *)next__34JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
+        } else {
+          ((__POINTER *)result__54JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__54JH=next__34JH;
+        };
+      };
+      ptr__Y4J=result__54JH;
+    } else {
+      t__5QGH=((__UINTEGER_32 )typ_id__34J);
+      a__4QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__04J + a__4QGH) & (__UINTEGER_32)(~ a__4QGH));
+      ptr_table__D5JH=((__POINTER )(&(table_type[(t__5QGH)])));
+      lab_type__F5JH=(__UINTEGER_32)(t__5QGH |  1);
+      next__C5JH=((__POINTER )(NULL));
+      result__E5JH=((__POINTER *)ptr_table__D5JH)[ 0];
+      if ((result__E5JH == (void *)NULL)) {
+        result__E5JH=new_lab__URJ(lab_type__F5JH);
+        next__C5JH=(void *)((unsigned long)result__E5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5JH)));
+        ((__POINTER *)next__C5JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
+      } else {
+        next__C5JH=((__POINTER *)result__E5JH)[ 0];
+        if ((next__C5JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E5JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__G5JH <<  1)) <=  4096)) {
+            next__C5JH=(void *)((unsigned long)result__E5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5JH)));
+          } else {
+            next__C5JH=new_lab__URJ(lab_type__F5JH);
+          };
+          ((__POINTER *)next__C5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
+        } else {
+          ((__POINTER *)result__E5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__E5JH=next__C5JH;
+        };
+      };
+      ptr__Y4J=result__E5JH;
+    };
+    result__X4J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__Y4J);
+    *(result__X4J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__QFU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__X4J);
+  if ((Self__QFU->parent_arrayed_collection__I4H.capacity__CAU <  5)) {
+    Self__QFU->parent_arrayed_collection__I4H.storage__4AU=create__21PB( 5);
+    Self__QFU->parent_arrayed_collection__I4H.capacity__CAU= 5;
+  };
+  Self__QFU->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(-  1);
+  free_list__J4H=result__X4J;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__CTU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__HVU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__SVU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__R5K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__DAPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__4BPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__ZCPD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__P5I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__NLM=NULL;
+  ptr__OLM=((__POINTER )(NULL));
+  typ_id__TLM= 0;
+  sz__QLM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__QLM ==  0)) {
+    result__NLM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+  } else {
+    typ_id__TLM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QLM);
+    if ((typ_id__TLM == (__INTEGER)(-  1))) {
+      a__CRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLM + a__CRGH) & (__UINTEGER_32)(~ a__CRGH));
+      ptr_table__I5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__H5JH=((__POINTER )(NULL));
+      result__J5JH=((__POINTER *)ptr_table__I5JH)[ 0];
+      if ((result__J5JH == (void *)NULL)) {
+        result__J5JH=new_lab__URJ(new_size__DRGH);
+        next__H5JH=(void *)((unsigned long)result__J5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DRGH)));
+        ((__POINTER *)next__H5JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__I5JH)[ 0]=next__H5JH;
+      } else {
+        next__H5JH=((__POINTER *)result__J5JH)[ 0];
+        if ((next__H5JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J5JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DRGH <<  1)) <=  4096)) {
+            next__H5JH=(void *)((unsigned long)result__J5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DRGH)));
+          } else {
+            next__H5JH=new_lab__URJ(new_size__DRGH);
+          };
+          ((__POINTER *)next__H5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I5JH)[ 0]=next__H5JH;
+        } else {
+          ((__POINTER *)result__J5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__J5JH=next__H5JH;
+        };
+      };
+      ptr__OLM=result__J5JH;
+    } else {
+      t__HRGH=((__UINTEGER_32 )typ_id__TLM);
+      a__GRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Q5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLM + a__GRGH) & (__UINTEGER_32)(~ a__GRGH));
+      ptr_table__N5JH=((__POINTER )(&(table_type[(t__HRGH)])));
+      lab_type__P5JH=(__UINTEGER_32)(t__HRGH |  1);
+      next__M5JH=((__POINTER )(NULL));
+      result__O5JH=((__POINTER *)ptr_table__N5JH)[ 0];
+      if ((result__O5JH == (void *)NULL)) {
+        result__O5JH=new_lab__URJ(lab_type__P5JH);
+        next__M5JH=(void *)((unsigned long)result__O5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5JH)));
+        ((__POINTER *)next__M5JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__N5JH)[ 0]=next__M5JH;
+      } else {
+        next__M5JH=((__POINTER *)result__O5JH)[ 0];
+        if ((next__M5JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O5JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Q5JH <<  1)) <=  4096)) {
+            next__M5JH=(void *)((unsigned long)result__O5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5JH)));
+          } else {
+            next__M5JH=new_lab__URJ(lab_type__P5JH);
+          };
+          ((__POINTER *)next__M5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N5JH)[ 0]=next__M5JH;
+        } else {
+          ((__POINTER *)result__O5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__O5JH=next__M5JH;
+        };
+      };
+      ptr__OLM=result__O5JH;
+    };
+    result__NLM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__OLM);
+    *(result__NLM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__4UU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__NLM);
+  if ((Self__4UU->parent_arrayed_collection__R5K.capacity__HVU <  5)) {
+    Self__4UU->parent_arrayed_collection__R5K.storage__SVU=create__H4ZB( 5);
+    Self__4UU->parent_arrayed_collection__R5K.capacity__HVU= 5;
+  };
+  Self__4UU->parent_arrayed_collection__R5K.upper__CTU=(__INTEGER)(-  1);
+  free_list__S5K=result__NLM;
+  ITM_LIST_IDF__->parent_itm_code__4CJ=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__YUF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__EWF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__TDJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__UDJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__LEJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__YGJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__WHJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__MFL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__SIL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__5KL=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__DKV=NULL;
+  ITM_OLD__->parent_itm_code__V2L=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__W4M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__X4M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__INDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__2FN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__SDO=(*ITM_READ__);
+  ITM_RESULT__->value__ULFC=NULL;
+  ITM_OPERATOR__->name__XIL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__04M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__BIHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__D1HC=NULL;
+  ITM_ARG__->type__E1HC=NULL;
+  empty_list__SYLF=create_with_capacity__JHRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__JVPF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__EVPF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__1ZPF= 0;
+  result__LTNF=NULL;
+  ptr__MTNF=((__POINTER )(NULL));
+  typ_id__RTNF= 0;
+  sz__OTNF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__OTNF ==  0)) {
+    result__LTNF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+  } else {
+    typ_id__RTNF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__OTNF);
+    if ((typ_id__RTNF == (__INTEGER)(-  1))) {
+      a__KRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OTNF + a__KRGH) & (__UINTEGER_32)(~ a__KRGH));
+      ptr_table__S5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__R5JH=((__POINTER )(NULL));
+      result__T5JH=((__POINTER *)ptr_table__S5JH)[ 0];
+      if ((result__T5JH == (void *)NULL)) {
+        result__T5JH=new_lab__URJ(new_size__LRGH);
+        next__R5JH=(void *)((unsigned long)result__T5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRGH)));
+        ((__POINTER *)next__R5JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S5JH)[ 0]=next__R5JH;
+      } else {
+        next__R5JH=((__POINTER *)result__T5JH)[ 0];
+        if ((next__R5JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T5JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LRGH <<  1)) <=  4096)) {
+            next__R5JH=(void *)((unsigned long)result__T5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRGH)));
+          } else {
+            next__R5JH=new_lab__URJ(new_size__LRGH);
+          };
+          ((__POINTER *)next__R5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S5JH)[ 0]=next__R5JH;
+        } else {
+          ((__POINTER *)result__T5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__T5JH=next__R5JH;
+        };
+      };
+      ptr__MTNF=result__T5JH;
+    } else {
+      t__PRGH=((__UINTEGER_32 )typ_id__RTNF);
+      a__ORGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__05JH=(__UINTEGER_32)((__UINTEGER_32)(sz__OTNF + a__ORGH) & (__UINTEGER_32)(~ a__ORGH));
+      ptr_table__X5JH=((__POINTER )(&(table_type[(t__PRGH)])));
+      lab_type__Z5JH=(__UINTEGER_32)(t__PRGH |  1);
+      next__W5JH=((__POINTER )(NULL));
+      result__Y5JH=((__POINTER *)ptr_table__X5JH)[ 0];
+      if ((result__Y5JH == (void *)NULL)) {
+        result__Y5JH=new_lab__URJ(lab_type__Z5JH);
+        next__W5JH=(void *)((unsigned long)result__Y5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05JH)));
+        ((__POINTER *)next__W5JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X5JH)[ 0]=next__W5JH;
+      } else {
+        next__W5JH=((__POINTER *)result__Y5JH)[ 0];
+        if ((next__W5JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y5JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__05JH <<  1)) <=  4096)) {
+            next__W5JH=(void *)((unsigned long)result__Y5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05JH)));
+          } else {
+            next__W5JH=new_lab__URJ(lab_type__Z5JH);
+          };
+          ((__POINTER *)next__W5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X5JH)[ 0]=next__W5JH;
+        } else {
+          ((__POINTER *)result__Y5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y5JH=next__W5JH;
+        };
+      };
+      ptr__MTNF=result__Y5JH;
+    };
+    result__LTNF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__MTNF);
+    *(result__LTNF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__1XPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__LTNF);
+  new_capacity__MERF=prime_number_ceiling__541( 53);
+  Self__1XPF->buckets__JVPF=create__3WTF(new_capacity__MERF);
+  Self__1XPF->capacity__EVPF=new_capacity__MERF;
+  Self__1XPF->count__1ZPF= 0;
+  bucket__2YLF=result__LTNF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__VVPF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__BWPF=NULL;
+  ITM_ARGS__->parent_itm_argument__ABFE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__PNPF=NULL;
+  ITM_ARGS__->type__QNPF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__UHN=FALSE__;
+  result__J4F=NULL;
+  ptr__K4F=((__POINTER )(NULL));
+  typ_id__P4F= 0;
+  sz__M4F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__M4F ==  0)) {
+    result__J4F=FAST_ARRAYoSTRINGo__;
+  } else {
+    typ_id__P4F=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__M4F);
+    if ((typ_id__P4F == (__INTEGER)(-  1))) {
+      a__HREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CYG=(__UINTEGER_32)((__UINTEGER_32)(sz__M4F + a__HREH) & (__UINTEGER_32)(~ a__HREH));
+      ptr_table__25JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CYG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__15JH=((__POINTER )(NULL));
+      result__35JH=((__POINTER *)ptr_table__25JH)[ 0];
+      if ((result__35JH == (void *)NULL)) {
+        result__35JH=new_lab__URJ(new_size__CYG);
+        next__15JH=(void *)((unsigned long)result__35JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYG)));
+        ((__POINTER *)next__15JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__25JH)[ 0]=next__15JH;
+      } else {
+        next__15JH=((__POINTER *)result__35JH)[ 0];
+        if ((next__15JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__35JH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CYG <<  1)) <=  4096)) {
+            next__15JH=(void *)((unsigned long)result__35JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYG)));
+          } else {
+            next__15JH=new_lab__URJ(new_size__CYG);
+          };
+          ((__POINTER *)next__15JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__25JH)[ 0]=next__15JH;
+        } else {
+          ((__POINTER *)result__35JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__35JH=next__15JH;
+        };
+      };
+      ptr__K4F=result__35JH;
+    } else {
+      t__LZG=((__UINTEGER_32 )typ_id__P4F);
+      a__NREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__M4F + a__NREH) & (__UINTEGER_32)(~ a__NREH));
+      ptr_table__BAKH=((__POINTER )(&(table_type[(t__LZG)])));
+      lab_type__DAKH=(__UINTEGER_32)(t__LZG |  1);
+      next__AAKH=((__POINTER )(NULL));
+      result__CAKH=((__POINTER *)ptr_table__BAKH)[ 0];
+      if ((result__CAKH == (void *)NULL)) {
+        result__CAKH=new_lab__URJ(lab_type__DAKH);
+        next__AAKH=(void *)((unsigned long)result__CAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAKH)));
+        ((__POINTER *)next__AAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BAKH)[ 0]=next__AAKH;
+      } else {
+        next__AAKH=((__POINTER *)result__CAKH)[ 0];
+        if ((next__AAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CAKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__EAKH <<  1)) <=  4096)) {
+            next__AAKH=(void *)((unsigned long)result__CAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAKH)));
+          } else {
+            next__AAKH=new_lab__URJ(lab_type__DAKH);
+          };
+          ((__POINTER *)next__AAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BAKH)[ 0]=next__AAKH;
+        } else {
+          ((__POINTER *)result__CAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CAKH=next__AAKH;
+        };
+      };
+      ptr__K4F=result__CAKH;
+    };
+    result__J4F=((__FAST_ARRAYoSTRINGo *)ptr__K4F);
+    *(result__J4F) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__LGT=((__FAST_ARRAYoSTRINGo *)result__J4F);
+  if ((Self__LGT->parent_arrayed_collection__LKC.capacity__UGT <  5)) {
+    Self__LGT->parent_arrayed_collection__LKC.storage__5GT=create__BGRB( 5);
+    Self__LGT->parent_arrayed_collection__LKC.capacity__UGT= 5;
+  };
+  Self__LGT->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(-  1);
+  free__JOP=result__J4F;
+  type_void__GWF=get__LTI((&__string_3));
+  PROTOTYPE__->default_value__1UE=NULL;
+  PROTOTYPE__->type_c__WWE=NULL;
+  LIP_CODE__->parent_itm_object__HEE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__T14B=(*LIP_CODE__);
+  LIP_UNARY__->operator__U2QD='\0';
+  LIP_UNARY__->value__R2QD=NULL;
+  LIP_CALL__->parent_lip_code__F24B=(*LIP_CODE__);
+  LIP_CALL__->name__JAUE=NULL;
+  LIP_CALL__->argument__45TE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__EWWE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__G0WE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__R0WE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__TJSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__IFTE=NULL;
+  ptr__JFTE=((__POINTER )(NULL));
+  typ_id__OFTE= 0;
+  sz__LFTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__LFTE ==  0)) {
+    result__IFTE=FAST_ARRAYoLIP_INTEGERo__;
   } else {
-    typ_id__KSLF=__FAST_ARRAYoLIP_STRINGo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HSLF);
-    if ((typ_id__KSLF == (__INTEGER)(-  1))) {
-      a__KQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__LQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSLF + a__KQFH) & (__UINTEGER_32)(~ a__KQFH));
-      ptr_table__Q4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__P4IH=((__POINTER )(NULL));
-      result__R4IH=((__POINTER *)ptr_table__Q4IH)[ 0];
-      if ((result__R4IH == (void *)NULL)) {
-        result__R4IH=new_lab__MRJ(new_size__LQFH);
-        next__P4IH=(void *)((unsigned long)result__R4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQFH)));
-        ((__POINTER *)next__P4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Q4IH)[ 0]=next__P4IH;
-      } else {
-        next__P4IH=((__POINTER *)result__R4IH)[ 0];
-        if ((next__P4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LQFH <<  1)) <=  4096)) {
-            next__P4IH=(void *)((unsigned long)result__R4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LQFH)));
-          } else {
-            next__P4IH=new_lab__MRJ(new_size__LQFH);
-          };
-          ((__POINTER *)next__P4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__Q4IH)[ 0]=next__P4IH;
-        } else {
-          ((__POINTER *)result__R4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__R4IH=next__P4IH;
-        };
-      };
-      ptr__FSLF=result__R4IH;
-    } else {
-      t__PQFH=((__UINTEGER_32 )typ_id__KSLF);
-      a__OQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__Y4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSLF + a__OQFH) & (__UINTEGER_32)(~ a__OQFH));
-      ptr_table__V4IH=((__POINTER )(&(table_type[(t__PQFH)])));
-      lab_type__X4IH=(__UINTEGER_32)(t__PQFH |  1);
-      next__U4IH=((__POINTER )(NULL));
-      result__W4IH=((__POINTER *)ptr_table__V4IH)[ 0];
-      if ((result__W4IH == (void *)NULL)) {
-        result__W4IH=new_lab__MRJ(lab_type__X4IH);
-        next__U4IH=(void *)((unsigned long)result__W4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4IH)));
-        ((__POINTER *)next__U4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__V4IH)[ 0]=next__U4IH;
-      } else {
-        next__U4IH=((__POINTER *)result__W4IH)[ 0];
-        if ((next__U4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Y4IH <<  1)) <=  4096)) {
-            next__U4IH=(void *)((unsigned long)result__W4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4IH)));
-          } else {
-            next__U4IH=new_lab__MRJ(lab_type__X4IH);
-          };
-          ((__POINTER *)next__U4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__V4IH)[ 0]=next__U4IH;
-        } else {
-          ((__POINTER *)result__W4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__W4IH=next__U4IH;
-        };
-      };
-      ptr__FSLF=result__W4IH;
-    };
-    result__ESLF=((__FAST_ARRAYoLIP_STRINGo *)ptr__FSLF);
-    *(result__ESLF) = *(FAST_ARRAYoLIP_STRINGo__);
-  };
-  Self__J4OF=((__FAST_ARRAYoLIP_STRINGo *)result__ESLF);
-  if ((Self__J4OF->parent_arrayed_collection__0BFF.capacity__S4OF <  10)) {
-    Self__J4OF->parent_arrayed_collection__0BFF.storage__34OF=create__SNXF( 10);
-    Self__J4OF->parent_arrayed_collection__0BFF.capacity__S4OF= 10;
-  };
-  Self__J4OF->parent_arrayed_collection__0BFF.upper__4XOF=(__INTEGER)(-  1);
-  storage__1BFF=result__ESLF;
-  LIP_STRING__->value__TBUE=NULL;
-  LIP_BOOLEAN__->value__PDQD=FALSE__;
-  result__Q3MF=NULL;
-  ptr__R3MF=((__POINTER )(NULL));
-  typ_id__W3MF= 0;
-  sz__T3MF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
-  if ((sz__T3MF ==  0)) {
-    result__Q3MF=LIP_BOOLEAN__;
+    typ_id__OFTE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__LFTE);
+    if ((typ_id__OFTE == (__INTEGER)(-  1))) {
+      a__SRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__LFTE + a__SRGH) & (__UINTEGER_32)(~ a__SRGH));
+      ptr_table__GAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FAKH=((__POINTER )(NULL));
+      result__HAKH=((__POINTER *)ptr_table__GAKH)[ 0];
+      if ((result__HAKH == (void *)NULL)) {
+        result__HAKH=new_lab__URJ(new_size__TRGH);
+        next__FAKH=(void *)((unsigned long)result__HAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TRGH)));
+        ((__POINTER *)next__FAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GAKH)[ 0]=next__FAKH;
+      } else {
+        next__FAKH=((__POINTER *)result__HAKH)[ 0];
+        if ((next__FAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HAKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TRGH <<  1)) <=  4096)) {
+            next__FAKH=(void *)((unsigned long)result__HAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TRGH)));
+          } else {
+            next__FAKH=new_lab__URJ(new_size__TRGH);
+          };
+          ((__POINTER *)next__FAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GAKH)[ 0]=next__FAKH;
+        } else {
+          ((__POINTER *)result__HAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HAKH=next__FAKH;
+        };
+      };
+      ptr__JFTE=result__HAKH;
+    } else {
+      t__XRGH=((__UINTEGER_32 )typ_id__OFTE);
+      a__WRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LFTE + a__WRGH) & (__UINTEGER_32)(~ a__WRGH));
+      ptr_table__LAKH=((__POINTER )(&(table_type[(t__XRGH)])));
+      lab_type__NAKH=(__UINTEGER_32)(t__XRGH |  1);
+      next__KAKH=((__POINTER )(NULL));
+      result__MAKH=((__POINTER *)ptr_table__LAKH)[ 0];
+      if ((result__MAKH == (void *)NULL)) {
+        result__MAKH=new_lab__URJ(lab_type__NAKH);
+        next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAKH)));
+        ((__POINTER *)next__KAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
+      } else {
+        next__KAKH=((__POINTER *)result__MAKH)[ 0];
+        if ((next__KAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MAKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OAKH <<  1)) <=  4096)) {
+            next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAKH)));
+          } else {
+            next__KAKH=new_lab__URJ(lab_type__NAKH);
+          };
+          ((__POINTER *)next__KAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
+        } else {
+          ((__POINTER *)result__MAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MAKH=next__KAKH;
+        };
+      };
+      ptr__JFTE=result__MAKH;
+    };
+    result__IFTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__JFTE);
+    *(result__IFTE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__3ZWE=((__FAST_ARRAYoLIP_INTEGERo *)result__IFTE);
+  if ((Self__3ZWE->parent_arrayed_collection__TJSE.capacity__G0WE <  10)) {
+    Self__3ZWE->parent_arrayed_collection__TJSE.storage__R0WE=create__52FF( 10);
+    Self__3ZWE->parent_arrayed_collection__TJSE.capacity__G0WE= 10;
+  };
+  Self__3ZWE->parent_arrayed_collection__TJSE.upper__EWWE=(__INTEGER)(-  1);
+  storage__UJSE=result__IFTE;
+  LIP_INTEGER__->value__3Y3F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__CEPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__WKPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__BLPF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__2MFF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__Q3LF=NULL;
+  ptr__R3LF=((__POINTER )(NULL));
+  typ_id__W3LF= 0;
+  sz__T3LF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__T3LF ==  0)) {
+    result__Q3LF=FAST_ARRAYoLIP_STRINGo__;
   } else {
-    typ_id__W3MF=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T3MF);
-    if ((typ_id__W3MF == (__INTEGER)(-  1))) {
-      a__SQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3MF + a__SQFH) & (__UINTEGER_32)(~ a__SQFH));
-      ptr_table__04IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__Z4IH=((__POINTER )(NULL));
-      result__14IH=((__POINTER *)ptr_table__04IH)[ 0];
-      if ((result__14IH == (void *)NULL)) {
-        result__14IH=new_lab__MRJ(new_size__TQFH);
-        next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQFH)));
-        ((__POINTER *)next__Z4IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__04IH)[ 0]=next__Z4IH;
-      } else {
-        next__Z4IH=((__POINTER *)result__14IH)[ 0];
-        if ((next__Z4IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__14IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TQFH <<  1)) <=  4096)) {
-            next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TQFH)));
-          } else {
-            next__Z4IH=new_lab__MRJ(new_size__TQFH);
-          };
-          ((__POINTER *)next__Z4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__04IH)[ 0]=next__Z4IH;
-        } else {
-          ((__POINTER *)result__14IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__14IH=next__Z4IH;
-        };
-      };
-      ptr__R3MF=result__14IH;
-    } else {
-      t__XQFH=((__UINTEGER_32 )typ_id__W3MF);
-      a__WQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__C5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3MF + a__WQFH) & (__UINTEGER_32)(~ a__WQFH));
-      ptr_table__54IH=((__POINTER )(&(table_type[(t__XQFH)])));
-      lab_type__B5IH=(__UINTEGER_32)(t__XQFH |  1);
-      next__44IH=((__POINTER )(NULL));
-      result__A5IH=((__POINTER *)ptr_table__54IH)[ 0];
-      if ((result__A5IH == (void *)NULL)) {
-        result__A5IH=new_lab__MRJ(lab_type__B5IH);
-        next__44IH=(void *)((unsigned long)result__A5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C5IH)));
-        ((__POINTER *)next__44IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__54IH)[ 0]=next__44IH;
-      } else {
-        next__44IH=((__POINTER *)result__A5IH)[ 0];
-        if ((next__44IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__C5IH <<  1)) <=  4096)) {
-            next__44IH=(void *)((unsigned long)result__A5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C5IH)));
-          } else {
-            next__44IH=new_lab__MRJ(lab_type__B5IH);
-          };
-          ((__POINTER *)next__44IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__54IH)[ 0]=next__44IH;
-        } else {
-          ((__POINTER *)result__A5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__A5IH=next__44IH;
-        };
-      };
-      ptr__R3MF=result__A5IH;
-    };
-    result__Q3MF=((__LIP_BOOLEAN *)ptr__R3MF);
-    *(result__Q3MF) = *(LIP_BOOLEAN__);
-  };
-  ((__LIP_BOOLEAN *)result__Q3MF)->value__PDQD=TRUE__;
-  true__GZKF=result__Q3MF;
-  LIP_VALUE__->parent_lip_code__2HFE=(*LIP_CODE__);
-  LIP_VALUE__->value__FKUE=NULL;
-  LIP_BINARY__->parent_lip_code__2PZB=(*LIP_CODE__);
-  LIP_BINARY__->left__MZQD=NULL;
-  LIP_BINARY__->right__PZQD=NULL;
-  LIP_BINARY__->operator__SZQD='\0';
-  LIP_AFFECT__->parent_lip_code__JUPB=(*LIP_CODE__);
-  LIP_AFFECT__->name__WGFC=NULL;
-  LIP_AFFECT__->value__IHFC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__POTD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__QAUD= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__MBUD=NULL;
-  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__FKID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
-  ARRAYED_COLLECTIONoLIP_CODEo__->upper__2DQD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__1PTD= 0;
-  ARRAYED_COLLECTIONoLIP_CODEo__->storage__GQTD=NULL;
-  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__NLYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
-  result__ZUMD=NULL;
-  ptr__0UMD=((__POINTER )(NULL));
-  typ_id__5UMD= 0;
-  sz__2UMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
-  if ((sz__2UMD ==  0)) {
-    result__ZUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    typ_id__W3LF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__T3LF);
+    if ((typ_id__W3LF == (__INTEGER)(-  1))) {
+      a__0RGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1RGH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3LF + a__0RGH) & (__UINTEGER_32)(~ a__0RGH));
+      ptr_table__QAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1RGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__PAKH=((__POINTER )(NULL));
+      result__RAKH=((__POINTER *)ptr_table__QAKH)[ 0];
+      if ((result__RAKH == (void *)NULL)) {
+        result__RAKH=new_lab__URJ(new_size__1RGH);
+        next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RGH)));
+        ((__POINTER *)next__PAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
+      } else {
+        next__PAKH=((__POINTER *)result__RAKH)[ 0];
+        if ((next__PAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RAKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1RGH <<  1)) <=  4096)) {
+            next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RGH)));
+          } else {
+            next__PAKH=new_lab__URJ(new_size__1RGH);
+          };
+          ((__POINTER *)next__PAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
+        } else {
+          ((__POINTER *)result__RAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RAKH=next__PAKH;
+        };
+      };
+      ptr__R3LF=result__RAKH;
+    } else {
+      t__5RGH=((__UINTEGER_32 )typ_id__W3LF);
+      a__4RGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3LF + a__4RGH) & (__UINTEGER_32)(~ a__4RGH));
+      ptr_table__VAKH=((__POINTER )(&(table_type[(t__5RGH)])));
+      lab_type__XAKH=(__UINTEGER_32)(t__5RGH |  1);
+      next__UAKH=((__POINTER )(NULL));
+      result__WAKH=((__POINTER *)ptr_table__VAKH)[ 0];
+      if ((result__WAKH == (void *)NULL)) {
+        result__WAKH=new_lab__URJ(lab_type__XAKH);
+        next__UAKH=(void *)((unsigned long)result__WAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAKH)));
+        ((__POINTER *)next__UAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VAKH)[ 0]=next__UAKH;
+      } else {
+        next__UAKH=((__POINTER *)result__WAKH)[ 0];
+        if ((next__UAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WAKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YAKH <<  1)) <=  4096)) {
+            next__UAKH=(void *)((unsigned long)result__WAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAKH)));
+          } else {
+            next__UAKH=new_lab__URJ(lab_type__XAKH);
+          };
+          ((__POINTER *)next__UAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VAKH)[ 0]=next__UAKH;
+        } else {
+          ((__POINTER *)result__WAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WAKH=next__UAKH;
+        };
+      };
+      ptr__R3LF=result__WAKH;
+    };
+    result__Q3LF=((__FAST_ARRAYoLIP_STRINGo *)ptr__R3LF);
+    *(result__Q3LF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__NKPF=((__FAST_ARRAYoLIP_STRINGo *)result__Q3LF);
+  if ((Self__NKPF->parent_arrayed_collection__2MFF.capacity__WKPF <  10)) {
+    Self__NKPF->parent_arrayed_collection__2MFF.storage__BLPF=create__Y0XF( 10);
+    Self__NKPF->parent_arrayed_collection__2MFF.capacity__WKPF= 10;
+  };
+  Self__NKPF->parent_arrayed_collection__2MFF.upper__CEPF=(__INTEGER)(-  1);
+  storage__3MFF=result__Q3LF;
+  LIP_STRING__->value__WBUE=NULL;
+  LIP_BOOLEAN__->value__XDQD=FALSE__;
+  result__MJNF=NULL;
+  ptr__NJNF=((__POINTER )(NULL));
+  typ_id__SJNF= 0;
+  sz__PJNF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__PJNF ==  0)) {
+    result__MJNF=LIP_BOOLEAN__;
   } else {
-    typ_id__5UMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2UMD);
-    if ((typ_id__5UMD == (__INTEGER)(-  1))) {
-      a__0QFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1QFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UMD + a__0QFH) & (__UINTEGER_32)(~ a__0QFH));
-      ptr_table__E5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1QFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__D5IH=((__POINTER )(NULL));
-      result__F5IH=((__POINTER *)ptr_table__E5IH)[ 0];
-      if ((result__F5IH == (void *)NULL)) {
-        result__F5IH=new_lab__MRJ(new_size__1QFH);
-        next__D5IH=(void *)((unsigned long)result__F5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QFH)));
-        ((__POINTER *)next__D5IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__E5IH)[ 0]=next__D5IH;
-      } else {
-        next__D5IH=((__POINTER *)result__F5IH)[ 0];
-        if ((next__D5IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1QFH <<  1)) <=  4096)) {
-            next__D5IH=(void *)((unsigned long)result__F5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1QFH)));
-          } else {
-            next__D5IH=new_lab__MRJ(new_size__1QFH);
-          };
-          ((__POINTER *)next__D5IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__E5IH)[ 0]=next__D5IH;
-        } else {
-          ((__POINTER *)result__F5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__F5IH=next__D5IH;
-        };
-      };
-      ptr__0UMD=result__F5IH;
-    } else {
-      t__5QFH=((__UINTEGER_32 )typ_id__5UMD);
-      a__4QFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__M5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UMD + a__4QFH) & (__UINTEGER_32)(~ a__4QFH));
-      ptr_table__J5IH=((__POINTER )(&(table_type[(t__5QFH)])));
-      lab_type__L5IH=(__UINTEGER_32)(t__5QFH |  1);
-      next__I5IH=((__POINTER )(NULL));
-      result__K5IH=((__POINTER *)ptr_table__J5IH)[ 0];
-      if ((result__K5IH == (void *)NULL)) {
-        result__K5IH=new_lab__MRJ(lab_type__L5IH);
-        next__I5IH=(void *)((unsigned long)result__K5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5IH)));
-        ((__POINTER *)next__I5IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__J5IH)[ 0]=next__I5IH;
-      } else {
-        next__I5IH=((__POINTER *)result__K5IH)[ 0];
-        if ((next__I5IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__M5IH <<  1)) <=  4096)) {
-            next__I5IH=(void *)((unsigned long)result__K5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5IH)));
-          } else {
-            next__I5IH=new_lab__MRJ(lab_type__L5IH);
-          };
-          ((__POINTER *)next__I5IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__J5IH)[ 0]=next__I5IH;
-        } else {
-          ((__POINTER *)result__K5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__K5IH=next__I5IH;
-        };
-      };
-      ptr__0UMD=result__K5IH;
-    };
-    result__ZUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__0UMD);
-    *(result__ZUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
-  };
-  Self__KFUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__ZUMD);
-  if ((Self__KFUD->parent_arrayed_collection__FKID.capacity__QAUD <  5)) {
-    Self__KFUD->parent_arrayed_collection__FKID.storage__MBUD=create__K4IE( 5);
-    Self__KFUD->parent_arrayed_collection__FKID.capacity__QAUD= 5;
-  };
-  Self__KFUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(-  1);
-  free_list__GKID=result__ZUMD;
-  LIP_IF__->parent_lip_code__4OYC=(*LIP_CODE__);
-  LIP_IF__->condition__ADQD=NULL;
-  LIP_IF__->then__WDQD=NULL;
-  LIP_IF__->else__NEQD=NULL;
-  LIP_PRINT__->parent_lip_code__QPYC=(*LIP_CODE__);
-  LIP_PRINT__->message__KEUE=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__CVRD=NULL;
-  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__3URD= 0;
-  result__KVED=NULL;
-  ptr__LVED=((__POINTER )(NULL));
-  typ_id__QVED= 0;
-  sz__NVED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
-  if ((sz__NVED ==  0)) {
-    result__KVED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    typ_id__SJNF=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__PJNF);
+    if ((typ_id__SJNF == (__INTEGER)(-  1))) {
+      a__CSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJNF + a__CSGH) & (__UINTEGER_32)(~ a__CSGH));
+      ptr_table__0AKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZAKH=((__POINTER )(NULL));
+      result__1AKH=((__POINTER *)ptr_table__0AKH)[ 0];
+      if ((result__1AKH == (void *)NULL)) {
+        result__1AKH=new_lab__URJ(new_size__DSGH);
+        next__ZAKH=(void *)((unsigned long)result__1AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DSGH)));
+        ((__POINTER *)next__ZAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0AKH)[ 0]=next__ZAKH;
+      } else {
+        next__ZAKH=((__POINTER *)result__1AKH)[ 0];
+        if ((next__ZAKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1AKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DSGH <<  1)) <=  4096)) {
+            next__ZAKH=(void *)((unsigned long)result__1AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DSGH)));
+          } else {
+            next__ZAKH=new_lab__URJ(new_size__DSGH);
+          };
+          ((__POINTER *)next__ZAKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0AKH)[ 0]=next__ZAKH;
+        } else {
+          ((__POINTER *)result__1AKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1AKH=next__ZAKH;
+        };
+      };
+      ptr__NJNF=result__1AKH;
+    } else {
+      t__HSGH=((__UINTEGER_32 )typ_id__SJNF);
+      a__GSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJNF + a__GSGH) & (__UINTEGER_32)(~ a__GSGH));
+      ptr_table__5AKH=((__POINTER )(&(table_type[(t__HSGH)])));
+      lab_type__BBKH=(__UINTEGER_32)(t__HSGH |  1);
+      next__4AKH=((__POINTER )(NULL));
+      result__ABKH=((__POINTER *)ptr_table__5AKH)[ 0];
+      if ((result__ABKH == (void *)NULL)) {
+        result__ABKH=new_lab__URJ(lab_type__BBKH);
+        next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBKH)));
+        ((__POINTER *)next__4AKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
+      } else {
+        next__4AKH=((__POINTER *)result__ABKH)[ 0];
+        if ((next__4AKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ABKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CBKH <<  1)) <=  4096)) {
+            next__4AKH=(void *)((unsigned long)result__ABKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBKH)));
+          } else {
+            next__4AKH=new_lab__URJ(lab_type__BBKH);
+          };
+          ((__POINTER *)next__4AKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5AKH)[ 0]=next__4AKH;
+        } else {
+          ((__POINTER *)result__ABKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4AKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ABKH=next__4AKH;
+        };
+      };
+      ptr__NJNF=result__ABKH;
+    };
+    result__MJNF=((__LIP_BOOLEAN *)ptr__NJNF);
+    *(result__MJNF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__MJNF)->value__XDQD=TRUE__;
+  true__SELF=result__MJNF;
+  LIP_VALUE__->parent_lip_code__ZFFE=(*LIP_CODE__);
+  LIP_VALUE__->value__IKUE=NULL;
+  LIP_BINARY__->parent_lip_code__EQZB=(*LIP_CODE__);
+  LIP_BINARY__->left__UZQD=NULL;
+  LIP_BINARY__->right__XZQD=NULL;
+  LIP_BINARY__->operator__0ZQD='\0';
+  LIP_AFFECT__->parent_lip_code__RUPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__4GFC=NULL;
+  LIP_AFFECT__->value__QHFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__XOTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__YAUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__UBUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__NKID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__EEQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__DQTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__OQTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__VLYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__BVMD=NULL;
+  ptr__CVMD=((__POINTER )(NULL));
+  typ_id__HVMD= 0;
+  sz__EVMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__EVMD ==  0)) {
+    result__BVMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
   } else {
-    typ_id__QVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NVED);
-    if ((typ_id__QVED == (__INTEGER)(-  1))) {
-      a__CRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__DRFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVED + a__CRFH) & (__UINTEGER_32)(~ a__CRFH));
-      ptr_table__O5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DRFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__N5IH=((__POINTER )(NULL));
-      result__P5IH=((__POINTER *)ptr_table__O5IH)[ 0];
-      if ((result__P5IH == (void *)NULL)) {
-        result__P5IH=new_lab__MRJ(new_size__DRFH);
-        next__N5IH=(void *)((unsigned long)result__P5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DRFH)));
-        ((__POINTER *)next__N5IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O5IH)[ 0]=next__N5IH;
-      } else {
-        next__N5IH=((__POINTER *)result__P5IH)[ 0];
-        if ((next__N5IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DRFH <<  1)) <=  4096)) {
-            next__N5IH=(void *)((unsigned long)result__P5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DRFH)));
-          } else {
-            next__N5IH=new_lab__MRJ(new_size__DRFH);
-          };
-          ((__POINTER *)next__N5IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__O5IH)[ 0]=next__N5IH;
-        } else {
-          ((__POINTER *)result__P5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__P5IH=next__N5IH;
-        };
-      };
-      ptr__LVED=result__P5IH;
-    } else {
-      t__HRFH=((__UINTEGER_32 )typ_id__QVED);
-      a__GRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__W5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVED + a__GRFH) & (__UINTEGER_32)(~ a__GRFH));
-      ptr_table__T5IH=((__POINTER )(&(table_type[(t__HRFH)])));
-      lab_type__V5IH=(__UINTEGER_32)(t__HRFH |  1);
-      next__S5IH=((__POINTER )(NULL));
-      result__U5IH=((__POINTER *)ptr_table__T5IH)[ 0];
-      if ((result__U5IH == (void *)NULL)) {
-        result__U5IH=new_lab__MRJ(lab_type__V5IH);
-        next__S5IH=(void *)((unsigned long)result__U5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5IH)));
-        ((__POINTER *)next__S5IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__T5IH)[ 0]=next__S5IH;
-      } else {
-        next__S5IH=((__POINTER *)result__U5IH)[ 0];
-        if ((next__S5IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W5IH <<  1)) <=  4096)) {
-            next__S5IH=(void *)((unsigned long)result__U5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5IH)));
-          } else {
-            next__S5IH=new_lab__MRJ(lab_type__V5IH);
-          };
-          ((__POINTER *)next__S5IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__T5IH)[ 0]=next__S5IH;
-        } else {
-          ((__POINTER *)result__U5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__U5IH=next__S5IH;
-        };
-      };
-      ptr__LVED=result__U5IH;
-    };
-    result__KVED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__LVED);
-    *(result__KVED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
-  };
-  Self__SLSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__KVED);
-  new_capacity__TAXD=prime_number_ceiling__X41( 193);
-  sz__KKDH=((__UINTEGER_32 )(__INTEGER)(new_capacity__TAXD * ((__INTEGER )(sizeof(void *)))));
-  result__JKDH=((__POINTER )(NULL));
-  a__PKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LKDH=(__UINTEGER_32)((__UINTEGER_32)(sz__KKDH + a__PKDH) & (__UINTEGER_32)(~ a__PKDH));
-  new_size2__MKDH=(__UINTEGER_32)(new_size__LKDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MKDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__KRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__LRFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MKDH + a__KRFH) & (__UINTEGER_32)(~ a__KRFH));
-    ptr_table__Y5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LRFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__X5IH=((__POINTER )(NULL));
-    result__Z5IH=((__POINTER *)ptr_table__Y5IH)[ 0];
-    if ((result__Z5IH == (void *)NULL)) {
-      result__Z5IH=new_lab__MRJ(new_size__LRFH);
-      next__X5IH=(void *)((unsigned long)result__Z5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRFH)));
-      ((__POINTER *)next__X5IH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__Y5IH)[ 0]=next__X5IH;
-    } else {
-      next__X5IH=((__POINTER *)result__Z5IH)[ 0];
-      if ((next__X5IH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z5IH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LRFH <<  1)) <=  4096)) {
-          next__X5IH=(void *)((unsigned long)result__Z5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LRFH)));
-        } else {
-          next__X5IH=new_lab__MRJ(new_size__LRFH);
-        };
-        ((__POINTER *)next__X5IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Y5IH)[ 0]=next__X5IH;
-      } else {
-        ((__POINTER *)result__Z5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__Z5IH=next__X5IH;
-      };
-    };
-    ((__POINTER *)result__Z5IH)[ 0]=((__POINTER ) 3);
-    result__JKDH=(void *)((unsigned long)result__Z5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    typ_id__HVMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__EVMD);
+    if ((typ_id__HVMD == (__INTEGER)(-  1))) {
+      a__KSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__EVMD + a__KSGH) & (__UINTEGER_32)(~ a__KSGH));
+      ptr_table__EBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DBKH=((__POINTER )(NULL));
+      result__FBKH=((__POINTER *)ptr_table__EBKH)[ 0];
+      if ((result__FBKH == (void *)NULL)) {
+        result__FBKH=new_lab__URJ(new_size__LSGH);
+        next__DBKH=(void *)((unsigned long)result__FBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSGH)));
+        ((__POINTER *)next__DBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EBKH)[ 0]=next__DBKH;
+      } else {
+        next__DBKH=((__POINTER *)result__FBKH)[ 0];
+        if ((next__DBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FBKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LSGH <<  1)) <=  4096)) {
+            next__DBKH=(void *)((unsigned long)result__FBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSGH)));
+          } else {
+            next__DBKH=new_lab__URJ(new_size__LSGH);
+          };
+          ((__POINTER *)next__DBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EBKH)[ 0]=next__DBKH;
+        } else {
+          ((__POINTER *)result__FBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FBKH=next__DBKH;
+        };
+      };
+      ptr__CVMD=result__FBKH;
+    } else {
+      t__PSGH=((__UINTEGER_32 )typ_id__HVMD);
+      a__OSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__EVMD + a__OSGH) & (__UINTEGER_32)(~ a__OSGH));
+      ptr_table__JBKH=((__POINTER )(&(table_type[(t__PSGH)])));
+      lab_type__LBKH=(__UINTEGER_32)(t__PSGH |  1);
+      next__IBKH=((__POINTER )(NULL));
+      result__KBKH=((__POINTER *)ptr_table__JBKH)[ 0];
+      if ((result__KBKH == (void *)NULL)) {
+        result__KBKH=new_lab__URJ(lab_type__LBKH);
+        next__IBKH=(void *)((unsigned long)result__KBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBKH)));
+        ((__POINTER *)next__IBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JBKH)[ 0]=next__IBKH;
+      } else {
+        next__IBKH=((__POINTER *)result__KBKH)[ 0];
+        if ((next__IBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KBKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MBKH <<  1)) <=  4096)) {
+            next__IBKH=(void *)((unsigned long)result__KBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBKH)));
+          } else {
+            next__IBKH=new_lab__URJ(lab_type__LBKH);
+          };
+          ((__POINTER *)next__IBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JBKH)[ 0]=next__IBKH;
+        } else {
+          ((__POINTER *)result__KBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KBKH=next__IBKH;
+        };
+      };
+      ptr__CVMD=result__KBKH;
+    };
+    result__BVMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__CVMD);
+    *(result__BVMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__SFUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__BVMD);
+  if ((Self__SFUD->parent_arrayed_collection__NKID.capacity__YAUD <  5)) {
+    Self__SFUD->parent_arrayed_collection__NKID.storage__UBUD=create__C0IE( 5);
+    Self__SFUD->parent_arrayed_collection__NKID.capacity__YAUD= 5;
+  };
+  Self__SFUD->parent_arrayed_collection__NKID.upper__XOTD=(__INTEGER)(-  1);
+  free_list__OKID=result__BVMD;
+  LIP_IF__->parent_lip_code__GPYC=(*LIP_CODE__);
+  LIP_IF__->condition__IDQD=NULL;
+  LIP_IF__->then__4DQD=NULL;
+  LIP_IF__->else__VEQD=NULL;
+  LIP_PRINT__->parent_lip_code__YPYC=(*LIP_CODE__);
+  LIP_PRINT__->message__NEUE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__KVRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__FVRD= 0;
+  result__SVED=NULL;
+  ptr__TVED=((__POINTER )(NULL));
+  typ_id__YVED= 0;
+  sz__VVED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__VVED ==  0)) {
+    result__SVED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
   } else {
-    result__25IH=first_free__XDVB;
-    while ((((void *)result__25IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__25IH)->map_size_and_id__ITB &  4294967292LU) < new_size__LKDH))) {
-      result__25IH=((__MEMORY *)result__25IH)->map_next_free__JTB;
-    };
-    if (((void *)result__25IH == (void *)NULL)) {
-      result__25IH=new_page__OA5();
-    };
-    to_busy__index__TTFC(result__25IH,new_size__LKDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__25IH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__JKDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__25IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  Result__VVHE=((void **)result__JKDH);
-  Self__X2XE=(__INTEGER)(new_capacity__TAXD -  1);
-  while ((Self__X2XE >=  0)) {
-    Result__VVHE[Self__X2XE]=NULL;
-    Self__X2XE=(__INTEGER)(Self__X2XE -  1);
-  };
-  Self__SLSD->buckets__CVRD=Result__VVHE;
-  Self__SLSD->capacity__3URD=new_capacity__TAXD;
-  list_data__OONC=result__KVED;
-  push_back_flag__3YLF=FALSE__;
-  memory__BGLF='\0';
-  last_integer__3HUE= 0;
-  last_string__PIUE=create__NBB( 1024);
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__UAPF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__1GPF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__GHPF=NULL;
-  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__EJUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
-  result__MYMF=NULL;
-  ptr__NYMF=((__POINTER )(NULL));
-  typ_id__SYMF= 0;
-  sz__PYMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
-  if ((sz__PYMF ==  0)) {
-    result__MYMF=FAST_ARRAYoLIP_SLOT_DATAo__;
+    typ_id__YVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__VVED);
+    if ((typ_id__YVED == (__INTEGER)(-  1))) {
+      a__SSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VVED + a__SSGH) & (__UINTEGER_32)(~ a__SSGH));
+      ptr_table__OBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NBKH=((__POINTER )(NULL));
+      result__PBKH=((__POINTER *)ptr_table__OBKH)[ 0];
+      if ((result__PBKH == (void *)NULL)) {
+        result__PBKH=new_lab__URJ(new_size__TSGH);
+        next__NBKH=(void *)((unsigned long)result__PBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSGH)));
+        ((__POINTER *)next__NBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OBKH)[ 0]=next__NBKH;
+      } else {
+        next__NBKH=((__POINTER *)result__PBKH)[ 0];
+        if ((next__NBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PBKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TSGH <<  1)) <=  4096)) {
+            next__NBKH=(void *)((unsigned long)result__PBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSGH)));
+          } else {
+            next__NBKH=new_lab__URJ(new_size__TSGH);
+          };
+          ((__POINTER *)next__NBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OBKH)[ 0]=next__NBKH;
+        } else {
+          ((__POINTER *)result__PBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PBKH=next__NBKH;
+        };
+      };
+      ptr__TVED=result__PBKH;
+    } else {
+      t__XSGH=((__UINTEGER_32 )typ_id__YVED);
+      a__WSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VVED + a__WSGH) & (__UINTEGER_32)(~ a__WSGH));
+      ptr_table__TBKH=((__POINTER )(&(table_type[(t__XSGH)])));
+      lab_type__VBKH=(__UINTEGER_32)(t__XSGH |  1);
+      next__SBKH=((__POINTER )(NULL));
+      result__UBKH=((__POINTER *)ptr_table__TBKH)[ 0];
+      if ((result__UBKH == (void *)NULL)) {
+        result__UBKH=new_lab__URJ(lab_type__VBKH);
+        next__SBKH=(void *)((unsigned long)result__UBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBKH)));
+        ((__POINTER *)next__SBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TBKH)[ 0]=next__SBKH;
+      } else {
+        next__SBKH=((__POINTER *)result__UBKH)[ 0];
+        if ((next__SBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UBKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WBKH <<  1)) <=  4096)) {
+            next__SBKH=(void *)((unsigned long)result__UBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBKH)));
+          } else {
+            next__SBKH=new_lab__URJ(lab_type__VBKH);
+          };
+          ((__POINTER *)next__SBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TBKH)[ 0]=next__SBKH;
+        } else {
+          ((__POINTER *)result__UBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UBKH=next__SBKH;
+        };
+      };
+      ptr__TVED=result__UBKH;
+    };
+    result__SVED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__TVED);
+    *(result__SVED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__0LSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__SVED);
+  new_capacity__1AXD=prime_number_ceiling__541( 193);
+  sz__CLEH=((__UINTEGER_32 )(__INTEGER)(new_capacity__1AXD * ((__INTEGER )(sizeof(void *)))));
+  result__BLEH=((__POINTER )(NULL));
+  a__HLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__DLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__CLEH + a__HLEH) & (__UINTEGER_32)(~ a__HLEH));
+  new_size2__ELEH=(__UINTEGER_32)(new_size__DLEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ELEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__0SGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1SGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ELEH + a__0SGH) & (__UINTEGER_32)(~ a__0SGH));
+    ptr_table__YBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1SGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XBKH=((__POINTER )(NULL));
+    result__ZBKH=((__POINTER *)ptr_table__YBKH)[ 0];
+    if ((result__ZBKH == (void *)NULL)) {
+      result__ZBKH=new_lab__URJ(new_size__1SGH);
+      next__XBKH=(void *)((unsigned long)result__ZBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SGH)));
+      ((__POINTER *)next__XBKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YBKH)[ 0]=next__XBKH;
+    } else {
+      next__XBKH=((__POINTER *)result__ZBKH)[ 0];
+      if ((next__XBKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZBKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1SGH <<  1)) <=  4096)) {
+          next__XBKH=(void *)((unsigned long)result__ZBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SGH)));
+        } else {
+          next__XBKH=new_lab__URJ(new_size__1SGH);
+        };
+        ((__POINTER *)next__XBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YBKH)[ 0]=next__XBKH;
+      } else {
+        ((__POINTER *)result__ZBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZBKH=next__XBKH;
+      };
+    };
+    ((__POINTER *)result__ZBKH)[ 0]=((__POINTER ) 3);
+    result__BLEH=(void *)((unsigned long)result__ZBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    typ_id__SYMF=__FAST_ARRAYoLIP_SLOT_DATAo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PYMF);
-    if ((typ_id__SYMF == (__INTEGER)(-  1))) {
-      a__RRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SRFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYMF + a__RRFH) & (__UINTEGER_32)(~ a__RRFH));
-      ptr_table__AAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SRFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__55IH=((__POINTER )(NULL));
-      result__BAJH=((__POINTER *)ptr_table__AAJH)[ 0];
-      if ((result__BAJH == (void *)NULL)) {
-        result__BAJH=new_lab__MRJ(new_size__SRFH);
-        next__55IH=(void *)((unsigned long)result__BAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SRFH)));
-        ((__POINTER *)next__55IH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__AAJH)[ 0]=next__55IH;
-      } else {
-        next__55IH=((__POINTER *)result__BAJH)[ 0];
-        if ((next__55IH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BAJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SRFH <<  1)) <=  4096)) {
-            next__55IH=(void *)((unsigned long)result__BAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SRFH)));
-          } else {
-            next__55IH=new_lab__MRJ(new_size__SRFH);
-          };
-          ((__POINTER *)next__55IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AAJH)[ 0]=next__55IH;
-        } else {
-          ((__POINTER *)result__BAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__55IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BAJH=next__55IH;
-        };
-      };
-      ptr__NYMF=result__BAJH;
-    } else {
-      t__WRFH=((__UINTEGER_32 )typ_id__SYMF);
-      a__VRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__IAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYMF + a__VRFH) & (__UINTEGER_32)(~ a__VRFH));
-      ptr_table__FAJH=((__POINTER )(&(table_type[(t__WRFH)])));
-      lab_type__HAJH=(__UINTEGER_32)(t__WRFH |  1);
-      next__EAJH=((__POINTER )(NULL));
-      result__GAJH=((__POINTER *)ptr_table__FAJH)[ 0];
-      if ((result__GAJH == (void *)NULL)) {
-        result__GAJH=new_lab__MRJ(lab_type__HAJH);
-        next__EAJH=(void *)((unsigned long)result__GAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAJH)));
-        ((__POINTER *)next__EAJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FAJH)[ 0]=next__EAJH;
-      } else {
-        next__EAJH=((__POINTER *)result__GAJH)[ 0];
-        if ((next__EAJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GAJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IAJH <<  1)) <=  4096)) {
-            next__EAJH=(void *)((unsigned long)result__GAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IAJH)));
-          } else {
-            next__EAJH=new_lab__MRJ(lab_type__HAJH);
-          };
-          ((__POINTER *)next__EAJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FAJH)[ 0]=next__EAJH;
-        } else {
-          ((__POINTER *)result__GAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GAJH=next__EAJH;
-        };
-      };
-      ptr__NYMF=result__GAJH;
-    };
-    result__MYMF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__NYMF);
-    *(result__MYMF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
-  };
-  Self__SGPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__MYMF);
-  if ((Self__SGPF->parent_arrayed_collection__EJUE.capacity__1GPF <  8)) {
-    sz__SKDH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
-    result__RKDH=((__POINTER )(NULL));
-    a__XKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__TKDH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKDH + a__XKDH) & (__UINTEGER_32)(~ a__XKDH));
-    new_size2__UKDH=(__UINTEGER_32)(new_size__TKDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__UKDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__ZRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0RFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UKDH + a__ZRFH) & (__UINTEGER_32)(~ a__ZRFH));
-      ptr_table__KAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0RFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__JAJH=((__POINTER )(NULL));
-      result__LAJH=((__POINTER *)ptr_table__KAJH)[ 0];
-      if ((result__LAJH == (void *)NULL)) {
-        result__LAJH=new_lab__MRJ(new_size__0RFH);
-        next__JAJH=(void *)((unsigned long)result__LAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RFH)));
-        ((__POINTER *)next__JAJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KAJH)[ 0]=next__JAJH;
-      } else {
-        next__JAJH=((__POINTER *)result__LAJH)[ 0];
-        if ((next__JAJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LAJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0RFH <<  1)) <=  4096)) {
-            next__JAJH=(void *)((unsigned long)result__LAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RFH)));
-          } else {
-            next__JAJH=new_lab__MRJ(new_size__0RFH);
-          };
-          ((__POINTER *)next__JAJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KAJH)[ 0]=next__JAJH;
-        } else {
-          ((__POINTER *)result__LAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LAJH=next__JAJH;
-        };
-      };
-      ((__POINTER *)result__LAJH)[ 0]=((__POINTER ) 3);
-      result__RKDH=(void *)((unsigned long)result__LAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__OAJH=first_free__XDVB;
-      while ((((void *)result__OAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OAJH)->map_size_and_id__ITB &  4294967292LU) < new_size__TKDH))) {
-        result__OAJH=((__MEMORY *)result__OAJH)->map_next_free__JTB;
-      };
-      if (((void *)result__OAJH == (void *)NULL)) {
-        result__OAJH=new_page__OA5();
-      };
-      to_busy__index__TTFC(result__OAJH,new_size__TKDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OAJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-      result__RKDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__EG0F=((void **)result__RKDH);
-    Self__GC5F= 7;
-    while ((Self__GC5F >=  0)) {
-      Result__EG0F[Self__GC5F]=NULL;
-      Self__GC5F=(__INTEGER)(Self__GC5F -  1);
-    };
-    Self__SGPF->parent_arrayed_collection__EJUE.storage__GHPF=Result__EG0F;
-    Self__SGPF->parent_arrayed_collection__EJUE.capacity__1GPF= 8;
-  };
-  Self__SGPF->parent_arrayed_collection__EJUE.upper__UAPF=(__INTEGER)(-  1);
-  stack__FJUE=result__MYMF;
-  path_file__PDWF=create_with_capacity__BHRC( 3000);
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__C3JF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__2BPF= 0;
-  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__HCPF=NULL;
-  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__Y2JF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
-  result__LJMF=NULL;
-  ptr__MJMF=((__POINTER )(NULL));
-  typ_id__RJMF= 0;
-  sz__OJMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
-  if ((sz__OJMF ==  0)) {
-    result__LJMF=FAST_ARRAYoLIP_SLOT_CODEo__;
+    result__2BKH=first_free__5DVB;
+    while ((((void *)result__2BKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2BKH)->map_size_and_id__QTB &  4294967292LU) < new_size__DLEH))) {
+      result__2BKH=((__MEMORY *)result__2BKH)->map_next_free__RTB;
+    };
+    if (((void *)result__2BKH == (void *)NULL)) {
+      result__2BKH=new_page__WA5();
+    };
+    to_busy__index__1TFC(result__2BKH,new_size__DLEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2BKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__BLEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2BKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__STHE=((void **)result__BLEH);
+  Self__02XE=(__INTEGER)(new_capacity__1AXD -  1);
+  while ((Self__02XE >=  0)) {
+    Result__STHE[Self__02XE]=NULL;
+    Self__02XE=(__INTEGER)(Self__02XE -  1);
+  };
+  Self__0LSD->buckets__KVRD=Result__STHE;
+  Self__0LSD->capacity__FVRD=new_capacity__1AXD;
+  list_data__WONC=result__SVED;
+  push_back_flag__JEMF=FALSE__;
+  memory__NRLF='\0';
+  last_integer__AIUE= 0;
+  last_string__SIUE=create__TBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__YMPF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__5SPF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__KTPF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__HJUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__EENF=NULL;
+  ptr__FENF=((__POINTER )(NULL));
+  typ_id__KENF= 0;
+  sz__HENF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__HENF ==  0)) {
+    result__EENF=FAST_ARRAYoLIP_SLOT_DATAo__;
   } else {
-    typ_id__RJMF=__FAST_ARRAYoLIP_SLOT_CODEo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OJMF);
-    if ((typ_id__RJMF == (__INTEGER)(-  1))) {
-      a__ASFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__OJMF + a__ASFH) & (__UINTEGER_32)(~ a__ASFH));
-      ptr_table__SAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__RAJH=((__POINTER )(NULL));
-      result__TAJH=((__POINTER *)ptr_table__SAJH)[ 0];
-      if ((result__TAJH == (void *)NULL)) {
-        result__TAJH=new_lab__MRJ(new_size__BSFH);
-        next__RAJH=(void *)((unsigned long)result__TAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSFH)));
-        ((__POINTER *)next__RAJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SAJH)[ 0]=next__RAJH;
-      } else {
-        next__RAJH=((__POINTER *)result__TAJH)[ 0];
-        if ((next__RAJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TAJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BSFH <<  1)) <=  4096)) {
-            next__RAJH=(void *)((unsigned long)result__TAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSFH)));
-          } else {
-            next__RAJH=new_lab__MRJ(new_size__BSFH);
-          };
-          ((__POINTER *)next__RAJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SAJH)[ 0]=next__RAJH;
-        } else {
-          ((__POINTER *)result__TAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__TAJH=next__RAJH;
-        };
-      };
-      ptr__MJMF=result__TAJH;
-    } else {
-      t__FSFH=((__UINTEGER_32 )typ_id__RJMF);
-      a__ESFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0AJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OJMF + a__ESFH) & (__UINTEGER_32)(~ a__ESFH));
-      ptr_table__XAJH=((__POINTER )(&(table_type[(t__FSFH)])));
-      lab_type__ZAJH=(__UINTEGER_32)(t__FSFH |  1);
-      next__WAJH=((__POINTER )(NULL));
-      result__YAJH=((__POINTER *)ptr_table__XAJH)[ 0];
-      if ((result__YAJH == (void *)NULL)) {
-        result__YAJH=new_lab__MRJ(lab_type__ZAJH);
-        next__WAJH=(void *)((unsigned long)result__YAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AJH)));
-        ((__POINTER *)next__WAJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__XAJH)[ 0]=next__WAJH;
-      } else {
-        next__WAJH=((__POINTER *)result__YAJH)[ 0];
-        if ((next__WAJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YAJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0AJH <<  1)) <=  4096)) {
-            next__WAJH=(void *)((unsigned long)result__YAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AJH)));
-          } else {
-            next__WAJH=new_lab__MRJ(lab_type__ZAJH);
-          };
-          ((__POINTER *)next__WAJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XAJH)[ 0]=next__WAJH;
-        } else {
-          ((__POINTER *)result__YAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YAJH=next__WAJH;
-        };
-      };
-      ptr__MJMF=result__YAJH;
-    };
-    result__LJMF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__MJMF);
-    *(result__LJMF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
-  };
-  Self__TBPF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__LJMF);
-  if ((Self__TBPF->parent_arrayed_collection__Y2JF.capacity__2BPF <  32)) {
-    sz__0KDH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
-    result__ZKDH=((__POINTER )(NULL));
-    a__5KDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__1KDH=(__UINTEGER_32)((__UINTEGER_32)(sz__0KDH + a__5KDH) & (__UINTEGER_32)(~ a__5KDH));
-    new_size2__2KDH=(__UINTEGER_32)(new_size__1KDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__2KDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__ISFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__JSFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2KDH + a__ISFH) & (__UINTEGER_32)(~ a__ISFH));
-      ptr_table__2AJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__1AJH=((__POINTER )(NULL));
-      result__3AJH=((__POINTER *)ptr_table__2AJH)[ 0];
-      if ((result__3AJH == (void *)NULL)) {
-        result__3AJH=new_lab__MRJ(new_size__JSFH);
-        next__1AJH=(void *)((unsigned long)result__3AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSFH)));
-        ((__POINTER *)next__1AJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__2AJH)[ 0]=next__1AJH;
-      } else {
-        next__1AJH=((__POINTER *)result__3AJH)[ 0];
-        if ((next__1AJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3AJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JSFH <<  1)) <=  4096)) {
-            next__1AJH=(void *)((unsigned long)result__3AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSFH)));
-          } else {
-            next__1AJH=new_lab__MRJ(new_size__JSFH);
-          };
-          ((__POINTER *)next__1AJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2AJH)[ 0]=next__1AJH;
-        } else {
-          ((__POINTER *)result__3AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3AJH=next__1AJH;
-        };
-      };
-      ((__POINTER *)result__3AJH)[ 0]=((__POINTER ) 3);
-      result__ZKDH=(void *)((unsigned long)result__3AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__ABJH=first_free__XDVB;
-      while ((((void *)result__ABJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ABJH)->map_size_and_id__ITB &  4294967292LU) < new_size__1KDH))) {
-        result__ABJH=((__MEMORY *)result__ABJH)->map_next_free__JTB;
-      };
-      if (((void *)result__ABJH == (void *)NULL)) {
-        result__ABJH=new_page__OA5();
-      };
-      to_busy__index__TTFC(result__ABJH,new_size__1KDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ABJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-      result__ZKDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ABJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__LB0F=((void **)result__ZKDH);
-    Self__5A5F= 31;
-    while ((Self__5A5F >=  0)) {
-      Result__LB0F[Self__5A5F]=NULL;
-      Self__5A5F=(__INTEGER)(Self__5A5F -  1);
-    };
-    Self__TBPF->parent_arrayed_collection__Y2JF.storage__HCPF=Result__LB0F;
-    Self__TBPF->parent_arrayed_collection__Y2JF.capacity__2BPF= 32;
-  };
-  Self__TBPF->parent_arrayed_collection__Y2JF.upper__C3JF=(__INTEGER)(-  1);
-  list_method__Z2JF=result__LJMF;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__CPEC=NULL;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__3OEC= 0;
-  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__5YFC= 0;
-  result__E3YB=NULL;
-  ptr__F3YB=((__POINTER )(NULL));
-  typ_id__K3YB= 0;
-  sz__H3YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
-  if ((sz__H3YB ==  0)) {
-    result__E3YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    typ_id__KENF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__HENF);
+    if ((typ_id__KENF == (__INTEGER)(-  1))) {
+      a__BTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__HENF + a__BTGH) & (__UINTEGER_32)(~ a__BTGH));
+      ptr_table__ACKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5BKH=((__POINTER )(NULL));
+      result__BCKH=((__POINTER *)ptr_table__ACKH)[ 0];
+      if ((result__BCKH == (void *)NULL)) {
+        result__BCKH=new_lab__URJ(new_size__CTGH);
+        next__5BKH=(void *)((unsigned long)result__BCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTGH)));
+        ((__POINTER *)next__5BKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ACKH)[ 0]=next__5BKH;
+      } else {
+        next__5BKH=((__POINTER *)result__BCKH)[ 0];
+        if ((next__5BKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BCKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CTGH <<  1)) <=  4096)) {
+            next__5BKH=(void *)((unsigned long)result__BCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTGH)));
+          } else {
+            next__5BKH=new_lab__URJ(new_size__CTGH);
+          };
+          ((__POINTER *)next__5BKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ACKH)[ 0]=next__5BKH;
+        } else {
+          ((__POINTER *)result__BCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5BKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BCKH=next__5BKH;
+        };
+      };
+      ptr__FENF=result__BCKH;
+    } else {
+      t__GTGH=((__UINTEGER_32 )typ_id__KENF);
+      a__FTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ICKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HENF + a__FTGH) & (__UINTEGER_32)(~ a__FTGH));
+      ptr_table__FCKH=((__POINTER )(&(table_type[(t__GTGH)])));
+      lab_type__HCKH=(__UINTEGER_32)(t__GTGH |  1);
+      next__ECKH=((__POINTER )(NULL));
+      result__GCKH=((__POINTER *)ptr_table__FCKH)[ 0];
+      if ((result__GCKH == (void *)NULL)) {
+        result__GCKH=new_lab__URJ(lab_type__HCKH);
+        next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ICKH)));
+        ((__POINTER *)next__ECKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FCKH)[ 0]=next__ECKH;
+      } else {
+        next__ECKH=((__POINTER *)result__GCKH)[ 0];
+        if ((next__ECKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GCKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ICKH <<  1)) <=  4096)) {
+            next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ICKH)));
+          } else {
+            next__ECKH=new_lab__URJ(lab_type__HCKH);
+          };
+          ((__POINTER *)next__ECKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FCKH)[ 0]=next__ECKH;
+        } else {
+          ((__POINTER *)result__GCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ECKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GCKH=next__ECKH;
+        };
+      };
+      ptr__FENF=result__GCKH;
+    };
+    result__EENF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__FENF);
+    *(result__EENF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__WSPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__EENF);
+  if ((Self__WSPF->parent_arrayed_collection__HJUE.capacity__5SPF <  8)) {
+    sz__KLEH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__JLEH=((__POINTER )(NULL));
+    a__PLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__KLEH + a__PLEH) & (__UINTEGER_32)(~ a__PLEH));
+    new_size2__MLEH=(__UINTEGER_32)(new_size__LLEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__MLEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__JTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KTGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MLEH + a__JTGH) & (__UINTEGER_32)(~ a__JTGH));
+      ptr_table__KCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JCKH=((__POINTER )(NULL));
+      result__LCKH=((__POINTER *)ptr_table__KCKH)[ 0];
+      if ((result__LCKH == (void *)NULL)) {
+        result__LCKH=new_lab__URJ(new_size__KTGH);
+        next__JCKH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTGH)));
+        ((__POINTER *)next__JCKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KCKH)[ 0]=next__JCKH;
+      } else {
+        next__JCKH=((__POINTER *)result__LCKH)[ 0];
+        if ((next__JCKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LCKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KTGH <<  1)) <=  4096)) {
+            next__JCKH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTGH)));
+          } else {
+            next__JCKH=new_lab__URJ(new_size__KTGH);
+          };
+          ((__POINTER *)next__JCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KCKH)[ 0]=next__JCKH;
+        } else {
+          ((__POINTER *)result__LCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LCKH=next__JCKH;
+        };
+      };
+      ((__POINTER *)result__LCKH)[ 0]=((__POINTER ) 3);
+      result__JLEH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__OCKH=first_free__5DVB;
+      while ((((void *)result__OCKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OCKH)->map_size_and_id__QTB &  4294967292LU) < new_size__LLEH))) {
+        result__OCKH=((__MEMORY *)result__OCKH)->map_next_free__RTB;
+      };
+      if (((void *)result__OCKH == (void *)NULL)) {
+        result__OCKH=new_page__WA5();
+      };
+      to_busy__index__1TFC(result__OCKH,new_size__LLEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OCKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+      result__JLEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OCKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__KU0F=((void **)result__JLEH);
+    Self__0Z5F= 7;
+    while ((Self__0Z5F >=  0)) {
+      Result__KU0F[Self__0Z5F]=NULL;
+      Self__0Z5F=(__INTEGER)(Self__0Z5F -  1);
+    };
+    Self__WSPF->parent_arrayed_collection__HJUE.storage__KTPF=Result__KU0F;
+    Self__WSPF->parent_arrayed_collection__HJUE.capacity__5SPF= 8;
+  };
+  Self__WSPF->parent_arrayed_collection__HJUE.upper__YMPF=(__INTEGER)(-  1);
+  stack__IJUE=result__EENF;
+  path_file__TPWF=create_with_capacity__JHRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__EIKF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__AOPF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__LOPF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__0HKF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__DVMF=NULL;
+  ptr__EVMF=((__POINTER )(NULL));
+  typ_id__JVMF= 0;
+  sz__GVMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__GVMF ==  0)) {
+    result__DVMF=FAST_ARRAYoLIP_SLOT_CODEo__;
+  } else {
+    typ_id__JVMF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__GVMF);
+    if ((typ_id__JVMF == (__INTEGER)(-  1))) {
+      a__QTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GVMF + a__QTGH) & (__UINTEGER_32)(~ a__QTGH));
+      ptr_table__SCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__RCKH=((__POINTER )(NULL));
+      result__TCKH=((__POINTER *)ptr_table__SCKH)[ 0];
+      if ((result__TCKH == (void *)NULL)) {
+        result__TCKH=new_lab__URJ(new_size__RTGH);
+        next__RCKH=(void *)((unsigned long)result__TCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTGH)));
+        ((__POINTER *)next__RCKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SCKH)[ 0]=next__RCKH;
+      } else {
+        next__RCKH=((__POINTER *)result__TCKH)[ 0];
+        if ((next__RCKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TCKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__RTGH <<  1)) <=  4096)) {
+            next__RCKH=(void *)((unsigned long)result__TCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTGH)));
+          } else {
+            next__RCKH=new_lab__URJ(new_size__RTGH);
+          };
+          ((__POINTER *)next__RCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SCKH)[ 0]=next__RCKH;
+        } else {
+          ((__POINTER *)result__TCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TCKH=next__RCKH;
+        };
+      };
+      ptr__EVMF=result__TCKH;
+    } else {
+      t__VTGH=((__UINTEGER_32 )typ_id__JVMF);
+      a__UTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0CKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GVMF + a__UTGH) & (__UINTEGER_32)(~ a__UTGH));
+      ptr_table__XCKH=((__POINTER )(&(table_type[(t__VTGH)])));
+      lab_type__ZCKH=(__UINTEGER_32)(t__VTGH |  1);
+      next__WCKH=((__POINTER )(NULL));
+      result__YCKH=((__POINTER *)ptr_table__XCKH)[ 0];
+      if ((result__YCKH == (void *)NULL)) {
+        result__YCKH=new_lab__URJ(lab_type__ZCKH);
+        next__WCKH=(void *)((unsigned long)result__YCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CKH)));
+        ((__POINTER *)next__WCKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XCKH)[ 0]=next__WCKH;
+      } else {
+        next__WCKH=((__POINTER *)result__YCKH)[ 0];
+        if ((next__WCKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YCKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0CKH <<  1)) <=  4096)) {
+            next__WCKH=(void *)((unsigned long)result__YCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CKH)));
+          } else {
+            next__WCKH=new_lab__URJ(lab_type__ZCKH);
+          };
+          ((__POINTER *)next__WCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XCKH)[ 0]=next__WCKH;
+        } else {
+          ((__POINTER *)result__YCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YCKH=next__WCKH;
+        };
+      };
+      ptr__EVMF=result__YCKH;
+    };
+    result__DVMF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__EVMF);
+    *(result__DVMF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__XNPF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__DVMF);
+  if ((Self__XNPF->parent_arrayed_collection__0HKF.capacity__AOPF <  32)) {
+    sz__SLEH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__RLEH=((__POINTER )(NULL));
+    a__XLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__TLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SLEH + a__XLEH) & (__UINTEGER_32)(~ a__XLEH));
+    new_size2__ULEH=(__UINTEGER_32)(new_size__TLEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__ULEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__YTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZTGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ULEH + a__YTGH) & (__UINTEGER_32)(~ a__YTGH));
+      ptr_table__2CKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1CKH=((__POINTER )(NULL));
+      result__3CKH=((__POINTER *)ptr_table__2CKH)[ 0];
+      if ((result__3CKH == (void *)NULL)) {
+        result__3CKH=new_lab__URJ(new_size__ZTGH);
+        next__1CKH=(void *)((unsigned long)result__3CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZTGH)));
+        ((__POINTER *)next__1CKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2CKH)[ 0]=next__1CKH;
+      } else {
+        next__1CKH=((__POINTER *)result__3CKH)[ 0];
+        if ((next__1CKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3CKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ZTGH <<  1)) <=  4096)) {
+            next__1CKH=(void *)((unsigned long)result__3CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZTGH)));
+          } else {
+            next__1CKH=new_lab__URJ(new_size__ZTGH);
+          };
+          ((__POINTER *)next__1CKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2CKH)[ 0]=next__1CKH;
+        } else {
+          ((__POINTER *)result__3CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1CKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3CKH=next__1CKH;
+        };
+      };
+      ((__POINTER *)result__3CKH)[ 0]=((__POINTER ) 3);
+      result__RLEH=(void *)((unsigned long)result__3CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__ADKH=first_free__5DVB;
+      while ((((void *)result__ADKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ADKH)->map_size_and_id__QTB &  4294967292LU) < new_size__TLEH))) {
+        result__ADKH=((__MEMORY *)result__ADKH)->map_next_free__RTB;
+      };
+      if (((void *)result__ADKH == (void *)NULL)) {
+        result__ADKH=new_page__WA5();
+      };
+      to_busy__index__1TFC(result__ADKH,new_size__TLEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ADKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+      result__RLEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ADKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__RP0F=((void **)result__RLEH);
+    Self__TY5F= 31;
+    while ((Self__TY5F >=  0)) {
+      Result__RP0F[Self__TY5F]=NULL;
+      Self__TY5F=(__INTEGER)(Self__TY5F -  1);
+    };
+    Self__XNPF->parent_arrayed_collection__0HKF.storage__LOPF=Result__RP0F;
+    Self__XNPF->parent_arrayed_collection__0HKF.capacity__AOPF= 32;
+  };
+  Self__XNPF->parent_arrayed_collection__0HKF.upper__EIKF=(__INTEGER)(-  1);
+  list_method__1HKF=result__DVMF;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__KPEC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__FPEC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__HZFC= 0;
+  result__M3YB=NULL;
+  ptr__N3YB=((__POINTER )(NULL));
+  typ_id__S3YB= 0;
+  sz__P3YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__P3YB ==  0)) {
+    result__M3YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
   } else {
-    typ_id__K3YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__H3YB);
-    if ((typ_id__K3YB == (__INTEGER)(-  1))) {
-      a__PSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3YB + a__PSFH) & (__UINTEGER_32)(~ a__PSFH));
-      ptr_table__EBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__DBJH=((__POINTER )(NULL));
-      result__FBJH=((__POINTER *)ptr_table__EBJH)[ 0];
-      if ((result__FBJH == (void *)NULL)) {
-        result__FBJH=new_lab__MRJ(new_size__QSFH);
-        next__DBJH=(void *)((unsigned long)result__FBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSFH)));
-        ((__POINTER *)next__DBJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EBJH)[ 0]=next__DBJH;
-      } else {
-        next__DBJH=((__POINTER *)result__FBJH)[ 0];
-        if ((next__DBJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FBJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QSFH <<  1)) <=  4096)) {
-            next__DBJH=(void *)((unsigned long)result__FBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QSFH)));
-          } else {
-            next__DBJH=new_lab__MRJ(new_size__QSFH);
-          };
-          ((__POINTER *)next__DBJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EBJH)[ 0]=next__DBJH;
-        } else {
-          ((__POINTER *)result__FBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FBJH=next__DBJH;
-        };
-      };
-      ptr__F3YB=result__FBJH;
-    } else {
-      t__USFH=((__UINTEGER_32 )typ_id__K3YB);
-      a__TSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__MBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__H3YB + a__TSFH) & (__UINTEGER_32)(~ a__TSFH));
-      ptr_table__JBJH=((__POINTER )(&(table_type[(t__USFH)])));
-      lab_type__LBJH=(__UINTEGER_32)(t__USFH |  1);
-      next__IBJH=((__POINTER )(NULL));
-      result__KBJH=((__POINTER *)ptr_table__JBJH)[ 0];
-      if ((result__KBJH == (void *)NULL)) {
-        result__KBJH=new_lab__MRJ(lab_type__LBJH);
-        next__IBJH=(void *)((unsigned long)result__KBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBJH)));
-        ((__POINTER *)next__IBJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__JBJH)[ 0]=next__IBJH;
-      } else {
-        next__IBJH=((__POINTER *)result__KBJH)[ 0];
-        if ((next__IBJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KBJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MBJH <<  1)) <=  4096)) {
-            next__IBJH=(void *)((unsigned long)result__KBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBJH)));
-          } else {
-            next__IBJH=new_lab__MRJ(lab_type__LBJH);
-          };
-          ((__POINTER *)next__IBJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JBJH)[ 0]=next__IBJH;
-        } else {
-          ((__POINTER *)result__KBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KBJH=next__IBJH;
-        };
-      };
-      ptr__F3YB=result__KBJH;
-    };
-    result__E3YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__F3YB);
-    *(result__E3YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
-  };
-  Self__CXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__E3YB);
-  new_capacity__AGOC=prime_number_ceiling__X41( 193);
-  Self__CXFC->buckets__CPEC=create__31XC(new_capacity__AGOC);
-  Self__CXFC->capacity__3OEC=new_capacity__AGOC;
-  Self__CXFC->count__5YFC= 0;
-  bucket_name__DVOB=result__E3YB;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__OPEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__ZPEC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__BQEC=NULL;
-  SECTION___->name__CZDC=NULL;
-  SECTION___->type_list__RXFC=NULL;
-  last_section__X0C=NULL;
-  PROTOTYPE__->last_slot__O1C=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__IREC=NULL;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__DREC= 0;
-  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__Z1FC= 0;
-  result__JAZB=NULL;
-  ptr__KAZB=((__POINTER )(NULL));
-  typ_id__PAZB= 0;
-  sz__MAZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-  if ((sz__MAZB ==  0)) {
-    result__JAZB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    typ_id__S3YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__P3YB);
+    if ((typ_id__S3YB == (__INTEGER)(-  1))) {
+      a__5TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__P3YB + a__5TGH) & (__UINTEGER_32)(~ a__5TGH));
+      ptr_table__EDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DDKH=((__POINTER )(NULL));
+      result__FDKH=((__POINTER *)ptr_table__EDKH)[ 0];
+      if ((result__FDKH == (void *)NULL)) {
+        result__FDKH=new_lab__URJ(new_size__AUGH);
+        next__DDKH=(void *)((unsigned long)result__FDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUGH)));
+        ((__POINTER *)next__DDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EDKH)[ 0]=next__DDKH;
+      } else {
+        next__DDKH=((__POINTER *)result__FDKH)[ 0];
+        if ((next__DDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FDKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AUGH <<  1)) <=  4096)) {
+            next__DDKH=(void *)((unsigned long)result__FDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUGH)));
+          } else {
+            next__DDKH=new_lab__URJ(new_size__AUGH);
+          };
+          ((__POINTER *)next__DDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EDKH)[ 0]=next__DDKH;
+        } else {
+          ((__POINTER *)result__FDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FDKH=next__DDKH;
+        };
+      };
+      ptr__N3YB=result__FDKH;
+    } else {
+      t__EUGH=((__UINTEGER_32 )typ_id__S3YB);
+      a__DUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__P3YB + a__DUGH) & (__UINTEGER_32)(~ a__DUGH));
+      ptr_table__JDKH=((__POINTER )(&(table_type[(t__EUGH)])));
+      lab_type__LDKH=(__UINTEGER_32)(t__EUGH |  1);
+      next__IDKH=((__POINTER )(NULL));
+      result__KDKH=((__POINTER *)ptr_table__JDKH)[ 0];
+      if ((result__KDKH == (void *)NULL)) {
+        result__KDKH=new_lab__URJ(lab_type__LDKH);
+        next__IDKH=(void *)((unsigned long)result__KDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDKH)));
+        ((__POINTER *)next__IDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JDKH)[ 0]=next__IDKH;
+      } else {
+        next__IDKH=((__POINTER *)result__KDKH)[ 0];
+        if ((next__IDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KDKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MDKH <<  1)) <=  4096)) {
+            next__IDKH=(void *)((unsigned long)result__KDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDKH)));
+          } else {
+            next__IDKH=new_lab__URJ(lab_type__LDKH);
+          };
+          ((__POINTER *)next__IDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JDKH)[ 0]=next__IDKH;
+        } else {
+          ((__POINTER *)result__KDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KDKH=next__IDKH;
+        };
+      };
+      ptr__N3YB=result__KDKH;
+    };
+    result__M3YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__N3YB);
+    *(result__M3YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__KXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__M3YB);
+  new_capacity__IGOC=prime_number_ceiling__541( 193);
+  Self__KXFC->buckets__KPEC=create__F2XC(new_capacity__IGOC);
+  Self__KXFC->capacity__FPEC=new_capacity__IGOC;
+  Self__KXFC->count__HZFC= 0;
+  bucket_name__LVOB=result__M3YB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__WPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__BQEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__JQEC=NULL;
+  SECTION___->name__KZDC=NULL;
+  SECTION___->type_list__ZXFC=NULL;
+  last_section__50C=NULL;
+  PROTOTYPE__->last_slot__W1C=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__QREC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__LREC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__B2FC= 0;
+  result__RAZB=NULL;
+  ptr__SAZB=((__POINTER )(NULL));
+  typ_id__XAZB= 0;
+  sz__UAZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__UAZB ==  0)) {
+    result__RAZB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    typ_id__PAZB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MAZB);
-    if ((typ_id__PAZB == (__INTEGER)(-  1))) {
-      a__XSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__YSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAZB + a__XSFH) & (__UINTEGER_32)(~ a__XSFH));
-      ptr_table__OBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NBJH=((__POINTER )(NULL));
-      result__PBJH=((__POINTER *)ptr_table__OBJH)[ 0];
-      if ((result__PBJH == (void *)NULL)) {
-        result__PBJH=new_lab__MRJ(new_size__YSFH);
-        next__NBJH=(void *)((unsigned long)result__PBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSFH)));
-        ((__POINTER *)next__NBJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OBJH)[ 0]=next__NBJH;
-      } else {
-        next__NBJH=((__POINTER *)result__PBJH)[ 0];
-        if ((next__NBJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PBJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YSFH <<  1)) <=  4096)) {
-            next__NBJH=(void *)((unsigned long)result__PBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSFH)));
-          } else {
-            next__NBJH=new_lab__MRJ(new_size__YSFH);
-          };
-          ((__POINTER *)next__NBJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OBJH)[ 0]=next__NBJH;
-        } else {
-          ((__POINTER *)result__PBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PBJH=next__NBJH;
-        };
-      };
-      ptr__KAZB=result__PBJH;
-    } else {
-      t__2SFH=((__UINTEGER_32 )typ_id__PAZB);
-      a__1SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MAZB + a__1SFH) & (__UINTEGER_32)(~ a__1SFH));
-      ptr_table__TBJH=((__POINTER )(&(table_type[(t__2SFH)])));
-      lab_type__VBJH=(__UINTEGER_32)(t__2SFH |  1);
-      next__SBJH=((__POINTER )(NULL));
-      result__UBJH=((__POINTER *)ptr_table__TBJH)[ 0];
-      if ((result__UBJH == (void *)NULL)) {
-        result__UBJH=new_lab__MRJ(lab_type__VBJH);
-        next__SBJH=(void *)((unsigned long)result__UBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBJH)));
-        ((__POINTER *)next__SBJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TBJH)[ 0]=next__SBJH;
-      } else {
-        next__SBJH=((__POINTER *)result__UBJH)[ 0];
-        if ((next__SBJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UBJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WBJH <<  1)) <=  4096)) {
-            next__SBJH=(void *)((unsigned long)result__UBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBJH)));
-          } else {
-            next__SBJH=new_lab__MRJ(lab_type__VBJH);
-          };
-          ((__POINTER *)next__SBJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TBJH)[ 0]=next__SBJH;
-        } else {
-          ((__POINTER *)result__UBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UBJH=next__SBJH;
-        };
-      };
-      ptr__KAZB=result__UBJH;
-    };
-    result__JAZB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__KAZB);
-    *(result__JAZB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
-  };
-  Self__B0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__JAZB);
-  new_capacity__1JOC=prime_number_ceiling__X41( 193);
-  Self__B0FC->buckets__IREC=create__ABYC(new_capacity__1JOC);
-  Self__B0FC->capacity__DREC=new_capacity__1JOC;
-  Self__B0FC->count__Z1FC= 0;
-  bucket_list__4WOB=result__JAZB;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__UREC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__5REC=NULL;
-  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__HSEC=NULL;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__QTGC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__YKHC= 0;
-  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__DLHC=NULL;
-  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__VU1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__45GC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__AAHC= 0;
-  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__2AHC=NULL;
-  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__FCZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
-  result__DK5B=NULL;
-  ptr__EK5B=((__POINTER )(NULL));
-  typ_id__JK5B= 0;
-  sz__GK5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
-  if ((sz__GK5B ==  0)) {
-    result__DK5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    typ_id__XAZB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__UAZB);
+    if ((typ_id__XAZB == (__INTEGER)(-  1))) {
+      a__HUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__UAZB + a__HUGH) & (__UINTEGER_32)(~ a__HUGH));
+      ptr_table__ODKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NDKH=((__POINTER )(NULL));
+      result__PDKH=((__POINTER *)ptr_table__ODKH)[ 0];
+      if ((result__PDKH == (void *)NULL)) {
+        result__PDKH=new_lab__URJ(new_size__IUGH);
+        next__NDKH=(void *)((unsigned long)result__PDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUGH)));
+        ((__POINTER *)next__NDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ODKH)[ 0]=next__NDKH;
+      } else {
+        next__NDKH=((__POINTER *)result__PDKH)[ 0];
+        if ((next__NDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PDKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IUGH <<  1)) <=  4096)) {
+            next__NDKH=(void *)((unsigned long)result__PDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUGH)));
+          } else {
+            next__NDKH=new_lab__URJ(new_size__IUGH);
+          };
+          ((__POINTER *)next__NDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ODKH)[ 0]=next__NDKH;
+        } else {
+          ((__POINTER *)result__PDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PDKH=next__NDKH;
+        };
+      };
+      ptr__SAZB=result__PDKH;
+    } else {
+      t__MUGH=((__UINTEGER_32 )typ_id__XAZB);
+      a__LUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UAZB + a__LUGH) & (__UINTEGER_32)(~ a__LUGH));
+      ptr_table__TDKH=((__POINTER )(&(table_type[(t__MUGH)])));
+      lab_type__VDKH=(__UINTEGER_32)(t__MUGH |  1);
+      next__SDKH=((__POINTER )(NULL));
+      result__UDKH=((__POINTER *)ptr_table__TDKH)[ 0];
+      if ((result__UDKH == (void *)NULL)) {
+        result__UDKH=new_lab__URJ(lab_type__VDKH);
+        next__SDKH=(void *)((unsigned long)result__UDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDKH)));
+        ((__POINTER *)next__SDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TDKH)[ 0]=next__SDKH;
+      } else {
+        next__SDKH=((__POINTER *)result__UDKH)[ 0];
+        if ((next__SDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WDKH <<  1)) <=  4096)) {
+            next__SDKH=(void *)((unsigned long)result__UDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDKH)));
+          } else {
+            next__SDKH=new_lab__URJ(lab_type__VDKH);
+          };
+          ((__POINTER *)next__SDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TDKH)[ 0]=next__SDKH;
+        } else {
+          ((__POINTER *)result__UDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UDKH=next__SDKH;
+        };
+      };
+      ptr__SAZB=result__UDKH;
+    };
+    result__RAZB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__SAZB);
+    *(result__RAZB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__J0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__RAZB);
+  new_capacity__DKOC=prime_number_ceiling__541( 193);
+  Self__J0FC->buckets__QREC=create__IBYC(new_capacity__DKOC);
+  Self__J0FC->capacity__LREC=new_capacity__DKOC;
+  Self__J0FC->count__B2FC= 0;
+  bucket_list__GXOB=result__RAZB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__2REC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__HSEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__PSEC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__YTGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__ALHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__LLHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__3U1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__GAHC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__IAHC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__EBHC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__NCZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__LK5B=NULL;
+  ptr__MK5B=((__POINTER )(NULL));
+  typ_id__RK5B= 0;
+  sz__OK5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__OK5B ==  0)) {
+    result__LK5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
   } else {
-    typ_id__JK5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GK5B);
-    if ((typ_id__JK5B == (__INTEGER)(-  1))) {
-      a__5SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ATFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GK5B + a__5SFH) & (__UINTEGER_32)(~ a__5SFH));
-      ptr_table__YBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ATFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__XBJH=((__POINTER )(NULL));
-      result__ZBJH=((__POINTER *)ptr_table__YBJH)[ 0];
-      if ((result__ZBJH == (void *)NULL)) {
-        result__ZBJH=new_lab__MRJ(new_size__ATFH);
-        next__XBJH=(void *)((unsigned long)result__ZBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATFH)));
-        ((__POINTER *)next__XBJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YBJH)[ 0]=next__XBJH;
-      } else {
-        next__XBJH=((__POINTER *)result__ZBJH)[ 0];
-        if ((next__XBJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZBJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ATFH <<  1)) <=  4096)) {
-            next__XBJH=(void *)((unsigned long)result__ZBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATFH)));
-          } else {
-            next__XBJH=new_lab__MRJ(new_size__ATFH);
-          };
-          ((__POINTER *)next__XBJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YBJH)[ 0]=next__XBJH;
-        } else {
-          ((__POINTER *)result__ZBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZBJH=next__XBJH;
-        };
-      };
-      ptr__EK5B=result__ZBJH;
-    } else {
-      t__ETFH=((__UINTEGER_32 )typ_id__JK5B);
-      a__DTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ACJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GK5B + a__DTFH) & (__UINTEGER_32)(~ a__DTFH));
-      ptr_table__3BJH=((__POINTER )(&(table_type[(t__ETFH)])));
-      lab_type__5BJH=(__UINTEGER_32)(t__ETFH |  1);
-      next__2BJH=((__POINTER )(NULL));
-      result__4BJH=((__POINTER *)ptr_table__3BJH)[ 0];
-      if ((result__4BJH == (void *)NULL)) {
-        result__4BJH=new_lab__MRJ(lab_type__5BJH);
-        next__2BJH=(void *)((unsigned long)result__4BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACJH)));
-        ((__POINTER *)next__2BJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__3BJH)[ 0]=next__2BJH;
-      } else {
-        next__2BJH=((__POINTER *)result__4BJH)[ 0];
-        if ((next__2BJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4BJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ACJH <<  1)) <=  4096)) {
-            next__2BJH=(void *)((unsigned long)result__4BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACJH)));
-          } else {
-            next__2BJH=new_lab__MRJ(lab_type__5BJH);
-          };
-          ((__POINTER *)next__2BJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3BJH)[ 0]=next__2BJH;
-        } else {
-          ((__POINTER *)result__4BJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2BJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4BJH=next__2BJH;
-        };
-      };
-      ptr__EK5B=result__4BJH;
-    };
-    result__DK5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__EK5B);
-    *(result__DK5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
-  };
-  Self__PKHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__DK5B);
-  if ((Self__PKHC->parent_arrayed_collection__VU1B.capacity__YKHC <  5)) {
-    Self__PKHC->parent_arrayed_collection__VU1B.storage__DLHC=create__ELBD( 5);
-    Self__PKHC->parent_arrayed_collection__VU1B.capacity__YKHC= 5;
-  };
-  Self__PKHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(-  1);
-  free_list__WU1B=result__DK5B;
-  ITM_SLOT_OPERATOR__->priority_and_level__K0HC= 0;
-  ITM_SLOT_OPERATOR__->pretty_name__V0HC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__PBGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__0BGC=NULL;
-  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__CCGC=NULL;
-  PROTOTYPE__->first_slot__CGZB=NULL;
-  ARRAYED_COLLECTIONoITM_SLOTo__->upper__M2XD= 0;
-  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__GRVE= 0;
-  ARRAYED_COLLECTIONoITM_SLOTo__->storage__A4VE=NULL;
-  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__4JTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
-  result__4DIE=NULL;
-  ptr__5DIE=((__POINTER )(NULL));
-  typ_id__EEIE= 0;
-  sz__BEIE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
-  if ((sz__BEIE ==  0)) {
-    result__4DIE=FAST_ARRAYoITM_SLOTo__;
+    typ_id__RK5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__OK5B);
+    if ((typ_id__RK5B == (__INTEGER)(-  1))) {
+      a__PUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OK5B + a__PUGH) & (__UINTEGER_32)(~ a__PUGH));
+      ptr_table__YDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XDKH=((__POINTER )(NULL));
+      result__ZDKH=((__POINTER *)ptr_table__YDKH)[ 0];
+      if ((result__ZDKH == (void *)NULL)) {
+        result__ZDKH=new_lab__URJ(new_size__QUGH);
+        next__XDKH=(void *)((unsigned long)result__ZDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUGH)));
+        ((__POINTER *)next__XDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YDKH)[ 0]=next__XDKH;
+      } else {
+        next__XDKH=((__POINTER *)result__ZDKH)[ 0];
+        if ((next__XDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZDKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QUGH <<  1)) <=  4096)) {
+            next__XDKH=(void *)((unsigned long)result__ZDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUGH)));
+          } else {
+            next__XDKH=new_lab__URJ(new_size__QUGH);
+          };
+          ((__POINTER *)next__XDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YDKH)[ 0]=next__XDKH;
+        } else {
+          ((__POINTER *)result__ZDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZDKH=next__XDKH;
+        };
+      };
+      ptr__MK5B=result__ZDKH;
+    } else {
+      t__UUGH=((__UINTEGER_32 )typ_id__RK5B);
+      a__TUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OK5B + a__TUGH) & (__UINTEGER_32)(~ a__TUGH));
+      ptr_table__3DKH=((__POINTER )(&(table_type[(t__UUGH)])));
+      lab_type__5DKH=(__UINTEGER_32)(t__UUGH |  1);
+      next__2DKH=((__POINTER )(NULL));
+      result__4DKH=((__POINTER *)ptr_table__3DKH)[ 0];
+      if ((result__4DKH == (void *)NULL)) {
+        result__4DKH=new_lab__URJ(lab_type__5DKH);
+        next__2DKH=(void *)((unsigned long)result__4DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEKH)));
+        ((__POINTER *)next__2DKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3DKH)[ 0]=next__2DKH;
+      } else {
+        next__2DKH=((__POINTER *)result__4DKH)[ 0];
+        if ((next__2DKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4DKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AEKH <<  1)) <=  4096)) {
+            next__2DKH=(void *)((unsigned long)result__4DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEKH)));
+          } else {
+            next__2DKH=new_lab__URJ(lab_type__5DKH);
+          };
+          ((__POINTER *)next__2DKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3DKH)[ 0]=next__2DKH;
+        } else {
+          ((__POINTER *)result__4DKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2DKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4DKH=next__2DKH;
+        };
+      };
+      ptr__MK5B=result__4DKH;
+    };
+    result__LK5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__MK5B);
+    *(result__LK5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__XKHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__LK5B);
+  if ((Self__XKHC->parent_arrayed_collection__3U1B.capacity__ALHC <  5)) {
+    Self__XKHC->parent_arrayed_collection__3U1B.storage__LLHC=create__MLBD( 5);
+    Self__XKHC->parent_arrayed_collection__3U1B.capacity__ALHC= 5;
+  };
+  Self__XKHC->parent_arrayed_collection__3U1B.upper__YTGC=(__INTEGER)(-  1);
+  free_list__4U1B=result__LK5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__S0HC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__30HC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__XBGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__CCGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__KCGC=NULL;
+  PROTOTYPE__->first_slot__KGZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__12XD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__JRVE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__D4VE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__GKTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__W5HE=NULL;
+  ptr__X5HE=((__POINTER )(NULL));
+  typ_id__25HE= 0;
+  sz__Z5HE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__Z5HE ==  0)) {
+    result__W5HE=FAST_ARRAYoITM_SLOTo__;
   } else {
-    typ_id__EEIE=__FAST_ARRAYoITM_SLOTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BEIE);
-    if ((typ_id__EEIE == (__INTEGER)(-  1))) {
-      a__HTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__ITFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BEIE + a__HTFH) & (__UINTEGER_32)(~ a__HTFH));
-      ptr_table__CCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ITFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__BCJH=((__POINTER )(NULL));
-      result__DCJH=((__POINTER *)ptr_table__CCJH)[ 0];
-      if ((result__DCJH == (void *)NULL)) {
-        result__DCJH=new_lab__MRJ(new_size__ITFH);
-        next__BCJH=(void *)((unsigned long)result__DCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ITFH)));
-        ((__POINTER *)next__BCJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CCJH)[ 0]=next__BCJH;
-      } else {
-        next__BCJH=((__POINTER *)result__DCJH)[ 0];
-        if ((next__BCJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DCJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ITFH <<  1)) <=  4096)) {
-            next__BCJH=(void *)((unsigned long)result__DCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ITFH)));
-          } else {
-            next__BCJH=new_lab__MRJ(new_size__ITFH);
-          };
-          ((__POINTER *)next__BCJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CCJH)[ 0]=next__BCJH;
-        } else {
-          ((__POINTER *)result__DCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DCJH=next__BCJH;
-        };
-      };
-      ptr__5DIE=result__DCJH;
-    } else {
-      t__MTFH=((__UINTEGER_32 )typ_id__EEIE);
-      a__LTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BEIE + a__LTFH) & (__UINTEGER_32)(~ a__LTFH));
-      ptr_table__HCJH=((__POINTER )(&(table_type[(t__MTFH)])));
-      lab_type__JCJH=(__UINTEGER_32)(t__MTFH |  1);
-      next__GCJH=((__POINTER )(NULL));
-      result__ICJH=((__POINTER *)ptr_table__HCJH)[ 0];
-      if ((result__ICJH == (void *)NULL)) {
-        result__ICJH=new_lab__MRJ(lab_type__JCJH);
-        next__GCJH=(void *)((unsigned long)result__ICJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCJH)));
-        ((__POINTER *)next__GCJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HCJH)[ 0]=next__GCJH;
-      } else {
-        next__GCJH=((__POINTER *)result__ICJH)[ 0];
-        if ((next__GCJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ICJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KCJH <<  1)) <=  4096)) {
-            next__GCJH=(void *)((unsigned long)result__ICJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCJH)));
-          } else {
-            next__GCJH=new_lab__MRJ(lab_type__JCJH);
-          };
-          ((__POINTER *)next__GCJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HCJH)[ 0]=next__GCJH;
-        } else {
-          ((__POINTER *)result__ICJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ICJH=next__GCJH;
-        };
-      };
-      ptr__5DIE=result__ICJH;
-    };
-    result__4DIE=((__FAST_ARRAYoITM_SLOTo *)ptr__5DIE);
-    *(result__4DIE) = *(FAST_ARRAYoITM_SLOTo__);
-  };
-  Self__N3VE=((__FAST_ARRAYoITM_SLOTo *)result__4DIE);
-  if ((Self__N3VE->parent_arrayed_collection__4JTD.capacity__GRVE <  256)) {
-    Self__N3VE->parent_arrayed_collection__4JTD.storage__A4VE=create__ILEF( 256);
-    Self__N3VE->parent_arrayed_collection__4JTD.capacity__GRVE= 256;
-  };
-  Self__N3VE->parent_arrayed_collection__4JTD.upper__M2XD=(__INTEGER)(-  1);
-  list_tmp__5JTD=result__4DIE;
+    typ_id__25HE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__Z5HE);
+    if ((typ_id__25HE == (__INTEGER)(-  1))) {
+      a__XUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z5HE + a__XUGH) & (__UINTEGER_32)(~ a__XUGH));
+      ptr_table__CEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BEKH=((__POINTER )(NULL));
+      result__DEKH=((__POINTER *)ptr_table__CEKH)[ 0];
+      if ((result__DEKH == (void *)NULL)) {
+        result__DEKH=new_lab__URJ(new_size__YUGH);
+        next__BEKH=(void *)((unsigned long)result__DEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YUGH)));
+        ((__POINTER *)next__BEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CEKH)[ 0]=next__BEKH;
+      } else {
+        next__BEKH=((__POINTER *)result__DEKH)[ 0];
+        if ((next__BEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DEKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YUGH <<  1)) <=  4096)) {
+            next__BEKH=(void *)((unsigned long)result__DEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YUGH)));
+          } else {
+            next__BEKH=new_lab__URJ(new_size__YUGH);
+          };
+          ((__POINTER *)next__BEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CEKH)[ 0]=next__BEKH;
+        } else {
+          ((__POINTER *)result__DEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DEKH=next__BEKH;
+        };
+      };
+      ptr__X5HE=result__DEKH;
+    } else {
+      t__2UGH=((__UINTEGER_32 )typ_id__25HE);
+      a__1UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z5HE + a__1UGH) & (__UINTEGER_32)(~ a__1UGH));
+      ptr_table__HEKH=((__POINTER )(&(table_type[(t__2UGH)])));
+      lab_type__JEKH=(__UINTEGER_32)(t__2UGH |  1);
+      next__GEKH=((__POINTER )(NULL));
+      result__IEKH=((__POINTER *)ptr_table__HEKH)[ 0];
+      if ((result__IEKH == (void *)NULL)) {
+        result__IEKH=new_lab__URJ(lab_type__JEKH);
+        next__GEKH=(void *)((unsigned long)result__IEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEKH)));
+        ((__POINTER *)next__GEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HEKH)[ 0]=next__GEKH;
+      } else {
+        next__GEKH=((__POINTER *)result__IEKH)[ 0];
+        if ((next__GEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IEKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KEKH <<  1)) <=  4096)) {
+            next__GEKH=(void *)((unsigned long)result__IEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEKH)));
+          } else {
+            next__GEKH=new_lab__URJ(lab_type__JEKH);
+          };
+          ((__POINTER *)next__GEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HEKH)[ 0]=next__GEKH;
+        } else {
+          ((__POINTER *)result__IEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IEKH=next__GEKH;
+        };
+      };
+      ptr__X5HE=result__IEKH;
+    };
+    result__W5HE=((__FAST_ARRAYoITM_SLOTo *)ptr__X5HE);
+    *(result__W5HE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__Q3VE=((__FAST_ARRAYoITM_SLOTo *)result__W5HE);
+  if ((Self__Q3VE->parent_arrayed_collection__GKTD.capacity__JRVE <  256)) {
+    Self__Q3VE->parent_arrayed_collection__GKTD.storage__D4VE=create__UVEF( 256);
+    Self__Q3VE->parent_arrayed_collection__GKTD.capacity__JRVE= 256;
+  };
+  Self__Q3VE->parent_arrayed_collection__GKTD.upper__12XD=(__INTEGER)(-  1);
+  list_tmp__HKTD=result__W5HE;
+  string_tmp3__DFYD=create__TBB( 256);
+  str_tmp__C52E=create__TBB( 512);
+  str_tmp2__EB3E=create__TBB( 64);
+  str_tmp3__EF3E=create__TBB( 64);
   txt__1=NULL;
   p__AB=NULL;
-  create__NBB( 255);
-  result__DUB=NULL;
-  ptr__EUB=((__POINTER )(NULL));
-  typ_id__JUB= 0;
-  sz__GUB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
-  if ((sz__GUB ==  0)) {
-    result__DUB=HASHED_SEToABSTRACT_STRINGo__;
+  create__TBB( 255);
+  result__LUB=NULL;
+  ptr__MUB=((__POINTER )(NULL));
+  typ_id__RUB= 0;
+  sz__OUB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
+  if ((sz__OUB ==  0)) {
+    result__LUB=HASHED_SEToABSTRACT_STRINGo__;
   } else {
-    typ_id__JUB=__HASHED_SEToABSTRACT_STRINGo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GUB);
-    if ((typ_id__JUB == (__INTEGER)(-  1))) {
-      a__PTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUB + a__PTFH) & (__UINTEGER_32)(~ a__PTFH));
-      ptr_table__MCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QTFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__LCJH=((__POINTER )(NULL));
-      result__NCJH=((__POINTER *)ptr_table__MCJH)[ 0];
-      if ((result__NCJH == (void *)NULL)) {
-        result__NCJH=new_lab__MRJ(new_size__QTFH);
-        next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QTFH)));
-        ((__POINTER *)next__LCJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MCJH)[ 0]=next__LCJH;
-      } else {
-        next__LCJH=((__POINTER *)result__NCJH)[ 0];
-        if ((next__LCJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NCJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QTFH <<  1)) <=  4096)) {
-            next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QTFH)));
-          } else {
-            next__LCJH=new_lab__MRJ(new_size__QTFH);
-          };
-          ((__POINTER *)next__LCJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MCJH)[ 0]=next__LCJH;
-        } else {
-          ((__POINTER *)result__NCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NCJH=next__LCJH;
-        };
-      };
-      ptr__EUB=result__NCJH;
-    } else {
-      t__UTFH=((__UINTEGER_32 )typ_id__JUB);
-      a__TTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__UCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUB + a__TTFH) & (__UINTEGER_32)(~ a__TTFH));
-      ptr_table__RCJH=((__POINTER )(&(table_type[(t__UTFH)])));
-      lab_type__TCJH=(__UINTEGER_32)(t__UTFH |  1);
-      next__QCJH=((__POINTER )(NULL));
-      result__SCJH=((__POINTER *)ptr_table__RCJH)[ 0];
-      if ((result__SCJH == (void *)NULL)) {
-        result__SCJH=new_lab__MRJ(lab_type__TCJH);
-        next__QCJH=(void *)((unsigned long)result__SCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCJH)));
-        ((__POINTER *)next__QCJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
-      } else {
-        next__QCJH=((__POINTER *)result__SCJH)[ 0];
-        if ((next__QCJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SCJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UCJH <<  1)) <=  4096)) {
-            next__QCJH=(void *)((unsigned long)result__SCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCJH)));
-          } else {
-            next__QCJH=new_lab__MRJ(lab_type__TCJH);
-          };
-          ((__POINTER *)next__QCJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
-        } else {
-          ((__POINTER *)result__SCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SCJH=next__QCJH;
-        };
-      };
-      ptr__EUB=result__SCJH;
-    };
-    result__DUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__EUB);
-    *(result__DUB) = *(HASHED_SEToABSTRACT_STRINGo__);
-  };
-  Self__HCS=((__HASHED_SEToABSTRACT_STRINGo *)result__DUB);
-  new_capacity__2ZW=prime_number_ceiling__X41( 53);
-  Self__HCS->buckets__4YR=create__BK2(new_capacity__2ZW);
-  Self__HCS->capacity__ZYR=new_capacity__2ZW;
-  Self__HCS->count__5ZR= 0;
-  list__FK=result__DUB;
-  add__IYR(result__DUB,(&__string_4));
-  add__IYR(list__FK,(&__string_5));
-  add__IYR(list__FK,(&__string_6));
-  add__IYR(list__FK,(&__string_7));
-  add__IYR(list__FK,(&__string_8));
-  add__IYR(list__FK,(&__string_9));
-  add__IYR(list__FK,(&__string_10));
-  add__IYR(list__FK,(&__string_11));
-  add__IYR(list__FK,(&__string_12));
-  add__IYR(list__FK,(&__string_13));
-  add__IYR(list__FK,(&__string_14));
-  add__IYR(list__FK,(&__string_15));
-  add__IYR(list__FK,(&__string_16));
-  add__IYR(list__FK,(&__string_17));
-  add__IYR(list__FK,(&__string_18));
-  add__IYR(list__FK,(&__string_19));
-  add__IYR(list__FK,(&__string_20));
-  add__IYR(list__FK,(&__string_21));
-  add__IYR(list__FK,(&__string_22));
-  add__IYR(list__FK,(&__string_23));
-  add__IYR(list__FK,(&__string_24));
-  add__IYR(list__FK,(&__string_25));
-  add__IYR(list__FK,(&__string_26));
-  add__IYR(list__FK,(&__string_27));
-  add__IYR(list__FK,(&__string_28));
-  add__IYR(list__FK,(&__string_29));
-  add__IYR(list__FK,(&__string_30));
-  add__IYR(list__FK,(&__string_31));
-  add__IYR(list__FK,(&__string_32));
-  add__IYR(list__FK,(&__string_33));
-  add__IYR(list__FK,(&__string_34));
-  add__IYR(list__FK,(&__string_35));
-  add__IYR(list__FK,(&__string_36));
-  add__IYR(list__FK,(&__string_37));
-  add__IYR(list__FK,(&__string_38));
-  add__IYR(list__FK,(&__string_39));
-  add__IYR(list__FK,(&__string_40));
-  add__IYR(list__FK,(&__string_41));
-  add__IYR(list__FK,(&__string_42));
-  add__IYR(list__FK,(&__string_43));
-  add__IYR(list__FK,(&__string_44));
-  add__IYR(list__FK,(&__string_45));
-  add__IYR(list__FK,(&__string_46));
-  add__IYR(list__FK,(&__string_47));
-  add__IYR(list__FK,(&__string_1));
-  add__IYR(list__FK,(&__string_48));
-  add__IYR(list__FK,(&__string_49));
-  add__IYR(list__FK,(&__string_50));
-  add__IYR(list__FK,(&__string_51));
-  add__IYR(list__FK,(&__string_52));
-  add__IYR(list__FK,(&__string_53));
-  add__IYR(list__FK,(&__string_54));
-  add__IYR(list__FK,(&__string_55));
-  add__IYR(list__FK,(&__string_56));
-  add__IYR(list__FK,(&__string_57));
-  add__IYR(list__FK,(&__string_58));
-  add__IYR(list__FK,(&__string_59));
-  add__IYR(list__FK,(&__string_2));
-  add__IYR(list__FK,(&__string_3));
-  add__IYR(list__FK,(&__string_60));
-  add__IYR(list__FK,(&__string_61));
-  add__IYR(list__FK,(&__string_62));
-  add__IYR(list__FK,(&__string_63));
-  add__IYR(list__FK,(&__string_64));
-  add__IYR(list__FK,(&__string_65));
-  add__IYR(list__FK,(&__string_66));
-  add__IYR(list__FK,(&__string_67));
-  add__IYR(list__FK,(&__string_68));
-  add__IYR(list__FK,(&__string_69));
-  add__IYR(list__FK,(&__string_70));
-  add__IYR(list__FK,(&__string_71));
-  add__IYR(list__FK,(&__string_72));
-  add__IYR(list__FK,(&__string_73));
-  add__IYR(list__FK,(&__string_74));
-  add__IYR(list__FK,(&__string_75));
-  add__IYR(list__FK,(&__string_76));
-  add__IYR(list__FK,(&__string_77));
-  add__IYR(list__FK,(&__string_78));
-  add__IYR(list__FK,(&__string_79));
-  add__IYR(list__FK,(&__string_80));
-  add__IYR(list__FK,(&__string_81));
-  add__IYR(list__FK,(&__string_82));
-  add__IYR(list__FK,(&__string_83));
-  add__IYR(list__FK,(&__string_84));
-  add__IYR(list__FK,(&__string_85));
-  add__IYR(list__FK,(&__string_86));
-  add__IYR(list__FK,(&__string_87));
-  add__IYR(list__FK,(&__string_88));
-  add__IYR(list__FK,(&__string_89));
-  add__IYR(list__FK,(&__string_90));
-  add__IYR(list__FK,(&__string_91));
-  add__IYR(list__FK,(&__string_92));
-  add__IYR(list__FK,(&__string_93));
-  add__IYR(list__FK,(&__string_94));
-  add__IYR(list__FK,(&__string_95));
-  add__IYR(list__FK,(&__string_96));
-  add__IYR(list__FK,(&__string_97));
-  add__IYR(list__FK,(&__string_98));
-  add__IYR(list__FK,(&__string_99));
-  add__IYR(list__FK,(&__string_100));
-  add__IYR(list__FK,(&__string_101));
-  add__IYR(list__FK,(&__string_102));
-  add__IYR(list__FK,(&__string_103));
-  add__IYR(list__FK,(&__string_104));
-  add__IYR(list__FK,(&__string_105));
-  add__IYR(list__FK,(&__string_106));
-  add__IYR(list__FK,(&__string_107));
-  add__IYR(list__FK,(&__string_108));
-  add__IYR(list__FK,(&__string_109));
-  add__IYR(list__FK,(&__string_110));
-  add__IYR(list__FK,(&__string_111));
-  add__IYR(list__FK,(&__string_112));
-  add__IYR(list__FK,(&__string_113));
-  add__IYR(list__FK,(&__string_114));
-  add__IYR(list__FK,(&__string_115));
-  add__IYR(list__FK,(&__string_116));
-  add__IYR(list__FK,(&__string_117));
-  add__IYR(list__FK,(&__string_118));
-  add__IYR(list__FK,(&__string_119));
-  add__IYR(list__FK,(&__string_120));
-  add__IYR(list__FK,(&__string_121));
-  add__IYR(list__FK,(&__string_122));
-  add__IYR(list__FK,(&__string_123));
-  add__IYR(list__FK,(&__string_124));
-  add__IYR(list__FK,(&__string_125));
-  add__IYR(list__FK,(&__string_126));
-  add__IYR(list__FK,(&__string_127));
-  add__IYR(list__FK,(&__string_128));
-  add__IYR(list__FK,(&__string_129));
-  add__IYR(list__FK,(&__string_70));
-  add__IYR(list__FK,(&__string_130));
-  add__IYR(list__FK,(&__string_131));
-  add__IYR(list__FK,(&__string_132));
-  add__IYR(list__FK,(&__string_133));
-  add__IYR(list__FK,(&__string_65));
-  add__IYR(list__FK,(&__string_134));
-  add__IYR(list__FK,(&__string_135));
-  add__IYR(list__FK,(&__string_136));
-  add__IYR(list__FK,(&__string_137));
-  add__IYR(list__FK,(&__string_138));
-  add__IYR(list__FK,(&__string_139));
-  add__IYR(list__FK,(&__string_140));
-  add__IYR(list__FK,(&__string_141));
-  add__IYR(list__FK,(&__string_142));
-  add__IYR(list__FK,(&__string_143));
-  add__IYR(list__FK,(&__string_144));
-  add__IYR(list__FK,(&__string_145));
-  add__IYR(list__FK,(&__string_146));
-  add__IYR(list__FK,(&__string_66));
-  add__IYR(list__FK,(&__string_147));
-  add__IYR(list__FK,(&__string_148));
-  add__IYR(list__FK,(&__string_149));
-  add__IYR(list__FK,(&__string_150));
-  add__IYR(list__FK,(&__string_151));
-  add__IYR(list__FK,(&__string_152));
-  operator__name__WGB((&__string_16));
-  operator__name__WGB((&__string_17));
-  cmd__1Y=NULL;
-  path__4Y=NULL;
-  is_shorter__5Y=TRUE__;
-  j__2Y= 1;
-  while ((j__2Y <= ((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC)) {
-    cmd__1Y=((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y];
-    if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 0] == '-')) {
-      if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'o')) {
-        j__2Y=(__INTEGER)(j__2Y +  1);
-        if ((j__2Y > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC +  1))) {
-          print__WHD((&__string_153));
+    typ_id__RUB=__HASHED_SEToABSTRACT_STRINGo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__OUB);
+    if ((typ_id__RUB == (__INTEGER)(-  1))) {
+      a__5UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUB + a__5UGH) & (__UINTEGER_32)(~ a__5UGH));
+      ptr_table__MEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LEKH=((__POINTER )(NULL));
+      result__NEKH=((__POINTER *)ptr_table__MEKH)[ 0];
+      if ((result__NEKH == (void *)NULL)) {
+        result__NEKH=new_lab__URJ(new_size__AVGH);
+        next__LEKH=(void *)((unsigned long)result__NEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVGH)));
+        ((__POINTER *)next__LEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MEKH)[ 0]=next__LEKH;
+      } else {
+        next__LEKH=((__POINTER *)result__NEKH)[ 0];
+        if ((next__LEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NEKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AVGH <<  1)) <=  4096)) {
+            next__LEKH=(void *)((unsigned long)result__NEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVGH)));
+          } else {
+            next__LEKH=new_lab__URJ(new_size__AVGH);
+          };
+          ((__POINTER *)next__LEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MEKH)[ 0]=next__LEKH;
+        } else {
+          ((__POINTER *)result__NEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NEKH=next__LEKH;
+        };
+      };
+      ptr__MUB=result__NEKH;
+    } else {
+      t__EVGH=((__UINTEGER_32 )typ_id__RUB);
+      a__DVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUB + a__DVGH) & (__UINTEGER_32)(~ a__DVGH));
+      ptr_table__REKH=((__POINTER )(&(table_type[(t__EVGH)])));
+      lab_type__TEKH=(__UINTEGER_32)(t__EVGH |  1);
+      next__QEKH=((__POINTER )(NULL));
+      result__SEKH=((__POINTER *)ptr_table__REKH)[ 0];
+      if ((result__SEKH == (void *)NULL)) {
+        result__SEKH=new_lab__URJ(lab_type__TEKH);
+        next__QEKH=(void *)((unsigned long)result__SEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEKH)));
+        ((__POINTER *)next__QEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__REKH)[ 0]=next__QEKH;
+      } else {
+        next__QEKH=((__POINTER *)result__SEKH)[ 0];
+        if ((next__QEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SEKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UEKH <<  1)) <=  4096)) {
+            next__QEKH=(void *)((unsigned long)result__SEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEKH)));
+          } else {
+            next__QEKH=new_lab__URJ(lab_type__TEKH);
+          };
+          ((__POINTER *)next__QEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__REKH)[ 0]=next__QEKH;
+        } else {
+          ((__POINTER *)result__SEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SEKH=next__QEKH;
+        };
+      };
+      ptr__MUB=result__SEKH;
+    };
+    result__LUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__MUB);
+    *(result__LUB) = *(HASHED_SEToABSTRACT_STRINGo__);
+  };
+  Self__PCS=((__HASHED_SEToABSTRACT_STRINGo *)result__LUB);
+  new_capacity__E0W=prime_number_ceiling__541( 53);
+  Self__PCS->buckets__GZR=create__JK2(new_capacity__E0W);
+  Self__PCS->capacity__BZR=new_capacity__E0W;
+  Self__PCS->count__H0R= 0;
+  list__FK=result__LUB;
+  add__QYR(result__LUB,(&__string_4));
+  add__QYR(list__FK,(&__string_5));
+  add__QYR(list__FK,(&__string_6));
+  add__QYR(list__FK,(&__string_7));
+  add__QYR(list__FK,(&__string_8));
+  add__QYR(list__FK,(&__string_9));
+  add__QYR(list__FK,(&__string_10));
+  add__QYR(list__FK,(&__string_11));
+  add__QYR(list__FK,(&__string_12));
+  add__QYR(list__FK,(&__string_13));
+  add__QYR(list__FK,(&__string_14));
+  add__QYR(list__FK,(&__string_15));
+  add__QYR(list__FK,(&__string_16));
+  add__QYR(list__FK,(&__string_17));
+  add__QYR(list__FK,(&__string_18));
+  add__QYR(list__FK,(&__string_19));
+  add__QYR(list__FK,(&__string_20));
+  add__QYR(list__FK,(&__string_21));
+  add__QYR(list__FK,(&__string_22));
+  add__QYR(list__FK,(&__string_23));
+  add__QYR(list__FK,(&__string_24));
+  add__QYR(list__FK,(&__string_25));
+  add__QYR(list__FK,(&__string_26));
+  add__QYR(list__FK,(&__string_27));
+  add__QYR(list__FK,(&__string_28));
+  add__QYR(list__FK,(&__string_29));
+  add__QYR(list__FK,(&__string_30));
+  add__QYR(list__FK,(&__string_31));
+  add__QYR(list__FK,(&__string_32));
+  add__QYR(list__FK,(&__string_33));
+  add__QYR(list__FK,(&__string_34));
+  add__QYR(list__FK,(&__string_35));
+  add__QYR(list__FK,(&__string_36));
+  add__QYR(list__FK,(&__string_37));
+  add__QYR(list__FK,(&__string_38));
+  add__QYR(list__FK,(&__string_39));
+  add__QYR(list__FK,(&__string_40));
+  add__QYR(list__FK,(&__string_41));
+  add__QYR(list__FK,(&__string_42));
+  add__QYR(list__FK,(&__string_43));
+  add__QYR(list__FK,(&__string_44));
+  add__QYR(list__FK,(&__string_45));
+  add__QYR(list__FK,(&__string_46));
+  add__QYR(list__FK,(&__string_47));
+  add__QYR(list__FK,(&__string_1));
+  add__QYR(list__FK,(&__string_48));
+  add__QYR(list__FK,(&__string_49));
+  add__QYR(list__FK,(&__string_50));
+  add__QYR(list__FK,(&__string_51));
+  add__QYR(list__FK,(&__string_52));
+  add__QYR(list__FK,(&__string_53));
+  add__QYR(list__FK,(&__string_54));
+  add__QYR(list__FK,(&__string_55));
+  add__QYR(list__FK,(&__string_56));
+  add__QYR(list__FK,(&__string_57));
+  add__QYR(list__FK,(&__string_58));
+  add__QYR(list__FK,(&__string_59));
+  add__QYR(list__FK,(&__string_2));
+  add__QYR(list__FK,(&__string_3));
+  add__QYR(list__FK,(&__string_60));
+  add__QYR(list__FK,(&__string_61));
+  add__QYR(list__FK,(&__string_62));
+  add__QYR(list__FK,(&__string_63));
+  add__QYR(list__FK,(&__string_64));
+  add__QYR(list__FK,(&__string_65));
+  add__QYR(list__FK,(&__string_66));
+  add__QYR(list__FK,(&__string_67));
+  add__QYR(list__FK,(&__string_68));
+  add__QYR(list__FK,(&__string_69));
+  add__QYR(list__FK,(&__string_70));
+  add__QYR(list__FK,(&__string_71));
+  add__QYR(list__FK,(&__string_72));
+  add__QYR(list__FK,(&__string_73));
+  add__QYR(list__FK,(&__string_74));
+  add__QYR(list__FK,(&__string_75));
+  add__QYR(list__FK,(&__string_76));
+  add__QYR(list__FK,(&__string_77));
+  add__QYR(list__FK,(&__string_78));
+  add__QYR(list__FK,(&__string_79));
+  add__QYR(list__FK,(&__string_80));
+  add__QYR(list__FK,(&__string_81));
+  add__QYR(list__FK,(&__string_82));
+  add__QYR(list__FK,(&__string_83));
+  add__QYR(list__FK,(&__string_84));
+  add__QYR(list__FK,(&__string_85));
+  add__QYR(list__FK,(&__string_86));
+  add__QYR(list__FK,(&__string_87));
+  add__QYR(list__FK,(&__string_88));
+  add__QYR(list__FK,(&__string_89));
+  add__QYR(list__FK,(&__string_90));
+  add__QYR(list__FK,(&__string_91));
+  add__QYR(list__FK,(&__string_92));
+  add__QYR(list__FK,(&__string_93));
+  add__QYR(list__FK,(&__string_94));
+  add__QYR(list__FK,(&__string_95));
+  add__QYR(list__FK,(&__string_96));
+  add__QYR(list__FK,(&__string_97));
+  add__QYR(list__FK,(&__string_98));
+  add__QYR(list__FK,(&__string_99));
+  add__QYR(list__FK,(&__string_100));
+  add__QYR(list__FK,(&__string_101));
+  add__QYR(list__FK,(&__string_102));
+  add__QYR(list__FK,(&__string_103));
+  add__QYR(list__FK,(&__string_104));
+  add__QYR(list__FK,(&__string_105));
+  add__QYR(list__FK,(&__string_106));
+  add__QYR(list__FK,(&__string_107));
+  add__QYR(list__FK,(&__string_108));
+  add__QYR(list__FK,(&__string_109));
+  add__QYR(list__FK,(&__string_110));
+  add__QYR(list__FK,(&__string_111));
+  add__QYR(list__FK,(&__string_112));
+  add__QYR(list__FK,(&__string_113));
+  add__QYR(list__FK,(&__string_114));
+  add__QYR(list__FK,(&__string_115));
+  add__QYR(list__FK,(&__string_116));
+  add__QYR(list__FK,(&__string_117));
+  add__QYR(list__FK,(&__string_118));
+  add__QYR(list__FK,(&__string_119));
+  add__QYR(list__FK,(&__string_120));
+  add__QYR(list__FK,(&__string_121));
+  add__QYR(list__FK,(&__string_122));
+  add__QYR(list__FK,(&__string_123));
+  add__QYR(list__FK,(&__string_124));
+  add__QYR(list__FK,(&__string_125));
+  add__QYR(list__FK,(&__string_126));
+  add__QYR(list__FK,(&__string_127));
+  add__QYR(list__FK,(&__string_128));
+  add__QYR(list__FK,(&__string_129));
+  add__QYR(list__FK,(&__string_70));
+  add__QYR(list__FK,(&__string_130));
+  add__QYR(list__FK,(&__string_131));
+  add__QYR(list__FK,(&__string_132));
+  add__QYR(list__FK,(&__string_133));
+  add__QYR(list__FK,(&__string_65));
+  add__QYR(list__FK,(&__string_134));
+  add__QYR(list__FK,(&__string_135));
+  add__QYR(list__FK,(&__string_136));
+  add__QYR(list__FK,(&__string_137));
+  add__QYR(list__FK,(&__string_138));
+  add__QYR(list__FK,(&__string_139));
+  add__QYR(list__FK,(&__string_140));
+  add__QYR(list__FK,(&__string_141));
+  add__QYR(list__FK,(&__string_142));
+  add__QYR(list__FK,(&__string_143));
+  add__QYR(list__FK,(&__string_144));
+  add__QYR(list__FK,(&__string_145));
+  add__QYR(list__FK,(&__string_146));
+  add__QYR(list__FK,(&__string_147));
+  add__QYR(list__FK,(&__string_148));
+  add__QYR(list__FK,(&__string_66));
+  add__QYR(list__FK,(&__string_149));
+  add__QYR(list__FK,(&__string_150));
+  add__QYR(list__FK,(&__string_151));
+  add__QYR(list__FK,(&__string_152));
+  add__QYR(list__FK,(&__string_153));
+  add__QYR(list__FK,(&__string_154));
+  operator__name__4GB((&__string_16));
+  operator__name__4GB((&__string_17));
+  cmd__BZ=NULL;
+  path__EZ=NULL;
+  is_shorter__FZ=TRUE__;
+  j__CZ= 1;
+  while ((j__CZ <= ((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.upper__OKC)) {
+    cmd__BZ=((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ];
+    if ((((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'o')) {
+        j__CZ=(__INTEGER)(j__CZ +  1);
+        if ((j__CZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.upper__OKC +  1))) {
+          print__4HD((&__string_155));
           exit(( 1));
         };
-        output_name__DI=get__IWB(((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
-        __tmp__I0=TRUE__;
+        output_name__DI=get__QWB(((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ]);
+        __tmp__O0=TRUE__;
       } else {
-        __tmp__I0=FALSE__;
+        __tmp__O0=FALSE__;
       };
-      if (__tmp__I0) {
-        __tmp__D1=TRUE__;
+      if (__tmp__O0) {
+        __tmp__J1=TRUE__;
       } else {
-        result__55NB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'f');
-        if (result__55NB) {
-          j__2Y=(__INTEGER)(j__2Y +  1);
-          if ((j__2Y > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.upper__GKC +  1))) {
-            print__WHD((&__string_153));
+        result__HAOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'f');
+        if (result__HAOB) {
+          j__CZ=(__INTEGER)(j__CZ +  1);
+          if ((j__CZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.upper__OKC +  1))) {
+            print__4HD((&__string_155));
             exit(( 1));
           };
-          format_name__B1=get__IWB(((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
+          format_name__H1=get__QWB(((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ]);
         };
-        __tmp__D1=result__55NB;
+        __tmp__J1=result__HAOB;
       };
-      if (__tmp__D1) {
-        __tmp__R1=TRUE__;
+      if (__tmp__J1) {
+        __tmp__X1=TRUE__;
       } else {
-        result__RAOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'c');
-        if (result__RAOB) {
-          is_short_code__P1=TRUE__;
+        result__ZAOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'c');
+        if (result__ZAOB) {
+          is_short_code__V1=TRUE__;
         };
-        __tmp__R1=result__RAOB;
+        __tmp__X1=result__ZAOB;
       };
-      if (__tmp__R1) {
-        __tmp__51=TRUE__;
+      if (__tmp__X1) {
+        __tmp__F2=TRUE__;
       } else {
-        result__DBOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'p');
-        if (result__DBOB) {
-          is_short_private__31=TRUE__;
+        result__LBOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'p');
+        if (result__LBOB) {
+          is_short_private__D2=TRUE__;
         };
-        __tmp__51=result__DBOB;
+        __tmp__F2=result__LBOB;
       };
-      if (__tmp__51) {
-        __tmp__M2=TRUE__;
+      if (__tmp__F2) {
+        __tmp__S2=TRUE__;
       } else {
-        result__VBOB=(((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'r');
-        if (result__VBOB) {
+        result__3BOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'r');
+        if (result__3BOB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__M2=result__VBOB;
+        __tmp__S2=result__3BOB;
       };
-      if ((! __tmp__M2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__1Y)->storage__BCS)[ 1] == 'd')) {
-          is_shorter__5Y=FALSE__;
+      if ((! __tmp__S2)) {
+        if ((((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'd')) {
+          is_shorter__FZ=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__WHD((&__string_153));
+          print__4HD((&__string_155));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__WHD((&__string_153));
+        print__4HD((&__string_155));
         exit(( 1));
       };
-      copy__ZCS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__BHD)->parent_arrayed_collection__DKC.storage__XGT)[j__2Y]);
-      input_name__3B=get__IWB(string_tmp__VH);
+      copy__BDS(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ]);
+      input_name__3B=get__QWB(string_tmp__VH);
     };
-    j__2Y=(__INTEGER)(j__2Y +  1);
+    j__CZ=(__INTEGER)(j__CZ +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__WHD((&__string_153));
+    print__4HD((&__string_155));
     exit(( 1));
   };
-  if (((void *)format_name__B1 != (void *)NULL)) {
-    path__4Y=((__CHARACTER *)(LISAAC_DIRECTORY));
-    Self__TKC=((__CHARACTER *)path__4Y);
-    idx__5KC= 0;
-    while ((! ((idx__5KC >  1024) || ('\0' == Self__TKC[idx__5KC])))) {
-      idx__5KC=(__INTEGER)(idx__5KC +  1);
-    };
-    result__QVGH=NULL;
-    ptr__RVGH=((__POINTER )(NULL));
-    typ_id__SVGH= 0;
-    sz__TVGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__TVGH ==  0)) {
-      result__QVGH=STRING_CONSTANT__;
-    } else {
-      typ_id__SVGH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TVGH);
-      if ((typ_id__SVGH == (__INTEGER)(-  1))) {
-        a__UVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVGH + a__UVGH) & (__UINTEGER_32)(~ a__UVGH));
-        ptr_table__WCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__VCJH=((__POINTER )(NULL));
-        result__XCJH=((__POINTER *)ptr_table__WCJH)[ 0];
-        if ((result__XCJH == (void *)NULL)) {
-          result__XCJH=new_lab__MRJ(new_size__VVGH);
-          next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVGH)));
-          ((__POINTER *)next__VCJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WCJH)[ 0]=next__VCJH;
-        } else {
-          next__VCJH=((__POINTER *)result__XCJH)[ 0];
-          if ((next__VCJH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XCJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VVGH <<  1)) <=  4096)) {
-              next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVGH)));
+  if (((void *)format_name__H1 != (void *)NULL)) {
+    path__EZ=((__CHARACTER *)(LISAAC_DIRECTORY));
+    Self__1KC=((__CHARACTER *)path__EZ);
+    idx__HLC= 0;
+    while ((! ((idx__HLC >  1024) || ('\0' == Self__1KC[idx__HLC])))) {
+      idx__HLC=(__INTEGER)(idx__HLC +  1);
+    };
+    result__LXHH=NULL;
+    ptr__MXHH=((__POINTER )(NULL));
+    typ_id__NXHH= 0;
+    sz__OXHH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__OXHH ==  0)) {
+      result__LXHH=STRING_CONSTANT__;
+    } else {
+      typ_id__NXHH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__OXHH);
+      if ((typ_id__NXHH == (__INTEGER)(-  1))) {
+        a__PXHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QXHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OXHH + a__PXHH) & (__UINTEGER_32)(~ a__PXHH));
+        ptr_table__WEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QXHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VEKH=((__POINTER )(NULL));
+        result__XEKH=((__POINTER *)ptr_table__WEKH)[ 0];
+        if ((result__XEKH == (void *)NULL)) {
+          result__XEKH=new_lab__URJ(new_size__QXHH);
+          next__VEKH=(void *)((unsigned long)result__XEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXHH)));
+          ((__POINTER *)next__VEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WEKH)[ 0]=next__VEKH;
+        } else {
+          next__VEKH=((__POINTER *)result__XEKH)[ 0];
+          if ((next__VEKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XEKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QXHH <<  1)) <=  4096)) {
+              next__VEKH=(void *)((unsigned long)result__XEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXHH)));
             } else {
-              next__VCJH=new_lab__MRJ(new_size__VVGH);
-            };
-            ((__POINTER *)next__VCJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WCJH)[ 0]=next__VCJH;
-          } else {
-            ((__POINTER *)result__XCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XCJH=next__VCJH;
-          };
-        };
-        ptr__RVGH=result__XCJH;
-      } else {
-        t__WVGH=((__UINTEGER_32 )typ_id__SVGH);
-        a__XVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4CJH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVGH + a__XVGH) & (__UINTEGER_32)(~ a__XVGH));
-        ptr_table__1CJH=((__POINTER )(&(table_type[(t__WVGH)])));
-        lab_type__3CJH=(__UINTEGER_32)(t__WVGH |  1);
-        next__0CJH=((__POINTER )(NULL));
-        result__2CJH=((__POINTER *)ptr_table__1CJH)[ 0];
-        if ((result__2CJH == (void *)NULL)) {
-          result__2CJH=new_lab__MRJ(lab_type__3CJH);
-          next__0CJH=(void *)((unsigned long)result__2CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CJH)));
-          ((__POINTER *)next__0CJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1CJH)[ 0]=next__0CJH;
-        } else {
-          next__0CJH=((__POINTER *)result__2CJH)[ 0];
-          if ((next__0CJH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2CJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4CJH <<  1)) <=  4096)) {
-              next__0CJH=(void *)((unsigned long)result__2CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CJH)));
+              next__VEKH=new_lab__URJ(new_size__QXHH);
+            };
+            ((__POINTER *)next__VEKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WEKH)[ 0]=next__VEKH;
+          } else {
+            ((__POINTER *)result__XEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XEKH=next__VEKH;
+          };
+        };
+        ptr__MXHH=result__XEKH;
+      } else {
+        t__RXHH=((__UINTEGER_32 )typ_id__NXHH);
+        a__SXHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4EKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OXHH + a__SXHH) & (__UINTEGER_32)(~ a__SXHH));
+        ptr_table__1EKH=((__POINTER )(&(table_type[(t__RXHH)])));
+        lab_type__3EKH=(__UINTEGER_32)(t__RXHH |  1);
+        next__0EKH=((__POINTER )(NULL));
+        result__2EKH=((__POINTER *)ptr_table__1EKH)[ 0];
+        if ((result__2EKH == (void *)NULL)) {
+          result__2EKH=new_lab__URJ(lab_type__3EKH);
+          next__0EKH=(void *)((unsigned long)result__2EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EKH)));
+          ((__POINTER *)next__0EKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1EKH)[ 0]=next__0EKH;
+        } else {
+          next__0EKH=((__POINTER *)result__2EKH)[ 0];
+          if ((next__0EKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2EKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4EKH <<  1)) <=  4096)) {
+              next__0EKH=(void *)((unsigned long)result__2EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EKH)));
             } else {
-              next__0CJH=new_lab__MRJ(lab_type__3CJH);
+              next__0EKH=new_lab__URJ(lab_type__3EKH);
             };
-            ((__POINTER *)next__0CJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1CJH)[ 0]=next__0CJH;
+            ((__POINTER *)next__0EKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1EKH)[ 0]=next__0EKH;
           } else {
-            ((__POINTER *)result__2CJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2CJH=next__0CJH;
+            ((__POINTER *)result__2EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2EKH=next__0EKH;
           };
         };
-        ptr__RVGH=result__2CJH;
+        ptr__MXHH=result__2EKH;
       };
-      result__QVGH=((__STRING_CONSTANT *)ptr__RVGH);
-      *(result__QVGH) = *(STRING_CONSTANT__);
+      result__LXHH=((__STRING_CONSTANT *)ptr__MXHH);
+      *(result__LXHH) = *(STRING_CONSTANT__);
     };
-    Self__NWS=((__STRING_CONSTANT *)result__QVGH);
-    Self__NWS->storage__VQO=path__4Y;
-    Self__NWS->count__DD=idx__5KC;
-    copy__ZCS(string_tmp__VH,result__QVGH);
-    Self__VTFH=((__STRING_CONSTANT *)result__QVGH);
-    if ((((__CHARACTER *)Self__VTFH->storage__VQO)[(__INTEGER)(Self__VTFH->count__DD -  1)] != '/')) {
-      Self__ENS=((__STRING_CONSTANT *)result__QVGH);
-      __tmp__P4=(((__CHARACTER *)Self__ENS->storage__VQO)[(__INTEGER)(Self__ENS->count__DD -  1)] != '\\');
+    Self__VWS=((__STRING_CONSTANT *)result__LXHH);
+    Self__VWS->storage__3QO=path__EZ;
+    Self__VWS->count__DD=idx__HLC;
+    copy__BDS(string_tmp__VH,result__LXHH);
+    Self__FVGH=((__STRING_CONSTANT *)result__LXHH);
+    if ((((__CHARACTER *)Self__FVGH->storage__3QO)[(__INTEGER)(Self__FVGH->count__DD -  1)] != '/')) {
+      Self__MNS=((__STRING_CONSTANT *)result__LXHH);
+      __tmp__V4=(((__CHARACTER *)Self__MNS->storage__3QO)[(__INTEGER)(Self__MNS->count__DD -  1)] != '\\');
     } else {
-      __tmp__P4=FALSE__;
+      __tmp__V4=FALSE__;
     };
-    if (__tmp__P4) {
-      add_last__ZLT(string_tmp__VH,'/');
+    if (__tmp__V4) {
+      add_last__BMT(string_tmp__VH,'/');
     };
-    append__BOS(string_tmp__VH,(&__string_154));
-    append__BOS(string_tmp__VH,format_name__B1);
-    append__BOS(string_tmp__VH,(&__string_155));
-    fmt_name__KNC=get__IWB(string_tmp__VH);
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    append__JOS(string_tmp__VH,(&__string_156));
+    append__JOS(string_tmp__VH,format_name__H1);
+    append__JOS(string_tmp__VH,(&__string_157));
+    fmt_name__SNC=get__QWB(string_tmp__VH);
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if (((void *)get_entry__T0AC(fmt_name__KNC) == (void *)NULL)) {
-      put_string__U1F((&__string_156));
-      put_string__U1F(fmt_name__KNC);
-      put_string__U1F((&__string_157));
+    if (((void *)get_entry__10AC(fmt_name__SNC) == (void *)NULL)) {
+      put_string__21F((&__string_158));
+      put_string__21F(fmt_name__SNC);
+      put_string__21F((&__string_159));
       exit(( 1));
     };
-    object__JBC=create__name__generic_count__ZAC(fmt_name__KNC,(&__string_114));
-    source__PBC=((__PROTOTYPE *)object__JBC)->source__NBC;
-    position__SBC= 1;
-    pos_cur__VBC= 1;
-    pos_line__WBC= 1;
-    pos_col__XBC= 0;
-    while_do__DKF:
+    object__RBC=create__name__generic_count__BBC(fmt_name__SNC,(&__string_114));
+    source__XBC=((__PROTOTYPE *)object__RBC)->source__VBC;
+    position__0BC= 1;
+    pos_cur__3BC= 1;
+    pos_line__4BC= 1;
+    pos_col__5BC= 0;
+    while_do__LKF:
     {
-      result__5CJH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__5CJH=FALSE__;
+      result__5EKH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__5EKH=FALSE__;
       } else {
-        result__ADJH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__ADJH=((__CHARACTER )(( 0)));
+        result__AFKH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__AFKH=((__CHARACTER )(( 0)));
         } else {
-          result__ADJH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__AFKH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__ADJH == '-')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__5CJH=TRUE__;
+        if ((result__AFKH == '-')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__5EKH=TRUE__;
         };
       };
-      if (result__5CJH) {
-        if ((! read_identifier__LAL())) {
-          pos__W1ZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_158));
-          put_position__UOG(pos__W1ZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (result__5EKH) {
+        if ((! read_identifier__TAL())) {
+          pos__FZ0G=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_160));
+          put_position__2OG(pos__FZ0G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__EHKB=NULL;
-        ptr__FHKB=((__POINTER )(NULL));
-        typ_id__KHKB= 0;
-        sz__HHKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
-        if ((sz__HHKB ==  0)) {
-          result__EHKB=LINKED_LISToSTRING_CONSTANTo__;
-        } else {
-          typ_id__KHKB=__LINKED_LISToSTRING_CONSTANTo__;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HHKB);
-          if ((typ_id__KHKB == (__INTEGER)(-  1))) {
-            a__YTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__ZTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHKB + a__YTFH) & (__UINTEGER_32)(~ a__YTFH));
-            ptr_table__DDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZTFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__CDJH=((__POINTER )(NULL));
-            result__EDJH=((__POINTER *)ptr_table__DDJH)[ 0];
-            if ((result__EDJH == (void *)NULL)) {
-              result__EDJH=new_lab__MRJ(new_size__ZTFH);
-              next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZTFH)));
-              ((__POINTER *)next__CDJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
+        result__MHKB=NULL;
+        ptr__NHKB=((__POINTER )(NULL));
+        typ_id__SHKB= 0;
+        sz__PHKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__PHKB ==  0)) {
+          result__MHKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__SHKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__PHKB);
+          if ((typ_id__SHKB == (__INTEGER)(-  1))) {
+            a__IVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__JVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHKB + a__IVGH) & (__UINTEGER_32)(~ a__IVGH));
+            ptr_table__DFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__CFKH=((__POINTER )(NULL));
+            result__EFKH=((__POINTER *)ptr_table__DFKH)[ 0];
+            if ((result__EFKH == (void *)NULL)) {
+              result__EFKH=new_lab__URJ(new_size__JVGH);
+              next__CFKH=(void *)((unsigned long)result__EFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
+              ((__POINTER *)next__CFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DFKH)[ 0]=next__CFKH;
             } else {
-              next__CDJH=((__POINTER *)result__EDJH)[ 0];
-              if ((next__CDJH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EDJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZTFH <<  1)) <=  4096)) {
-                  next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZTFH)));
+              next__CFKH=((__POINTER *)result__EFKH)[ 0];
+              if ((next__CFKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EFKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JVGH <<  1)) <=  4096)) {
+                  next__CFKH=(void *)((unsigned long)result__EFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JVGH)));
                 } else {
-                  next__CDJH=new_lab__MRJ(new_size__ZTFH);
+                  next__CFKH=new_lab__URJ(new_size__JVGH);
                 };
-                ((__POINTER *)next__CDJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
+                ((__POINTER *)next__CFKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DFKH)[ 0]=next__CFKH;
               } else {
-                ((__POINTER *)result__EDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__EDJH=next__CDJH;
+                ((__POINTER *)result__EFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__EFKH=next__CFKH;
               };
             };
-            ptr__FHKB=result__EDJH;
-          } else {
-            t__3TFH=((__UINTEGER_32 )typ_id__KHKB);
-            a__2TFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__LDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHKB + a__2TFH) & (__UINTEGER_32)(~ a__2TFH));
-            ptr_table__IDJH=((__POINTER )(&(table_type[(t__3TFH)])));
-            lab_type__KDJH=(__UINTEGER_32)(t__3TFH |  1);
-            next__HDJH=((__POINTER )(NULL));
-            result__JDJH=((__POINTER *)ptr_table__IDJH)[ 0];
-            if ((result__JDJH == (void *)NULL)) {
-              result__JDJH=new_lab__MRJ(lab_type__KDJH);
-              next__HDJH=(void *)((unsigned long)result__JDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDJH)));
-              ((__POINTER *)next__HDJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IDJH)[ 0]=next__HDJH;
+            ptr__NHKB=result__EFKH;
+          } else {
+            t__NVGH=((__UINTEGER_32 )typ_id__SHKB);
+            a__MVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHKB + a__MVGH) & (__UINTEGER_32)(~ a__MVGH));
+            ptr_table__IFKH=((__POINTER )(&(table_type[(t__NVGH)])));
+            lab_type__KFKH=(__UINTEGER_32)(t__NVGH |  1);
+            next__HFKH=((__POINTER )(NULL));
+            result__JFKH=((__POINTER *)ptr_table__IFKH)[ 0];
+            if ((result__JFKH == (void *)NULL)) {
+              result__JFKH=new_lab__URJ(lab_type__KFKH);
+              next__HFKH=(void *)((unsigned long)result__JFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFKH)));
+              ((__POINTER *)next__HFKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IFKH)[ 0]=next__HFKH;
             } else {
-              next__HDJH=((__POINTER *)result__JDJH)[ 0];
-              if ((next__HDJH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JDJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LDJH <<  1)) <=  4096)) {
-                  next__HDJH=(void *)((unsigned long)result__JDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDJH)));
+              next__HFKH=((__POINTER *)result__JFKH)[ 0];
+              if ((next__HFKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JFKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LFKH <<  1)) <=  4096)) {
+                  next__HFKH=(void *)((unsigned long)result__JFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LFKH)));
                 } else {
-                  next__HDJH=new_lab__MRJ(lab_type__KDJH);
+                  next__HFKH=new_lab__URJ(lab_type__KFKH);
                 };
-                ((__POINTER *)next__HDJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IDJH)[ 0]=next__HDJH;
+                ((__POINTER *)next__HFKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IFKH)[ 0]=next__HFKH;
               } else {
-                ((__POINTER *)result__JDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JDJH=next__HDJH;
+                ((__POINTER *)result__JFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__JFKH=next__HFKH;
               };
             };
-            ptr__FHKB=result__JDJH;
-          };
-          result__EHKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__FHKB);
-          *(result__EHKB) = *(LINKED_LISToSTRING_CONSTANTo__);
-        };
-        Self__YVGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__ZVGH=last_string__I0C;
-        Self__3VGH=((__STRING_CONSTANT *)last_string__I0C);
-        result__2VGH= 0;
-        __tmp__4VGH=Self__3VGH->count__DD;
-        Self__5VGH= 1;
-        while ((Self__5VGH <= __tmp__4VGH)) {
-          result__2VGH=(__INTEGER)((__INTEGER)( 5 * result__2VGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3VGH->storage__VQO)[(__INTEGER)(Self__5VGH -  1)])));
-          Self__5VGH=(__INTEGER)(Self__5VGH +  1);
-        };
-        if ((result__2VGH <  0)) {
-          result__2VGH=(__INTEGER)(~ result__2VGH);
-        };
-        node__0VGH=((void **)Self__YVGH->buckets__5CT)[(__INTEGER)(result__2VGH % Self__YVGH->capacity__0CT)];
-        while ((! (((void *)node__0VGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0VGH)->key__LDT == (void *)k__ZVGH)))) {
-          node__0VGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0VGH)->next__WDT;
-        };
-        if (((void *)node__0VGH != (void *)NULL)) {
-          pos__A2ZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_159));
-          put_position__UOG(pos__A2ZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+            ptr__NHKB=result__JFKH;
+          };
+          result__MHKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__NHKB);
+          *(result__MHKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        Self__TXHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__UXHH=last_string__Q0C;
+        Self__YXHH=((__STRING_CONSTANT *)last_string__Q0C);
+        result__XXHH= 0;
+        __tmp__ZXHH=Self__YXHH->count__DD;
+        Self__0XHH= 1;
+        while ((Self__0XHH <= __tmp__ZXHH)) {
+          result__XXHH=(__INTEGER)((__INTEGER)( 5 * result__XXHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YXHH->storage__3QO)[(__INTEGER)(Self__0XHH -  1)])));
+          Self__0XHH=(__INTEGER)(Self__0XHH +  1);
+        };
+        if ((result__XXHH <  0)) {
+          result__XXHH=(__INTEGER)(~ result__XXHH);
+        };
+        node__VXHH=((void **)Self__TXHH->buckets__HDT)[(__INTEGER)(result__XXHH % Self__TXHH->capacity__CDT)];
+        while ((! (((void *)node__VXHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VXHH)->key__TDT == (void *)k__UXHH)))) {
+          node__VXHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__VXHH)->next__4DT;
+        };
+        if (((void *)node__VXHH != (void *)NULL)) {
+          pos__PZ0G=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_161));
+          put_position__2OG(pos__PZ0G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        __tmp__2ND=last_string__I0C;
-        Self__WPEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        k__YPEB=last_string__I0C;
-        Self__CWGH=((__STRING_CONSTANT *)last_string__I0C);
-        result__BWGH= 0;
-        __tmp__DWGH=Self__CWGH->count__DD;
-        Self__EWGH= 1;
-        while ((Self__EWGH <= __tmp__DWGH)) {
-          result__BWGH=(__INTEGER)((__INTEGER)( 5 * result__BWGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CWGH->storage__VQO)[(__INTEGER)(Self__EWGH -  1)])));
-          Self__EWGH=(__INTEGER)(Self__EWGH +  1);
-        };
-        if ((result__BWGH <  0)) {
-          result__BWGH=(__INTEGER)(~ result__BWGH);
-        };
-        idx__AQEB=(__INTEGER)(result__BWGH % Self__WPEB->capacity__0CT);
-        node__BQEB=((void **)Self__WPEB->buckets__5CT)[idx__AQEB];
-        while ((! (((void *)node__BQEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->key__LDT == (void *)k__YPEB)))) {
-          node__BQEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->next__WDT;
-        };
-        if (((void *)node__BQEB == (void *)NULL)) {
-          if ((Self__WPEB->capacity__0CT == Self__WPEB->count__IMY)) {
-            idx__4HZB= 0;
-            node1__CIZB=NULL;
-            node2__DIZB=NULL;
-            old_buckets__BIZB=Self__WPEB->buckets__5CT;
-            new_capacity__5HZB=prime_number_ceiling__X41((__INTEGER)(Self__WPEB->capacity__0CT +  1));
-            Self__WPEB->buckets__5CT=create__BG4(new_capacity__5HZB);
-            i__AIZB=(__INTEGER)(Self__WPEB->capacity__0CT -  1);
-            Self__WPEB->capacity__0CT=new_capacity__5HZB;
-            while ((i__AIZB >=  0)) {
-              node1__CIZB=((void **)old_buckets__BIZB)[i__AIZB];
-              while (((void *)node1__CIZB != (void *)NULL)) {
-                node2__DIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->next__WDT;
-                Self__HWGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->key__LDT);
-                result__GWGH= 0;
-                __tmp__IWGH=Self__HWGH->count__DD;
-                Self__JWGH= 1;
-                while ((Self__JWGH <= __tmp__IWGH)) {
-                  result__GWGH=(__INTEGER)((__INTEGER)( 5 * result__GWGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HWGH->storage__VQO)[(__INTEGER)(Self__JWGH -  1)])));
-                  Self__JWGH=(__INTEGER)(Self__JWGH +  1);
+        __tmp__EOD=last_string__Q0C;
+        Self__4PEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__AQEB=last_string__Q0C;
+        Self__3XHH=((__STRING_CONSTANT *)last_string__Q0C);
+        result__2XHH= 0;
+        __tmp__4XHH=Self__3XHH->count__DD;
+        Self__5XHH= 1;
+        while ((Self__5XHH <= __tmp__4XHH)) {
+          result__2XHH=(__INTEGER)((__INTEGER)( 5 * result__2XHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3XHH->storage__3QO)[(__INTEGER)(Self__5XHH -  1)])));
+          Self__5XHH=(__INTEGER)(Self__5XHH +  1);
+        };
+        if ((result__2XHH <  0)) {
+          result__2XHH=(__INTEGER)(~ result__2XHH);
+        };
+        idx__IQEB=(__INTEGER)(result__2XHH % Self__4PEB->capacity__CDT);
+        node__JQEB=((void **)Self__4PEB->buckets__HDT)[idx__IQEB];
+        while ((! (((void *)node__JQEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->key__TDT == (void *)k__AQEB)))) {
+          node__JQEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->next__4DT;
+        };
+        if (((void *)node__JQEB == (void *)NULL)) {
+          if ((Self__4PEB->capacity__CDT == Self__4PEB->count__QMY)) {
+            idx__GIZB= 0;
+            node1__KIZB=NULL;
+            node2__LIZB=NULL;
+            old_buckets__JIZB=Self__4PEB->buckets__HDT;
+            new_capacity__HIZB=prime_number_ceiling__541((__INTEGER)(Self__4PEB->capacity__CDT +  1));
+            Self__4PEB->buckets__HDT=create__JG4(new_capacity__HIZB);
+            i__IIZB=(__INTEGER)(Self__4PEB->capacity__CDT -  1);
+            Self__4PEB->capacity__CDT=new_capacity__HIZB;
+            while ((i__IIZB >=  0)) {
+              node1__KIZB=((void **)old_buckets__JIZB)[i__IIZB];
+              while (((void *)node1__KIZB != (void *)NULL)) {
+                node2__LIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__KIZB)->next__4DT;
+                Self__CYHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__KIZB)->key__TDT);
+                result__BYHH= 0;
+                __tmp__DYHH=Self__CYHH->count__DD;
+                Self__EYHH= 1;
+                while ((Self__EYHH <= __tmp__DYHH)) {
+                  result__BYHH=(__INTEGER)((__INTEGER)( 5 * result__BYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CYHH->storage__3QO)[(__INTEGER)(Self__EYHH -  1)])));
+                  Self__EYHH=(__INTEGER)(Self__EYHH +  1);
                 };
-                if ((result__GWGH <  0)) {
-                  result__GWGH=(__INTEGER)(~ result__GWGH);
+                if ((result__BYHH <  0)) {
+                  result__BYHH=(__INTEGER)(~ result__BYHH);
                 };
-                idx__4HZB=(__INTEGER)(result__GWGH % Self__WPEB->capacity__0CT);
-                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__CIZB)->next__WDT=((void **)Self__WPEB->buckets__5CT)[idx__4HZB];
-                ((void **)Self__WPEB->buckets__5CT)[idx__4HZB]=node1__CIZB;
-                node1__CIZB=node2__DIZB;
+                idx__GIZB=(__INTEGER)(result__BYHH % Self__4PEB->capacity__CDT);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__KIZB)->next__4DT=((void **)Self__4PEB->buckets__HDT)[idx__GIZB];
+                ((void **)Self__4PEB->buckets__HDT)[idx__GIZB]=node1__KIZB;
+                node1__KIZB=node2__LIZB;
               };
-              i__AIZB=(__INTEGER)(i__AIZB -  1);
-            };
-            idx__AQEB=(__INTEGER)(result__BWGH % new_capacity__5HZB);
-          };
-          __tmp__OREB=((void **)Self__WPEB->buckets__5CT)[idx__AQEB];
-          result__HKZB=NULL;
-          ptr__IKZB=((__POINTER )(NULL));
-          typ_id__NKZB= 0;
-          sz__KKZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
-          if ((sz__KKZB ==  0)) {
-            result__HKZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-          } else {
-            typ_id__NKZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KKZB);
-            if ((typ_id__NKZB == (__INTEGER)(-  1))) {
-              a__DUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__EUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KKZB + a__DUFH) & (__UINTEGER_32)(~ a__DUFH));
-              ptr_table__NDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EUFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__MDJH=((__POINTER )(NULL));
-              result__ODJH=((__POINTER *)ptr_table__NDJH)[ 0];
-              if ((result__ODJH == (void *)NULL)) {
-                result__ODJH=new_lab__MRJ(new_size__EUFH);
-                next__MDJH=(void *)((unsigned long)result__ODJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EUFH)));
-                ((__POINTER *)next__MDJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NDJH)[ 0]=next__MDJH;
+              i__IIZB=(__INTEGER)(i__IIZB -  1);
+            };
+            idx__IQEB=(__INTEGER)(result__2XHH % new_capacity__HIZB);
+          };
+          __tmp__WREB=((void **)Self__4PEB->buckets__HDT)[idx__IQEB];
+          result__PKZB=NULL;
+          ptr__QKZB=((__POINTER )(NULL));
+          typ_id__VKZB= 0;
+          sz__SKZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__SKZB ==  0)) {
+            result__PKZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__VKZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SKZB);
+            if ((typ_id__VKZB == (__INTEGER)(-  1))) {
+              a__TVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__UVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKZB + a__TVGH) & (__UINTEGER_32)(~ a__TVGH));
+              ptr_table__NFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__MFKH=((__POINTER )(NULL));
+              result__OFKH=((__POINTER *)ptr_table__NFKH)[ 0];
+              if ((result__OFKH == (void *)NULL)) {
+                result__OFKH=new_lab__URJ(new_size__UVGH);
+                next__MFKH=(void *)((unsigned long)result__OFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UVGH)));
+                ((__POINTER *)next__MFKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NFKH)[ 0]=next__MFKH;
               } else {
-                next__MDJH=((__POINTER *)result__ODJH)[ 0];
-                if ((next__MDJH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ODJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EUFH <<  1)) <=  4096)) {
-                    next__MDJH=(void *)((unsigned long)result__ODJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EUFH)));
+                next__MFKH=((__POINTER *)result__OFKH)[ 0];
+                if ((next__MFKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OFKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UVGH <<  1)) <=  4096)) {
+                    next__MFKH=(void *)((unsigned long)result__OFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UVGH)));
                   } else {
-                    next__MDJH=new_lab__MRJ(new_size__EUFH);
+                    next__MFKH=new_lab__URJ(new_size__UVGH);
                   };
-                  ((__POINTER *)next__MDJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NDJH)[ 0]=next__MDJH;
+                  ((__POINTER *)next__MFKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NFKH)[ 0]=next__MFKH;
                 } else {
-                  ((__POINTER *)result__ODJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ODJH=next__MDJH;
+                  ((__POINTER *)result__OFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__OFKH=next__MFKH;
                 };
               };
-              ptr__IKZB=result__ODJH;
+              ptr__QKZB=result__OFKH;
             } else {
-              t__IUFH=((__UINTEGER_32 )typ_id__NKZB);
-              a__HUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__VDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__KKZB + a__HUFH) & (__UINTEGER_32)(~ a__HUFH));
-              ptr_table__SDJH=((__POINTER )(&(table_type[(t__IUFH)])));
-              lab_type__UDJH=(__UINTEGER_32)(t__IUFH |  1);
-              next__RDJH=((__POINTER )(NULL));
-              result__TDJH=((__POINTER *)ptr_table__SDJH)[ 0];
-              if ((result__TDJH == (void *)NULL)) {
-                result__TDJH=new_lab__MRJ(lab_type__UDJH);
-                next__RDJH=(void *)((unsigned long)result__TDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDJH)));
-                ((__POINTER *)next__RDJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SDJH)[ 0]=next__RDJH;
+              t__YVGH=((__UINTEGER_32 )typ_id__VKZB);
+              a__XVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__VFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKZB + a__XVGH) & (__UINTEGER_32)(~ a__XVGH));
+              ptr_table__SFKH=((__POINTER )(&(table_type[(t__YVGH)])));
+              lab_type__UFKH=(__UINTEGER_32)(t__YVGH |  1);
+              next__RFKH=((__POINTER )(NULL));
+              result__TFKH=((__POINTER *)ptr_table__SFKH)[ 0];
+              if ((result__TFKH == (void *)NULL)) {
+                result__TFKH=new_lab__URJ(lab_type__UFKH);
+                next__RFKH=(void *)((unsigned long)result__TFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFKH)));
+                ((__POINTER *)next__RFKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SFKH)[ 0]=next__RFKH;
               } else {
-                next__RDJH=((__POINTER *)result__TDJH)[ 0];
-                if ((next__RDJH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TDJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VDJH <<  1)) <=  4096)) {
-                    next__RDJH=(void *)((unsigned long)result__TDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDJH)));
+                next__RFKH=((__POINTER *)result__TFKH)[ 0];
+                if ((next__RFKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TFKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VFKH <<  1)) <=  4096)) {
+                    next__RFKH=(void *)((unsigned long)result__TFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFKH)));
                   } else {
-                    next__RDJH=new_lab__MRJ(lab_type__UDJH);
+                    next__RFKH=new_lab__URJ(lab_type__UFKH);
                   };
-                  ((__POINTER *)next__RDJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SDJH)[ 0]=next__RDJH;
+                  ((__POINTER *)next__RFKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SFKH)[ 0]=next__RFKH;
                 } else {
-                  ((__POINTER *)result__TDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TDJH=next__RDJH;
+                  ((__POINTER *)result__TFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TFKH=next__RFKH;
                 };
               };
-              ptr__IKZB=result__TDJH;
-            };
-            result__HKZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__IKZB);
-            *(result__HKZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
-          };
-          Self__1DGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__HKZB);
-          Self__1DGC->item__HY3=result__EHKB;
-          Self__1DGC->key__LDT=__tmp__2ND;
-          Self__1DGC->next__WDT=__tmp__OREB;
-          node__BQEB=result__HKZB;
-          ((void **)Self__WPEB->buckets__5CT)[idx__AQEB]=result__HKZB;
-          Self__WPEB->count__IMY=(__INTEGER)(Self__WPEB->count__IMY +  1);
-        } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BQEB)->item__HY3=result__EHKB;
-        };
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__S3ZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_160));
-          put_position__UOG(pos__S3ZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+              ptr__QKZB=result__TFKH;
+            };
+            result__PKZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__QKZB);
+            *(result__PKZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+          };
+          Self__DEGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__PKZB);
+          Self__DEGC->item__PY3=result__MHKB;
+          Self__DEGC->key__TDT=__tmp__EOD;
+          Self__DEGC->next__4DT=__tmp__WREB;
+          node__JQEB=result__PKZB;
+          ((void **)Self__4PEB->buckets__HDT)[idx__IQEB]=result__PKZB;
+          Self__4PEB->count__QMY=(__INTEGER)(Self__4PEB->count__QMY +  1);
+        } else {
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JQEB)->item__PY3=result__MHKB;
+        };
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__B10G=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_162));
+          put_position__2OG(pos__B10G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        def__GSEB=result__EHKB;
-        result__ISEB=FALSE__;
-        if (read_short_elt__LLKB()) {
-          result__ISEB=TRUE__;
-          Self__OUFH=((__LINKED_LISToSTRING_CONSTANTo *)result__EHKB);
-          element__NUFH=last_string__I0C;
-          if (((void *)Self__OUFH->first_link__EUEC == (void *)NULL)) {
-            i__UWGH=last_string__I0C;
-            result__LWGH=NULL;
-            ptr__MWGH=((__POINTER )(NULL));
-            typ_id__NWGH= 0;
-            sz__OWGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__OWGH ==  0)) {
-              result__LWGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+        def__OSEB=result__MHKB;
+        result__QSEB=FALSE__;
+        if (read_short_elt__TLKB()) {
+          result__QSEB=TRUE__;
+          Self__4VGH=((__LINKED_LISToSTRING_CONSTANTo *)result__MHKB);
+          element__3VGH=last_string__Q0C;
+          if (((void *)Self__4VGH->first_link__MUEC == (void *)NULL)) {
+            i__PYHH=last_string__Q0C;
+            result__GYHH=NULL;
+            ptr__HYHH=((__POINTER )(NULL));
+            typ_id__IYHH= 0;
+            sz__JYHH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__JYHH ==  0)) {
+              result__GYHH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              typ_id__NWGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OWGH);
-              if ((typ_id__NWGH == (__INTEGER)(-  1))) {
-                a__PWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__QWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWGH + a__PWGH) & (__UINTEGER_32)(~ a__PWGH));
-                ptr_table__XDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__WDJH=((__POINTER )(NULL));
-                result__YDJH=((__POINTER *)ptr_table__XDJH)[ 0];
-                if ((result__YDJH == (void *)NULL)) {
-                  result__YDJH=new_lab__MRJ(new_size__QWGH);
-                  next__WDJH=(void *)((unsigned long)result__YDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWGH)));
-                  ((__POINTER *)next__WDJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XDJH)[ 0]=next__WDJH;
+              typ_id__IYHH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__JYHH);
+              if ((typ_id__IYHH == (__INTEGER)(-  1))) {
+                a__KYHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__LYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYHH + a__KYHH) & (__UINTEGER_32)(~ a__KYHH));
+                ptr_table__XFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LYHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__WFKH=((__POINTER )(NULL));
+                result__YFKH=((__POINTER *)ptr_table__XFKH)[ 0];
+                if ((result__YFKH == (void *)NULL)) {
+                  result__YFKH=new_lab__URJ(new_size__LYHH);
+                  next__WFKH=(void *)((unsigned long)result__YFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LYHH)));
+                  ((__POINTER *)next__WFKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
                 } else {
-                  next__WDJH=((__POINTER *)result__YDJH)[ 0];
-                  if ((next__WDJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YDJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QWGH <<  1)) <=  4096)) {
-                      next__WDJH=(void *)((unsigned long)result__YDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWGH)));
+                  next__WFKH=((__POINTER *)result__YFKH)[ 0];
+                  if ((next__WFKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YFKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LYHH <<  1)) <=  4096)) {
+                      next__WFKH=(void *)((unsigned long)result__YFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LYHH)));
                     } else {
-                      next__WDJH=new_lab__MRJ(new_size__QWGH);
+                      next__WFKH=new_lab__URJ(new_size__LYHH);
                     };
-                    ((__POINTER *)next__WDJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__XDJH)[ 0]=next__WDJH;
+                    ((__POINTER *)next__WFKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
                   } else {
-                    ((__POINTER *)result__YDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__YDJH=next__WDJH;
+                    ((__POINTER *)result__YFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__YFKH=next__WFKH;
                   };
                 };
-                ptr__MWGH=result__YDJH;
+                ptr__HYHH=result__YFKH;
               } else {
-                t__RWGH=((__UINTEGER_32 )typ_id__NWGH);
-                a__SWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__5DJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWGH + a__SWGH) & (__UINTEGER_32)(~ a__SWGH));
-                ptr_table__2DJH=((__POINTER )(&(table_type[(t__RWGH)])));
-                lab_type__4DJH=(__UINTEGER_32)(t__RWGH |  1);
-                next__1DJH=((__POINTER )(NULL));
-                result__3DJH=((__POINTER *)ptr_table__2DJH)[ 0];
-                if ((result__3DJH == (void *)NULL)) {
-                  result__3DJH=new_lab__MRJ(lab_type__4DJH);
-                  next__1DJH=(void *)((unsigned long)result__3DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5DJH)));
-                  ((__POINTER *)next__1DJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2DJH)[ 0]=next__1DJH;
+                t__MYHH=((__UINTEGER_32 )typ_id__IYHH);
+                a__NYHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__5FKH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYHH + a__NYHH) & (__UINTEGER_32)(~ a__NYHH));
+                ptr_table__2FKH=((__POINTER )(&(table_type[(t__MYHH)])));
+                lab_type__4FKH=(__UINTEGER_32)(t__MYHH |  1);
+                next__1FKH=((__POINTER )(NULL));
+                result__3FKH=((__POINTER *)ptr_table__2FKH)[ 0];
+                if ((result__3FKH == (void *)NULL)) {
+                  result__3FKH=new_lab__URJ(lab_type__4FKH);
+                  next__1FKH=(void *)((unsigned long)result__3FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FKH)));
+                  ((__POINTER *)next__1FKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__2FKH)[ 0]=next__1FKH;
                 } else {
-                  next__1DJH=((__POINTER *)result__3DJH)[ 0];
-                  if ((next__1DJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3DJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5DJH <<  1)) <=  4096)) {
-                      next__1DJH=(void *)((unsigned long)result__3DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5DJH)));
+                  next__1FKH=((__POINTER *)result__3FKH)[ 0];
+                  if ((next__1FKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3FKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5FKH <<  1)) <=  4096)) {
+                      next__1FKH=(void *)((unsigned long)result__3FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FKH)));
                     } else {
-                      next__1DJH=new_lab__MRJ(lab_type__4DJH);
+                      next__1FKH=new_lab__URJ(lab_type__4FKH);
                     };
-                    ((__POINTER *)next__1DJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__2DJH)[ 0]=next__1DJH;
+                    ((__POINTER *)next__1FKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__2FKH)[ 0]=next__1FKH;
                   } else {
-                    ((__POINTER *)result__3DJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__3DJH=next__1DJH;
+                    ((__POINTER *)result__3FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__3FKH=next__1FKH;
                   };
                 };
-                ptr__MWGH=result__3DJH;
+                ptr__HYHH=result__3FKH;
               };
-              result__LWGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__MWGH);
-              *(result__LWGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
-            };
-            Self__TWGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__LWGH);
-            Self__TWGH->item__0VHD=i__UWGH;
-            Self__TWGH->next__MOOD=NULL;
-            Self__OUFH->first_link__EUEC=result__LWGH;
-            Self__OUFH->parent_linked_collection__LD.upper__5CD= 1;
-            Self__OUFH->last_link__NUEC=result__LWGH;
-            Self__OUFH->mem_idx__OUEC= 1;
-            Self__OUFH->mem_lnk__QUEC=result__LWGH;
-          } else {
-            result__VWGH=NULL;
-            ptr__WWGH=((__POINTER )(NULL));
-            typ_id__XWGH= 0;
-            sz__YWGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-            if ((sz__YWGH ==  0)) {
-              result__VWGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              result__GYHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HYHH);
+              *(result__GYHH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__OYHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__GYHH);
+            Self__OYHH->item__CWHD=i__PYHH;
+            Self__OYHH->next__UOOD=NULL;
+            Self__4VGH->first_link__MUEC=result__GYHH;
+            Self__4VGH->parent_linked_collection__LD.upper__HDD= 1;
+            Self__4VGH->last_link__VUEC=result__GYHH;
+            Self__4VGH->mem_idx__WUEC= 1;
+            Self__4VGH->mem_lnk__YUEC=result__GYHH;
+          } else {
+            result__QYHH=NULL;
+            ptr__RYHH=((__POINTER )(NULL));
+            typ_id__SYHH= 0;
+            sz__TYHH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__TYHH ==  0)) {
+              result__QYHH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              typ_id__XWGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YWGH);
-              if ((typ_id__XWGH == (__INTEGER)(-  1))) {
-                a__ZWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__0WGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YWGH + a__ZWGH) & (__UINTEGER_32)(~ a__ZWGH));
-                ptr_table__BEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0WGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__AEJH=((__POINTER )(NULL));
-                result__CEJH=((__POINTER *)ptr_table__BEJH)[ 0];
-                if ((result__CEJH == (void *)NULL)) {
-                  result__CEJH=new_lab__MRJ(new_size__0WGH);
-                  next__AEJH=(void *)((unsigned long)result__CEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WGH)));
-                  ((__POINTER *)next__AEJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BEJH)[ 0]=next__AEJH;
+              typ_id__SYHH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__TYHH);
+              if ((typ_id__SYHH == (__INTEGER)(-  1))) {
+                a__UYHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__VYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TYHH + a__UYHH) & (__UINTEGER_32)(~ a__UYHH));
+                ptr_table__BGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VYHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__AGKH=((__POINTER )(NULL));
+                result__CGKH=((__POINTER *)ptr_table__BGKH)[ 0];
+                if ((result__CGKH == (void *)NULL)) {
+                  result__CGKH=new_lab__URJ(new_size__VYHH);
+                  next__AGKH=(void *)((unsigned long)result__CGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VYHH)));
+                  ((__POINTER *)next__AGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BGKH)[ 0]=next__AGKH;
                 } else {
-                  next__AEJH=((__POINTER *)result__CEJH)[ 0];
-                  if ((next__AEJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CEJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0WGH <<  1)) <=  4096)) {
-                      next__AEJH=(void *)((unsigned long)result__CEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WGH)));
+                  next__AGKH=((__POINTER *)result__CGKH)[ 0];
+                  if ((next__AGKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CGKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VYHH <<  1)) <=  4096)) {
+                      next__AGKH=(void *)((unsigned long)result__CGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VYHH)));
                     } else {
-                      next__AEJH=new_lab__MRJ(new_size__0WGH);
+                      next__AGKH=new_lab__URJ(new_size__VYHH);
                     };
-                    ((__POINTER *)next__AEJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__BEJH)[ 0]=next__AEJH;
+                    ((__POINTER *)next__AGKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__BGKH)[ 0]=next__AGKH;
                   } else {
-                    ((__POINTER *)result__CEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__CEJH=next__AEJH;
+                    ((__POINTER *)result__CGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__CGKH=next__AGKH;
                   };
                 };
-                ptr__WWGH=result__CEJH;
+                ptr__RYHH=result__CGKH;
               } else {
-                t__1WGH=((__UINTEGER_32 )typ_id__XWGH);
-                a__2WGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__JEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YWGH + a__2WGH) & (__UINTEGER_32)(~ a__2WGH));
-                ptr_table__GEJH=((__POINTER )(&(table_type[(t__1WGH)])));
-                lab_type__IEJH=(__UINTEGER_32)(t__1WGH |  1);
-                next__FEJH=((__POINTER )(NULL));
-                result__HEJH=((__POINTER *)ptr_table__GEJH)[ 0];
-                if ((result__HEJH == (void *)NULL)) {
-                  result__HEJH=new_lab__MRJ(lab_type__IEJH);
-                  next__FEJH=(void *)((unsigned long)result__HEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JEJH)));
-                  ((__POINTER *)next__FEJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GEJH)[ 0]=next__FEJH;
+                t__WYHH=((__UINTEGER_32 )typ_id__SYHH);
+                a__XYHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__JGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TYHH + a__XYHH) & (__UINTEGER_32)(~ a__XYHH));
+                ptr_table__GGKH=((__POINTER )(&(table_type[(t__WYHH)])));
+                lab_type__IGKH=(__UINTEGER_32)(t__WYHH |  1);
+                next__FGKH=((__POINTER )(NULL));
+                result__HGKH=((__POINTER *)ptr_table__GGKH)[ 0];
+                if ((result__HGKH == (void *)NULL)) {
+                  result__HGKH=new_lab__URJ(lab_type__IGKH);
+                  next__FGKH=(void *)((unsigned long)result__HGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGKH)));
+                  ((__POINTER *)next__FGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GGKH)[ 0]=next__FGKH;
                 } else {
-                  next__FEJH=((__POINTER *)result__HEJH)[ 0];
-                  if ((next__FEJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HEJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JEJH <<  1)) <=  4096)) {
-                      next__FEJH=(void *)((unsigned long)result__HEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JEJH)));
+                  next__FGKH=((__POINTER *)result__HGKH)[ 0];
+                  if ((next__FGKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HGKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JGKH <<  1)) <=  4096)) {
+                      next__FGKH=(void *)((unsigned long)result__HGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGKH)));
                     } else {
-                      next__FEJH=new_lab__MRJ(lab_type__IEJH);
+                      next__FGKH=new_lab__URJ(lab_type__IGKH);
                     };
-                    ((__POINTER *)next__FEJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__GEJH)[ 0]=next__FEJH;
+                    ((__POINTER *)next__FGKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__GGKH)[ 0]=next__FGKH;
                   } else {
-                    ((__POINTER *)result__HEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__HEJH=next__FEJH;
+                    ((__POINTER *)result__HGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__HGKH=next__FGKH;
                   };
                 };
-                ptr__WWGH=result__HEJH;
+                ptr__RYHH=result__HGKH;
               };
-              result__VWGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__WWGH);
-              *(result__VWGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__QYHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__RYHH);
+              *(result__QYHH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            Self__3WGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__VWGH);
-            Self__3WGH->item__0VHD=element__NUFH;
-            Self__3WGH->next__MOOD=NULL;
-            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__OUFH->last_link__NUEC)->next__MOOD=result__VWGH;
-            Self__OUFH->parent_linked_collection__LD.upper__5CD=(__INTEGER)(Self__OUFH->parent_linked_collection__LD.upper__5CD +  1);
-            Self__OUFH->last_link__NUEC=result__VWGH;
+            Self__YYHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__QYHH);
+            Self__YYHH->item__CWHD=element__3VGH;
+            Self__YYHH->next__UOOD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__4VGH->last_link__VUEC)->next__UOOD=result__QYHH;
+            Self__4VGH->parent_linked_collection__LD.upper__HDD=(__INTEGER)(Self__4VGH->parent_linked_collection__LD.upper__HDD +  1);
+            Self__4VGH->last_link__VUEC=result__QYHH;
           };
-          while_do__CSSB:
+          while_do__KSSB:
           {
-            result__KEJH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__KEJH=FALSE__;
+            result__KGKH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__KGKH=FALSE__;
             } else {
-              result__LEJH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__LEJH=((__CHARACTER )(( 0)));
+              result__LGKH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__LGKH=((__CHARACTER )(( 0)));
               } else {
-                result__LEJH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__LGKH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__LEJH == '+')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__KEJH=TRUE__;
+              if ((result__LGKH == '+')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__KGKH=TRUE__;
               };
             };
-            if (result__KEJH) {
-              if ((! read_short_elt__LLKB())) {
-                pos__U3ZG=current_position__JXF();
-                put_error__text__KNG( 0,(&__string_161));
-                put_position__UOG(pos__U3ZG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+            if (result__KGKH) {
+              if ((! read_short_elt__TLKB())) {
+                pos__D10G=current_position__RXF();
+                put_error__text__SNG( 0,(&__string_163));
+                put_position__2OG(pos__D10G);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              Self__5TEC=((__LINKED_LISToSTRING_CONSTANTo *)def__GSEB);
-              element__AUEC=last_string__I0C;
-              if (((void *)Self__5TEC->first_link__EUEC == (void *)NULL)) {
-                i__IXGH=last_string__I0C;
-                result__5WGH=NULL;
-                ptr__AXGH=((__POINTER )(NULL));
-                typ_id__BXGH= 0;
-                sz__CXGH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__CXGH ==  0)) {
-                  result__5WGH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              Self__HUEC=((__LINKED_LISToSTRING_CONSTANTo *)def__OSEB);
+              element__IUEC=last_string__Q0C;
+              if (((void *)Self__HUEC->first_link__MUEC == (void *)NULL)) {
+                i__DZHH=last_string__Q0C;
+                result__0YHH=NULL;
+                ptr__1YHH=((__POINTER )(NULL));
+                typ_id__2YHH= 0;
+                sz__3YHH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__3YHH ==  0)) {
+                  result__0YHH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  typ_id__BXGH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__CXGH);
-                  if ((typ_id__BXGH == (__INTEGER)(-  1))) {
-                    a__DXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__EXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__CXGH + a__DXGH) & (__UINTEGER_32)(~ a__DXGH));
-                    ptr_table__OEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__NEJH=((__POINTER )(NULL));
-                    result__PEJH=((__POINTER *)ptr_table__OEJH)[ 0];
-                    if ((result__PEJH == (void *)NULL)) {
-                      result__PEJH=new_lab__MRJ(new_size__EXGH);
-                      next__NEJH=(void *)((unsigned long)result__PEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EXGH)));
-                      ((__POINTER *)next__NEJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__OEJH)[ 0]=next__NEJH;
+                  typ_id__2YHH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__3YHH);
+                  if ((typ_id__2YHH == (__INTEGER)(-  1))) {
+                    a__4YHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__5YHH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YHH + a__4YHH) & (__UINTEGER_32)(~ a__4YHH));
+                    ptr_table__OGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5YHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__NGKH=((__POINTER )(NULL));
+                    result__PGKH=((__POINTER *)ptr_table__OGKH)[ 0];
+                    if ((result__PGKH == (void *)NULL)) {
+                      result__PGKH=new_lab__URJ(new_size__5YHH);
+                      next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5YHH)));
+                      ((__POINTER *)next__NGKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
                     } else {
-                      next__NEJH=((__POINTER *)result__PEJH)[ 0];
-                      if ((next__NEJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PEJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EXGH <<  1)) <=  4096)) {
-                          next__NEJH=(void *)((unsigned long)result__PEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EXGH)));
+                      next__NGKH=((__POINTER *)result__PGKH)[ 0];
+                      if ((next__NGKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PGKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5YHH <<  1)) <=  4096)) {
+                          next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5YHH)));
                         } else {
-                          next__NEJH=new_lab__MRJ(new_size__EXGH);
+                          next__NGKH=new_lab__URJ(new_size__5YHH);
                         };
-                        ((__POINTER *)next__NEJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__OEJH)[ 0]=next__NEJH;
+                        ((__POINTER *)next__NGKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
                       } else {
-                        ((__POINTER *)result__PEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__PEJH=next__NEJH;
+                        ((__POINTER *)result__PGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__PGKH=next__NGKH;
                       };
                     };
-                    ptr__AXGH=result__PEJH;
+                    ptr__1YHH=result__PGKH;
                   } else {
-                    t__FXGH=((__UINTEGER_32 )typ_id__BXGH);
-                    a__GXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__WEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__CXGH + a__GXGH) & (__UINTEGER_32)(~ a__GXGH));
-                    ptr_table__TEJH=((__POINTER )(&(table_type[(t__FXGH)])));
-                    lab_type__VEJH=(__UINTEGER_32)(t__FXGH |  1);
-                    next__SEJH=((__POINTER )(NULL));
-                    result__UEJH=((__POINTER *)ptr_table__TEJH)[ 0];
-                    if ((result__UEJH == (void *)NULL)) {
-                      result__UEJH=new_lab__MRJ(lab_type__VEJH);
-                      next__SEJH=(void *)((unsigned long)result__UEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WEJH)));
-                      ((__POINTER *)next__SEJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__TEJH)[ 0]=next__SEJH;
+                    t__AZHH=((__UINTEGER_32 )typ_id__2YHH);
+                    a__BZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__WGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YHH + a__BZHH) & (__UINTEGER_32)(~ a__BZHH));
+                    ptr_table__TGKH=((__POINTER )(&(table_type[(t__AZHH)])));
+                    lab_type__VGKH=(__UINTEGER_32)(t__AZHH |  1);
+                    next__SGKH=((__POINTER )(NULL));
+                    result__UGKH=((__POINTER *)ptr_table__TGKH)[ 0];
+                    if ((result__UGKH == (void *)NULL)) {
+                      result__UGKH=new_lab__URJ(lab_type__VGKH);
+                      next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGKH)));
+                      ((__POINTER *)next__SGKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
                     } else {
-                      next__SEJH=((__POINTER *)result__UEJH)[ 0];
-                      if ((next__SEJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UEJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WEJH <<  1)) <=  4096)) {
-                          next__SEJH=(void *)((unsigned long)result__UEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WEJH)));
+                      next__SGKH=((__POINTER *)result__UGKH)[ 0];
+                      if ((next__SGKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UGKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WGKH <<  1)) <=  4096)) {
+                          next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGKH)));
                         } else {
-                          next__SEJH=new_lab__MRJ(lab_type__VEJH);
+                          next__SGKH=new_lab__URJ(lab_type__VGKH);
                         };
-                        ((__POINTER *)next__SEJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__TEJH)[ 0]=next__SEJH;
+                        ((__POINTER *)next__SGKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
                       } else {
-                        ((__POINTER *)result__UEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__UEJH=next__SEJH;
+                        ((__POINTER *)result__UGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__UGKH=next__SGKH;
                       };
                     };
-                    ptr__AXGH=result__UEJH;
+                    ptr__1YHH=result__UGKH;
                   };
-                  result__5WGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__AXGH);
-                  *(result__5WGH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__0YHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__1YHH);
+                  *(result__0YHH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__HXGH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__5WGH);
-                Self__HXGH->item__0VHD=i__IXGH;
-                Self__HXGH->next__MOOD=NULL;
-                Self__5TEC->first_link__EUEC=result__5WGH;
-                Self__5TEC->parent_linked_collection__LD.upper__5CD= 1;
-                Self__5TEC->last_link__NUEC=result__5WGH;
-                Self__5TEC->mem_idx__OUEC= 1;
-                Self__5TEC->mem_lnk__QUEC=result__5WGH;
+                Self__CZHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__0YHH);
+                Self__CZHH->item__CWHD=i__DZHH;
+                Self__CZHH->next__UOOD=NULL;
+                Self__HUEC->first_link__MUEC=result__0YHH;
+                Self__HUEC->parent_linked_collection__LD.upper__HDD= 1;
+                Self__HUEC->last_link__VUEC=result__0YHH;
+                Self__HUEC->mem_idx__WUEC= 1;
+                Self__HUEC->mem_lnk__YUEC=result__0YHH;
               } else {
-                result__APED=NULL;
-                ptr__BPED=((__POINTER )(NULL));
-                typ_id__GPED= 0;
-                sz__DPED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
-                if ((sz__DPED ==  0)) {
-                  result__APED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                result__IPED=NULL;
+                ptr__JPED=((__POINTER )(NULL));
+                typ_id__OPED= 0;
+                sz__LPED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__LPED ==  0)) {
+                  result__IPED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  typ_id__GPED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__DPED);
-                  if ((typ_id__GPED == (__INTEGER)(-  1))) {
-                    a__WLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__XLEH=(__UINTEGER_32)((__UINTEGER_32)(sz__DPED + a__WLEH) & (__UINTEGER_32)(~ a__WLEH));
-                    ptr_table__YEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XLEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__XEJH=((__POINTER )(NULL));
-                    result__ZEJH=((__POINTER *)ptr_table__YEJH)[ 0];
-                    if ((result__ZEJH == (void *)NULL)) {
-                      result__ZEJH=new_lab__MRJ(new_size__XLEH);
-                      next__XEJH=(void *)((unsigned long)result__ZEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLEH)));
-                      ((__POINTER *)next__XEJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__YEJH)[ 0]=next__XEJH;
+                  typ_id__OPED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__LPED);
+                  if ((typ_id__OPED == (__INTEGER)(-  1))) {
+                    a__GNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__HNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LPED + a__GNFH) & (__UINTEGER_32)(~ a__GNFH));
+                    ptr_table__YGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__XGKH=((__POINTER )(NULL));
+                    result__ZGKH=((__POINTER *)ptr_table__YGKH)[ 0];
+                    if ((result__ZGKH == (void *)NULL)) {
+                      result__ZGKH=new_lab__URJ(new_size__HNFH);
+                      next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNFH)));
+                      ((__POINTER *)next__XGKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
                     } else {
-                      next__XEJH=((__POINTER *)result__ZEJH)[ 0];
-                      if ((next__XEJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZEJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XLEH <<  1)) <=  4096)) {
-                          next__XEJH=(void *)((unsigned long)result__ZEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLEH)));
+                      next__XGKH=((__POINTER *)result__ZGKH)[ 0];
+                      if ((next__XGKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZGKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__HNFH <<  1)) <=  4096)) {
+                          next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNFH)));
                         } else {
-                          next__XEJH=new_lab__MRJ(new_size__XLEH);
+                          next__XGKH=new_lab__URJ(new_size__HNFH);
                         };
-                        ((__POINTER *)next__XEJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__YEJH)[ 0]=next__XEJH;
+                        ((__POINTER *)next__XGKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
                       } else {
-                        ((__POINTER *)result__ZEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ZEJH=next__XEJH;
+                        ((__POINTER *)result__ZGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ZGKH=next__XGKH;
                       };
                     };
-                    ptr__BPED=result__ZEJH;
+                    ptr__JPED=result__ZGKH;
                   } else {
-                    t__1LEH=((__UINTEGER_32 )typ_id__GPED);
-                    a__0LEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__AFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DPED + a__0LEH) & (__UINTEGER_32)(~ a__0LEH));
-                    ptr_table__3EJH=((__POINTER )(&(table_type[(t__1LEH)])));
-                    lab_type__5EJH=(__UINTEGER_32)(t__1LEH |  1);
-                    next__2EJH=((__POINTER )(NULL));
-                    result__4EJH=((__POINTER *)ptr_table__3EJH)[ 0];
-                    if ((result__4EJH == (void *)NULL)) {
-                      result__4EJH=new_lab__MRJ(lab_type__5EJH);
-                      next__2EJH=(void *)((unsigned long)result__4EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AFJH)));
-                      ((__POINTER *)next__2EJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__3EJH)[ 0]=next__2EJH;
+                    t__LNFH=((__UINTEGER_32 )typ_id__OPED);
+                    a__KNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__AHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LPED + a__KNFH) & (__UINTEGER_32)(~ a__KNFH));
+                    ptr_table__3GKH=((__POINTER )(&(table_type[(t__LNFH)])));
+                    lab_type__5GKH=(__UINTEGER_32)(t__LNFH |  1);
+                    next__2GKH=((__POINTER )(NULL));
+                    result__4GKH=((__POINTER *)ptr_table__3GKH)[ 0];
+                    if ((result__4GKH == (void *)NULL)) {
+                      result__4GKH=new_lab__URJ(lab_type__5GKH);
+                      next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AHKH)));
+                      ((__POINTER *)next__2GKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
                     } else {
-                      next__2EJH=((__POINTER *)result__4EJH)[ 0];
-                      if ((next__2EJH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4EJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AFJH <<  1)) <=  4096)) {
-                          next__2EJH=(void *)((unsigned long)result__4EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AFJH)));
+                      next__2GKH=((__POINTER *)result__4GKH)[ 0];
+                      if ((next__2GKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4GKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AHKH <<  1)) <=  4096)) {
+                          next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AHKH)));
                         } else {
-                          next__2EJH=new_lab__MRJ(lab_type__5EJH);
+                          next__2GKH=new_lab__URJ(lab_type__5GKH);
                         };
-                        ((__POINTER *)next__2EJH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3EJH)[ 0]=next__2EJH;
+                        ((__POINTER *)next__2GKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
                       } else {
-                        ((__POINTER *)result__4EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2EJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4EJH=next__2EJH;
+                        ((__POINTER *)result__4GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__4GKH=next__2GKH;
                       };
                     };
-                    ptr__BPED=result__4EJH;
+                    ptr__JPED=result__4GKH;
                   };
-                  result__APED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__BPED);
-                  *(result__APED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__IPED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__JPED);
+                  *(result__IPED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                Self__ALSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__APED);
-                Self__ALSD->item__0VHD=element__AUEC;
-                Self__ALSD->next__MOOD=NULL;
-                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__5TEC->last_link__NUEC)->next__MOOD=result__APED;
-                Self__5TEC->parent_linked_collection__LD.upper__5CD=(__INTEGER)(Self__5TEC->parent_linked_collection__LD.upper__5CD +  1);
-                Self__5TEC->last_link__NUEC=result__APED;
+                Self__ILSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__IPED);
+                Self__ILSD->item__CWHD=element__IUEC;
+                Self__ILSD->next__UOOD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__HUEC->last_link__VUEC)->next__UOOD=result__IPED;
+                Self__HUEC->parent_linked_collection__LD.upper__HDD=(__INTEGER)(Self__HUEC->parent_linked_collection__LD.upper__HDD +  1);
+                Self__HUEC->last_link__VUEC=result__IPED;
               };
-              goto while_do__CSSB;
+              goto while_do__KSSB;
             };
           };
         };
-        if ((! result__ISEB)) {
-          pos__W3ZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_162));
-          put_position__UOG(pos__W3ZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__QSEB)) {
+          pos__F10G=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_164));
+          put_position__2OG(pos__F10G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__1GG=FALSE__;
-        if ((! read_space__3RD())) {
-          result__1GG=FALSE__;
+        result__DHG=FALSE__;
+        if ((! read_space__FSD())) {
+          result__DHG=FALSE__;
         } else {
-          result__K2BH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__K2BH=((__CHARACTER )(( 0)));
+          result__21CH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__21CH=((__CHARACTER )(( 0)));
           } else {
-            result__K2BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__21CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__K2BH == ';')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__1GG=TRUE__;
+          if ((result__21CH == ';')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__DHG=TRUE__;
           };
         };
-        if ((! result__1GG)) {
-          pos__Y3ZG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_163));
-          put_position__UOG(pos__Y3ZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__DHG)) {
+          pos__H10G=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_165));
+          put_position__2OG(pos__H10G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__DKF;
+        goto while_do__LKF;
       };
     };
-    read_space__3RD();
-    result__ETBH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__ETBH=((__CHARACTER )(( 0)));
+    read_space__FSD();
+    result__HSCH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__HSCH=((__CHARACTER )(( 0)));
     } else {
-      result__ETBH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__HSCH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__ETBH != ((__CHARACTER )(( 0))))) {
-      pos__03ZG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_164));
-      put_position__UOG(pos__03ZG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    if ((result__HSCH != ((__CHARACTER )(( 0))))) {
+      pos__J10G=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_166));
+      put_position__2OG(pos__J10G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    object__JBC=NULL;
+    object__RBC=NULL;
   };
-  index_count__D5=(__INTEGER)(index_count__D5 +  1);
-  fast_put__to__Y1R(result__NOC,(&__string_2));
-  result__MYB=NULL;
-  ptr__NYB=((__POINTER )(NULL));
-  typ_id__SYB= 0;
-  sz__PYB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
-  if ((sz__PYB ==  0)) {
-    result__MYB=FAST_ARRAYoSLOTo__;
+  index_count__J5=(__INTEGER)(index_count__J5 +  1);
+  fast_put__to__A2R(result__VOC,(&__string_2));
+  result__UYB=NULL;
+  ptr__VYB=((__POINTER )(NULL));
+  typ_id__0YB= 0;
+  sz__XYB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
+  if ((sz__XYB ==  0)) {
+    result__UYB=FAST_ARRAYoSLOTo__;
   } else {
-    typ_id__SYB=__FAST_ARRAYoSLOTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PYB);
-    if ((typ_id__SYB == (__INTEGER)(-  1))) {
-      a__RUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__SUFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYB + a__RUFH) & (__UINTEGER_32)(~ a__RUFH));
-      ptr_table__CFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SUFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__BFJH=((__POINTER )(NULL));
-      result__DFJH=((__POINTER *)ptr_table__CFJH)[ 0];
-      if ((result__DFJH == (void *)NULL)) {
-        result__DFJH=new_lab__MRJ(new_size__SUFH);
-        next__BFJH=(void *)((unsigned long)result__DFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SUFH)));
-        ((__POINTER *)next__BFJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CFJH)[ 0]=next__BFJH;
-      } else {
-        next__BFJH=((__POINTER *)result__DFJH)[ 0];
-        if ((next__BFJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DFJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SUFH <<  1)) <=  4096)) {
-            next__BFJH=(void *)((unsigned long)result__DFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SUFH)));
-          } else {
-            next__BFJH=new_lab__MRJ(new_size__SUFH);
-          };
-          ((__POINTER *)next__BFJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CFJH)[ 0]=next__BFJH;
-        } else {
-          ((__POINTER *)result__DFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DFJH=next__BFJH;
-        };
-      };
-      ptr__NYB=result__DFJH;
-    } else {
-      t__WUFH=((__UINTEGER_32 )typ_id__SYB);
-      a__VUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PYB + a__VUFH) & (__UINTEGER_32)(~ a__VUFH));
-      ptr_table__HFJH=((__POINTER )(&(table_type[(t__WUFH)])));
-      lab_type__JFJH=(__UINTEGER_32)(t__WUFH |  1);
-      next__GFJH=((__POINTER )(NULL));
-      result__IFJH=((__POINTER *)ptr_table__HFJH)[ 0];
-      if ((result__IFJH == (void *)NULL)) {
-        result__IFJH=new_lab__MRJ(lab_type__JFJH);
-        next__GFJH=(void *)((unsigned long)result__IFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFJH)));
-        ((__POINTER *)next__GFJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HFJH)[ 0]=next__GFJH;
-      } else {
-        next__GFJH=((__POINTER *)result__IFJH)[ 0];
-        if ((next__GFJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IFJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KFJH <<  1)) <=  4096)) {
-            next__GFJH=(void *)((unsigned long)result__IFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFJH)));
-          } else {
-            next__GFJH=new_lab__MRJ(lab_type__JFJH);
-          };
-          ((__POINTER *)next__GFJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HFJH)[ 0]=next__GFJH;
-        } else {
-          ((__POINTER *)result__IFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IFJH=next__GFJH;
-        };
-      };
-      ptr__NYB=result__IFJH;
-    };
-    result__MYB=((__FAST_ARRAYoSLOTo *)ptr__NYB);
-    *(result__MYB) = *(FAST_ARRAYoSLOTo__);
-  };
-  Self__LES=((__FAST_ARRAYoSLOTo *)result__MYB);
-  if ((Self__LES->parent_arrayed_collection__V5.capacity__UES <  1)) {
-    sz__CNDH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
-    result__BNDH=((__POINTER )(NULL));
-    a__HNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__DNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__CNDH + a__HNDH) & (__UINTEGER_32)(~ a__HNDH));
-    new_size2__ENDH=(__UINTEGER_32)(new_size__DNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__ENDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__ZUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__0UFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ENDH + a__ZUFH) & (__UINTEGER_32)(~ a__ZUFH));
-      ptr_table__MFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0UFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__LFJH=((__POINTER )(NULL));
-      result__NFJH=((__POINTER *)ptr_table__MFJH)[ 0];
-      if ((result__NFJH == (void *)NULL)) {
-        result__NFJH=new_lab__MRJ(new_size__0UFH);
-        next__LFJH=(void *)((unsigned long)result__NFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UFH)));
-        ((__POINTER *)next__LFJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MFJH)[ 0]=next__LFJH;
-      } else {
-        next__LFJH=((__POINTER *)result__NFJH)[ 0];
-        if ((next__LFJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NFJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0UFH <<  1)) <=  4096)) {
-            next__LFJH=(void *)((unsigned long)result__NFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UFH)));
-          } else {
-            next__LFJH=new_lab__MRJ(new_size__0UFH);
-          };
-          ((__POINTER *)next__LFJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MFJH)[ 0]=next__LFJH;
-        } else {
-          ((__POINTER *)result__NFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NFJH=next__LFJH;
-        };
-      };
-      ((__POINTER *)result__NFJH)[ 0]=((__POINTER ) 3);
-      result__BNDH=(void *)((unsigned long)result__NFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__QFJH=first_free__XDVB;
-      while ((((void *)result__QFJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QFJH)->map_size_and_id__ITB &  4294967292LU) < new_size__DNDH))) {
-        result__QFJH=((__MEMORY *)result__QFJH)->map_next_free__JTB;
-      };
-      if (((void *)result__QFJH == (void *)NULL)) {
-        result__QFJH=new_page__OA5();
-      };
-      to_busy__index__TTFC(result__QFJH,new_size__DNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QFJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-      result__BNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QFJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    Result__MI1C=((void **)result__BNDH);
-    Self__FLWD= 0;
-    while ((Self__FLWD >=  0)) {
-      Result__MI1C[Self__FLWD]=NULL;
-      Self__FLWD=(__INTEGER)(Self__FLWD -  1);
-    };
-    Self__LES->parent_arrayed_collection__V5.capacity__UES= 1;
-  };
-  create__with__SQB(TYPE_NULL__, 0);
-  fast_put__to__Y1R(result__NOC,(&__string_3));
-  create__with__SQB(TYPE_VOID__, 0);
-  fast_put__to__Y1R(result__NOC,(&__string_45));
-  create__with__SQB(TYPE_CONTEXT__, 1);
-  result__O2B=NULL;
-  ptr__P2B=((__POINTER )(NULL));
-  typ_id__U2B= 0;
-  sz__R2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
-  if ((sz__R2B ==  0)) {
-    result__O2B=FAST_ARRAYoTYPE_IDo__;
+    typ_id__0YB=__FAST_ARRAYoSLOTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__XYB);
+    if ((typ_id__0YB == (__INTEGER)(-  1))) {
+      a__BWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XYB + a__BWGH) & (__UINTEGER_32)(~ a__BWGH));
+      ptr_table__CHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BHKH=((__POINTER )(NULL));
+      result__DHKH=((__POINTER *)ptr_table__CHKH)[ 0];
+      if ((result__DHKH == (void *)NULL)) {
+        result__DHKH=new_lab__URJ(new_size__CWGH);
+        next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWGH)));
+        ((__POINTER *)next__BHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
+      } else {
+        next__BHKH=((__POINTER *)result__DHKH)[ 0];
+        if ((next__BHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DHKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CWGH <<  1)) <=  4096)) {
+            next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWGH)));
+          } else {
+            next__BHKH=new_lab__URJ(new_size__CWGH);
+          };
+          ((__POINTER *)next__BHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CHKH)[ 0]=next__BHKH;
+        } else {
+          ((__POINTER *)result__DHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DHKH=next__BHKH;
+        };
+      };
+      ptr__VYB=result__DHKH;
+    } else {
+      t__GWGH=((__UINTEGER_32 )typ_id__0YB);
+      a__FWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XYB + a__FWGH) & (__UINTEGER_32)(~ a__FWGH));
+      ptr_table__HHKH=((__POINTER )(&(table_type[(t__GWGH)])));
+      lab_type__JHKH=(__UINTEGER_32)(t__GWGH |  1);
+      next__GHKH=((__POINTER )(NULL));
+      result__IHKH=((__POINTER *)ptr_table__HHKH)[ 0];
+      if ((result__IHKH == (void *)NULL)) {
+        result__IHKH=new_lab__URJ(lab_type__JHKH);
+        next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
+        ((__POINTER *)next__GHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HHKH)[ 0]=next__GHKH;
+      } else {
+        next__GHKH=((__POINTER *)result__IHKH)[ 0];
+        if ((next__GHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IHKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KHKH <<  1)) <=  4096)) {
+            next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
+          } else {
+            next__GHKH=new_lab__URJ(lab_type__JHKH);
+          };
+          ((__POINTER *)next__GHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HHKH)[ 0]=next__GHKH;
+        } else {
+          ((__POINTER *)result__IHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IHKH=next__GHKH;
+        };
+      };
+      ptr__VYB=result__IHKH;
+    };
+    result__UYB=((__FAST_ARRAYoSLOTo *)ptr__VYB);
+    *(result__UYB) = *(FAST_ARRAYoSLOTo__);
+  };
+  Self__TES=((__FAST_ARRAYoSLOTo *)result__UYB);
+  if ((Self__TES->parent_arrayed_collection__15.capacity__2ES <  1)) {
+    sz__0NEH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__ZNEH=((__POINTER )(NULL));
+    a__5NEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1NEH=(__UINTEGER_32)((__UINTEGER_32)(sz__0NEH + a__5NEH) & (__UINTEGER_32)(~ a__5NEH));
+    new_size2__2NEH=(__UINTEGER_32)(new_size__1NEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__2NEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__JWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KWGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2NEH + a__JWGH) & (__UINTEGER_32)(~ a__JWGH));
+      ptr_table__MHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LHKH=((__POINTER )(NULL));
+      result__NHKH=((__POINTER *)ptr_table__MHKH)[ 0];
+      if ((result__NHKH == (void *)NULL)) {
+        result__NHKH=new_lab__URJ(new_size__KWGH);
+        next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWGH)));
+        ((__POINTER *)next__LHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MHKH)[ 0]=next__LHKH;
+      } else {
+        next__LHKH=((__POINTER *)result__NHKH)[ 0];
+        if ((next__LHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NHKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KWGH <<  1)) <=  4096)) {
+            next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWGH)));
+          } else {
+            next__LHKH=new_lab__URJ(new_size__KWGH);
+          };
+          ((__POINTER *)next__LHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MHKH)[ 0]=next__LHKH;
+        } else {
+          ((__POINTER *)result__NHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NHKH=next__LHKH;
+        };
+      };
+      ((__POINTER *)result__NHKH)[ 0]=((__POINTER ) 3);
+      result__ZNEH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__QHKH=first_free__5DVB;
+      while ((((void *)result__QHKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QHKH)->map_size_and_id__QTB &  4294967292LU) < new_size__1NEH))) {
+        result__QHKH=((__MEMORY *)result__QHKH)->map_next_free__RTB;
+      };
+      if (((void *)result__QHKH == (void *)NULL)) {
+        result__QHKH=new_page__WA5();
+      };
+      to_busy__index__1TFC(result__QHKH,new_size__1NEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QHKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+      result__ZNEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QHKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__UI1C=((void **)result__ZNEH);
+    Self__NLWD= 0;
+    while ((Self__NLWD >=  0)) {
+      Result__UI1C[Self__NLWD]=NULL;
+      Self__NLWD=(__INTEGER)(Self__NLWD -  1);
+    };
+    Self__TES->parent_arrayed_collection__15.capacity__2ES= 1;
+  };
+  create__with__0QB(TYPE_NULL__, 0);
+  fast_put__to__A2R(result__VOC,(&__string_3));
+  create__with__0QB(TYPE_VOID__, 0);
+  fast_put__to__A2R(result__VOC,(&__string_45));
+  create__with__0QB(TYPE_CONTEXT__, 1);
+  result__W2B=NULL;
+  ptr__X2B=((__POINTER )(NULL));
+  typ_id__22B= 0;
+  sz__Z2B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
+  if ((sz__Z2B ==  0)) {
+    result__W2B=FAST_ARRAYoTYPE_IDo__;
   } else {
-    typ_id__U2B=__FAST_ARRAYoTYPE_IDo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__R2B);
-    if ((typ_id__U2B == (__INTEGER)(-  1))) {
-      a__AVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__BVFH=(__UINTEGER_32)((__UINTEGER_32)(sz__R2B + a__AVFH) & (__UINTEGER_32)(~ a__AVFH));
-      ptr_table__UFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BVFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__TFJH=((__POINTER )(NULL));
-      result__VFJH=((__POINTER *)ptr_table__UFJH)[ 0];
-      if ((result__VFJH == (void *)NULL)) {
-        result__VFJH=new_lab__MRJ(new_size__BVFH);
-        next__TFJH=(void *)((unsigned long)result__VFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVFH)));
-        ((__POINTER *)next__TFJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UFJH)[ 0]=next__TFJH;
-      } else {
-        next__TFJH=((__POINTER *)result__VFJH)[ 0];
-        if ((next__TFJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VFJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BVFH <<  1)) <=  4096)) {
-            next__TFJH=(void *)((unsigned long)result__VFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVFH)));
-          } else {
-            next__TFJH=new_lab__MRJ(new_size__BVFH);
-          };
-          ((__POINTER *)next__TFJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UFJH)[ 0]=next__TFJH;
-        } else {
-          ((__POINTER *)result__VFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VFJH=next__TFJH;
-        };
-      };
-      ptr__P2B=result__VFJH;
-    } else {
-      t__FVFH=((__UINTEGER_32 )typ_id__U2B);
-      a__EVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2FJH=(__UINTEGER_32)((__UINTEGER_32)(sz__R2B + a__EVFH) & (__UINTEGER_32)(~ a__EVFH));
-      ptr_table__ZFJH=((__POINTER )(&(table_type[(t__FVFH)])));
-      lab_type__1FJH=(__UINTEGER_32)(t__FVFH |  1);
-      next__YFJH=((__POINTER )(NULL));
-      result__0FJH=((__POINTER *)ptr_table__ZFJH)[ 0];
-      if ((result__0FJH == (void *)NULL)) {
-        result__0FJH=new_lab__MRJ(lab_type__1FJH);
-        next__YFJH=(void *)((unsigned long)result__0FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FJH)));
-        ((__POINTER *)next__YFJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZFJH)[ 0]=next__YFJH;
-      } else {
-        next__YFJH=((__POINTER *)result__0FJH)[ 0];
-        if ((next__YFJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0FJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2FJH <<  1)) <=  4096)) {
-            next__YFJH=(void *)((unsigned long)result__0FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2FJH)));
-          } else {
-            next__YFJH=new_lab__MRJ(lab_type__1FJH);
-          };
-          ((__POINTER *)next__YFJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZFJH)[ 0]=next__YFJH;
-        } else {
-          ((__POINTER *)result__0FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0FJH=next__YFJH;
-        };
-      };
-      ptr__P2B=result__0FJH;
-    };
-    result__O2B=((__FAST_ARRAYoTYPE_IDo *)ptr__P2B);
-    *(result__O2B) = *(FAST_ARRAYoTYPE_IDo__);
-  };
-  Self__KHS=((__FAST_ARRAYoTYPE_IDo *)result__O2B);
-  if ((Self__KHS->parent_arrayed_collection__UAB.capacity__U4R <  3)) {
-    Self__KHS->parent_arrayed_collection__UAB.storage__Q5R=create__CZNB( 3);
-    Self__KHS->parent_arrayed_collection__UAB.capacity__U4R= 3;
-  };
-  Self__KHS->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(-  1);
-  list_id__WAB=result__O2B;
-  result__JXGH=NULL;
-  ptr__KXGH=((__POINTER )(NULL));
-  typ_id__LXGH= 0;
-  sz__MXGH=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__MXGH ==  0)) {
-    result__JXGH=TYPE_ID__;
+    typ_id__22B=__FAST_ARRAYoTYPE_IDo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__Z2B);
+    if ((typ_id__22B == (__INTEGER)(-  1))) {
+      a__QWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z2B + a__QWGH) & (__UINTEGER_32)(~ a__QWGH));
+      ptr_table__UHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__THKH=((__POINTER )(NULL));
+      result__VHKH=((__POINTER *)ptr_table__UHKH)[ 0];
+      if ((result__VHKH == (void *)NULL)) {
+        result__VHKH=new_lab__URJ(new_size__RWGH);
+        next__THKH=(void *)((unsigned long)result__VHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWGH)));
+        ((__POINTER *)next__THKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UHKH)[ 0]=next__THKH;
+      } else {
+        next__THKH=((__POINTER *)result__VHKH)[ 0];
+        if ((next__THKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VHKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__RWGH <<  1)) <=  4096)) {
+            next__THKH=(void *)((unsigned long)result__VHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWGH)));
+          } else {
+            next__THKH=new_lab__URJ(new_size__RWGH);
+          };
+          ((__POINTER *)next__THKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UHKH)[ 0]=next__THKH;
+        } else {
+          ((__POINTER *)result__VHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__THKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VHKH=next__THKH;
+        };
+      };
+      ptr__X2B=result__VHKH;
+    } else {
+      t__VWGH=((__UINTEGER_32 )typ_id__22B);
+      a__UWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2HKH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z2B + a__UWGH) & (__UINTEGER_32)(~ a__UWGH));
+      ptr_table__ZHKH=((__POINTER )(&(table_type[(t__VWGH)])));
+      lab_type__1HKH=(__UINTEGER_32)(t__VWGH |  1);
+      next__YHKH=((__POINTER )(NULL));
+      result__0HKH=((__POINTER *)ptr_table__ZHKH)[ 0];
+      if ((result__0HKH == (void *)NULL)) {
+        result__0HKH=new_lab__URJ(lab_type__1HKH);
+        next__YHKH=(void *)((unsigned long)result__0HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HKH)));
+        ((__POINTER *)next__YHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZHKH)[ 0]=next__YHKH;
+      } else {
+        next__YHKH=((__POINTER *)result__0HKH)[ 0];
+        if ((next__YHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0HKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2HKH <<  1)) <=  4096)) {
+            next__YHKH=(void *)((unsigned long)result__0HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2HKH)));
+          } else {
+            next__YHKH=new_lab__URJ(lab_type__1HKH);
+          };
+          ((__POINTER *)next__YHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZHKH)[ 0]=next__YHKH;
+        } else {
+          ((__POINTER *)result__0HKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0HKH=next__YHKH;
+        };
+      };
+      ptr__X2B=result__0HKH;
+    };
+    result__W2B=((__FAST_ARRAYoTYPE_IDo *)ptr__X2B);
+    *(result__W2B) = *(FAST_ARRAYoTYPE_IDo__);
+  };
+  Self__SHS=((__FAST_ARRAYoTYPE_IDo *)result__W2B);
+  if ((Self__SHS->parent_arrayed_collection__0AB.capacity__24R <  3)) {
+    Self__SHS->parent_arrayed_collection__0AB.storage__Y5R=create__KZNB( 3);
+    Self__SHS->parent_arrayed_collection__0AB.capacity__24R= 3;
+  };
+  Self__SHS->parent_arrayed_collection__0AB.upper__04R=(__INTEGER)(-  1);
+  list_id__2AB=result__W2B;
+  result__EZHH=NULL;
+  ptr__FZHH=((__POINTER )(NULL));
+  typ_id__GZHH= 0;
+  sz__HZHH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__HZHH ==  0)) {
+    result__EZHH=TYPE_ID__;
   } else {
-    typ_id__LXGH=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MXGH);
-    if ((typ_id__LXGH == (__INTEGER)(-  1))) {
-      a__NXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MXGH + a__NXGH) & (__UINTEGER_32)(~ a__NXGH));
-      ptr_table__4FJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__3FJH=((__POINTER )(NULL));
-      result__5FJH=((__POINTER *)ptr_table__4FJH)[ 0];
-      if ((result__5FJH == (void *)NULL)) {
-        result__5FJH=new_lab__MRJ(new_size__OXGH);
-        next__3FJH=(void *)((unsigned long)result__5FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXGH)));
-        ((__POINTER *)next__3FJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__4FJH)[ 0]=next__3FJH;
-      } else {
-        next__3FJH=((__POINTER *)result__5FJH)[ 0];
-        if ((next__3FJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5FJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OXGH <<  1)) <=  4096)) {
-            next__3FJH=(void *)((unsigned long)result__5FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXGH)));
-          } else {
-            next__3FJH=new_lab__MRJ(new_size__OXGH);
-          };
-          ((__POINTER *)next__3FJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__4FJH)[ 0]=next__3FJH;
-        } else {
-          ((__POINTER *)result__5FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__5FJH=next__3FJH;
-        };
-      };
-      ptr__KXGH=result__5FJH;
-    } else {
-      t__PXGH=((__UINTEGER_32 )typ_id__LXGH);
-      a__QXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MXGH + a__QXGH) & (__UINTEGER_32)(~ a__QXGH));
-      ptr_table__DGJH=((__POINTER )(&(table_type[(t__PXGH)])));
-      lab_type__FGJH=(__UINTEGER_32)(t__PXGH |  1);
-      next__CGJH=((__POINTER )(NULL));
-      result__EGJH=((__POINTER *)ptr_table__DGJH)[ 0];
-      if ((result__EGJH == (void *)NULL)) {
-        result__EGJH=new_lab__MRJ(lab_type__FGJH);
-        next__CGJH=(void *)((unsigned long)result__EGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGJH)));
-        ((__POINTER *)next__CGJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DGJH)[ 0]=next__CGJH;
-      } else {
-        next__CGJH=((__POINTER *)result__EGJH)[ 0];
-        if ((next__CGJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EGJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GGJH <<  1)) <=  4096)) {
-            next__CGJH=(void *)((unsigned long)result__EGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGJH)));
-          } else {
-            next__CGJH=new_lab__MRJ(lab_type__FGJH);
-          };
-          ((__POINTER *)next__CGJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DGJH)[ 0]=next__CGJH;
-        } else {
-          ((__POINTER *)result__EGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EGJH=next__CGJH;
-        };
-      };
-      ptr__KXGH=result__EGJH;
-    };
-    result__JXGH=((__TYPE_ID *)ptr__KXGH);
-    *(result__JXGH) = *(TYPE_ID__);
-  };
-  create__with__SQB(((__TYPE_ID *)result__JXGH), 0);
-  add_last__O4R(result__O2B,result__JXGH);
-  result__A4B=NULL;
-  ptr__B4B=((__POINTER )(NULL));
-  typ_id__G4B= 0;
-  sz__D4B=((__UINTEGER_32 )sizeof(__TYPE_ID));
-  if ((sz__D4B ==  0)) {
-    result__A4B=TYPE_ID__;
+    typ_id__GZHH=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__HZHH);
+    if ((typ_id__GZHH == (__INTEGER)(-  1))) {
+      a__IZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__HZHH + a__IZHH) & (__UINTEGER_32)(~ a__IZHH));
+      ptr_table__4HKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JZHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3HKH=((__POINTER )(NULL));
+      result__5HKH=((__POINTER *)ptr_table__4HKH)[ 0];
+      if ((result__5HKH == (void *)NULL)) {
+        result__5HKH=new_lab__URJ(new_size__JZHH);
+        next__3HKH=(void *)((unsigned long)result__5HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZHH)));
+        ((__POINTER *)next__3HKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4HKH)[ 0]=next__3HKH;
+      } else {
+        next__3HKH=((__POINTER *)result__5HKH)[ 0];
+        if ((next__3HKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5HKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JZHH <<  1)) <=  4096)) {
+            next__3HKH=(void *)((unsigned long)result__5HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZHH)));
+          } else {
+            next__3HKH=new_lab__URJ(new_size__JZHH);
+          };
+          ((__POINTER *)next__3HKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4HKH)[ 0]=next__3HKH;
+        } else {
+          ((__POINTER *)result__5HKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5HKH=next__3HKH;
+        };
+      };
+      ptr__FZHH=result__5HKH;
+    } else {
+      t__KZHH=((__UINTEGER_32 )typ_id__GZHH);
+      a__LZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HZHH + a__LZHH) & (__UINTEGER_32)(~ a__LZHH));
+      ptr_table__DIKH=((__POINTER )(&(table_type[(t__KZHH)])));
+      lab_type__FIKH=(__UINTEGER_32)(t__KZHH |  1);
+      next__CIKH=((__POINTER )(NULL));
+      result__EIKH=((__POINTER *)ptr_table__DIKH)[ 0];
+      if ((result__EIKH == (void *)NULL)) {
+        result__EIKH=new_lab__URJ(lab_type__FIKH);
+        next__CIKH=(void *)((unsigned long)result__EIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GIKH)));
+        ((__POINTER *)next__CIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DIKH)[ 0]=next__CIKH;
+      } else {
+        next__CIKH=((__POINTER *)result__EIKH)[ 0];
+        if ((next__CIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EIKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GIKH <<  1)) <=  4096)) {
+            next__CIKH=(void *)((unsigned long)result__EIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GIKH)));
+          } else {
+            next__CIKH=new_lab__URJ(lab_type__FIKH);
+          };
+          ((__POINTER *)next__CIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DIKH)[ 0]=next__CIKH;
+        } else {
+          ((__POINTER *)result__EIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EIKH=next__CIKH;
+        };
+      };
+      ptr__FZHH=result__EIKH;
+    };
+    result__EZHH=((__TYPE_ID *)ptr__FZHH);
+    *(result__EZHH) = *(TYPE_ID__);
+  };
+  create__with__0QB(((__TYPE_ID *)result__EZHH), 0);
+  add_last__W4R(result__W2B,result__EZHH);
+  result__I4B=NULL;
+  ptr__J4B=((__POINTER )(NULL));
+  typ_id__O4B= 0;
+  sz__L4B=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__L4B ==  0)) {
+    result__I4B=TYPE_ID__;
   } else {
-    typ_id__G4B=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__D4B);
-    if ((typ_id__G4B == (__INTEGER)(-  1))) {
-      a__W5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__X5DH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4B + a__W5DH) & (__UINTEGER_32)(~ a__W5DH));
-      ptr_table__IGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X5DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__HGJH=((__POINTER )(NULL));
-      result__JGJH=((__POINTER *)ptr_table__IGJH)[ 0];
-      if ((result__JGJH == (void *)NULL)) {
-        result__JGJH=new_lab__MRJ(new_size__X5DH);
-        next__HGJH=(void *)((unsigned long)result__JGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5DH)));
-        ((__POINTER *)next__HGJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__IGJH)[ 0]=next__HGJH;
-      } else {
-        next__HGJH=((__POINTER *)result__JGJH)[ 0];
-        if ((next__HGJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JGJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__X5DH <<  1)) <=  4096)) {
-            next__HGJH=(void *)((unsigned long)result__JGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5DH)));
-          } else {
-            next__HGJH=new_lab__MRJ(new_size__X5DH);
-          };
-          ((__POINTER *)next__HGJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IGJH)[ 0]=next__HGJH;
-        } else {
-          ((__POINTER *)result__JGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JGJH=next__HGJH;
-        };
-      };
-      ptr__B4B=result__JGJH;
-    } else {
-      t__15DH=((__UINTEGER_32 )typ_id__G4B);
-      a__05DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__D4B + a__05DH) & (__UINTEGER_32)(~ a__05DH));
-      ptr_table__NGJH=((__POINTER )(&(table_type[(t__15DH)])));
-      lab_type__PGJH=(__UINTEGER_32)(t__15DH |  1);
-      next__MGJH=((__POINTER )(NULL));
-      result__OGJH=((__POINTER *)ptr_table__NGJH)[ 0];
-      if ((result__OGJH == (void *)NULL)) {
-        result__OGJH=new_lab__MRJ(lab_type__PGJH);
-        next__MGJH=(void *)((unsigned long)result__OGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGJH)));
-        ((__POINTER *)next__MGJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__NGJH)[ 0]=next__MGJH;
-      } else {
-        next__MGJH=((__POINTER *)result__OGJH)[ 0];
-        if ((next__MGJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OGJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QGJH <<  1)) <=  4096)) {
-            next__MGJH=(void *)((unsigned long)result__OGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGJH)));
-          } else {
-            next__MGJH=new_lab__MRJ(lab_type__PGJH);
-          };
-          ((__POINTER *)next__MGJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NGJH)[ 0]=next__MGJH;
-        } else {
-          ((__POINTER *)result__OGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__OGJH=next__MGJH;
-        };
-      };
-      ptr__B4B=result__OGJH;
-    };
-    result__A4B=((__TYPE_ID *)ptr__B4B);
-    *(result__A4B) = *(TYPE_ID__);
-  };
-  create__with__SQB(((__TYPE_ID *)result__A4B), 0);
-  add_last__O4R(list_id__WAB,result__A4B);
+    typ_id__O4B=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__L4B);
+    if ((typ_id__O4B == (__INTEGER)(-  1))) {
+      a__UAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VAFH=(__UINTEGER_32)((__UINTEGER_32)(sz__L4B + a__UAFH) & (__UINTEGER_32)(~ a__UAFH));
+      ptr_table__IIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VAFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__HIKH=((__POINTER )(NULL));
+      result__JIKH=((__POINTER *)ptr_table__IIKH)[ 0];
+      if ((result__JIKH == (void *)NULL)) {
+        result__JIKH=new_lab__URJ(new_size__VAFH);
+        next__HIKH=(void *)((unsigned long)result__JIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VAFH)));
+        ((__POINTER *)next__HIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IIKH)[ 0]=next__HIKH;
+      } else {
+        next__HIKH=((__POINTER *)result__JIKH)[ 0];
+        if ((next__HIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JIKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VAFH <<  1)) <=  4096)) {
+            next__HIKH=(void *)((unsigned long)result__JIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VAFH)));
+          } else {
+            next__HIKH=new_lab__URJ(new_size__VAFH);
+          };
+          ((__POINTER *)next__HIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IIKH)[ 0]=next__HIKH;
+        } else {
+          ((__POINTER *)result__JIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JIKH=next__HIKH;
+        };
+      };
+      ptr__J4B=result__JIKH;
+    } else {
+      t__ZAFH=((__UINTEGER_32 )typ_id__O4B);
+      a__YAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__L4B + a__YAFH) & (__UINTEGER_32)(~ a__YAFH));
+      ptr_table__NIKH=((__POINTER )(&(table_type[(t__ZAFH)])));
+      lab_type__PIKH=(__UINTEGER_32)(t__ZAFH |  1);
+      next__MIKH=((__POINTER )(NULL));
+      result__OIKH=((__POINTER *)ptr_table__NIKH)[ 0];
+      if ((result__OIKH == (void *)NULL)) {
+        result__OIKH=new_lab__URJ(lab_type__PIKH);
+        next__MIKH=(void *)((unsigned long)result__OIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIKH)));
+        ((__POINTER *)next__MIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NIKH)[ 0]=next__MIKH;
+      } else {
+        next__MIKH=((__POINTER *)result__OIKH)[ 0];
+        if ((next__MIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OIKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QIKH <<  1)) <=  4096)) {
+            next__MIKH=(void *)((unsigned long)result__OIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QIKH)));
+          } else {
+            next__MIKH=new_lab__URJ(lab_type__PIKH);
+          };
+          ((__POINTER *)next__MIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NIKH)[ 0]=next__MIKH;
+        } else {
+          ((__POINTER *)result__OIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OIKH=next__MIKH;
+        };
+      };
+      ptr__J4B=result__OIKH;
+    };
+    result__I4B=((__TYPE_ID *)ptr__J4B);
+    *(result__I4B) = *(TYPE_ID__);
+  };
+  create__with__0QB(((__TYPE_ID *)result__I4B), 0);
+  add_last__W4R(list_id__2AB,result__I4B);
   if (is_short_recursive__JB) {
-    directory_list__YB=create__NBB( 100);
-    file_list__0B=create__NBB( 100);
-    current_list__2B=create__NBB( 100);
+    directory_list__YB=create__TBB( 100);
+    file_list__0B=create__TBB( 100);
+    current_list__2B=create__TBB( 100);
     __tmp__4B=input_name__3B;
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    ent__TB=get_entry__T0AC(__tmp__4B);
+    ent__TB=get_entry__10AC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__IISD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__KISD=Self__IISD;
-        __tmp__FC=((void *)Self__IISD != (void *)NULL);
+        Self__QISD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__SISD=Self__QISD;
+        __tmp__FC=((void *)Self__QISD != (void *)NULL);
       } else {
-        dir__SISD=NULL;
+        dir__0ISD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__WHD((&__string_165));
-      print__WHD(input_name__3B);
-      print__WHD((&__string_166));
+      print__4HD((&__string_167));
+      print__4HD(input_name__3B);
+      print__4HD((&__string_168));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__ZERD(ent__TB);
+      __tmp__UC=open__BFRD(ent__TB);
     } else {
-      Self__4IRD=((__FILE_UNIX *)ent__TB);
-      Self__4IRD->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__4IRD->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
-      __tmp__UC=(Self__4IRD->stream__EJRD != (void *)NULL);
+      Self__GJRD=((__FILE_UNIX *)ent__TB);
+      Self__GJRD->stream__MJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__GJRD->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->storage__3QO),"r+b")));
+      __tmp__UC=(Self__GJRD->stream__MJRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
-      print__WHD((&__string_165));
-      print__WHD(input_name__3B);
-      print__WHD((&__string_167));
+      print__4HD((&__string_167));
+      print__4HD(input_name__3B);
+      print__4HD((&__string_169));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7259,19594 +7269,19808 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    check_in__begin__4QQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD +  1));
-    Self__RXGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__VXGH= 0;
-    __tmp__XXGH=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-    Self__YXGH= 1;
-    while ((Self__YXGH <= __tmp__XXGH)) {
-      result__VXGH=(__INTEGER)((__INTEGER)( 5 * result__VXGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__VQO)[(__INTEGER)(Self__YXGH -  1)])));
-      Self__YXGH=(__INTEGER)(Self__YXGH +  1);
-    };
-    if ((result__VXGH <  0)) {
-      result__VXGH=(__INTEGER)(~ result__VXGH);
-    };
-    node__TXGH=((void **)Self__RXGH->buckets__5CT)[(__INTEGER)(result__VXGH % Self__RXGH->capacity__0CT)];
-    while ((! (((void *)node__TXGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TXGH)->key__LDT == (void *)(&__string_146))))) {
-      node__TXGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TXGH)->next__WDT;
-    };
-    if (((void *)node__TXGH != (void *)NULL)) {
-      Self__GVFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-      result__0XGH= 0;
-      __tmp__2XGH=((__STRING_CONSTANT *)(&__string_146))->count__DD;
-      Self__3XGH= 1;
-      while ((Self__3XGH <= __tmp__2XGH)) {
-        result__0XGH=(__INTEGER)((__INTEGER)( 5 * result__0XGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_146))->storage__VQO)[(__INTEGER)(Self__3XGH -  1)])));
-        Self__3XGH=(__INTEGER)(Self__3XGH +  1);
-      };
-      if ((result__0XGH <  0)) {
-        result__0XGH=(__INTEGER)(~ result__0XGH);
-      };
-      node__IVFH=((void **)Self__GVFH->buckets__5CT)[(__INTEGER)(result__0XGH % Self__GVFH->capacity__0CT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IVFH)->key__LDT != (void *)(&__string_146))) {
-        node__IVFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IVFH)->next__WDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IVFH)->item__HY3)->first_link__EUEC)->item__0VHD;
-      Self__BA0G=((__STRING_CONSTANT *)txt__1);
-      new__CA0G=create__NBB(Self__BA0G->count__DD);
-      copy__ZCS(new__CA0G,Self__BA0G);
-      save_file__with__PDC(add_ext__EBF((&__string_146)),new__CA0G);
-    };
-    Self__5XGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__DYGH= 0;
-    __tmp__FYGH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-    Self__GYGH= 1;
-    while ((Self__GYGH <= __tmp__FYGH)) {
-      result__DYGH=(__INTEGER)((__INTEGER)( 5 * result__DYGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__VQO)[(__INTEGER)(Self__GYGH -  1)])));
-      Self__GYGH=(__INTEGER)(Self__GYGH +  1);
-    };
-    if ((result__DYGH <  0)) {
-      result__DYGH=(__INTEGER)(~ result__DYGH);
-    };
-    node__BYGH=((void **)Self__5XGH->buckets__5CT)[(__INTEGER)(result__DYGH % Self__5XGH->capacity__0CT)];
-    while ((! (((void *)node__BYGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BYGH)->key__LDT == (void *)(&__string_66))))) {
-      node__BYGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BYGH)->next__WDT;
-    };
-    if (((void *)node__BYGH != (void *)NULL)) {
-      Self__KVFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-      result__IYGH= 0;
-      __tmp__KYGH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
-      Self__LYGH= 1;
-      while ((Self__LYGH <= __tmp__KYGH)) {
-        result__IYGH=(__INTEGER)((__INTEGER)( 5 * result__IYGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__VQO)[(__INTEGER)(Self__LYGH -  1)])));
-        Self__LYGH=(__INTEGER)(Self__LYGH +  1);
-      };
-      if ((result__IYGH <  0)) {
-        result__IYGH=(__INTEGER)(~ result__IYGH);
-      };
-      node__MVFH=((void **)Self__KVFH->buckets__5CT)[(__INTEGER)(result__IYGH % Self__KVFH->capacity__0CT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MVFH)->key__LDT != (void *)(&__string_66))) {
-        node__MVFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MVFH)->next__WDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MVFH)->item__HY3)->first_link__EUEC)->item__0VHD;
-      Self__DA0G=((__STRING_CONSTANT *)txt__1);
-      new__EA0G=create__NBB(Self__DA0G->count__DD);
-      copy__ZCS(new__EA0G,Self__DA0G);
-      save_file__with__PDC(add_ext__EBF((&__string_66)),new__EA0G);
-    };
-    Self__NYGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__RYGH= 0;
-    __tmp__TYGH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-    Self__UYGH= 1;
-    while ((Self__UYGH <= __tmp__TYGH)) {
-      result__RYGH=(__INTEGER)((__INTEGER)( 5 * result__RYGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__VQO)[(__INTEGER)(Self__UYGH -  1)])));
-      Self__UYGH=(__INTEGER)(Self__UYGH +  1);
-    };
-    if ((result__RYGH <  0)) {
-      result__RYGH=(__INTEGER)(~ result__RYGH);
-    };
-    node__PYGH=((void **)Self__NYGH->buckets__5CT)[(__INTEGER)(result__RYGH % Self__NYGH->capacity__0CT)];
-    while ((! (((void *)node__PYGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PYGH)->key__LDT == (void *)(&__string_147))))) {
-      node__PYGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PYGH)->next__WDT;
-    };
-    if (((void *)node__PYGH != (void *)NULL)) {
-      Self__OVFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-      result__WYGH= 0;
-      __tmp__YYGH=((__STRING_CONSTANT *)(&__string_147))->count__DD;
-      Self__ZYGH= 1;
-      while ((Self__ZYGH <= __tmp__YYGH)) {
-        result__WYGH=(__INTEGER)((__INTEGER)( 5 * result__WYGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_147))->storage__VQO)[(__INTEGER)(Self__ZYGH -  1)])));
-        Self__ZYGH=(__INTEGER)(Self__ZYGH +  1);
-      };
-      if ((result__WYGH <  0)) {
-        result__WYGH=(__INTEGER)(~ result__WYGH);
-      };
-      node__QVFH=((void **)Self__OVFH->buckets__5CT)[(__INTEGER)(result__WYGH % Self__OVFH->capacity__0CT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QVFH)->key__LDT != (void *)(&__string_147))) {
-        node__QVFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QVFH)->next__WDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QVFH)->item__HY3)->first_link__EUEC)->item__0VHD;
-      Self__VNDH=((__STRING *)directory_list__YB);
-      i__WNDH=Self__VNDH->count__WFC;
-      j__YNDH=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__YXZ(Self__VNDH,(__INTEGER)(i__WNDH + j__YNDH));
-      if (((i__WNDH >  0) && (j__YNDH >  0))) {
-        move__to__by__BWCC(Self__VNDH->storage__BCS, 0,(__INTEGER)(i__WNDH -  1),j__YNDH);
-      };
-      Self__UVFH=((__CHARACTER *)Self__VNDH->storage__BCS);
-      model__VVFH=((__STRING_CONSTANT *)txt__1)->storage__VQO;
-      Self__TVFH=(__INTEGER)(j__YNDH -  1);
-      while ((Self__TVFH >=  0)) {
-        Self__UVFH[Self__TVFH]=((__CHARACTER *)model__VVFH)[Self__TVFH];
-        Self__TVFH=(__INTEGER)(Self__TVFH -  1);
-      };
-    };
-    Self__3VVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__1YGH= 0;
-    __tmp__3YGH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
-    Self__4YGH= 1;
-    while ((Self__4YGH <= __tmp__3YGH)) {
-      result__1YGH=(__INTEGER)((__INTEGER)( 5 * result__1YGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__VQO)[(__INTEGER)(Self__4YGH -  1)])));
-      Self__4YGH=(__INTEGER)(Self__4YGH +  1);
-    };
-    if ((result__1YGH <  0)) {
-      result__1YGH=(__INTEGER)(~ result__1YGH);
-    };
-    node__HWVB=((void **)Self__3VVB->buckets__5CT)[(__INTEGER)(result__1YGH % Self__3VVB->capacity__0CT)];
-    while ((! (((void *)node__HWVB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWVB)->key__LDT,(&__string_149))))) {
-      node__HWVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWVB)->next__WDT;
-    };
-    if (((void *)node__HWVB != (void *)NULL)) {
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__QL4(result__LNH,(&__string_149)))->first_link__EUEC)->item__0VHD;
-      append__BOS(directory_list__YB,txt__1);
-    };
-    save_file__with__PDC(add_ext__EBF((&__string_168)),directory_list__YB);
-    Self__AZGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__EZGH= 0;
-    __tmp__GZGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
-    Self__HZGH= 1;
-    while ((Self__HZGH <= __tmp__GZGH)) {
-      result__EZGH=(__INTEGER)((__INTEGER)( 5 * result__EZGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__HZGH -  1)])));
-      Self__HZGH=(__INTEGER)(Self__HZGH +  1);
-    };
-    if ((result__EZGH <  0)) {
-      result__EZGH=(__INTEGER)(~ result__EZGH);
-    };
-    node__CZGH=((void **)Self__AZGH->buckets__5CT)[(__INTEGER)(result__EZGH % Self__AZGH->capacity__0CT)];
-    while ((! (((void *)node__CZGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CZGH)->key__LDT == (void *)(&__string_150))))) {
-      node__CZGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CZGH)->next__WDT;
-    };
-    if (((void *)node__CZGH != (void *)NULL)) {
-      Self__0VFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-      result__JZGH= 0;
-      __tmp__LZGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
-      Self__MZGH= 1;
-      while ((Self__MZGH <= __tmp__LZGH)) {
-        result__JZGH=(__INTEGER)((__INTEGER)( 5 * result__JZGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__MZGH -  1)])));
-        Self__MZGH=(__INTEGER)(Self__MZGH +  1);
-      };
-      if ((result__JZGH <  0)) {
-        result__JZGH=(__INTEGER)(~ result__JZGH);
-      };
-      node__2VFH=((void **)Self__0VFH->buckets__5CT)[(__INTEGER)(result__JZGH % Self__0VFH->capacity__0CT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2VFH)->key__LDT != (void *)(&__string_150))) {
-        node__2VFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2VFH)->next__WDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2VFH)->item__HY3)->first_link__EUEC)->item__0VHD;
-      Self__BODH=((__STRING *)file_list__0B);
-      i__CODH=Self__BODH->count__WFC;
-      j__EODH=((__STRING_CONSTANT *)txt__1)->count__DD;
-      resize__YXZ(Self__BODH,(__INTEGER)(i__CODH + j__EODH));
-      if (((i__CODH >  0) && (j__EODH >  0))) {
-        move__to__by__BWCC(Self__BODH->storage__BCS, 0,(__INTEGER)(i__CODH -  1),j__EODH);
-      };
-      Self__AWFH=((__CHARACTER *)Self__BODH->storage__BCS);
-      model__BWFH=((__STRING_CONSTANT *)txt__1)->storage__VQO;
-      Self__5VFH=(__INTEGER)(j__EODH -  1);
-      while ((Self__5VFH >=  0)) {
-        Self__AWFH[Self__5VFH]=((__CHARACTER *)model__BWFH)[Self__5VFH];
-        Self__5VFH=(__INTEGER)(Self__5VFH -  1);
-      };
-    };
-    Self__NCT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-    result__OZGH= 0;
-    __tmp__QZGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
-    Self__RZGH= 1;
-    while ((Self__RZGH <= __tmp__QZGH)) {
-      result__OZGH=(__INTEGER)((__INTEGER)( 5 * result__OZGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__RZGH -  1)])));
-      Self__RZGH=(__INTEGER)(Self__RZGH +  1);
-    };
-    if ((result__OZGH <  0)) {
-      result__OZGH=(__INTEGER)(~ result__OZGH);
-    };
-    node__YCT=((void **)Self__NCT->buckets__5CT)[(__INTEGER)(result__OZGH % Self__NCT->capacity__0CT)];
-    while ((! (((void *)node__YCT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCT)->key__LDT == (void *)(&__string_152))))) {
-      node__YCT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCT)->next__WDT;
-    };
-    if (((void *)node__YCT != (void *)NULL)) {
-      Self__GWFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__LNH);
-      result__TZGH= 0;
-      __tmp__VZGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
-      Self__WZGH= 1;
-      while ((Self__WZGH <= __tmp__VZGH)) {
-        result__TZGH=(__INTEGER)((__INTEGER)( 5 * result__TZGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__WZGH -  1)])));
-        Self__WZGH=(__INTEGER)(Self__WZGH +  1);
-      };
-      if ((result__TZGH <  0)) {
-        result__TZGH=(__INTEGER)(~ result__TZGH);
-      };
-      node__IWFH=((void **)Self__GWFH->buckets__5CT)[(__INTEGER)(result__TZGH % Self__GWFH->capacity__0CT)];
-      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IWFH)->key__LDT != (void *)(&__string_152))) {
-        node__IWFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IWFH)->next__WDT;
-      };
-      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IWFH)->item__HY3)->first_link__EUEC)->item__0VHD;
-      append__BOS(file_list__0B,txt__1);
-    };
-    save_file__with__PDC(add_ext__EBF((&__string_169)),file_list__0B);
+    check_in__begin__GRQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__BFD.parent_entry__AFD.path__BD)->count__DD +  1));
+    Self__MZHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__QZHH= 0;
+    __tmp__SZHH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
+    Self__TZHH= 1;
+    while ((Self__TZHH <= __tmp__SZHH)) {
+      result__QZHH=(__INTEGER)((__INTEGER)( 5 * result__QZHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__3QO)[(__INTEGER)(Self__TZHH -  1)])));
+      Self__TZHH=(__INTEGER)(Self__TZHH +  1);
+    };
+    if ((result__QZHH <  0)) {
+      result__QZHH=(__INTEGER)(~ result__QZHH);
+    };
+    node__OZHH=((void **)Self__MZHH->buckets__HDT)[(__INTEGER)(result__QZHH % Self__MZHH->capacity__CDT)];
+    while ((! (((void *)node__OZHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OZHH)->key__TDT == (void *)(&__string_148))))) {
+      node__OZHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__OZHH)->next__4DT;
+    };
+    if (((void *)node__OZHH != (void *)NULL)) {
+      Self__WWGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+      result__VZHH= 0;
+      __tmp__XZHH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
+      Self__YZHH= 1;
+      while ((Self__YZHH <= __tmp__XZHH)) {
+        result__VZHH=(__INTEGER)((__INTEGER)( 5 * result__VZHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__3QO)[(__INTEGER)(Self__YZHH -  1)])));
+        Self__YZHH=(__INTEGER)(Self__YZHH +  1);
+      };
+      if ((result__VZHH <  0)) {
+        result__VZHH=(__INTEGER)(~ result__VZHH);
+      };
+      node__YWGH=((void **)Self__WWGH->buckets__HDT)[(__INTEGER)(result__VZHH % Self__WWGH->capacity__CDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YWGH)->key__TDT != (void *)(&__string_148))) {
+        node__YWGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YWGH)->next__4DT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YWGH)->item__PY3)->first_link__MUEC)->item__CWHD;
+      Self__Q30G=((__STRING_CONSTANT *)txt__1);
+      new__R30G=create__TBB(Self__Q30G->count__DD);
+      copy__BDS(new__R30G,Self__Q30G);
+      save_file__with__XDC(add_ext__MBF((&__string_148)),new__R30G);
+    };
+    Self__0ZHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__4ZHH= 0;
+    __tmp__A0HH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+    Self__B0HH= 1;
+    while ((Self__B0HH <= __tmp__A0HH)) {
+      result__4ZHH=(__INTEGER)((__INTEGER)( 5 * result__4ZHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__3QO)[(__INTEGER)(Self__B0HH -  1)])));
+      Self__B0HH=(__INTEGER)(Self__B0HH +  1);
+    };
+    if ((result__4ZHH <  0)) {
+      result__4ZHH=(__INTEGER)(~ result__4ZHH);
+    };
+    node__2ZHH=((void **)Self__0ZHH->buckets__HDT)[(__INTEGER)(result__4ZHH % Self__0ZHH->capacity__CDT)];
+    while ((! (((void *)node__2ZHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2ZHH)->key__TDT == (void *)(&__string_66))))) {
+      node__2ZHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2ZHH)->next__4DT;
+    };
+    if (((void *)node__2ZHH != (void *)NULL)) {
+      Self__0WGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+      result__D0HH= 0;
+      __tmp__F0HH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+      Self__G0HH= 1;
+      while ((Self__G0HH <= __tmp__F0HH)) {
+        result__D0HH=(__INTEGER)((__INTEGER)( 5 * result__D0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__3QO)[(__INTEGER)(Self__G0HH -  1)])));
+        Self__G0HH=(__INTEGER)(Self__G0HH +  1);
+      };
+      if ((result__D0HH <  0)) {
+        result__D0HH=(__INTEGER)(~ result__D0HH);
+      };
+      node__2WGH=((void **)Self__0WGH->buckets__HDT)[(__INTEGER)(result__D0HH % Self__0WGH->capacity__CDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2WGH)->key__TDT != (void *)(&__string_66))) {
+        node__2WGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2WGH)->next__4DT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2WGH)->item__PY3)->first_link__MUEC)->item__CWHD;
+      Self__S30G=((__STRING_CONSTANT *)txt__1);
+      new__T30G=create__TBB(Self__S30G->count__DD);
+      copy__BDS(new__T30G,Self__S30G);
+      save_file__with__XDC(add_ext__MBF((&__string_66)),new__T30G);
+    };
+    Self__I0HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__M0HH= 0;
+    __tmp__O0HH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
+    Self__P0HH= 1;
+    while ((Self__P0HH <= __tmp__O0HH)) {
+      result__M0HH=(__INTEGER)((__INTEGER)( 5 * result__M0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__3QO)[(__INTEGER)(Self__P0HH -  1)])));
+      Self__P0HH=(__INTEGER)(Self__P0HH +  1);
+    };
+    if ((result__M0HH <  0)) {
+      result__M0HH=(__INTEGER)(~ result__M0HH);
+    };
+    node__K0HH=((void **)Self__I0HH->buckets__HDT)[(__INTEGER)(result__M0HH % Self__I0HH->capacity__CDT)];
+    while ((! (((void *)node__K0HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__K0HH)->key__TDT == (void *)(&__string_149))))) {
+      node__K0HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__K0HH)->next__4DT;
+    };
+    if (((void *)node__K0HH != (void *)NULL)) {
+      Self__4WGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+      result__R0HH= 0;
+      __tmp__T0HH=((__STRING_CONSTANT *)(&__string_149))->count__DD;
+      Self__U0HH= 1;
+      while ((Self__U0HH <= __tmp__T0HH)) {
+        result__R0HH=(__INTEGER)((__INTEGER)( 5 * result__R0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_149))->storage__3QO)[(__INTEGER)(Self__U0HH -  1)])));
+        Self__U0HH=(__INTEGER)(Self__U0HH +  1);
+      };
+      if ((result__R0HH <  0)) {
+        result__R0HH=(__INTEGER)(~ result__R0HH);
+      };
+      node__AXGH=((void **)Self__4WGH->buckets__HDT)[(__INTEGER)(result__R0HH % Self__4WGH->capacity__CDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AXGH)->key__TDT != (void *)(&__string_149))) {
+        node__AXGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AXGH)->next__4DT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AXGH)->item__PY3)->first_link__MUEC)->item__CWHD;
+      Self__NOEH=((__STRING *)directory_list__YB);
+      i__OOEH=Self__NOEH->count__4FC;
+      j__QOEH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__AYZ(Self__NOEH,(__INTEGER)(i__OOEH + j__QOEH));
+      if (((i__OOEH >  0) && (j__QOEH >  0))) {
+        move__to__by__JWCC(Self__NOEH->storage__JCS, 0,(__INTEGER)(i__OOEH -  1),j__QOEH);
+      };
+      Self__EXGH=((__CHARACTER *)Self__NOEH->storage__JCS);
+      model__FXGH=((__STRING_CONSTANT *)txt__1)->storage__3QO;
+      Self__DXGH=(__INTEGER)(j__QOEH -  1);
+      while ((Self__DXGH >=  0)) {
+        Self__EXGH[Self__DXGH]=((__CHARACTER *)model__FXGH)[Self__DXGH];
+        Self__DXGH=(__INTEGER)(Self__DXGH -  1);
+      };
+    };
+    Self__FWVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__W0HH= 0;
+    __tmp__Y0HH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+    Self__Z0HH= 1;
+    while ((Self__Z0HH <= __tmp__Y0HH)) {
+      result__W0HH=(__INTEGER)((__INTEGER)( 5 * result__W0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__3QO)[(__INTEGER)(Self__Z0HH -  1)])));
+      Self__Z0HH=(__INTEGER)(Self__Z0HH +  1);
+    };
+    if ((result__W0HH <  0)) {
+      result__W0HH=(__INTEGER)(~ result__W0HH);
+    };
+    node__PWVB=((void **)Self__FWVB->buckets__HDT)[(__INTEGER)(result__W0HH % Self__FWVB->capacity__CDT)];
+    while ((! (((void *)node__PWVB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PWVB)->key__TDT,(&__string_151))))) {
+      node__PWVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PWVB)->next__4DT;
+    };
+    if (((void *)node__PWVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__YL4(result__TNH,(&__string_151)))->first_link__MUEC)->item__CWHD;
+      append__JOS(directory_list__YB,txt__1);
+    };
+    save_file__with__XDC(add_ext__MBF((&__string_170)),directory_list__YB);
+    Self__10HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__50HH= 0;
+    __tmp__B1HH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+    Self__C1HH= 1;
+    while ((Self__C1HH <= __tmp__B1HH)) {
+      result__50HH=(__INTEGER)((__INTEGER)( 5 * result__50HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__3QO)[(__INTEGER)(Self__C1HH -  1)])));
+      Self__C1HH=(__INTEGER)(Self__C1HH +  1);
+    };
+    if ((result__50HH <  0)) {
+      result__50HH=(__INTEGER)(~ result__50HH);
+    };
+    node__30HH=((void **)Self__10HH->buckets__HDT)[(__INTEGER)(result__50HH % Self__10HH->capacity__CDT)];
+    while ((! (((void *)node__30HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__30HH)->key__TDT == (void *)(&__string_152))))) {
+      node__30HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__30HH)->next__4DT;
+    };
+    if (((void *)node__30HH != (void *)NULL)) {
+      Self__KXGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+      result__E1HH= 0;
+      __tmp__G1HH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+      Self__H1HH= 1;
+      while ((Self__H1HH <= __tmp__G1HH)) {
+        result__E1HH=(__INTEGER)((__INTEGER)( 5 * result__E1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__3QO)[(__INTEGER)(Self__H1HH -  1)])));
+        Self__H1HH=(__INTEGER)(Self__H1HH +  1);
+      };
+      if ((result__E1HH <  0)) {
+        result__E1HH=(__INTEGER)(~ result__E1HH);
+      };
+      node__MXGH=((void **)Self__KXGH->buckets__HDT)[(__INTEGER)(result__E1HH % Self__KXGH->capacity__CDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MXGH)->key__TDT != (void *)(&__string_152))) {
+        node__MXGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MXGH)->next__4DT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__MXGH)->item__PY3)->first_link__MUEC)->item__CWHD;
+      Self__ZOEH=((__STRING *)file_list__0B);
+      i__0OEH=Self__ZOEH->count__4FC;
+      j__2OEH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__AYZ(Self__ZOEH,(__INTEGER)(i__0OEH + j__2OEH));
+      if (((i__0OEH >  0) && (j__2OEH >  0))) {
+        move__to__by__JWCC(Self__ZOEH->storage__JCS, 0,(__INTEGER)(i__0OEH -  1),j__2OEH);
+      };
+      Self__QXGH=((__CHARACTER *)Self__ZOEH->storage__JCS);
+      model__RXGH=((__STRING_CONSTANT *)txt__1)->storage__3QO;
+      Self__PXGH=(__INTEGER)(j__2OEH -  1);
+      while ((Self__PXGH >=  0)) {
+        Self__QXGH[Self__PXGH]=((__CHARACTER *)model__RXGH)[Self__PXGH];
+        Self__PXGH=(__INTEGER)(Self__PXGH -  1);
+      };
+    };
+    Self__VCT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+    result__J1HH= 0;
+    __tmp__L1HH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+    Self__M1HH= 1;
+    while ((Self__M1HH <= __tmp__L1HH)) {
+      result__J1HH=(__INTEGER)((__INTEGER)( 5 * result__J1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__3QO)[(__INTEGER)(Self__M1HH -  1)])));
+      Self__M1HH=(__INTEGER)(Self__M1HH +  1);
+    };
+    if ((result__J1HH <  0)) {
+      result__J1HH=(__INTEGER)(~ result__J1HH);
+    };
+    node__ADT=((void **)Self__VCT->buckets__HDT)[(__INTEGER)(result__J1HH % Self__VCT->capacity__CDT)];
+    while ((! (((void *)node__ADT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ADT)->key__TDT == (void *)(&__string_154))))) {
+      node__ADT=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ADT)->next__4DT;
+    };
+    if (((void *)node__ADT != (void *)NULL)) {
+      Self__WXGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__TNH);
+      result__O1HH= 0;
+      __tmp__Q1HH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__R1HH= 1;
+      while ((Self__R1HH <= __tmp__Q1HH)) {
+        result__O1HH=(__INTEGER)((__INTEGER)( 5 * result__O1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__3QO)[(__INTEGER)(Self__R1HH -  1)])));
+        Self__R1HH=(__INTEGER)(Self__R1HH +  1);
+      };
+      if ((result__O1HH <  0)) {
+        result__O1HH=(__INTEGER)(~ result__O1HH);
+      };
+      node__YXGH=((void **)Self__WXGH->buckets__HDT)[(__INTEGER)(result__O1HH % Self__WXGH->capacity__CDT)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YXGH)->key__TDT != (void *)(&__string_154))) {
+        node__YXGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YXGH)->next__4DT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YXGH)->item__PY3)->first_link__MUEC)->item__CWHD;
+      append__JOS(file_list__0B,txt__1);
+    };
+    save_file__with__XDC(add_ext__MBF((&__string_171)),file_list__0B);
   } else {
-    Self__UGJH=((__STRING_CONSTANT *)input_name__3B);
-    result__RGJH=FALSE__;
-    i1__SGJH= 0;
-    i2__TGJH= 0;
-    if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__UGJH->count__DD)) {
-      i1__SGJH=(__INTEGER)((__INTEGER)(Self__UGJH->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
-      i2__TGJH= 1;
-      while ((! (((i1__SGJH > Self__UGJH->count__DD) || (i2__TGJH > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__UGJH->storage__VQO)[(__INTEGER)(i1__SGJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__TGJH -  1)])))) {
-        i1__SGJH=(__INTEGER)(i1__SGJH +  1);
-        i2__TGJH=(__INTEGER)(i2__TGJH +  1);
-      };
-      result__RGJH=(i1__SGJH > Self__UGJH->count__DD);
-    };
-    if ((! result__RGJH)) {
-      copy__ZCS(string_tmp__VH,input_name__3B);
-      append__BOS(string_tmp__VH,(&__string_155));
-      input_name__3B=get__IWB(string_tmp__VH);
+    Self__UIKH=((__STRING_CONSTANT *)input_name__3B);
+    result__RIKH=FALSE__;
+    i1__SIKH= 0;
+    i2__TIKH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_157))->count__DD <= Self__UIKH->count__DD)) {
+      i1__SIKH=(__INTEGER)((__INTEGER)(Self__UIKH->count__DD - ((__STRING_CONSTANT *)(&__string_157))->count__DD) +  1);
+      i2__TIKH= 1;
+      while ((! (((i1__SIKH > Self__UIKH->count__DD) || (i2__TIKH > ((__STRING_CONSTANT *)(&__string_157))->count__DD)) || (((__CHARACTER *)Self__UIKH->storage__3QO)[(__INTEGER)(i1__SIKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_157))->storage__3QO)[(__INTEGER)(i2__TIKH -  1)])))) {
+        i1__SIKH=(__INTEGER)(i1__SIKH +  1);
+        i2__TIKH=(__INTEGER)(i2__TIKH +  1);
+      };
+      result__RIKH=(i1__SIKH > Self__UIKH->count__DD);
+    };
+    if ((! result__RIKH)) {
+      copy__BDS(string_tmp__VH,input_name__3B);
+      append__JOS(string_tmp__VH,(&__string_157));
+      input_name__3B=get__QWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    copy__ZCS(string_tmp__VH,input_name__3B);
-    Self__YZGH=((__STRING *)string_tmp__VH);
-    __tmp__ZZGH=Self__YZGH->storage__BCS;
-    __tmp__0ZGH=(__INTEGER)(Self__YZGH->count__WFC -  1);
-    Self__1ZGH=((__CHARACTER *)__tmp__ZZGH);
-    Self__2ZGH=__tmp__0ZGH;
-    while ((Self__2ZGH >=  0)) {
-      if (('\\' == Self__1ZGH[Self__2ZGH])) {
-        Self__1ZGH[Self__2ZGH]='/';
+    copy__BDS(string_tmp__VH,input_name__3B);
+    Self__T1HH=((__STRING *)string_tmp__VH);
+    __tmp__U1HH=Self__T1HH->storage__JCS;
+    __tmp__V1HH=(__INTEGER)(Self__T1HH->count__4FC -  1);
+    Self__W1HH=((__CHARACTER *)__tmp__U1HH);
+    Self__X1HH=__tmp__V1HH;
+    while ((Self__X1HH >=  0)) {
+      if (('\\' == Self__W1HH[Self__X1HH])) {
+        Self__W1HH[Self__X1HH]='/';
       };
-      Self__2ZGH=(__INTEGER)(Self__2ZGH -  1);
+      Self__X1HH=(__INTEGER)(Self__X1HH -  1);
     };
-    result__B0GH=((__STRING *)string_tmp__VH)->count__WFC;
-    while ((! ((result__B0GH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__BCS)[(__INTEGER)(result__B0GH -  1)] == '/')))) {
-      result__B0GH=(__INTEGER)(result__B0GH -  1);
+    result__21HH=((__STRING *)string_tmp__VH)->count__4FC;
+    while ((! ((result__21HH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__JCS)[(__INTEGER)(result__21HH -  1)] == '/')))) {
+      result__21HH=(__INTEGER)(result__21HH -  1);
     };
-    if ((result__B0GH >=  1)) {
-      Self__KWFH=((__STRING *)string_tmp__VH);
-      if ((result__B0GH > Self__KWFH->count__WFC)) {
-        Self__KWFH->count__WFC= 0;
+    if ((result__21HH >=  1)) {
+      Self__0XGH=((__STRING *)string_tmp__VH);
+      if ((result__21HH > Self__0XGH->count__4FC)) {
+        Self__0XGH->count__4FC= 0;
       } else {
-        if ((result__B0GH >  0)) {
-          len__G0GH=(__INTEGER)((__INTEGER)(result__B0GH -  1) +  1);
-          if ((len__G0GH >  0)) {
-            __tmp__H0GH=(__INTEGER)(result__B0GH +  1);
-            __tmp__J0GH=Self__KWFH->count__WFC;
-            Self__K0GH=__tmp__H0GH;
-            while ((Self__K0GH <= __tmp__J0GH)) {
-              ((__CHARACTER *)Self__KWFH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__K0GH - len__G0GH) -  1)]=((__CHARACTER *)Self__KWFH->storage__BCS)[(__INTEGER)(Self__K0GH -  1)];
-              Self__K0GH=(__INTEGER)(Self__K0GH +  1);
+        if ((result__21HH >  0)) {
+          len__B2HH=(__INTEGER)((__INTEGER)(result__21HH -  1) +  1);
+          if ((len__B2HH >  0)) {
+            __tmp__C2HH=(__INTEGER)(result__21HH +  1);
+            __tmp__E2HH=Self__0XGH->count__4FC;
+            Self__F2HH=__tmp__C2HH;
+            while ((Self__F2HH <= __tmp__E2HH)) {
+              ((__CHARACTER *)Self__0XGH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__F2HH - len__B2HH) -  1)]=((__CHARACTER *)Self__0XGH->storage__JCS)[(__INTEGER)(Self__F2HH -  1)];
+              Self__F2HH=(__INTEGER)(Self__F2HH +  1);
             };
-            Self__KWFH->count__WFC=(__INTEGER)(Self__KWFH->count__WFC - len__G0GH);
+            Self__0XGH->count__4FC=(__INTEGER)(Self__0XGH->count__4FC - len__B2HH);
           };
         };
       };
     };
-    result__WSC=((__STRING *)string_tmp__VH)->count__WFC;
-    while ((! ((result__WSC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__BCS)[(__INTEGER)(result__WSC -  1)] == '.')))) {
-      result__WSC=(__INTEGER)(result__WSC -  1);
+    result__4SC=((__STRING *)string_tmp__VH)->count__4FC;
+    while ((! ((result__4SC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__JCS)[(__INTEGER)(result__4SC -  1)] == '.')))) {
+      result__4SC=(__INTEGER)(result__4SC -  1);
     };
-    Self__MWFH=((__STRING *)string_tmp__VH);
-    n__NWFH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__WFC - result__WSC) +  1);
-    if ((n__NWFH > Self__MWFH->count__WFC)) {
-      Self__MWFH->count__WFC= 0;
+    Self__2XGH=((__STRING *)string_tmp__VH);
+    n__3XGH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__4FC - result__4SC) +  1);
+    if ((n__3XGH > Self__2XGH->count__4FC)) {
+      Self__2XGH->count__4FC= 0;
     } else {
-      Self__MWFH->count__WFC=(__INTEGER)(Self__MWFH->count__WFC - n__NWFH);
+      Self__2XGH->count__4FC=(__INTEGER)(Self__2XGH->count__4FC - n__3XGH);
     };
-    Self__WGJH=((__STRING *)string_tmp__VH);
-    Self__XGJH=Self__WGJH->count__WFC;
-    while ((Self__XGJH >=  1)) {
-      Self__YGJH=((__CHARACTER *)Self__WGJH->storage__BCS)[(__INTEGER)(Self__XGJH -  1)];
-      result__ZGJH='\0';
-      if (((((__INTEGER_8 )Self__YGJH) <  97) || (((__INTEGER_8 )Self__YGJH) >  122))) {
-        result__ZGJH=Self__YGJH;
+    Self__WIKH=((__STRING *)string_tmp__VH);
+    Self__XIKH=Self__WIKH->count__4FC;
+    while ((Self__XIKH >=  1)) {
+      Self__YIKH=((__CHARACTER *)Self__WIKH->storage__JCS)[(__INTEGER)(Self__XIKH -  1)];
+      result__ZIKH='\0';
+      if (((((__INTEGER_8 )Self__YIKH) <  97) || (((__INTEGER_8 )Self__YIKH) >  122))) {
+        result__ZIKH=Self__YIKH;
       } else {
-        result__ZGJH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__YGJH) -  32))));
+        result__ZIKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__YIKH) -  32))));
       };
-      ((__CHARACTER *)Self__WGJH->storage__BCS)[(__INTEGER)(Self__XGJH -  1)]=result__ZGJH;
-      Self__XGJH=(__INTEGER)(Self__XGJH -  1);
+      ((__CHARACTER *)Self__WIKH->storage__JCS)[(__INTEGER)(Self__XIKH -  1)]=result__ZIKH;
+      Self__XIKH=(__INTEGER)(Self__XIKH -  1);
     };
-    proto_input__BI=create__name__generic_count__ZAC(__tmp__2H,get__IWB(string_tmp__VH));
-    go_on__CBC(proto_input__BI);
+    proto_input__BI=create__name__generic_count__BBC(__tmp__2H,get__QWB(string_tmp__VH));
+    go_on__KBC(proto_input__BI);
     if (((void *)output_name__DI == (void *)NULL)) {
-      output_name__DI=add_ext__EBF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__MBF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
-    save_file__with__PDC(output_name__DI,output_code__SI);
+    save_file__with__XDC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    Self__C1QC= 0;
-    limit_up__D1QC=result__ENJ->parent_arrayed_collection__AJ.upper__HJ;
-    while ((Self__C1QC <= limit_up__D1QC)) {
-      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[Self__C1QC];
-      ((__STRING *)output_code__SI)->count__WFC= 0;
-      Self__WJTD=((__PROTOTYPE *)p__AB);
-      put__to__like__1ZXD(Self__WJTD->parent_named__5.name__LI,output_code__SI,(&__string_136));
-      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD=(__INTEGER)(-  1);
-      shorter_get_all_slot_in__E1XD(Self__WJTD,list_tmp__5JTD);
-      s__PBYD=NULL;
-      is_first_cur__OBYD=TRUE__;
-      __tmp__TBYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__IE5D= 0;
-      while ((Self__IE5D <= __tmp__TBYD)) {
-        s__PBYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__IE5D];
-        if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-          __tmp__IKTD=((__ITM_SLOT *)s__PBYD)->id_section__Y1C;
-        } else {
-          __tmp__IKTD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.id_section__Y1C;
-        };
-        Self__3T0G=((__SECTION_ *)__tmp__IKTD);
-        if ((((void *)Self__3T0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__3T0G->name__CZDC == (void *)(&__string_24)))) {
-          if (is_first_cur__OBYD) {
-            put__to__like__1ZXD((&__string_170),output_code__SI,(&__string_137));
-            is_first_cur__OBYD=FALSE__;
-          };
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__PBYD,string_tmp2__BAJ);
-          } else {
-            pretty_name_in__VK3F(s__PBYD,string_tmp2__BAJ);
-          };
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
-          if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-            __tmp__QCYD=((__ITM_SLOT *)s__PBYD)->id_section__Y1C;
-          } else {
-            __tmp__QCYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.id_section__Y1C;
-          };
-          Self__4T0G=((__SECTION_ *)__tmp__QCYD);
-          if ((((void *)Self__4T0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__4T0G->name__CZDC == (void *)(&__string_24)))) {
-            if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-              __tmp__XCYD=((__ITM_SLOT *)s__PBYD)->parent_named__P5.style__BEU;
+    Self__K1QC= 0;
+    limit_up__L1QC=result__MNJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__K1QC <= limit_up__L1QC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[Self__K1QC];
+      ((__STRING *)output_code__SI)->count__4FC= 0;
+      Self__4JTD=((__PROTOTYPE *)p__AB);
+      put__to__like__D0XD(Self__4JTD->parent_named__5.name__LI,output_code__SI,(&__string_138));
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__T1XD(Self__4JTD,list_tmp__HKTD);
+      s__4BYD=NULL;
+      is_first_cur__3BYD=TRUE__;
+      __tmp__CCYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__FC5D= 0;
+      while ((Self__FC5D <= __tmp__CCYD)) {
+        s__4BYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__FC5D];
+        if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+          __tmp__QKTD=((__ITM_SLOT *)s__4BYD)->id_section__A2C;
+        } else {
+          __tmp__QKTD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.id_section__A2C;
+        };
+        Self__OR1G=((__SECTION_ *)__tmp__QKTD);
+        if ((((void *)Self__OR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__OR1G->name__KZDC == (void *)(&__string_24)))) {
+          if (is_first_cur__3BYD) {
+            put__to__like__D0XD((&__string_172),output_code__SI,(&__string_139));
+            is_first_cur__3BYD=FALSE__;
+          };
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__4BYD,string_tmp2__JAJ);
+          } else {
+            pretty_name_in__YB4F(s__4BYD,string_tmp2__JAJ);
+          };
+          put__to__like__D0XD(string_tmp2__JAJ,string_tmp__VH,(&__string_141));
+          if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+            __tmp__5CYD=((__ITM_SLOT *)s__4BYD)->id_section__A2C;
+          } else {
+            __tmp__5CYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.id_section__A2C;
+          };
+          Self__PR1G=((__SECTION_ *)__tmp__5CYD);
+          if ((((void *)Self__PR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__PR1G->name__KZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+              __tmp__GDYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.style__JEU;
             } else {
-              __tmp__XCYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+              __tmp__GDYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
             };
-            if ((__tmp__XCYD != '+')) {
-              __tmp__NDYD=TRUE__;
+            if ((__tmp__GDYD != '+')) {
+              __tmp__2DYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-                __tmp__4CYD=((__ITM_SLOT *)s__PBYD)->result_type__04FC;
+              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+                __tmp__NDYD=((__ITM_SLOT *)s__4BYD)->result_type__C5FC;
               } else {
-                __tmp__4CYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.result_type__04FC;
+                __tmp__NDYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.result_type__C5FC;
               };
-              if (__tmp__4CYD==NULL) {
-                __tmp__ADYD=NULL;
+              if (__tmp__NDYD==NULL) {
+                __tmp__PDYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__4CYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__NDYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__ADYD=((void *)__tmp__4CYD);
+                  __tmp__PDYD=((void *)__tmp__NDYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__ADYD=((void *)__tmp__4CYD);
+                  __tmp__PDYD=((void *)__tmp__NDYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__ADYD=NULL;
+                  __tmp__PDYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__ADYD=NULL;
+                  __tmp__PDYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__ADYD=((void *)__tmp__4CYD);
+                  __tmp__PDYD=((void *)__tmp__NDYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__ADYD=((void *)__tmp__4CYD);
+                  __tmp__PDYD=((void *)__tmp__NDYD);
                 } break;
                 }
               };
-              ts__3CYD=__tmp__ADYD;
-              if (((void *)__tmp__ADYD == (void *)NULL)) {
-                __tmp__KDYD=TRUE__;
+              ts__MDYD=__tmp__PDYD;
+              if (((void *)__tmp__PDYD == (void *)NULL)) {
+                __tmp__ZDYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__ADYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__PDYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__GDYD=NULL;
+                  __tmp__VDYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__GDYD=NULL;
+                  __tmp__VDYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__GDYD=((__ITM_TYPE_GENERIC *)__tmp__ADYD)->parent_itm_type_style__CSN.style__TYP;
+                  __tmp__VDYD=((__ITM_TYPE_GENERIC *)__tmp__PDYD)->parent_itm_type_style__KSN.style__1YP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__GDYD=((__ITM_TYPE_STYLE *)__tmp__ADYD)->style__TYP;
+                  __tmp__VDYD=((__ITM_TYPE_STYLE *)__tmp__PDYD)->style__1YP;
                 } break;
                 };
-                __tmp__KDYD=((void *)__tmp__GDYD != (void *)(&__string_9));
+                __tmp__ZDYD=((void *)__tmp__VDYD != (void *)(&__string_9));
               };
-              __tmp__NDYD=__tmp__KDYD;
+              __tmp__2DYD=__tmp__ZDYD;
             };
-            if (__tmp__NDYD) {
-              if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-                __tmp__TDYD=((__ITM_SLOT *)s__PBYD)->parent_named__P5.name__LI;
+            if (__tmp__2DYD) {
+              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+                __tmp__CEYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__TDYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__CEYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__4GJH=((__STRING_CONSTANT *)__tmp__TDYD);
-              result__1GJH=FALSE__;
-              i__2GJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_171))->count__DD <= Self__4GJH->count__DD)) {
-                i__2GJH=((__STRING_CONSTANT *)(&__string_171))->count__DD;
-                while ((! ((i__2GJH ==  0) || (((__CHARACTER *)Self__4GJH->storage__VQO)[(__INTEGER)(i__2GJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_171))->storage__VQO)[(__INTEGER)(i__2GJH -  1)])))) {
-                  i__2GJH=(__INTEGER)(i__2GJH -  1);
+              Self__4IKH=((__STRING_CONSTANT *)__tmp__CEYD);
+              result__1IKH=FALSE__;
+              i__2IKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_173))->count__DD <= Self__4IKH->count__DD)) {
+                i__2IKH=((__STRING_CONSTANT *)(&__string_173))->count__DD;
+                while ((! ((i__2IKH ==  0) || (((__CHARACTER *)Self__4IKH->storage__3QO)[(__INTEGER)(i__2IKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_173))->storage__3QO)[(__INTEGER)(i__2IKH -  1)])))) {
+                  i__2IKH=(__INTEGER)(i__2IKH -  1);
                 };
-                result__1GJH=(i__2GJH ==  0);
+                result__1IKH=(i__2IKH ==  0);
               };
-              __tmp__BEYD=(! result__1GJH);
+              __tmp__QEYD=(! result__1IKH);
             } else {
-              __tmp__BEYD=FALSE__;
+              __tmp__QEYD=FALSE__;
             };
-            if (__tmp__BEYD) {
-              if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-                __tmp__2DYD=((__ITM_SLOT *)s__PBYD)->parent_named__P5.name__LI;
+            if (__tmp__QEYD) {
+              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+                __tmp__LEYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__2DYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__LEYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__DHJH=((__STRING_CONSTANT *)__tmp__2DYD);
-              result__AHJH=FALSE__;
-              i__BHJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__DHJH->count__DD)) {
-                i__BHJH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
-                while ((! ((i__BHJH ==  0) || (((__CHARACTER *)Self__DHJH->storage__VQO)[(__INTEGER)(i__BHJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__BHJH -  1)])))) {
-                  i__BHJH=(__INTEGER)(i__BHJH -  1);
+              Self__DJKH=((__STRING_CONSTANT *)__tmp__LEYD);
+              result__AJKH=FALSE__;
+              i__BJKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__DJKH->count__DD)) {
+                i__BJKH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
+                while ((! ((i__BJKH ==  0) || (((__CHARACTER *)Self__DJKH->storage__3QO)[(__INTEGER)(i__BJKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__3QO)[(__INTEGER)(i__BJKH -  1)])))) {
+                  i__BJKH=(__INTEGER)(i__BJKH -  1);
                 };
-                result__AHJH=(i__BHJH ==  0);
+                result__AJKH=(i__BJKH ==  0);
               };
-              __tmp__CEYD=(! result__AHJH);
+              __tmp__REYD=(! result__AJKH);
             } else {
-              __tmp__CEYD=FALSE__;
+              __tmp__REYD=FALSE__;
             };
-            __tmp__FEYD=__tmp__CEYD;
+            __tmp__UEYD=__tmp__REYD;
           } else {
-            __tmp__FEYD=FALSE__;
+            __tmp__UEYD=FALSE__;
           };
-          if (__tmp__FEYD) {
-            put__to__like__1ZXD((&__string_173),string_tmp__VH,(&__string_135));
+          if (__tmp__UEYD) {
+            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__PBYD)->__id==__ITM_SLOT__) {
-            __tmp__REYD=((__ITM_SLOT *)s__PBYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
+            __tmp__AFYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__REYD=((__ITM_SLOT_OPERATOR *)s__PBYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__AFYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__REYD,string_tmp2__BAJ);
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__AFYD,string_tmp2__JAJ);
+          ((__STRING *)string_tmp3__DFYD)->count__4FC= 0;
+          shorter_comment__in__light__V42E(string_tmp2__JAJ,string_tmp3__DFYD,TRUE__);
+          put__to__like__D0XD(string_tmp3__DFYD,string_tmp__VH,(&__string_142));
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_140));
         };
-        Self__IE5D=(__INTEGER)(Self__IE5D +  1);
+        Self__FC5D=(__INTEGER)(Self__FC5D +  1);
       };
-      if ((! is_first_cur__OBYD)) {
-        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
+      if ((! is_first_cur__3BYD)) {
+        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
       };
-      s__NFYD=NULL;
-      is_first_cur__MFYD=TRUE__;
-      __tmp__RFYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__0E5D= 0;
-      while ((Self__0E5D <= __tmp__RFYD)) {
-        s__NFYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__0E5D];
-        if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-          __tmp__SKTD=((__ITM_SLOT *)s__NFYD)->parent_named__P5.name__LI;
+      s__AGYD=NULL;
+      is_first_cur__5FYD=TRUE__;
+      __tmp__EGYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__XC5D= 0;
+      while ((Self__XC5D <= __tmp__EGYD)) {
+        s__AGYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__XC5D];
+        if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+          __tmp__0KTD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
         } else {
-          __tmp__SKTD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          __tmp__0KTD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
         };
-        Self__IHJH=((__STRING_CONSTANT *)__tmp__SKTD);
-        result__FHJH=FALSE__;
-        i__GHJH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__IHJH->count__DD)) {
-          i__GHJH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
-          while ((! ((i__GHJH ==  0) || (((__CHARACTER *)Self__IHJH->storage__VQO)[(__INTEGER)(i__GHJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__VQO)[(__INTEGER)(i__GHJH -  1)])))) {
-            i__GHJH=(__INTEGER)(i__GHJH -  1);
+        Self__IJKH=((__STRING_CONSTANT *)__tmp__0KTD);
+        result__FJKH=FALSE__;
+        i__GJKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__IJKH->count__DD)) {
+          i__GJKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+          while ((! ((i__GJKH ==  0) || (((__CHARACTER *)Self__IJKH->storage__3QO)[(__INTEGER)(i__GJKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__3QO)[(__INTEGER)(i__GJKH -  1)])))) {
+            i__GJKH=(__INTEGER)(i__GJKH -  1);
           };
-          result__FHJH=(i__GHJH ==  0);
+          result__FJKH=(i__GJKH ==  0);
         };
-        if (result__FHJH) {
-          if (is_first_cur__MFYD) {
-            put__to__like__1ZXD((&__string_175),output_code__SI,(&__string_137));
-            is_first_cur__MFYD=FALSE__;
+        if (result__FJKH) {
+          if (is_first_cur__5FYD) {
+            put__to__like__D0XD((&__string_177),output_code__SI,(&__string_139));
+            is_first_cur__5FYD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__NFYD,string_tmp2__BAJ);
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__AGYD,string_tmp2__JAJ);
           } else {
-            pretty_name_in__VK3F(s__NFYD,string_tmp2__BAJ);
+            pretty_name_in__YB4F(s__AGYD,string_tmp2__JAJ);
           };
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
-          if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-            __tmp__OGYD=((__ITM_SLOT *)s__NFYD)->id_section__Y1C;
+          put__to__like__D0XD(string_tmp2__JAJ,string_tmp__VH,(&__string_141));
+          if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+            __tmp__BHYD=((__ITM_SLOT *)s__AGYD)->id_section__A2C;
           } else {
-            __tmp__OGYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__BHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          Self__5T0G=((__SECTION_ *)__tmp__OGYD);
-          if ((((void *)Self__5T0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__5T0G->name__CZDC == (void *)(&__string_24)))) {
-            if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-              __tmp__VGYD=((__ITM_SLOT *)s__NFYD)->parent_named__P5.style__BEU;
+          Self__QR1G=((__SECTION_ *)__tmp__BHYD);
+          if ((((void *)Self__QR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__QR1G->name__KZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+              __tmp__IHYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.style__JEU;
             } else {
-              __tmp__VGYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+              __tmp__IHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
             };
-            if ((__tmp__VGYD != '+')) {
-              __tmp__LHYD=TRUE__;
+            if ((__tmp__IHYD != '+')) {
+              __tmp__4HYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-                __tmp__2GYD=((__ITM_SLOT *)s__NFYD)->result_type__04FC;
+              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+                __tmp__PHYD=((__ITM_SLOT *)s__AGYD)->result_type__C5FC;
               } else {
-                __tmp__2GYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.result_type__04FC;
+                __tmp__PHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.result_type__C5FC;
               };
-              if (__tmp__2GYD==NULL) {
-                __tmp__4GYD=NULL;
+              if (__tmp__PHYD==NULL) {
+                __tmp__RHYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__2GYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__PHYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__4GYD=((void *)__tmp__2GYD);
+                  __tmp__RHYD=((void *)__tmp__PHYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__4GYD=((void *)__tmp__2GYD);
+                  __tmp__RHYD=((void *)__tmp__PHYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__4GYD=NULL;
+                  __tmp__RHYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__4GYD=NULL;
+                  __tmp__RHYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__4GYD=((void *)__tmp__2GYD);
+                  __tmp__RHYD=((void *)__tmp__PHYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__4GYD=((void *)__tmp__2GYD);
+                  __tmp__RHYD=((void *)__tmp__PHYD);
                 } break;
                 }
               };
-              ts__1GYD=__tmp__4GYD;
-              if (((void *)__tmp__4GYD == (void *)NULL)) {
-                __tmp__IHYD=TRUE__;
+              ts__OHYD=__tmp__RHYD;
+              if (((void *)__tmp__RHYD == (void *)NULL)) {
+                __tmp__1HYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__4GYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__RHYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__EHYD=NULL;
+                  __tmp__XHYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__EHYD=NULL;
+                  __tmp__XHYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__EHYD=((__ITM_TYPE_GENERIC *)__tmp__4GYD)->parent_itm_type_style__CSN.style__TYP;
+                  __tmp__XHYD=((__ITM_TYPE_GENERIC *)__tmp__RHYD)->parent_itm_type_style__KSN.style__1YP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__EHYD=((__ITM_TYPE_STYLE *)__tmp__4GYD)->style__TYP;
+                  __tmp__XHYD=((__ITM_TYPE_STYLE *)__tmp__RHYD)->style__1YP;
                 } break;
                 };
-                __tmp__IHYD=((void *)__tmp__EHYD != (void *)(&__string_9));
+                __tmp__1HYD=((void *)__tmp__XHYD != (void *)(&__string_9));
               };
-              __tmp__LHYD=__tmp__IHYD;
+              __tmp__4HYD=__tmp__1HYD;
             };
-            if (__tmp__LHYD) {
-              if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-                __tmp__RHYD=((__ITM_SLOT *)s__NFYD)->parent_named__P5.name__LI;
+            if (__tmp__4HYD) {
+              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+                __tmp__EIYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__RHYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__EIYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__NHJH=((__STRING_CONSTANT *)__tmp__RHYD);
-              result__KHJH=FALSE__;
-              i__LHJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_171))->count__DD <= Self__NHJH->count__DD)) {
-                i__LHJH=((__STRING_CONSTANT *)(&__string_171))->count__DD;
-                while ((! ((i__LHJH ==  0) || (((__CHARACTER *)Self__NHJH->storage__VQO)[(__INTEGER)(i__LHJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_171))->storage__VQO)[(__INTEGER)(i__LHJH -  1)])))) {
-                  i__LHJH=(__INTEGER)(i__LHJH -  1);
+              Self__NJKH=((__STRING_CONSTANT *)__tmp__EIYD);
+              result__KJKH=FALSE__;
+              i__LJKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_173))->count__DD <= Self__NJKH->count__DD)) {
+                i__LJKH=((__STRING_CONSTANT *)(&__string_173))->count__DD;
+                while ((! ((i__LJKH ==  0) || (((__CHARACTER *)Self__NJKH->storage__3QO)[(__INTEGER)(i__LJKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_173))->storage__3QO)[(__INTEGER)(i__LJKH -  1)])))) {
+                  i__LJKH=(__INTEGER)(i__LJKH -  1);
                 };
-                result__KHJH=(i__LHJH ==  0);
+                result__KJKH=(i__LJKH ==  0);
               };
-              __tmp__5HYD=(! result__KHJH);
+              __tmp__SIYD=(! result__KJKH);
             } else {
-              __tmp__5HYD=FALSE__;
+              __tmp__SIYD=FALSE__;
             };
-            if (__tmp__5HYD) {
-              if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-                __tmp__0HYD=((__ITM_SLOT *)s__NFYD)->parent_named__P5.name__LI;
+            if (__tmp__SIYD) {
+              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+                __tmp__NIYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__0HYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__NIYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__SHJH=((__STRING_CONSTANT *)__tmp__0HYD);
-              result__PHJH=FALSE__;
-              i__QHJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__SHJH->count__DD)) {
-                i__QHJH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
-                while ((! ((i__QHJH ==  0) || (((__CHARACTER *)Self__SHJH->storage__VQO)[(__INTEGER)(i__QHJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__QHJH -  1)])))) {
-                  i__QHJH=(__INTEGER)(i__QHJH -  1);
+              Self__SJKH=((__STRING_CONSTANT *)__tmp__NIYD);
+              result__PJKH=FALSE__;
+              i__QJKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__SJKH->count__DD)) {
+                i__QJKH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
+                while ((! ((i__QJKH ==  0) || (((__CHARACTER *)Self__SJKH->storage__3QO)[(__INTEGER)(i__QJKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__3QO)[(__INTEGER)(i__QJKH -  1)])))) {
+                  i__QJKH=(__INTEGER)(i__QJKH -  1);
                 };
-                result__PHJH=(i__QHJH ==  0);
+                result__PJKH=(i__QJKH ==  0);
               };
-              __tmp__AIYD=(! result__PHJH);
+              __tmp__TIYD=(! result__PJKH);
             } else {
-              __tmp__AIYD=FALSE__;
+              __tmp__TIYD=FALSE__;
             };
-            __tmp__DIYD=__tmp__AIYD;
+            __tmp__WIYD=__tmp__TIYD;
           } else {
-            __tmp__DIYD=FALSE__;
+            __tmp__WIYD=FALSE__;
           };
-          if (__tmp__DIYD) {
-            put__to__like__1ZXD((&__string_173),string_tmp__VH,(&__string_135));
+          if (__tmp__WIYD) {
+            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__NFYD)->__id==__ITM_SLOT__) {
-            __tmp__PIYD=((__ITM_SLOT *)s__NFYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
+            __tmp__CJYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__PIYD=((__ITM_SLOT_OPERATOR *)s__NFYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__CJYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__PIYD,string_tmp2__BAJ);
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__CJYD,string_tmp2__JAJ);
+          ((__STRING *)string_tmp3__DFYD)->count__4FC= 0;
+          shorter_comment__in__light__V42E(string_tmp2__JAJ,string_tmp3__DFYD,TRUE__);
+          put__to__like__D0XD(string_tmp3__DFYD,string_tmp__VH,(&__string_142));
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_140));
         };
-        Self__0E5D=(__INTEGER)(Self__0E5D +  1);
+        Self__XC5D=(__INTEGER)(Self__XC5D +  1);
       };
-      if ((! is_first_cur__MFYD)) {
-        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
+      if ((! is_first_cur__5FYD)) {
+        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
       };
-      s__LJYD=NULL;
-      is_first_cur__KJYD=TRUE__;
-      __tmp__PJYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__MF5D= 0;
-      while ((Self__MF5D <= __tmp__PJYD)) {
-        s__LJYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__MF5D];
-        if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-          __tmp__2KTD=((__ITM_SLOT *)s__LJYD)->parent_named__P5.name__LI;
+      s__BKYD=NULL;
+      is_first_cur__AKYD=TRUE__;
+      __tmp__FKYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__JD5D= 0;
+      while ((Self__JD5D <= __tmp__FKYD)) {
+        s__BKYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__JD5D];
+        if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+          __tmp__ELTD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
         } else {
-          __tmp__2KTD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
         };
-        Self__XHJH=((__STRING_CONSTANT *)__tmp__2KTD);
-        result__UHJH=FALSE__;
-        i__VHJH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__XHJH->count__DD)) {
-          i__VHJH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
-          while ((! ((i__VHJH ==  0) || (((__CHARACTER *)Self__XHJH->storage__VQO)[(__INTEGER)(i__VHJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__VQO)[(__INTEGER)(i__VHJH -  1)])))) {
-            i__VHJH=(__INTEGER)(i__VHJH -  1);
+        Self__XJKH=((__STRING_CONSTANT *)__tmp__ELTD);
+        result__UJKH=FALSE__;
+        i__VJKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__XJKH->count__DD)) {
+          i__VJKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+          while ((! ((i__VJKH ==  0) || (((__CHARACTER *)Self__XJKH->storage__3QO)[(__INTEGER)(i__VJKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__3QO)[(__INTEGER)(i__VJKH -  1)])))) {
+            i__VJKH=(__INTEGER)(i__VJKH -  1);
           };
-          result__UHJH=(i__VHJH ==  0);
+          result__UJKH=(i__VJKH ==  0);
         };
-        if ((! result__UHJH)) {
-          if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-            __tmp__ELTD=((__ITM_SLOT *)s__LJYD)->id_section__Y1C;
+        if ((! result__UJKH)) {
+          if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+            __tmp__MLTD=((__ITM_SLOT *)s__BKYD)->id_section__A2C;
           } else {
-            __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__MLTD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          Self__AU0G=((__SECTION_ *)__tmp__ELTD);
-          __tmp__JLTD=(! (((void *)Self__AU0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__AU0G->name__CZDC == (void *)(&__string_24))));
+          Self__RR1G=((__SECTION_ *)__tmp__MLTD);
+          __tmp__RLTD=(! (((void *)Self__RR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__RR1G->name__KZDC == (void *)(&__string_24))));
         } else {
-          __tmp__JLTD=FALSE__;
+          __tmp__RLTD=FALSE__;
         };
-        if (__tmp__JLTD) {
-          if (is_first_cur__KJYD) {
-            put__to__like__1ZXD((&__string_176),output_code__SI,(&__string_137));
-            is_first_cur__KJYD=FALSE__;
+        if (__tmp__RLTD) {
+          if (is_first_cur__AKYD) {
+            put__to__like__D0XD((&__string_178),output_code__SI,(&__string_139));
+            is_first_cur__AKYD=FALSE__;
           };
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__LJYD,string_tmp2__BAJ);
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__BKYD,string_tmp2__JAJ);
           } else {
-            pretty_name_in__VK3F(s__LJYD,string_tmp2__BAJ);
+            pretty_name_in__YB4F(s__BKYD,string_tmp2__JAJ);
           };
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_139));
-          if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-            __tmp__MKYD=((__ITM_SLOT *)s__LJYD)->id_section__Y1C;
+          put__to__like__D0XD(string_tmp2__JAJ,string_tmp__VH,(&__string_141));
+          if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+            __tmp__CLYD=((__ITM_SLOT *)s__BKYD)->id_section__A2C;
           } else {
-            __tmp__MKYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__CLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          Self__BU0G=((__SECTION_ *)__tmp__MKYD);
-          if ((((void *)Self__BU0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__BU0G->name__CZDC == (void *)(&__string_24)))) {
-            if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-              __tmp__TKYD=((__ITM_SLOT *)s__LJYD)->parent_named__P5.style__BEU;
+          Self__SR1G=((__SECTION_ *)__tmp__CLYD);
+          if ((((void *)Self__SR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__SR1G->name__KZDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+              __tmp__JLYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.style__JEU;
             } else {
-              __tmp__TKYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+              __tmp__JLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
             };
-            if ((__tmp__TKYD != '+')) {
-              __tmp__JLYD=TRUE__;
+            if ((__tmp__JLYD != '+')) {
+              __tmp__5LYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-                __tmp__0KYD=((__ITM_SLOT *)s__LJYD)->result_type__04FC;
+              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+                __tmp__QLYD=((__ITM_SLOT *)s__BKYD)->result_type__C5FC;
               } else {
-                __tmp__0KYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.result_type__04FC;
+                __tmp__QLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.result_type__C5FC;
               };
-              if (__tmp__0KYD==NULL) {
-                __tmp__2KYD=NULL;
+              if (__tmp__QLYD==NULL) {
+                __tmp__SLYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__0KYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__QLYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__2KYD=((void *)__tmp__0KYD);
+                  __tmp__SLYD=((void *)__tmp__QLYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__2KYD=((void *)__tmp__0KYD);
+                  __tmp__SLYD=((void *)__tmp__QLYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__2KYD=NULL;
+                  __tmp__SLYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__2KYD=NULL;
+                  __tmp__SLYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__2KYD=((void *)__tmp__0KYD);
+                  __tmp__SLYD=((void *)__tmp__QLYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__2KYD=((void *)__tmp__0KYD);
+                  __tmp__SLYD=((void *)__tmp__QLYD);
                 } break;
                 }
               };
-              ts__ZKYD=__tmp__2KYD;
-              if (((void *)__tmp__2KYD == (void *)NULL)) {
-                __tmp__GLYD=TRUE__;
+              ts__PLYD=__tmp__SLYD;
+              if (((void *)__tmp__SLYD == (void *)NULL)) {
+                __tmp__2LYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__2KYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__SLYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__CLYD=NULL;
+                  __tmp__YLYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__CLYD=NULL;
+                  __tmp__YLYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__CLYD=((__ITM_TYPE_GENERIC *)__tmp__2KYD)->parent_itm_type_style__CSN.style__TYP;
+                  __tmp__YLYD=((__ITM_TYPE_GENERIC *)__tmp__SLYD)->parent_itm_type_style__KSN.style__1YP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__CLYD=((__ITM_TYPE_STYLE *)__tmp__2KYD)->style__TYP;
+                  __tmp__YLYD=((__ITM_TYPE_STYLE *)__tmp__SLYD)->style__1YP;
                 } break;
                 };
-                __tmp__GLYD=((void *)__tmp__CLYD != (void *)(&__string_9));
+                __tmp__2LYD=((void *)__tmp__YLYD != (void *)(&__string_9));
               };
-              __tmp__JLYD=__tmp__GLYD;
+              __tmp__5LYD=__tmp__2LYD;
             };
-            if (__tmp__JLYD) {
-              if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-                __tmp__PLYD=((__ITM_SLOT *)s__LJYD)->parent_named__P5.name__LI;
+            if (__tmp__5LYD) {
+              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+                __tmp__FMYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__PLYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__FMYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__2HJH=((__STRING_CONSTANT *)__tmp__PLYD);
-              result__ZHJH=FALSE__;
-              i__0HJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_171))->count__DD <= Self__2HJH->count__DD)) {
-                i__0HJH=((__STRING_CONSTANT *)(&__string_171))->count__DD;
-                while ((! ((i__0HJH ==  0) || (((__CHARACTER *)Self__2HJH->storage__VQO)[(__INTEGER)(i__0HJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_171))->storage__VQO)[(__INTEGER)(i__0HJH -  1)])))) {
-                  i__0HJH=(__INTEGER)(i__0HJH -  1);
+              Self__2JKH=((__STRING_CONSTANT *)__tmp__FMYD);
+              result__ZJKH=FALSE__;
+              i__0JKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_173))->count__DD <= Self__2JKH->count__DD)) {
+                i__0JKH=((__STRING_CONSTANT *)(&__string_173))->count__DD;
+                while ((! ((i__0JKH ==  0) || (((__CHARACTER *)Self__2JKH->storage__3QO)[(__INTEGER)(i__0JKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_173))->storage__3QO)[(__INTEGER)(i__0JKH -  1)])))) {
+                  i__0JKH=(__INTEGER)(i__0JKH -  1);
                 };
-                result__ZHJH=(i__0HJH ==  0);
+                result__ZJKH=(i__0JKH ==  0);
               };
-              __tmp__3LYD=(! result__ZHJH);
+              __tmp__TMYD=(! result__ZJKH);
             } else {
-              __tmp__3LYD=FALSE__;
+              __tmp__TMYD=FALSE__;
             };
-            if (__tmp__3LYD) {
-              if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-                __tmp__YLYD=((__ITM_SLOT *)s__LJYD)->parent_named__P5.name__LI;
+            if (__tmp__TMYD) {
+              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+                __tmp__OMYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
               } else {
-                __tmp__YLYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+                __tmp__OMYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
               };
-              Self__BIJH=((__STRING_CONSTANT *)__tmp__YLYD);
-              result__4HJH=FALSE__;
-              i__5HJH= 0;
-              if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__BIJH->count__DD)) {
-                i__5HJH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
-                while ((! ((i__5HJH ==  0) || (((__CHARACTER *)Self__BIJH->storage__VQO)[(__INTEGER)(i__5HJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__5HJH -  1)])))) {
-                  i__5HJH=(__INTEGER)(i__5HJH -  1);
+              Self__BKKH=((__STRING_CONSTANT *)__tmp__OMYD);
+              result__4JKH=FALSE__;
+              i__5JKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__BKKH->count__DD)) {
+                i__5JKH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
+                while ((! ((i__5JKH ==  0) || (((__CHARACTER *)Self__BKKH->storage__3QO)[(__INTEGER)(i__5JKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__3QO)[(__INTEGER)(i__5JKH -  1)])))) {
+                  i__5JKH=(__INTEGER)(i__5JKH -  1);
                 };
-                result__4HJH=(i__5HJH ==  0);
+                result__4JKH=(i__5JKH ==  0);
               };
-              __tmp__4LYD=(! result__4HJH);
+              __tmp__UMYD=(! result__4JKH);
             } else {
-              __tmp__4LYD=FALSE__;
+              __tmp__UMYD=FALSE__;
             };
-            __tmp__BMYD=__tmp__4LYD;
+            __tmp__XMYD=__tmp__UMYD;
           } else {
-            __tmp__BMYD=FALSE__;
+            __tmp__XMYD=FALSE__;
           };
-          if (__tmp__BMYD) {
-            put__to__like__1ZXD((&__string_173),string_tmp__VH,(&__string_135));
+          if (__tmp__XMYD) {
+            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__LJYD)->__id==__ITM_SLOT__) {
-            __tmp__NMYD=((__ITM_SLOT *)s__LJYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
+            __tmp__DNYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__NMYD=((__ITM_SLOT_OPERATOR *)s__LJYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__DNYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__NMYD,string_tmp2__BAJ);
-          put__to__like__1ZXD(string_tmp2__BAJ,string_tmp__VH,(&__string_140));
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_138));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__DNYD,string_tmp2__JAJ);
+          ((__STRING *)string_tmp3__DFYD)->count__4FC= 0;
+          shorter_comment__in__light__V42E(string_tmp2__JAJ,string_tmp3__DFYD,TRUE__);
+          put__to__like__D0XD(string_tmp3__DFYD,string_tmp__VH,(&__string_142));
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_140));
         };
-        Self__MF5D=(__INTEGER)(Self__MF5D +  1);
+        Self__JD5D=(__INTEGER)(Self__JD5D +  1);
       };
-      if ((! is_first_cur__KJYD)) {
-        put__to__like__1ZXD(NULL,output_code__SI,(&__string_141));
+      if ((! is_first_cur__AKYD)) {
+        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
       };
-      s__JNYD=NULL;
-      is_first__INYD=TRUE__;
-      __tmp__NNYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__4F5D= 0;
-      while ((Self__4F5D <= __tmp__NNYD)) {
-        s__JNYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__4F5D];
-        if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-          __tmp__SLTD=((__ITM_SLOT *)s__JNYD)->id_section__Y1C;
+      s__COYD=NULL;
+      is_first__BOYD=TRUE__;
+      __tmp__GOYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__1D5D= 0;
+      while ((Self__1D5D <= __tmp__GOYD)) {
+        s__COYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__1D5D];
+        if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+          __tmp__0LTD=((__ITM_SLOT *)s__COYD)->id_section__A2C;
         } else {
-          __tmp__SLTD=((__ITM_SLOT_OPERATOR *)s__JNYD)->parent_itm_slot__OU5B.id_section__Y1C;
+          __tmp__0LTD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.id_section__A2C;
         };
-        Self__CU0G=((__SECTION_ *)__tmp__SLTD);
-        if ((((void *)Self__CU0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__CU0G->name__CZDC == (void *)(&__string_24)))) {
-          if (is_first__INYD) {
-            put__to__like__1ZXD((&__string_177),output_code__SI,(&__string_142));
-            is_first__INYD=FALSE__;
+        Self__TR1G=((__SECTION_ *)__tmp__0LTD);
+        if ((((void *)Self__TR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__TR1G->name__KZDC == (void *)(&__string_24)))) {
+          if (is_first__BOYD) {
+            put__to__like__D0XD((&__string_179),output_code__SI,(&__string_144));
+            is_first__BOYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__JNYD,string_tmp2__BAJ);
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__COYD,string_tmp2__JAJ);
           } else {
-            pretty_name_in__VK3F(s__JNYD,string_tmp2__BAJ);
+            pretty_name_in__YB4F(s__COYD,string_tmp2__JAJ);
           };
-          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            __tmp__JOYD=((__ITM_SLOT *)s__JNYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          put__to__like__D0XD(string_tmp2__JAJ,output_code__SI,(&__string_145));
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            __tmp__CPYD=((__ITM_SLOT *)s__COYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__JOYD=((__ITM_SLOT_OPERATOR *)s__JNYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__CPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__JOYD)) &  511)])->filename__UPG);
-          append__BOS(string_tmp__VH,(&__string_178));
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            __tmp__OOYD=((__ITM_SLOT *)s__JNYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          copy__BDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__CPYD)) &  511)])->filename__2PG);
+          append__JOS(string_tmp__VH,(&__string_180));
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            __tmp__HPYD=((__ITM_SLOT *)s__COYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__OOYD=((__ITM_SLOT_OPERATOR *)s__JNYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__HPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__OOYD) >>  17),string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
-          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            __tmp__XOYD=((__ITM_SLOT *)s__JNYD)->id_section__Y1C;
+          append_in__WIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__HPYD) >>  17),string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_147));
+          put__to__like__D0XD((&__string_181),output_code__SI,(&__string_146));
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            __tmp__QPYD=((__ITM_SLOT *)s__COYD)->id_section__A2C;
           } else {
-            __tmp__XOYD=((__ITM_SLOT_OPERATOR *)s__JNYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__QPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          append_in__MM3F(__tmp__XOYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_120));
-          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__ON3F(s__JNYD,output_code__SI);
+          append_in__PD4F(__tmp__QPYD,string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__D0XD((&__string_182),output_code__SI,(&__string_146));
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__RE4F(s__COYD,output_code__SI);
           } else {
-            shorter_profile_in__LO3F(s__JNYD,output_code__SI);
+            shorter_profile_in__OF4F(s__COYD,output_code__SI);
           };
-          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__JNYD)->__id==__ITM_SLOT__) {
-            __tmp__BPYD=((__ITM_SLOT *)s__JNYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__COYD)->__id==__ITM_SLOT__) {
+            __tmp__YPYD=((__ITM_SLOT *)s__COYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__BPYD=((__ITM_SLOT_OPERATOR *)s__JNYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__YPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__BPYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
-          put__to__like__1ZXD((&__string_182),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_183),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_184),output_code__SI,(&__string_144));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__YPYD,string_tmp__VH);
+          shorter_comment__in__light__V42E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__4F5D=(__INTEGER)(Self__4F5D +  1);
+        Self__1D5D=(__INTEGER)(Self__1D5D +  1);
       };
-      s__XPYD=NULL;
-      is_first__WPYD=TRUE__;
-      __tmp__1PYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__NG5D= 0;
-      while ((Self__NG5D <= __tmp__1PYD)) {
-        s__XPYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__NG5D];
-        if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-          __tmp__2LTD=((__ITM_SLOT *)s__XPYD)->parent_named__P5.name__LI;
+      s__GQYD=NULL;
+      is_first__FQYD=TRUE__;
+      __tmp__KQYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__KE5D= 0;
+      while ((Self__KE5D <= __tmp__KQYD)) {
+        s__GQYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__KE5D];
+        if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+          __tmp__EMTD=((__ITM_SLOT *)s__GQYD)->parent_named__V5.name__LI;
         } else {
-          __tmp__2LTD=((__ITM_SLOT_OPERATOR *)s__XPYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          __tmp__EMTD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
         };
-        Self__GIJH=((__STRING_CONSTANT *)__tmp__2LTD);
-        result__DIJH=FALSE__;
-        i__EIJH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__GIJH->count__DD)) {
-          i__EIJH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
-          while ((! ((i__EIJH ==  0) || (((__CHARACTER *)Self__GIJH->storage__VQO)[(__INTEGER)(i__EIJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__VQO)[(__INTEGER)(i__EIJH -  1)])))) {
-            i__EIJH=(__INTEGER)(i__EIJH -  1);
+        Self__GKKH=((__STRING_CONSTANT *)__tmp__EMTD);
+        result__DKKH=FALSE__;
+        i__EKKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__GKKH->count__DD)) {
+          i__EKKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+          while ((! ((i__EKKH ==  0) || (((__CHARACTER *)Self__GKKH->storage__3QO)[(__INTEGER)(i__EKKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__3QO)[(__INTEGER)(i__EKKH -  1)])))) {
+            i__EKKH=(__INTEGER)(i__EKKH -  1);
           };
-          result__DIJH=(i__EIJH ==  0);
+          result__DKKH=(i__EKKH ==  0);
         };
-        if (result__DIJH) {
-          if (is_first__WPYD) {
-            put__to__like__1ZXD((&__string_185),output_code__SI,(&__string_142));
-            is_first__WPYD=FALSE__;
+        if (result__DKKH) {
+          if (is_first__FQYD) {
+            put__to__like__D0XD((&__string_183),output_code__SI,(&__string_144));
+            is_first__FQYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__XPYD,string_tmp2__BAJ);
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__GQYD,string_tmp2__JAJ);
           } else {
-            pretty_name_in__VK3F(s__XPYD,string_tmp2__BAJ);
+            pretty_name_in__YB4F(s__GQYD,string_tmp2__JAJ);
           };
-          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            __tmp__XQYD=((__ITM_SLOT *)s__XPYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          put__to__like__D0XD(string_tmp2__JAJ,output_code__SI,(&__string_145));
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            __tmp__GRYD=((__ITM_SLOT *)s__GQYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__XQYD=((__ITM_SLOT_OPERATOR *)s__XPYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__GRYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__XQYD)) &  511)])->filename__UPG);
-          append__BOS(string_tmp__VH,(&__string_178));
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            __tmp__2QYD=((__ITM_SLOT *)s__XPYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          copy__BDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__GRYD)) &  511)])->filename__2PG);
+          append__JOS(string_tmp__VH,(&__string_180));
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            __tmp__LRYD=((__ITM_SLOT *)s__GQYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__2QYD=((__ITM_SLOT_OPERATOR *)s__XPYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__LRYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__2QYD) >>  17),string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
-          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            __tmp__FRYD=((__ITM_SLOT *)s__XPYD)->id_section__Y1C;
+          append_in__WIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__LRYD) >>  17),string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_147));
+          put__to__like__D0XD((&__string_181),output_code__SI,(&__string_146));
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            __tmp__URYD=((__ITM_SLOT *)s__GQYD)->id_section__A2C;
           } else {
-            __tmp__FRYD=((__ITM_SLOT_OPERATOR *)s__XPYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__URYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          append_in__MM3F(__tmp__FRYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_120));
-          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__ON3F(s__XPYD,output_code__SI);
+          append_in__PD4F(__tmp__URYD,string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__D0XD((&__string_182),output_code__SI,(&__string_146));
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__RE4F(s__GQYD,output_code__SI);
           } else {
-            shorter_profile_in__LO3F(s__XPYD,output_code__SI);
+            shorter_profile_in__OF4F(s__GQYD,output_code__SI);
           };
-          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__XPYD)->__id==__ITM_SLOT__) {
-            __tmp__PRYD=((__ITM_SLOT *)s__XPYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
+            __tmp__2RYD=((__ITM_SLOT *)s__GQYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__PRYD=((__ITM_SLOT_OPERATOR *)s__XPYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__2RYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__PRYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
-          put__to__like__1ZXD((&__string_182),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_183),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_184),output_code__SI,(&__string_144));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__2RYD,string_tmp__VH);
+          shorter_comment__in__light__V42E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__NG5D=(__INTEGER)(Self__NG5D +  1);
+        Self__KE5D=(__INTEGER)(Self__KE5D +  1);
       };
-      s__FSYD=NULL;
-      is_first__ESYD=TRUE__;
-      __tmp__JSYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.upper__M2XD;
-      Self__2G5D= 0;
-      while ((Self__2G5D <= __tmp__JSYD)) {
-        s__FSYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__5JTD)->parent_arrayed_collection__4JTD.storage__A4VE)[Self__2G5D];
-        if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-          __tmp__GMTD=((__ITM_SLOT *)s__FSYD)->parent_named__P5.name__LI;
+      s__KSYD=NULL;
+      is_first__JSYD=TRUE__;
+      __tmp__OSYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD;
+      Self__ZE5D= 0;
+      while ((Self__ZE5D <= __tmp__OSYD)) {
+        s__KSYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[Self__ZE5D];
+        if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+          __tmp__OMTD=((__ITM_SLOT *)s__KSYD)->parent_named__V5.name__LI;
         } else {
-          __tmp__GMTD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+          __tmp__OMTD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
         };
-        Self__LIJH=((__STRING_CONSTANT *)__tmp__GMTD);
-        result__IIJH=FALSE__;
-        i__JIJH= 0;
-        if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__LIJH->count__DD)) {
-          i__JIJH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
-          while ((! ((i__JIJH ==  0) || (((__CHARACTER *)Self__LIJH->storage__VQO)[(__INTEGER)(i__JIJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__VQO)[(__INTEGER)(i__JIJH -  1)])))) {
-            i__JIJH=(__INTEGER)(i__JIJH -  1);
+        Self__LKKH=((__STRING_CONSTANT *)__tmp__OMTD);
+        result__IKKH=FALSE__;
+        i__JKKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__LKKH->count__DD)) {
+          i__JKKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+          while ((! ((i__JKKH ==  0) || (((__CHARACTER *)Self__LKKH->storage__3QO)[(__INTEGER)(i__JKKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__3QO)[(__INTEGER)(i__JKKH -  1)])))) {
+            i__JKKH=(__INTEGER)(i__JKKH -  1);
           };
-          result__IIJH=(i__JIJH ==  0);
+          result__IKKH=(i__JKKH ==  0);
         };
-        if ((! result__IIJH)) {
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            __tmp__OMTD=((__ITM_SLOT *)s__FSYD)->id_section__Y1C;
+        if ((! result__IKKH)) {
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            __tmp__WMTD=((__ITM_SLOT *)s__KSYD)->id_section__A2C;
           } else {
-            __tmp__OMTD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__WMTD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          Self__FU0G=((__SECTION_ *)__tmp__OMTD);
-          __tmp__TMTD=(! (((void *)Self__FU0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__FU0G->name__CZDC == (void *)(&__string_24))));
+          Self__WR1G=((__SECTION_ *)__tmp__WMTD);
+          __tmp__1MTD=(! (((void *)Self__WR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__WR1G->name__KZDC == (void *)(&__string_24))));
         } else {
-          __tmp__TMTD=FALSE__;
+          __tmp__1MTD=FALSE__;
         };
-        if (__tmp__TMTD) {
-          if (is_first__ESYD) {
-            put__to__like__1ZXD((&__string_186),output_code__SI,(&__string_142));
-            is_first__ESYD=FALSE__;
+        if (__tmp__1MTD) {
+          if (is_first__JSYD) {
+            put__to__like__D0XD((&__string_184),output_code__SI,(&__string_144));
+            is_first__JSYD=FALSE__;
           };
-          ((__STRING *)string_tmp2__BAJ)->count__WFC= 0;
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__AJ3F(s__FSYD,string_tmp2__BAJ);
+          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__DA4F(s__KSYD,string_tmp2__JAJ);
           } else {
-            pretty_name_in__VK3F(s__FSYD,string_tmp2__BAJ);
+            pretty_name_in__YB4F(s__KSYD,string_tmp2__JAJ);
           };
-          put__to__like__1ZXD(string_tmp2__BAJ,output_code__SI,(&__string_143));
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            __tmp__FTYD=((__ITM_SLOT *)s__FSYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          put__to__like__D0XD(string_tmp2__JAJ,output_code__SI,(&__string_145));
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            __tmp__KTYD=((__ITM_SLOT *)s__KSYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__FTYD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__KTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          copy__ZCS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__FTYD)) &  511)])->filename__UPG);
-          append__BOS(string_tmp__VH,(&__string_178));
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            __tmp__KTYD=((__ITM_SLOT *)s__FSYD)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          copy__BDS(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__KTYD)) &  511)])->filename__2PG);
+          append__JOS(string_tmp__VH,(&__string_180));
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            __tmp__PTYD=((__ITM_SLOT *)s__KSYD)->parent_named__V5.parent_itm_object__4.position__VDJ;
           } else {
-            __tmp__KTYD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+            __tmp__PTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
           };
-          append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__KTYD) >>  17),string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_145));
-          put__to__like__1ZXD((&__string_179),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            __tmp__TTYD=((__ITM_SLOT *)s__FSYD)->id_section__Y1C;
+          append_in__WIH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__PTYD) >>  17),string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_147));
+          put__to__like__D0XD((&__string_181),output_code__SI,(&__string_146));
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            __tmp__YTYD=((__ITM_SLOT *)s__KSYD)->id_section__A2C;
           } else {
-            __tmp__TTYD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.id_section__Y1C;
+            __tmp__YTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.id_section__A2C;
           };
-          append_in__MM3F(__tmp__TTYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_120));
-          put__to__like__1ZXD((&__string_180),output_code__SI,(&__string_144));
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            shorter_profile_in__ON3F(s__FSYD,output_code__SI);
+          append_in__PD4F(__tmp__YTYD,string_tmp__VH);
+          put__to__like__D0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__D0XD((&__string_182),output_code__SI,(&__string_146));
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__RE4F(s__KSYD,output_code__SI);
           } else {
-            shorter_profile_in__LO3F(s__FSYD,output_code__SI);
+            shorter_profile_in__OF4F(s__KSYD,output_code__SI);
           };
-          put__to__like__1ZXD((&__string_181),output_code__SI,(&__string_144));
-          ((__STRING *)string_tmp__VH)->count__WFC= 0;
-          if (((struct ___OBJ *)s__FSYD)->__id==__ITM_SLOT__) {
-            __tmp__3TYD=((__ITM_SLOT *)s__FSYD)->parent_named__P5.name__LI;
+          ((__STRING *)string_tmp__VH)->count__4FC= 0;
+          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
+            __tmp__AUYD=((__ITM_SLOT *)s__KSYD)->parent_named__V5.name__LI;
           } else {
-            __tmp__3TYD=((__ITM_SLOT_OPERATOR *)s__FSYD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__AUYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          get_all_comment_slot__in__302E(Self__WJTD,__tmp__3TYD,string_tmp__VH);
-          put__to__like__1ZXD(string_tmp__VH,output_code__SI,(&__string_128));
-          put__to__like__1ZXD((&__string_182),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_183),output_code__SI,(&__string_144));
-          put__to__like__1ZXD((&__string_184),output_code__SI,(&__string_144));
+          get_all_comment_slot__in__A12E(Self__4JTD,__tmp__AUYD,string_tmp__VH);
+          shorter_comment__in__light__V42E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__2G5D=(__INTEGER)(Self__2G5D +  1);
+        Self__ZE5D=(__INTEGER)(Self__ZE5D +  1);
       };
-      save_file__with__PDC(add_ext__EBF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
-      Self__C1QC=(__INTEGER)(Self__C1QC +  1);
+      save_file__with__XDC(add_ext__MBF(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
+      Self__K1QC=(__INTEGER)(Self__K1QC +  1);
     };
   };
   return( 0);
 }
 
-static __STRING* create__NBB(__INTEGER needed_capacity__PBB)
+static __STRING* create__TBB(__INTEGER needed_capacity__VBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __STRING *result__ISB,*Self__JBS;
-  __POINTER ptr__JSB,ptr_table__OIJH,next__NIJH,result__PIJH;
-  __POINTER ptr_table__VTH,next__0TH,result__YTH;
-  __INTEGER typ_id__PSB;
-  __UINTEGER_32 sz__MSB,a__QWFH,new_size__RWFH,t__VWFH,a__UWFH;
-  __UINTEGER_32 new_size__UTH,lab_type__WTH;
-  result__ISB=NULL;
-  ptr__JSB=((__POINTER )(NULL));
-  typ_id__PSB= 0;
-  sz__MSB=((__UINTEGER_32 )sizeof(__STRING));
-  if ((sz__MSB ==  0)) {
-    result__ISB=STRING__;
+  __STRING *result__QSB,*Self__RBS;
+  __POINTER ptr__RSB,ptr_table__OKKH,next__NKKH,result__PKKH;
+  __POINTER ptr_table__3TH,next__CUH,result__AUH;
+  __INTEGER typ_id__XSB;
+  __UINTEGER_32 sz__USB,a__AYGH,new_size__BYGH,t__FYGH,a__EYGH;
+  __UINTEGER_32 new_size__2TH,lab_type__4TH;
+  result__QSB=NULL;
+  ptr__RSB=((__POINTER )(NULL));
+  typ_id__XSB= 0;
+  sz__USB=((__UINTEGER_32 )sizeof(__STRING));
+  if ((sz__USB ==  0)) {
+    result__QSB=STRING__;
   } else {
-    typ_id__PSB=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MSB);
-    if ((typ_id__PSB == (__INTEGER)(-  1))) {
-      a__QWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__RWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MSB + a__QWFH) & (__UINTEGER_32)(~ a__QWFH));
-      ptr_table__OIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NIJH=((__POINTER )(NULL));
-      result__PIJH=((__POINTER *)ptr_table__OIJH)[ 0];
-      if ((result__PIJH == (void *)NULL)) {
-        result__PIJH=new_lab__MRJ(new_size__RWFH);
-        next__NIJH=(void *)((unsigned long)result__PIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWFH)));
-        ((__POINTER *)next__NIJH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OIJH)[ 0]=next__NIJH;
+    typ_id__XSB=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__USB);
+    if ((typ_id__XSB == (__INTEGER)(-  1))) {
+      a__AYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__USB + a__AYGH) & (__UINTEGER_32)(~ a__AYGH));
+      ptr_table__OKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BYGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NKKH=((__POINTER )(NULL));
+      result__PKKH=((__POINTER *)ptr_table__OKKH)[ 0];
+      if ((result__PKKH == (void *)NULL)) {
+        result__PKKH=new_lab__URJ(new_size__BYGH);
+        next__NKKH=(void *)((unsigned long)result__PKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BYGH)));
+        ((__POINTER *)next__NKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OKKH)[ 0]=next__NKKH;
       } else {
-        next__NIJH=((__POINTER *)result__PIJH)[ 0];
-        if ((next__NIJH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PIJH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RWFH <<  1)) <=  4096)) {
-            next__NIJH=(void *)((unsigned long)result__PIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWFH)));
+        next__NKKH=((__POINTER *)result__PKKH)[ 0];
+        if ((next__NKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PKKH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BYGH <<  1)) <=  4096)) {
+            next__NKKH=(void *)((unsigned long)result__PKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BYGH)));
           } else {
-            next__NIJH=new_lab__MRJ(new_size__RWFH);
+            next__NKKH=new_lab__URJ(new_size__BYGH);
           };
-          ((__POINTER *)next__NIJH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OIJH)[ 0]=next__NIJH;
+          ((__POINTER *)next__NKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OKKH)[ 0]=next__NKKH;
         } else {
-          ((__POINTER *)result__PIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PIJH=next__NIJH;
+          ((__POINTER *)result__PKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PKKH=next__NKKH;
         };
       };
-      ptr__JSB=result__PIJH;
+      ptr__RSB=result__PKKH;
     } else {
-      t__VWFH=((__UINTEGER_32 )typ_id__PSB);
-      a__UWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__UTH=(__UINTEGER_32)((__UINTEGER_32)(sz__MSB + a__UWFH) & (__UINTEGER_32)(~ a__UWFH));
-      ptr_table__VTH=((__POINTER )(&(table_type[(t__VWFH)])));
-      lab_type__WTH=(__UINTEGER_32)(t__VWFH |  1);
-      next__0TH=((__POINTER )(NULL));
-      result__YTH=((__POINTER *)ptr_table__VTH)[ 0];
-      if ((result__YTH == (void *)NULL)) {
-        result__YTH=new_lab__MRJ(lab_type__WTH);
-        next__0TH=(void *)((unsigned long)result__YTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTH)));
-        ((__POINTER *)next__0TH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__VTH)[ 0]=next__0TH;
+      t__FYGH=((__UINTEGER_32 )typ_id__XSB);
+      a__EYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2TH=(__UINTEGER_32)((__UINTEGER_32)(sz__USB + a__EYGH) & (__UINTEGER_32)(~ a__EYGH));
+      ptr_table__3TH=((__POINTER )(&(table_type[(t__FYGH)])));
+      lab_type__4TH=(__UINTEGER_32)(t__FYGH |  1);
+      next__CUH=((__POINTER )(NULL));
+      result__AUH=((__POINTER *)ptr_table__3TH)[ 0];
+      if ((result__AUH == (void *)NULL)) {
+        result__AUH=new_lab__URJ(lab_type__4TH);
+        next__CUH=(void *)((unsigned long)result__AUH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2TH)));
+        ((__POINTER *)next__CUH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3TH)[ 0]=next__CUH;
       } else {
-        next__0TH=((__POINTER *)result__YTH)[ 0];
-        if ((next__0TH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YTH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UTH <<  1)) <=  4096)) {
-            next__0TH=(void *)((unsigned long)result__YTH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTH)));
+        next__CUH=((__POINTER *)result__AUH)[ 0];
+        if ((next__CUH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AUH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2TH <<  1)) <=  4096)) {
+            next__CUH=(void *)((unsigned long)result__AUH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2TH)));
           } else {
-            next__0TH=new_lab__MRJ(lab_type__WTH);
+            next__CUH=new_lab__URJ(lab_type__4TH);
           };
-          ((__POINTER *)next__0TH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VTH)[ 0]=next__0TH;
+          ((__POINTER *)next__CUH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3TH)[ 0]=next__CUH;
         } else {
-          ((__POINTER *)result__YTH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YTH=next__0TH;
+          ((__POINTER *)result__AUH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CUH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AUH=next__CUH;
         };
       };
-      ptr__JSB=result__YTH;
+      ptr__RSB=result__AUH;
     };
-    result__ISB=((__STRING *)ptr__JSB);
-    *(result__ISB) = *(STRING__);
+    result__QSB=((__STRING *)ptr__RSB);
+    *(result__QSB) = *(STRING__);
   };
-  Self__JBS=((__STRING *)result__ISB);
-  if ((needed_capacity__PBB >  0)) {
-    if ((Self__JBS->capacity__YBS < needed_capacity__PBB)) {
-      Self__JBS->storage__BCS=create__BMEB(needed_capacity__PBB);
-      Self__JBS->capacity__YBS=needed_capacity__PBB;
+  Self__RBS=((__STRING *)result__QSB);
+  if ((needed_capacity__VBB >  0)) {
+    if ((Self__RBS->capacity__ACS < needed_capacity__VBB)) {
+      Self__RBS->storage__JCS=create__JMEB(needed_capacity__VBB);
+      Self__RBS->capacity__ACS=needed_capacity__VBB;
     };
   };
-  Self__JBS->count__WFC= 0;
-  return(result__ISB);
+  Self__RBS->count__4FC= 0;
+  return(result__QSB);
 }
 
-static __POINTER new_lab__MRJ(__UINTEGER_32 t__ORJ)
+static __POINTER new_lab__URJ(__UINTEGER_32 t__WRJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 idx__QRJ,pv__XRJ;
-  void *blc__TRJ,*prev__URJ,*prev__2UCH,*next__3UCH;
-  __MEMORY *Self__EU4G,*Self__1UCH;
-  __POINTER result__VRJ;
-  __BOOLEAN __tmp__XSJ;
-  idx__QRJ= 0;
-  blc__TRJ=NULL;
-  prev__URJ=NULL;
-  pv__XRJ= 0;
-  while_do__3CK:
+  __UINTEGER_32 idx__YRJ,pv__5RJ;
+  void *blc__1RJ,*prev__2RJ,*prev__SUDH,*next__TUDH;
+  __MEMORY *Self__PT5G,*Self__RUDH;
+  __POINTER result__3RJ;
+  __BOOLEAN __tmp__5SJ;
+  idx__YRJ= 0;
+  blc__1RJ=NULL;
+  prev__2RJ=NULL;
+  pv__5RJ= 0;
+  while_do__FDK:
   {
-    if ((idx__QRJ < nb_page__4RJ)) {
-      blc__TRJ=((void *)(last_block[(idx__QRJ)]));
-      __tmp__XSJ=(((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  1) ==  1));
+    if ((idx__YRJ < nb_page__GSJ)) {
+      blc__1RJ=((void *)(last_block[(idx__YRJ)]));
+      __tmp__5SJ=(((__UINTEGER_32)(((__MEMORY *)blc__1RJ)->map_size_and_id__QTB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__1RJ)->map_size_and_id__QTB &  1) ==  1));
     } else {
-      __tmp__XSJ=FALSE__;
+      __tmp__5SJ=FALSE__;
     };
-    if (__tmp__XSJ) {
-      idx__QRJ=(__UINTEGER_32)(idx__QRJ +  1);
-      goto while_do__3CK;
+    if (__tmp__5SJ) {
+      idx__YRJ=(__UINTEGER_32)(idx__YRJ +  1);
+      goto while_do__FDK;
     };
   };
-  if ((idx__QRJ >= nb_page__4RJ)) {
-    blc__TRJ=new_page__OA5();
+  if ((idx__YRJ >= nb_page__GSJ)) {
+    blc__1RJ=new_page__WA5();
   };
-  ((__MEMORY *)blc__TRJ)->map_size_and_id__ITB=(__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB -  4096);
-  Self__EU4G=((__MEMORY *)blc__TRJ);
-  result__VRJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__EU4G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__EU4G->map_size_and_id__ITB &  4294967292LU))))));
-  if (((__UINTEGER_32)(((__MEMORY *)blc__TRJ)->map_size_and_id__ITB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    Self__1UCH=((__MEMORY *)blc__TRJ);
-    prev__2UCH=Self__1UCH->map_previous_free__KTB;
-    next__3UCH=Self__1UCH->map_next_free__JTB;
-    if (((void *)prev__2UCH == (void *)NULL)) {
-      first_free__XDVB=next__3UCH;
+  ((__MEMORY *)blc__1RJ)->map_size_and_id__QTB=(__UINTEGER_32)(((__MEMORY *)blc__1RJ)->map_size_and_id__QTB -  4096);
+  Self__PT5G=((__MEMORY *)blc__1RJ);
+  result__3RJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__PT5G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__PT5G->map_size_and_id__QTB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__1RJ)->map_size_and_id__QTB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__RUDH=((__MEMORY *)blc__1RJ);
+    prev__SUDH=Self__RUDH->map_previous_free__STB;
+    next__TUDH=Self__RUDH->map_next_free__RTB;
+    if (((void *)prev__SUDH == (void *)NULL)) {
+      first_free__5DVB=next__TUDH;
     } else {
-      ((__MEMORY *)prev__2UCH)->map_next_free__JTB=next__3UCH;
+      ((__MEMORY *)prev__SUDH)->map_next_free__RTB=next__TUDH;
     };
-    if (((void *)next__3UCH != (void *)NULL)) {
-      ((__MEMORY *)next__3UCH)->map_previous_free__KTB=prev__2UCH;
+    if (((void *)next__TUDH != (void *)NULL)) {
+      ((__MEMORY *)next__TUDH)->map_previous_free__STB=prev__SUDH;
     };
-    pv__XRJ=((__MEMORY *)blc__TRJ)->map_previous_linear__HTB;
-    if ((pv__XRJ !=  4294967295LU)) {
-      prev__URJ=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__XRJ))));
-      ((__MEMORY *)prev__URJ)->map_size_and_id__ITB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__URJ)->map_size_and_id__ITB + ((__MEMORY *)blc__TRJ)->map_size_and_id__ITB) +  8);
-      last_block[(idx__QRJ)] = (prev__URJ);
+    pv__5RJ=((__MEMORY *)blc__1RJ)->map_previous_linear__PTB;
+    if ((pv__5RJ !=  4294967295LU)) {
+      prev__2RJ=((void *)(void *)((unsigned long)begin_memory__XVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__5RJ))));
+      ((__MEMORY *)prev__2RJ)->map_size_and_id__QTB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__2RJ)->map_size_and_id__QTB + ((__MEMORY *)blc__1RJ)->map_size_and_id__QTB) +  8);
+      last_block[(idx__YRJ)] = (prev__2RJ);
     };
   };
-  ((__POINTER *)result__VRJ)[ 0]=((__POINTER )t__ORJ);
-  return((void *)((unsigned long)result__VRJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
+  ((__POINTER *)result__3RJ)[ 0]=((__POINTER )t__WRJ);
+  return((void *)((unsigned long)result__3RJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__ZFRB(__INTEGER nb_elements__1FRB)
+static void** create__BGRB(__INTEGER nb_elements__DGRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__CNCH,a__YFEH,new_size__DNCH,new_size2__ENCH,a__2FEH;
-  __UINTEGER_32 new_size__3FEH;
-  __POINTER result__BNCH,ptr_table__1LHH,next__0LHH,result__2LHH;
-  void *result__5LHH;
-  __INTEGER Self__LANC;
-  void **Result__BEUB;
-  sz__CNCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__1FRB * ((__INTEGER )(sizeof(void *)))));
-  result__BNCH=((__POINTER )(NULL));
-  a__YFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__DNCH=(__UINTEGER_32)((__UINTEGER_32)(sz__CNCH + a__YFEH) & (__UINTEGER_32)(~ a__YFEH));
-  new_size2__ENCH=(__UINTEGER_32)(new_size__DNCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__ENCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__2FEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__3FEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ENCH + a__2FEH) & (__UINTEGER_32)(~ a__2FEH));
-    ptr_table__1LHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3FEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__0LHH=((__POINTER )(NULL));
-    result__2LHH=((__POINTER *)ptr_table__1LHH)[ 0];
-    if ((result__2LHH == (void *)NULL)) {
-      result__2LHH=new_lab__MRJ(new_size__3FEH);
-      next__0LHH=(void *)((unsigned long)result__2LHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FEH)));
-      ((__POINTER *)next__0LHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__1LHH)[ 0]=next__0LHH;
-    } else {
-      next__0LHH=((__POINTER *)result__2LHH)[ 0];
-      if ((next__0LHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2LHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3FEH <<  1)) <=  4096)) {
-          next__0LHH=(void *)((unsigned long)result__2LHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FEH)));
-        } else {
-          next__0LHH=new_lab__MRJ(new_size__3FEH);
-        };
-        ((__POINTER *)next__0LHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1LHH)[ 0]=next__0LHH;
-      } else {
-        ((__POINTER *)result__2LHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0LHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__2LHH=next__0LHH;
-      };
-    };
-    ((__POINTER *)result__2LHH)[ 0]=((__POINTER ) 3);
-    result__BNCH=(void *)((unsigned long)result__2LHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__4MDH,a__IHFH,new_size__5MDH,new_size2__ANDH,a__MHFH;
+  __UINTEGER_32 new_size__NHFH;
+  __POINTER result__3MDH,ptr_table__1NIH,next__0NIH,result__2NIH;
+  void *result__5NIH;
+  __INTEGER Self__TANC;
+  void **Result__JEUB;
+  sz__4MDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DGRB * ((__INTEGER )(sizeof(void *)))));
+  result__3MDH=((__POINTER )(NULL));
+  a__IHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__5MDH=(__UINTEGER_32)((__UINTEGER_32)(sz__4MDH + a__IHFH) & (__UINTEGER_32)(~ a__IHFH));
+  new_size2__ANDH=(__UINTEGER_32)(new_size__5MDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ANDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NHFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ANDH + a__MHFH) & (__UINTEGER_32)(~ a__MHFH));
+    ptr_table__1NIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__0NIH=((__POINTER )(NULL));
+    result__2NIH=((__POINTER *)ptr_table__1NIH)[ 0];
+    if ((result__2NIH == (void *)NULL)) {
+      result__2NIH=new_lab__URJ(new_size__NHFH);
+      next__0NIH=(void *)((unsigned long)result__2NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHFH)));
+      ((__POINTER *)next__0NIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__1NIH)[ 0]=next__0NIH;
+    } else {
+      next__0NIH=((__POINTER *)result__2NIH)[ 0];
+      if ((next__0NIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2NIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__NHFH <<  1)) <=  4096)) {
+          next__0NIH=(void *)((unsigned long)result__2NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHFH)));
+        } else {
+          next__0NIH=new_lab__URJ(new_size__NHFH);
+        };
+        ((__POINTER *)next__0NIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1NIH)[ 0]=next__0NIH;
+      } else {
+        ((__POINTER *)result__2NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0NIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__2NIH=next__0NIH;
+      };
+    };
+    ((__POINTER *)result__2NIH)[ 0]=((__POINTER ) 3);
+    result__3MDH=(void *)((unsigned long)result__2NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__5LHH=first_free__XDVB;
-    while ((((void *)result__5LHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5LHH)->map_size_and_id__ITB &  4294967292LU) < new_size__DNCH))) {
-      result__5LHH=((__MEMORY *)result__5LHH)->map_next_free__JTB;
+    result__5NIH=first_free__5DVB;
+    while ((((void *)result__5NIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5NIH)->map_size_and_id__QTB &  4294967292LU) < new_size__5MDH))) {
+      result__5NIH=((__MEMORY *)result__5NIH)->map_next_free__RTB;
     };
-    if (((void *)result__5LHH == (void *)NULL)) {
-      result__5LHH=new_page__OA5();
+    if (((void *)result__5NIH == (void *)NULL)) {
+      result__5NIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__5LHH,new_size__DNCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5LHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__BNCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5LHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__5NIH,new_size__5MDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5NIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__3MDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5NIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__BEUB=((void **)result__BNCH);
-  Self__LANC=(__INTEGER)(nb_elements__1FRB -  1);
-  while ((Self__LANC >=  0)) {
-    Result__BEUB[Self__LANC]=NULL;
-    Self__LANC=(__INTEGER)(Self__LANC -  1);
+  Result__JEUB=((void **)result__3MDH);
+  Self__TANC=(__INTEGER)(nb_elements__DGRB -  1);
+  while ((Self__TANC >=  0)) {
+    Result__JEUB[Self__TANC]=NULL;
+    Self__TANC=(__INTEGER)(Self__TANC -  1);
   };
-  return(Result__BEUB);
+  return(Result__JEUB);
 }
 
-static void add_last__ZLT(__STRING *Self__0LT,__CHARACTER ch__1LT)
+static void add_last__BMT(__STRING *Self__CMT,__CHARACTER ch__DMT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__2LT,old_nb_elts__KQDH,upper__ZWFH,Self__XWFH;
-  __CHARACTER *Self__JQDH,*new__MQDH;
-  new_capacity__2LT= 0;
-  if ((Self__0LT->capacity__YBS <= Self__0LT->count__WFC)) {
-    if ((Self__0LT->capacity__YBS ==  0)) {
-      Self__0LT->capacity__YBS= 32;
-      Self__0LT->storage__BCS=create__BMEB( 32);
-    } else {
-      new_capacity__2LT=(__INTEGER)(Self__0LT->capacity__YBS <<  1);
-      Self__JQDH=((__CHARACTER *)Self__0LT->storage__BCS);
-      old_nb_elts__KQDH=Self__0LT->capacity__YBS;
-      new__MQDH=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__JQDH),((__UINTEGER_32 )old_nb_elts__KQDH),((__UINTEGER_32 )new_capacity__2LT)));
-      upper__ZWFH=(__INTEGER)(new_capacity__2LT -  1);
-      Self__XWFH=old_nb_elts__KQDH;
-      while ((Self__XWFH <= upper__ZWFH)) {
-        new__MQDH[Self__XWFH]='\0';
-        Self__XWFH=(__INTEGER)(Self__XWFH +  1);
-      };
-      Self__0LT->storage__BCS=new__MQDH;
-      Self__0LT->capacity__YBS=new_capacity__2LT;
-    };
-  };
-  ((__CHARACTER *)Self__0LT->storage__BCS)[Self__0LT->count__WFC]=ch__1LT;
-  Self__0LT->count__WFC=(__INTEGER)(Self__0LT->count__WFC +  1);
+  __INTEGER new_capacity__EMT,old_nb_elts__CREH,upper__JYGH,Self__HYGH;
+  __CHARACTER *Self__BREH,*new__EREH;
+  new_capacity__EMT= 0;
+  if ((Self__CMT->capacity__ACS <= Self__CMT->count__4FC)) {
+    if ((Self__CMT->capacity__ACS ==  0)) {
+      Self__CMT->capacity__ACS= 32;
+      Self__CMT->storage__JCS=create__JMEB( 32);
+    } else {
+      new_capacity__EMT=(__INTEGER)(Self__CMT->capacity__ACS <<  1);
+      Self__BREH=((__CHARACTER *)Self__CMT->storage__JCS);
+      old_nb_elts__CREH=Self__CMT->capacity__ACS;
+      new__EREH=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )Self__BREH),((__UINTEGER_32 )old_nb_elts__CREH),((__UINTEGER_32 )new_capacity__EMT)));
+      upper__JYGH=(__INTEGER)(new_capacity__EMT -  1);
+      Self__HYGH=old_nb_elts__CREH;
+      while ((Self__HYGH <= upper__JYGH)) {
+        new__EREH[Self__HYGH]='\0';
+        Self__HYGH=(__INTEGER)(Self__HYGH +  1);
+      };
+      Self__CMT->storage__JCS=new__EREH;
+      Self__CMT->capacity__ACS=new_capacity__EMT;
+    };
+  };
+  ((__CHARACTER *)Self__CMT->storage__JCS)[Self__CMT->count__4FC]=ch__DMT;
+  Self__CMT->count__4FC=(__INTEGER)(Self__CMT->count__4FC +  1);
 }
 
-static void add_last__ASV(__FAST_ARRAYoSTRINGo *Self__BSV,void *element__CSV)
+static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__DSV,__tmp__HTV,__tmp__NIEC,Self__LLVD;
-  __BOOLEAN __tmp__RSV;
-  void **__tmp__GTV,**new__ZHEC;
-  new_capacity__DSV= 0;
-  if (((__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1) <= (__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.capacity__MGT -  1))) {
-    Self__BSV->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1);
-    __tmp__RSV=TRUE__;
+  __INTEGER new_capacity__LSV,__tmp__PTV,__tmp__VIEC,Self__TLVD;
+  __BOOLEAN __tmp__ZSV;
+  void **__tmp__OTV,**new__BIEC;
+  new_capacity__LSV= 0;
+  if (((__INTEGER)(Self__JSV->parent_arrayed_collection__LKC.upper__OKC +  1) <= (__INTEGER)(Self__JSV->parent_arrayed_collection__LKC.capacity__UGT -  1))) {
+    Self__JSV->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(Self__JSV->parent_arrayed_collection__LKC.upper__OKC +  1);
+    __tmp__ZSV=TRUE__;
   } else {
-    __tmp__RSV=FALSE__;
-  };
-  if ((! __tmp__RSV)) {
-    if ((Self__BSV->parent_arrayed_collection__DKC.capacity__MGT ==  0)) {
-      Self__BSV->parent_arrayed_collection__DKC.storage__XGT=create__ZFRB( 2);
-      Self__BSV->parent_arrayed_collection__DKC.capacity__MGT= 2;
-      Self__BSV->parent_arrayed_collection__DKC.upper__GKC= 0;
-    } else {
-      new_capacity__DSV=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.capacity__MGT <<  1);
-      __tmp__GTV=Self__BSV->parent_arrayed_collection__DKC.storage__XGT;
-      __tmp__HTV=Self__BSV->parent_arrayed_collection__DKC.capacity__MGT;
-      new__ZHEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__GTV)),((__UINTEGER_32 )(__INTEGER)(__tmp__HTV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DSV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__NIEC=(__INTEGER)(new_capacity__DSV -  1);
-      Self__LLVD=__tmp__HTV;
-      while ((Self__LLVD <= __tmp__NIEC)) {
-        new__ZHEC[Self__LLVD]=NULL;
-        Self__LLVD=(__INTEGER)(Self__LLVD +  1);
-      };
-      Self__BSV->parent_arrayed_collection__DKC.storage__XGT=new__ZHEC;
-      Self__BSV->parent_arrayed_collection__DKC.capacity__MGT=new_capacity__DSV;
-      Self__BSV->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__BSV->parent_arrayed_collection__DKC.upper__GKC +  1);
-    };
-  };
-  ((void **)Self__BSV->parent_arrayed_collection__DKC.storage__XGT)[Self__BSV->parent_arrayed_collection__DKC.upper__GKC]=element__CSV;
+    __tmp__ZSV=FALSE__;
+  };
+  if ((! __tmp__ZSV)) {
+    if ((Self__JSV->parent_arrayed_collection__LKC.capacity__UGT ==  0)) {
+      Self__JSV->parent_arrayed_collection__LKC.storage__5GT=create__BGRB( 2);
+      Self__JSV->parent_arrayed_collection__LKC.capacity__UGT= 2;
+      Self__JSV->parent_arrayed_collection__LKC.upper__OKC= 0;
+    } else {
+      new_capacity__LSV=(__INTEGER)(Self__JSV->parent_arrayed_collection__LKC.capacity__UGT <<  1);
+      __tmp__OTV=Self__JSV->parent_arrayed_collection__LKC.storage__5GT;
+      __tmp__PTV=Self__JSV->parent_arrayed_collection__LKC.capacity__UGT;
+      new__BIEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__OTV)),((__UINTEGER_32 )(__INTEGER)(__tmp__PTV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__LSV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__VIEC=(__INTEGER)(new_capacity__LSV -  1);
+      Self__TLVD=__tmp__PTV;
+      while ((Self__TLVD <= __tmp__VIEC)) {
+        new__BIEC[Self__TLVD]=NULL;
+        Self__TLVD=(__INTEGER)(Self__TLVD +  1);
+      };
+      Self__JSV->parent_arrayed_collection__LKC.storage__5GT=new__BIEC;
+      Self__JSV->parent_arrayed_collection__LKC.capacity__UGT=new_capacity__LSV;
+      Self__JSV->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(Self__JSV->parent_arrayed_collection__LKC.upper__OKC +  1);
+    };
+  };
+  ((void **)Self__JSV->parent_arrayed_collection__LKC.storage__5GT)[Self__JSV->parent_arrayed_collection__LKC.upper__OKC]=element__KSV;
 }
 
-static __INTEGER prime_number_ceiling__X41(__INTEGER integer__Z41)
+static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__141;
-  __BOOLEAN __tmp__D51,__tmp__Q51,result__2QCB,__tmp__351,result__ORCB;
-  __BOOLEAN __tmp__KA2,result__ASCB,__tmp__XA2,result__SSCB,__tmp__EB2;
-  __BOOLEAN result__ETCB,__tmp__RB2,result__WTCB,__tmp__4B2;
-  __BOOLEAN result__IUCB,__tmp__LC2,result__0UCB,__tmp__YC2;
-  __BOOLEAN result__MVCB,__tmp__FD2,result__4VCB,__tmp__SD2;
-  __BOOLEAN result__QWCB,__tmp__5D2,result__CXCB,__tmp__ME2;
-  __BOOLEAN result__UXCB,__tmp__ZE2,result__GYCB,__tmp__GF2;
-  __BOOLEAN result__YYCB,__tmp__TF2,result__KZCB,__tmp__AG2;
-  __BOOLEAN result__2ZCB,__tmp__NG2,result__O0CB,__tmp__0G2;
-  __BOOLEAN result__A1CB,__tmp__HH2,result__S1CB,__tmp__UH2;
-  __BOOLEAN result__E2CB,__tmp__BI2,result__W2CB,__tmp__OI2;
-  __BOOLEAN result__I3CB,__tmp__1I2,result__03CB,__tmp__IJ2;
-  __BOOLEAN result__M4CB;
-  result__141= 0;
-  if ((integer__Z41 <=  11)) {
-    result__141= 11;
-    __tmp__D51=TRUE__;
+  __INTEGER result__D51;
+  __BOOLEAN __tmp__L51,__tmp__Y51,result__ERCB,__tmp__FA2,result__WRCB;
+  __BOOLEAN __tmp__SA2,result__ISCB,__tmp__5A2,result__0SCB,__tmp__MB2;
+  __BOOLEAN result__MTCB,__tmp__ZB2,result__4TCB,__tmp__GC2;
+  __BOOLEAN result__QUCB,__tmp__TC2,result__CVCB,__tmp__AD2;
+  __BOOLEAN result__UVCB,__tmp__ND2,result__GWCB,__tmp__0D2;
+  __BOOLEAN result__YWCB,__tmp__HE2,result__KXCB,__tmp__UE2;
+  __BOOLEAN result__2XCB,__tmp__BF2,result__OYCB,__tmp__OF2;
+  __BOOLEAN result__AZCB,__tmp__1F2,result__SZCB,__tmp__IG2;
+  __BOOLEAN result__E0CB,__tmp__VG2,result__W0CB,__tmp__CH2;
+  __BOOLEAN result__I1CB,__tmp__PH2,result__01CB,__tmp__2H2;
+  __BOOLEAN result__M2CB,__tmp__JI2,result__42CB,__tmp__WI2;
+  __BOOLEAN result__Q3CB,__tmp__DJ2,result__C4CB,__tmp__QJ2;
+  __BOOLEAN result__U4CB;
+  result__D51= 0;
+  if ((integer__B51 <=  11)) {
+    result__D51= 11;
+    __tmp__L51=TRUE__;
   } else {
-    __tmp__D51=FALSE__;
+    __tmp__L51=FALSE__;
   };
-  if (__tmp__D51) {
-    __tmp__Q51=TRUE__;
+  if (__tmp__L51) {
+    __tmp__Y51=TRUE__;
   } else {
-    result__2QCB=(integer__Z41 <=  23);
-    if (result__2QCB) {
-      result__141= 23;
+    result__ERCB=(integer__B51 <=  23);
+    if (result__ERCB) {
+      result__D51= 23;
     };
-    __tmp__Q51=result__2QCB;
+    __tmp__Y51=result__ERCB;
   };
-  if (__tmp__Q51) {
-    __tmp__351=TRUE__;
+  if (__tmp__Y51) {
+    __tmp__FA2=TRUE__;
   } else {
-    result__ORCB=(integer__Z41 <=  53);
-    if (result__ORCB) {
-      result__141= 53;
+    result__WRCB=(integer__B51 <=  53);
+    if (result__WRCB) {
+      result__D51= 53;
     };
-    __tmp__351=result__ORCB;
+    __tmp__FA2=result__WRCB;
   };
-  if (__tmp__351) {
-    __tmp__KA2=TRUE__;
+  if (__tmp__FA2) {
+    __tmp__SA2=TRUE__;
   } else {
-    result__ASCB=(integer__Z41 <=  97);
-    if (result__ASCB) {
-      result__141= 97;
+    result__ISCB=(integer__B51 <=  97);
+    if (result__ISCB) {
+      result__D51= 97;
     };
-    __tmp__KA2=result__ASCB;
+    __tmp__SA2=result__ISCB;
   };
-  if (__tmp__KA2) {
-    __tmp__XA2=TRUE__;
+  if (__tmp__SA2) {
+    __tmp__5A2=TRUE__;
   } else {
-    result__SSCB=(integer__Z41 <=  193);
-    if (result__SSCB) {
-      result__141= 193;
+    result__0SCB=(integer__B51 <=  193);
+    if (result__0SCB) {
+      result__D51= 193;
     };
-    __tmp__XA2=result__SSCB;
+    __tmp__5A2=result__0SCB;
   };
-  if (__tmp__XA2) {
-    __tmp__EB2=TRUE__;
+  if (__tmp__5A2) {
+    __tmp__MB2=TRUE__;
   } else {
-    result__ETCB=(integer__Z41 <=  389);
-    if (result__ETCB) {
-      result__141= 389;
+    result__MTCB=(integer__B51 <=  389);
+    if (result__MTCB) {
+      result__D51= 389;
     };
-    __tmp__EB2=result__ETCB;
+    __tmp__MB2=result__MTCB;
   };
-  if (__tmp__EB2) {
-    __tmp__RB2=TRUE__;
+  if (__tmp__MB2) {
+    __tmp__ZB2=TRUE__;
   } else {
-    result__WTCB=(integer__Z41 <=  769);
-    if (result__WTCB) {
-      result__141= 769;
+    result__4TCB=(integer__B51 <=  769);
+    if (result__4TCB) {
+      result__D51= 769;
     };
-    __tmp__RB2=result__WTCB;
+    __tmp__ZB2=result__4TCB;
   };
-  if (__tmp__RB2) {
-    __tmp__4B2=TRUE__;
+  if (__tmp__ZB2) {
+    __tmp__GC2=TRUE__;
   } else {
-    result__IUCB=(integer__Z41 <=  1543);
-    if (result__IUCB) {
-      result__141= 1543;
+    result__QUCB=(integer__B51 <=  1543);
+    if (result__QUCB) {
+      result__D51= 1543;
     };
-    __tmp__4B2=result__IUCB;
+    __tmp__GC2=result__QUCB;
   };
-  if (__tmp__4B2) {
-    __tmp__LC2=TRUE__;
+  if (__tmp__GC2) {
+    __tmp__TC2=TRUE__;
   } else {
-    result__0UCB=(integer__Z41 <=  3079);
-    if (result__0UCB) {
-      result__141= 3079;
+    result__CVCB=(integer__B51 <=  3079);
+    if (result__CVCB) {
+      result__D51= 3079;
     };
-    __tmp__LC2=result__0UCB;
+    __tmp__TC2=result__CVCB;
   };
-  if (__tmp__LC2) {
-    __tmp__YC2=TRUE__;
+  if (__tmp__TC2) {
+    __tmp__AD2=TRUE__;
   } else {
-    result__MVCB=(integer__Z41 <=  6151);
-    if (result__MVCB) {
-      result__141= 6151;
+    result__UVCB=(integer__B51 <=  6151);
+    if (result__UVCB) {
+      result__D51= 6151;
     };
-    __tmp__YC2=result__MVCB;
+    __tmp__AD2=result__UVCB;
   };
-  if (__tmp__YC2) {
-    __tmp__FD2=TRUE__;
+  if (__tmp__AD2) {
+    __tmp__ND2=TRUE__;
   } else {
-    result__4VCB=(integer__Z41 <=  12289);
-    if (result__4VCB) {
-      result__141= 12289;
+    result__GWCB=(integer__B51 <=  12289);
+    if (result__GWCB) {
+      result__D51= 12289;
     };
-    __tmp__FD2=result__4VCB;
+    __tmp__ND2=result__GWCB;
   };
-  if (__tmp__FD2) {
-    __tmp__SD2=TRUE__;
+  if (__tmp__ND2) {
+    __tmp__0D2=TRUE__;
   } else {
-    result__QWCB=(integer__Z41 <=  24593);
-    if (result__QWCB) {
-      result__141= 24593;
+    result__YWCB=(integer__B51 <=  24593);
+    if (result__YWCB) {
+      result__D51= 24593;
     };
-    __tmp__SD2=result__QWCB;
+    __tmp__0D2=result__YWCB;
   };
-  if (__tmp__SD2) {
-    __tmp__5D2=TRUE__;
+  if (__tmp__0D2) {
+    __tmp__HE2=TRUE__;
   } else {
-    result__CXCB=(integer__Z41 <=  49157);
-    if (result__CXCB) {
-      result__141= 49157;
+    result__KXCB=(integer__B51 <=  49157);
+    if (result__KXCB) {
+      result__D51= 49157;
     };
-    __tmp__5D2=result__CXCB;
+    __tmp__HE2=result__KXCB;
   };
-  if (__tmp__5D2) {
-    __tmp__ME2=TRUE__;
+  if (__tmp__HE2) {
+    __tmp__UE2=TRUE__;
   } else {
-    result__UXCB=(integer__Z41 <=  98317);
-    if (result__UXCB) {
-      result__141= 98317;
+    result__2XCB=(integer__B51 <=  98317);
+    if (result__2XCB) {
+      result__D51= 98317;
     };
-    __tmp__ME2=result__UXCB;
+    __tmp__UE2=result__2XCB;
   };
-  if (__tmp__ME2) {
-    __tmp__ZE2=TRUE__;
+  if (__tmp__UE2) {
+    __tmp__BF2=TRUE__;
   } else {
-    result__GYCB=(integer__Z41 <=  196613);
-    if (result__GYCB) {
-      result__141= 196613;
+    result__OYCB=(integer__B51 <=  196613);
+    if (result__OYCB) {
+      result__D51= 196613;
     };
-    __tmp__ZE2=result__GYCB;
+    __tmp__BF2=result__OYCB;
   };
-  if (__tmp__ZE2) {
-    __tmp__GF2=TRUE__;
+  if (__tmp__BF2) {
+    __tmp__OF2=TRUE__;
   } else {
-    result__YYCB=(integer__Z41 <=  393241);
-    if (result__YYCB) {
-      result__141= 393241;
+    result__AZCB=(integer__B51 <=  393241);
+    if (result__AZCB) {
+      result__D51= 393241;
     };
-    __tmp__GF2=result__YYCB;
+    __tmp__OF2=result__AZCB;
   };
-  if (__tmp__GF2) {
-    __tmp__TF2=TRUE__;
+  if (__tmp__OF2) {
+    __tmp__1F2=TRUE__;
   } else {
-    result__KZCB=(integer__Z41 <=  786433);
-    if (result__KZCB) {
-      result__141= 786433;
+    result__SZCB=(integer__B51 <=  786433);
+    if (result__SZCB) {
+      result__D51= 786433;
     };
-    __tmp__TF2=result__KZCB;
+    __tmp__1F2=result__SZCB;
   };
-  if (__tmp__TF2) {
-    __tmp__AG2=TRUE__;
+  if (__tmp__1F2) {
+    __tmp__IG2=TRUE__;
   } else {
-    result__2ZCB=(integer__Z41 <=  1572869);
-    if (result__2ZCB) {
-      result__141= 1572869;
+    result__E0CB=(integer__B51 <=  1572869);
+    if (result__E0CB) {
+      result__D51= 1572869;
     };
-    __tmp__AG2=result__2ZCB;
+    __tmp__IG2=result__E0CB;
   };
-  if (__tmp__AG2) {
-    __tmp__NG2=TRUE__;
+  if (__tmp__IG2) {
+    __tmp__VG2=TRUE__;
   } else {
-    result__O0CB=(integer__Z41 <=  3145739);
-    if (result__O0CB) {
-      result__141= 3145739;
+    result__W0CB=(integer__B51 <=  3145739);
+    if (result__W0CB) {
+      result__D51= 3145739;
     };
-    __tmp__NG2=result__O0CB;
+    __tmp__VG2=result__W0CB;
   };
-  if (__tmp__NG2) {
-    __tmp__0G2=TRUE__;
+  if (__tmp__VG2) {
+    __tmp__CH2=TRUE__;
   } else {
-    result__A1CB=(integer__Z41 <=  6291469);
-    if (result__A1CB) {
-      result__141= 6291469;
+    result__I1CB=(integer__B51 <=  6291469);
+    if (result__I1CB) {
+      result__D51= 6291469;
     };
-    __tmp__0G2=result__A1CB;
+    __tmp__CH2=result__I1CB;
   };
-  if (__tmp__0G2) {
-    __tmp__HH2=TRUE__;
+  if (__tmp__CH2) {
+    __tmp__PH2=TRUE__;
   } else {
-    result__S1CB=(integer__Z41 <=  12582917);
-    if (result__S1CB) {
-      result__141= 12582917;
+    result__01CB=(integer__B51 <=  12582917);
+    if (result__01CB) {
+      result__D51= 12582917;
     };
-    __tmp__HH2=result__S1CB;
+    __tmp__PH2=result__01CB;
   };
-  if (__tmp__HH2) {
-    __tmp__UH2=TRUE__;
+  if (__tmp__PH2) {
+    __tmp__2H2=TRUE__;
   } else {
-    result__E2CB=(integer__Z41 <=  25165843);
-    if (result__E2CB) {
-      result__141= 25165843;
+    result__M2CB=(integer__B51 <=  25165843);
+    if (result__M2CB) {
+      result__D51= 25165843;
     };
-    __tmp__UH2=result__E2CB;
+    __tmp__2H2=result__M2CB;
   };
-  if (__tmp__UH2) {
-    __tmp__BI2=TRUE__;
+  if (__tmp__2H2) {
+    __tmp__JI2=TRUE__;
   } else {
-    result__W2CB=(integer__Z41 <=  50331653);
-    if (result__W2CB) {
-      result__141= 50331653;
+    result__42CB=(integer__B51 <=  50331653);
+    if (result__42CB) {
+      result__D51= 50331653;
     };
-    __tmp__BI2=result__W2CB;
+    __tmp__JI2=result__42CB;
   };
-  if (__tmp__BI2) {
-    __tmp__OI2=TRUE__;
+  if (__tmp__JI2) {
+    __tmp__WI2=TRUE__;
   } else {
-    result__I3CB=(integer__Z41 <=  100663319);
-    if (result__I3CB) {
-      result__141= 100663319;
+    result__Q3CB=(integer__B51 <=  100663319);
+    if (result__Q3CB) {
+      result__D51= 100663319;
     };
-    __tmp__OI2=result__I3CB;
+    __tmp__WI2=result__Q3CB;
   };
-  if (__tmp__OI2) {
-    __tmp__1I2=TRUE__;
+  if (__tmp__WI2) {
+    __tmp__DJ2=TRUE__;
   } else {
-    result__03CB=(integer__Z41 <=  201326611);
-    if (result__03CB) {
-      result__141= 201326611;
+    result__C4CB=(integer__B51 <=  201326611);
+    if (result__C4CB) {
+      result__D51= 201326611;
     };
-    __tmp__1I2=result__03CB;
+    __tmp__DJ2=result__C4CB;
   };
-  if (__tmp__1I2) {
-    __tmp__IJ2=TRUE__;
+  if (__tmp__DJ2) {
+    __tmp__QJ2=TRUE__;
   } else {
-    result__M4CB=(integer__Z41 <=  402653189);
-    if (result__M4CB) {
-      result__141= 402653189;
+    result__U4CB=(integer__B51 <=  402653189);
+    if (result__U4CB) {
+      result__D51= 402653189;
     };
-    __tmp__IJ2=result__M4CB;
+    __tmp__QJ2=result__U4CB;
   };
-  if ((! __tmp__IJ2)) {
-    if ((integer__Z41 <=  805306457)) {
-      result__141= 805306457;
+  if ((! __tmp__QJ2)) {
+    if ((integer__B51 <=  805306457)) {
+      result__D51= 805306457;
     } else {
-      result__141= 1610612741;
+      result__D51= 1610612741;
     };
   };
-  return(result__141);
+  return(result__D51);
 }
 
-static void** create__XB4(__INTEGER nb_elements__ZB4)
+static void** create__5B4(__INTEGER nb_elements__BC4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YQDH,a__3QDH,new_size__ZQDH,new_size2__0QDH,a__BRDH;
-  __UINTEGER_32 new_size__CRDH;
-  __POINTER result__XQDH,ptr_table__O0GH,next__N0GH,result__P0GH;
-  void *result__SIJH;
-  __INTEGER Self__J1JC;
-  void **Result__OZEB;
-  sz__YQDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZB4 * ((__INTEGER )(sizeof(void *)))));
-  result__XQDH=((__POINTER )(NULL));
-  a__3QDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZQDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YQDH + a__3QDH) & (__UINTEGER_32)(~ a__3QDH));
-  new_size2__0QDH=(__UINTEGER_32)(new_size__ZQDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0QDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CRDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0QDH + a__BRDH) & (__UINTEGER_32)(~ a__BRDH));
-    ptr_table__O0GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CRDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__N0GH=((__POINTER )(NULL));
-    result__P0GH=((__POINTER *)ptr_table__O0GH)[ 0];
-    if ((result__P0GH == (void *)NULL)) {
-      result__P0GH=new_lab__MRJ(new_size__CRDH);
-      next__N0GH=(void *)((unsigned long)result__P0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRDH)));
-      ((__POINTER *)next__N0GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__O0GH)[ 0]=next__N0GH;
-    } else {
-      next__N0GH=((__POINTER *)result__P0GH)[ 0];
-      if ((next__N0GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CRDH <<  1)) <=  4096)) {
-          next__N0GH=(void *)((unsigned long)result__P0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRDH)));
-        } else {
-          next__N0GH=new_lab__MRJ(new_size__CRDH);
-        };
-        ((__POINTER *)next__N0GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__O0GH)[ 0]=next__N0GH;
-      } else {
-        ((__POINTER *)result__P0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__P0GH=next__N0GH;
-      };
-    };
-    ((__POINTER *)result__P0GH)[ 0]=((__POINTER ) 3);
-    result__XQDH=(void *)((unsigned long)result__P0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QREH,a__VREH,new_size__RREH,new_size2__SREH,a__ZREH;
+  __UINTEGER_32 new_size__0REH;
+  __POINTER result__PREH,ptr_table__J2HH,next__I2HH,result__K2HH;
+  void *result__SKKH;
+  __INTEGER Self__R1JC;
+  void **Result__WZEB;
+  sz__QREH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BC4 * ((__INTEGER )(sizeof(void *)))));
+  result__PREH=((__POINTER )(NULL));
+  a__VREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RREH=(__UINTEGER_32)((__UINTEGER_32)(sz__QREH + a__VREH) & (__UINTEGER_32)(~ a__VREH));
+  new_size2__SREH=(__UINTEGER_32)(new_size__RREH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SREH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0REH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SREH + a__ZREH) & (__UINTEGER_32)(~ a__ZREH));
+    ptr_table__J2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0REH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__I2HH=((__POINTER )(NULL));
+    result__K2HH=((__POINTER *)ptr_table__J2HH)[ 0];
+    if ((result__K2HH == (void *)NULL)) {
+      result__K2HH=new_lab__URJ(new_size__0REH);
+      next__I2HH=(void *)((unsigned long)result__K2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0REH)));
+      ((__POINTER *)next__I2HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__J2HH)[ 0]=next__I2HH;
+    } else {
+      next__I2HH=((__POINTER *)result__K2HH)[ 0];
+      if ((next__I2HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K2HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0REH <<  1)) <=  4096)) {
+          next__I2HH=(void *)((unsigned long)result__K2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0REH)));
+        } else {
+          next__I2HH=new_lab__URJ(new_size__0REH);
+        };
+        ((__POINTER *)next__I2HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__J2HH)[ 0]=next__I2HH;
+      } else {
+        ((__POINTER *)result__K2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__K2HH=next__I2HH;
+      };
+    };
+    ((__POINTER *)result__K2HH)[ 0]=((__POINTER ) 3);
+    result__PREH=(void *)((unsigned long)result__K2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__SIJH=first_free__XDVB;
-    while ((((void *)result__SIJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SIJH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZQDH))) {
-      result__SIJH=((__MEMORY *)result__SIJH)->map_next_free__JTB;
+    result__SKKH=first_free__5DVB;
+    while ((((void *)result__SKKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SKKH)->map_size_and_id__QTB &  4294967292LU) < new_size__RREH))) {
+      result__SKKH=((__MEMORY *)result__SKKH)->map_next_free__RTB;
     };
-    if (((void *)result__SIJH == (void *)NULL)) {
-      result__SIJH=new_page__OA5();
+    if (((void *)result__SKKH == (void *)NULL)) {
+      result__SKKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__SIJH,new_size__ZQDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SIJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__XQDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SIJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__SKKH,new_size__RREH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SKKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__PREH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SKKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__OZEB=((void **)result__XQDH);
-  Self__J1JC=(__INTEGER)(nb_elements__ZB4 -  1);
-  while ((Self__J1JC >=  0)) {
-    Result__OZEB[Self__J1JC]=NULL;
-    Self__J1JC=(__INTEGER)(Self__J1JC -  1);
+  Result__WZEB=((void **)result__PREH);
+  Self__R1JC=(__INTEGER)(nb_elements__BC4 -  1);
+  while ((Self__R1JC >=  0)) {
+    Result__WZEB[Self__R1JC]=NULL;
+    Self__R1JC=(__INTEGER)(Self__R1JC -  1);
   };
-  return(Result__OZEB);
+  return(Result__WZEB);
 }
 
-static void** create__HITC(__INTEGER nb_elements__JITC)
+static void** create__PITC(__INTEGER nb_elements__RITC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__ERDH,a__JRDH,new_size__FRDH,new_size2__GRDH,a__NRDH;
-  __UINTEGER_32 new_size__ORDH;
-  __POINTER result__DRDH,ptr_table__T0GH,next__S0GH,result__U0GH;
-  void *result__VIJH;
-  __INTEGER Self__GQWD;
-  void **Result__TD3C;
-  sz__ERDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JITC * ((__INTEGER )(sizeof(void *)))));
-  result__DRDH=((__POINTER )(NULL));
-  a__JRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__FRDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ERDH + a__JRDH) & (__UINTEGER_32)(~ a__JRDH));
-  new_size2__GRDH=(__UINTEGER_32)(new_size__FRDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__GRDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__NRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__ORDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GRDH + a__NRDH) & (__UINTEGER_32)(~ a__NRDH));
-    ptr_table__T0GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ORDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__S0GH=((__POINTER )(NULL));
-    result__U0GH=((__POINTER *)ptr_table__T0GH)[ 0];
-    if ((result__U0GH == (void *)NULL)) {
-      result__U0GH=new_lab__MRJ(new_size__ORDH);
-      next__S0GH=(void *)((unsigned long)result__U0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ORDH)));
-      ((__POINTER *)next__S0GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__T0GH)[ 0]=next__S0GH;
-    } else {
-      next__S0GH=((__POINTER *)result__U0GH)[ 0];
-      if ((next__S0GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ORDH <<  1)) <=  4096)) {
-          next__S0GH=(void *)((unsigned long)result__U0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ORDH)));
-        } else {
-          next__S0GH=new_lab__MRJ(new_size__ORDH);
-        };
-        ((__POINTER *)next__S0GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__T0GH)[ 0]=next__S0GH;
-      } else {
-        ((__POINTER *)result__U0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__U0GH=next__S0GH;
-      };
-    };
-    ((__POINTER *)result__U0GH)[ 0]=((__POINTER ) 3);
-    result__DRDH=(void *)((unsigned long)result__U0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__2REH,a__BSEH,new_size__3REH,new_size2__4REH,a__FSEH;
+  __UINTEGER_32 new_size__GSEH;
+  __POINTER result__1REH,ptr_table__O2HH,next__N2HH,result__P2HH;
+  void *result__VKKH;
+  __INTEGER Self__OQWD;
+  void **Result__1D3C;
+  sz__2REH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RITC * ((__INTEGER )(sizeof(void *)))));
+  result__1REH=((__POINTER )(NULL));
+  a__BSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3REH=(__UINTEGER_32)((__UINTEGER_32)(sz__2REH + a__BSEH) & (__UINTEGER_32)(~ a__BSEH));
+  new_size2__4REH=(__UINTEGER_32)(new_size__3REH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4REH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GSEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4REH + a__FSEH) & (__UINTEGER_32)(~ a__FSEH));
+    ptr_table__O2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GSEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__N2HH=((__POINTER )(NULL));
+    result__P2HH=((__POINTER *)ptr_table__O2HH)[ 0];
+    if ((result__P2HH == (void *)NULL)) {
+      result__P2HH=new_lab__URJ(new_size__GSEH);
+      next__N2HH=(void *)((unsigned long)result__P2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GSEH)));
+      ((__POINTER *)next__N2HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__O2HH)[ 0]=next__N2HH;
+    } else {
+      next__N2HH=((__POINTER *)result__P2HH)[ 0];
+      if ((next__N2HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P2HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GSEH <<  1)) <=  4096)) {
+          next__N2HH=(void *)((unsigned long)result__P2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GSEH)));
+        } else {
+          next__N2HH=new_lab__URJ(new_size__GSEH);
+        };
+        ((__POINTER *)next__N2HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O2HH)[ 0]=next__N2HH;
+      } else {
+        ((__POINTER *)result__P2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__P2HH=next__N2HH;
+      };
+    };
+    ((__POINTER *)result__P2HH)[ 0]=((__POINTER ) 3);
+    result__1REH=(void *)((unsigned long)result__P2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__VIJH=first_free__XDVB;
-    while ((((void *)result__VIJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VIJH)->map_size_and_id__ITB &  4294967292LU) < new_size__FRDH))) {
-      result__VIJH=((__MEMORY *)result__VIJH)->map_next_free__JTB;
+    result__VKKH=first_free__5DVB;
+    while ((((void *)result__VKKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VKKH)->map_size_and_id__QTB &  4294967292LU) < new_size__3REH))) {
+      result__VKKH=((__MEMORY *)result__VKKH)->map_next_free__RTB;
     };
-    if (((void *)result__VIJH == (void *)NULL)) {
-      result__VIJH=new_page__OA5();
+    if (((void *)result__VKKH == (void *)NULL)) {
+      result__VKKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__VIJH,new_size__FRDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VIJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__DRDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VIJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__VKKH,new_size__3REH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VKKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__1REH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VKKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__TD3C=((void **)result__DRDH);
-  Self__GQWD=(__INTEGER)(nb_elements__JITC -  1);
-  while ((Self__GQWD >=  0)) {
-    Result__TD3C[Self__GQWD]=NULL;
-    Self__GQWD=(__INTEGER)(Self__GQWD -  1);
+  Result__1D3C=((void **)result__1REH);
+  Self__OQWD=(__INTEGER)(nb_elements__RITC -  1);
+  while ((Self__OQWD >=  0)) {
+    Result__1D3C[Self__OQWD]=NULL;
+    Self__OQWD=(__INTEGER)(Self__OQWD -  1);
   };
-  return(Result__TD3C);
+  return(Result__1D3C);
 }
 
-static void** create__GFSB(__INTEGER nb_elements__IFSB)
+static void** create__OFSB(__INTEGER nb_elements__QFSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__QRDH,a__VRDH,new_size__RRDH,new_size2__SRDH,a__ZRDH;
-  __UINTEGER_32 new_size__0RDH;
-  __POINTER result__PRDH,ptr_table__Y0GH,next__X0GH,result__Z0GH;
-  void *result__YIJH;
-  __INTEGER Self__RHNC;
-  void **Result__5JVB;
-  sz__QRDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__IFSB * ((__INTEGER )(sizeof(void *)))));
-  result__PRDH=((__POINTER )(NULL));
-  a__VRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__RRDH=(__UINTEGER_32)((__UINTEGER_32)(sz__QRDH + a__VRDH) & (__UINTEGER_32)(~ a__VRDH));
-  new_size2__SRDH=(__UINTEGER_32)(new_size__RRDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__SRDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__ZRDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__0RDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SRDH + a__ZRDH) & (__UINTEGER_32)(~ a__ZRDH));
-    ptr_table__Y0GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0RDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__X0GH=((__POINTER )(NULL));
-    result__Z0GH=((__POINTER *)ptr_table__Y0GH)[ 0];
-    if ((result__Z0GH == (void *)NULL)) {
-      result__Z0GH=new_lab__MRJ(new_size__0RDH);
-      next__X0GH=(void *)((unsigned long)result__Z0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RDH)));
-      ((__POINTER *)next__X0GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__Y0GH)[ 0]=next__X0GH;
-    } else {
-      next__X0GH=((__POINTER *)result__Z0GH)[ 0];
-      if ((next__X0GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z0GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0RDH <<  1)) <=  4096)) {
-          next__X0GH=(void *)((unsigned long)result__Z0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RDH)));
-        } else {
-          next__X0GH=new_lab__MRJ(new_size__0RDH);
-        };
-        ((__POINTER *)next__X0GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Y0GH)[ 0]=next__X0GH;
-      } else {
-        ((__POINTER *)result__Z0GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X0GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__Z0GH=next__X0GH;
-      };
-    };
-    ((__POINTER *)result__Z0GH)[ 0]=((__POINTER ) 3);
-    result__PRDH=(void *)((unsigned long)result__Z0GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ISEH,a__NSEH,new_size__JSEH,new_size2__KSEH,a__RSEH;
+  __UINTEGER_32 new_size__SSEH;
+  __POINTER result__HSEH,ptr_table__T2HH,next__S2HH,result__U2HH;
+  void *result__YKKH;
+  __INTEGER Self__ZHNC;
+  void **Result__HKVB;
+  sz__ISEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QFSB * ((__INTEGER )(sizeof(void *)))));
+  result__HSEH=((__POINTER )(NULL));
+  a__NSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JSEH=(__UINTEGER_32)((__UINTEGER_32)(sz__ISEH + a__NSEH) & (__UINTEGER_32)(~ a__NSEH));
+  new_size2__KSEH=(__UINTEGER_32)(new_size__JSEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KSEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__RSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__SSEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KSEH + a__RSEH) & (__UINTEGER_32)(~ a__RSEH));
+    ptr_table__T2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SSEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__S2HH=((__POINTER )(NULL));
+    result__U2HH=((__POINTER *)ptr_table__T2HH)[ 0];
+    if ((result__U2HH == (void *)NULL)) {
+      result__U2HH=new_lab__URJ(new_size__SSEH);
+      next__S2HH=(void *)((unsigned long)result__U2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSEH)));
+      ((__POINTER *)next__S2HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__T2HH)[ 0]=next__S2HH;
+    } else {
+      next__S2HH=((__POINTER *)result__U2HH)[ 0];
+      if ((next__S2HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U2HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SSEH <<  1)) <=  4096)) {
+          next__S2HH=(void *)((unsigned long)result__U2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSEH)));
+        } else {
+          next__S2HH=new_lab__URJ(new_size__SSEH);
+        };
+        ((__POINTER *)next__S2HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__T2HH)[ 0]=next__S2HH;
+      } else {
+        ((__POINTER *)result__U2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__U2HH=next__S2HH;
+      };
+    };
+    ((__POINTER *)result__U2HH)[ 0]=((__POINTER ) 3);
+    result__HSEH=(void *)((unsigned long)result__U2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__YIJH=first_free__XDVB;
-    while ((((void *)result__YIJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YIJH)->map_size_and_id__ITB &  4294967292LU) < new_size__RRDH))) {
-      result__YIJH=((__MEMORY *)result__YIJH)->map_next_free__JTB;
+    result__YKKH=first_free__5DVB;
+    while ((((void *)result__YKKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YKKH)->map_size_and_id__QTB &  4294967292LU) < new_size__JSEH))) {
+      result__YKKH=((__MEMORY *)result__YKKH)->map_next_free__RTB;
     };
-    if (((void *)result__YIJH == (void *)NULL)) {
-      result__YIJH=new_page__OA5();
+    if (((void *)result__YKKH == (void *)NULL)) {
+      result__YKKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__YIJH,new_size__RRDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YIJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__PRDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YIJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__YKKH,new_size__JSEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YKKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__HSEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YKKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__5JVB=((void **)result__PRDH);
-  Self__RHNC=(__INTEGER)(nb_elements__IFSB -  1);
-  while ((Self__RHNC >=  0)) {
-    Result__5JVB[Self__RHNC]=NULL;
-    Self__RHNC=(__INTEGER)(Self__RHNC -  1);
+  Result__HKVB=((void **)result__HSEH);
+  Self__ZHNC=(__INTEGER)(nb_elements__QFSB -  1);
+  while ((Self__ZHNC >=  0)) {
+    Result__HKVB[Self__ZHNC]=NULL;
+    Self__ZHNC=(__INTEGER)(Self__ZHNC -  1);
   };
-  return(Result__5JVB);
+  return(Result__HKVB);
 }
 
-static void** create__BG4(__INTEGER nb_elements__DG4)
+static void** create__JG4(__INTEGER nb_elements__LG4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__2RDH,a__BSDH,new_size__3RDH,new_size2__4RDH,a__FSDH;
-  __UINTEGER_32 new_size__GSDH;
-  __POINTER result__1RDH,ptr_table__30GH,next__20GH,result__40GH;
-  void *result__1IJH;
-  __INTEGER Self__Q2JC;
-  void **Result__P5EB;
-  sz__2RDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DG4 * ((__INTEGER )(sizeof(void *)))));
-  result__1RDH=((__POINTER )(NULL));
-  a__BSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__3RDH=(__UINTEGER_32)((__UINTEGER_32)(sz__2RDH + a__BSDH) & (__UINTEGER_32)(~ a__BSDH));
-  new_size2__4RDH=(__UINTEGER_32)(new_size__3RDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__4RDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__FSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__GSDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4RDH + a__FSDH) & (__UINTEGER_32)(~ a__FSDH));
-    ptr_table__30GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GSDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__20GH=((__POINTER )(NULL));
-    result__40GH=((__POINTER *)ptr_table__30GH)[ 0];
-    if ((result__40GH == (void *)NULL)) {
-      result__40GH=new_lab__MRJ(new_size__GSDH);
-      next__20GH=(void *)((unsigned long)result__40GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GSDH)));
-      ((__POINTER *)next__20GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__30GH)[ 0]=next__20GH;
-    } else {
-      next__20GH=((__POINTER *)result__40GH)[ 0];
-      if ((next__20GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__40GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GSDH <<  1)) <=  4096)) {
-          next__20GH=(void *)((unsigned long)result__40GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GSDH)));
-        } else {
-          next__20GH=new_lab__MRJ(new_size__GSDH);
-        };
-        ((__POINTER *)next__20GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__30GH)[ 0]=next__20GH;
-      } else {
-        ((__POINTER *)result__40GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__20GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__40GH=next__20GH;
-      };
-    };
-    ((__POINTER *)result__40GH)[ 0]=((__POINTER ) 3);
-    result__1RDH=(void *)((unsigned long)result__40GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__USEH,a__ZSEH,new_size__VSEH,new_size2__WSEH,a__3SEH;
+  __UINTEGER_32 new_size__4SEH;
+  __POINTER result__TSEH,ptr_table__Y2HH,next__X2HH,result__Z2HH;
+  void *result__1KKH;
+  __INTEGER Self__Y2JC;
+  void **Result__X5EB;
+  sz__USEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LG4 * ((__INTEGER )(sizeof(void *)))));
+  result__TSEH=((__POINTER )(NULL));
+  a__ZSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VSEH=(__UINTEGER_32)((__UINTEGER_32)(sz__USEH + a__ZSEH) & (__UINTEGER_32)(~ a__ZSEH));
+  new_size2__WSEH=(__UINTEGER_32)(new_size__VSEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WSEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3SEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4SEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WSEH + a__3SEH) & (__UINTEGER_32)(~ a__3SEH));
+    ptr_table__Y2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4SEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__X2HH=((__POINTER )(NULL));
+    result__Z2HH=((__POINTER *)ptr_table__Y2HH)[ 0];
+    if ((result__Z2HH == (void *)NULL)) {
+      result__Z2HH=new_lab__URJ(new_size__4SEH);
+      next__X2HH=(void *)((unsigned long)result__Z2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SEH)));
+      ((__POINTER *)next__X2HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__Y2HH)[ 0]=next__X2HH;
+    } else {
+      next__X2HH=((__POINTER *)result__Z2HH)[ 0];
+      if ((next__X2HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Z2HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4SEH <<  1)) <=  4096)) {
+          next__X2HH=(void *)((unsigned long)result__Z2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SEH)));
+        } else {
+          next__X2HH=new_lab__URJ(new_size__4SEH);
+        };
+        ((__POINTER *)next__X2HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__Y2HH)[ 0]=next__X2HH;
+      } else {
+        ((__POINTER *)result__Z2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__X2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__Z2HH=next__X2HH;
+      };
+    };
+    ((__POINTER *)result__Z2HH)[ 0]=((__POINTER ) 3);
+    result__TSEH=(void *)((unsigned long)result__Z2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__1IJH=first_free__XDVB;
-    while ((((void *)result__1IJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1IJH)->map_size_and_id__ITB &  4294967292LU) < new_size__3RDH))) {
-      result__1IJH=((__MEMORY *)result__1IJH)->map_next_free__JTB;
+    result__1KKH=first_free__5DVB;
+    while ((((void *)result__1KKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1KKH)->map_size_and_id__QTB &  4294967292LU) < new_size__VSEH))) {
+      result__1KKH=((__MEMORY *)result__1KKH)->map_next_free__RTB;
     };
-    if (((void *)result__1IJH == (void *)NULL)) {
-      result__1IJH=new_page__OA5();
+    if (((void *)result__1KKH == (void *)NULL)) {
+      result__1KKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__1IJH,new_size__3RDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1IJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__1RDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1IJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__1KKH,new_size__VSEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1KKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__TSEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1KKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__P5EB=((void **)result__1RDH);
-  Self__Q2JC=(__INTEGER)(nb_elements__DG4 -  1);
-  while ((Self__Q2JC >=  0)) {
-    Result__P5EB[Self__Q2JC]=NULL;
-    Self__Q2JC=(__INTEGER)(Self__Q2JC -  1);
+  Result__X5EB=((void **)result__TSEH);
+  Self__Y2JC=(__INTEGER)(nb_elements__LG4 -  1);
+  while ((Self__Y2JC >=  0)) {
+    Result__X5EB[Self__Y2JC]=NULL;
+    Self__Y2JC=(__INTEGER)(Self__Y2JC -  1);
   };
-  return(Result__P5EB);
+  return(Result__X5EB);
 }
 
-static void** create__MZ2(__INTEGER nb_elements__OZ2)
+static void** create__UZ2(__INTEGER nb_elements__WZ2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__ISDH,a__NSDH,new_size__JSDH,new_size2__KSDH,a__RSDH;
-  __UINTEGER_32 new_size__SSDH;
-  __POINTER result__HSDH,ptr_table__C1GH,next__B1GH,result__D1GH;
-  void *result__4IJH;
-  __INTEGER Self__SUJC;
-  void **Result__DRDB;
-  sz__ISDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OZ2 * ((__INTEGER )(sizeof(void *)))));
-  result__HSDH=((__POINTER )(NULL));
-  a__NSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__JSDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ISDH + a__NSDH) & (__UINTEGER_32)(~ a__NSDH));
-  new_size2__KSDH=(__UINTEGER_32)(new_size__JSDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__KSDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__RSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__SSDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KSDH + a__RSDH) & (__UINTEGER_32)(~ a__RSDH));
-    ptr_table__C1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SSDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__B1GH=((__POINTER )(NULL));
-    result__D1GH=((__POINTER *)ptr_table__C1GH)[ 0];
-    if ((result__D1GH == (void *)NULL)) {
-      result__D1GH=new_lab__MRJ(new_size__SSDH);
-      next__B1GH=(void *)((unsigned long)result__D1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSDH)));
-      ((__POINTER *)next__B1GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__C1GH)[ 0]=next__B1GH;
-    } else {
-      next__B1GH=((__POINTER *)result__D1GH)[ 0];
-      if ((next__B1GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SSDH <<  1)) <=  4096)) {
-          next__B1GH=(void *)((unsigned long)result__D1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSDH)));
-        } else {
-          next__B1GH=new_lab__MRJ(new_size__SSDH);
-        };
-        ((__POINTER *)next__B1GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__C1GH)[ 0]=next__B1GH;
-      } else {
-        ((__POINTER *)result__D1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__D1GH=next__B1GH;
-      };
-    };
-    ((__POINTER *)result__D1GH)[ 0]=((__POINTER ) 3);
-    result__HSDH=(void *)((unsigned long)result__D1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ATEH,a__FTEH,new_size__BTEH,new_size2__CTEH,a__JTEH;
+  __UINTEGER_32 new_size__KTEH;
+  __POINTER result__5SEH,ptr_table__32HH,next__22HH,result__42HH;
+  void *result__4KKH;
+  __INTEGER Self__0UJC;
+  void **Result__LRDB;
+  sz__ATEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WZ2 * ((__INTEGER )(sizeof(void *)))));
+  result__5SEH=((__POINTER )(NULL));
+  a__FTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__ATEH + a__FTEH) & (__UINTEGER_32)(~ a__FTEH));
+  new_size2__CTEH=(__UINTEGER_32)(new_size__BTEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CTEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__JTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KTEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CTEH + a__JTEH) & (__UINTEGER_32)(~ a__JTEH));
+    ptr_table__32HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__22HH=((__POINTER )(NULL));
+    result__42HH=((__POINTER *)ptr_table__32HH)[ 0];
+    if ((result__42HH == (void *)NULL)) {
+      result__42HH=new_lab__URJ(new_size__KTEH);
+      next__22HH=(void *)((unsigned long)result__42HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTEH)));
+      ((__POINTER *)next__22HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__32HH)[ 0]=next__22HH;
+    } else {
+      next__22HH=((__POINTER *)result__42HH)[ 0];
+      if ((next__22HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__42HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KTEH <<  1)) <=  4096)) {
+          next__22HH=(void *)((unsigned long)result__42HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTEH)));
+        } else {
+          next__22HH=new_lab__URJ(new_size__KTEH);
+        };
+        ((__POINTER *)next__22HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__32HH)[ 0]=next__22HH;
+      } else {
+        ((__POINTER *)result__42HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__22HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__42HH=next__22HH;
+      };
+    };
+    ((__POINTER *)result__42HH)[ 0]=((__POINTER ) 3);
+    result__5SEH=(void *)((unsigned long)result__42HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__4IJH=first_free__XDVB;
-    while ((((void *)result__4IJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4IJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JSDH))) {
-      result__4IJH=((__MEMORY *)result__4IJH)->map_next_free__JTB;
+    result__4KKH=first_free__5DVB;
+    while ((((void *)result__4KKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4KKH)->map_size_and_id__QTB &  4294967292LU) < new_size__BTEH))) {
+      result__4KKH=((__MEMORY *)result__4KKH)->map_next_free__RTB;
     };
-    if (((void *)result__4IJH == (void *)NULL)) {
-      result__4IJH=new_page__OA5();
+    if (((void *)result__4KKH == (void *)NULL)) {
+      result__4KKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__4IJH,new_size__JSDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4IJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__HSDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4IJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__4KKH,new_size__BTEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4KKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__5SEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4KKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__DRDB=((void **)result__HSDH);
-  Self__SUJC=(__INTEGER)(nb_elements__OZ2 -  1);
-  while ((Self__SUJC >=  0)) {
-    Result__DRDB[Self__SUJC]=NULL;
-    Self__SUJC=(__INTEGER)(Self__SUJC -  1);
+  Result__LRDB=((void **)result__5SEH);
+  Self__0UJC=(__INTEGER)(nb_elements__WZ2 -  1);
+  while ((Self__0UJC >=  0)) {
+    Result__LRDB[Self__0UJC]=NULL;
+    Self__0UJC=(__INTEGER)(Self__0UJC -  1);
   };
-  return(Result__DRDB);
+  return(Result__LRDB);
 }
 
-static void** create__MJRB(__INTEGER nb_elements__OJRB)
+static void** create__UJRB(__INTEGER nb_elements__WJRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__USDH,a__ZSDH,new_size__VSDH,new_size2__WSDH,a__3SDH;
-  __UINTEGER_32 new_size__4SDH;
-  __POINTER result__TSDH,ptr_table__H1GH,next__G1GH,result__I1GH;
-  void *result__BJJH;
-  __INTEGER Self__SBNC;
-  void **Result__WIUB;
-  sz__USDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OJRB * ((__INTEGER )(sizeof(void *)))));
-  result__TSDH=((__POINTER )(NULL));
-  a__ZSDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__VSDH=(__UINTEGER_32)((__UINTEGER_32)(sz__USDH + a__ZSDH) & (__UINTEGER_32)(~ a__ZSDH));
-  new_size2__WSDH=(__UINTEGER_32)(new_size__VSDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__WSDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__3SDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__4SDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WSDH + a__3SDH) & (__UINTEGER_32)(~ a__3SDH));
-    ptr_table__H1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4SDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__G1GH=((__POINTER )(NULL));
-    result__I1GH=((__POINTER *)ptr_table__H1GH)[ 0];
-    if ((result__I1GH == (void *)NULL)) {
-      result__I1GH=new_lab__MRJ(new_size__4SDH);
-      next__G1GH=(void *)((unsigned long)result__I1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SDH)));
-      ((__POINTER *)next__G1GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__H1GH)[ 0]=next__G1GH;
-    } else {
-      next__G1GH=((__POINTER *)result__I1GH)[ 0];
-      if ((next__G1GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4SDH <<  1)) <=  4096)) {
-          next__G1GH=(void *)((unsigned long)result__I1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SDH)));
-        } else {
-          next__G1GH=new_lab__MRJ(new_size__4SDH);
-        };
-        ((__POINTER *)next__G1GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__H1GH)[ 0]=next__G1GH;
-      } else {
-        ((__POINTER *)result__I1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__I1GH=next__G1GH;
-      };
-    };
-    ((__POINTER *)result__I1GH)[ 0]=((__POINTER ) 3);
-    result__TSDH=(void *)((unsigned long)result__I1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__MTEH,a__RTEH,new_size__NTEH,new_size2__OTEH,a__VTEH;
+  __UINTEGER_32 new_size__WTEH;
+  __POINTER result__LTEH,ptr_table__C3HH,next__B3HH,result__D3HH;
+  void *result__BLKH;
+  __INTEGER Self__0BNC;
+  void **Result__4IUB;
+  sz__MTEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WJRB * ((__INTEGER )(sizeof(void *)))));
+  result__LTEH=((__POINTER )(NULL));
+  a__RTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__MTEH + a__RTEH) & (__UINTEGER_32)(~ a__RTEH));
+  new_size2__OTEH=(__UINTEGER_32)(new_size__NTEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__OTEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__VTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__WTEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OTEH + a__VTEH) & (__UINTEGER_32)(~ a__VTEH));
+    ptr_table__C3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__B3HH=((__POINTER )(NULL));
+    result__D3HH=((__POINTER *)ptr_table__C3HH)[ 0];
+    if ((result__D3HH == (void *)NULL)) {
+      result__D3HH=new_lab__URJ(new_size__WTEH);
+      next__B3HH=(void *)((unsigned long)result__D3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTEH)));
+      ((__POINTER *)next__B3HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__C3HH)[ 0]=next__B3HH;
+    } else {
+      next__B3HH=((__POINTER *)result__D3HH)[ 0];
+      if ((next__B3HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D3HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WTEH <<  1)) <=  4096)) {
+          next__B3HH=(void *)((unsigned long)result__D3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTEH)));
+        } else {
+          next__B3HH=new_lab__URJ(new_size__WTEH);
+        };
+        ((__POINTER *)next__B3HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__C3HH)[ 0]=next__B3HH;
+      } else {
+        ((__POINTER *)result__D3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__D3HH=next__B3HH;
+      };
+    };
+    ((__POINTER *)result__D3HH)[ 0]=((__POINTER ) 3);
+    result__LTEH=(void *)((unsigned long)result__D3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__BJJH=first_free__XDVB;
-    while ((((void *)result__BJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__VSDH))) {
-      result__BJJH=((__MEMORY *)result__BJJH)->map_next_free__JTB;
+    result__BLKH=first_free__5DVB;
+    while ((((void *)result__BLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__NTEH))) {
+      result__BLKH=((__MEMORY *)result__BLKH)->map_next_free__RTB;
     };
-    if (((void *)result__BJJH == (void *)NULL)) {
-      result__BJJH=new_page__OA5();
+    if (((void *)result__BLKH == (void *)NULL)) {
+      result__BLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__BJJH,new_size__VSDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__TSDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__BLKH,new_size__NTEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__LTEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__WIUB=((void **)result__TSDH);
-  Self__SBNC=(__INTEGER)(nb_elements__OJRB -  1);
-  while ((Self__SBNC >=  0)) {
-    Result__WIUB[Self__SBNC]=NULL;
-    Self__SBNC=(__INTEGER)(Self__SBNC -  1);
+  Result__4IUB=((void **)result__LTEH);
+  Self__0BNC=(__INTEGER)(nb_elements__WJRB -  1);
+  while ((Self__0BNC >=  0)) {
+    Result__4IUB[Self__0BNC]=NULL;
+    Self__0BNC=(__INTEGER)(Self__0BNC -  1);
   };
-  return(Result__WIUB);
+  return(Result__4IUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__IFR(__INTEGER new_count__KFR)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__QFR(__INTEGER new_count__SFR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__GLR,ptr_table__M1GH,next__L1GH,result__N1GH;
-  __POINTER ptr_table__R1GH,next__Q1GH,result__S1GH;
-  __INTEGER typ_id__LLR;
-  __UINTEGER_32 sz__ILR,a__BTDH,new_size__CTDH,t__GTDH,a__FTDH;
-  __UINTEGER_32 new_size__U1GH,lab_type__T1GH;
-  __FAST_ARRAYoITM_TYPE_MONOo *result__FLR,*Self__5JW;
-  result__FLR=NULL;
-  ptr__GLR=((__POINTER )(NULL));
-  typ_id__LLR= 0;
-  sz__ILR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
-  if ((sz__ILR ==  0)) {
-    result__FLR=FAST_ARRAYoITM_TYPE_MONOo__;
+  __POINTER ptr__OLR,ptr_table__H3HH,next__G3HH,result__I3HH;
+  __POINTER ptr_table__M3HH,next__L3HH,result__N3HH;
+  __INTEGER typ_id__TLR;
+  __UINTEGER_32 sz__QLR,a__ZTEH,new_size__0TEH,t__4TEH,a__3TEH;
+  __UINTEGER_32 new_size__P3HH,lab_type__O3HH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__NLR,*Self__HKW;
+  result__NLR=NULL;
+  ptr__OLR=((__POINTER )(NULL));
+  typ_id__TLR= 0;
+  sz__QLR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__QLR ==  0)) {
+    result__NLR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    typ_id__LLR=__FAST_ARRAYoITM_TYPE_MONOo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ILR);
-    if ((typ_id__LLR == (__INTEGER)(-  1))) {
-      a__BTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__CTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILR + a__BTDH) & (__UINTEGER_32)(~ a__BTDH));
-      ptr_table__M1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CTDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__L1GH=((__POINTER )(NULL));
-      result__N1GH=((__POINTER *)ptr_table__M1GH)[ 0];
-      if ((result__N1GH == (void *)NULL)) {
-        result__N1GH=new_lab__MRJ(new_size__CTDH);
-        next__L1GH=(void *)((unsigned long)result__N1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTDH)));
-        ((__POINTER *)next__L1GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__M1GH)[ 0]=next__L1GH;
-      } else {
-        next__L1GH=((__POINTER *)result__N1GH)[ 0];
-        if ((next__L1GH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CTDH <<  1)) <=  4096)) {
-            next__L1GH=(void *)((unsigned long)result__N1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTDH)));
-          } else {
-            next__L1GH=new_lab__MRJ(new_size__CTDH);
-          };
-          ((__POINTER *)next__L1GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__M1GH)[ 0]=next__L1GH;
-        } else {
-          ((__POINTER *)result__N1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__N1GH=next__L1GH;
-        };
-      };
-      ptr__GLR=result__N1GH;
-    } else {
-      t__GTDH=((__UINTEGER_32 )typ_id__LLR);
-      a__FTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__U1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__ILR + a__FTDH) & (__UINTEGER_32)(~ a__FTDH));
-      ptr_table__R1GH=((__POINTER )(&(table_type[(t__GTDH)])));
-      lab_type__T1GH=(__UINTEGER_32)(t__GTDH |  1);
-      next__Q1GH=((__POINTER )(NULL));
-      result__S1GH=((__POINTER *)ptr_table__R1GH)[ 0];
-      if ((result__S1GH == (void *)NULL)) {
-        result__S1GH=new_lab__MRJ(lab_type__T1GH);
-        next__Q1GH=(void *)((unsigned long)result__S1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1GH)));
-        ((__POINTER *)next__Q1GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__R1GH)[ 0]=next__Q1GH;
-      } else {
-        next__Q1GH=((__POINTER *)result__S1GH)[ 0];
-        if ((next__Q1GH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__U1GH <<  1)) <=  4096)) {
-            next__Q1GH=(void *)((unsigned long)result__S1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U1GH)));
-          } else {
-            next__Q1GH=new_lab__MRJ(lab_type__T1GH);
-          };
-          ((__POINTER *)next__Q1GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__R1GH)[ 0]=next__Q1GH;
-        } else {
-          ((__POINTER *)result__S1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__S1GH=next__Q1GH;
-        };
-      };
-      ptr__GLR=result__S1GH;
-    };
-    result__FLR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__GLR);
-    *(result__FLR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
-  };
-  Self__5JW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__FLR);
-  if ((Self__5JW->parent_arrayed_collection__ZXC.capacity__5NV < new_count__KFR)) {
-    Self__5JW->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB(new_count__KFR);
-    Self__5JW->parent_arrayed_collection__ZXC.capacity__5NV=new_count__KFR;
-  };
-  Self__5JW->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(-  1);
-  return(result__FLR);
+    typ_id__TLR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QLR);
+    if ((typ_id__TLR == (__INTEGER)(-  1))) {
+      a__ZTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0TEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLR + a__ZTEH) & (__UINTEGER_32)(~ a__ZTEH));
+      ptr_table__H3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0TEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__G3HH=((__POINTER )(NULL));
+      result__I3HH=((__POINTER *)ptr_table__H3HH)[ 0];
+      if ((result__I3HH == (void *)NULL)) {
+        result__I3HH=new_lab__URJ(new_size__0TEH);
+        next__G3HH=(void *)((unsigned long)result__I3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TEH)));
+        ((__POINTER *)next__G3HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__H3HH)[ 0]=next__G3HH;
+      } else {
+        next__G3HH=((__POINTER *)result__I3HH)[ 0];
+        if ((next__G3HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I3HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0TEH <<  1)) <=  4096)) {
+            next__G3HH=(void *)((unsigned long)result__I3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TEH)));
+          } else {
+            next__G3HH=new_lab__URJ(new_size__0TEH);
+          };
+          ((__POINTER *)next__G3HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__H3HH)[ 0]=next__G3HH;
+        } else {
+          ((__POINTER *)result__I3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__I3HH=next__G3HH;
+        };
+      };
+      ptr__OLR=result__I3HH;
+    } else {
+      t__4TEH=((__UINTEGER_32 )typ_id__TLR);
+      a__3TEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__P3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__QLR + a__3TEH) & (__UINTEGER_32)(~ a__3TEH));
+      ptr_table__M3HH=((__POINTER )(&(table_type[(t__4TEH)])));
+      lab_type__O3HH=(__UINTEGER_32)(t__4TEH |  1);
+      next__L3HH=((__POINTER )(NULL));
+      result__N3HH=((__POINTER *)ptr_table__M3HH)[ 0];
+      if ((result__N3HH == (void *)NULL)) {
+        result__N3HH=new_lab__URJ(lab_type__O3HH);
+        next__L3HH=(void *)((unsigned long)result__N3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3HH)));
+        ((__POINTER *)next__L3HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__M3HH)[ 0]=next__L3HH;
+      } else {
+        next__L3HH=((__POINTER *)result__N3HH)[ 0];
+        if ((next__L3HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N3HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__P3HH <<  1)) <=  4096)) {
+            next__L3HH=(void *)((unsigned long)result__N3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3HH)));
+          } else {
+            next__L3HH=new_lab__URJ(lab_type__O3HH);
+          };
+          ((__POINTER *)next__L3HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__M3HH)[ 0]=next__L3HH;
+        } else {
+          ((__POINTER *)result__N3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__N3HH=next__L3HH;
+        };
+      };
+      ptr__OLR=result__N3HH;
+    };
+    result__NLR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__OLR);
+    *(result__NLR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__HKW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__NLR);
+  if ((Self__HKW->parent_arrayed_collection__BYC.capacity__HOV < new_count__SFR)) {
+    Self__HKW->parent_arrayed_collection__BYC.storage__ZMV=create__1BRB(new_count__SFR);
+    Self__HKW->parent_arrayed_collection__BYC.capacity__HOV=new_count__SFR;
+  };
+  Self__HKW->parent_arrayed_collection__BYC.upper__SIV=(__INTEGER)(-  1);
+  return(result__NLR);
 }
 
-static void** create__1ZBB(__INTEGER nb_elements__3ZBB)
+static void** create__D0BB(__INTEGER nb_elements__F0BB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__ITDH,a__NTDH,new_size__JTDH,new_size2__KTDH,a__RTDH;
-  __UINTEGER_32 new_size__STDH;
-  __POINTER result__HTDH,ptr_table__W1GH,next__V1GH,result__X1GH;
-  void *result__EJJH;
-  __INTEGER Self__EMKC;
-  void **Result__HYIB;
-  sz__ITDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3ZBB * ((__INTEGER )(sizeof(void *)))));
-  result__HTDH=((__POINTER )(NULL));
-  a__NTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__JTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ITDH + a__NTDH) & (__UINTEGER_32)(~ a__NTDH));
-  new_size2__KTDH=(__UINTEGER_32)(new_size__JTDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__KTDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__RTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__STDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KTDH + a__RTDH) & (__UINTEGER_32)(~ a__RTDH));
-    ptr_table__W1GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__STDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__V1GH=((__POINTER )(NULL));
-    result__X1GH=((__POINTER *)ptr_table__W1GH)[ 0];
-    if ((result__X1GH == (void *)NULL)) {
-      result__X1GH=new_lab__MRJ(new_size__STDH);
-      next__V1GH=(void *)((unsigned long)result__X1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__STDH)));
-      ((__POINTER *)next__V1GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__W1GH)[ 0]=next__V1GH;
-    } else {
-      next__V1GH=((__POINTER *)result__X1GH)[ 0];
-      if ((next__V1GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X1GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__STDH <<  1)) <=  4096)) {
-          next__V1GH=(void *)((unsigned long)result__X1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__STDH)));
-        } else {
-          next__V1GH=new_lab__MRJ(new_size__STDH);
-        };
-        ((__POINTER *)next__V1GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__W1GH)[ 0]=next__V1GH;
-      } else {
-        ((__POINTER *)result__X1GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V1GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__X1GH=next__V1GH;
-      };
-    };
-    ((__POINTER *)result__X1GH)[ 0]=((__POINTER ) 3);
-    result__HTDH=(void *)((unsigned long)result__X1GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__AUEH,a__FUEH,new_size__BUEH,new_size2__CUEH,a__JUEH;
+  __UINTEGER_32 new_size__KUEH;
+  __POINTER result__5TEH,ptr_table__R3HH,next__Q3HH,result__S3HH;
+  void *result__ELKH;
+  __INTEGER Self__MMKC;
+  void **Result__PYIB;
+  sz__AUEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__F0BB * ((__INTEGER )(sizeof(void *)))));
+  result__5TEH=((__POINTER )(NULL));
+  a__FUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUEH + a__FUEH) & (__UINTEGER_32)(~ a__FUEH));
+  new_size2__CUEH=(__UINTEGER_32)(new_size__BUEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CUEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__JUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__KUEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CUEH + a__JUEH) & (__UINTEGER_32)(~ a__JUEH));
+    ptr_table__R3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__Q3HH=((__POINTER )(NULL));
+    result__S3HH=((__POINTER *)ptr_table__R3HH)[ 0];
+    if ((result__S3HH == (void *)NULL)) {
+      result__S3HH=new_lab__URJ(new_size__KUEH);
+      next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUEH)));
+      ((__POINTER *)next__Q3HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
+    } else {
+      next__Q3HH=((__POINTER *)result__S3HH)[ 0];
+      if ((next__Q3HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S3HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KUEH <<  1)) <=  4096)) {
+          next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUEH)));
+        } else {
+          next__Q3HH=new_lab__URJ(new_size__KUEH);
+        };
+        ((__POINTER *)next__Q3HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
+      } else {
+        ((__POINTER *)result__S3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__S3HH=next__Q3HH;
+      };
+    };
+    ((__POINTER *)result__S3HH)[ 0]=((__POINTER ) 3);
+    result__5TEH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__EJJH=first_free__XDVB;
-    while ((((void *)result__EJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__JTDH))) {
-      result__EJJH=((__MEMORY *)result__EJJH)->map_next_free__JTB;
+    result__ELKH=first_free__5DVB;
+    while ((((void *)result__ELKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ELKH)->map_size_and_id__QTB &  4294967292LU) < new_size__BUEH))) {
+      result__ELKH=((__MEMORY *)result__ELKH)->map_next_free__RTB;
     };
-    if (((void *)result__EJJH == (void *)NULL)) {
-      result__EJJH=new_page__OA5();
+    if (((void *)result__ELKH == (void *)NULL)) {
+      result__ELKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__EJJH,new_size__JTDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__HTDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__ELKH,new_size__BUEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ELKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__5TEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ELKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__HYIB=((void **)result__HTDH);
-  Self__EMKC=(__INTEGER)(nb_elements__3ZBB -  1);
-  while ((Self__EMKC >=  0)) {
-    Result__HYIB[Self__EMKC]=NULL;
-    Self__EMKC=(__INTEGER)(Self__EMKC -  1);
+  Result__PYIB=((void **)result__5TEH);
+  Self__MMKC=(__INTEGER)(nb_elements__F0BB -  1);
+  while ((Self__MMKC >=  0)) {
+    Result__PYIB[Self__MMKC]=NULL;
+    Self__MMKC=(__INTEGER)(Self__MMKC -  1);
   };
-  return(Result__HYIB);
+  return(Result__PYIB);
 }
 
-static void** create__VLXB(__INTEGER nb_elements__XLXB)
+static void** create__3LXB(__INTEGER nb_elements__5LXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__UTDH,a__ZTDH,new_size__VTDH,new_size2__WTDH,a__3TDH;
-  __UINTEGER_32 new_size__4TDH;
-  __POINTER result__TTDH,ptr_table__11GH,next__01GH,result__21GH;
-  void *result__HJJH;
-  __INTEGER Self__RZOC;
-  void **Result__IX0B;
-  sz__UTDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XLXB * ((__INTEGER )(sizeof(void *)))));
-  result__TTDH=((__POINTER )(NULL));
-  a__ZTDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__VTDH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTDH + a__ZTDH) & (__UINTEGER_32)(~ a__ZTDH));
-  new_size2__WTDH=(__UINTEGER_32)(new_size__VTDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__WTDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__3TDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__4TDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WTDH + a__3TDH) & (__UINTEGER_32)(~ a__3TDH));
-    ptr_table__11GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4TDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__01GH=((__POINTER )(NULL));
-    result__21GH=((__POINTER *)ptr_table__11GH)[ 0];
-    if ((result__21GH == (void *)NULL)) {
-      result__21GH=new_lab__MRJ(new_size__4TDH);
-      next__01GH=(void *)((unsigned long)result__21GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TDH)));
-      ((__POINTER *)next__01GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__11GH)[ 0]=next__01GH;
-    } else {
-      next__01GH=((__POINTER *)result__21GH)[ 0];
-      if ((next__01GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__21GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4TDH <<  1)) <=  4096)) {
-          next__01GH=(void *)((unsigned long)result__21GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TDH)));
-        } else {
-          next__01GH=new_lab__MRJ(new_size__4TDH);
-        };
-        ((__POINTER *)next__01GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__11GH)[ 0]=next__01GH;
-      } else {
-        ((__POINTER *)result__21GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__01GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__21GH=next__01GH;
-      };
-    };
-    ((__POINTER *)result__21GH)[ 0]=((__POINTER ) 3);
-    result__TTDH=(void *)((unsigned long)result__21GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__MUEH,a__RUEH,new_size__NUEH,new_size2__OUEH,a__VUEH;
+  __UINTEGER_32 new_size__WUEH;
+  __POINTER result__LUEH,ptr_table__W3HH,next__V3HH,result__X3HH;
+  void *result__HLKH;
+  __INTEGER Self__ZZOC;
+  void **Result__QX0B;
+  sz__MUEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5LXB * ((__INTEGER )(sizeof(void *)))));
+  result__LUEH=((__POINTER )(NULL));
+  a__RUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__NUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__MUEH + a__RUEH) & (__UINTEGER_32)(~ a__RUEH));
+  new_size2__OUEH=(__UINTEGER_32)(new_size__NUEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__OUEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__VUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__WUEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OUEH + a__VUEH) & (__UINTEGER_32)(~ a__VUEH));
+    ptr_table__W3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__V3HH=((__POINTER )(NULL));
+    result__X3HH=((__POINTER *)ptr_table__W3HH)[ 0];
+    if ((result__X3HH == (void *)NULL)) {
+      result__X3HH=new_lab__URJ(new_size__WUEH);
+      next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUEH)));
+      ((__POINTER *)next__V3HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
+    } else {
+      next__V3HH=((__POINTER *)result__X3HH)[ 0];
+      if ((next__V3HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X3HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WUEH <<  1)) <=  4096)) {
+          next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUEH)));
+        } else {
+          next__V3HH=new_lab__URJ(new_size__WUEH);
+        };
+        ((__POINTER *)next__V3HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
+      } else {
+        ((__POINTER *)result__X3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__X3HH=next__V3HH;
+      };
+    };
+    ((__POINTER *)result__X3HH)[ 0]=((__POINTER ) 3);
+    result__LUEH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__HJJH=first_free__XDVB;
-    while ((((void *)result__HJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__VTDH))) {
-      result__HJJH=((__MEMORY *)result__HJJH)->map_next_free__JTB;
+    result__HLKH=first_free__5DVB;
+    while ((((void *)result__HLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__NUEH))) {
+      result__HLKH=((__MEMORY *)result__HLKH)->map_next_free__RTB;
     };
-    if (((void *)result__HJJH == (void *)NULL)) {
-      result__HJJH=new_page__OA5();
+    if (((void *)result__HLKH == (void *)NULL)) {
+      result__HLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__HJJH,new_size__VTDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__TTDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__HLKH,new_size__NUEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__LUEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__IX0B=((void **)result__TTDH);
-  Self__RZOC=(__INTEGER)(nb_elements__XLXB -  1);
-  while ((Self__RZOC >=  0)) {
-    Result__IX0B[Self__RZOC]=NULL;
-    Self__RZOC=(__INTEGER)(Self__RZOC -  1);
+  Result__QX0B=((void **)result__LUEH);
+  Self__ZZOC=(__INTEGER)(nb_elements__5LXB -  1);
+  while ((Self__ZZOC >=  0)) {
+    Result__QX0B[Self__ZZOC]=NULL;
+    Self__ZZOC=(__INTEGER)(Self__ZZOC -  1);
   };
-  return(Result__IX0B);
+  return(Result__QX0B);
 }
 
-static void** create__QUWB(__INTEGER nb_elements__SUWB)
+static void** create__YUWB(__INTEGER nb_elements__0UWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__AUDH,a__FUDH,new_size__BUDH,new_size2__CUDH,a__JUDH;
-  __UINTEGER_32 new_size__KUDH;
-  __POINTER result__5TDH,ptr_table__A2GH,next__51GH,result__B2GH;
-  void *result__KJJH;
-  __INTEGER Self__KYOC;
-  void **Result__RJ0B;
-  sz__AUDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SUWB * ((__INTEGER )(sizeof(void *)))));
-  result__5TDH=((__POINTER )(NULL));
-  a__FUDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__BUDH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUDH + a__FUDH) & (__UINTEGER_32)(~ a__FUDH));
-  new_size2__CUDH=(__UINTEGER_32)(new_size__BUDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__CUDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JUDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KUDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CUDH + a__JUDH) & (__UINTEGER_32)(~ a__JUDH));
-    ptr_table__A2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KUDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__51GH=((__POINTER )(NULL));
-    result__B2GH=((__POINTER *)ptr_table__A2GH)[ 0];
-    if ((result__B2GH == (void *)NULL)) {
-      result__B2GH=new_lab__MRJ(new_size__KUDH);
-      next__51GH=(void *)((unsigned long)result__B2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUDH)));
-      ((__POINTER *)next__51GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__A2GH)[ 0]=next__51GH;
-    } else {
-      next__51GH=((__POINTER *)result__B2GH)[ 0];
-      if ((next__51GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KUDH <<  1)) <=  4096)) {
-          next__51GH=(void *)((unsigned long)result__B2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KUDH)));
-        } else {
-          next__51GH=new_lab__MRJ(new_size__KUDH);
-        };
-        ((__POINTER *)next__51GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__A2GH)[ 0]=next__51GH;
-      } else {
-        ((__POINTER *)result__B2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__B2GH=next__51GH;
-      };
-    };
-    ((__POINTER *)result__B2GH)[ 0]=((__POINTER ) 3);
-    result__5TDH=(void *)((unsigned long)result__B2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__YUEH,a__3UEH,new_size__ZUEH,new_size2__0UEH,a__BVEH;
+  __UINTEGER_32 new_size__CVEH;
+  __POINTER result__XUEH,ptr_table__13HH,next__03HH,result__23HH;
+  void *result__KLKH;
+  __INTEGER Self__SYOC;
+  void **Result__ZJ0B;
+  sz__YUEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__0UWB * ((__INTEGER )(sizeof(void *)))));
+  result__XUEH=((__POINTER )(NULL));
+  a__3UEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__YUEH + a__3UEH) & (__UINTEGER_32)(~ a__3UEH));
+  new_size2__0UEH=(__UINTEGER_32)(new_size__ZUEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0UEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CVEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0UEH + a__BVEH) & (__UINTEGER_32)(~ a__BVEH));
+    ptr_table__13HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CVEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__03HH=((__POINTER )(NULL));
+    result__23HH=((__POINTER *)ptr_table__13HH)[ 0];
+    if ((result__23HH == (void *)NULL)) {
+      result__23HH=new_lab__URJ(new_size__CVEH);
+      next__03HH=(void *)((unsigned long)result__23HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVEH)));
+      ((__POINTER *)next__03HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__13HH)[ 0]=next__03HH;
+    } else {
+      next__03HH=((__POINTER *)result__23HH)[ 0];
+      if ((next__03HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__23HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CVEH <<  1)) <=  4096)) {
+          next__03HH=(void *)((unsigned long)result__23HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVEH)));
+        } else {
+          next__03HH=new_lab__URJ(new_size__CVEH);
+        };
+        ((__POINTER *)next__03HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__13HH)[ 0]=next__03HH;
+      } else {
+        ((__POINTER *)result__23HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__03HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__23HH=next__03HH;
+      };
+    };
+    ((__POINTER *)result__23HH)[ 0]=((__POINTER ) 3);
+    result__XUEH=(void *)((unsigned long)result__23HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__KJJH=first_free__XDVB;
-    while ((((void *)result__KJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__BUDH))) {
-      result__KJJH=((__MEMORY *)result__KJJH)->map_next_free__JTB;
+    result__KLKH=first_free__5DVB;
+    while ((((void *)result__KLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__ZUEH))) {
+      result__KLKH=((__MEMORY *)result__KLKH)->map_next_free__RTB;
     };
-    if (((void *)result__KJJH == (void *)NULL)) {
-      result__KJJH=new_page__OA5();
+    if (((void *)result__KLKH == (void *)NULL)) {
+      result__KLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__KJJH,new_size__BUDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__5TDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__KLKH,new_size__ZUEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__XUEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__RJ0B=((void **)result__5TDH);
-  Self__KYOC=(__INTEGER)(nb_elements__SUWB -  1);
-  while ((Self__KYOC >=  0)) {
-    Result__RJ0B[Self__KYOC]=NULL;
-    Self__KYOC=(__INTEGER)(Self__KYOC -  1);
+  Result__ZJ0B=((void **)result__XUEH);
+  Self__SYOC=(__INTEGER)(nb_elements__0UWB -  1);
+  while ((Self__SYOC >=  0)) {
+    Result__ZJ0B[Self__SYOC]=NULL;
+    Self__SYOC=(__INTEGER)(Self__SYOC -  1);
   };
-  return(Result__RJ0B);
+  return(Result__ZJ0B);
 }
 
-static void** create__PSXB(__INTEGER nb_elements__RSXB)
+static void** create__XSXB(__INTEGER nb_elements__ZSXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MUDH,a__RUDH,new_size__NUDH,new_size2__OUDH,a__VUDH;
-  __UINTEGER_32 new_size__WUDH;
-  __POINTER result__LUDH,ptr_table__F2GH,next__E2GH,result__G2GH;
-  void *result__NJJH;
-  __INTEGER Self__Y0OC;
-  void **Result__440B;
-  sz__MUDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RSXB * ((__INTEGER )(sizeof(void *)))));
-  result__LUDH=((__POINTER )(NULL));
-  a__RUDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NUDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MUDH + a__RUDH) & (__UINTEGER_32)(~ a__RUDH));
-  new_size2__OUDH=(__UINTEGER_32)(new_size__NUDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OUDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VUDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WUDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OUDH + a__VUDH) & (__UINTEGER_32)(~ a__VUDH));
-    ptr_table__F2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WUDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__E2GH=((__POINTER )(NULL));
-    result__G2GH=((__POINTER *)ptr_table__F2GH)[ 0];
-    if ((result__G2GH == (void *)NULL)) {
-      result__G2GH=new_lab__MRJ(new_size__WUDH);
-      next__E2GH=(void *)((unsigned long)result__G2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUDH)));
-      ((__POINTER *)next__E2GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__F2GH)[ 0]=next__E2GH;
-    } else {
-      next__E2GH=((__POINTER *)result__G2GH)[ 0];
-      if ((next__E2GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WUDH <<  1)) <=  4096)) {
-          next__E2GH=(void *)((unsigned long)result__G2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUDH)));
-        } else {
-          next__E2GH=new_lab__MRJ(new_size__WUDH);
-        };
-        ((__POINTER *)next__E2GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__F2GH)[ 0]=next__E2GH;
-      } else {
-        ((__POINTER *)result__G2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__G2GH=next__E2GH;
-      };
-    };
-    ((__POINTER *)result__G2GH)[ 0]=((__POINTER ) 3);
-    result__LUDH=(void *)((unsigned long)result__G2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EVEH,a__JVEH,new_size__FVEH,new_size2__GVEH,a__NVEH;
+  __UINTEGER_32 new_size__OVEH;
+  __POINTER result__DVEH,ptr_table__A4HH,next__53HH,result__B4HH;
+  void *result__NLKH;
+  __INTEGER Self__A1OC;
+  void **Result__G50B;
+  sz__EVEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZSXB * ((__INTEGER )(sizeof(void *)))));
+  result__DVEH=((__POINTER )(NULL));
+  a__JVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FVEH=(__UINTEGER_32)((__UINTEGER_32)(sz__EVEH + a__JVEH) & (__UINTEGER_32)(~ a__JVEH));
+  new_size2__GVEH=(__UINTEGER_32)(new_size__FVEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GVEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OVEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GVEH + a__NVEH) & (__UINTEGER_32)(~ a__NVEH));
+    ptr_table__A4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OVEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__53HH=((__POINTER )(NULL));
+    result__B4HH=((__POINTER *)ptr_table__A4HH)[ 0];
+    if ((result__B4HH == (void *)NULL)) {
+      result__B4HH=new_lab__URJ(new_size__OVEH);
+      next__53HH=(void *)((unsigned long)result__B4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVEH)));
+      ((__POINTER *)next__53HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__A4HH)[ 0]=next__53HH;
+    } else {
+      next__53HH=((__POINTER *)result__B4HH)[ 0];
+      if ((next__53HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B4HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OVEH <<  1)) <=  4096)) {
+          next__53HH=(void *)((unsigned long)result__B4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVEH)));
+        } else {
+          next__53HH=new_lab__URJ(new_size__OVEH);
+        };
+        ((__POINTER *)next__53HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__A4HH)[ 0]=next__53HH;
+      } else {
+        ((__POINTER *)result__B4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__53HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__B4HH=next__53HH;
+      };
+    };
+    ((__POINTER *)result__B4HH)[ 0]=((__POINTER ) 3);
+    result__DVEH=(void *)((unsigned long)result__B4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__NJJH=first_free__XDVB;
-    while ((((void *)result__NJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__NUDH))) {
-      result__NJJH=((__MEMORY *)result__NJJH)->map_next_free__JTB;
+    result__NLKH=first_free__5DVB;
+    while ((((void *)result__NLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__NLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__FVEH))) {
+      result__NLKH=((__MEMORY *)result__NLKH)->map_next_free__RTB;
     };
-    if (((void *)result__NJJH == (void *)NULL)) {
-      result__NJJH=new_page__OA5();
+    if (((void *)result__NLKH == (void *)NULL)) {
+      result__NLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__NJJH,new_size__NUDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__LUDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__NLKH,new_size__FVEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__NLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__DVEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__NLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__440B=((void **)result__LUDH);
-  Self__Y0OC=(__INTEGER)(nb_elements__RSXB -  1);
-  while ((Self__Y0OC >=  0)) {
-    Result__440B[Self__Y0OC]=NULL;
-    Self__Y0OC=(__INTEGER)(Self__Y0OC -  1);
+  Result__G50B=((void **)result__DVEH);
+  Self__A1OC=(__INTEGER)(nb_elements__ZSXB -  1);
+  while ((Self__A1OC >=  0)) {
+    Result__G50B[Self__A1OC]=NULL;
+    Self__A1OC=(__INTEGER)(Self__A1OC -  1);
   };
-  return(Result__440B);
+  return(Result__G50B);
 }
 
-static void** create__VH5(__INTEGER nb_elements__XH5)
+static void** create__3H5(__INTEGER nb_elements__5H5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YUDH,a__3UDH,new_size__ZUDH,new_size2__0UDH,a__BVDH;
-  __UINTEGER_32 new_size__CVDH;
-  __POINTER result__XUDH,ptr_table__K2GH,next__J2GH,result__L2GH;
-  void *result__QJJH;
-  __INTEGER Self__NAKC;
-  void **Result__OBGB;
-  sz__YUDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XH5 * ((__INTEGER )(sizeof(void *)))));
-  result__XUDH=((__POINTER )(NULL));
-  a__3UDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZUDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YUDH + a__3UDH) & (__UINTEGER_32)(~ a__3UDH));
-  new_size2__0UDH=(__UINTEGER_32)(new_size__ZUDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0UDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CVDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0UDH + a__BVDH) & (__UINTEGER_32)(~ a__BVDH));
-    ptr_table__K2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CVDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__J2GH=((__POINTER )(NULL));
-    result__L2GH=((__POINTER *)ptr_table__K2GH)[ 0];
-    if ((result__L2GH == (void *)NULL)) {
-      result__L2GH=new_lab__MRJ(new_size__CVDH);
-      next__J2GH=(void *)((unsigned long)result__L2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVDH)));
-      ((__POINTER *)next__J2GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__K2GH)[ 0]=next__J2GH;
-    } else {
-      next__J2GH=((__POINTER *)result__L2GH)[ 0];
-      if ((next__J2GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CVDH <<  1)) <=  4096)) {
-          next__J2GH=(void *)((unsigned long)result__L2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVDH)));
-        } else {
-          next__J2GH=new_lab__MRJ(new_size__CVDH);
-        };
-        ((__POINTER *)next__J2GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__K2GH)[ 0]=next__J2GH;
-      } else {
-        ((__POINTER *)result__L2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__L2GH=next__J2GH;
-      };
-    };
-    ((__POINTER *)result__L2GH)[ 0]=((__POINTER ) 3);
-    result__XUDH=(void *)((unsigned long)result__L2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QVEH,a__VVEH,new_size__RVEH,new_size2__SVEH,a__ZVEH;
+  __UINTEGER_32 new_size__0VEH;
+  __POINTER result__PVEH,ptr_table__F4HH,next__E4HH,result__G4HH;
+  void *result__QLKH;
+  __INTEGER Self__VAKC;
+  void **Result__WBGB;
+  sz__QVEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5H5 * ((__INTEGER )(sizeof(void *)))));
+  result__PVEH=((__POINTER )(NULL));
+  a__VVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RVEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QVEH + a__VVEH) & (__UINTEGER_32)(~ a__VVEH));
+  new_size2__SVEH=(__UINTEGER_32)(new_size__RVEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SVEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0VEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SVEH + a__ZVEH) & (__UINTEGER_32)(~ a__ZVEH));
+    ptr_table__F4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0VEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__E4HH=((__POINTER )(NULL));
+    result__G4HH=((__POINTER *)ptr_table__F4HH)[ 0];
+    if ((result__G4HH == (void *)NULL)) {
+      result__G4HH=new_lab__URJ(new_size__0VEH);
+      next__E4HH=(void *)((unsigned long)result__G4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VEH)));
+      ((__POINTER *)next__E4HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__F4HH)[ 0]=next__E4HH;
+    } else {
+      next__E4HH=((__POINTER *)result__G4HH)[ 0];
+      if ((next__E4HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G4HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0VEH <<  1)) <=  4096)) {
+          next__E4HH=(void *)((unsigned long)result__G4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VEH)));
+        } else {
+          next__E4HH=new_lab__URJ(new_size__0VEH);
+        };
+        ((__POINTER *)next__E4HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__F4HH)[ 0]=next__E4HH;
+      } else {
+        ((__POINTER *)result__G4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__G4HH=next__E4HH;
+      };
+    };
+    ((__POINTER *)result__G4HH)[ 0]=((__POINTER ) 3);
+    result__PVEH=(void *)((unsigned long)result__G4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__QJJH=first_free__XDVB;
-    while ((((void *)result__QJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZUDH))) {
-      result__QJJH=((__MEMORY *)result__QJJH)->map_next_free__JTB;
+    result__QLKH=first_free__5DVB;
+    while ((((void *)result__QLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__QLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__RVEH))) {
+      result__QLKH=((__MEMORY *)result__QLKH)->map_next_free__RTB;
     };
-    if (((void *)result__QJJH == (void *)NULL)) {
-      result__QJJH=new_page__OA5();
+    if (((void *)result__QLKH == (void *)NULL)) {
+      result__QLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__QJJH,new_size__ZUDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__XUDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__QLKH,new_size__RVEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__QLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__PVEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__QLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__OBGB=((void **)result__XUDH);
-  Self__NAKC=(__INTEGER)(nb_elements__XH5 -  1);
-  while ((Self__NAKC >=  0)) {
-    Result__OBGB[Self__NAKC]=NULL;
-    Self__NAKC=(__INTEGER)(Self__NAKC -  1);
+  Result__WBGB=((void **)result__PVEH);
+  Self__VAKC=(__INTEGER)(nb_elements__5H5 -  1);
+  while ((Self__VAKC >=  0)) {
+    Result__WBGB[Self__VAKC]=NULL;
+    Self__VAKC=(__INTEGER)(Self__VAKC -  1);
   };
-  return(Result__OBGB);
+  return(Result__WBGB);
 }
 
-static void fast_put__to__TOZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UOZ,void *v__VOZ,void *k__WOZ)
+static void fast_put__to__1OZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__2OZ,void *v__3OZ,void *k__4OZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__EGGH,*Self__JGGH;
-  __INTEGER result__DGGH,__tmp__FGGH,Self__GGGH,idx__4OZ,idx__RCTB;
-  __INTEGER new_capacity__SCTB,i__TCTB,result__IGGH,__tmp__KGGH;
-  __INTEGER Self__LGGH,typ_id__AFTB;
-  __POINTER ptr__1ETB,ptr_table__P2GH,next__O2GH,result__Q2GH;
-  __POINTER ptr_table__U2GH,next__T2GH,result__V2GH;
-  __UINTEGER_32 sz__3ETB,a__ZIEH,new_size__0IEH,t__4IEH,a__3IEH;
-  __UINTEGER_32 new_size__X2GH,lab_type__W2GH;
-  void *node__5OZ,*node1__VCTB,*node2__WCTB,*__tmp__MQZ;
-  void **old_buckets__UCTB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__0ETB;
-  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__MXEC;
-  Self__EGGH=((__STRING_CONSTANT *)k__WOZ);
-  result__DGGH= 0;
-  __tmp__FGGH=Self__EGGH->count__DD;
-  Self__GGGH= 1;
-  while ((Self__GGGH <= __tmp__FGGH)) {
-    result__DGGH=(__INTEGER)((__INTEGER)( 5 * result__DGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EGGH->storage__VQO)[(__INTEGER)(Self__GGGH -  1)])));
-    Self__GGGH=(__INTEGER)(Self__GGGH +  1);
-  };
-  if ((result__DGGH <  0)) {
-    result__DGGH=(__INTEGER)(~ result__DGGH);
-  };
-  idx__4OZ=(__INTEGER)(result__DGGH % Self__UOZ->capacity__H2T);
-  node__5OZ=((void **)Self__UOZ->buckets__M2T)[idx__4OZ];
-  while ((! (((void *)node__5OZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->key__Y2T == (void *)k__WOZ)))) {
-    node__5OZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->next__D3T;
-  };
-  if (((void *)node__5OZ == (void *)NULL)) {
-    if ((Self__UOZ->capacity__H2T == Self__UOZ->count__MFZ)) {
-      idx__RCTB= 0;
-      node1__VCTB=NULL;
-      node2__WCTB=NULL;
-      old_buckets__UCTB=Self__UOZ->buckets__M2T;
-      new_capacity__SCTB=prime_number_ceiling__X41((__INTEGER)(Self__UOZ->capacity__H2T +  1));
-      Self__UOZ->buckets__M2T=create__VH5(new_capacity__SCTB);
-      i__TCTB=(__INTEGER)(Self__UOZ->capacity__H2T -  1);
-      Self__UOZ->capacity__H2T=new_capacity__SCTB;
-      while ((i__TCTB >=  0)) {
-        node1__VCTB=((void **)old_buckets__UCTB)[i__TCTB];
-        while (((void *)node1__VCTB != (void *)NULL)) {
-          node2__WCTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->next__D3T;
-          Self__JGGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->key__Y2T);
-          result__IGGH= 0;
-          __tmp__KGGH=Self__JGGH->count__DD;
-          Self__LGGH= 1;
-          while ((Self__LGGH <= __tmp__KGGH)) {
-            result__IGGH=(__INTEGER)((__INTEGER)( 5 * result__IGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JGGH->storage__VQO)[(__INTEGER)(Self__LGGH -  1)])));
-            Self__LGGH=(__INTEGER)(Self__LGGH +  1);
-          };
-          if ((result__IGGH <  0)) {
-            result__IGGH=(__INTEGER)(~ result__IGGH);
-          };
-          idx__RCTB=(__INTEGER)(result__IGGH % Self__UOZ->capacity__H2T);
-          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__VCTB)->next__D3T=((void **)Self__UOZ->buckets__M2T)[idx__RCTB];
-          ((void **)Self__UOZ->buckets__M2T)[idx__RCTB]=node1__VCTB;
-          node1__VCTB=node2__WCTB;
-        };
-        i__TCTB=(__INTEGER)(i__TCTB -  1);
-      };
-      idx__4OZ=(__INTEGER)(result__DGGH % new_capacity__SCTB);
-    };
-    __tmp__MQZ=((void **)Self__UOZ->buckets__M2T)[idx__4OZ];
-    result__0ETB=NULL;
-    ptr__1ETB=((__POINTER )(NULL));
-    typ_id__AFTB= 0;
-    sz__3ETB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
-    if ((sz__3ETB ==  0)) {
-      result__0ETB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-    } else {
-      typ_id__AFTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3ETB);
-      if ((typ_id__AFTB == (__INTEGER)(-  1))) {
-        a__ZIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__0IEH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ETB + a__ZIEH) & (__UINTEGER_32)(~ a__ZIEH));
-        ptr_table__P2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0IEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__O2GH=((__POINTER )(NULL));
-        result__Q2GH=((__POINTER *)ptr_table__P2GH)[ 0];
-        if ((result__Q2GH == (void *)NULL)) {
-          result__Q2GH=new_lab__MRJ(new_size__0IEH);
-          next__O2GH=(void *)((unsigned long)result__Q2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IEH)));
-          ((__POINTER *)next__O2GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__P2GH)[ 0]=next__O2GH;
-        } else {
-          next__O2GH=((__POINTER *)result__Q2GH)[ 0];
-          if ((next__O2GH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0IEH <<  1)) <=  4096)) {
-              next__O2GH=(void *)((unsigned long)result__Q2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IEH)));
+  __STRING_CONSTANT *Self__5HHH,*Self__EIHH;
+  __INTEGER result__4HHH,__tmp__AIHH,Self__BIHH,idx__GPZ,idx__ZCTB;
+  __INTEGER new_capacity__0CTB,i__1CTB,result__DIHH,__tmp__FIHH;
+  __INTEGER Self__GIHH,typ_id__IFTB;
+  __POINTER ptr__DFTB,ptr_table__K4HH,next__J4HH,result__L4HH;
+  __POINTER ptr_table__P4HH,next__O4HH,result__Q4HH;
+  __UINTEGER_32 sz__FFTB,a__JKFH,new_size__KKFH,t__OKFH,a__NKFH;
+  __UINTEGER_32 new_size__S4HH,lab_type__R4HH;
+  void *node__HPZ,*node1__3CTB,*node2__4CTB,*__tmp__UQZ;
+  void **old_buckets__2CTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__CFTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UXEC;
+  Self__5HHH=((__STRING_CONSTANT *)k__4OZ);
+  result__4HHH= 0;
+  __tmp__AIHH=Self__5HHH->count__DD;
+  Self__BIHH= 1;
+  while ((Self__BIHH <= __tmp__AIHH)) {
+    result__4HHH=(__INTEGER)((__INTEGER)( 5 * result__4HHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5HHH->storage__3QO)[(__INTEGER)(Self__BIHH -  1)])));
+    Self__BIHH=(__INTEGER)(Self__BIHH +  1);
+  };
+  if ((result__4HHH <  0)) {
+    result__4HHH=(__INTEGER)(~ result__4HHH);
+  };
+  idx__GPZ=(__INTEGER)(result__4HHH % Self__2OZ->capacity__P2T);
+  node__HPZ=((void **)Self__2OZ->buckets__U2T)[idx__GPZ];
+  while ((! (((void *)node__HPZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__HPZ)->key__A3T == (void *)k__4OZ)))) {
+    node__HPZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__HPZ)->next__L3T;
+  };
+  if (((void *)node__HPZ == (void *)NULL)) {
+    if ((Self__2OZ->capacity__P2T == Self__2OZ->count__UFZ)) {
+      idx__ZCTB= 0;
+      node1__3CTB=NULL;
+      node2__4CTB=NULL;
+      old_buckets__2CTB=Self__2OZ->buckets__U2T;
+      new_capacity__0CTB=prime_number_ceiling__541((__INTEGER)(Self__2OZ->capacity__P2T +  1));
+      Self__2OZ->buckets__U2T=create__3H5(new_capacity__0CTB);
+      i__1CTB=(__INTEGER)(Self__2OZ->capacity__P2T -  1);
+      Self__2OZ->capacity__P2T=new_capacity__0CTB;
+      while ((i__1CTB >=  0)) {
+        node1__3CTB=((void **)old_buckets__2CTB)[i__1CTB];
+        while (((void *)node1__3CTB != (void *)NULL)) {
+          node2__4CTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__3CTB)->next__L3T;
+          Self__EIHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__3CTB)->key__A3T);
+          result__DIHH= 0;
+          __tmp__FIHH=Self__EIHH->count__DD;
+          Self__GIHH= 1;
+          while ((Self__GIHH <= __tmp__FIHH)) {
+            result__DIHH=(__INTEGER)((__INTEGER)( 5 * result__DIHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EIHH->storage__3QO)[(__INTEGER)(Self__GIHH -  1)])));
+            Self__GIHH=(__INTEGER)(Self__GIHH +  1);
+          };
+          if ((result__DIHH <  0)) {
+            result__DIHH=(__INTEGER)(~ result__DIHH);
+          };
+          idx__ZCTB=(__INTEGER)(result__DIHH % Self__2OZ->capacity__P2T);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__3CTB)->next__L3T=((void **)Self__2OZ->buckets__U2T)[idx__ZCTB];
+          ((void **)Self__2OZ->buckets__U2T)[idx__ZCTB]=node1__3CTB;
+          node1__3CTB=node2__4CTB;
+        };
+        i__1CTB=(__INTEGER)(i__1CTB -  1);
+      };
+      idx__GPZ=(__INTEGER)(result__4HHH % new_capacity__0CTB);
+    };
+    __tmp__UQZ=((void **)Self__2OZ->buckets__U2T)[idx__GPZ];
+    result__CFTB=NULL;
+    ptr__DFTB=((__POINTER )(NULL));
+    typ_id__IFTB= 0;
+    sz__FFTB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__FFTB ==  0)) {
+      result__CFTB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__IFTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__FFTB);
+      if ((typ_id__IFTB == (__INTEGER)(-  1))) {
+        a__JKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FFTB + a__JKFH) & (__UINTEGER_32)(~ a__JKFH));
+        ptr_table__K4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__J4HH=((__POINTER )(NULL));
+        result__L4HH=((__POINTER *)ptr_table__K4HH)[ 0];
+        if ((result__L4HH == (void *)NULL)) {
+          result__L4HH=new_lab__URJ(new_size__KKFH);
+          next__J4HH=(void *)((unsigned long)result__L4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKFH)));
+          ((__POINTER *)next__J4HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K4HH)[ 0]=next__J4HH;
+        } else {
+          next__J4HH=((__POINTER *)result__L4HH)[ 0];
+          if ((next__J4HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L4HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KKFH <<  1)) <=  4096)) {
+              next__J4HH=(void *)((unsigned long)result__L4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKFH)));
             } else {
-              next__O2GH=new_lab__MRJ(new_size__0IEH);
-            };
-            ((__POINTER *)next__O2GH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__P2GH)[ 0]=next__O2GH;
-          } else {
-            ((__POINTER *)result__Q2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__Q2GH=next__O2GH;
-          };
-        };
-        ptr__1ETB=result__Q2GH;
-      } else {
-        t__4IEH=((__UINTEGER_32 )typ_id__AFTB);
-        a__3IEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__X2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__3ETB + a__3IEH) & (__UINTEGER_32)(~ a__3IEH));
-        ptr_table__U2GH=((__POINTER )(&(table_type[(t__4IEH)])));
-        lab_type__W2GH=(__UINTEGER_32)(t__4IEH |  1);
-        next__T2GH=((__POINTER )(NULL));
-        result__V2GH=((__POINTER *)ptr_table__U2GH)[ 0];
-        if ((result__V2GH == (void *)NULL)) {
-          result__V2GH=new_lab__MRJ(lab_type__W2GH);
-          next__T2GH=(void *)((unsigned long)result__V2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2GH)));
-          ((__POINTER *)next__T2GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__U2GH)[ 0]=next__T2GH;
-        } else {
-          next__T2GH=((__POINTER *)result__V2GH)[ 0];
-          if ((next__T2GH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V2GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__X2GH <<  1)) <=  4096)) {
-              next__T2GH=(void *)((unsigned long)result__V2GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2GH)));
+              next__J4HH=new_lab__URJ(new_size__KKFH);
+            };
+            ((__POINTER *)next__J4HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__K4HH)[ 0]=next__J4HH;
+          } else {
+            ((__POINTER *)result__L4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__L4HH=next__J4HH;
+          };
+        };
+        ptr__DFTB=result__L4HH;
+      } else {
+        t__OKFH=((__UINTEGER_32 )typ_id__IFTB);
+        a__NKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__S4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__FFTB + a__NKFH) & (__UINTEGER_32)(~ a__NKFH));
+        ptr_table__P4HH=((__POINTER )(&(table_type[(t__OKFH)])));
+        lab_type__R4HH=(__UINTEGER_32)(t__OKFH |  1);
+        next__O4HH=((__POINTER )(NULL));
+        result__Q4HH=((__POINTER *)ptr_table__P4HH)[ 0];
+        if ((result__Q4HH == (void *)NULL)) {
+          result__Q4HH=new_lab__URJ(lab_type__R4HH);
+          next__O4HH=(void *)((unsigned long)result__Q4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4HH)));
+          ((__POINTER *)next__O4HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__P4HH)[ 0]=next__O4HH;
+        } else {
+          next__O4HH=((__POINTER *)result__Q4HH)[ 0];
+          if ((next__O4HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q4HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__S4HH <<  1)) <=  4096)) {
+              next__O4HH=(void *)((unsigned long)result__Q4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4HH)));
             } else {
-              next__T2GH=new_lab__MRJ(lab_type__W2GH);
+              next__O4HH=new_lab__URJ(lab_type__R4HH);
             };
-            ((__POINTER *)next__T2GH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__U2GH)[ 0]=next__T2GH;
+            ((__POINTER *)next__O4HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__P4HH)[ 0]=next__O4HH;
           } else {
-            ((__POINTER *)result__V2GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__V2GH=next__T2GH;
+            ((__POINTER *)result__Q4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__Q4HH=next__O4HH;
           };
         };
-        ptr__1ETB=result__V2GH;
+        ptr__DFTB=result__Q4HH;
       };
-      result__0ETB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__1ETB);
-      *(result__0ETB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__CFTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__DFTB);
+      *(result__CFTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    Self__MXEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__0ETB);
-    Self__MXEC->item__L3T=v__VOZ;
-    Self__MXEC->key__Y2T=k__WOZ;
-    Self__MXEC->next__D3T=__tmp__MQZ;
-    node__5OZ=result__0ETB;
-    ((void **)Self__UOZ->buckets__M2T)[idx__4OZ]=result__0ETB;
-    Self__UOZ->count__MFZ=(__INTEGER)(Self__UOZ->count__MFZ +  1);
+    Self__UXEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__CFTB);
+    Self__UXEC->item__T3T=v__3OZ;
+    Self__UXEC->key__A3T=k__4OZ;
+    Self__UXEC->next__L3T=__tmp__UQZ;
+    node__HPZ=result__CFTB;
+    ((void **)Self__2OZ->buckets__U2T)[idx__GPZ]=result__CFTB;
+    Self__2OZ->count__UFZ=(__INTEGER)(Self__2OZ->count__UFZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5OZ)->item__L3T=v__VOZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__HPZ)->item__T3T=v__3OZ;
   };
 }
 
-static void** create__1HYB(__INTEGER nb_elements__3HYB)
+static void** create__DIYB(__INTEGER nb_elements__FIYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MVDH,a__RVDH,new_size__NVDH,new_size2__OVDH,a__VVDH;
-  __UINTEGER_32 new_size__WVDH;
-  __POINTER result__LVDH,ptr_table__Z2GH,next__Y2GH,result__02GH;
-  void *result__TJJH;
-  __INTEGER Self__51OC;
-  void **Result__2I1B;
-  sz__MVDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3HYB * ((__INTEGER )(sizeof(void *)))));
-  result__LVDH=((__POINTER )(NULL));
-  a__RVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NVDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVDH + a__RVDH) & (__UINTEGER_32)(~ a__RVDH));
-  new_size2__OVDH=(__UINTEGER_32)(new_size__NVDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OVDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WVDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OVDH + a__VVDH) & (__UINTEGER_32)(~ a__VVDH));
-    ptr_table__Z2GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WVDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__Y2GH=((__POINTER )(NULL));
-    result__02GH=((__POINTER *)ptr_table__Z2GH)[ 0];
-    if ((result__02GH == (void *)NULL)) {
-      result__02GH=new_lab__MRJ(new_size__WVDH);
-      next__Y2GH=(void *)((unsigned long)result__02GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVDH)));
-      ((__POINTER *)next__Y2GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__Z2GH)[ 0]=next__Y2GH;
-    } else {
-      next__Y2GH=((__POINTER *)result__02GH)[ 0];
-      if ((next__Y2GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__02GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WVDH <<  1)) <=  4096)) {
-          next__Y2GH=(void *)((unsigned long)result__02GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WVDH)));
-        } else {
-          next__Y2GH=new_lab__MRJ(new_size__WVDH);
-        };
-        ((__POINTER *)next__Y2GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Z2GH)[ 0]=next__Y2GH;
-      } else {
-        ((__POINTER *)result__02GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__02GH=next__Y2GH;
-      };
-    };
-    ((__POINTER *)result__02GH)[ 0]=((__POINTER ) 3);
-    result__LVDH=(void *)((unsigned long)result__02GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EWEH,a__JWEH,new_size__FWEH,new_size2__GWEH,a__NWEH;
+  __UINTEGER_32 new_size__OWEH;
+  __POINTER result__DWEH,ptr_table__U4HH,next__T4HH,result__V4HH;
+  void *result__TLKH;
+  __INTEGER Self__H2OC;
+  void **Result__EJ1B;
+  sz__EWEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__FIYB * ((__INTEGER )(sizeof(void *)))));
+  result__DWEH=((__POINTER )(NULL));
+  a__JWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__EWEH + a__JWEH) & (__UINTEGER_32)(~ a__JWEH));
+  new_size2__GWEH=(__UINTEGER_32)(new_size__FWEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GWEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OWEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GWEH + a__NWEH) & (__UINTEGER_32)(~ a__NWEH));
+    ptr_table__U4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OWEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__T4HH=((__POINTER )(NULL));
+    result__V4HH=((__POINTER *)ptr_table__U4HH)[ 0];
+    if ((result__V4HH == (void *)NULL)) {
+      result__V4HH=new_lab__URJ(new_size__OWEH);
+      next__T4HH=(void *)((unsigned long)result__V4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OWEH)));
+      ((__POINTER *)next__T4HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__U4HH)[ 0]=next__T4HH;
+    } else {
+      next__T4HH=((__POINTER *)result__V4HH)[ 0];
+      if ((next__T4HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V4HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OWEH <<  1)) <=  4096)) {
+          next__T4HH=(void *)((unsigned long)result__V4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OWEH)));
+        } else {
+          next__T4HH=new_lab__URJ(new_size__OWEH);
+        };
+        ((__POINTER *)next__T4HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__U4HH)[ 0]=next__T4HH;
+      } else {
+        ((__POINTER *)result__V4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__V4HH=next__T4HH;
+      };
+    };
+    ((__POINTER *)result__V4HH)[ 0]=((__POINTER ) 3);
+    result__DWEH=(void *)((unsigned long)result__V4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__TJJH=first_free__XDVB;
-    while ((((void *)result__TJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__NVDH))) {
-      result__TJJH=((__MEMORY *)result__TJJH)->map_next_free__JTB;
+    result__TLKH=first_free__5DVB;
+    while ((((void *)result__TLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__FWEH))) {
+      result__TLKH=((__MEMORY *)result__TLKH)->map_next_free__RTB;
     };
-    if (((void *)result__TJJH == (void *)NULL)) {
-      result__TJJH=new_page__OA5();
+    if (((void *)result__TLKH == (void *)NULL)) {
+      result__TLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__TJJH,new_size__NVDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__LVDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__TLKH,new_size__FWEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__DWEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__2I1B=((void **)result__LVDH);
-  Self__51OC=(__INTEGER)(nb_elements__3HYB -  1);
-  while ((Self__51OC >=  0)) {
-    Result__2I1B[Self__51OC]=NULL;
-    Self__51OC=(__INTEGER)(Self__51OC -  1);
+  Result__EJ1B=((void **)result__DWEH);
+  Self__H2OC=(__INTEGER)(nb_elements__FIYB -  1);
+  while ((Self__H2OC >=  0)) {
+    Result__EJ1B[Self__H2OC]=NULL;
+    Self__H2OC=(__INTEGER)(Self__H2OC -  1);
   };
-  return(Result__2I1B);
+  return(Result__EJ1B);
 }
 
-static void* get__DTI(void *n__FTI)
+static void* get__LTI(void *n__NTI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__NTI;
-  __ITM_TYPE_SIMPLE *result__LML,*Self__SRU;
-  __POINTER ptr__MML,ptr_table__42GH,next__32GH,result__52GH;
-  __POINTER ptr_table__D3GH,next__C3GH,result__E3GH;
-  __INTEGER typ_id__RML;
-  __UINTEGER_32 sz__OML,a__ZVDH,new_size__0VDH,t__4VDH,a__3VDH;
-  __UINTEGER_32 new_size__G3GH,lab_type__F3GH;
-  result__NTI=fast_reference_at__Y1T(dico__STI,n__FTI);
-  if (((void *)result__NTI == (void *)NULL)) {
-    result__LML=NULL;
-    ptr__MML=((__POINTER )(NULL));
-    typ_id__RML= 0;
-    sz__OML=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
-    if ((sz__OML ==  0)) {
-      result__LML=ITM_TYPE_SIMPLE__;
-    } else {
-      typ_id__RML=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OML);
-      if ((typ_id__RML == (__INTEGER)(-  1))) {
-        a__ZVDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__0VDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OML + a__ZVDH) & (__UINTEGER_32)(~ a__ZVDH));
-        ptr_table__42GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0VDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__32GH=((__POINTER )(NULL));
-        result__52GH=((__POINTER *)ptr_table__42GH)[ 0];
-        if ((result__52GH == (void *)NULL)) {
-          result__52GH=new_lab__MRJ(new_size__0VDH);
-          next__32GH=(void *)((unsigned long)result__52GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VDH)));
-          ((__POINTER *)next__32GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__42GH)[ 0]=next__32GH;
-        } else {
-          next__32GH=((__POINTER *)result__52GH)[ 0];
-          if ((next__32GH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__52GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__0VDH <<  1)) <=  4096)) {
-              next__32GH=(void *)((unsigned long)result__52GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VDH)));
+  void *result__VTI;
+  __ITM_TYPE_SIMPLE *result__TML,*Self__0RU;
+  __POINTER ptr__UML,ptr_table__Z4HH,next__Y4HH,result__04HH;
+  __POINTER ptr_table__44HH,next__34HH,result__54HH;
+  __INTEGER typ_id__ZML;
+  __UINTEGER_32 sz__WML,a__RWEH,new_size__SWEH,t__WWEH,a__VWEH;
+  __UINTEGER_32 new_size__B5HH,lab_type__A5HH;
+  result__VTI=fast_reference_at__A2T(dico__0TI,n__NTI);
+  if (((void *)result__VTI == (void *)NULL)) {
+    result__TML=NULL;
+    ptr__UML=((__POINTER )(NULL));
+    typ_id__ZML= 0;
+    sz__WML=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__WML ==  0)) {
+      result__TML=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__ZML=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WML);
+      if ((typ_id__ZML == (__INTEGER)(-  1))) {
+        a__RWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__WML + a__RWEH) & (__UINTEGER_32)(~ a__RWEH));
+        ptr_table__Z4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SWEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__Y4HH=((__POINTER )(NULL));
+        result__04HH=((__POINTER *)ptr_table__Z4HH)[ 0];
+        if ((result__04HH == (void *)NULL)) {
+          result__04HH=new_lab__URJ(new_size__SWEH);
+          next__Y4HH=(void *)((unsigned long)result__04HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWEH)));
+          ((__POINTER *)next__Y4HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__Z4HH)[ 0]=next__Y4HH;
+        } else {
+          next__Y4HH=((__POINTER *)result__04HH)[ 0];
+          if ((next__Y4HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__04HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SWEH <<  1)) <=  4096)) {
+              next__Y4HH=(void *)((unsigned long)result__04HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWEH)));
             } else {
-              next__32GH=new_lab__MRJ(new_size__0VDH);
-            };
-            ((__POINTER *)next__32GH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__42GH)[ 0]=next__32GH;
-          } else {
-            ((__POINTER *)result__52GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__32GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__52GH=next__32GH;
-          };
-        };
-        ptr__MML=result__52GH;
-      } else {
-        t__4VDH=((__UINTEGER_32 )typ_id__RML);
-        a__3VDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__G3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__OML + a__3VDH) & (__UINTEGER_32)(~ a__3VDH));
-        ptr_table__D3GH=((__POINTER )(&(table_type[(t__4VDH)])));
-        lab_type__F3GH=(__UINTEGER_32)(t__4VDH |  1);
-        next__C3GH=((__POINTER )(NULL));
-        result__E3GH=((__POINTER *)ptr_table__D3GH)[ 0];
-        if ((result__E3GH == (void *)NULL)) {
-          result__E3GH=new_lab__MRJ(lab_type__F3GH);
-          next__C3GH=(void *)((unsigned long)result__E3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3GH)));
-          ((__POINTER *)next__C3GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__D3GH)[ 0]=next__C3GH;
-        } else {
-          next__C3GH=((__POINTER *)result__E3GH)[ 0];
-          if ((next__C3GH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G3GH <<  1)) <=  4096)) {
-              next__C3GH=(void *)((unsigned long)result__E3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3GH)));
+              next__Y4HH=new_lab__URJ(new_size__SWEH);
+            };
+            ((__POINTER *)next__Y4HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Z4HH)[ 0]=next__Y4HH;
+          } else {
+            ((__POINTER *)result__04HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__04HH=next__Y4HH;
+          };
+        };
+        ptr__UML=result__04HH;
+      } else {
+        t__WWEH=((__UINTEGER_32 )typ_id__ZML);
+        a__VWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__B5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__WML + a__VWEH) & (__UINTEGER_32)(~ a__VWEH));
+        ptr_table__44HH=((__POINTER )(&(table_type[(t__WWEH)])));
+        lab_type__A5HH=(__UINTEGER_32)(t__WWEH |  1);
+        next__34HH=((__POINTER )(NULL));
+        result__54HH=((__POINTER *)ptr_table__44HH)[ 0];
+        if ((result__54HH == (void *)NULL)) {
+          result__54HH=new_lab__URJ(lab_type__A5HH);
+          next__34HH=(void *)((unsigned long)result__54HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B5HH)));
+          ((__POINTER *)next__34HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__44HH)[ 0]=next__34HH;
+        } else {
+          next__34HH=((__POINTER *)result__54HH)[ 0];
+          if ((next__34HH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__54HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__B5HH <<  1)) <=  4096)) {
+              next__34HH=(void *)((unsigned long)result__54HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B5HH)));
             } else {
-              next__C3GH=new_lab__MRJ(lab_type__F3GH);
+              next__34HH=new_lab__URJ(lab_type__A5HH);
             };
-            ((__POINTER *)next__C3GH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__D3GH)[ 0]=next__C3GH;
+            ((__POINTER *)next__34HH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__44HH)[ 0]=next__34HH;
           } else {
-            ((__POINTER *)result__E3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__E3GH=next__C3GH;
+            ((__POINTER *)result__54HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__54HH=next__34HH;
           };
         };
-        ptr__MML=result__E3GH;
+        ptr__UML=result__54HH;
       };
-      result__LML=((__ITM_TYPE_SIMPLE *)ptr__MML);
-      *(result__LML) = *(ITM_TYPE_SIMPLE__);
+      result__TML=((__ITM_TYPE_SIMPLE *)ptr__UML);
+      *(result__TML) = *(ITM_TYPE_SIMPLE__);
     };
-    Self__SRU=((__ITM_TYPE_SIMPLE *)result__LML);
-    Self__SRU->name__KYP=n__FTI;
-    fast_put__to__TOZ(dico__STI,Self__SRU,n__FTI);
-    result__NTI=result__LML;
+    Self__0RU=((__ITM_TYPE_SIMPLE *)result__TML);
+    Self__0RU->name__SYP=n__NTI;
+    fast_put__to__1OZ(dico__0TI,Self__0RU,n__NTI);
+    result__VTI=result__TML;
   };
-  return(result__NTI);
+  return(result__VTI);
 }
 
-static void** create__EHQB(__INTEGER nb_elements__GHQB)
+static void** create__MHQB(__INTEGER nb_elements__OHQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__AWDH,a__FWDH,new_size__BWDH,new_size2__CWDH,a__JWDH;
-  __UINTEGER_32 new_size__KWDH;
-  __POINTER result__5VDH,ptr_table__I3GH,next__H3GH,result__J3GH;
-  void *result__WJJH;
-  __INTEGER Self__EXMC;
-  void **Result__RATB;
-  sz__AWDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GHQB * ((__INTEGER )(sizeof(void *)))));
-  result__5VDH=((__POINTER )(NULL));
-  a__FWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__BWDH=(__UINTEGER_32)((__UINTEGER_32)(sz__AWDH + a__FWDH) & (__UINTEGER_32)(~ a__FWDH));
-  new_size2__CWDH=(__UINTEGER_32)(new_size__BWDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__CWDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__JWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__KWDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CWDH + a__JWDH) & (__UINTEGER_32)(~ a__JWDH));
-    ptr_table__I3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KWDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__H3GH=((__POINTER )(NULL));
-    result__J3GH=((__POINTER *)ptr_table__I3GH)[ 0];
-    if ((result__J3GH == (void *)NULL)) {
-      result__J3GH=new_lab__MRJ(new_size__KWDH);
-      next__H3GH=(void *)((unsigned long)result__J3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWDH)));
-      ((__POINTER *)next__H3GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__I3GH)[ 0]=next__H3GH;
-    } else {
-      next__H3GH=((__POINTER *)result__J3GH)[ 0];
-      if ((next__H3GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KWDH <<  1)) <=  4096)) {
-          next__H3GH=(void *)((unsigned long)result__J3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWDH)));
-        } else {
-          next__H3GH=new_lab__MRJ(new_size__KWDH);
-        };
-        ((__POINTER *)next__H3GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__I3GH)[ 0]=next__H3GH;
-      } else {
-        ((__POINTER *)result__J3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__J3GH=next__H3GH;
-      };
-    };
-    ((__POINTER *)result__J3GH)[ 0]=((__POINTER ) 3);
-    result__5VDH=(void *)((unsigned long)result__J3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__YWEH,a__3WEH,new_size__ZWEH,new_size2__0WEH,a__BXEH;
+  __UINTEGER_32 new_size__CXEH;
+  __POINTER result__XWEH,ptr_table__D5HH,next__C5HH,result__E5HH;
+  void *result__WLKH;
+  __INTEGER Self__MXMC;
+  void **Result__ZATB;
+  sz__YWEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OHQB * ((__INTEGER )(sizeof(void *)))));
+  result__XWEH=((__POINTER )(NULL));
+  a__3WEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__YWEH + a__3WEH) & (__UINTEGER_32)(~ a__3WEH));
+  new_size2__0WEH=(__UINTEGER_32)(new_size__ZWEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0WEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CXEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0WEH + a__BXEH) & (__UINTEGER_32)(~ a__BXEH));
+    ptr_table__D5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CXEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__C5HH=((__POINTER )(NULL));
+    result__E5HH=((__POINTER *)ptr_table__D5HH)[ 0];
+    if ((result__E5HH == (void *)NULL)) {
+      result__E5HH=new_lab__URJ(new_size__CXEH);
+      next__C5HH=(void *)((unsigned long)result__E5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXEH)));
+      ((__POINTER *)next__C5HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__D5HH)[ 0]=next__C5HH;
+    } else {
+      next__C5HH=((__POINTER *)result__E5HH)[ 0];
+      if ((next__C5HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E5HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CXEH <<  1)) <=  4096)) {
+          next__C5HH=(void *)((unsigned long)result__E5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXEH)));
+        } else {
+          next__C5HH=new_lab__URJ(new_size__CXEH);
+        };
+        ((__POINTER *)next__C5HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D5HH)[ 0]=next__C5HH;
+      } else {
+        ((__POINTER *)result__E5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__E5HH=next__C5HH;
+      };
+    };
+    ((__POINTER *)result__E5HH)[ 0]=((__POINTER ) 3);
+    result__XWEH=(void *)((unsigned long)result__E5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__WJJH=first_free__XDVB;
-    while ((((void *)result__WJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__BWDH))) {
-      result__WJJH=((__MEMORY *)result__WJJH)->map_next_free__JTB;
+    result__WLKH=first_free__5DVB;
+    while ((((void *)result__WLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__ZWEH))) {
+      result__WLKH=((__MEMORY *)result__WLKH)->map_next_free__RTB;
     };
-    if (((void *)result__WJJH == (void *)NULL)) {
-      result__WJJH=new_page__OA5();
+    if (((void *)result__WLKH == (void *)NULL)) {
+      result__WLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__WJJH,new_size__BWDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__5VDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__WLKH,new_size__ZWEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__XWEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__RATB=((void **)result__5VDH);
-  Self__EXMC=(__INTEGER)(nb_elements__GHQB -  1);
-  while ((Self__EXMC >=  0)) {
-    Result__RATB[Self__EXMC]=NULL;
-    Self__EXMC=(__INTEGER)(Self__EXMC -  1);
+  Result__ZATB=((void **)result__XWEH);
+  Self__MXMC=(__INTEGER)(nb_elements__OHQB -  1);
+  while ((Self__MXMC >=  0)) {
+    Result__ZATB[Self__MXMC]=NULL;
+    Self__MXMC=(__INTEGER)(Self__MXMC -  1);
   };
-  return(Result__RATB);
+  return(Result__ZATB);
 }
 
-static void** create__U1PB(__INTEGER nb_elements__W1PB)
+static void** create__21PB(__INTEGER nb_elements__41PB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MWDH,a__RWDH,new_size__NWDH,new_size2__OWDH,a__VWDH;
-  __UINTEGER_32 new_size__WWDH;
-  __POINTER result__LWDH,ptr_table__N3GH,next__M3GH,result__O3GH;
-  void *result__ZJJH;
-  __INTEGER Self__3VMC;
-  void **Result__GYSB;
-  sz__MWDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__W1PB * ((__INTEGER )(sizeof(void *)))));
-  result__LWDH=((__POINTER )(NULL));
-  a__RWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NWDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MWDH + a__RWDH) & (__UINTEGER_32)(~ a__RWDH));
-  new_size2__OWDH=(__UINTEGER_32)(new_size__NWDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OWDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VWDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WWDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OWDH + a__VWDH) & (__UINTEGER_32)(~ a__VWDH));
-    ptr_table__N3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WWDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__M3GH=((__POINTER )(NULL));
-    result__O3GH=((__POINTER *)ptr_table__N3GH)[ 0];
-    if ((result__O3GH == (void *)NULL)) {
-      result__O3GH=new_lab__MRJ(new_size__WWDH);
-      next__M3GH=(void *)((unsigned long)result__O3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WWDH)));
-      ((__POINTER *)next__M3GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__N3GH)[ 0]=next__M3GH;
-    } else {
-      next__M3GH=((__POINTER *)result__O3GH)[ 0];
-      if ((next__M3GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WWDH <<  1)) <=  4096)) {
-          next__M3GH=(void *)((unsigned long)result__O3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WWDH)));
-        } else {
-          next__M3GH=new_lab__MRJ(new_size__WWDH);
-        };
-        ((__POINTER *)next__M3GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__N3GH)[ 0]=next__M3GH;
-      } else {
-        ((__POINTER *)result__O3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__O3GH=next__M3GH;
-      };
-    };
-    ((__POINTER *)result__O3GH)[ 0]=((__POINTER ) 3);
-    result__LWDH=(void *)((unsigned long)result__O3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EXEH,a__JXEH,new_size__FXEH,new_size2__GXEH,a__NXEH;
+  __UINTEGER_32 new_size__OXEH;
+  __POINTER result__DXEH,ptr_table__I5HH,next__H5HH,result__J5HH;
+  void *result__ZLKH;
+  __INTEGER Self__FWMC;
+  void **Result__OYSB;
+  sz__EXEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__41PB * ((__INTEGER )(sizeof(void *)))));
+  result__DXEH=((__POINTER )(NULL));
+  a__JXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXEH + a__JXEH) & (__UINTEGER_32)(~ a__JXEH));
+  new_size2__GXEH=(__UINTEGER_32)(new_size__FXEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GXEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OXEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GXEH + a__NXEH) & (__UINTEGER_32)(~ a__NXEH));
+    ptr_table__I5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OXEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__H5HH=((__POINTER )(NULL));
+    result__J5HH=((__POINTER *)ptr_table__I5HH)[ 0];
+    if ((result__J5HH == (void *)NULL)) {
+      result__J5HH=new_lab__URJ(new_size__OXEH);
+      next__H5HH=(void *)((unsigned long)result__J5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXEH)));
+      ((__POINTER *)next__H5HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__I5HH)[ 0]=next__H5HH;
+    } else {
+      next__H5HH=((__POINTER *)result__J5HH)[ 0];
+      if ((next__H5HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J5HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OXEH <<  1)) <=  4096)) {
+          next__H5HH=(void *)((unsigned long)result__J5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OXEH)));
+        } else {
+          next__H5HH=new_lab__URJ(new_size__OXEH);
+        };
+        ((__POINTER *)next__H5HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__I5HH)[ 0]=next__H5HH;
+      } else {
+        ((__POINTER *)result__J5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__J5HH=next__H5HH;
+      };
+    };
+    ((__POINTER *)result__J5HH)[ 0]=((__POINTER ) 3);
+    result__DXEH=(void *)((unsigned long)result__J5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__ZJJH=first_free__XDVB;
-    while ((((void *)result__ZJJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZJJH)->map_size_and_id__ITB &  4294967292LU) < new_size__NWDH))) {
-      result__ZJJH=((__MEMORY *)result__ZJJH)->map_next_free__JTB;
+    result__ZLKH=first_free__5DVB;
+    while ((((void *)result__ZLKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZLKH)->map_size_and_id__QTB &  4294967292LU) < new_size__FXEH))) {
+      result__ZLKH=((__MEMORY *)result__ZLKH)->map_next_free__RTB;
     };
-    if (((void *)result__ZJJH == (void *)NULL)) {
-      result__ZJJH=new_page__OA5();
+    if (((void *)result__ZLKH == (void *)NULL)) {
+      result__ZLKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__ZJJH,new_size__NWDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZJJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__LWDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZJJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__ZLKH,new_size__FXEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZLKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__DXEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZLKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__GYSB=((void **)result__LWDH);
-  Self__3VMC=(__INTEGER)(nb_elements__W1PB -  1);
-  while ((Self__3VMC >=  0)) {
-    Result__GYSB[Self__3VMC]=NULL;
-    Self__3VMC=(__INTEGER)(Self__3VMC -  1);
+  Result__OYSB=((void **)result__DXEH);
+  Self__FWMC=(__INTEGER)(nb_elements__41PB -  1);
+  while ((Self__FWMC >=  0)) {
+    Result__OYSB[Self__FWMC]=NULL;
+    Self__FWMC=(__INTEGER)(Self__FWMC -  1);
   };
-  return(Result__GYSB);
+  return(Result__OYSB);
 }
 
-static void** create__53ZB(__INTEGER nb_elements__B4ZB)
+static void** create__H4ZB(__INTEGER nb_elements__J4ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YWDH,a__3WDH,new_size__ZWDH,new_size2__0WDH,a__BXDH;
-  __UINTEGER_32 new_size__CXDH;
-  __POINTER result__XWDH,ptr_table__S3GH,next__R3GH,result__T3GH;
-  void *result__2JJH;
-  __INTEGER Self__L5OC;
-  void **Result__BF2B;
-  sz__YWDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__B4ZB * ((__INTEGER )(sizeof(void *)))));
-  result__XWDH=((__POINTER )(NULL));
-  a__3WDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZWDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YWDH + a__3WDH) & (__UINTEGER_32)(~ a__3WDH));
-  new_size2__0WDH=(__UINTEGER_32)(new_size__ZWDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0WDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BXDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CXDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0WDH + a__BXDH) & (__UINTEGER_32)(~ a__BXDH));
-    ptr_table__S3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CXDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__R3GH=((__POINTER )(NULL));
-    result__T3GH=((__POINTER *)ptr_table__S3GH)[ 0];
-    if ((result__T3GH == (void *)NULL)) {
-      result__T3GH=new_lab__MRJ(new_size__CXDH);
-      next__R3GH=(void *)((unsigned long)result__T3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXDH)));
-      ((__POINTER *)next__R3GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__S3GH)[ 0]=next__R3GH;
-    } else {
-      next__R3GH=((__POINTER *)result__T3GH)[ 0];
-      if ((next__R3GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CXDH <<  1)) <=  4096)) {
-          next__R3GH=(void *)((unsigned long)result__T3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXDH)));
-        } else {
-          next__R3GH=new_lab__MRJ(new_size__CXDH);
-        };
-        ((__POINTER *)next__R3GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__S3GH)[ 0]=next__R3GH;
-      } else {
-        ((__POINTER *)result__T3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__T3GH=next__R3GH;
-      };
-    };
-    ((__POINTER *)result__T3GH)[ 0]=((__POINTER ) 3);
-    result__XWDH=(void *)((unsigned long)result__T3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QXEH,a__VXEH,new_size__RXEH,new_size2__SXEH,a__ZXEH;
+  __UINTEGER_32 new_size__0XEH;
+  __POINTER result__PXEH,ptr_table__N5HH,next__M5HH,result__O5HH;
+  void *result__2LKH;
+  __INTEGER Self__T5OC;
+  void **Result__JF2B;
+  sz__QXEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__J4ZB * ((__INTEGER )(sizeof(void *)))));
+  result__PXEH=((__POINTER )(NULL));
+  a__VXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXEH + a__VXEH) & (__UINTEGER_32)(~ a__VXEH));
+  new_size2__SXEH=(__UINTEGER_32)(new_size__RXEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SXEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0XEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SXEH + a__ZXEH) & (__UINTEGER_32)(~ a__ZXEH));
+    ptr_table__N5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0XEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__M5HH=((__POINTER )(NULL));
+    result__O5HH=((__POINTER *)ptr_table__N5HH)[ 0];
+    if ((result__O5HH == (void *)NULL)) {
+      result__O5HH=new_lab__URJ(new_size__0XEH);
+      next__M5HH=(void *)((unsigned long)result__O5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XEH)));
+      ((__POINTER *)next__M5HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__N5HH)[ 0]=next__M5HH;
+    } else {
+      next__M5HH=((__POINTER *)result__O5HH)[ 0];
+      if ((next__M5HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O5HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0XEH <<  1)) <=  4096)) {
+          next__M5HH=(void *)((unsigned long)result__O5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XEH)));
+        } else {
+          next__M5HH=new_lab__URJ(new_size__0XEH);
+        };
+        ((__POINTER *)next__M5HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__N5HH)[ 0]=next__M5HH;
+      } else {
+        ((__POINTER *)result__O5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__O5HH=next__M5HH;
+      };
+    };
+    ((__POINTER *)result__O5HH)[ 0]=((__POINTER ) 3);
+    result__PXEH=(void *)((unsigned long)result__O5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__2JJH=first_free__XDVB;
-    while ((((void *)result__2JJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2JJH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZWDH))) {
-      result__2JJH=((__MEMORY *)result__2JJH)->map_next_free__JTB;
+    result__2LKH=first_free__5DVB;
+    while ((((void *)result__2LKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2LKH)->map_size_and_id__QTB &  4294967292LU) < new_size__RXEH))) {
+      result__2LKH=((__MEMORY *)result__2LKH)->map_next_free__RTB;
     };
-    if (((void *)result__2JJH == (void *)NULL)) {
-      result__2JJH=new_page__OA5();
+    if (((void *)result__2LKH == (void *)NULL)) {
+      result__2LKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__2JJH,new_size__ZWDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2JJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__XWDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2JJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__2LKH,new_size__RXEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2LKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__PXEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2LKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__BF2B=((void **)result__XWDH);
-  Self__L5OC=(__INTEGER)(nb_elements__B4ZB -  1);
-  while ((Self__L5OC >=  0)) {
-    Result__BF2B[Self__L5OC]=NULL;
-    Self__L5OC=(__INTEGER)(Self__L5OC -  1);
+  Result__JF2B=((void **)result__PXEH);
+  Self__T5OC=(__INTEGER)(nb_elements__J4ZB -  1);
+  while ((Self__T5OC >=  0)) {
+    Result__JF2B[Self__T5OC]=NULL;
+    Self__T5OC=(__INTEGER)(Self__T5OC -  1);
   };
-  return(Result__BF2B);
+  return(Result__JF2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__BHRC(__INTEGER new_count__DHRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__JHRC(__INTEGER new_count__LHRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__IC1C,ptr_table__X3GH,next__W3GH,result__Y3GH;
-  __POINTER ptr_table__23GH,next__13GH,result__33GH;
-  __INTEGER typ_id__NC1C;
-  __UINTEGER_32 sz__KC1C,a__FXDH,new_size__GXDH,t__KXDH,a__JXDH;
-  __UINTEGER_32 new_size__53GH,lab_type__43GH;
-  __FAST_ARRAYoSTRING_CONSTANTo *result__HC1C,*Self__43RD;
-  result__HC1C=NULL;
-  ptr__IC1C=((__POINTER )(NULL));
-  typ_id__NC1C= 0;
-  sz__KC1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
-  if ((sz__KC1C ==  0)) {
-    result__HC1C=FAST_ARRAYoSTRING_CONSTANTo__;
+  __POINTER ptr__QC1C,ptr_table__S5HH,next__R5HH,result__T5HH;
+  __POINTER ptr_table__X5HH,next__W5HH,result__Y5HH;
+  __INTEGER typ_id__VC1C;
+  __UINTEGER_32 sz__SC1C,a__3XEH,new_size__4XEH,t__CYEH,a__BYEH;
+  __UINTEGER_32 new_size__05HH,lab_type__Z5HH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__PC1C,*Self__G4RD;
+  result__PC1C=NULL;
+  ptr__QC1C=((__POINTER )(NULL));
+  typ_id__VC1C= 0;
+  sz__SC1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__SC1C ==  0)) {
+    result__PC1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    typ_id__NC1C=__FAST_ARRAYoSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KC1C);
-    if ((typ_id__NC1C == (__INTEGER)(-  1))) {
-      a__FXDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__GXDH=(__UINTEGER_32)((__UINTEGER_32)(sz__KC1C + a__FXDH) & (__UINTEGER_32)(~ a__FXDH));
-      ptr_table__X3GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GXDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__W3GH=((__POINTER )(NULL));
-      result__Y3GH=((__POINTER *)ptr_table__X3GH)[ 0];
-      if ((result__Y3GH == (void *)NULL)) {
-        result__Y3GH=new_lab__MRJ(new_size__GXDH);
-        next__W3GH=(void *)((unsigned long)result__Y3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXDH)));
-        ((__POINTER *)next__W3GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__X3GH)[ 0]=next__W3GH;
-      } else {
-        next__W3GH=((__POINTER *)result__Y3GH)[ 0];
-        if ((next__W3GH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y3GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GXDH <<  1)) <=  4096)) {
-            next__W3GH=(void *)((unsigned long)result__Y3GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXDH)));
-          } else {
-            next__W3GH=new_lab__MRJ(new_size__GXDH);
-          };
-          ((__POINTER *)next__W3GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__X3GH)[ 0]=next__W3GH;
-        } else {
-          ((__POINTER *)result__Y3GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W3GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__Y3GH=next__W3GH;
-        };
-      };
-      ptr__IC1C=result__Y3GH;
-    } else {
-      t__KXDH=((__UINTEGER_32 )typ_id__NC1C);
-      a__JXDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__53GH=(__UINTEGER_32)((__UINTEGER_32)(sz__KC1C + a__JXDH) & (__UINTEGER_32)(~ a__JXDH));
-      ptr_table__23GH=((__POINTER )(&(table_type[(t__KXDH)])));
-      lab_type__43GH=(__UINTEGER_32)(t__KXDH |  1);
-      next__13GH=((__POINTER )(NULL));
-      result__33GH=((__POINTER *)ptr_table__23GH)[ 0];
-      if ((result__33GH == (void *)NULL)) {
-        result__33GH=new_lab__MRJ(lab_type__43GH);
-        next__13GH=(void *)((unsigned long)result__33GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
-        ((__POINTER *)next__13GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__23GH)[ 0]=next__13GH;
-      } else {
-        next__13GH=((__POINTER *)result__33GH)[ 0];
-        if ((next__13GH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__33GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__53GH <<  1)) <=  4096)) {
-            next__13GH=(void *)((unsigned long)result__33GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
-          } else {
-            next__13GH=new_lab__MRJ(lab_type__43GH);
-          };
-          ((__POINTER *)next__13GH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__23GH)[ 0]=next__13GH;
-        } else {
-          ((__POINTER *)result__33GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__13GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__33GH=next__13GH;
-        };
-      };
-      ptr__IC1C=result__33GH;
-    };
-    result__HC1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__IC1C);
-    *(result__HC1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
-  };
-  Self__43RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__HC1C);
-  if ((Self__43RD->parent_arrayed_collection__H5I.capacity__WBPD < new_count__DHRC)) {
-    Self__43RD->parent_arrayed_collection__H5I.storage__RCPD=create__RLHE(new_count__DHRC);
-    Self__43RD->parent_arrayed_collection__H5I.capacity__WBPD=new_count__DHRC;
-  };
-  Self__43RD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(-  1);
-  return(result__HC1C);
+    typ_id__VC1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SC1C);
+    if ((typ_id__VC1C == (__INTEGER)(-  1))) {
+      a__3XEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4XEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SC1C + a__3XEH) & (__UINTEGER_32)(~ a__3XEH));
+      ptr_table__S5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4XEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__R5HH=((__POINTER )(NULL));
+      result__T5HH=((__POINTER *)ptr_table__S5HH)[ 0];
+      if ((result__T5HH == (void *)NULL)) {
+        result__T5HH=new_lab__URJ(new_size__4XEH);
+        next__R5HH=(void *)((unsigned long)result__T5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4XEH)));
+        ((__POINTER *)next__R5HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S5HH)[ 0]=next__R5HH;
+      } else {
+        next__R5HH=((__POINTER *)result__T5HH)[ 0];
+        if ((next__R5HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T5HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4XEH <<  1)) <=  4096)) {
+            next__R5HH=(void *)((unsigned long)result__T5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4XEH)));
+          } else {
+            next__R5HH=new_lab__URJ(new_size__4XEH);
+          };
+          ((__POINTER *)next__R5HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__S5HH)[ 0]=next__R5HH;
+        } else {
+          ((__POINTER *)result__T5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__T5HH=next__R5HH;
+        };
+      };
+      ptr__QC1C=result__T5HH;
+    } else {
+      t__CYEH=((__UINTEGER_32 )typ_id__VC1C);
+      a__BYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__05HH=(__UINTEGER_32)((__UINTEGER_32)(sz__SC1C + a__BYEH) & (__UINTEGER_32)(~ a__BYEH));
+      ptr_table__X5HH=((__POINTER )(&(table_type[(t__CYEH)])));
+      lab_type__Z5HH=(__UINTEGER_32)(t__CYEH |  1);
+      next__W5HH=((__POINTER )(NULL));
+      result__Y5HH=((__POINTER *)ptr_table__X5HH)[ 0];
+      if ((result__Y5HH == (void *)NULL)) {
+        result__Y5HH=new_lab__URJ(lab_type__Z5HH);
+        next__W5HH=(void *)((unsigned long)result__Y5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05HH)));
+        ((__POINTER *)next__W5HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__X5HH)[ 0]=next__W5HH;
+      } else {
+        next__W5HH=((__POINTER *)result__Y5HH)[ 0];
+        if ((next__W5HH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y5HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__05HH <<  1)) <=  4096)) {
+            next__W5HH=(void *)((unsigned long)result__Y5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05HH)));
+          } else {
+            next__W5HH=new_lab__URJ(lab_type__Z5HH);
+          };
+          ((__POINTER *)next__W5HH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__X5HH)[ 0]=next__W5HH;
+        } else {
+          ((__POINTER *)result__Y5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__Y5HH=next__W5HH;
+        };
+      };
+      ptr__QC1C=result__Y5HH;
+    };
+    result__PC1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__QC1C);
+    *(result__PC1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__G4RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__PC1C);
+  if ((Self__G4RD->parent_arrayed_collection__P5I.capacity__4BPD < new_count__LHRC)) {
+    Self__G4RD->parent_arrayed_collection__P5I.storage__ZCPD=create__OJHE(new_count__LHRC);
+    Self__G4RD->parent_arrayed_collection__P5I.capacity__4BPD=new_count__LHRC;
+  };
+  Self__G4RD->parent_arrayed_collection__P5I.upper__DAPD=(__INTEGER)(-  1);
+  return(result__PC1C);
 }
 
-static void** create__ZKTF(__INTEGER nb_elements__1KTF)
+static void** create__3WTF(__INTEGER nb_elements__5WTF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MXDH,a__RXDH,new_size__NXDH,new_size2__OXDH,a__VXDH;
-  __UINTEGER_32 new_size__WXDH;
-  __POINTER result__LXDH,ptr_table__B4GH,next__A4GH,result__C4GH;
-  void *result__5JJH;
-  __INTEGER Self__414F;
-  void **Result__B0XF;
-  sz__MXDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__1KTF * ((__INTEGER )(sizeof(void *)))));
-  result__LXDH=((__POINTER )(NULL));
-  a__RXDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NXDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MXDH + a__RXDH) & (__UINTEGER_32)(~ a__RXDH));
-  new_size2__OXDH=(__UINTEGER_32)(new_size__NXDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OXDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VXDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WXDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OXDH + a__VXDH) & (__UINTEGER_32)(~ a__VXDH));
-    ptr_table__B4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WXDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__A4GH=((__POINTER )(NULL));
-    result__C4GH=((__POINTER *)ptr_table__B4GH)[ 0];
-    if ((result__C4GH == (void *)NULL)) {
-      result__C4GH=new_lab__MRJ(new_size__WXDH);
-      next__A4GH=(void *)((unsigned long)result__C4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WXDH)));
-      ((__POINTER *)next__A4GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__B4GH)[ 0]=next__A4GH;
-    } else {
-      next__A4GH=((__POINTER *)result__C4GH)[ 0];
-      if ((next__A4GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WXDH <<  1)) <=  4096)) {
-          next__A4GH=(void *)((unsigned long)result__C4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WXDH)));
-        } else {
-          next__A4GH=new_lab__MRJ(new_size__WXDH);
-        };
-        ((__POINTER *)next__A4GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__B4GH)[ 0]=next__A4GH;
-      } else {
-        ((__POINTER *)result__C4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__C4GH=next__A4GH;
-      };
-    };
-    ((__POINTER *)result__C4GH)[ 0]=((__POINTER ) 3);
-    result__LXDH=(void *)((unsigned long)result__C4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EYEH,a__JYEH,new_size__FYEH,new_size2__GYEH,a__NYEH;
+  __UINTEGER_32 new_size__OYEH;
+  __POINTER result__DYEH,ptr_table__25HH,next__15HH,result__35HH;
+  void *result__5LKH;
+  __INTEGER Self__ST5F;
+  void **Result__HHYF;
+  sz__EYEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5WTF * ((__INTEGER )(sizeof(void *)))));
+  result__DYEH=((__POINTER )(NULL));
+  a__JYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FYEH=(__UINTEGER_32)((__UINTEGER_32)(sz__EYEH + a__JYEH) & (__UINTEGER_32)(~ a__JYEH));
+  new_size2__GYEH=(__UINTEGER_32)(new_size__FYEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GYEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OYEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GYEH + a__NYEH) & (__UINTEGER_32)(~ a__NYEH));
+    ptr_table__25HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OYEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__15HH=((__POINTER )(NULL));
+    result__35HH=((__POINTER *)ptr_table__25HH)[ 0];
+    if ((result__35HH == (void *)NULL)) {
+      result__35HH=new_lab__URJ(new_size__OYEH);
+      next__15HH=(void *)((unsigned long)result__35HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYEH)));
+      ((__POINTER *)next__15HH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__25HH)[ 0]=next__15HH;
+    } else {
+      next__15HH=((__POINTER *)result__35HH)[ 0];
+      if ((next__15HH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__35HH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OYEH <<  1)) <=  4096)) {
+          next__15HH=(void *)((unsigned long)result__35HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYEH)));
+        } else {
+          next__15HH=new_lab__URJ(new_size__OYEH);
+        };
+        ((__POINTER *)next__15HH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__25HH)[ 0]=next__15HH;
+      } else {
+        ((__POINTER *)result__35HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__35HH=next__15HH;
+      };
+    };
+    ((__POINTER *)result__35HH)[ 0]=((__POINTER ) 3);
+    result__DYEH=(void *)((unsigned long)result__35HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__5JJH=first_free__XDVB;
-    while ((((void *)result__5JJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5JJH)->map_size_and_id__ITB &  4294967292LU) < new_size__NXDH))) {
-      result__5JJH=((__MEMORY *)result__5JJH)->map_next_free__JTB;
+    result__5LKH=first_free__5DVB;
+    while ((((void *)result__5LKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5LKH)->map_size_and_id__QTB &  4294967292LU) < new_size__FYEH))) {
+      result__5LKH=((__MEMORY *)result__5LKH)->map_next_free__RTB;
     };
-    if (((void *)result__5JJH == (void *)NULL)) {
-      result__5JJH=new_page__OA5();
+    if (((void *)result__5LKH == (void *)NULL)) {
+      result__5LKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__5JJH,new_size__NXDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5JJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__LXDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5JJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__5LKH,new_size__FYEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5LKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__DYEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5LKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__B0XF=((void **)result__LXDH);
-  Self__414F=(__INTEGER)(nb_elements__1KTF -  1);
-  while ((Self__414F >=  0)) {
-    Result__B0XF[Self__414F]=NULL;
-    Self__414F=(__INTEGER)(Self__414F -  1);
+  Result__HHYF=((void **)result__DYEH);
+  Self__ST5F=(__INTEGER)(nb_elements__5WTF -  1);
+  while ((Self__ST5F >=  0)) {
+    Result__HHYF[Self__ST5F]=NULL;
+    Self__ST5F=(__INTEGER)(Self__ST5F -  1);
   };
-  return(Result__B0XF);
+  return(Result__HHYF);
 }
 
-static void** create__3RFF(__INTEGER nb_elements__5RFF)
+static void** create__52FF(__INTEGER nb_elements__B3FF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YXDH,a__3XDH,new_size__ZXDH,new_size2__0XDH,a__BYDH;
-  __UINTEGER_32 new_size__CYDH;
-  __POINTER result__XXDH,ptr_table__G4GH,next__F4GH,result__H4GH;
-  void *result__CKJH;
-  __INTEGER Self__Y5PF;
-  void **Result__IXJF;
-  sz__YXDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5RFF * ((__INTEGER )(sizeof(void *)))));
-  result__XXDH=((__POINTER )(NULL));
-  a__3XDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZXDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YXDH + a__3XDH) & (__UINTEGER_32)(~ a__3XDH));
-  new_size2__0XDH=(__UINTEGER_32)(new_size__ZXDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0XDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__BYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__CYDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0XDH + a__BYDH) & (__UINTEGER_32)(~ a__BYDH));
-    ptr_table__G4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CYDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__F4GH=((__POINTER )(NULL));
-    result__H4GH=((__POINTER *)ptr_table__G4GH)[ 0];
-    if ((result__H4GH == (void *)NULL)) {
-      result__H4GH=new_lab__MRJ(new_size__CYDH);
-      next__F4GH=(void *)((unsigned long)result__H4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYDH)));
-      ((__POINTER *)next__F4GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__G4GH)[ 0]=next__F4GH;
-    } else {
-      next__F4GH=((__POINTER *)result__H4GH)[ 0];
-      if ((next__F4GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CYDH <<  1)) <=  4096)) {
-          next__F4GH=(void *)((unsigned long)result__H4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CYDH)));
-        } else {
-          next__F4GH=new_lab__MRJ(new_size__CYDH);
-        };
-        ((__POINTER *)next__F4GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__G4GH)[ 0]=next__F4GH;
-      } else {
-        ((__POINTER *)result__H4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__H4GH=next__F4GH;
-      };
-    };
-    ((__POINTER *)result__H4GH)[ 0]=((__POINTER ) 3);
-    result__XXDH=(void *)((unsigned long)result__H4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__QYEH,a__VYEH,new_size__RYEH,new_size2__SYEH,a__ZYEH;
+  __UINTEGER_32 new_size__0YEH;
+  __POINTER result__PYEH,ptr_table__BAIH,next__AAIH,result__CAIH;
+  void *result__CMKH;
+  __INTEGER Self__2LQF;
+  void **Result__KCKF;
+  sz__QYEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__B3FF * ((__INTEGER )(sizeof(void *)))));
+  result__PYEH=((__POINTER )(NULL));
+  a__VYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__RYEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QYEH + a__VYEH) & (__UINTEGER_32)(~ a__VYEH));
+  new_size2__SYEH=(__UINTEGER_32)(new_size__RYEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__SYEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ZYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__0YEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SYEH + a__ZYEH) & (__UINTEGER_32)(~ a__ZYEH));
+    ptr_table__BAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0YEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__AAIH=((__POINTER )(NULL));
+    result__CAIH=((__POINTER *)ptr_table__BAIH)[ 0];
+    if ((result__CAIH == (void *)NULL)) {
+      result__CAIH=new_lab__URJ(new_size__0YEH);
+      next__AAIH=(void *)((unsigned long)result__CAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YEH)));
+      ((__POINTER *)next__AAIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__BAIH)[ 0]=next__AAIH;
+    } else {
+      next__AAIH=((__POINTER *)result__CAIH)[ 0];
+      if ((next__AAIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CAIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0YEH <<  1)) <=  4096)) {
+          next__AAIH=(void *)((unsigned long)result__CAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YEH)));
+        } else {
+          next__AAIH=new_lab__URJ(new_size__0YEH);
+        };
+        ((__POINTER *)next__AAIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BAIH)[ 0]=next__AAIH;
+      } else {
+        ((__POINTER *)result__CAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CAIH=next__AAIH;
+      };
+    };
+    ((__POINTER *)result__CAIH)[ 0]=((__POINTER ) 3);
+    result__PYEH=(void *)((unsigned long)result__CAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__CKJH=first_free__XDVB;
-    while ((((void *)result__CKJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CKJH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZXDH))) {
-      result__CKJH=((__MEMORY *)result__CKJH)->map_next_free__JTB;
+    result__CMKH=first_free__5DVB;
+    while ((((void *)result__CMKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CMKH)->map_size_and_id__QTB &  4294967292LU) < new_size__RYEH))) {
+      result__CMKH=((__MEMORY *)result__CMKH)->map_next_free__RTB;
     };
-    if (((void *)result__CKJH == (void *)NULL)) {
-      result__CKJH=new_page__OA5();
+    if (((void *)result__CMKH == (void *)NULL)) {
+      result__CMKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__CKJH,new_size__ZXDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CKJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__XXDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CKJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__CMKH,new_size__RYEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CMKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__PYEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CMKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__IXJF=((void **)result__XXDH);
-  Self__Y5PF=(__INTEGER)(nb_elements__5RFF -  1);
-  while ((Self__Y5PF >=  0)) {
-    Result__IXJF[Self__Y5PF]=NULL;
-    Self__Y5PF=(__INTEGER)(Self__Y5PF -  1);
+  Result__KCKF=((void **)result__PYEH);
+  Self__2LQF=(__INTEGER)(nb_elements__B3FF -  1);
+  while ((Self__2LQF >=  0)) {
+    Result__KCKF[Self__2LQF]=NULL;
+    Self__2LQF=(__INTEGER)(Self__2LQF -  1);
   };
-  return(Result__IXJF);
+  return(Result__KCKF);
 }
 
-static void** create__SNXF(__INTEGER nb_elements__UNXF)
+static void** create__Y0XF(__INTEGER nb_elements__00XF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__EYDH,a__JYDH,new_size__FYDH,new_size2__GYDH,a__NYDH;
-  __UINTEGER_32 new_size__OYDH;
-  __POINTER result__DYDH,ptr_table__L4GH,next__K4GH,result__M4GH;
-  void *result__FKJH;
-  __INTEGER Self__Y54F;
-  void **Result__Y3ZF;
-  sz__EYDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__UNXF * ((__INTEGER )(sizeof(void *)))));
-  result__DYDH=((__POINTER )(NULL));
-  a__JYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__FYDH=(__UINTEGER_32)((__UINTEGER_32)(sz__EYDH + a__JYDH) & (__UINTEGER_32)(~ a__JYDH));
-  new_size2__GYDH=(__UINTEGER_32)(new_size__FYDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__GYDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__NYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__OYDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GYDH + a__NYDH) & (__UINTEGER_32)(~ a__NYDH));
-    ptr_table__L4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OYDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__K4GH=((__POINTER )(NULL));
-    result__M4GH=((__POINTER *)ptr_table__L4GH)[ 0];
-    if ((result__M4GH == (void *)NULL)) {
-      result__M4GH=new_lab__MRJ(new_size__OYDH);
-      next__K4GH=(void *)((unsigned long)result__M4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYDH)));
-      ((__POINTER *)next__K4GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__L4GH)[ 0]=next__K4GH;
-    } else {
-      next__K4GH=((__POINTER *)result__M4GH)[ 0];
-      if ((next__K4GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OYDH <<  1)) <=  4096)) {
-          next__K4GH=(void *)((unsigned long)result__M4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYDH)));
-        } else {
-          next__K4GH=new_lab__MRJ(new_size__OYDH);
-        };
-        ((__POINTER *)next__K4GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__L4GH)[ 0]=next__K4GH;
-      } else {
-        ((__POINTER *)result__M4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__M4GH=next__K4GH;
-      };
-    };
-    ((__POINTER *)result__M4GH)[ 0]=((__POINTER ) 3);
-    result__DYDH=(void *)((unsigned long)result__M4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__2YEH,a__BZEH,new_size__3YEH,new_size2__4YEH,a__FZEH;
+  __UINTEGER_32 new_size__GZEH;
+  __POINTER result__1YEH,ptr_table__GAIH,next__FAIH,result__HAIH;
+  void *result__FMKH;
+  __INTEGER Self__MX5F;
+  void **Result__4L0F;
+  sz__2YEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__00XF * ((__INTEGER )(sizeof(void *)))));
+  result__1YEH=((__POINTER )(NULL));
+  a__BZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3YEH=(__UINTEGER_32)((__UINTEGER_32)(sz__2YEH + a__BZEH) & (__UINTEGER_32)(~ a__BZEH));
+  new_size2__4YEH=(__UINTEGER_32)(new_size__3YEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4YEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GZEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4YEH + a__FZEH) & (__UINTEGER_32)(~ a__FZEH));
+    ptr_table__GAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GZEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__FAIH=((__POINTER )(NULL));
+    result__HAIH=((__POINTER *)ptr_table__GAIH)[ 0];
+    if ((result__HAIH == (void *)NULL)) {
+      result__HAIH=new_lab__URJ(new_size__GZEH);
+      next__FAIH=(void *)((unsigned long)result__HAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZEH)));
+      ((__POINTER *)next__FAIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__GAIH)[ 0]=next__FAIH;
+    } else {
+      next__FAIH=((__POINTER *)result__HAIH)[ 0];
+      if ((next__FAIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HAIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GZEH <<  1)) <=  4096)) {
+          next__FAIH=(void *)((unsigned long)result__HAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZEH)));
+        } else {
+          next__FAIH=new_lab__URJ(new_size__GZEH);
+        };
+        ((__POINTER *)next__FAIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GAIH)[ 0]=next__FAIH;
+      } else {
+        ((__POINTER *)result__HAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__HAIH=next__FAIH;
+      };
+    };
+    ((__POINTER *)result__HAIH)[ 0]=((__POINTER ) 3);
+    result__1YEH=(void *)((unsigned long)result__HAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__FKJH=first_free__XDVB;
-    while ((((void *)result__FKJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FKJH)->map_size_and_id__ITB &  4294967292LU) < new_size__FYDH))) {
-      result__FKJH=((__MEMORY *)result__FKJH)->map_next_free__JTB;
+    result__FMKH=first_free__5DVB;
+    while ((((void *)result__FMKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FMKH)->map_size_and_id__QTB &  4294967292LU) < new_size__3YEH))) {
+      result__FMKH=((__MEMORY *)result__FMKH)->map_next_free__RTB;
     };
-    if (((void *)result__FKJH == (void *)NULL)) {
-      result__FKJH=new_page__OA5();
+    if (((void *)result__FMKH == (void *)NULL)) {
+      result__FMKH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__FKJH,new_size__FYDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FKJH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__DYDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FKJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__FMKH,new_size__3YEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FMKH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__1YEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FMKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__Y3ZF=((void **)result__DYDH);
-  Self__Y54F=(__INTEGER)(nb_elements__UNXF -  1);
-  while ((Self__Y54F >=  0)) {
-    Result__Y3ZF[Self__Y54F]=NULL;
-    Self__Y54F=(__INTEGER)(Self__Y54F -  1);
+  Result__4L0F=((void **)result__1YEH);
+  Self__MX5F=(__INTEGER)(nb_elements__00XF -  1);
+  while ((Self__MX5F >=  0)) {
+    Result__4L0F[Self__MX5F]=NULL;
+    Self__MX5F=(__INTEGER)(Self__MX5F -  1);
   };
-  return(Result__Y3ZF);
+  return(Result__4L0F);
 }
 
-static void** create__K4IE(__INTEGER nb_elements__M4IE)
+static void** create__C0IE(__INTEGER nb_elements__E0IE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__SOJB,a__RYDH,new_size__UOJB,new_size2__XOJB,a__VYDH;
-  __UINTEGER_32 new_size__WYDH;
-  __POINTER result__0OJB,ptr_table__Q4GH,next__P4GH,result__R4GH;
-  void *result__YCVB;
-  __INTEGER Self__1FYE;
-  void **Result__34NE;
-  sz__SOJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__M4IE * ((__INTEGER )(sizeof(void *)))));
-  result__0OJB=((__POINTER )(NULL));
-  a__RYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__UOJB=(__UINTEGER_32)((__UINTEGER_32)(sz__SOJB + a__RYDH) & (__UINTEGER_32)(~ a__RYDH));
-  new_size2__XOJB=(__UINTEGER_32)(new_size__UOJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__XOJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__VYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__WYDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XOJB + a__VYDH) & (__UINTEGER_32)(~ a__VYDH));
-    ptr_table__Q4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WYDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__P4GH=((__POINTER )(NULL));
-    result__R4GH=((__POINTER *)ptr_table__Q4GH)[ 0];
-    if ((result__R4GH == (void *)NULL)) {
-      result__R4GH=new_lab__MRJ(new_size__WYDH);
-      next__P4GH=(void *)((unsigned long)result__R4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WYDH)));
-      ((__POINTER *)next__P4GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__Q4GH)[ 0]=next__P4GH;
-    } else {
-      next__P4GH=((__POINTER *)result__R4GH)[ 0];
-      if ((next__P4GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WYDH <<  1)) <=  4096)) {
-          next__P4GH=(void *)((unsigned long)result__R4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WYDH)));
-        } else {
-          next__P4GH=new_lab__MRJ(new_size__WYDH);
-        };
-        ((__POINTER *)next__P4GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__Q4GH)[ 0]=next__P4GH;
-      } else {
-        ((__POINTER *)result__R4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__R4GH=next__P4GH;
-      };
-    };
-    ((__POINTER *)result__R4GH)[ 0]=((__POINTER ) 3);
-    result__0OJB=(void *)((unsigned long)result__R4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__0OJB,a__JZEH,new_size__2OJB,new_size2__5OJB,a__NZEH;
+  __UINTEGER_32 new_size__OZEH;
+  __POINTER result__CPJB,ptr_table__LAIH,next__KAIH,result__MAIH;
+  void *result__ADVB;
+  __INTEGER Self__4FYE;
+  void **Result__A1NE;
+  sz__0OJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__E0IE * ((__INTEGER )(sizeof(void *)))));
+  result__CPJB=((__POINTER )(NULL));
+  a__JZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2OJB=(__UINTEGER_32)((__UINTEGER_32)(sz__0OJB + a__JZEH) & (__UINTEGER_32)(~ a__JZEH));
+  new_size2__5OJB=(__UINTEGER_32)(new_size__2OJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5OJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OZEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5OJB + a__NZEH) & (__UINTEGER_32)(~ a__NZEH));
+    ptr_table__LAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OZEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KAIH=((__POINTER )(NULL));
+    result__MAIH=((__POINTER *)ptr_table__LAIH)[ 0];
+    if ((result__MAIH == (void *)NULL)) {
+      result__MAIH=new_lab__URJ(new_size__OZEH);
+      next__KAIH=(void *)((unsigned long)result__MAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZEH)));
+      ((__POINTER *)next__KAIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LAIH)[ 0]=next__KAIH;
+    } else {
+      next__KAIH=((__POINTER *)result__MAIH)[ 0];
+      if ((next__KAIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MAIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OZEH <<  1)) <=  4096)) {
+          next__KAIH=(void *)((unsigned long)result__MAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZEH)));
+        } else {
+          next__KAIH=new_lab__URJ(new_size__OZEH);
+        };
+        ((__POINTER *)next__KAIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LAIH)[ 0]=next__KAIH;
+      } else {
+        ((__POINTER *)result__MAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MAIH=next__KAIH;
+      };
+    };
+    ((__POINTER *)result__MAIH)[ 0]=((__POINTER ) 3);
+    result__CPJB=(void *)((unsigned long)result__MAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__YCVB=first_free__XDVB;
-    while ((((void *)result__YCVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YCVB)->map_size_and_id__ITB &  4294967292LU) < new_size__UOJB))) {
-      result__YCVB=((__MEMORY *)result__YCVB)->map_next_free__JTB;
+    result__ADVB=first_free__5DVB;
+    while ((((void *)result__ADVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ADVB)->map_size_and_id__QTB &  4294967292LU) < new_size__2OJB))) {
+      result__ADVB=((__MEMORY *)result__ADVB)->map_next_free__RTB;
     };
-    if (((void *)result__YCVB == (void *)NULL)) {
-      result__YCVB=new_page__OA5();
+    if (((void *)result__ADVB == (void *)NULL)) {
+      result__ADVB=new_page__WA5();
     };
-    to_busy__index__TTFC(result__YCVB,new_size__UOJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YCVB)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__0OJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YCVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__ADVB,new_size__2OJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ADVB)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__CPJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ADVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__34NE=((void **)result__0OJB);
-  Self__1FYE=(__INTEGER)(nb_elements__M4IE -  1);
-  while ((Self__1FYE >=  0)) {
-    Result__34NE[Self__1FYE]=NULL;
-    Self__1FYE=(__INTEGER)(Self__1FYE -  1);
+  Result__A1NE=((void **)result__CPJB);
+  Self__4FYE=(__INTEGER)(nb_elements__E0IE -  1);
+  while ((Self__4FYE >=  0)) {
+    Result__A1NE[Self__4FYE]=NULL;
+    Self__4FYE=(__INTEGER)(Self__4FYE -  1);
   };
-  return(Result__34NE);
+  return(Result__A1NE);
 }
 
-static void* new_page__OA5()
+static void* new_page__WA5()
 // () With resultNo recursive, No inlinable.
 {
-  __UINTEGER_64 cap__R1SB,old_size__RA5;
-  __POINTER mem__U1SB;
-  void *block__XA5;
-  if ((capacity_max__YA5 ==  0)) {
-    mem__U1SB=((__POINTER )(NULL));
-    cap__R1SB= 33554432;
+  __UINTEGER_64 cap__Z1SB,old_size__ZA5;
+  __POINTER mem__21SB;
+  void *block__5A5;
+  if ((capacity_max__AB5 ==  0)) {
+    mem__21SB=((__POINTER )(NULL));
+    cap__Z1SB= 33554432;
     do {
-      cap__R1SB=(__UINTEGER_64)(cap__R1SB <<  1);
-      mem__U1SB=((__POINTER )(malloc((cap__R1SB))));
-      if ((mem__U1SB != (void *)NULL)) {
-        free((mem__U1SB));
-      };
-    } while ((! ((mem__U1SB == (void *)NULL) || (cap__R1SB == ((__UINTEGER_64 )(2048LU << 20))))));
-    if ((mem__U1SB == (void *)NULL)) {
-      cap__R1SB=(__UINTEGER_64)(cap__R1SB >>  1);
-    };
-    get_begin_memory__ICQB=((__POINTER )(malloc((cap__R1SB))));
-    capacity_max__YA5=cap__R1SB;
-    begin_memory__PVH=get_begin_memory__ICQB;
-  };
-  old_size__RA5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__4RJ <<  26));
-  nb_page__4RJ=(__UINTEGER_32)(nb_page__4RJ +  1);
-  if (((__UINTEGER_64)(old_size__RA5 +  67108864) > capacity_max__YA5)) {
-    print__WHD((&__string_187));
+      cap__Z1SB=(__UINTEGER_64)(cap__Z1SB <<  1);
+      mem__21SB=((__POINTER )(malloc((cap__Z1SB))));
+      if ((mem__21SB != (void *)NULL)) {
+        free((mem__21SB));
+      };
+    } while ((! ((mem__21SB == (void *)NULL) || (cap__Z1SB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__21SB == (void *)NULL)) {
+      cap__Z1SB=(__UINTEGER_64)(cap__Z1SB >>  1);
+    };
+    get_begin_memory__QCQB=((__POINTER )(malloc((cap__Z1SB))));
+    capacity_max__AB5=cap__Z1SB;
+    begin_memory__XVH=get_begin_memory__QCQB;
+  };
+  old_size__ZA5=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__GSJ <<  26));
+  nb_page__GSJ=(__UINTEGER_32)(nb_page__GSJ +  1);
+  if (((__UINTEGER_64)(old_size__ZA5 +  67108864) > capacity_max__AB5)) {
+    print__4HD((&__string_185));
     exit(( 1));
   };
-  block__XA5=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__RA5)))));
-  ((__MEMORY *)block__XA5)->map_previous_linear__HTB= 4294967295LU;
-  ((__MEMORY *)block__XA5)->map_size_and_id__ITB= 67108858;
-  ((__MEMORY *)block__XA5)->map_next_free__JTB=first_free__XDVB;
-  ((__MEMORY *)block__XA5)->map_previous_free__KTB=NULL;
-  if (((void *)first_free__XDVB != (void *)NULL)) {
-    ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=block__XA5;
-  };
-  first_free__XDVB=block__XA5;
-  last_block[((__UINTEGER_32)(nb_page__4RJ -  1))] = (block__XA5);
-  return(block__XA5);
+  block__5A5=((void *)(void *)((unsigned long)begin_memory__XVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__ZA5)))));
+  ((__MEMORY *)block__5A5)->map_previous_linear__PTB= 4294967295LU;
+  ((__MEMORY *)block__5A5)->map_size_and_id__QTB= 67108858;
+  ((__MEMORY *)block__5A5)->map_next_free__RTB=first_free__5DVB;
+  ((__MEMORY *)block__5A5)->map_previous_free__STB=NULL;
+  if (((void *)first_free__5DVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__5DVB)->map_previous_free__STB=block__5A5;
+  };
+  first_free__5DVB=block__5A5;
+  last_block[((__UINTEGER_32)(nb_page__GSJ -  1))] = (block__5A5);
+  return(block__5A5);
 }
 
-static void to_busy__index__TTFC(__MEMORY *Self__UTFC,__UINTEGER_32 sz__VTFC,__UINTEGER_32 idx__WTFC)
+static void to_busy__index__1TFC(__MEMORY *Self__2TFC,__UINTEGER_32 sz__3TFC,__UINTEGER_32 idx__4TFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  void *new__3TFC,*prev__JDOC,*next__KDOC;
-  __UINTEGER_32 siz__XTFC,new_size__0TFC;
-  __MEMORY *Self__DSCC,*Self__ZT4G;
-  new__3TFC=NULL;
-  prev__JDOC=Self__UTFC->map_previous_free__KTB;
-  next__KDOC=Self__UTFC->map_next_free__JTB;
-  if (((void *)prev__JDOC == (void *)NULL)) {
-    first_free__XDVB=next__KDOC;
+  void *new__FUFC,*prev__RDOC,*next__SDOC;
+  __UINTEGER_32 siz__5TFC,new_size__CUFC;
+  __MEMORY *Self__LSCC,*Self__ET5G;
+  new__FUFC=NULL;
+  prev__RDOC=Self__2TFC->map_previous_free__STB;
+  next__SDOC=Self__2TFC->map_next_free__RTB;
+  if (((void *)prev__RDOC == (void *)NULL)) {
+    first_free__5DVB=next__SDOC;
   } else {
-    ((__MEMORY *)prev__JDOC)->map_next_free__JTB=next__KDOC;
+    ((__MEMORY *)prev__RDOC)->map_next_free__RTB=next__SDOC;
   };
-  if (((void *)next__KDOC != (void *)NULL)) {
-    ((__MEMORY *)next__KDOC)->map_previous_free__KTB=prev__JDOC;
+  if (((void *)next__SDOC != (void *)NULL)) {
+    ((__MEMORY *)next__SDOC)->map_previous_free__STB=prev__RDOC;
   };
-  siz__XTFC=Self__UTFC->map_size_and_id__ITB;
-  new_size__0TFC=(__UINTEGER_32)(siz__XTFC - sz__VTFC);
-  if ((new_size__0TFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
-    siz__XTFC=sz__VTFC;
-    new__3TFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__UTFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__VTFC))));
-    ((__MEMORY *)new__3TFC)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__UTFC) - (unsigned long)begin_memory__PVH))));
-    ((__MEMORY *)new__3TFC)->map_size_and_id__ITB=(__UINTEGER_32)(new_size__0TFC -  8);
-    Self__DSCC=((__MEMORY *)new__3TFC);
-    Self__DSCC->map_next_free__JTB=first_free__XDVB;
-    Self__DSCC->map_previous_free__KTB=NULL;
-    if (((void *)first_free__XDVB != (void *)NULL)) {
-      ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=Self__DSCC;
+  siz__5TFC=Self__2TFC->map_size_and_id__QTB;
+  new_size__CUFC=(__UINTEGER_32)(siz__5TFC - sz__3TFC);
+  if ((new_size__CUFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__5TFC=sz__3TFC;
+    new__FUFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__2TFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__3TFC))));
+    ((__MEMORY *)new__FUFC)->map_previous_linear__PTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__2TFC) - (unsigned long)begin_memory__XVH))));
+    ((__MEMORY *)new__FUFC)->map_size_and_id__QTB=(__UINTEGER_32)(new_size__CUFC -  8);
+    Self__LSCC=((__MEMORY *)new__FUFC);
+    Self__LSCC->map_next_free__RTB=first_free__5DVB;
+    Self__LSCC->map_previous_free__STB=NULL;
+    if (((void *)first_free__5DVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__5DVB)->map_previous_free__STB=Self__LSCC;
     };
-    first_free__XDVB=Self__DSCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__3TFC)->map_size_and_id__ITB &  2) !=  0)) {
-      last_block[(idx__WTFC)] = (new__3TFC);
+    first_free__5DVB=Self__LSCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__FUFC)->map_size_and_id__QTB &  2) !=  0)) {
+      last_block[(idx__4TFC)] = (new__FUFC);
     } else {
-      Self__ZT4G=((__MEMORY *)new__3TFC);
-      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZT4G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZT4G->map_size_and_id__ITB &  4294967292LU))))))->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__3TFC)) - (unsigned long)begin_memory__PVH))));
+      Self__ET5G=((__MEMORY *)new__FUFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ET5G) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ET5G->map_size_and_id__QTB &  4294967292LU))))))->map_previous_linear__PTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__FUFC)) - (unsigned long)begin_memory__XVH))));
     };
   };
-  Self__UTFC->map_size_and_id__ITB=(__UINTEGER_32)(siz__XTFC |  1);
+  Self__2TFC->map_size_and_id__QTB=(__UINTEGER_32)(siz__5TFC |  1);
 }
 
-static void** create__31XC(__INTEGER nb_elements__51XC)
+static void** create__F2XC(__INTEGER nb_elements__H2XC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__D1BH,a__ZYDH,new_size__E1BH,new_size2__F1BH,a__3YDH;
-  __UINTEGER_32 new_size__4YDH;
-  __POINTER result__C1BH,ptr_table__V4GH,next__U4GH,result__W4GH;
-  void *result__Z4GH;
-  __INTEGER Self__FSWD;
-  void **Result__5S5C;
-  sz__D1BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__51XC * ((__INTEGER )(sizeof(void *)))));
-  result__C1BH=((__POINTER )(NULL));
-  a__ZYDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__E1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__D1BH + a__ZYDH) & (__UINTEGER_32)(~ a__ZYDH));
-  new_size2__F1BH=(__UINTEGER_32)(new_size__E1BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__F1BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__3YDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__4YDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__F1BH + a__3YDH) & (__UINTEGER_32)(~ a__3YDH));
-    ptr_table__V4GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4YDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__U4GH=((__POINTER )(NULL));
-    result__W4GH=((__POINTER *)ptr_table__V4GH)[ 0];
-    if ((result__W4GH == (void *)NULL)) {
-      result__W4GH=new_lab__MRJ(new_size__4YDH);
-      next__U4GH=(void *)((unsigned long)result__W4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YDH)));
-      ((__POINTER *)next__U4GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__V4GH)[ 0]=next__U4GH;
-    } else {
-      next__U4GH=((__POINTER *)result__W4GH)[ 0];
-      if ((next__U4GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4YDH <<  1)) <=  4096)) {
-          next__U4GH=(void *)((unsigned long)result__W4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YDH)));
-        } else {
-          next__U4GH=new_lab__MRJ(new_size__4YDH);
-        };
-        ((__POINTER *)next__U4GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__V4GH)[ 0]=next__U4GH;
-      } else {
-        ((__POINTER *)result__W4GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__W4GH=next__U4GH;
-      };
-    };
-    ((__POINTER *)result__W4GH)[ 0]=((__POINTER ) 3);
-    result__C1BH=(void *)((unsigned long)result__W4GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__V0CH,a__RZEH,new_size__W0CH,new_size2__X0CH,a__VZEH;
+  __UINTEGER_32 new_size__WZEH;
+  __POINTER result__U0CH,ptr_table__QAIH,next__PAIH,result__RAIH;
+  void *result__UAIH;
+  __INTEGER Self__NSWD;
+  void **Result__HT5C;
+  sz__V0CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__H2XC * ((__INTEGER )(sizeof(void *)))));
+  result__U0CH=((__POINTER )(NULL));
+  a__RZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__W0CH=(__UINTEGER_32)((__UINTEGER_32)(sz__V0CH + a__RZEH) & (__UINTEGER_32)(~ a__RZEH));
+  new_size2__X0CH=(__UINTEGER_32)(new_size__W0CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__X0CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__VZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__WZEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__X0CH + a__VZEH) & (__UINTEGER_32)(~ a__VZEH));
+    ptr_table__QAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WZEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PAIH=((__POINTER )(NULL));
+    result__RAIH=((__POINTER *)ptr_table__QAIH)[ 0];
+    if ((result__RAIH == (void *)NULL)) {
+      result__RAIH=new_lab__URJ(new_size__WZEH);
+      next__PAIH=(void *)((unsigned long)result__RAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WZEH)));
+      ((__POINTER *)next__PAIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QAIH)[ 0]=next__PAIH;
+    } else {
+      next__PAIH=((__POINTER *)result__RAIH)[ 0];
+      if ((next__PAIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RAIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WZEH <<  1)) <=  4096)) {
+          next__PAIH=(void *)((unsigned long)result__RAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WZEH)));
+        } else {
+          next__PAIH=new_lab__URJ(new_size__WZEH);
+        };
+        ((__POINTER *)next__PAIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QAIH)[ 0]=next__PAIH;
+      } else {
+        ((__POINTER *)result__RAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RAIH=next__PAIH;
+      };
+    };
+    ((__POINTER *)result__RAIH)[ 0]=((__POINTER ) 3);
+    result__U0CH=(void *)((unsigned long)result__RAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__Z4GH=first_free__XDVB;
-    while ((((void *)result__Z4GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__Z4GH)->map_size_and_id__ITB &  4294967292LU) < new_size__E1BH))) {
-      result__Z4GH=((__MEMORY *)result__Z4GH)->map_next_free__JTB;
+    result__UAIH=first_free__5DVB;
+    while ((((void *)result__UAIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UAIH)->map_size_and_id__QTB &  4294967292LU) < new_size__W0CH))) {
+      result__UAIH=((__MEMORY *)result__UAIH)->map_next_free__RTB;
     };
-    if (((void *)result__Z4GH == (void *)NULL)) {
-      result__Z4GH=new_page__OA5();
+    if (((void *)result__UAIH == (void *)NULL)) {
+      result__UAIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__Z4GH,new_size__E1BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__Z4GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__C1BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__Z4GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__UAIH,new_size__W0CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UAIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__U0CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UAIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__5S5C=((void **)result__C1BH);
-  Self__FSWD=(__INTEGER)(nb_elements__51XC -  1);
-  while ((Self__FSWD >=  0)) {
-    Result__5S5C[Self__FSWD]=NULL;
-    Self__FSWD=(__INTEGER)(Self__FSWD -  1);
+  Result__HT5C=((void **)result__U0CH);
+  Self__NSWD=(__INTEGER)(nb_elements__H2XC -  1);
+  while ((Self__NSWD >=  0)) {
+    Result__HT5C[Self__NSWD]=NULL;
+    Self__NSWD=(__INTEGER)(Self__NSWD -  1);
   };
-  return(Result__5S5C);
+  return(Result__HT5C);
 }
 
-static void** create__ABYC(__INTEGER nb_elements__CBYC)
+static void** create__IBYC(__INTEGER nb_elements__KBYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__H1BH,a__EZDH,new_size__I1BH,new_size2__J1BH,a__IZDH;
-  __UINTEGER_32 new_size__JZDH;
-  __POINTER result__G1BH,ptr_table__34GH,next__24GH,result__44GH;
-  void *result__B5GH;
-  __INTEGER Self__5VWD;
-  void **Result__JY5C;
-  sz__H1BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CBYC * ((__INTEGER )(sizeof(void *)))));
-  result__G1BH=((__POINTER )(NULL));
-  a__EZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__I1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__H1BH + a__EZDH) & (__UINTEGER_32)(~ a__EZDH));
-  new_size2__J1BH=(__UINTEGER_32)(new_size__I1BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__J1BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__IZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__JZDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__J1BH + a__IZDH) & (__UINTEGER_32)(~ a__IZDH));
-    ptr_table__34GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JZDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__24GH=((__POINTER )(NULL));
-    result__44GH=((__POINTER *)ptr_table__34GH)[ 0];
-    if ((result__44GH == (void *)NULL)) {
-      result__44GH=new_lab__MRJ(new_size__JZDH);
-      next__24GH=(void *)((unsigned long)result__44GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZDH)));
-      ((__POINTER *)next__24GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__34GH)[ 0]=next__24GH;
-    } else {
-      next__24GH=((__POINTER *)result__44GH)[ 0];
-      if ((next__24GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__44GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JZDH <<  1)) <=  4096)) {
-          next__24GH=(void *)((unsigned long)result__44GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JZDH)));
-        } else {
-          next__24GH=new_lab__MRJ(new_size__JZDH);
-        };
-        ((__POINTER *)next__24GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__34GH)[ 0]=next__24GH;
-      } else {
-        ((__POINTER *)result__44GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__24GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__44GH=next__24GH;
-      };
-    };
-    ((__POINTER *)result__44GH)[ 0]=((__POINTER ) 3);
-    result__G1BH=(void *)((unsigned long)result__44GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__Z0CH,a__2ZEH,new_size__00CH,new_size2__10CH,a__A0EH;
+  __UINTEGER_32 new_size__B0EH;
+  __POINTER result__Y0CH,ptr_table__YAIH,next__XAIH,result__ZAIH;
+  void *result__2AIH;
+  __INTEGER Self__HWWD;
+  void **Result__RY5C;
+  sz__Z0CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KBYC * ((__INTEGER )(sizeof(void *)))));
+  result__Y0CH=((__POINTER )(NULL));
+  a__2ZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__00CH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z0CH + a__2ZEH) & (__UINTEGER_32)(~ a__2ZEH));
+  new_size2__10CH=(__UINTEGER_32)(new_size__00CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__10CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__A0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__B0EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__10CH + a__A0EH) & (__UINTEGER_32)(~ a__A0EH));
+    ptr_table__YAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XAIH=((__POINTER )(NULL));
+    result__ZAIH=((__POINTER *)ptr_table__YAIH)[ 0];
+    if ((result__ZAIH == (void *)NULL)) {
+      result__ZAIH=new_lab__URJ(new_size__B0EH);
+      next__XAIH=(void *)((unsigned long)result__ZAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0EH)));
+      ((__POINTER *)next__XAIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YAIH)[ 0]=next__XAIH;
+    } else {
+      next__XAIH=((__POINTER *)result__ZAIH)[ 0];
+      if ((next__XAIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZAIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__B0EH <<  1)) <=  4096)) {
+          next__XAIH=(void *)((unsigned long)result__ZAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B0EH)));
+        } else {
+          next__XAIH=new_lab__URJ(new_size__B0EH);
+        };
+        ((__POINTER *)next__XAIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YAIH)[ 0]=next__XAIH;
+      } else {
+        ((__POINTER *)result__ZAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZAIH=next__XAIH;
+      };
+    };
+    ((__POINTER *)result__ZAIH)[ 0]=((__POINTER ) 3);
+    result__Y0CH=(void *)((unsigned long)result__ZAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__B5GH=first_free__XDVB;
-    while ((((void *)result__B5GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__B5GH)->map_size_and_id__ITB &  4294967292LU) < new_size__I1BH))) {
-      result__B5GH=((__MEMORY *)result__B5GH)->map_next_free__JTB;
+    result__2AIH=first_free__5DVB;
+    while ((((void *)result__2AIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__2AIH)->map_size_and_id__QTB &  4294967292LU) < new_size__00CH))) {
+      result__2AIH=((__MEMORY *)result__2AIH)->map_next_free__RTB;
     };
-    if (((void *)result__B5GH == (void *)NULL)) {
-      result__B5GH=new_page__OA5();
+    if (((void *)result__2AIH == (void *)NULL)) {
+      result__2AIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__B5GH,new_size__I1BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__B5GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__G1BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__B5GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__2AIH,new_size__00CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__2AIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__Y0CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__2AIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__JY5C=((void **)result__G1BH);
-  Self__5VWD=(__INTEGER)(nb_elements__CBYC -  1);
-  while ((Self__5VWD >=  0)) {
-    Result__JY5C[Self__5VWD]=NULL;
-    Self__5VWD=(__INTEGER)(Self__5VWD -  1);
+  Result__RY5C=((void **)result__Y0CH);
+  Self__HWWD=(__INTEGER)(nb_elements__KBYC -  1);
+  while ((Self__HWWD >=  0)) {
+    Result__RY5C[Self__HWWD]=NULL;
+    Self__HWWD=(__INTEGER)(Self__HWWD -  1);
   };
-  return(Result__JY5C);
+  return(Result__RY5C);
 }
 
-static void** create__ELBD(__INTEGER nb_elements__GLBD)
+static void** create__MLBD(__INTEGER nb_elements__OLBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__L1BH,a__PZDH,new_size__M1BH,new_size2__N1BH,a__TZDH;
-  __UINTEGER_32 new_size__UZDH;
-  __POINTER result__K1BH,ptr_table__F5GH,next__E5GH,result__G5GH;
-  void *result__J5GH;
-  __INTEGER Self__KEXD;
-  void **Result__BAGD;
-  sz__L1BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GLBD * ((__INTEGER )(sizeof(void *)))));
-  result__K1BH=((__POINTER )(NULL));
-  a__PZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__M1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1BH + a__PZDH) & (__UINTEGER_32)(~ a__PZDH));
-  new_size2__N1BH=(__UINTEGER_32)(new_size__M1BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__N1BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__TZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__UZDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__N1BH + a__TZDH) & (__UINTEGER_32)(~ a__TZDH));
-    ptr_table__F5GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UZDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__E5GH=((__POINTER )(NULL));
-    result__G5GH=((__POINTER *)ptr_table__F5GH)[ 0];
-    if ((result__G5GH == (void *)NULL)) {
-      result__G5GH=new_lab__MRJ(new_size__UZDH);
-      next__E5GH=(void *)((unsigned long)result__G5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZDH)));
-      ((__POINTER *)next__E5GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__F5GH)[ 0]=next__E5GH;
-    } else {
-      next__E5GH=((__POINTER *)result__G5GH)[ 0];
-      if ((next__E5GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G5GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UZDH <<  1)) <=  4096)) {
-          next__E5GH=(void *)((unsigned long)result__G5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZDH)));
-        } else {
-          next__E5GH=new_lab__MRJ(new_size__UZDH);
-        };
-        ((__POINTER *)next__E5GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__F5GH)[ 0]=next__E5GH;
-      } else {
-        ((__POINTER *)result__G5GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E5GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__G5GH=next__E5GH;
-      };
-    };
-    ((__POINTER *)result__G5GH)[ 0]=((__POINTER ) 3);
-    result__K1BH=(void *)((unsigned long)result__G5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__30CH,a__H0EH,new_size__40CH,new_size2__50CH,a__L0EH;
+  __UINTEGER_32 new_size__M0EH;
+  __POINTER result__20CH,ptr_table__ABIH,next__5AIH,result__BBIH;
+  void *result__EBIH;
+  __INTEGER Self__SEXD;
+  void **Result__JAGD;
+  sz__30CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__OLBD * ((__INTEGER )(sizeof(void *)))));
+  result__20CH=((__POINTER )(NULL));
+  a__H0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__40CH=(__UINTEGER_32)((__UINTEGER_32)(sz__30CH + a__H0EH) & (__UINTEGER_32)(~ a__H0EH));
+  new_size2__50CH=(__UINTEGER_32)(new_size__40CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__50CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__L0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__M0EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__50CH + a__L0EH) & (__UINTEGER_32)(~ a__L0EH));
+    ptr_table__ABIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__5AIH=((__POINTER )(NULL));
+    result__BBIH=((__POINTER *)ptr_table__ABIH)[ 0];
+    if ((result__BBIH == (void *)NULL)) {
+      result__BBIH=new_lab__URJ(new_size__M0EH);
+      next__5AIH=(void *)((unsigned long)result__BBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0EH)));
+      ((__POINTER *)next__5AIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ABIH)[ 0]=next__5AIH;
+    } else {
+      next__5AIH=((__POINTER *)result__BBIH)[ 0];
+      if ((next__5AIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BBIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__M0EH <<  1)) <=  4096)) {
+          next__5AIH=(void *)((unsigned long)result__BBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M0EH)));
+        } else {
+          next__5AIH=new_lab__URJ(new_size__M0EH);
+        };
+        ((__POINTER *)next__5AIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ABIH)[ 0]=next__5AIH;
+      } else {
+        ((__POINTER *)result__BBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5AIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__BBIH=next__5AIH;
+      };
+    };
+    ((__POINTER *)result__BBIH)[ 0]=((__POINTER ) 3);
+    result__20CH=(void *)((unsigned long)result__BBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__J5GH=first_free__XDVB;
-    while ((((void *)result__J5GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__J5GH)->map_size_and_id__ITB &  4294967292LU) < new_size__M1BH))) {
-      result__J5GH=((__MEMORY *)result__J5GH)->map_next_free__JTB;
+    result__EBIH=first_free__5DVB;
+    while ((((void *)result__EBIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EBIH)->map_size_and_id__QTB &  4294967292LU) < new_size__40CH))) {
+      result__EBIH=((__MEMORY *)result__EBIH)->map_next_free__RTB;
     };
-    if (((void *)result__J5GH == (void *)NULL)) {
-      result__J5GH=new_page__OA5();
+    if (((void *)result__EBIH == (void *)NULL)) {
+      result__EBIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__J5GH,new_size__M1BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__J5GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__K1BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__J5GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__EBIH,new_size__40CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EBIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__20CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EBIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__BAGD=((void **)result__K1BH);
-  Self__KEXD=(__INTEGER)(nb_elements__GLBD -  1);
-  while ((Self__KEXD >=  0)) {
-    Result__BAGD[Self__KEXD]=NULL;
-    Self__KEXD=(__INTEGER)(Self__KEXD -  1);
+  Result__JAGD=((void **)result__20CH);
+  Self__SEXD=(__INTEGER)(nb_elements__OLBD -  1);
+  while ((Self__SEXD >=  0)) {
+    Result__JAGD[Self__SEXD]=NULL;
+    Self__SEXD=(__INTEGER)(Self__SEXD -  1);
   };
-  return(Result__BAGD);
+  return(Result__JAGD);
 }
 
-static void** create__ILEF(__INTEGER nb_elements__KLEF)
+static void** create__UVEF(__INTEGER nb_elements__WVEF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__P1BH,a__0ZDH,new_size__Q1BH,new_size2__R1BH,a__4ZDH;
-  __UINTEGER_32 new_size__5ZDH;
-  __POINTER result__O1BH,ptr_table__N5GH,next__M5GH,result__O5GH;
-  void *result__R5GH;
-  __INTEGER Self__T3PF;
-  void **Result__O0IF;
-  sz__P1BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KLEF * ((__INTEGER )(sizeof(void *)))));
-  result__O1BH=((__POINTER )(NULL));
-  a__0ZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__Q1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__P1BH + a__0ZDH) & (__UINTEGER_32)(~ a__0ZDH));
-  new_size2__R1BH=(__UINTEGER_32)(new_size__Q1BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__R1BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__4ZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__5ZDH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__R1BH + a__4ZDH) & (__UINTEGER_32)(~ a__4ZDH));
-    ptr_table__N5GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5ZDH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__M5GH=((__POINTER )(NULL));
-    result__O5GH=((__POINTER *)ptr_table__N5GH)[ 0];
-    if ((result__O5GH == (void *)NULL)) {
-      result__O5GH=new_lab__MRJ(new_size__5ZDH);
-      next__M5GH=(void *)((unsigned long)result__O5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ZDH)));
-      ((__POINTER *)next__M5GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__N5GH)[ 0]=next__M5GH;
-    } else {
-      next__M5GH=((__POINTER *)result__O5GH)[ 0];
-      if ((next__M5GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O5GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5ZDH <<  1)) <=  4096)) {
-          next__M5GH=(void *)((unsigned long)result__O5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5ZDH)));
-        } else {
-          next__M5GH=new_lab__MRJ(new_size__5ZDH);
-        };
-        ((__POINTER *)next__M5GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__N5GH)[ 0]=next__M5GH;
-      } else {
-        ((__POINTER *)result__O5GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__O5GH=next__M5GH;
-      };
-    };
-    ((__POINTER *)result__O5GH)[ 0]=((__POINTER ) 3);
-    result__O1BH=(void *)((unsigned long)result__O5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__B1CH,a__S0EH,new_size__C1CH,new_size2__D1CH,a__W0EH;
+  __UINTEGER_32 new_size__X0EH;
+  __POINTER result__A1CH,ptr_table__IBIH,next__HBIH,result__JBIH;
+  void *result__MBIH;
+  __INTEGER Self__XJQF;
+  void **Result__QFJF;
+  sz__B1CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WVEF * ((__INTEGER )(sizeof(void *)))));
+  result__A1CH=((__POINTER )(NULL));
+  a__S0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__C1CH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1CH + a__S0EH) & (__UINTEGER_32)(~ a__S0EH));
+  new_size2__D1CH=(__UINTEGER_32)(new_size__C1CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__D1CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__W0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__X0EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__D1CH + a__W0EH) & (__UINTEGER_32)(~ a__W0EH));
+    ptr_table__IBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HBIH=((__POINTER )(NULL));
+    result__JBIH=((__POINTER *)ptr_table__IBIH)[ 0];
+    if ((result__JBIH == (void *)NULL)) {
+      result__JBIH=new_lab__URJ(new_size__X0EH);
+      next__HBIH=(void *)((unsigned long)result__JBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0EH)));
+      ((__POINTER *)next__HBIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IBIH)[ 0]=next__HBIH;
+    } else {
+      next__HBIH=((__POINTER *)result__JBIH)[ 0];
+      if ((next__HBIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JBIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__X0EH <<  1)) <=  4096)) {
+          next__HBIH=(void *)((unsigned long)result__JBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0EH)));
+        } else {
+          next__HBIH=new_lab__URJ(new_size__X0EH);
+        };
+        ((__POINTER *)next__HBIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IBIH)[ 0]=next__HBIH;
+      } else {
+        ((__POINTER *)result__JBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JBIH=next__HBIH;
+      };
+    };
+    ((__POINTER *)result__JBIH)[ 0]=((__POINTER ) 3);
+    result__A1CH=(void *)((unsigned long)result__JBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__R5GH=first_free__XDVB;
-    while ((((void *)result__R5GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__R5GH)->map_size_and_id__ITB &  4294967292LU) < new_size__Q1BH))) {
-      result__R5GH=((__MEMORY *)result__R5GH)->map_next_free__JTB;
+    result__MBIH=first_free__5DVB;
+    while ((((void *)result__MBIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MBIH)->map_size_and_id__QTB &  4294967292LU) < new_size__C1CH))) {
+      result__MBIH=((__MEMORY *)result__MBIH)->map_next_free__RTB;
     };
-    if (((void *)result__R5GH == (void *)NULL)) {
-      result__R5GH=new_page__OA5();
+    if (((void *)result__MBIH == (void *)NULL)) {
+      result__MBIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__R5GH,new_size__Q1BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__R5GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__O1BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__R5GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__MBIH,new_size__C1CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MBIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__A1CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MBIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__O0IF=((void **)result__O1BH);
-  Self__T3PF=(__INTEGER)(nb_elements__KLEF -  1);
-  while ((Self__T3PF >=  0)) {
-    Result__O0IF[Self__T3PF]=NULL;
-    Self__T3PF=(__INTEGER)(Self__T3PF -  1);
+  Result__QFJF=((void **)result__A1CH);
+  Self__XJQF=(__INTEGER)(nb_elements__WVEF -  1);
+  while ((Self__XJQF >=  0)) {
+    Result__QFJF[Self__XJQF]=NULL;
+    Self__XJQF=(__INTEGER)(Self__XJQF -  1);
   };
-  return(Result__O0IF);
+  return(Result__QFJF);
 }
 
-static void** create__BK2(__INTEGER nb_elements__DK2)
+static void** create__JK2(__INTEGER nb_elements__LK2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__T1BH,a__F0DH,new_size__U1BH,new_size2__V1BH,a__J0DH;
-  __UINTEGER_32 new_size__K0DH;
-  __POINTER result__S1BH,ptr_table__V5GH,next__U5GH,result__W5GH;
-  void *result__Z5GH;
-  __INTEGER Self__LTJC;
-  void **Result__YADB;
-  sz__T1BH=((__UINTEGER_32 )(__INTEGER)(nb_elements__DK2 * ((__INTEGER )(sizeof(void *)))));
-  result__S1BH=((__POINTER )(NULL));
-  a__F0DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__U1BH=(__UINTEGER_32)((__UINTEGER_32)(sz__T1BH + a__F0DH) & (__UINTEGER_32)(~ a__F0DH));
-  new_size2__V1BH=(__UINTEGER_32)(new_size__U1BH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__V1BH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__J0DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__K0DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__V1BH + a__J0DH) & (__UINTEGER_32)(~ a__J0DH));
-    ptr_table__V5GH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K0DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__U5GH=((__POINTER )(NULL));
-    result__W5GH=((__POINTER *)ptr_table__V5GH)[ 0];
-    if ((result__W5GH == (void *)NULL)) {
-      result__W5GH=new_lab__MRJ(new_size__K0DH);
-      next__U5GH=(void *)((unsigned long)result__W5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K0DH)));
-      ((__POINTER *)next__U5GH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__V5GH)[ 0]=next__U5GH;
-    } else {
-      next__U5GH=((__POINTER *)result__W5GH)[ 0];
-      if ((next__U5GH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W5GH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__K0DH <<  1)) <=  4096)) {
-          next__U5GH=(void *)((unsigned long)result__W5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K0DH)));
-        } else {
-          next__U5GH=new_lab__MRJ(new_size__K0DH);
-        };
-        ((__POINTER *)next__U5GH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__V5GH)[ 0]=next__U5GH;
-      } else {
-        ((__POINTER *)result__W5GH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U5GH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__W5GH=next__U5GH;
-      };
-    };
-    ((__POINTER *)result__W5GH)[ 0]=((__POINTER ) 3);
-    result__S1BH=(void *)((unsigned long)result__W5GH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__F1CH,a__30EH,new_size__G1CH,new_size2__H1CH,a__B1EH;
+  __UINTEGER_32 new_size__C1EH;
+  __POINTER result__E1CH,ptr_table__QBIH,next__PBIH,result__RBIH;
+  void *result__UBIH;
+  __INTEGER Self__TTJC;
+  void **Result__ABDB;
+  sz__F1CH=((__UINTEGER_32 )(__INTEGER)(nb_elements__LK2 * ((__INTEGER )(sizeof(void *)))));
+  result__E1CH=((__POINTER )(NULL));
+  a__30EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__G1CH=(__UINTEGER_32)((__UINTEGER_32)(sz__F1CH + a__30EH) & (__UINTEGER_32)(~ a__30EH));
+  new_size2__H1CH=(__UINTEGER_32)(new_size__G1CH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__H1CH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__B1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__C1EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__H1CH + a__B1EH) & (__UINTEGER_32)(~ a__B1EH));
+    ptr_table__QBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C1EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PBIH=((__POINTER )(NULL));
+    result__RBIH=((__POINTER *)ptr_table__QBIH)[ 0];
+    if ((result__RBIH == (void *)NULL)) {
+      result__RBIH=new_lab__URJ(new_size__C1EH);
+      next__PBIH=(void *)((unsigned long)result__RBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C1EH)));
+      ((__POINTER *)next__PBIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QBIH)[ 0]=next__PBIH;
+    } else {
+      next__PBIH=((__POINTER *)result__RBIH)[ 0];
+      if ((next__PBIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RBIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__C1EH <<  1)) <=  4096)) {
+          next__PBIH=(void *)((unsigned long)result__RBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C1EH)));
+        } else {
+          next__PBIH=new_lab__URJ(new_size__C1EH);
+        };
+        ((__POINTER *)next__PBIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QBIH)[ 0]=next__PBIH;
+      } else {
+        ((__POINTER *)result__RBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RBIH=next__PBIH;
+      };
+    };
+    ((__POINTER *)result__RBIH)[ 0]=((__POINTER ) 3);
+    result__E1CH=(void *)((unsigned long)result__RBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__Z5GH=first_free__XDVB;
-    while ((((void *)result__Z5GH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__Z5GH)->map_size_and_id__ITB &  4294967292LU) < new_size__U1BH))) {
-      result__Z5GH=((__MEMORY *)result__Z5GH)->map_next_free__JTB;
+    result__UBIH=first_free__5DVB;
+    while ((((void *)result__UBIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UBIH)->map_size_and_id__QTB &  4294967292LU) < new_size__G1CH))) {
+      result__UBIH=((__MEMORY *)result__UBIH)->map_next_free__RTB;
     };
-    if (((void *)result__Z5GH == (void *)NULL)) {
-      result__Z5GH=new_page__OA5();
+    if (((void *)result__UBIH == (void *)NULL)) {
+      result__UBIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__Z5GH,new_size__U1BH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__Z5GH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__S1BH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__Z5GH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__UBIH,new_size__G1CH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UBIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__E1CH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UBIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__YADB=((void **)result__S1BH);
-  Self__LTJC=(__INTEGER)(nb_elements__DK2 -  1);
-  while ((Self__LTJC >=  0)) {
-    Result__YADB[Self__LTJC]=NULL;
-    Self__LTJC=(__INTEGER)(Self__LTJC -  1);
+  Result__ABDB=((void **)result__E1CH);
+  Self__TTJC=(__INTEGER)(nb_elements__LK2 -  1);
+  while ((Self__TTJC >=  0)) {
+    Result__ABDB[Self__TTJC]=NULL;
+    Self__TTJC=(__INTEGER)(Self__TTJC -  1);
   };
-  return(Result__YADB);
+  return(Result__ABDB);
 }
 
-static void add__IYR(__HASHED_SEToABSTRACT_STRINGo *Self__JYR,void *e__KYR)
+static void add__QYR(__HASHED_SEToABSTRACT_STRINGo *Self__RYR,void *e__SYR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__25GH,__tmp__45GH,Self__55GH,idx__SYR,typ_id__DAHH;
-  __POINTER ptr__CAHH,ptr_table__NAHH,next__MAHH,result__OAHH;
-  __POINTER ptr_table__SAHH,next__RAHH,result__TAHH;
-  __UINTEGER_32 sz__EAHH,a__FAHH,new_size__GAHH,t__HAHH,a__IAHH;
-  __UINTEGER_32 new_size__VAHH,lab_type__UAHH;
-  void *node__VYR,*n__LAHH;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__BAHH,*Self__JAHH;
-  has__1PW(Self__JYR,e__KYR);
-  has__1PW(Self__JYR,e__KYR);
-  result__25GH= 0;
-  __tmp__45GH=((__STRING_CONSTANT *)e__KYR)->count__DD;
-  Self__55GH= 1;
-  while ((Self__55GH <= __tmp__45GH)) {
-    result__25GH=(__INTEGER)((__INTEGER)( 5 * result__25GH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__KYR)->storage__VQO)[(__INTEGER)(Self__55GH -  1)])));
-    Self__55GH=(__INTEGER)(Self__55GH +  1);
-  };
-  if ((result__25GH <  0)) {
-    result__25GH=(__INTEGER)(~ result__25GH);
-  };
-  idx__SYR=(__INTEGER)(result__25GH % Self__JYR->capacity__ZYR);
-  node__VYR=((void **)Self__JYR->buckets__4YR)[idx__SYR];
-  while ((! (((void *)node__VYR == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__VYR)->item__KZR,e__KYR)))) {
-    node__VYR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__VYR)->next__WZR;
-  };
-  if (((void *)node__VYR == (void *)NULL)) {
-    if ((Self__JYR->capacity__ZYR == Self__JYR->count__5ZR)) {
-      increase_capacity__4RNB(Self__JYR);
-      idx__SYR=(__INTEGER)(result__25GH % Self__JYR->capacity__ZYR);
-    };
-    n__LAHH=((void **)Self__JYR->buckets__4YR)[idx__SYR];
-    result__BAHH=NULL;
-    ptr__CAHH=((__POINTER )(NULL));
-    typ_id__DAHH= 0;
-    sz__EAHH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-    if ((sz__EAHH ==  0)) {
-      result__BAHH=HASHED_SET_NODEoABSTRACT_STRINGo__;
-    } else {
-      typ_id__DAHH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__EAHH);
-      if ((typ_id__DAHH == (__INTEGER)(-  1))) {
-        a__FAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__GAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__EAHH + a__FAHH) & (__UINTEGER_32)(~ a__FAHH));
-        ptr_table__NAHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__MAHH=((__POINTER )(NULL));
-        result__OAHH=((__POINTER *)ptr_table__NAHH)[ 0];
-        if ((result__OAHH == (void *)NULL)) {
-          result__OAHH=new_lab__MRJ(new_size__GAHH);
-          next__MAHH=(void *)((unsigned long)result__OAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GAHH)));
-          ((__POINTER *)next__MAHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NAHH)[ 0]=next__MAHH;
-        } else {
-          next__MAHH=((__POINTER *)result__OAHH)[ 0];
-          if ((next__MAHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OAHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GAHH <<  1)) <=  4096)) {
-              next__MAHH=(void *)((unsigned long)result__OAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GAHH)));
+  __INTEGER result__XBIH,__tmp__ZBIH,Self__0BIH,idx__0YR,typ_id__4BIH;
+  __POINTER ptr__3BIH,ptr_table__ICIH,next__HCIH,result__JCIH;
+  __POINTER ptr_table__NCIH,next__MCIH,result__OCIH;
+  __UINTEGER_32 sz__5BIH,a__ACIH,new_size__BCIH,t__CCIH,a__DCIH;
+  __UINTEGER_32 new_size__QCIH,lab_type__PCIH;
+  void *node__3YR,*n__GCIH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__2BIH,*Self__ECIH;
+  has__DQW(Self__RYR,e__SYR);
+  has__DQW(Self__RYR,e__SYR);
+  result__XBIH= 0;
+  __tmp__ZBIH=((__STRING_CONSTANT *)e__SYR)->count__DD;
+  Self__0BIH= 1;
+  while ((Self__0BIH <= __tmp__ZBIH)) {
+    result__XBIH=(__INTEGER)((__INTEGER)( 5 * result__XBIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__SYR)->storage__3QO)[(__INTEGER)(Self__0BIH -  1)])));
+    Self__0BIH=(__INTEGER)(Self__0BIH +  1);
+  };
+  if ((result__XBIH <  0)) {
+    result__XBIH=(__INTEGER)(~ result__XBIH);
+  };
+  idx__0YR=(__INTEGER)(result__XBIH % Self__RYR->capacity__BZR);
+  node__3YR=((void **)Self__RYR->buckets__GZR)[idx__0YR];
+  while ((! (((void *)node__3YR == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__3YR)->item__SZR,e__SYR)))) {
+    node__3YR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__3YR)->next__4ZR;
+  };
+  if (((void *)node__3YR == (void *)NULL)) {
+    if ((Self__RYR->capacity__BZR == Self__RYR->count__H0R)) {
+      increase_capacity__GSNB(Self__RYR);
+      idx__0YR=(__INTEGER)(result__XBIH % Self__RYR->capacity__BZR);
+    };
+    n__GCIH=((void **)Self__RYR->buckets__GZR)[idx__0YR];
+    result__2BIH=NULL;
+    ptr__3BIH=((__POINTER )(NULL));
+    typ_id__4BIH= 0;
+    sz__5BIH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__5BIH ==  0)) {
+      result__2BIH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__4BIH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5BIH);
+      if ((typ_id__4BIH == (__INTEGER)(-  1))) {
+        a__ACIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5BIH + a__ACIH) & (__UINTEGER_32)(~ a__ACIH));
+        ptr_table__ICIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BCIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__HCIH=((__POINTER )(NULL));
+        result__JCIH=((__POINTER *)ptr_table__ICIH)[ 0];
+        if ((result__JCIH == (void *)NULL)) {
+          result__JCIH=new_lab__URJ(new_size__BCIH);
+          next__HCIH=(void *)((unsigned long)result__JCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCIH)));
+          ((__POINTER *)next__HCIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ICIH)[ 0]=next__HCIH;
+        } else {
+          next__HCIH=((__POINTER *)result__JCIH)[ 0];
+          if ((next__HCIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JCIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BCIH <<  1)) <=  4096)) {
+              next__HCIH=(void *)((unsigned long)result__JCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCIH)));
             } else {
-              next__MAHH=new_lab__MRJ(new_size__GAHH);
-            };
-            ((__POINTER *)next__MAHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NAHH)[ 0]=next__MAHH;
-          } else {
-            ((__POINTER *)result__OAHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MAHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OAHH=next__MAHH;
-          };
-        };
-        ptr__CAHH=result__OAHH;
-      } else {
-        t__HAHH=((__UINTEGER_32 )typ_id__DAHH);
-        a__IAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__EAHH + a__IAHH) & (__UINTEGER_32)(~ a__IAHH));
-        ptr_table__SAHH=((__POINTER )(&(table_type[(t__HAHH)])));
-        lab_type__UAHH=(__UINTEGER_32)(t__HAHH |  1);
-        next__RAHH=((__POINTER )(NULL));
-        result__TAHH=((__POINTER *)ptr_table__SAHH)[ 0];
-        if ((result__TAHH == (void *)NULL)) {
-          result__TAHH=new_lab__MRJ(lab_type__UAHH);
-          next__RAHH=(void *)((unsigned long)result__TAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VAHH)));
-          ((__POINTER *)next__RAHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SAHH)[ 0]=next__RAHH;
-        } else {
-          next__RAHH=((__POINTER *)result__TAHH)[ 0];
-          if ((next__RAHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TAHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VAHH <<  1)) <=  4096)) {
-              next__RAHH=(void *)((unsigned long)result__TAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VAHH)));
+              next__HCIH=new_lab__URJ(new_size__BCIH);
+            };
+            ((__POINTER *)next__HCIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ICIH)[ 0]=next__HCIH;
+          } else {
+            ((__POINTER *)result__JCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__JCIH=next__HCIH;
+          };
+        };
+        ptr__3BIH=result__JCIH;
+      } else {
+        t__CCIH=((__UINTEGER_32 )typ_id__4BIH);
+        a__DCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5BIH + a__DCIH) & (__UINTEGER_32)(~ a__DCIH));
+        ptr_table__NCIH=((__POINTER )(&(table_type[(t__CCIH)])));
+        lab_type__PCIH=(__UINTEGER_32)(t__CCIH |  1);
+        next__MCIH=((__POINTER )(NULL));
+        result__OCIH=((__POINTER *)ptr_table__NCIH)[ 0];
+        if ((result__OCIH == (void *)NULL)) {
+          result__OCIH=new_lab__URJ(lab_type__PCIH);
+          next__MCIH=(void *)((unsigned long)result__OCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QCIH)));
+          ((__POINTER *)next__MCIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NCIH)[ 0]=next__MCIH;
+        } else {
+          next__MCIH=((__POINTER *)result__OCIH)[ 0];
+          if ((next__MCIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OCIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QCIH <<  1)) <=  4096)) {
+              next__MCIH=(void *)((unsigned long)result__OCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QCIH)));
             } else {
-              next__RAHH=new_lab__MRJ(lab_type__UAHH);
+              next__MCIH=new_lab__URJ(lab_type__PCIH);
             };
-            ((__POINTER *)next__RAHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SAHH)[ 0]=next__RAHH;
+            ((__POINTER *)next__MCIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NCIH)[ 0]=next__MCIH;
           } else {
-            ((__POINTER *)result__TAHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RAHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TAHH=next__RAHH;
+            ((__POINTER *)result__OCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__OCIH=next__MCIH;
           };
         };
-        ptr__CAHH=result__TAHH;
+        ptr__3BIH=result__OCIH;
       };
-      result__BAHH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__CAHH);
-      *(result__BAHH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__2BIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__3BIH);
+      *(result__2BIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    Self__JAHH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__BAHH);
-    Self__JAHH->item__KZR=e__KYR;
-    Self__JAHH->next__WZR=n__LAHH;
-    node__VYR=result__BAHH;
-    ((void **)Self__JYR->buckets__4YR)[idx__SYR]=result__BAHH;
-    Self__JYR->count__5ZR=(__INTEGER)(Self__JYR->count__5ZR +  1);
+    Self__ECIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__2BIH);
+    Self__ECIH->item__SZR=e__SYR;
+    Self__ECIH->next__4ZR=n__GCIH;
+    node__3YR=result__2BIH;
+    ((void **)Self__RYR->buckets__GZR)[idx__0YR]=result__2BIH;
+    Self__RYR->count__H0R=(__INTEGER)(Self__RYR->count__H0R +  1);
   };
 }
 
-static void* operator__name__WGB(void *op__ZGB)
+static void* operator__name__4GB(void *op__BHB)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__BHB,Self__0VB;
-  __CHARACTER c__1GB;
-  __BOOLEAN __tmp__PHB,__tmp__2HB,result__YFDB,__tmp__JIB,result__KGDB;
-  __BOOLEAN __tmp__WIB,result__2GDB,__tmp__DJB,result__OHDB,__tmp__QJB;
-  __BOOLEAN result__AIDB,__tmp__3JB,result__SIDB,__tmp__KKB;
-  __BOOLEAN result__EJDB,__tmp__XKB,result__WJDB,__tmp__ELB;
-  __BOOLEAN result__IKDB,__tmp__RLB,result__0KDB,__tmp__4LB;
-  __BOOLEAN result__MLDB,__tmp__LMB,result__4LDB,__tmp__YMB;
-  __BOOLEAN result__QMDB,__tmp__FNB,result__CNDB,__tmp__SNB;
-  __BOOLEAN result__UNDB,__tmp__5NB,result__GODB;
-  c__1GB='\0';
-  copy__ZCS(string_tmp__VH,(&__string_81));
-  __tmp__BHB=((__STRING_CONSTANT *)op__ZGB)->count__DD;
-  Self__0VB= 1;
-  while ((Self__0VB <= __tmp__BHB)) {
-    c__1GB=((__CHARACTER *)((__STRING_CONSTANT *)op__ZGB)->storage__VQO)[(__INTEGER)(Self__0VB -  1)];
-    if ((c__1GB == '+')) {
-      append__BOS(string_tmp__VH,(&__string_188));
-      __tmp__PHB=TRUE__;
+  __INTEGER __tmp__JHB,Self__CWB;
+  __CHARACTER c__DHB;
+  __BOOLEAN __tmp__XHB,__tmp__EIB,result__AGDB,__tmp__RIB,result__SGDB;
+  __BOOLEAN __tmp__4IB,result__EHDB,__tmp__LJB,result__WHDB,__tmp__YJB;
+  __BOOLEAN result__IIDB,__tmp__FKB,result__0IDB,__tmp__SKB;
+  __BOOLEAN result__MJDB,__tmp__5KB,result__4JDB,__tmp__MLB;
+  __BOOLEAN result__QKDB,__tmp__ZLB,result__CLDB,__tmp__GMB;
+  __BOOLEAN result__ULDB,__tmp__TMB,result__GMDB,__tmp__ANB;
+  __BOOLEAN result__YMDB,__tmp__NNB,result__KNDB,__tmp__0NB;
+  __BOOLEAN result__2NDB,__tmp__HOB,result__OODB;
+  c__DHB='\0';
+  copy__BDS(string_tmp__VH,(&__string_81));
+  __tmp__JHB=((__STRING_CONSTANT *)op__BHB)->count__DD;
+  Self__CWB= 1;
+  while ((Self__CWB <= __tmp__JHB)) {
+    c__DHB=((__CHARACTER *)((__STRING_CONSTANT *)op__BHB)->storage__3QO)[(__INTEGER)(Self__CWB -  1)];
+    if ((c__DHB == '+')) {
+      append__JOS(string_tmp__VH,(&__string_186));
+      __tmp__XHB=TRUE__;
     } else {
-      __tmp__PHB=FALSE__;
+      __tmp__XHB=FALSE__;
     };
-    if (__tmp__PHB) {
-      __tmp__2HB=TRUE__;
+    if (__tmp__XHB) {
+      __tmp__EIB=TRUE__;
     } else {
-      result__YFDB=(c__1GB == '-');
-      if (result__YFDB) {
-        append__BOS(string_tmp__VH,(&__string_189));
+      result__AGDB=(c__DHB == '-');
+      if (result__AGDB) {
+        append__JOS(string_tmp__VH,(&__string_187));
       };
-      __tmp__2HB=result__YFDB;
+      __tmp__EIB=result__AGDB;
     };
-    if (__tmp__2HB) {
-      __tmp__JIB=TRUE__;
+    if (__tmp__EIB) {
+      __tmp__RIB=TRUE__;
     } else {
-      result__KGDB=(c__1GB == '~');
-      if (result__KGDB) {
-        append__BOS(string_tmp__VH,(&__string_190));
+      result__SGDB=(c__DHB == '~');
+      if (result__SGDB) {
+        append__JOS(string_tmp__VH,(&__string_188));
       };
-      __tmp__JIB=result__KGDB;
+      __tmp__RIB=result__SGDB;
     };
-    if (__tmp__JIB) {
-      __tmp__WIB=TRUE__;
+    if (__tmp__RIB) {
+      __tmp__4IB=TRUE__;
     } else {
-      result__2GDB=(c__1GB == '!');
-      if (result__2GDB) {
-        append__BOS(string_tmp__VH,(&__string_191));
+      result__EHDB=(c__DHB == '!');
+      if (result__EHDB) {
+        append__JOS(string_tmp__VH,(&__string_189));
       };
-      __tmp__WIB=result__2GDB;
+      __tmp__4IB=result__EHDB;
     };
-    if (__tmp__WIB) {
-      __tmp__DJB=TRUE__;
+    if (__tmp__4IB) {
+      __tmp__LJB=TRUE__;
     } else {
-      result__OHDB=(c__1GB == '/');
-      if (result__OHDB) {
-        append__BOS(string_tmp__VH,(&__string_192));
+      result__WHDB=(c__DHB == '/');
+      if (result__WHDB) {
+        append__JOS(string_tmp__VH,(&__string_190));
       };
-      __tmp__DJB=result__OHDB;
+      __tmp__LJB=result__WHDB;
     };
-    if (__tmp__DJB) {
-      __tmp__QJB=TRUE__;
+    if (__tmp__LJB) {
+      __tmp__YJB=TRUE__;
     } else {
-      result__AIDB=(c__1GB == '*');
-      if (result__AIDB) {
-        append__BOS(string_tmp__VH,(&__string_193));
+      result__IIDB=(c__DHB == '*');
+      if (result__IIDB) {
+        append__JOS(string_tmp__VH,(&__string_191));
       };
-      __tmp__QJB=result__AIDB;
+      __tmp__YJB=result__IIDB;
     };
-    if (__tmp__QJB) {
-      __tmp__3JB=TRUE__;
+    if (__tmp__YJB) {
+      __tmp__FKB=TRUE__;
     } else {
-      result__SIDB=(c__1GB == '^');
-      if (result__SIDB) {
-        append__BOS(string_tmp__VH,(&__string_194));
+      result__0IDB=(c__DHB == '^');
+      if (result__0IDB) {
+        append__JOS(string_tmp__VH,(&__string_192));
       };
-      __tmp__3JB=result__SIDB;
+      __tmp__FKB=result__0IDB;
     };
-    if (__tmp__3JB) {
-      __tmp__KKB=TRUE__;
+    if (__tmp__FKB) {
+      __tmp__SKB=TRUE__;
     } else {
-      result__EJDB=(c__1GB == '%');
-      if (result__EJDB) {
-        append__BOS(string_tmp__VH,(&__string_195));
+      result__MJDB=(c__DHB == '%');
+      if (result__MJDB) {
+        append__JOS(string_tmp__VH,(&__string_193));
       };
-      __tmp__KKB=result__EJDB;
+      __tmp__SKB=result__MJDB;
     };
-    if (__tmp__KKB) {
-      __tmp__XKB=TRUE__;
+    if (__tmp__SKB) {
+      __tmp__5KB=TRUE__;
     } else {
-      result__WJDB=(c__1GB == '>');
-      if (result__WJDB) {
-        append__BOS(string_tmp__VH,(&__string_196));
+      result__4JDB=(c__DHB == '>');
+      if (result__4JDB) {
+        append__JOS(string_tmp__VH,(&__string_194));
       };
-      __tmp__XKB=result__WJDB;
+      __tmp__5KB=result__4JDB;
     };
-    if (__tmp__XKB) {
-      __tmp__ELB=TRUE__;
+    if (__tmp__5KB) {
+      __tmp__MLB=TRUE__;
     } else {
-      result__IKDB=(c__1GB == '<');
-      if (result__IKDB) {
-        append__BOS(string_tmp__VH,(&__string_197));
+      result__QKDB=(c__DHB == '<');
+      if (result__QKDB) {
+        append__JOS(string_tmp__VH,(&__string_195));
       };
-      __tmp__ELB=result__IKDB;
+      __tmp__MLB=result__QKDB;
     };
-    if (__tmp__ELB) {
-      __tmp__RLB=TRUE__;
+    if (__tmp__MLB) {
+      __tmp__ZLB=TRUE__;
     } else {
-      result__0KDB=(c__1GB == '=');
-      if (result__0KDB) {
-        append__BOS(string_tmp__VH,(&__string_198));
+      result__CLDB=(c__DHB == '=');
+      if (result__CLDB) {
+        append__JOS(string_tmp__VH,(&__string_196));
       };
-      __tmp__RLB=result__0KDB;
+      __tmp__ZLB=result__CLDB;
     };
-    if (__tmp__RLB) {
-      __tmp__4LB=TRUE__;
+    if (__tmp__ZLB) {
+      __tmp__GMB=TRUE__;
     } else {
-      result__MLDB=(c__1GB == '\\');
-      if (result__MLDB) {
-        append__BOS(string_tmp__VH,(&__string_199));
+      result__ULDB=(c__DHB == '\\');
+      if (result__ULDB) {
+        append__JOS(string_tmp__VH,(&__string_197));
       };
-      __tmp__4LB=result__MLDB;
+      __tmp__GMB=result__ULDB;
     };
-    if (__tmp__4LB) {
-      __tmp__LMB=TRUE__;
+    if (__tmp__GMB) {
+      __tmp__TMB=TRUE__;
     } else {
-      result__4LDB=(c__1GB == '|');
-      if (result__4LDB) {
-        append__BOS(string_tmp__VH,(&__string_200));
+      result__GMDB=(c__DHB == '|');
+      if (result__GMDB) {
+        append__JOS(string_tmp__VH,(&__string_198));
       };
-      __tmp__LMB=result__4LDB;
+      __tmp__TMB=result__GMDB;
     };
-    if (__tmp__LMB) {
-      __tmp__YMB=TRUE__;
+    if (__tmp__TMB) {
+      __tmp__ANB=TRUE__;
     } else {
-      result__QMDB=(c__1GB == '&');
-      if (result__QMDB) {
-        append__BOS(string_tmp__VH,(&__string_201));
+      result__YMDB=(c__DHB == '&');
+      if (result__YMDB) {
+        append__JOS(string_tmp__VH,(&__string_199));
       };
-      __tmp__YMB=result__QMDB;
+      __tmp__ANB=result__YMDB;
     };
-    if (__tmp__YMB) {
-      __tmp__FNB=TRUE__;
+    if (__tmp__ANB) {
+      __tmp__NNB=TRUE__;
     } else {
-      result__CNDB=(c__1GB == '$');
-      if (result__CNDB) {
-        append__BOS(string_tmp__VH,(&__string_202));
+      result__KNDB=(c__DHB == '$');
+      if (result__KNDB) {
+        append__JOS(string_tmp__VH,(&__string_200));
       };
-      __tmp__FNB=result__CNDB;
+      __tmp__NNB=result__KNDB;
     };
-    if (__tmp__FNB) {
-      __tmp__SNB=TRUE__;
+    if (__tmp__NNB) {
+      __tmp__0NB=TRUE__;
     } else {
-      result__UNDB=(c__1GB == '#');
-      if (result__UNDB) {
-        append__BOS(string_tmp__VH,(&__string_203));
+      result__2NDB=(c__DHB == '#');
+      if (result__2NDB) {
+        append__JOS(string_tmp__VH,(&__string_201));
       };
-      __tmp__SNB=result__UNDB;
+      __tmp__0NB=result__2NDB;
     };
-    if (__tmp__SNB) {
-      __tmp__5NB=TRUE__;
+    if (__tmp__0NB) {
+      __tmp__HOB=TRUE__;
     } else {
-      result__GODB=(c__1GB == '@');
-      if (result__GODB) {
-        append__BOS(string_tmp__VH,(&__string_204));
+      result__OODB=(c__DHB == '@');
+      if (result__OODB) {
+        append__JOS(string_tmp__VH,(&__string_202));
       };
-      __tmp__5NB=result__GODB;
+      __tmp__HOB=result__OODB;
     };
-    if ((! __tmp__5NB)) {
-      if ((c__1GB == '?')) {
-        append__BOS(string_tmp__VH,(&__string_205));
+    if ((! __tmp__HOB)) {
+      if ((c__DHB == '?')) {
+        append__JOS(string_tmp__VH,(&__string_203));
       };
     };
-    Self__0VB=(__INTEGER)(Self__0VB +  1);
+    Self__CWB=(__INTEGER)(Self__CWB +  1);
   };
-  return(get__IWB(string_tmp__VH));
+  return(get__QWB(string_tmp__VH));
 }
 
-static void print__WHD(__STRING_CONSTANT *Self__XHD)
+static void print__4HD(__STRING_CONSTANT *Self__5HD)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__YHF(Self__XHD);
+  put_string__AIF(Self__5HD);
 }
 
-static void* get__IWB(void *str__KWB)
+static void* get__QWB(void *str__SWB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__MWB,*__tmp__KXB;
-  void *result__PLS;
-  __STRING *Self__BGX;
-  __INTEGER result__DGX,__tmp__EGX,Self__NV2,typ_id__HLD,c__QFT;
-  __INTEGER Self__WZFH,result__ABHH,__tmp__CBHH,Self__DBHH,idx__R3S;
-  __INTEGER typ_id__IGJB;
-  __STRING_CONSTANT *result__BLD,*result__YGF,*Self__OFT,*Self__BBHH;
-  __POINTER ptr__CLD,ptr_table__XAHH,next__WAHH,result__YAHH;
-  __POINTER ptr_table__2AHH,next__1AHH,result__3AHH,ptr__DGJB;
-  __POINTER ptr_table__GBHH,next__FBHH,result__HBHH,ptr_table__LBHH;
-  __POINTER next__KBHH,result__MBHH;
-  __UINTEGER_32 sz__ELD,a__D1DH,new_size__E1DH,t__I1DH,a__H1DH;
-  __UINTEGER_32 new_size__5AHH,lab_type__4AHH,sz__FGJB,a__OJEH;
-  __UINTEGER_32 new_size__PJEH,t__TJEH,a__SJEH,new_size__OBHH;
-  __UINTEGER_32 lab_type__NBHH;
-  __HASHED_SEToABSTRACT_STRINGo *Self__2KS,*Self__I3S;
-  void *node__OLS,*node__S3S,*n__HKCB;
-  __CHARACTER *Self__XZFH,*model__YZFH;
-  __HASHED_SET_NODEoABSTRACT_STRINGo *result__CGJB,*Self__LADC;
-  result__MWB=NULL;
-  Self__2KS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-  result__PLS=NULL;
-  Self__BGX=((__STRING *)str__KWB);
-  result__DGX= 0;
-  __tmp__EGX=Self__BGX->count__WFC;
-  Self__NV2= 1;
-  while ((Self__NV2 <= __tmp__EGX)) {
-    result__DGX=(__INTEGER)((__INTEGER)( 5 * result__DGX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BGX->storage__BCS)[(__INTEGER)(Self__NV2 -  1)])));
-    Self__NV2=(__INTEGER)(Self__NV2 +  1);
-  };
-  if ((result__DGX <  0)) {
-    result__DGX=(__INTEGER)(~ result__DGX);
-  };
-  node__OLS=((void **)Self__2KS->buckets__4YR)[(__INTEGER)(result__DGX % Self__2KS->capacity__ZYR)];
-  while ((! (((void *)node__OLS == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->item__KZR,str__KWB)))) {
-    node__OLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->next__WZR;
-  };
-  if (((void *)node__OLS != (void *)NULL)) {
-    result__PLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OLS)->item__KZR;
-  };
-  if (((void *)result__PLS == (void *)NULL)) {
-    result__BLD=NULL;
-    ptr__CLD=((__POINTER )(NULL));
-    typ_id__HLD= 0;
-    sz__ELD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__ELD ==  0)) {
-      result__BLD=STRING_CONSTANT__;
-    } else {
-      typ_id__HLD=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ELD);
-      if ((typ_id__HLD == (__INTEGER)(-  1))) {
-        a__D1DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__E1DH=(__UINTEGER_32)((__UINTEGER_32)(sz__ELD + a__D1DH) & (__UINTEGER_32)(~ a__D1DH));
-        ptr_table__XAHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E1DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__WAHH=((__POINTER )(NULL));
-        result__YAHH=((__POINTER *)ptr_table__XAHH)[ 0];
-        if ((result__YAHH == (void *)NULL)) {
-          result__YAHH=new_lab__MRJ(new_size__E1DH);
-          next__WAHH=(void *)((unsigned long)result__YAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E1DH)));
-          ((__POINTER *)next__WAHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XAHH)[ 0]=next__WAHH;
-        } else {
-          next__WAHH=((__POINTER *)result__YAHH)[ 0];
-          if ((next__WAHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YAHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__E1DH <<  1)) <=  4096)) {
-              next__WAHH=(void *)((unsigned long)result__YAHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E1DH)));
+  void *result__UWB,*__tmp__SXB;
+  void *result__XLS;
+  __STRING *Self__JGX;
+  __INTEGER result__LGX,__tmp__MGX,Self__VV2,typ_id__PLD,c__YFT;
+  __INTEGER Self__G1GH,result__1CIH,__tmp__3CIH,Self__4CIH,idx__Z3S;
+  __INTEGER typ_id__QGJB;
+  __STRING_CONSTANT *result__JLD,*result__AHF,*Self__WFT,*Self__2CIH;
+  __POINTER ptr__KLD,ptr_table__SCIH,next__RCIH,result__TCIH;
+  __POINTER ptr_table__XCIH,next__WCIH,result__YCIH,ptr__LGJB;
+  __POINTER ptr_table__BDIH,next__ADIH,result__CDIH,ptr_table__GDIH;
+  __POINTER next__FDIH,result__HDIH;
+  __UINTEGER_32 sz__MLD,a__11EH,new_size__21EH,t__A2EH,a__51EH;
+  __UINTEGER_32 new_size__0CIH,lab_type__ZCIH,sz__NGJB,a__4KFH;
+  __UINTEGER_32 new_size__5KFH,t__DLFH,a__CLFH,new_size__JDIH;
+  __UINTEGER_32 lab_type__IDIH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__ELS,*Self__Q3S;
+  void *node__WLS,*node__03S,*n__PKCB;
+  __CHARACTER *Self__H1GH,*model__I1GH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__KGJB,*Self__TADC;
+  result__UWB=NULL;
+  Self__ELS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__XLS=NULL;
+  Self__JGX=((__STRING *)str__SWB);
+  result__LGX= 0;
+  __tmp__MGX=Self__JGX->count__4FC;
+  Self__VV2= 1;
+  while ((Self__VV2 <= __tmp__MGX)) {
+    result__LGX=(__INTEGER)((__INTEGER)( 5 * result__LGX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JGX->storage__JCS)[(__INTEGER)(Self__VV2 -  1)])));
+    Self__VV2=(__INTEGER)(Self__VV2 +  1);
+  };
+  if ((result__LGX <  0)) {
+    result__LGX=(__INTEGER)(~ result__LGX);
+  };
+  node__WLS=((void **)Self__ELS->buckets__GZR)[(__INTEGER)(result__LGX % Self__ELS->capacity__BZR)];
+  while ((! (((void *)node__WLS == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__WLS)->item__SZR,str__SWB)))) {
+    node__WLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__WLS)->next__4ZR;
+  };
+  if (((void *)node__WLS != (void *)NULL)) {
+    result__XLS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__WLS)->item__SZR;
+  };
+  if (((void *)result__XLS == (void *)NULL)) {
+    result__JLD=NULL;
+    ptr__KLD=((__POINTER )(NULL));
+    typ_id__PLD= 0;
+    sz__MLD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__MLD ==  0)) {
+      result__JLD=STRING_CONSTANT__;
+    } else {
+      typ_id__PLD=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__MLD);
+      if ((typ_id__PLD == (__INTEGER)(-  1))) {
+        a__11EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__21EH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLD + a__11EH) & (__UINTEGER_32)(~ a__11EH));
+        ptr_table__SCIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__21EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__RCIH=((__POINTER )(NULL));
+        result__TCIH=((__POINTER *)ptr_table__SCIH)[ 0];
+        if ((result__TCIH == (void *)NULL)) {
+          result__TCIH=new_lab__URJ(new_size__21EH);
+          next__RCIH=(void *)((unsigned long)result__TCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21EH)));
+          ((__POINTER *)next__RCIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SCIH)[ 0]=next__RCIH;
+        } else {
+          next__RCIH=((__POINTER *)result__TCIH)[ 0];
+          if ((next__RCIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TCIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__21EH <<  1)) <=  4096)) {
+              next__RCIH=(void *)((unsigned long)result__TCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21EH)));
             } else {
-              next__WAHH=new_lab__MRJ(new_size__E1DH);
-            };
-            ((__POINTER *)next__WAHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XAHH)[ 0]=next__WAHH;
-          } else {
-            ((__POINTER *)result__YAHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WAHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YAHH=next__WAHH;
-          };
-        };
-        ptr__CLD=result__YAHH;
-      } else {
-        t__I1DH=((__UINTEGER_32 )typ_id__HLD);
-        a__H1DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5AHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ELD + a__H1DH) & (__UINTEGER_32)(~ a__H1DH));
-        ptr_table__2AHH=((__POINTER )(&(table_type[(t__I1DH)])));
-        lab_type__4AHH=(__UINTEGER_32)(t__I1DH |  1);
-        next__1AHH=((__POINTER )(NULL));
-        result__3AHH=((__POINTER *)ptr_table__2AHH)[ 0];
-        if ((result__3AHH == (void *)NULL)) {
-          result__3AHH=new_lab__MRJ(lab_type__4AHH);
-          next__1AHH=(void *)((unsigned long)result__3AHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5AHH)));
-          ((__POINTER *)next__1AHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2AHH)[ 0]=next__1AHH;
-        } else {
-          next__1AHH=((__POINTER *)result__3AHH)[ 0];
-          if ((next__1AHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3AHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5AHH <<  1)) <=  4096)) {
-              next__1AHH=(void *)((unsigned long)result__3AHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5AHH)));
+              next__RCIH=new_lab__URJ(new_size__21EH);
+            };
+            ((__POINTER *)next__RCIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SCIH)[ 0]=next__RCIH;
+          } else {
+            ((__POINTER *)result__TCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TCIH=next__RCIH;
+          };
+        };
+        ptr__KLD=result__TCIH;
+      } else {
+        t__A2EH=((__UINTEGER_32 )typ_id__PLD);
+        a__51EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0CIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLD + a__51EH) & (__UINTEGER_32)(~ a__51EH));
+        ptr_table__XCIH=((__POINTER )(&(table_type[(t__A2EH)])));
+        lab_type__ZCIH=(__UINTEGER_32)(t__A2EH |  1);
+        next__WCIH=((__POINTER )(NULL));
+        result__YCIH=((__POINTER *)ptr_table__XCIH)[ 0];
+        if ((result__YCIH == (void *)NULL)) {
+          result__YCIH=new_lab__URJ(lab_type__ZCIH);
+          next__WCIH=(void *)((unsigned long)result__YCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CIH)));
+          ((__POINTER *)next__WCIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XCIH)[ 0]=next__WCIH;
+        } else {
+          next__WCIH=((__POINTER *)result__YCIH)[ 0];
+          if ((next__WCIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YCIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0CIH <<  1)) <=  4096)) {
+              next__WCIH=(void *)((unsigned long)result__YCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CIH)));
             } else {
-              next__1AHH=new_lab__MRJ(lab_type__4AHH);
-            };
-            ((__POINTER *)next__1AHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2AHH)[ 0]=next__1AHH;
-          } else {
-            ((__POINTER *)result__3AHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1AHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3AHH=next__1AHH;
-          };
-        };
-        ptr__CLD=result__3AHH;
-      };
-      result__BLD=((__STRING_CONSTANT *)ptr__CLD);
-      *(result__BLD) = *(STRING_CONSTANT__);
-    };
-    result__YGF=result__BLD;
-    Self__OFT=((__STRING_CONSTANT *)result__BLD);
-    c__QFT=((__STRING *)str__KWB)->count__WFC;
-    if ((c__QFT !=  0)) {
-      Self__OFT->storage__VQO=create__BMEB((__INTEGER)(c__QFT +  1));
-      Self__XZFH=((__CHARACTER *)Self__OFT->storage__VQO);
-      model__YZFH=((__STRING *)str__KWB)->storage__BCS;
-      Self__WZFH=(__INTEGER)(c__QFT -  1);
-      while ((Self__WZFH >=  0)) {
-        Self__XZFH[Self__WZFH]=((__CHARACTER *)model__YZFH)[Self__WZFH];
-        Self__WZFH=(__INTEGER)(Self__WZFH -  1);
-      };
-      ((__CHARACTER *)Self__OFT->storage__VQO)[c__QFT]='\0';
-      Self__OFT->count__DD=c__QFT;
-    };
-    result__MWB=result__BLD;
-    Self__I3S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
-    fast_has__OAY(Self__I3S,result__BLD);
-    fast_has__OAY(Self__I3S,result__BLD);
-    Self__BBHH=((__STRING_CONSTANT *)result__BLD);
-    result__ABHH= 0;
-    __tmp__CBHH=Self__BBHH->count__DD;
-    Self__DBHH= 1;
-    while ((Self__DBHH <= __tmp__CBHH)) {
-      result__ABHH=(__INTEGER)((__INTEGER)( 5 * result__ABHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BBHH->storage__VQO)[(__INTEGER)(Self__DBHH -  1)])));
-      Self__DBHH=(__INTEGER)(Self__DBHH +  1);
-    };
-    if ((result__ABHH <  0)) {
-      result__ABHH=(__INTEGER)(~ result__ABHH);
-    };
-    idx__R3S=(__INTEGER)(result__ABHH % Self__I3S->capacity__ZYR);
-    node__S3S=((void **)Self__I3S->buckets__4YR)[idx__R3S];
-    while ((! (((void *)node__S3S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__S3S)->item__KZR == (void *)result__YGF)))) {
-      node__S3S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__S3S)->next__WZR;
-    };
-    if (((void *)node__S3S == (void *)NULL)) {
-      if ((Self__I3S->capacity__ZYR == Self__I3S->count__5ZR)) {
-        increase_capacity__4RNB(Self__I3S);
-        idx__R3S=(__INTEGER)(result__ABHH % Self__I3S->capacity__ZYR);
-      };
-      n__HKCB=((void **)Self__I3S->buckets__4YR)[idx__R3S];
-      result__CGJB=NULL;
-      ptr__DGJB=((__POINTER )(NULL));
-      typ_id__IGJB= 0;
-      sz__FGJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
-      if ((sz__FGJB ==  0)) {
-        result__CGJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
-      } else {
-        typ_id__IGJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FGJB);
-        if ((typ_id__IGJB == (__INTEGER)(-  1))) {
-          a__OJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__PJEH=(__UINTEGER_32)((__UINTEGER_32)(sz__FGJB + a__OJEH) & (__UINTEGER_32)(~ a__OJEH));
-          ptr_table__GBHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PJEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__FBHH=((__POINTER )(NULL));
-          result__HBHH=((__POINTER *)ptr_table__GBHH)[ 0];
-          if ((result__HBHH == (void *)NULL)) {
-            result__HBHH=new_lab__MRJ(new_size__PJEH);
-            next__FBHH=(void *)((unsigned long)result__HBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJEH)));
-            ((__POINTER *)next__FBHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GBHH)[ 0]=next__FBHH;
-          } else {
-            next__FBHH=((__POINTER *)result__HBHH)[ 0];
-            if ((next__FBHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PJEH <<  1)) <=  4096)) {
-                next__FBHH=(void *)((unsigned long)result__HBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJEH)));
+              next__WCIH=new_lab__URJ(lab_type__ZCIH);
+            };
+            ((__POINTER *)next__WCIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XCIH)[ 0]=next__WCIH;
+          } else {
+            ((__POINTER *)result__YCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YCIH=next__WCIH;
+          };
+        };
+        ptr__KLD=result__YCIH;
+      };
+      result__JLD=((__STRING_CONSTANT *)ptr__KLD);
+      *(result__JLD) = *(STRING_CONSTANT__);
+    };
+    result__AHF=result__JLD;
+    Self__WFT=((__STRING_CONSTANT *)result__JLD);
+    c__YFT=((__STRING *)str__SWB)->count__4FC;
+    if ((c__YFT !=  0)) {
+      Self__WFT->storage__3QO=create__JMEB((__INTEGER)(c__YFT +  1));
+      Self__H1GH=((__CHARACTER *)Self__WFT->storage__3QO);
+      model__I1GH=((__STRING *)str__SWB)->storage__JCS;
+      Self__G1GH=(__INTEGER)(c__YFT -  1);
+      while ((Self__G1GH >=  0)) {
+        Self__H1GH[Self__G1GH]=((__CHARACTER *)model__I1GH)[Self__G1GH];
+        Self__G1GH=(__INTEGER)(Self__G1GH -  1);
+      };
+      ((__CHARACTER *)Self__WFT->storage__3QO)[c__YFT]='\0';
+      Self__WFT->count__DD=c__YFT;
+    };
+    result__UWB=result__JLD;
+    Self__Q3S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__WAY(Self__Q3S,result__JLD);
+    fast_has__WAY(Self__Q3S,result__JLD);
+    Self__2CIH=((__STRING_CONSTANT *)result__JLD);
+    result__1CIH= 0;
+    __tmp__3CIH=Self__2CIH->count__DD;
+    Self__4CIH= 1;
+    while ((Self__4CIH <= __tmp__3CIH)) {
+      result__1CIH=(__INTEGER)((__INTEGER)( 5 * result__1CIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__2CIH->storage__3QO)[(__INTEGER)(Self__4CIH -  1)])));
+      Self__4CIH=(__INTEGER)(Self__4CIH +  1);
+    };
+    if ((result__1CIH <  0)) {
+      result__1CIH=(__INTEGER)(~ result__1CIH);
+    };
+    idx__Z3S=(__INTEGER)(result__1CIH % Self__Q3S->capacity__BZR);
+    node__03S=((void **)Self__Q3S->buckets__GZR)[idx__Z3S];
+    while ((! (((void *)node__03S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__03S)->item__SZR == (void *)result__AHF)))) {
+      node__03S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__03S)->next__4ZR;
+    };
+    if (((void *)node__03S == (void *)NULL)) {
+      if ((Self__Q3S->capacity__BZR == Self__Q3S->count__H0R)) {
+        increase_capacity__GSNB(Self__Q3S);
+        idx__Z3S=(__INTEGER)(result__1CIH % Self__Q3S->capacity__BZR);
+      };
+      n__PKCB=((void **)Self__Q3S->buckets__GZR)[idx__Z3S];
+      result__KGJB=NULL;
+      ptr__LGJB=((__POINTER )(NULL));
+      typ_id__QGJB= 0;
+      sz__NGJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__NGJB ==  0)) {
+        result__KGJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__QGJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__NGJB);
+        if ((typ_id__QGJB == (__INTEGER)(-  1))) {
+          a__4KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5KFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NGJB + a__4KFH) & (__UINTEGER_32)(~ a__4KFH));
+          ptr_table__BDIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5KFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ADIH=((__POINTER )(NULL));
+          result__CDIH=((__POINTER *)ptr_table__BDIH)[ 0];
+          if ((result__CDIH == (void *)NULL)) {
+            result__CDIH=new_lab__URJ(new_size__5KFH);
+            next__ADIH=(void *)((unsigned long)result__CDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KFH)));
+            ((__POINTER *)next__ADIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BDIH)[ 0]=next__ADIH;
+          } else {
+            next__ADIH=((__POINTER *)result__CDIH)[ 0];
+            if ((next__ADIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CDIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5KFH <<  1)) <=  4096)) {
+                next__ADIH=(void *)((unsigned long)result__CDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5KFH)));
               } else {
-                next__FBHH=new_lab__MRJ(new_size__PJEH);
+                next__ADIH=new_lab__URJ(new_size__5KFH);
               };
-              ((__POINTER *)next__FBHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GBHH)[ 0]=next__FBHH;
+              ((__POINTER *)next__ADIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BDIH)[ 0]=next__ADIH;
             } else {
-              ((__POINTER *)result__HBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__HBHH=next__FBHH;
-            };
-          };
-          ptr__DGJB=result__HBHH;
-        } else {
-          t__TJEH=((__UINTEGER_32 )typ_id__IGJB);
-          a__SJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__OBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__FGJB + a__SJEH) & (__UINTEGER_32)(~ a__SJEH));
-          ptr_table__LBHH=((__POINTER )(&(table_type[(t__TJEH)])));
-          lab_type__NBHH=(__UINTEGER_32)(t__TJEH |  1);
-          next__KBHH=((__POINTER )(NULL));
-          result__MBHH=((__POINTER *)ptr_table__LBHH)[ 0];
-          if ((result__MBHH == (void *)NULL)) {
-            result__MBHH=new_lab__MRJ(lab_type__NBHH);
-            next__KBHH=(void *)((unsigned long)result__MBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBHH)));
-            ((__POINTER *)next__KBHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LBHH)[ 0]=next__KBHH;
-          } else {
-            next__KBHH=((__POINTER *)result__MBHH)[ 0];
-            if ((next__KBHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OBHH <<  1)) <=  4096)) {
-                next__KBHH=(void *)((unsigned long)result__MBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBHH)));
+              ((__POINTER *)result__CDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ADIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__CDIH=next__ADIH;
+            };
+          };
+          ptr__LGJB=result__CDIH;
+        } else {
+          t__DLFH=((__UINTEGER_32 )typ_id__QGJB);
+          a__CLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__JDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NGJB + a__CLFH) & (__UINTEGER_32)(~ a__CLFH));
+          ptr_table__GDIH=((__POINTER )(&(table_type[(t__DLFH)])));
+          lab_type__IDIH=(__UINTEGER_32)(t__DLFH |  1);
+          next__FDIH=((__POINTER )(NULL));
+          result__HDIH=((__POINTER *)ptr_table__GDIH)[ 0];
+          if ((result__HDIH == (void *)NULL)) {
+            result__HDIH=new_lab__URJ(lab_type__IDIH);
+            next__FDIH=(void *)((unsigned long)result__HDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDIH)));
+            ((__POINTER *)next__FDIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GDIH)[ 0]=next__FDIH;
+          } else {
+            next__FDIH=((__POINTER *)result__HDIH)[ 0];
+            if ((next__FDIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HDIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JDIH <<  1)) <=  4096)) {
+                next__FDIH=(void *)((unsigned long)result__HDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDIH)));
               } else {
-                next__KBHH=new_lab__MRJ(lab_type__NBHH);
+                next__FDIH=new_lab__URJ(lab_type__IDIH);
               };
-              ((__POINTER *)next__KBHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LBHH)[ 0]=next__KBHH;
+              ((__POINTER *)next__FDIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GDIH)[ 0]=next__FDIH;
             } else {
-              ((__POINTER *)result__MBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MBHH=next__KBHH;
+              ((__POINTER *)result__HDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HDIH=next__FDIH;
             };
           };
-          ptr__DGJB=result__MBHH;
+          ptr__LGJB=result__HDIH;
         };
-        result__CGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__DGJB);
-        *(result__CGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__KGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__LGJB);
+        *(result__KGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      Self__LADC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__CGJB);
-      Self__LADC->item__KZR=result__BLD;
-      Self__LADC->next__WZR=n__HKCB;
-      node__S3S=result__CGJB;
-      ((void **)Self__I3S->buckets__4YR)[idx__R3S]=result__CGJB;
-      Self__I3S->count__5ZR=(__INTEGER)(Self__I3S->count__5ZR +  1);
+      Self__TADC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__KGJB);
+      Self__TADC->item__SZR=result__JLD;
+      Self__TADC->next__4ZR=n__PKCB;
+      node__03S=result__KGJB;
+      ((void **)Self__Q3S->buckets__GZR)[idx__Z3S]=result__KGJB;
+      Self__Q3S->count__H0R=(__INTEGER)(Self__Q3S->count__H0R +  1);
     };
   } else {
-    if (result__PLS==NULL) {
-      __tmp__KXB=NULL;
+    if (result__XLS==NULL) {
+      __tmp__SXB=NULL;
     } else {
-      __tmp__KXB=((void *)result__PLS);
+      __tmp__SXB=((void *)result__XLS);
     };
-    result__MWB=__tmp__KXB;
+    result__UWB=__tmp__SXB;
   };
-  return(result__MWB);
+  return(result__UWB);
 }
 
-static void copy__ZCS(__STRING *Self__0CS,void *other__1CS)
+static void copy__BDS(__STRING *Self__CDS,void *other__DDS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__2CS,Self__B0FH;
-  __CHARACTER *__tmp__RDS,*__tmp__TDS,*Self__C0FH,*model__D0FH;
-  if (((struct ___OBJ *)other__1CS)->__id==__STRING_CONSTANT__) {
-    __tmp__2CS=((__STRING_CONSTANT *)other__1CS)->count__DD;
+  __INTEGER __tmp__EDS,Self__R1GH;
+  __CHARACTER *__tmp__ZDS,*__tmp__1DS,*Self__S1GH,*model__T1GH;
+  if (((struct ___OBJ *)other__DDS)->__id==__STRING_CONSTANT__) {
+    __tmp__EDS=((__STRING_CONSTANT *)other__DDS)->count__DD;
   } else {
-    __tmp__2CS=((__STRING *)other__1CS)->count__WFC;
+    __tmp__EDS=((__STRING *)other__DDS)->count__4FC;
   };
-  Self__0CS->count__WFC=__tmp__2CS;
-  if ((__tmp__2CS >  0)) {
-    if ((Self__0CS->capacity__YBS < __tmp__2CS)) {
-      Self__0CS->storage__BCS=create__BMEB(__tmp__2CS);
-      Self__0CS->capacity__YBS=Self__0CS->count__WFC;
+  Self__CDS->count__4FC=__tmp__EDS;
+  if ((__tmp__EDS >  0)) {
+    if ((Self__CDS->capacity__ACS < __tmp__EDS)) {
+      Self__CDS->storage__JCS=create__JMEB(__tmp__EDS);
+      Self__CDS->capacity__ACS=Self__CDS->count__4FC;
     };
-    __tmp__RDS=Self__0CS->storage__BCS;
-    if (((struct ___OBJ *)other__1CS)->__id==__STRING_CONSTANT__) {
-      __tmp__TDS=((__STRING_CONSTANT *)other__1CS)->storage__VQO;
+    __tmp__ZDS=Self__CDS->storage__JCS;
+    if (((struct ___OBJ *)other__DDS)->__id==__STRING_CONSTANT__) {
+      __tmp__1DS=((__STRING_CONSTANT *)other__DDS)->storage__3QO;
     } else {
-      __tmp__TDS=((__STRING *)other__1CS)->storage__BCS;
+      __tmp__1DS=((__STRING *)other__DDS)->storage__JCS;
     };
-    Self__C0FH=((__CHARACTER *)__tmp__RDS);
-    model__D0FH=__tmp__TDS;
-    Self__B0FH=(__INTEGER)(Self__0CS->count__WFC -  1);
-    while ((Self__B0FH >=  0)) {
-      Self__C0FH[Self__B0FH]=((__CHARACTER *)model__D0FH)[Self__B0FH];
-      Self__B0FH=(__INTEGER)(Self__B0FH -  1);
+    Self__S1GH=((__CHARACTER *)__tmp__ZDS);
+    model__T1GH=__tmp__1DS;
+    Self__R1GH=(__INTEGER)(Self__CDS->count__4FC -  1);
+    while ((Self__R1GH >=  0)) {
+      Self__S1GH[Self__R1GH]=((__CHARACTER *)model__T1GH)[Self__R1GH];
+      Self__R1GH=(__INTEGER)(Self__R1GH -  1);
     };
   };
 }
 
-static void append__BOS(__STRING *Self__COS,void *other__DOS)
+static void append__JOS(__STRING *Self__KOS,void *other__LOS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__MOS,needed_capacity__FOS,old_nb_elts__Z0DC;
-  __INTEGER upper__L0FH,Self__J0FH,dest__FLBC,src_capacity__GLBC;
-  __INTEGER i2__WLBC,i1__VLBC;
-  __CHARACTER *Self__Y0DC,*new__Q1DC,*__tmp__JPS,*__tmp__KPS,*Self__DLBC;
-  __CHARACTER *src__ELBC;
-  if (((struct ___OBJ *)other__DOS)->__id==__STRING_CONSTANT__) {
-    __tmp__MOS=((__STRING_CONSTANT *)other__DOS)->count__DD;
+  __INTEGER __tmp__UOS,needed_capacity__NOS,old_nb_elts__B1DC;
+  __INTEGER upper__11GH,Self__Z1GH,dest__NLBC,src_capacity__OLBC;
+  __INTEGER i2__4LBC,i1__3LBC;
+  __CHARACTER *Self__A1DC,*new__Y1DC,*__tmp__RPS,*__tmp__SPS,*Self__LLBC;
+  __CHARACTER *src__MLBC;
+  if (((struct ___OBJ *)other__LOS)->__id==__STRING_CONSTANT__) {
+    __tmp__UOS=((__STRING_CONSTANT *)other__LOS)->count__DD;
   } else {
-    __tmp__MOS=((__STRING *)other__DOS)->count__WFC;
-  };
-  needed_capacity__FOS=(__INTEGER)(Self__COS->count__WFC + __tmp__MOS);
-  if ((Self__COS->capacity__YBS < needed_capacity__FOS)) {
-    if ((Self__COS->capacity__YBS ==  0)) {
-      Self__COS->capacity__YBS=needed_capacity__FOS;
-      Self__COS->storage__BCS=create__BMEB(needed_capacity__FOS);
-    } else {
-      Self__Y0DC=((__CHARACTER *)Self__COS->storage__BCS);
-      old_nb_elts__Z0DC=Self__COS->capacity__YBS;
-      new__Q1DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__Y0DC),((__UINTEGER_32 )old_nb_elts__Z0DC),((__UINTEGER_32 )needed_capacity__FOS)));
-      upper__L0FH=(__INTEGER)(needed_capacity__FOS -  1);
-      Self__J0FH=old_nb_elts__Z0DC;
-      while ((Self__J0FH <= upper__L0FH)) {
-        new__Q1DC[Self__J0FH]='\0';
-        Self__J0FH=(__INTEGER)(Self__J0FH +  1);
-      };
-      Self__COS->storage__BCS=new__Q1DC;
-      Self__COS->capacity__YBS=needed_capacity__FOS;
-    };
-  };
-  __tmp__JPS=Self__COS->storage__BCS;
-  if (((struct ___OBJ *)other__DOS)->__id==__STRING_CONSTANT__) {
-    __tmp__KPS=((__STRING_CONSTANT *)other__DOS)->storage__VQO;
+    __tmp__UOS=((__STRING *)other__LOS)->count__4FC;
+  };
+  needed_capacity__NOS=(__INTEGER)(Self__KOS->count__4FC + __tmp__UOS);
+  if ((Self__KOS->capacity__ACS < needed_capacity__NOS)) {
+    if ((Self__KOS->capacity__ACS ==  0)) {
+      Self__KOS->capacity__ACS=needed_capacity__NOS;
+      Self__KOS->storage__JCS=create__JMEB(needed_capacity__NOS);
+    } else {
+      Self__A1DC=((__CHARACTER *)Self__KOS->storage__JCS);
+      old_nb_elts__B1DC=Self__KOS->capacity__ACS;
+      new__Y1DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )Self__A1DC),((__UINTEGER_32 )old_nb_elts__B1DC),((__UINTEGER_32 )needed_capacity__NOS)));
+      upper__11GH=(__INTEGER)(needed_capacity__NOS -  1);
+      Self__Z1GH=old_nb_elts__B1DC;
+      while ((Self__Z1GH <= upper__11GH)) {
+        new__Y1DC[Self__Z1GH]='\0';
+        Self__Z1GH=(__INTEGER)(Self__Z1GH +  1);
+      };
+      Self__KOS->storage__JCS=new__Y1DC;
+      Self__KOS->capacity__ACS=needed_capacity__NOS;
+    };
+  };
+  __tmp__RPS=Self__KOS->storage__JCS;
+  if (((struct ___OBJ *)other__LOS)->__id==__STRING_CONSTANT__) {
+    __tmp__SPS=((__STRING_CONSTANT *)other__LOS)->storage__3QO;
   } else {
-    __tmp__KPS=((__STRING *)other__DOS)->storage__BCS;
-  };
-  Self__DLBC=((__CHARACTER *)__tmp__JPS);
-  src__ELBC=__tmp__KPS;
-  dest__FLBC=Self__COS->count__WFC;
-  src_capacity__GLBC=__tmp__MOS;
-  i2__WLBC= 0;
-  i1__VLBC=dest__FLBC;
-  while ((i2__WLBC != src_capacity__GLBC)) {
-    Self__DLBC[i1__VLBC]=((__CHARACTER *)src__ELBC)[i2__WLBC];
-    i2__WLBC=(__INTEGER)(i2__WLBC +  1);
-    i1__VLBC=(__INTEGER)(i1__VLBC +  1);
-  };
-  Self__COS->count__WFC=needed_capacity__FOS;
+    __tmp__SPS=((__STRING *)other__LOS)->storage__JCS;
+  };
+  Self__LLBC=((__CHARACTER *)__tmp__RPS);
+  src__MLBC=__tmp__SPS;
+  dest__NLBC=Self__KOS->count__4FC;
+  src_capacity__OLBC=__tmp__UOS;
+  i2__4LBC= 0;
+  i1__3LBC=dest__NLBC;
+  while ((i2__4LBC != src_capacity__OLBC)) {
+    Self__LLBC[i1__3LBC]=((__CHARACTER *)src__MLBC)[i2__4LBC];
+    i2__4LBC=(__INTEGER)(i2__4LBC +  1);
+    i1__3LBC=(__INTEGER)(i1__3LBC +  1);
+  };
+  Self__KOS->count__4FC=needed_capacity__NOS;
 }
 
-static void* parent_directory__OED()
+static void* parent_directory__WED()
 // () With resultNo recursive, No inlinable.
 {
-  __STRING *Self__Q0FH,*Self__PBHH;
-  void *__tmp__4ED;
-  void *__tmp__5ED,*result__SED;
-  __CHARACTER *cwd__RED;
-  ((__STRING *)string_tmp__TED)->count__WFC= 0;
-  Self__Q0FH=((__STRING *)string_tmp__TED);
-  if ((Self__Q0FH->capacity__YBS > Self__Q0FH->count__WFC)) {
-    ((__CHARACTER *)Self__Q0FH->storage__BCS)[Self__Q0FH->count__WFC]='\0';
+  __STRING *Self__A2GH,*Self__KDIH;
+  void *__tmp__GFD;
+  void *__tmp__HFD,*result__0ED;
+  __CHARACTER *cwd__ZED;
+  ((__STRING *)string_tmp__1ED)->count__4FC= 0;
+  Self__A2GH=((__STRING *)string_tmp__1ED);
+  if ((Self__A2GH->capacity__ACS > Self__A2GH->count__4FC)) {
+    ((__CHARACTER *)Self__A2GH->storage__JCS)[Self__A2GH->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__Q0FH,'\0');
-    Self__Q0FH->count__WFC=(__INTEGER)(Self__Q0FH->count__WFC -  1);
-  };
-  cwd__RED=Self__Q0FH->storage__BCS;
-  getcwd((cwd__RED),255);
-  Self__PBHH=((__STRING *)string_tmp__TED);
-  Self__PBHH->count__WFC= 0;
-  while ((((__CHARACTER *)cwd__RED)[Self__PBHH->count__WFC] != '\0')) {
-    Self__PBHH->count__WFC=(__INTEGER)(Self__PBHH->count__WFC +  1);
-  };
-  if (((void *)Self__PBHH->storage__BCS != (void *)cwd__RED)) {
-    Self__PBHH->storage__BCS=cwd__RED;
-    Self__PBHH->capacity__YBS=(__INTEGER)(Self__PBHH->count__WFC +  1);
-  };
-  __tmp__4ED=physical_get_entry__JCF(string_tmp__TED);
-  if (__tmp__4ED==NULL) {
-    __tmp__5ED=NULL;
+    add_last__BMT(Self__A2GH,'\0');
+    Self__A2GH->count__4FC=(__INTEGER)(Self__A2GH->count__4FC -  1);
+  };
+  cwd__ZED=Self__A2GH->storage__JCS;
+  getcwd((cwd__ZED),255);
+  Self__KDIH=((__STRING *)string_tmp__1ED);
+  Self__KDIH->count__4FC= 0;
+  while ((((__CHARACTER *)cwd__ZED)[Self__KDIH->count__4FC] != '\0')) {
+    Self__KDIH->count__4FC=(__INTEGER)(Self__KDIH->count__4FC +  1);
+  };
+  if (((void *)Self__KDIH->storage__JCS != (void *)cwd__ZED)) {
+    Self__KDIH->storage__JCS=cwd__ZED;
+    Self__KDIH->capacity__ACS=(__INTEGER)(Self__KDIH->count__4FC +  1);
+  };
+  __tmp__GFD=physical_get_entry__RCF(string_tmp__1ED);
+  if (__tmp__GFD==NULL) {
+    __tmp__HFD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__4ED)->__id) {
+    switch (((struct ___OBJ *)__tmp__GFD)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__5ED=((void *)__tmp__4ED);
+      __tmp__HFD=((void *)__tmp__GFD);
     } break;
     case __FILE_UNIX__: {
-      __tmp__5ED=NULL;
+      __tmp__HFD=NULL;
     } break;
     }
   };
-  result__SED=__tmp__5ED;
-  put__to__R0S(alias__EFD,__tmp__5ED,((__DIRECTORY_UNIX *)__tmp__5ED)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-  FILE_SYSTEM__->parent_directory__OFD=__tmp__5ED;
-  FILE_SYSTEM__->parent_directory__PFD=0;
-  return(__tmp__5ED);
+  result__0ED=__tmp__HFD;
+  put__to__Z0S(alias__MFD,__tmp__HFD,((__DIRECTORY_UNIX *)__tmp__HFD)->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+  FILE_SYSTEM__->parent_directory__WFD=__tmp__HFD;
+  FILE_SYSTEM__->parent_directory__XFD=0;
+  return(__tmp__HFD);
 }
 
-static void* get_entry__T0AC(void *p__V0AC)
+static void* get_entry__10AC(void *p__30AC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__X0AC;
-  __INTEGER idx__Y0AC,idx__4BGH,n__DCGH,n__ECGH,__tmp__C3AC;
-  void *__tmp__JFIC,*__tmp__N3AC,*dir__L3AC;
-  __STRING *Self__J1DH,*Self__CCGH;
-  __CHARACTER *Self__ACGH;
-  __BOOLEAN __tmp__R2AC,__tmp__22AC;
-  result__X0AC=NULL;
-  idx__Y0AC= 0;
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  void *result__50AC;
+  __INTEGER idx__A1AC,idx__RDHH,n__WDHH,n__XDHH,__tmp__K3AC;
+  void *__tmp__RFIC,*__tmp__V3AC,*dir__T3AC;
+  __STRING *Self__B2EH,*Self__VDHH;
+  __CHARACTER *Self__TDHH;
+  __BOOLEAN __tmp__Z2AC,__tmp__E3AC;
+  result__50AC=NULL;
+  idx__A1AC= 0;
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
-    __tmp__JFIC=FILE_SYSTEM__->parent_directory__OFD;
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    __tmp__RFIC=FILE_SYSTEM__->parent_directory__WFD;
   } else {
-    __tmp__JFIC=parent_directory__OED();
+    __tmp__RFIC=parent_directory__WED();
   };
-  copy__ZCS(string_tmp2__Z0AC,((__DIRECTORY_UNIX *)__tmp__JFIC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  copy__BDS(string_tmp2__B1AC,((__DIRECTORY_UNIX *)__tmp__RFIC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  add_last__ZLT(string_tmp2__Z0AC,'/');
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  add_last__BMT(string_tmp2__B1AC,'/');
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  append__BOS(string_tmp2__Z0AC,p__V0AC);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  append__JOS(string_tmp2__B1AC,p__30AC);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  reduce_path__Q3HC(string_tmp2__Z0AC);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  reduce_path__Y3HC(string_tmp2__B1AC);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  copy__ZCS(string_tmp3__50AC,string_tmp2__Z0AC);
+  copy__BDS(string_tmp3__H1AC,string_tmp2__B1AC);
   do {
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    result__X0AC=reference_at__EU0C(alias__EFD,string_tmp2__Z0AC);
-    if (((void *)result__X0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    result__50AC=reference_at__MU0C(alias__MFD,string_tmp2__B1AC);
+    if (((void *)result__50AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__XFD==0) {
       } else {
-        parent_directory__OED();
+        parent_directory__WED();
       };
-      Self__J1DH=((__STRING *)string_tmp2__Z0AC);
-      Self__ACGH=((__CHARACTER *)Self__J1DH->storage__BCS);
-      idx__4BGH=(__INTEGER)(Self__J1DH->count__WFC -  1);
-      while ((! ((idx__4BGH <  0) || ('/' == Self__ACGH[idx__4BGH])))) {
-        idx__4BGH=(__INTEGER)(idx__4BGH -  1);
+      Self__B2EH=((__STRING *)string_tmp2__B1AC);
+      Self__TDHH=((__CHARACTER *)Self__B2EH->storage__JCS);
+      idx__RDHH=(__INTEGER)(Self__B2EH->count__4FC -  1);
+      while ((! ((idx__RDHH <  0) || ('/' == Self__TDHH[idx__RDHH])))) {
+        idx__RDHH=(__INTEGER)(idx__RDHH -  1);
       };
-      idx__Y0AC=(__INTEGER)( 1 + idx__4BGH);
-      if ((idx__Y0AC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__PFD==0) {
+      idx__A1AC=(__INTEGER)( 1 + idx__RDHH);
+      if ((idx__A1AC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__XFD==0) {
         } else {
-          parent_directory__OED();
+          parent_directory__WED();
         };
-        Self__CCGH=((__STRING *)string_tmp2__Z0AC);
-        n__DCGH=(__INTEGER)(idx__Y0AC -  1);
-        if ((n__DCGH < Self__CCGH->count__WFC)) {
-          n__ECGH=(__INTEGER)(Self__CCGH->count__WFC - n__DCGH);
-          if ((n__ECGH > Self__CCGH->count__WFC)) {
-            Self__CCGH->count__WFC= 0;
+        Self__VDHH=((__STRING *)string_tmp2__B1AC);
+        n__WDHH=(__INTEGER)(idx__A1AC -  1);
+        if ((n__WDHH < Self__VDHH->count__4FC)) {
+          n__XDHH=(__INTEGER)(Self__VDHH->count__4FC - n__WDHH);
+          if ((n__XDHH > Self__VDHH->count__4FC)) {
+            Self__VDHH->count__4FC= 0;
           } else {
-            Self__CCGH->count__WFC=(__INTEGER)(Self__CCGH->count__WFC - n__ECGH);
+            Self__VDHH->count__4FC=(__INTEGER)(Self__VDHH->count__4FC - n__XDHH);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__PFD==0) {
+        if (FILE_SYSTEM__->parent_directory__XFD==0) {
         } else {
-          parent_directory__OED();
+          parent_directory__WED();
         };
-        ((__STRING *)string_tmp2__Z0AC)->count__WFC= 0;
+        ((__STRING *)string_tmp2__B1AC)->count__4FC= 0;
       };
     };
-    if (((void *)result__X0AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (((void *)result__50AC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__XFD==0) {
       } else {
-        parent_directory__OED();
+        parent_directory__WED();
       };
-      __tmp__R2AC=(((__STRING *)string_tmp2__Z0AC)->count__WFC !=  0);
+      __tmp__Z2AC=(((__STRING *)string_tmp2__B1AC)->count__4FC !=  0);
     } else {
-      __tmp__R2AC=FALSE__;
+      __tmp__Z2AC=FALSE__;
     };
-  } while (__tmp__R2AC);
-  if (((void *)result__X0AC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  } while (__tmp__Z2AC);
+  if (((void *)result__50AC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    result__X0AC=physical_get_entry__YW0C(string_tmp3__50AC);
-    __tmp__22AC=TRUE__;
+    result__50AC=physical_get_entry__AX0C(string_tmp3__H1AC);
+    __tmp__E3AC=TRUE__;
   } else {
-    __tmp__22AC=FALSE__;
+    __tmp__E3AC=FALSE__;
   };
-  if ((! __tmp__22AC)) {
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if ((! __tmp__E3AC)) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    __tmp__C3AC=((__STRING *)string_tmp3__50AC)->count__WFC;
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    __tmp__K3AC=((__STRING *)string_tmp3__H1AC)->count__4FC;
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if ((__tmp__C3AC != ((__STRING *)string_tmp2__Z0AC)->count__WFC)) {
-      if (result__X0AC==NULL) {
-        __tmp__N3AC=NULL;
+    if ((__tmp__K3AC != ((__STRING *)string_tmp2__B1AC)->count__4FC)) {
+      if (result__50AC==NULL) {
+        __tmp__V3AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__X0AC)->__id) {
+        switch (((struct ___OBJ *)result__50AC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__N3AC=((void *)result__X0AC);
+          __tmp__V3AC=((void *)result__50AC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__N3AC=NULL;
+          __tmp__V3AC=NULL;
         } break;
         }
       };
-      dir__L3AC=__tmp__N3AC;
-      if (FILE_SYSTEM__->parent_directory__PFD==0) {
+      dir__T3AC=__tmp__V3AC;
+      if (FILE_SYSTEM__->parent_directory__XFD==0) {
       } else {
-        parent_directory__OED();
+        parent_directory__WED();
       };
-      result__X0AC=physical_get_entry__JCF(string_tmp3__50AC);
+      result__50AC=physical_get_entry__RCF(string_tmp3__H1AC);
     };
   };
-  return(result__X0AC);
+  return(result__50AC);
 }
 
-static void put_string__U1F(void *s__W1F)
+static void put_string__21F(void *s__41F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__F2F,__tmp__H2F,Self__YWG,limit_up__ZWG;
-  __CHARACTER __tmp__O2F;
-  if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
-    __tmp__F2F= 1;
+  __INTEGER __tmp__N2F,__tmp__P2F,Self__AXG,limit_up__BXG;
+  __CHARACTER __tmp__W2F;
+  if (((struct ___OBJ *)s__41F)->__id==__STRING_CONSTANT__) {
+    __tmp__N2F= 1;
   } else {
-    __tmp__F2F= 1;
+    __tmp__N2F= 1;
   };
-  if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
-    __tmp__H2F=((__STRING_CONSTANT *)s__W1F)->count__DD;
+  if (((struct ___OBJ *)s__41F)->__id==__STRING_CONSTANT__) {
+    __tmp__P2F=((__STRING_CONSTANT *)s__41F)->count__DD;
   } else {
-    __tmp__H2F=((__STRING *)s__W1F)->count__WFC;
+    __tmp__P2F=((__STRING *)s__41F)->count__4FC;
   };
-  Self__YWG=__tmp__F2F;
-  limit_up__ZWG=__tmp__H2F;
-  while ((Self__YWG <= limit_up__ZWG)) {
-    if (((struct ___OBJ *)s__W1F)->__id==__STRING_CONSTANT__) {
-      __tmp__O2F=((__CHARACTER *)((__STRING_CONSTANT *)s__W1F)->storage__VQO)[(__INTEGER)(Self__YWG -  1)];
+  Self__AXG=__tmp__N2F;
+  limit_up__BXG=__tmp__P2F;
+  while ((Self__AXG <= limit_up__BXG)) {
+    if (((struct ___OBJ *)s__41F)->__id==__STRING_CONSTANT__) {
+      __tmp__W2F=((__CHARACTER *)((__STRING_CONSTANT *)s__41F)->storage__3QO)[(__INTEGER)(Self__AXG -  1)];
     } else {
-      __tmp__O2F=((__CHARACTER *)((__STRING *)s__W1F)->storage__BCS)[(__INTEGER)(Self__YWG -  1)];
+      __tmp__W2F=((__CHARACTER *)((__STRING *)s__41F)->storage__JCS)[(__INTEGER)(Self__AXG -  1)];
     };
-    fputc((int)(__tmp__O2F),stderr);
-    Self__YWG=(__INTEGER)(Self__YWG +  1);
+    fputc((int)(__tmp__W2F),stderr);
+    Self__AXG=(__INTEGER)(Self__AXG +  1);
   };
 }
 
-static __PROTOTYPE* create__name__generic_count__ZAC(void *f__1AC,void *n__2AC)
+static __PROTOTYPE* create__name__generic_count__BBC(void *f__DBC,void *n__EBC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __PROTOTYPE *result__1UC,*Self__ATS;
-  __POINTER ptr__2UC,ptr_table__TBHH,next__SBHH,result__UBHH;
-  __POINTER ptr_table__YBHH,next__XBHH,result__ZBHH,ptr__GF3;
-  __POINTER ptr_table__GCHH,next__FCHH,result__HCHH,ptr_table__LCHH;
-  __POINTER next__KCHH,result__MCHH,ptr__L1GD,ptr_table__VCHH;
-  __POINTER next__UCHH,result__WCHH,ptr_table__0CHH,next__ZCHH;
-  __POINTER result__1CHH,file__ETS,ptr__LL3,ptr_table__5CHH,next__4CHH;
-  __POINTER result__ADHH,ptr_table__EDHH,next__DDHH,result__FDHH;
-  __INTEGER typ_id__BVC,idx__GCGH,idx__HTS,len__4BHH,__tmp__5BHH;
-  __INTEGER __tmp__BCHH,Self__CCHH,typ_id__LF3,new_capacity__STX;
-  __INTEGER __tmp__WUX,__tmp__BOEC,Self__JPVD,result__PCHH,__tmp__RCHH;
-  __INTEGER Self__SCHH,idx__MNBC,idx__AZGD,new_capacity__BZGD,i__CZGD;
-  __INTEGER result__AOW,__tmp__BOW,Self__XT1,typ_id__Q1GD,result__TWX;
-  __INTEGER typ_id__QL3,new_capacity__TMJC;
-  __UINTEGER_32 sz__4UC,a__S1DH,new_size__T1DH,t__X1DH,a__W1DH;
-  __UINTEGER_32 new_size__1BHH,lab_type__0BHH,sz__IF3,a__01DH;
-  __UINTEGER_32 new_size__11DH,t__51DH,a__41DH,new_size__OCHH;
-  __UINTEGER_32 lab_type__NCHH,sz__N1GD,a__R2DH,new_size__S2DH,t__W2DH;
-  __UINTEGER_32 a__V2DH,new_size__3CHH,lab_type__2CHH,sz__NL3,a__Z2DH;
-  __UINTEGER_32 new_size__02DH,t__42DH,a__32DH,new_size__HDHH;
-  __UINTEGER_32 lab_type__GDHH;
-  __STRING_CONSTANT *Self__YRX,*Self__QCHH,*Self__4NW;
-  __STRING *Self__T0FH,*Self__10FH,*Self__40FH,*Self__3YS;
-  void *__tmp__VUS;
-  __CHARACTER *Self__ICGH,*ptr__2WX;
-  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__FF3,*Self__52BC;
-  __FAST_ARRAYoPROTOTYPEo *Self__QTX;
-  __BOOLEAN __tmp__AUX;
-  void **__tmp__VUX,**new__NNEC;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__CNBC;
-  void *node__ONBC,*node1__EZGD,*node2__FZGD,*__tmp__CPBC;
-  void **old_buckets__DZGD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__K1GD;
-  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__Z3SD;
-  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__KL3,*Self__V4BC;
-  result__1UC=NULL;
-  ptr__2UC=((__POINTER )(NULL));
-  typ_id__BVC= 0;
-  sz__4UC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
-  if ((sz__4UC ==  0)) {
-    result__1UC=PROTOTYPE__;
+  __PROTOTYPE *result__DVC,*Self__ITS;
+  __POINTER ptr__EVC,ptr_table__ODIH,next__NDIH,result__PDIH;
+  __POINTER ptr_table__TDIH,next__SDIH,result__UDIH,ptr__OF3;
+  __POINTER ptr_table__BEIH,next__AEIH,result__CEIH,ptr_table__GEIH;
+  __POINTER next__FEIH,result__HEIH,ptr__T1GD,ptr_table__QEIH;
+  __POINTER next__PEIH,result__REIH,ptr_table__VEIH,next__UEIH;
+  __POINTER result__WEIH,file__MTS,ptr__TL3,ptr_table__0EIH,next__ZEIH;
+  __POINTER result__1EIH,ptr_table__5EIH,next__4EIH,result__AFIH;
+  __INTEGER typ_id__JVC,idx__ZDHH,idx__PTS,len__ZDIH,__tmp__0DIH;
+  __INTEGER __tmp__2DIH,Self__3DIH,typ_id__TF3,new_capacity__0TX;
+  __INTEGER __tmp__4UX,__tmp__JOEC,Self__RPVD,result__KEIH,__tmp__MEIH;
+  __INTEGER Self__NEIH,idx__UNBC,idx__IZGD,new_capacity__JZGD,i__KZGD;
+  __INTEGER result__IOW,__tmp__JOW,Self__5T1,typ_id__Y1GD,result__1WX;
+  __INTEGER typ_id__YL3,new_capacity__1MJC;
+  __UINTEGER_32 sz__GVC,a__K2EH,new_size__L2EH,t__P2EH,a__O2EH;
+  __UINTEGER_32 new_size__WDIH,lab_type__VDIH,sz__QF3,a__S2EH;
+  __UINTEGER_32 new_size__T2EH,t__X2EH,a__W2EH,new_size__JEIH;
+  __UINTEGER_32 lab_type__IEIH,sz__V1GD,a__J3EH,new_size__K3EH,t__O3EH;
+  __UINTEGER_32 a__N3EH,new_size__YEIH,lab_type__XEIH,sz__VL3,a__R3EH;
+  __UINTEGER_32 new_size__S3EH,t__W3EH,a__V3EH,new_size__CFIH;
+  __UINTEGER_32 lab_type__BFIH;
+  __STRING_CONSTANT *Self__ASX,*Self__LEIH,*Self__GOW;
+  __STRING *Self__D2GH,*Self__L2GH,*Self__O2GH,*Self__FZS;
+  void *__tmp__3US;
+  __CHARACTER *Self__1DHH,*ptr__EXX;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__NF3,*Self__H3BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__YTX;
+  __BOOLEAN __tmp__IUX;
+  void **__tmp__3UX,**new__VNEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__KNBC;
+  void *node__WNBC,*node1__MZGD,*node2__NZGD,*__tmp__KPBC;
+  void **old_buckets__LZGD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__S1GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__B4SD;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__SL3,*Self__34BC;
+  result__DVC=NULL;
+  ptr__EVC=((__POINTER )(NULL));
+  typ_id__JVC= 0;
+  sz__GVC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
+  if ((sz__GVC ==  0)) {
+    result__DVC=PROTOTYPE__;
   } else {
-    typ_id__BVC=__PROTOTYPE__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4UC);
-    if ((typ_id__BVC == (__INTEGER)(-  1))) {
-      a__S1DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__T1DH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UC + a__S1DH) & (__UINTEGER_32)(~ a__S1DH));
-      ptr_table__TBHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T1DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__SBHH=((__POINTER )(NULL));
-      result__UBHH=((__POINTER *)ptr_table__TBHH)[ 0];
-      if ((result__UBHH == (void *)NULL)) {
-        result__UBHH=new_lab__MRJ(new_size__T1DH);
-        next__SBHH=(void *)((unsigned long)result__UBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1DH)));
-        ((__POINTER *)next__SBHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TBHH)[ 0]=next__SBHH;
-      } else {
-        next__SBHH=((__POINTER *)result__UBHH)[ 0];
-        if ((next__SBHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__T1DH <<  1)) <=  4096)) {
-            next__SBHH=(void *)((unsigned long)result__UBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T1DH)));
-          } else {
-            next__SBHH=new_lab__MRJ(new_size__T1DH);
-          };
-          ((__POINTER *)next__SBHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TBHH)[ 0]=next__SBHH;
-        } else {
-          ((__POINTER *)result__UBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UBHH=next__SBHH;
-        };
-      };
-      ptr__2UC=result__UBHH;
-    } else {
-      t__X1DH=((__UINTEGER_32 )typ_id__BVC);
-      a__W1DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__1BHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UC + a__W1DH) & (__UINTEGER_32)(~ a__W1DH));
-      ptr_table__YBHH=((__POINTER )(&(table_type[(t__X1DH)])));
-      lab_type__0BHH=(__UINTEGER_32)(t__X1DH |  1);
-      next__XBHH=((__POINTER )(NULL));
-      result__ZBHH=((__POINTER *)ptr_table__YBHH)[ 0];
-      if ((result__ZBHH == (void *)NULL)) {
-        result__ZBHH=new_lab__MRJ(lab_type__0BHH);
-        next__XBHH=(void *)((unsigned long)result__ZBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1BHH)));
-        ((__POINTER *)next__XBHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__YBHH)[ 0]=next__XBHH;
-      } else {
-        next__XBHH=((__POINTER *)result__ZBHH)[ 0];
-        if ((next__XBHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZBHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1BHH <<  1)) <=  4096)) {
-            next__XBHH=(void *)((unsigned long)result__ZBHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1BHH)));
-          } else {
-            next__XBHH=new_lab__MRJ(lab_type__0BHH);
-          };
-          ((__POINTER *)next__XBHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YBHH)[ 0]=next__XBHH;
-        } else {
-          ((__POINTER *)result__ZBHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XBHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ZBHH=next__XBHH;
-        };
-      };
-      ptr__2UC=result__ZBHH;
-    };
-    result__1UC=((__PROTOTYPE *)ptr__2UC);
-    *(result__1UC) = *(PROTOTYPE__);
-  };
-  Self__ATS=((__PROTOTYPE *)result__1UC);
-  Self__ATS->filename__UPG=f__1AC;
-  Self__ATS->parent_named__5.name__LI=n__2AC;
-  Self__YRX=((__STRING_CONSTANT *)n__2AC);
-  Self__ICGH=((__CHARACTER *)Self__YRX->storage__VQO);
-  idx__GCGH=(__INTEGER)(Self__YRX->count__DD -  1);
-  while ((! ((idx__GCGH <  0) || ('.' == Self__ICGH[idx__GCGH])))) {
-    idx__GCGH=(__INTEGER)(idx__GCGH -  1);
-  };
-  idx__HTS=(__INTEGER)( 1 + idx__GCGH);
-  if ((idx__HTS !=  0)) {
-    copy__ZCS(string_tmp__VH,n__2AC);
-    Self__T0FH=((__STRING *)string_tmp__VH);
-    if ((idx__HTS > Self__T0FH->count__WFC)) {
-      Self__T0FH->count__WFC= 0;
-    } else {
-      if ((idx__HTS >  0)) {
-        len__4BHH=(__INTEGER)((__INTEGER)(idx__HTS -  1) +  1);
-        if ((len__4BHH >  0)) {
-          __tmp__5BHH=(__INTEGER)(idx__HTS +  1);
-          __tmp__BCHH=Self__T0FH->count__WFC;
-          Self__CCHH=__tmp__5BHH;
-          while ((Self__CCHH <= __tmp__BCHH)) {
-            ((__CHARACTER *)Self__T0FH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__CCHH - len__4BHH) -  1)]=((__CHARACTER *)Self__T0FH->storage__BCS)[(__INTEGER)(Self__CCHH -  1)];
-            Self__CCHH=(__INTEGER)(Self__CCHH +  1);
-          };
-          Self__T0FH->count__WFC=(__INTEGER)(Self__T0FH->count__WFC - len__4BHH);
-        };
-      };
-    };
-    Self__ATS->shortname__FIE=get__IWB(string_tmp__VH);
+    typ_id__JVC=__PROTOTYPE__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__GVC);
+    if ((typ_id__JVC == (__INTEGER)(-  1))) {
+      a__K2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__L2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__GVC + a__K2EH) & (__UINTEGER_32)(~ a__K2EH));
+      ptr_table__ODIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__L2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NDIH=((__POINTER )(NULL));
+      result__PDIH=((__POINTER *)ptr_table__ODIH)[ 0];
+      if ((result__PDIH == (void *)NULL)) {
+        result__PDIH=new_lab__URJ(new_size__L2EH);
+        next__NDIH=(void *)((unsigned long)result__PDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L2EH)));
+        ((__POINTER *)next__NDIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ODIH)[ 0]=next__NDIH;
+      } else {
+        next__NDIH=((__POINTER *)result__PDIH)[ 0];
+        if ((next__NDIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PDIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__L2EH <<  1)) <=  4096)) {
+            next__NDIH=(void *)((unsigned long)result__PDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L2EH)));
+          } else {
+            next__NDIH=new_lab__URJ(new_size__L2EH);
+          };
+          ((__POINTER *)next__NDIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ODIH)[ 0]=next__NDIH;
+        } else {
+          ((__POINTER *)result__PDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PDIH=next__NDIH;
+        };
+      };
+      ptr__EVC=result__PDIH;
+    } else {
+      t__P2EH=((__UINTEGER_32 )typ_id__JVC);
+      a__O2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GVC + a__O2EH) & (__UINTEGER_32)(~ a__O2EH));
+      ptr_table__TDIH=((__POINTER )(&(table_type[(t__P2EH)])));
+      lab_type__VDIH=(__UINTEGER_32)(t__P2EH |  1);
+      next__SDIH=((__POINTER )(NULL));
+      result__UDIH=((__POINTER *)ptr_table__TDIH)[ 0];
+      if ((result__UDIH == (void *)NULL)) {
+        result__UDIH=new_lab__URJ(lab_type__VDIH);
+        next__SDIH=(void *)((unsigned long)result__UDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDIH)));
+        ((__POINTER *)next__SDIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TDIH)[ 0]=next__SDIH;
+      } else {
+        next__SDIH=((__POINTER *)result__UDIH)[ 0];
+        if ((next__SDIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WDIH <<  1)) <=  4096)) {
+            next__SDIH=(void *)((unsigned long)result__UDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDIH)));
+          } else {
+            next__SDIH=new_lab__URJ(lab_type__VDIH);
+          };
+          ((__POINTER *)next__SDIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TDIH)[ 0]=next__SDIH;
+        } else {
+          ((__POINTER *)result__UDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UDIH=next__SDIH;
+        };
+      };
+      ptr__EVC=result__UDIH;
+    };
+    result__DVC=((__PROTOTYPE *)ptr__EVC);
+    *(result__DVC) = *(PROTOTYPE__);
+  };
+  Self__ITS=((__PROTOTYPE *)result__DVC);
+  Self__ITS->filename__2PG=f__DBC;
+  Self__ITS->parent_named__5.name__LI=n__EBC;
+  Self__ASX=((__STRING_CONSTANT *)n__EBC);
+  Self__1DHH=((__CHARACTER *)Self__ASX->storage__3QO);
+  idx__ZDHH=(__INTEGER)(Self__ASX->count__DD -  1);
+  while ((! ((idx__ZDHH <  0) || ('.' == Self__1DHH[idx__ZDHH])))) {
+    idx__ZDHH=(__INTEGER)(idx__ZDHH -  1);
+  };
+  idx__PTS=(__INTEGER)( 1 + idx__ZDHH);
+  if ((idx__PTS !=  0)) {
+    copy__BDS(string_tmp__VH,n__EBC);
+    Self__D2GH=((__STRING *)string_tmp__VH);
+    if ((idx__PTS > Self__D2GH->count__4FC)) {
+      Self__D2GH->count__4FC= 0;
+    } else {
+      if ((idx__PTS >  0)) {
+        len__ZDIH=(__INTEGER)((__INTEGER)(idx__PTS -  1) +  1);
+        if ((len__ZDIH >  0)) {
+          __tmp__0DIH=(__INTEGER)(idx__PTS +  1);
+          __tmp__2DIH=Self__D2GH->count__4FC;
+          Self__3DIH=__tmp__0DIH;
+          while ((Self__3DIH <= __tmp__2DIH)) {
+            ((__CHARACTER *)Self__D2GH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__3DIH - len__ZDIH) -  1)]=((__CHARACTER *)Self__D2GH->storage__JCS)[(__INTEGER)(Self__3DIH -  1)];
+            Self__3DIH=(__INTEGER)(Self__3DIH +  1);
+          };
+          Self__D2GH->count__4FC=(__INTEGER)(Self__D2GH->count__4FC - len__ZDIH);
+        };
+      };
+    };
+    Self__ITS->shortname__NIE=get__QWB(string_tmp__VH);
   } else {
-    Self__ATS->shortname__FIE=n__2AC;
-  };
-  result__FF3=NULL;
-  ptr__GF3=((__POINTER )(NULL));
-  typ_id__LF3= 0;
-  sz__IF3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
-  if ((sz__IF3 ==  0)) {
-    result__FF3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    Self__ITS->shortname__NIE=n__EBC;
+  };
+  result__NF3=NULL;
+  ptr__OF3=((__POINTER )(NULL));
+  typ_id__TF3= 0;
+  sz__QF3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__QF3 ==  0)) {
+    result__NF3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    typ_id__LF3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IF3);
-    if ((typ_id__LF3 == (__INTEGER)(-  1))) {
-      a__01DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__11DH=(__UINTEGER_32)((__UINTEGER_32)(sz__IF3 + a__01DH) & (__UINTEGER_32)(~ a__01DH));
-      ptr_table__GCHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__11DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FCHH=((__POINTER )(NULL));
-      result__HCHH=((__POINTER *)ptr_table__GCHH)[ 0];
-      if ((result__HCHH == (void *)NULL)) {
-        result__HCHH=new_lab__MRJ(new_size__11DH);
-        next__FCHH=(void *)((unsigned long)result__HCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__11DH)));
-        ((__POINTER *)next__FCHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GCHH)[ 0]=next__FCHH;
-      } else {
-        next__FCHH=((__POINTER *)result__HCHH)[ 0];
-        if ((next__FCHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__11DH <<  1)) <=  4096)) {
-            next__FCHH=(void *)((unsigned long)result__HCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__11DH)));
-          } else {
-            next__FCHH=new_lab__MRJ(new_size__11DH);
-          };
-          ((__POINTER *)next__FCHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GCHH)[ 0]=next__FCHH;
-        } else {
-          ((__POINTER *)result__HCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HCHH=next__FCHH;
-        };
-      };
-      ptr__GF3=result__HCHH;
-    } else {
-      t__51DH=((__UINTEGER_32 )typ_id__LF3);
-      a__41DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IF3 + a__41DH) & (__UINTEGER_32)(~ a__41DH));
-      ptr_table__LCHH=((__POINTER )(&(table_type[(t__51DH)])));
-      lab_type__NCHH=(__UINTEGER_32)(t__51DH |  1);
-      next__KCHH=((__POINTER )(NULL));
-      result__MCHH=((__POINTER *)ptr_table__LCHH)[ 0];
-      if ((result__MCHH == (void *)NULL)) {
-        result__MCHH=new_lab__MRJ(lab_type__NCHH);
-        next__KCHH=(void *)((unsigned long)result__MCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCHH)));
-        ((__POINTER *)next__KCHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LCHH)[ 0]=next__KCHH;
-      } else {
-        next__KCHH=((__POINTER *)result__MCHH)[ 0];
-        if ((next__KCHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OCHH <<  1)) <=  4096)) {
-            next__KCHH=(void *)((unsigned long)result__MCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCHH)));
-          } else {
-            next__KCHH=new_lab__MRJ(lab_type__NCHH);
-          };
-          ((__POINTER *)next__KCHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LCHH)[ 0]=next__KCHH;
-        } else {
-          ((__POINTER *)result__MCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MCHH=next__KCHH;
-        };
-      };
-      ptr__GF3=result__MCHH;
-    };
-    result__FF3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__GF3);
-    *(result__FF3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
-  };
-  Self__52BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__FF3);
-  if ((Self__52BC->parent_arrayed_collection__TME.capacity__YBBC <  0)) {
-    Self__52BC->parent_arrayed_collection__TME.storage__UCBC=create__VY1C( 0);
-    Self__52BC->parent_arrayed_collection__TME.capacity__YBBC= 0;
-  };
-  Self__52BC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(-  1);
-  Self__ATS->idf_generic_list__UME=result__FF3;
-  Self__ATS->index__VMG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
-  Self__QTX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
-  new_capacity__STX= 0;
-  if (((__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.capacity__3CU -  1))) {
-    Self__QTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1);
-    __tmp__AUX=TRUE__;
+    typ_id__TF3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QF3);
+    if ((typ_id__TF3 == (__INTEGER)(-  1))) {
+      a__S2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__T2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__QF3 + a__S2EH) & (__UINTEGER_32)(~ a__S2EH));
+      ptr_table__BEIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__AEIH=((__POINTER )(NULL));
+      result__CEIH=((__POINTER *)ptr_table__BEIH)[ 0];
+      if ((result__CEIH == (void *)NULL)) {
+        result__CEIH=new_lab__URJ(new_size__T2EH);
+        next__AEIH=(void *)((unsigned long)result__CEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T2EH)));
+        ((__POINTER *)next__AEIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BEIH)[ 0]=next__AEIH;
+      } else {
+        next__AEIH=((__POINTER *)result__CEIH)[ 0];
+        if ((next__AEIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CEIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__T2EH <<  1)) <=  4096)) {
+            next__AEIH=(void *)((unsigned long)result__CEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T2EH)));
+          } else {
+            next__AEIH=new_lab__URJ(new_size__T2EH);
+          };
+          ((__POINTER *)next__AEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BEIH)[ 0]=next__AEIH;
+        } else {
+          ((__POINTER *)result__CEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CEIH=next__AEIH;
+        };
+      };
+      ptr__OF3=result__CEIH;
+    } else {
+      t__X2EH=((__UINTEGER_32 )typ_id__TF3);
+      a__W2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QF3 + a__W2EH) & (__UINTEGER_32)(~ a__W2EH));
+      ptr_table__GEIH=((__POINTER )(&(table_type[(t__X2EH)])));
+      lab_type__IEIH=(__UINTEGER_32)(t__X2EH |  1);
+      next__FEIH=((__POINTER )(NULL));
+      result__HEIH=((__POINTER *)ptr_table__GEIH)[ 0];
+      if ((result__HEIH == (void *)NULL)) {
+        result__HEIH=new_lab__URJ(lab_type__IEIH);
+        next__FEIH=(void *)((unsigned long)result__HEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JEIH)));
+        ((__POINTER *)next__FEIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GEIH)[ 0]=next__FEIH;
+      } else {
+        next__FEIH=((__POINTER *)result__HEIH)[ 0];
+        if ((next__FEIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HEIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JEIH <<  1)) <=  4096)) {
+            next__FEIH=(void *)((unsigned long)result__HEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JEIH)));
+          } else {
+            next__FEIH=new_lab__URJ(lab_type__IEIH);
+          };
+          ((__POINTER *)next__FEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GEIH)[ 0]=next__FEIH;
+        } else {
+          ((__POINTER *)result__HEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HEIH=next__FEIH;
+        };
+      };
+      ptr__OF3=result__HEIH;
+    };
+    result__NF3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__OF3);
+    *(result__NF3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__H3BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__NF3);
+  if ((Self__H3BC->parent_arrayed_collection__1ME.capacity__ACBC <  0)) {
+    Self__H3BC->parent_arrayed_collection__1ME.storage__2CBC=create__3Y1C( 0);
+    Self__H3BC->parent_arrayed_collection__1ME.capacity__ACBC= 0;
+  };
+  Self__H3BC->parent_arrayed_collection__1ME.upper__4BBC=(__INTEGER)(-  1);
+  Self__ITS->idf_generic_list__2ME=result__NF3;
+  Self__ITS->index__3MG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__YTX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__0TX= 0;
+  if (((__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.capacity__FDU -  1))) {
+    Self__YTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__IUX=TRUE__;
   } else {
-    __tmp__AUX=FALSE__;
-  };
-  if ((! __tmp__AUX)) {
-    if ((Self__QTX->parent_arrayed_collection__AJ.capacity__3CU ==  0)) {
-      Self__QTX->parent_arrayed_collection__AJ.storage__KTT=create__GFSB( 2);
-      Self__QTX->parent_arrayed_collection__AJ.capacity__3CU= 2;
-      Self__QTX->parent_arrayed_collection__AJ.upper__HJ= 0;
-    } else {
-      new_capacity__STX=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.capacity__3CU <<  1);
-      __tmp__VUX=Self__QTX->parent_arrayed_collection__AJ.storage__KTT;
-      __tmp__WUX=Self__QTX->parent_arrayed_collection__AJ.capacity__3CU;
-      new__NNEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VUX)),((__UINTEGER_32 )(__INTEGER)(__tmp__WUX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__STX * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__BOEC=(__INTEGER)(new_capacity__STX -  1);
-      Self__JPVD=__tmp__WUX;
-      while ((Self__JPVD <= __tmp__BOEC)) {
-        new__NNEC[Self__JPVD]=NULL;
-        Self__JPVD=(__INTEGER)(Self__JPVD +  1);
-      };
-      Self__QTX->parent_arrayed_collection__AJ.storage__KTT=new__NNEC;
-      Self__QTX->parent_arrayed_collection__AJ.capacity__3CU=new_capacity__STX;
-      Self__QTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__QTX->parent_arrayed_collection__AJ.upper__HJ +  1);
-    };
-  };
-  ((void **)Self__QTX->parent_arrayed_collection__AJ.storage__KTT)[Self__QTX->parent_arrayed_collection__AJ.upper__HJ]=Self__ATS;
-  Self__CNBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
-  Self__QCHH=((__STRING_CONSTANT *)f__1AC);
-  result__PCHH= 0;
-  __tmp__RCHH=Self__QCHH->count__DD;
-  Self__SCHH= 1;
-  while ((Self__SCHH <= __tmp__RCHH)) {
-    result__PCHH=(__INTEGER)((__INTEGER)( 5 * result__PCHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QCHH->storage__VQO)[(__INTEGER)(Self__SCHH -  1)])));
-    Self__SCHH=(__INTEGER)(Self__SCHH +  1);
-  };
-  if ((result__PCHH <  0)) {
-    result__PCHH=(__INTEGER)(~ result__PCHH);
-  };
-  idx__MNBC=(__INTEGER)(result__PCHH % Self__CNBC->capacity__QNBC);
-  node__ONBC=((void **)Self__CNBC->buckets__VNBC)[idx__MNBC];
-  while ((! (((void *)node__ONBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->key__BOBC == (void *)f__1AC)))) {
-    node__ONBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->next__MOBC;
-  };
-  if (((void *)node__ONBC == (void *)NULL)) {
-    if ((Self__CNBC->capacity__QNBC == Self__CNBC->count__VOBC)) {
-      idx__AZGD= 0;
-      node1__EZGD=NULL;
-      node2__FZGD=NULL;
-      old_buckets__DZGD=Self__CNBC->buckets__VNBC;
-      new_capacity__BZGD=prime_number_ceiling__X41((__INTEGER)(Self__CNBC->capacity__QNBC +  1));
-      Self__CNBC->buckets__VNBC=create__HITC(new_capacity__BZGD);
-      i__CZGD=(__INTEGER)(Self__CNBC->capacity__QNBC -  1);
-      Self__CNBC->capacity__QNBC=new_capacity__BZGD;
-      while ((i__CZGD >=  0)) {
-        node1__EZGD=((void **)old_buckets__DZGD)[i__CZGD];
-        while (((void *)node1__EZGD != (void *)NULL)) {
-          node2__FZGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->next__MOBC;
-          Self__4NW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->key__BOBC);
-          result__AOW= 0;
-          __tmp__BOW=Self__4NW->count__DD;
-          Self__XT1= 1;
-          while ((Self__XT1 <= __tmp__BOW)) {
-            result__AOW=(__INTEGER)((__INTEGER)( 5 * result__AOW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4NW->storage__VQO)[(__INTEGER)(Self__XT1 -  1)])));
-            Self__XT1=(__INTEGER)(Self__XT1 +  1);
-          };
-          if ((result__AOW <  0)) {
-            result__AOW=(__INTEGER)(~ result__AOW);
-          };
-          idx__AZGD=(__INTEGER)(result__AOW % Self__CNBC->capacity__QNBC);
-          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__EZGD)->next__MOBC=((void **)Self__CNBC->buckets__VNBC)[idx__AZGD];
-          ((void **)Self__CNBC->buckets__VNBC)[idx__AZGD]=node1__EZGD;
-          node1__EZGD=node2__FZGD;
-        };
-        i__CZGD=(__INTEGER)(i__CZGD -  1);
-      };
-      idx__MNBC=(__INTEGER)(result__PCHH % new_capacity__BZGD);
-    };
-    __tmp__CPBC=((void **)Self__CNBC->buckets__VNBC)[idx__MNBC];
-    result__K1GD=NULL;
-    ptr__L1GD=((__POINTER )(NULL));
-    typ_id__Q1GD= 0;
-    sz__N1GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
-    if ((sz__N1GD ==  0)) {
-      result__K1GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__Q1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__N1GD);
-      if ((typ_id__Q1GD == (__INTEGER)(-  1))) {
-        a__R2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__S2DH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1GD + a__R2DH) & (__UINTEGER_32)(~ a__R2DH));
-        ptr_table__VCHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S2DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__UCHH=((__POINTER )(NULL));
-        result__WCHH=((__POINTER *)ptr_table__VCHH)[ 0];
-        if ((result__WCHH == (void *)NULL)) {
-          result__WCHH=new_lab__MRJ(new_size__S2DH);
-          next__UCHH=(void *)((unsigned long)result__WCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2DH)));
-          ((__POINTER *)next__UCHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VCHH)[ 0]=next__UCHH;
-        } else {
-          next__UCHH=((__POINTER *)result__WCHH)[ 0];
-          if ((next__UCHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WCHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__S2DH <<  1)) <=  4096)) {
-              next__UCHH=(void *)((unsigned long)result__WCHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S2DH)));
+    __tmp__IUX=FALSE__;
+  };
+  if ((! __tmp__IUX)) {
+    if ((Self__YTX->parent_arrayed_collection__AJ.capacity__FDU ==  0)) {
+      Self__YTX->parent_arrayed_collection__AJ.storage__STT=create__OFSB( 2);
+      Self__YTX->parent_arrayed_collection__AJ.capacity__FDU= 2;
+      Self__YTX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__0TX=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.capacity__FDU <<  1);
+      __tmp__3UX=Self__YTX->parent_arrayed_collection__AJ.storage__STT;
+      __tmp__4UX=Self__YTX->parent_arrayed_collection__AJ.capacity__FDU;
+      new__VNEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__3UX)),((__UINTEGER_32 )(__INTEGER)(__tmp__4UX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0TX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__JOEC=(__INTEGER)(new_capacity__0TX -  1);
+      Self__RPVD=__tmp__4UX;
+      while ((Self__RPVD <= __tmp__JOEC)) {
+        new__VNEC[Self__RPVD]=NULL;
+        Self__RPVD=(__INTEGER)(Self__RPVD +  1);
+      };
+      Self__YTX->parent_arrayed_collection__AJ.storage__STT=new__VNEC;
+      Self__YTX->parent_arrayed_collection__AJ.capacity__FDU=new_capacity__0TX;
+      Self__YTX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__YTX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__YTX->parent_arrayed_collection__AJ.storage__STT)[Self__YTX->parent_arrayed_collection__AJ.upper__HJ]=Self__ITS;
+  Self__KNBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__XTS);
+  Self__LEIH=((__STRING_CONSTANT *)f__DBC);
+  result__KEIH= 0;
+  __tmp__MEIH=Self__LEIH->count__DD;
+  Self__NEIH= 1;
+  while ((Self__NEIH <= __tmp__MEIH)) {
+    result__KEIH=(__INTEGER)((__INTEGER)( 5 * result__KEIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LEIH->storage__3QO)[(__INTEGER)(Self__NEIH -  1)])));
+    Self__NEIH=(__INTEGER)(Self__NEIH +  1);
+  };
+  if ((result__KEIH <  0)) {
+    result__KEIH=(__INTEGER)(~ result__KEIH);
+  };
+  idx__UNBC=(__INTEGER)(result__KEIH % Self__KNBC->capacity__YNBC);
+  node__WNBC=((void **)Self__KNBC->buckets__3NBC)[idx__UNBC];
+  while ((! (((void *)node__WNBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__WNBC)->key__JOBC == (void *)f__DBC)))) {
+    node__WNBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__WNBC)->next__UOBC;
+  };
+  if (((void *)node__WNBC == (void *)NULL)) {
+    if ((Self__KNBC->capacity__YNBC == Self__KNBC->count__3OBC)) {
+      idx__IZGD= 0;
+      node1__MZGD=NULL;
+      node2__NZGD=NULL;
+      old_buckets__LZGD=Self__KNBC->buckets__3NBC;
+      new_capacity__JZGD=prime_number_ceiling__541((__INTEGER)(Self__KNBC->capacity__YNBC +  1));
+      Self__KNBC->buckets__3NBC=create__PITC(new_capacity__JZGD);
+      i__KZGD=(__INTEGER)(Self__KNBC->capacity__YNBC -  1);
+      Self__KNBC->capacity__YNBC=new_capacity__JZGD;
+      while ((i__KZGD >=  0)) {
+        node1__MZGD=((void **)old_buckets__LZGD)[i__KZGD];
+        while (((void *)node1__MZGD != (void *)NULL)) {
+          node2__NZGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__MZGD)->next__UOBC;
+          Self__GOW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__MZGD)->key__JOBC);
+          result__IOW= 0;
+          __tmp__JOW=Self__GOW->count__DD;
+          Self__5T1= 1;
+          while ((Self__5T1 <= __tmp__JOW)) {
+            result__IOW=(__INTEGER)((__INTEGER)( 5 * result__IOW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GOW->storage__3QO)[(__INTEGER)(Self__5T1 -  1)])));
+            Self__5T1=(__INTEGER)(Self__5T1 +  1);
+          };
+          if ((result__IOW <  0)) {
+            result__IOW=(__INTEGER)(~ result__IOW);
+          };
+          idx__IZGD=(__INTEGER)(result__IOW % Self__KNBC->capacity__YNBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__MZGD)->next__UOBC=((void **)Self__KNBC->buckets__3NBC)[idx__IZGD];
+          ((void **)Self__KNBC->buckets__3NBC)[idx__IZGD]=node1__MZGD;
+          node1__MZGD=node2__NZGD;
+        };
+        i__KZGD=(__INTEGER)(i__KZGD -  1);
+      };
+      idx__UNBC=(__INTEGER)(result__KEIH % new_capacity__JZGD);
+    };
+    __tmp__KPBC=((void **)Self__KNBC->buckets__3NBC)[idx__UNBC];
+    result__S1GD=NULL;
+    ptr__T1GD=((__POINTER )(NULL));
+    typ_id__Y1GD= 0;
+    sz__V1GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__V1GD ==  0)) {
+      result__S1GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__Y1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__V1GD);
+      if ((typ_id__Y1GD == (__INTEGER)(-  1))) {
+        a__J3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__K3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__V1GD + a__J3EH) & (__UINTEGER_32)(~ a__J3EH));
+        ptr_table__QEIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__PEIH=((__POINTER )(NULL));
+        result__REIH=((__POINTER *)ptr_table__QEIH)[ 0];
+        if ((result__REIH == (void *)NULL)) {
+          result__REIH=new_lab__URJ(new_size__K3EH);
+          next__PEIH=(void *)((unsigned long)result__REIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3EH)));
+          ((__POINTER *)next__PEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QEIH)[ 0]=next__PEIH;
+        } else {
+          next__PEIH=((__POINTER *)result__REIH)[ 0];
+          if ((next__PEIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__REIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__K3EH <<  1)) <=  4096)) {
+              next__PEIH=(void *)((unsigned long)result__REIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3EH)));
             } else {
-              next__UCHH=new_lab__MRJ(new_size__S2DH);
-            };
-            ((__POINTER *)next__UCHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VCHH)[ 0]=next__UCHH;
-          } else {
-            ((__POINTER *)result__WCHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WCHH=next__UCHH;
-          };
-        };
-        ptr__L1GD=result__WCHH;
-      } else {
-        t__W2DH=((__UINTEGER_32 )typ_id__Q1GD);
-        a__V2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__3CHH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1GD + a__V2DH) & (__UINTEGER_32)(~ a__V2DH));
-        ptr_table__0CHH=((__POINTER )(&(table_type[(t__W2DH)])));
-        lab_type__2CHH=(__UINTEGER_32)(t__W2DH |  1);
-        next__ZCHH=((__POINTER )(NULL));
-        result__1CHH=((__POINTER *)ptr_table__0CHH)[ 0];
-        if ((result__1CHH == (void *)NULL)) {
-          result__1CHH=new_lab__MRJ(lab_type__2CHH);
-          next__ZCHH=(void *)((unsigned long)result__1CHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CHH)));
-          ((__POINTER *)next__ZCHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0CHH)[ 0]=next__ZCHH;
-        } else {
-          next__ZCHH=((__POINTER *)result__1CHH)[ 0];
-          if ((next__ZCHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1CHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3CHH <<  1)) <=  4096)) {
-              next__ZCHH=(void *)((unsigned long)result__1CHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CHH)));
+              next__PEIH=new_lab__URJ(new_size__K3EH);
+            };
+            ((__POINTER *)next__PEIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QEIH)[ 0]=next__PEIH;
+          } else {
+            ((__POINTER *)result__REIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__REIH=next__PEIH;
+          };
+        };
+        ptr__T1GD=result__REIH;
+      } else {
+        t__O3EH=((__UINTEGER_32 )typ_id__Y1GD);
+        a__N3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__V1GD + a__N3EH) & (__UINTEGER_32)(~ a__N3EH));
+        ptr_table__VEIH=((__POINTER )(&(table_type[(t__O3EH)])));
+        lab_type__XEIH=(__UINTEGER_32)(t__O3EH |  1);
+        next__UEIH=((__POINTER )(NULL));
+        result__WEIH=((__POINTER *)ptr_table__VEIH)[ 0];
+        if ((result__WEIH == (void *)NULL)) {
+          result__WEIH=new_lab__URJ(lab_type__XEIH);
+          next__UEIH=(void *)((unsigned long)result__WEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YEIH)));
+          ((__POINTER *)next__UEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VEIH)[ 0]=next__UEIH;
+        } else {
+          next__UEIH=((__POINTER *)result__WEIH)[ 0];
+          if ((next__UEIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WEIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YEIH <<  1)) <=  4096)) {
+              next__UEIH=(void *)((unsigned long)result__WEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YEIH)));
             } else {
-              next__ZCHH=new_lab__MRJ(lab_type__2CHH);
+              next__UEIH=new_lab__URJ(lab_type__XEIH);
             };
-            ((__POINTER *)next__ZCHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0CHH)[ 0]=next__ZCHH;
+            ((__POINTER *)next__UEIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VEIH)[ 0]=next__UEIH;
           } else {
-            ((__POINTER *)result__1CHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZCHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1CHH=next__ZCHH;
+            ((__POINTER *)result__WEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WEIH=next__UEIH;
           };
         };
-        ptr__L1GD=result__1CHH;
+        ptr__T1GD=result__WEIH;
       };
-      result__K1GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__L1GD);
-      *(result__K1GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__S1GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__T1GD);
+      *(result__S1GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    Self__Z3SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__K1GD);
-    Self__Z3SD->item__U3GD=Self__ATS;
-    Self__Z3SD->key__BOBC=f__1AC;
-    Self__Z3SD->next__MOBC=__tmp__CPBC;
-    node__ONBC=result__K1GD;
-    ((void **)Self__CNBC->buckets__VNBC)[idx__MNBC]=result__K1GD;
-    Self__CNBC->count__VOBC=(__INTEGER)(Self__CNBC->count__VOBC +  1);
+    Self__B4SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__S1GD);
+    Self__B4SD->item__23GD=Self__ITS;
+    Self__B4SD->key__JOBC=f__DBC;
+    Self__B4SD->next__UOBC=__tmp__KPBC;
+    node__WNBC=result__S1GD;
+    ((void **)Self__KNBC->buckets__3NBC)[idx__UNBC]=result__S1GD;
+    Self__KNBC->count__3OBC=(__INTEGER)(Self__KNBC->count__3OBC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ONBC)->item__U3GD=Self__ATS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__WNBC)->item__23GD=Self__ITS;
   };
-  copy__ZCS(string_tmp__KWX,f__1AC);
-  Self__10FH=((__STRING *)string_tmp__KWX);
-  if ((Self__10FH->capacity__YBS > Self__10FH->count__WFC)) {
-    ((__CHARACTER *)Self__10FH->storage__BCS)[Self__10FH->count__WFC]='\0';
+  copy__BDS(string_tmp__SWX,f__DBC);
+  Self__L2GH=((__STRING *)string_tmp__SWX);
+  if ((Self__L2GH->capacity__ACS > Self__L2GH->count__4FC)) {
+    ((__CHARACTER *)Self__L2GH->storage__JCS)[Self__L2GH->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__10FH,'\0');
-    Self__10FH->count__WFC=(__INTEGER)(Self__10FH->count__WFC -  1);
-  };
-  file__ETS=((__POINTER )(fopen((char*)(Self__10FH->storage__BCS),"rb")));
-  fseek((FILE*)((file__ETS)),0,SEEK_END);
-  result__TWX=((__INTEGER )(ftell((FILE *)(file__ETS))));
-  fseek((FILE*)((file__ETS)),0,SEEK_SET);
-  Self__ATS->source__NBC=create__NBB((__INTEGER)(result__TWX +  1));
-  __tmp__VUS=Self__ATS->source__NBC;
-  Self__40FH=((__STRING *)__tmp__VUS);
-  if ((Self__40FH->capacity__YBS > Self__40FH->count__WFC)) {
-    ((__CHARACTER *)Self__40FH->storage__BCS)[Self__40FH->count__WFC]='\0';
+    add_last__BMT(Self__L2GH,'\0');
+    Self__L2GH->count__4FC=(__INTEGER)(Self__L2GH->count__4FC -  1);
+  };
+  file__MTS=((__POINTER )(fopen((char*)(Self__L2GH->storage__JCS),"rb")));
+  fseek((FILE*)((file__MTS)),0,SEEK_END);
+  result__1WX=((__INTEGER )(ftell((FILE *)(file__MTS))));
+  fseek((FILE*)((file__MTS)),0,SEEK_SET);
+  Self__ITS->source__VBC=create__TBB((__INTEGER)(result__1WX +  1));
+  __tmp__3US=Self__ITS->source__VBC;
+  Self__O2GH=((__STRING *)__tmp__3US);
+  if ((Self__O2GH->capacity__ACS > Self__O2GH->count__4FC)) {
+    ((__CHARACTER *)Self__O2GH->storage__JCS)[Self__O2GH->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__40FH,'\0');
-    Self__40FH->count__WFC=(__INTEGER)(Self__40FH->count__WFC -  1);
-  };
-  ptr__2WX=Self__40FH->storage__BCS;
-  fread((void *)((ptr__2WX)),(size_t)(1), (size_t)((result__TWX)),(FILE*)((file__ETS)));
-  ((__CHARACTER *)ptr__2WX)[result__TWX]='\0';
-  Self__3YS=((__STRING *)__tmp__VUS);
-  Self__3YS->count__WFC= 0;
-  while ((((__CHARACTER *)ptr__2WX)[Self__3YS->count__WFC] != '\0')) {
-    Self__3YS->count__WFC=(__INTEGER)(Self__3YS->count__WFC +  1);
-  };
-  if (((void *)Self__3YS->storage__BCS != (void *)ptr__2WX)) {
-    Self__3YS->storage__BCS=ptr__2WX;
-    Self__3YS->capacity__YBS=(__INTEGER)(Self__3YS->count__WFC +  1);
-  };
-  fclose((FILE*)((file__ETS)));
-  result__KL3=NULL;
-  ptr__LL3=((__POINTER )(NULL));
-  typ_id__QL3= 0;
-  sz__NL3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
-  if ((sz__NL3 ==  0)) {
-    result__KL3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    add_last__BMT(Self__O2GH,'\0');
+    Self__O2GH->count__4FC=(__INTEGER)(Self__O2GH->count__4FC -  1);
+  };
+  ptr__EXX=Self__O2GH->storage__JCS;
+  fread((void *)((ptr__EXX)),(size_t)(1), (size_t)((result__1WX)),(FILE*)((file__MTS)));
+  ((__CHARACTER *)ptr__EXX)[result__1WX]='\0';
+  Self__FZS=((__STRING *)__tmp__3US);
+  Self__FZS->count__4FC= 0;
+  while ((((__CHARACTER *)ptr__EXX)[Self__FZS->count__4FC] != '\0')) {
+    Self__FZS->count__4FC=(__INTEGER)(Self__FZS->count__4FC +  1);
+  };
+  if (((void *)Self__FZS->storage__JCS != (void *)ptr__EXX)) {
+    Self__FZS->storage__JCS=ptr__EXX;
+    Self__FZS->capacity__ACS=(__INTEGER)(Self__FZS->count__4FC +  1);
+  };
+  fclose((FILE*)((file__MTS)));
+  result__SL3=NULL;
+  ptr__TL3=((__POINTER )(NULL));
+  typ_id__YL3= 0;
+  sz__VL3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__VL3 ==  0)) {
+    result__SL3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
   } else {
-    typ_id__QL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NL3);
-    if ((typ_id__QL3 == (__INTEGER)(-  1))) {
-      a__Z2DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__02DH=(__UINTEGER_32)((__UINTEGER_32)(sz__NL3 + a__Z2DH) & (__UINTEGER_32)(~ a__Z2DH));
-      ptr_table__5CHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__02DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__4CHH=((__POINTER )(NULL));
-      result__ADHH=((__POINTER *)ptr_table__5CHH)[ 0];
-      if ((result__ADHH == (void *)NULL)) {
-        result__ADHH=new_lab__MRJ(new_size__02DH);
-        next__4CHH=(void *)((unsigned long)result__ADHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02DH)));
-        ((__POINTER *)next__4CHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__5CHH)[ 0]=next__4CHH;
-      } else {
-        next__4CHH=((__POINTER *)result__ADHH)[ 0];
-        if ((next__4CHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ADHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__02DH <<  1)) <=  4096)) {
-            next__4CHH=(void *)((unsigned long)result__ADHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02DH)));
-          } else {
-            next__4CHH=new_lab__MRJ(new_size__02DH);
-          };
-          ((__POINTER *)next__4CHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5CHH)[ 0]=next__4CHH;
-        } else {
-          ((__POINTER *)result__ADHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4CHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ADHH=next__4CHH;
-        };
-      };
-      ptr__LL3=result__ADHH;
-    } else {
-      t__42DH=((__UINTEGER_32 )typ_id__QL3);
-      a__32DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__NL3 + a__32DH) & (__UINTEGER_32)(~ a__32DH));
-      ptr_table__EDHH=((__POINTER )(&(table_type[(t__42DH)])));
-      lab_type__GDHH=(__UINTEGER_32)(t__42DH |  1);
-      next__DDHH=((__POINTER )(NULL));
-      result__FDHH=((__POINTER *)ptr_table__EDHH)[ 0];
-      if ((result__FDHH == (void *)NULL)) {
-        result__FDHH=new_lab__MRJ(lab_type__GDHH);
-        next__DDHH=(void *)((unsigned long)result__FDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HDHH)));
-        ((__POINTER *)next__DDHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__EDHH)[ 0]=next__DDHH;
-      } else {
-        next__DDHH=((__POINTER *)result__FDHH)[ 0];
-        if ((next__DDHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FDHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HDHH <<  1)) <=  4096)) {
-            next__DDHH=(void *)((unsigned long)result__FDHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HDHH)));
-          } else {
-            next__DDHH=new_lab__MRJ(lab_type__GDHH);
-          };
-          ((__POINTER *)next__DDHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EDHH)[ 0]=next__DDHH;
-        } else {
-          ((__POINTER *)result__FDHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DDHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__FDHH=next__DDHH;
-        };
-      };
-      ptr__LL3=result__FDHH;
-    };
-    result__KL3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__LL3);
-    *(result__KL3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
-  };
-  Self__V4BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__KL3);
-  new_capacity__TMJC=prime_number_ceiling__X41( 193);
-  Self__V4BC->buckets__DBGC=create__3QSC(new_capacity__TMJC);
-  Self__V4BC->capacity__24BC=new_capacity__TMJC;
-  Self__V4BC->count__OPGC= 0;
-  Self__ATS->slot_list__2US=result__KL3;
-  Self__ATS->parent_named__5.parent_itm_object__4.position__NDJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__ATS->index__VMG) |  131072));
-  return(result__1UC);
+    typ_id__YL3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__VL3);
+    if ((typ_id__YL3 == (__INTEGER)(-  1))) {
+      a__R3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__S3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__VL3 + a__R3EH) & (__UINTEGER_32)(~ a__R3EH));
+      ptr_table__0EIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZEIH=((__POINTER )(NULL));
+      result__1EIH=((__POINTER *)ptr_table__0EIH)[ 0];
+      if ((result__1EIH == (void *)NULL)) {
+        result__1EIH=new_lab__URJ(new_size__S3EH);
+        next__ZEIH=(void *)((unsigned long)result__1EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S3EH)));
+        ((__POINTER *)next__ZEIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0EIH)[ 0]=next__ZEIH;
+      } else {
+        next__ZEIH=((__POINTER *)result__1EIH)[ 0];
+        if ((next__ZEIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1EIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__S3EH <<  1)) <=  4096)) {
+            next__ZEIH=(void *)((unsigned long)result__1EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S3EH)));
+          } else {
+            next__ZEIH=new_lab__URJ(new_size__S3EH);
+          };
+          ((__POINTER *)next__ZEIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0EIH)[ 0]=next__ZEIH;
+        } else {
+          ((__POINTER *)result__1EIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1EIH=next__ZEIH;
+        };
+      };
+      ptr__TL3=result__1EIH;
+    } else {
+      t__W3EH=((__UINTEGER_32 )typ_id__YL3);
+      a__V3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VL3 + a__V3EH) & (__UINTEGER_32)(~ a__V3EH));
+      ptr_table__5EIH=((__POINTER )(&(table_type[(t__W3EH)])));
+      lab_type__BFIH=(__UINTEGER_32)(t__W3EH |  1);
+      next__4EIH=((__POINTER )(NULL));
+      result__AFIH=((__POINTER *)ptr_table__5EIH)[ 0];
+      if ((result__AFIH == (void *)NULL)) {
+        result__AFIH=new_lab__URJ(lab_type__BFIH);
+        next__4EIH=(void *)((unsigned long)result__AFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CFIH)));
+        ((__POINTER *)next__4EIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5EIH)[ 0]=next__4EIH;
+      } else {
+        next__4EIH=((__POINTER *)result__AFIH)[ 0];
+        if ((next__4EIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AFIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CFIH <<  1)) <=  4096)) {
+            next__4EIH=(void *)((unsigned long)result__AFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CFIH)));
+          } else {
+            next__4EIH=new_lab__URJ(lab_type__BFIH);
+          };
+          ((__POINTER *)next__4EIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5EIH)[ 0]=next__4EIH;
+        } else {
+          ((__POINTER *)result__AFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4EIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AFIH=next__4EIH;
+        };
+      };
+      ptr__TL3=result__AFIH;
+    };
+    result__SL3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__TL3);
+    *(result__SL3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__34BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__SL3);
+  new_capacity__1MJC=prime_number_ceiling__541( 193);
+  Self__34BC->buckets__LBGC=create__FRSC(new_capacity__1MJC);
+  Self__34BC->capacity__E5BC=new_capacity__1MJC;
+  Self__34BC->count__WPGC= 0;
+  Self__ITS->slot_list__EVS=result__SL3;
+  Self__ITS->parent_named__5.parent_itm_object__4.position__VDJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__ITS->index__3MG) |  131072));
+  return(result__DVC);
 }
 
-static __BOOLEAN read_space__3RD()
+static __BOOLEAN read_space__FSD()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos2__CSD,short_line__ESD,level_comment__FSD,pos__BSD;
-  __INTEGER posold__ASD,begin__C51G,end__D51G,start__JDHH,end__IDHH;
-  __INTEGER len__KDHH,__tmp__LDHH,__tmp__NDHH,Self__ODHH,begin__JFMD;
-  __INTEGER start__SDHH,end__RDHH,len__TDHH,__tmp__UDHH,__tmp__WDHH;
-  __INTEGER Self__XDHH;
-  void *key__DSD,*__tmp__U2D;
-  __STRING *Self__MDHH,*Self__VDHH;
-  void *__tmp__R2D;
-  __POSITION pos__EEUG;
-  __CHARACTER result__RACH,result__4ACH,result__HBCH,result__QBCH;
-  __CHARACTER result__3BCH,result__GCCH,result__PCCH,result__YCCH;
-  __CHARACTER result__GDCH,result__PDCH,result__YDCH,result__BECH;
-  __CHARACTER result__KECH,result__TECH,result__2ECH,result__JFCH;
-  __CHARACTER result__SFCH,result__1FCH,result__IGCH,result__VGCH;
-  __CHARACTER result__CHCH,result__Y5E;
-  __BOOLEAN __tmp__IUD,result__J4DH,result__L4DH,__tmp__KZD;
-  __BOOLEAN result__N4DH,__tmp__LZD,__tmp__M1D,__tmp__T5D;
-  pos2__CSD= 0;
-  key__DSD=NULL;
-  short_line__ESD= 0;
-  level_comment__FSD= 0;
-  pos__BSD=position__SBC;
-  posold__ASD=(__INTEGER)(-  1);
-  while ((posold__ASD != position__SBC)) {
-    posold__ASD=position__SBC;
-    if (is_shorter__5Y) {
-      while (((position__SBC >  2) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC -  1) -  1)]) <= ((__INTEGER_8 )' ')))) {
-        position__SBC=(__INTEGER)(position__SBC -  1);
-      };
-      short_line__ESD= 0;
-    };
-    until_do__TNI:
+  __INTEGER pos2__KSD,short_line__MSD,level_comment__NSD,pos__JSD;
+  __INTEGER posold__ISD,begin__U22G,end__V22G,start__EFIH,end__DFIH;
+  __INTEGER len__FFIH,__tmp__GFIH,__tmp__IFIH,Self__JFIH,begin__RFMD;
+  __INTEGER start__NFIH,end__MFIH,len__OFIH,__tmp__PFIH,__tmp__RFIH;
+  __INTEGER Self__SFIH;
+  void *key__LSD,*__tmp__22D;
+  __STRING *Self__HFIH,*Self__QFIH;
+  void *__tmp__Z2D;
+  __POSITION pos__UAVG;
+  __CHARACTER result__DADH,result__QADH,result__ZADH,result__CBDH;
+  __CHARACTER result__PBDH,result__YBDH,result__BCDH,result__KCDH;
+  __CHARACTER result__YCDH,result__BDDH,result__KDDH,result__TDDH;
+  __CHARACTER result__2DDH,result__FEDH,result__OEDH,result__1EDH;
+  __CHARACTER result__EFDH,result__NFDH,result__0FDH,result__HGDH;
+  __CHARACTER result__UGDH,result__AAF;
+  __BOOLEAN __tmp__QUD,result__E5EH,result__H5EH,__tmp__SZD;
+  __BOOLEAN result__K5EH,__tmp__TZD,__tmp__U1D,__tmp__15D;
+  pos2__KSD= 0;
+  key__LSD=NULL;
+  short_line__MSD= 0;
+  level_comment__NSD= 0;
+  pos__JSD=position__0BC;
+  posold__ISD=(__INTEGER)(-  1);
+  while ((posold__ISD != position__0BC)) {
+    posold__ISD=position__0BC;
+    if (is_shorter__FZ) {
+      while (((position__0BC >  2) && (((__INTEGER_8 )((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC -  1) -  1)]) <= ((__INTEGER_8 )' ')))) {
+        position__0BC=(__INTEGER)(position__0BC -  1);
+      };
+      short_line__MSD= 0;
+    };
+    until_do__1NI:
     {
-      result__RACH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__RACH=((__CHARACTER )(( 0)));
+      result__DADH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__DADH=((__CHARACTER )(( 0)));
       } else {
-        result__RACH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__DADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__RACH == ((__CHARACTER )(( 0))))) {
-        __tmp__IUD=TRUE__;
+      if ((result__DADH == ((__CHARACTER )(( 0))))) {
+        __tmp__QUD=TRUE__;
       } else {
-        result__4ACH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__4ACH=((__CHARACTER )(( 0)));
+        result__QADH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__QADH=((__CHARACTER )(( 0)));
         } else {
-          result__4ACH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__QADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__IUD=(((__INTEGER_8 )result__4ACH) > ((__INTEGER_8 )' '));
+        __tmp__QUD=(((__INTEGER_8 )result__QADH) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__IUD)) {
-        if (is_shorter__5Y) {
-          result__HBCH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__HBCH=((__CHARACTER )(( 0)));
+      if ((! __tmp__QUD)) {
+        if (is_shorter__FZ) {
+          result__ZADH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__ZADH=((__CHARACTER )(( 0)));
           } else {
-            result__HBCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__ZADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__HBCH == '\n')) {
-            short_line__ESD=(__INTEGER)(short_line__ESD +  1);
-            if ((short_line__ESD ==  2)) {
-              key_comment_default__ACC=(&__string_127);
+          if ((result__ZADH == '\n')) {
+            short_line__MSD=(__INTEGER)(short_line__MSD +  1);
+            if ((short_line__MSD ==  2)) {
+              key_comment_default__ICC=(&__string_127);
               if (is_shorter2__VI) {
-                is_catch_comment__AXC=FALSE__;
+                is_catch_comment__IXC=FALSE__;
               };
             };
           };
         };
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto until_do__TNI;
-      };
-    };
-    if ((position__SBC < ((__STRING *)source__PBC)->count__WFC)) {
-      result__QBCH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__QBCH=((__CHARACTER )(( 0)));
-      } else {
-        result__QBCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-      };
-      if (((result__QBCH == '/') & (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '/'))) {
-        position__SBC=(__INTEGER)(position__SBC +  2);
-        pos2__CSD=position__SBC;
-        if (is_shorter__5Y) {
-          if (is_active_short__4BC) {
-            begin__C51G=(__INTEGER)(position__SBC -  2);
-            end__D51G=(__INTEGER)(position__SBC -  1);
-            Self__MDHH=((__STRING *)output_code__SI);
-            start__JDHH=(__INTEGER)(begin__C51G + short_derive__BCC);
-            end__IDHH=(__INTEGER)(end__D51G + short_derive__BCC);
-            len__KDHH=(__INTEGER)((__INTEGER)(end__IDHH - start__JDHH) +  1);
-            if ((len__KDHH >  0)) {
-              __tmp__LDHH=(__INTEGER)(end__IDHH +  1);
-              __tmp__NDHH=Self__MDHH->count__WFC;
-              Self__ODHH=__tmp__LDHH;
-              while ((Self__ODHH <= __tmp__NDHH)) {
-                ((__CHARACTER *)Self__MDHH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__ODHH - len__KDHH) -  1)]=((__CHARACTER *)Self__MDHH->storage__BCS)[(__INTEGER)(Self__ODHH -  1)];
-                Self__ODHH=(__INTEGER)(Self__ODHH +  1);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto until_do__1NI;
+      };
+    };
+    if ((position__0BC < ((__STRING *)source__XBC)->count__4FC)) {
+      result__CBDH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__CBDH=((__CHARACTER )(( 0)));
+      } else {
+        result__CBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      };
+      if (((result__CBDH == '/') & (((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC +  1) -  1)] == '/'))) {
+        position__0BC=(__INTEGER)(position__0BC +  2);
+        pos2__KSD=position__0BC;
+        if (is_shorter__FZ) {
+          if (is_active_short__GCC) {
+            begin__U22G=(__INTEGER)(position__0BC -  2);
+            end__V22G=(__INTEGER)(position__0BC -  1);
+            Self__HFIH=((__STRING *)output_code__SI);
+            start__EFIH=(__INTEGER)(begin__U22G + short_derive__JCC);
+            end__DFIH=(__INTEGER)(end__V22G + short_derive__JCC);
+            len__FFIH=(__INTEGER)((__INTEGER)(end__DFIH - start__EFIH) +  1);
+            if ((len__FFIH >  0)) {
+              __tmp__GFIH=(__INTEGER)(end__DFIH +  1);
+              __tmp__IFIH=Self__HFIH->count__4FC;
+              Self__JFIH=__tmp__GFIH;
+              while ((Self__JFIH <= __tmp__IFIH)) {
+                ((__CHARACTER *)Self__HFIH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__JFIH - len__FFIH) -  1)]=((__CHARACTER *)Self__HFIH->storage__JCS)[(__INTEGER)(Self__JFIH -  1)];
+                Self__JFIH=(__INTEGER)(Self__JFIH +  1);
               };
-              Self__MDHH->count__WFC=(__INTEGER)(Self__MDHH->count__WFC - len__KDHH);
+              Self__HFIH->count__4FC=(__INTEGER)(Self__HFIH->count__4FC - len__FFIH);
             };
-            short_derive__BCC=(__INTEGER)(short_derive__BCC - (__INTEGER)((__INTEGER)(end__D51G - begin__C51G) +  1));
-            while_do__XFMD:
+            short_derive__JCC=(__INTEGER)(short_derive__JCC - (__INTEGER)((__INTEGER)(end__V22G - begin__U22G) +  1));
+            while_do__5FMD:
             {
-              result__3BCH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__3BCH=((__CHARACTER )(( 0)));
+              result__PBDH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__PBDH=((__CHARACTER )(( 0)));
               } else {
-                result__3BCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__PBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__3BCH == ' ')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                goto while_do__XFMD;
+              if ((result__PBDH == ' ')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                goto while_do__5FMD;
               };
             };
-            result__GCCH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__GCCH=((__CHARACTER )(( 0)));
+            result__YBDH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__YBDH=((__CHARACTER )(( 0)));
             } else {
-              result__GCCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__YBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__GCCH == '*')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              while_do__PMND:
+            if ((result__YBDH == '*')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              while_do__XMND:
               {
-                result__PCCH='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__PCCH=((__CHARACTER )(( 0)));
+                result__BCDH='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__BCDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__PCCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__BCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__PCCH == ' ')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  goto while_do__PMND;
+                if ((result__BCDH == ' ')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  goto while_do__XMND;
                 };
               };
-              result__YCCH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__YCCH=((__CHARACTER )(( 0)));
+              result__KCDH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__KCDH=((__CHARACTER )(( 0)));
               } else {
-                result__YCCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__KCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              result__J4DH=FALSE__;
-              if ((((__INTEGER_8 )result__YCCH) >= ((__INTEGER_8 )'a'))) {
-                result__J4DH=(((__INTEGER_8 )result__YCCH) <= ((__INTEGER_8 )'z'));
+              result__E5EH=FALSE__;
+              if ((((__INTEGER_8 )result__KCDH) >= ((__INTEGER_8 )'a'))) {
+                result__E5EH=(((__INTEGER_8 )result__KCDH) <= ((__INTEGER_8 )'z'));
               };
-              if (result__J4DH) {
-                ((__STRING *)string_tmp__VH)->count__WFC= 0;
+              if (result__E5EH) {
+                ((__STRING *)string_tmp__VH)->count__4FC= 0;
                 do {
-                  result__GDCH='\0';
-                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                    result__GDCH=((__CHARACTER )(( 0)));
+                  result__YCDH='\0';
+                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                    result__YCDH=((__CHARACTER )(( 0)));
                   } else {
-                    result__GDCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                    result__YCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                   };
-                  add_last__ZLT(string_tmp__VH,result__GDCH);
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  result__PDCH='\0';
-                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                    result__PDCH=((__CHARACTER )(( 0)));
+                  add_last__BMT(string_tmp__VH,result__YCDH);
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  result__BDDH='\0';
+                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                    result__BDDH=((__CHARACTER )(( 0)));
                   } else {
-                    result__PDCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                    result__BDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                   };
-                  result__L4DH=FALSE__;
-                  if ((((__INTEGER_8 )result__PDCH) >= ((__INTEGER_8 )'a'))) {
-                    result__L4DH=(((__INTEGER_8 )result__PDCH) <= ((__INTEGER_8 )'z'));
+                  result__H5EH=FALSE__;
+                  if ((((__INTEGER_8 )result__BDDH) >= ((__INTEGER_8 )'a'))) {
+                    result__H5EH=(((__INTEGER_8 )result__BDDH) <= ((__INTEGER_8 )'z'));
                   };
-                  if (result__L4DH) {
-                    __tmp__KZD=TRUE__;
+                  if (result__H5EH) {
+                    __tmp__SZD=TRUE__;
                   } else {
-                    result__YDCH='\0';
-                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                      result__YDCH=((__CHARACTER )(( 0)));
+                    result__KDDH='\0';
+                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                      result__KDDH=((__CHARACTER )(( 0)));
                     } else {
-                      result__YDCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                      result__KDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                     };
-                    result__N4DH=FALSE__;
-                    if ((((__INTEGER_8 )result__YDCH) >= ((__INTEGER_8 )'0'))) {
-                      result__N4DH=(((__INTEGER_8 )result__YDCH) <= ((__INTEGER_8 )'9'));
+                    result__K5EH=FALSE__;
+                    if ((((__INTEGER_8 )result__KDDH) >= ((__INTEGER_8 )'0'))) {
+                      result__K5EH=(((__INTEGER_8 )result__KDDH) <= ((__INTEGER_8 )'9'));
                     };
-                    __tmp__KZD=result__N4DH;
+                    __tmp__SZD=result__K5EH;
                   };
-                  if (__tmp__KZD) {
-                    __tmp__LZD=TRUE__;
+                  if (__tmp__SZD) {
+                    __tmp__TZD=TRUE__;
                   } else {
-                    result__BECH='\0';
-                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                      result__BECH=((__CHARACTER )(( 0)));
+                    result__TDDH='\0';
+                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                      result__TDDH=((__CHARACTER )(( 0)));
                     } else {
-                      result__BECH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                      result__TDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                     };
-                    __tmp__LZD=(result__BECH == '_');
+                    __tmp__TZD=(result__TDDH == '_');
                   };
-                } while (__tmp__LZD);
-                while_do__DMAE:
+                } while (__tmp__TZD);
+                while_do__AKAE:
                 {
-                  result__KECH='\0';
-                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                    result__KECH=((__CHARACTER )(( 0)));
+                  result__2DDH='\0';
+                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                    result__2DDH=((__CHARACTER )(( 0)));
                   } else {
-                    result__KECH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                    result__2DDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                   };
-                  if ((result__KECH == ' ')) {
-                    position__SBC=(__INTEGER)(position__SBC +  1);
-                    goto while_do__DMAE;
+                  if ((result__2DDH == ' ')) {
+                    position__0BC=(__INTEGER)(position__0BC +  1);
+                    goto while_do__AKAE;
                   };
                 };
-                result__TECH='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__TECH=((__CHARACTER )(( 0)));
+                result__FEDH='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__FEDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__TECH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__FEDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__TECH == ':')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  key__DSD=get__IWB(string_tmp__VH);
-                  begin__JFMD=(__INTEGER)(pos2__CSD +  1);
-                  Self__VDHH=((__STRING *)output_code__SI);
-                  start__SDHH=(__INTEGER)(begin__JFMD + short_derive__BCC);
-                  end__RDHH=(__INTEGER)(position__SBC + short_derive__BCC);
-                  len__TDHH=(__INTEGER)((__INTEGER)(end__RDHH - start__SDHH) +  1);
-                  if ((len__TDHH >  0)) {
-                    __tmp__UDHH=(__INTEGER)(end__RDHH +  1);
-                    __tmp__WDHH=Self__VDHH->count__WFC;
-                    Self__XDHH=__tmp__UDHH;
-                    while ((Self__XDHH <= __tmp__WDHH)) {
-                      ((__CHARACTER *)Self__VDHH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__XDHH - len__TDHH) -  1)]=((__CHARACTER *)Self__VDHH->storage__BCS)[(__INTEGER)(Self__XDHH -  1)];
-                      Self__XDHH=(__INTEGER)(Self__XDHH +  1);
+                if ((result__FEDH == ':')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  key__LSD=get__QWB(string_tmp__VH);
+                  begin__RFMD=(__INTEGER)(pos2__KSD +  1);
+                  Self__QFIH=((__STRING *)output_code__SI);
+                  start__NFIH=(__INTEGER)(begin__RFMD + short_derive__JCC);
+                  end__MFIH=(__INTEGER)(position__0BC + short_derive__JCC);
+                  len__OFIH=(__INTEGER)((__INTEGER)(end__MFIH - start__NFIH) +  1);
+                  if ((len__OFIH >  0)) {
+                    __tmp__PFIH=(__INTEGER)(end__MFIH +  1);
+                    __tmp__RFIH=Self__QFIH->count__4FC;
+                    Self__SFIH=__tmp__PFIH;
+                    while ((Self__SFIH <= __tmp__RFIH)) {
+                      ((__CHARACTER *)Self__QFIH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__SFIH - len__OFIH) -  1)]=((__CHARACTER *)Self__QFIH->storage__JCS)[(__INTEGER)(Self__SFIH -  1)];
+                      Self__SFIH=(__INTEGER)(Self__SFIH +  1);
                     };
-                    Self__VDHH->count__WFC=(__INTEGER)(Self__VDHH->count__WFC - len__TDHH);
+                    Self__QFIH->count__4FC=(__INTEGER)(Self__QFIH->count__4FC - len__OFIH);
                   };
-                  short_derive__BCC=(__INTEGER)(short_derive__BCC - (__INTEGER)((__INTEGER)(position__SBC - begin__JFMD) +  1));
-                  pos2__CSD=position__SBC;
+                  short_derive__JCC=(__INTEGER)(short_derive__JCC - (__INTEGER)((__INTEGER)(position__0BC - begin__RFMD) +  1));
+                  pos2__KSD=position__0BC;
                 };
               };
             };
           };
         };
-        if (is_catch_comment__AXC) {
-          add_last__ZLT(last_comment__00D,'\t');
+        if (is_catch_comment__IXC) {
+          add_last__BMT(last_comment__C1D,'\t');
         };
-        until_do__AACD:
+        until_do__IACD:
         {
-          result__2ECH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__2ECH=((__CHARACTER )(( 0)));
+          result__OEDH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__OEDH=((__CHARACTER )(( 0)));
           } else {
-            result__2ECH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__OEDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__2ECH == ((__CHARACTER )(( 0))))) {
-            __tmp__M1D=TRUE__;
+          if ((result__OEDH == ((__CHARACTER )(( 0))))) {
+            __tmp__U1D=TRUE__;
           } else {
-            result__JFCH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__JFCH=((__CHARACTER )(( 0)));
+            result__1EDH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__1EDH=((__CHARACTER )(( 0)));
             } else {
-              result__JFCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__1EDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            __tmp__M1D=(result__JFCH == '\n');
+            __tmp__U1D=(result__1EDH == '\n');
           };
-          if ((! __tmp__M1D)) {
-            if (is_catch_comment__AXC) {
-              result__SFCH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__SFCH=((__CHARACTER )(( 0)));
+          if ((! __tmp__U1D)) {
+            if (is_catch_comment__IXC) {
+              result__EFDH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__EFDH=((__CHARACTER )(( 0)));
               } else {
-                result__SFCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__EFDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              add_last__ZLT(last_comment__00D,result__SFCH);
+              add_last__BMT(last_comment__C1D,result__EFDH);
             };
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            goto until_do__AACD;
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            goto until_do__IACD;
           };
         };
-        if (is_catch_comment__AXC) {
-          add_last__ZLT(last_comment__00D,'\n');
+        if (is_catch_comment__IXC) {
+          add_last__BMT(last_comment__C1D,'\n');
         };
-        if (((void *)key_comment_default__ACC == (void *)(&__string_128))) {
-          __tmp__R2D=last_slot__Q2D;
-          __tmp__U2D=get__IWB(last_comment__00D);
-          if (((struct ___OBJ *)__tmp__R2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)__tmp__R2D)->comment__WJJD=__tmp__U2D;
+        if (((void *)key_comment_default__ICC == (void *)(&__string_128))) {
+          __tmp__Z2D=last_slot__Y2D;
+          __tmp__22D=get__QWB(last_comment__C1D);
+          if (((struct ___OBJ *)__tmp__Z2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)__tmp__Z2D)->comment__4JJD=__tmp__22D;
           } else {
-            ((__ITM_SLOT_OPERATOR *)__tmp__R2D)->parent_itm_slot__OU5B.comment__WJJD=__tmp__U2D;
+            ((__ITM_SLOT_OPERATOR *)__tmp__Z2D)->parent_itm_slot__WU5B.comment__4JJD=__tmp__22D;
           };
         };
-        if (((void *)key__DSD == (void *)NULL)) {
-          short__token__to__LBD(key_comment_default__ACC,pos2__CSD,position__SBC);
+        if (((void *)key__LSD == (void *)NULL)) {
+          short__token__to__TBD(key_comment_default__ICC,pos2__KSD,position__0BC);
         } else {
-          short__token__to__LBD(key__DSD,pos2__CSD,position__SBC);
+          short__token__to__TBD(key__LSD,pos2__KSD,position__0BC);
         };
       };
     };
-    if ((position__SBC < ((__STRING *)source__PBC)->count__WFC)) {
-      pos2__CSD=position__SBC;
-      result__1FCH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__1FCH=((__CHARACTER )(( 0)));
+    if ((position__0BC < ((__STRING *)source__XBC)->count__4FC)) {
+      pos2__KSD=position__0BC;
+      result__NFDH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__NFDH=((__CHARACTER )(( 0)));
       } else {
-        result__1FCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__NFDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if (((result__1FCH == '/') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '*'))) {
-        position__SBC=(__INTEGER)(position__SBC +  2);
-        level_comment__FSD= 1;
-        until_do__KU2D:
+      if (((result__NFDH == '/') && (((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC +  1) -  1)] == '*'))) {
+        position__0BC=(__INTEGER)(position__0BC +  2);
+        level_comment__NSD= 1;
+        until_do__FU2D:
         {
-          result__IGCH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__IGCH=((__CHARACTER )(( 0)));
+          result__0FDH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__0FDH=((__CHARACTER )(( 0)));
           } else {
-            result__IGCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__0FDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((! ((result__IGCH == ((__CHARACTER )(( 0)))) || (level_comment__FSD ==  0)))) {
-            result__VGCH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__VGCH=((__CHARACTER )(( 0)));
+          if ((! ((result__0FDH == ((__CHARACTER )(( 0)))) || (level_comment__NSD ==  0)))) {
+            result__HGDH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__HGDH=((__CHARACTER )(( 0)));
             } else {
-              result__VGCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__HGDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if (((result__VGCH == '/') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '*'))) {
-              level_comment__FSD=(__INTEGER)(level_comment__FSD +  1);
-              position__SBC=(__INTEGER)(position__SBC +  2);
-              __tmp__T5D=TRUE__;
+            if (((result__HGDH == '/') && (((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC +  1) -  1)] == '*'))) {
+              level_comment__NSD=(__INTEGER)(level_comment__NSD +  1);
+              position__0BC=(__INTEGER)(position__0BC +  2);
+              __tmp__15D=TRUE__;
             } else {
-              __tmp__T5D=FALSE__;
+              __tmp__15D=FALSE__;
             };
-            if ((! __tmp__T5D)) {
-              result__CHCH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__CHCH=((__CHARACTER )(( 0)));
+            if ((! __tmp__15D)) {
+              result__UGDH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__UGDH=((__CHARACTER )(( 0)));
               } else {
-                result__CHCH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__UGDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if (((result__CHCH == '*') && (((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)] == '/'))) {
-                level_comment__FSD=(__INTEGER)(level_comment__FSD -  1);
-                position__SBC=(__INTEGER)(position__SBC +  2);
+              if (((result__UGDH == '*') && (((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC +  1) -  1)] == '/'))) {
+                level_comment__NSD=(__INTEGER)(level_comment__NSD -  1);
+                position__0BC=(__INTEGER)(position__0BC +  2);
               } else {
-                position__SBC=(__INTEGER)(position__SBC +  1);
+                position__0BC=(__INTEGER)(position__0BC +  1);
               };
             };
-            goto until_do__KU2D;
+            goto until_do__FU2D;
           };
         };
-        if ((level_comment__FSD !=  0)) {
-          position__SBC=pos2__CSD;
-          pos__EEUG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_206));
-          put_position__UOG(pos__EEUG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((level_comment__NSD !=  0)) {
+          position__0BC=pos2__KSD;
+          pos__UAVG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_204));
+          put_position__2OG(pos__UAVG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__LBD((&__string_70),pos2__CSD,position__SBC);
+        short__token__to__TBD((&__string_70),pos2__KSD,position__0BC);
       };
     };
   };
-  begin_position__LBE=position__SBC;
-  result__Y5E='\0';
-  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-    result__Y5E=((__CHARACTER )(( 0)));
+  begin_position__TBE=position__0BC;
+  result__AAF='\0';
+  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+    result__AAF=((__CHARACTER )(( 0)));
   } else {
-    result__Y5E=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    result__AAF=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
   };
-  return(((position__SBC != pos__BSD) | (result__Y5E != ((__CHARACTER )(( 0))))));
+  return(((position__0BC != pos__JSD) | (result__AAF != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__LAL()
+static __BOOLEAN read_identifier__TAL()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__PAL,idx__QAL;
-  __POSITION pos__UF0G;
-  __BOOLEAN result__OAL,__tmp__3AL,result__52DH,__tmp__NCL,result__B3DH;
-  __BOOLEAN result__D3DH,__tmp__JCL,__tmp__KCL;
-  __CHARACTER result__T2BH,result__B3BH,result__O3BH,result__X3BH;
-  __CHARACTER result__A4BH,result__J4BH;
-  result__OAL=FALSE__;
-  posold__PAL= 0;
-  idx__QAL= 0;
-  if ((! read_space__3RD())) {
-    __tmp__3AL=TRUE__;
+  __INTEGER posold__XAL,idx__YAL;
+  __POSITION pos__DD1G;
+  __BOOLEAN result__WAL,__tmp__FBL,result__X3EH,__tmp__VCL,result__03EH;
+  __BOOLEAN result__33EH,__tmp__RCL,__tmp__SCL;
+  __CHARACTER result__F2CH,result__T2CH,result__A3CH,result__J3CH;
+  __CHARACTER result__S3CH,result__13CH;
+  result__WAL=FALSE__;
+  posold__XAL= 0;
+  idx__YAL= 0;
+  if ((! read_space__FSD())) {
+    __tmp__FBL=TRUE__;
   } else {
-    result__T2BH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__T2BH=((__CHARACTER )(( 0)));
+    result__F2CH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__F2CH=((__CHARACTER )(( 0)));
     } else {
-      result__T2BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__F2CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    result__52DH=FALSE__;
-    if ((((__INTEGER_8 )result__T2BH) >= ((__INTEGER_8 )'a'))) {
-      result__52DH=(((__INTEGER_8 )result__T2BH) <= ((__INTEGER_8 )'z'));
+    result__X3EH=FALSE__;
+    if ((((__INTEGER_8 )result__F2CH) >= ((__INTEGER_8 )'a'))) {
+      result__X3EH=(((__INTEGER_8 )result__F2CH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__3AL=(! result__52DH);
+    __tmp__FBL=(! result__X3EH);
   };
-  if (__tmp__3AL) {
-    result__OAL=FALSE__;
+  if (__tmp__FBL) {
+    result__WAL=FALSE__;
   } else {
-    posold__PAL=position__SBC;
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    until_do__CJZE:
+    posold__XAL=position__0BC;
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    until_do__FJZE:
     {
-      result__B3BH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__B3BH=((__CHARACTER )(( 0)));
+      result__T2CH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__T2CH=((__CHARACTER )(( 0)));
       } else {
-        result__B3BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__T2CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__B3BH == ((__CHARACTER )(( 0))))) {
-        __tmp__NCL=TRUE__;
+      if ((result__T2CH == ((__CHARACTER )(( 0))))) {
+        __tmp__VCL=TRUE__;
       } else {
-        result__O3BH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__O3BH=((__CHARACTER )(( 0)));
+        result__A3CH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__A3CH=((__CHARACTER )(( 0)));
         } else {
-          result__O3BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__A3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        result__B3DH=FALSE__;
-        if ((((__INTEGER_8 )result__O3BH) >= ((__INTEGER_8 )'a'))) {
-          result__B3DH=(((__INTEGER_8 )result__O3BH) <= ((__INTEGER_8 )'z'));
+        result__03EH=FALSE__;
+        if ((((__INTEGER_8 )result__A3CH) >= ((__INTEGER_8 )'a'))) {
+          result__03EH=(((__INTEGER_8 )result__A3CH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__B3DH)) {
-          result__X3BH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__X3BH=((__CHARACTER )(( 0)));
+        if ((! result__03EH)) {
+          result__J3CH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__J3CH=((__CHARACTER )(( 0)));
           } else {
-            result__X3BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__J3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          result__D3DH=FALSE__;
-          if ((((__INTEGER_8 )result__X3BH) >= ((__INTEGER_8 )'0'))) {
-            result__D3DH=(((__INTEGER_8 )result__X3BH) <= ((__INTEGER_8 )'9'));
+          result__33EH=FALSE__;
+          if ((((__INTEGER_8 )result__J3CH) >= ((__INTEGER_8 )'0'))) {
+            result__33EH=(((__INTEGER_8 )result__J3CH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__JCL=(! result__D3DH);
+          __tmp__RCL=(! result__33EH);
         } else {
-          __tmp__JCL=FALSE__;
+          __tmp__RCL=FALSE__;
         };
-        if (__tmp__JCL) {
-          result__A4BH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__A4BH=((__CHARACTER )(( 0)));
+        if (__tmp__RCL) {
+          result__S3CH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__S3CH=((__CHARACTER )(( 0)));
           } else {
-            result__A4BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__S3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__KCL=(result__A4BH != '_');
+          __tmp__SCL=(result__S3CH != '_');
         } else {
-          __tmp__KCL=FALSE__;
+          __tmp__SCL=FALSE__;
         };
-        __tmp__NCL=__tmp__KCL;
+        __tmp__VCL=__tmp__SCL;
       };
-      if ((! __tmp__NCL)) {
-        result__J4BH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__J4BH=((__CHARACTER )(( 0)));
+      if ((! __tmp__VCL)) {
+        result__13CH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__13CH=((__CHARACTER )(( 0)));
         } else {
-          result__J4BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__13CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__J4BH);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto until_do__CJZE;
+        add_last__BMT(string_tmp__VH,result__13CH);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto until_do__FJZE;
       };
     };
-    if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
-      idx__QAL=first_substring_index__JIZE(string_tmp__VH);
-      if ((idx__QAL !=  0)) {
-        position__SBC=(__INTEGER)(posold__PAL + idx__QAL);
-        pos__UF0G=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_207));
-        put_position__UOG(pos__UF0G);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    if ((((__STRING *)string_tmp__VH)->count__4FC !=  0)) {
+      idx__YAL=first_substring_index__MIZE(string_tmp__VH);
+      if ((idx__YAL !=  0)) {
+        position__0BC=(__INTEGER)(posold__XAL + idx__YAL);
+        pos__DD1G=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_205));
+        put_position__2OG(pos__DD1G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      last_string__I0C=get__IWB(string_tmp__VH);
-      result__OAL=TRUE__;
+      last_string__Q0C=get__QWB(string_tmp__VH);
+      result__WAL=TRUE__;
     };
   };
-  return(result__OAL);
+  return(result__WAL);
 }
 
-static __POSITION current_position__JXF()
+static __POSITION current_position__RXF()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__MXF;
-  result__MXF=((__POSITION ) 0);
-  while ((pos_cur__VBC != position__SBC)) {
-    if ((((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(pos_cur__VBC -  1)] == '\n')) {
-      pos_col__XBC= 0;
-      pos_line__WBC=(__INTEGER)(pos_line__WBC +  1);
-    } else {
-      pos_col__XBC=(__INTEGER)(pos_col__XBC +  1);
-    };
-    pos_cur__VBC=(__INTEGER)(pos_cur__VBC +  1);
-  };
-  if ((pos_line__WBC >  32767)) {
-    result__MXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__XBC <<  9))) |  4294836224LU));
-    put_error__text__KNG( 0,(&__string_208));
-    put_position__UOG(result__MXF);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  __POSITION result__UXF;
+  result__UXF=((__POSITION ) 0);
+  while ((pos_cur__3BC != position__0BC)) {
+    if ((((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(pos_cur__3BC -  1)] == '\n')) {
+      pos_col__5BC= 0;
+      pos_line__4BC=(__INTEGER)(pos_line__4BC +  1);
+    } else {
+      pos_col__5BC=(__INTEGER)(pos_col__5BC +  1);
+    };
+    pos_cur__3BC=(__INTEGER)(pos_cur__3BC +  1);
+  };
+  if ((pos_line__4BC >  32767)) {
+    result__UXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__RBC)->index__3MG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__5BC <<  9))) |  4294836224LU));
+    put_error__text__SNG( 0,(&__string_206));
+    put_position__2OG(result__UXF);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  if ((pos_col__XBC >  255)) {
-    result__MXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__WBC <<  17))));
-    put_error__text__KNG( 0,(&__string_209));
-    put_position__UOG(result__MXF);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((pos_col__5BC >  255)) {
+    result__UXF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__RBC)->index__3MG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__4BC <<  17))));
+    put_error__text__SNG( 0,(&__string_207));
+    put_position__2OG(result__UXF);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__JBC)->index__VMG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__XBC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__WBC <<  17)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__RBC)->index__3MG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__5BC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__4BC <<  17)))));
 }
 
-static void put_error__text__KNG(__INTEGER type__MNG,void *txt__NNG)
+static void put_error__text__SNG(__INTEGER type__UNG,void *txt__VNG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__ONG=type__MNG;
-  ((__STRING *)msg_err__PNG)->count__WFC= 0;
-  if ((type__MNG ==  0)) {
-    append__BOS(msg_err__PNG,(&__string_210));
+  type_error__WNG=type__UNG;
+  ((__STRING *)msg_err__XNG)->count__4FC= 0;
+  if ((type__UNG ==  0)) {
+    append__JOS(msg_err__XNG,(&__string_208));
   };
-  if ((type__MNG ==  1)) {
-    append__BOS(msg_err__PNG,(&__string_211));
+  if ((type__UNG ==  1)) {
+    append__JOS(msg_err__XNG,(&__string_209));
   };
-  if ((type__MNG ==  2)) {
-    append__BOS(msg_err__PNG,(&__string_212));
+  if ((type__UNG ==  2)) {
+    append__JOS(msg_err__XNG,(&__string_210));
   };
-  if ((type__MNG ==  3)) {
-    append__BOS(msg_err__PNG,(&__string_213));
+  if ((type__UNG ==  3)) {
+    append__JOS(msg_err__XNG,(&__string_211));
   };
-  append__BOS(msg_err__PNG,txt__NNG);
+  append__JOS(msg_err__XNG,txt__VNG);
 }
 
-static void put_position__UOG(__POSITION Self__VOG)
+static void put_position__2OG(__POSITION Self__3OG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __UINTEGER_32 c__XOG,__tmp__5PG,cols__0OG;
-  void *src__3OG;
-  __INTEGER pos__WOG,Self__MLH,limit_up__NLH;
-  __CHARACTER char__4OG;
-  c__XOG= 0;
-  char__4OG='\0';
-  append__BOS(msg_err__PNG,(&__string_214));
-  append_in__OIH((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  17),msg_err__PNG);
-  append__BOS(msg_err__PNG,(&__string_215));
-  append_in__OIH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  9) &  255),msg_err__PNG);
-  append__BOS(msg_err__PNG,(&__string_216));
-  append__BOS(msg_err__PNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->parent_named__5.name__LI);
-  add_last__ZLT(msg_err__PNG,'(');
-  append__BOS(msg_err__PNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->filename__UPG);
-  append__BOS(msg_err__PNG,(&__string_217));
-  src__3OG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__VOG)) &  511)])->source__NBC;
-  pos__WOG= 1;
-  __tmp__5PG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  17) -  1);
-  Self__MLH= 1;
-  limit_up__NLH=((__INTEGER )__tmp__5PG);
-  while ((Self__MLH <= limit_up__NLH)) {
-    while ((((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)] != '\n')) {
-      pos__WOG=(__INTEGER)(pos__WOG +  1);
-    };
-    pos__WOG=(__INTEGER)(pos__WOG +  1);
-    Self__MLH=(__INTEGER)(Self__MLH +  1);
-  };
-  ((__STRING *)string_tmp__VH)->count__WFC= 0;
-  cols__0OG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__VOG) >>  9) &  255);
-  while ((! ((pos__WOG > ((__STRING *)src__3OG)->count__WFC) || (((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)] == '\n')))) {
-    char__4OG=((__CHARACTER *)((__STRING *)src__3OG)->storage__BCS)[(__INTEGER)(pos__WOG -  1)];
-    add_last__ZLT(msg_err__PNG,char__4OG);
-    if ((c__XOG < cols__0OG)) {
-      if ((char__4OG == '\t')) {
-        add_last__ZLT(string_tmp__VH,'\t');
-      } else {
-        add_last__ZLT(string_tmp__VH,' ');
-      };
-    };
-    c__XOG=(__UINTEGER_32)(c__XOG +  1);
-    pos__WOG=(__INTEGER)(pos__WOG +  1);
-  };
-  add_last__ZLT(msg_err__PNG,'\n');
-  append__BOS(msg_err__PNG,string_tmp__VH);
-  append__BOS(msg_err__PNG,(&__string_218));
+  __UINTEGER_32 c__5OG,__tmp__HQG,cols__CPG;
+  void *src__FPG;
+  __INTEGER pos__4OG,Self__ULH,limit_up__VLH;
+  __CHARACTER char__GPG;
+  c__5OG= 0;
+  char__GPG='\0';
+  append__JOS(msg_err__XNG,(&__string_212));
+  append_in__WIH((__UINTEGER_32)(((__UINTEGER_32 )Self__3OG) >>  17),msg_err__XNG);
+  append__JOS(msg_err__XNG,(&__string_213));
+  append_in__WIH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__3OG) >>  9) &  255),msg_err__XNG);
+  append__JOS(msg_err__XNG,(&__string_214));
+  append__JOS(msg_err__XNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__3OG)) &  511)])->parent_named__5.name__LI);
+  add_last__BMT(msg_err__XNG,'(');
+  append__JOS(msg_err__XNG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__3OG)) &  511)])->filename__2PG);
+  append__JOS(msg_err__XNG,(&__string_215));
+  src__FPG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__3OG)) &  511)])->source__VBC;
+  pos__4OG= 1;
+  __tmp__HQG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__3OG) >>  17) -  1);
+  Self__ULH= 1;
+  limit_up__VLH=((__INTEGER )__tmp__HQG);
+  while ((Self__ULH <= limit_up__VLH)) {
+    while ((((__CHARACTER *)((__STRING *)src__FPG)->storage__JCS)[(__INTEGER)(pos__4OG -  1)] != '\n')) {
+      pos__4OG=(__INTEGER)(pos__4OG +  1);
+    };
+    pos__4OG=(__INTEGER)(pos__4OG +  1);
+    Self__ULH=(__INTEGER)(Self__ULH +  1);
+  };
+  ((__STRING *)string_tmp__VH)->count__4FC= 0;
+  cols__CPG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__3OG) >>  9) &  255);
+  while ((! ((pos__4OG > ((__STRING *)src__FPG)->count__4FC) || (((__CHARACTER *)((__STRING *)src__FPG)->storage__JCS)[(__INTEGER)(pos__4OG -  1)] == '\n')))) {
+    char__GPG=((__CHARACTER *)((__STRING *)src__FPG)->storage__JCS)[(__INTEGER)(pos__4OG -  1)];
+    add_last__BMT(msg_err__XNG,char__GPG);
+    if ((c__5OG < cols__CPG)) {
+      if ((char__GPG == '\t')) {
+        add_last__BMT(string_tmp__VH,'\t');
+      } else {
+        add_last__BMT(string_tmp__VH,' ');
+      };
+    };
+    c__5OG=(__UINTEGER_32)(c__5OG +  1);
+    pos__4OG=(__INTEGER)(pos__4OG +  1);
+  };
+  add_last__BMT(msg_err__XNG,'\n');
+  append__JOS(msg_err__XNG,string_tmp__VH);
+  append__JOS(msg_err__XNG,(&__string_216));
 }
 
-static __BOOLEAN read_symbol__DXJ(void *st__FXJ)
+static __BOOLEAN read_symbol__LXJ(void *st__NXJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__HXJ,j__IXJ;
-  __BOOLEAN result__JXJ,__tmp__RYJ,__tmp__OYJ;
-  __CHARACTER result__P5BH,result__25BH;
-  posold__HXJ= 0;
-  j__IXJ= 0;
-  result__JXJ=FALSE__;
-  if ((! read_space__3RD())) {
-    result__JXJ=FALSE__;
+  __INTEGER posold__PXJ,j__QXJ;
+  __BOOLEAN result__RXJ,__tmp__ZYJ,__tmp__WYJ;
+  __CHARACTER result__B5CH,result__O5CH;
+  posold__PXJ= 0;
+  j__QXJ= 0;
+  result__RXJ=FALSE__;
+  if ((! read_space__FSD())) {
+    result__RXJ=FALSE__;
   } else {
-    posold__HXJ=position__SBC;
-    j__IXJ= 1;
-    until_do__4C5:
+    posold__PXJ=position__0BC;
+    j__QXJ= 1;
+    until_do__GD5:
     {
-      result__P5BH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__P5BH=((__CHARACTER )(( 0)));
+      result__B5CH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__B5CH=((__CHARACTER )(( 0)));
       } else {
-        result__P5BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__B5CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__P5BH == ((__CHARACTER )(( 0))))) {
-        __tmp__RYJ=TRUE__;
+      if ((result__B5CH == ((__CHARACTER )(( 0))))) {
+        __tmp__ZYJ=TRUE__;
       } else {
-        if ((j__IXJ > ((__STRING_CONSTANT *)st__FXJ)->count__DD)) {
-          __tmp__OYJ=TRUE__;
+        if ((j__QXJ > ((__STRING_CONSTANT *)st__NXJ)->count__DD)) {
+          __tmp__WYJ=TRUE__;
         } else {
-          result__25BH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__25BH=((__CHARACTER )(( 0)));
+          result__O5CH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__O5CH=((__CHARACTER )(( 0)));
           } else {
-            result__25BH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__O5CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__OYJ=(result__25BH != ((__CHARACTER *)((__STRING_CONSTANT *)st__FXJ)->storage__VQO)[(__INTEGER)(j__IXJ -  1)]);
+          __tmp__WYJ=(result__O5CH != ((__CHARACTER *)((__STRING_CONSTANT *)st__NXJ)->storage__3QO)[(__INTEGER)(j__QXJ -  1)]);
         };
-        __tmp__RYJ=__tmp__OYJ;
+        __tmp__ZYJ=__tmp__WYJ;
       };
-      if ((! __tmp__RYJ)) {
-        j__IXJ=(__INTEGER)(j__IXJ +  1);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto until_do__4C5;
+      if ((! __tmp__ZYJ)) {
+        j__QXJ=(__INTEGER)(j__QXJ +  1);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto until_do__GD5;
       };
     };
-    if ((j__IXJ > ((__STRING_CONSTANT *)st__FXJ)->count__DD)) {
-      result__JXJ=TRUE__;
-      last_string__I0C=st__FXJ;
+    if ((j__QXJ > ((__STRING_CONSTANT *)st__NXJ)->count__DD)) {
+      result__RXJ=TRUE__;
+      last_string__Q0C=st__NXJ;
     } else {
-      position__SBC=posold__HXJ;
-      result__JXJ=FALSE__;
+      position__0BC=posold__PXJ;
+      result__RXJ=FALSE__;
     };
   };
-  return(result__JXJ);
+  return(result__RXJ);
 }
 
-static __BOOLEAN read_short_elt__LLKB()
+static __BOOLEAN read_short_elt__TLKB()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER j__PLKB;
-  __POSITION pos__0IG;
-  __BOOLEAN result__OLKB,__tmp__CMKB;
-  __CHARACTER __tmp__HNKB;
-  result__OLKB=FALSE__;
-  j__PLKB= 0;
-  if (read_identifier__LAL()) {
-    if (((void *)last_string__I0C != (void *)(&__string_115))) {
-      pos__0IG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_219));
-      put_position__UOG(pos__0IG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  __INTEGER j__XLKB;
+  __POSITION pos__CJG;
+  __BOOLEAN result__WLKB,__tmp__KMKB;
+  __CHARACTER __tmp__PNKB;
+  result__WLKB=FALSE__;
+  j__XLKB= 0;
+  if (read_identifier__TAL()) {
+    if (((void *)last_string__Q0C != (void *)(&__string_115))) {
+      pos__CJG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_217));
+      put_position__2OG(pos__CJG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__I0C=NULL;
-    result__OLKB=TRUE__;
-    __tmp__CMKB=TRUE__;
+    last_string__Q0C=NULL;
+    result__WLKB=TRUE__;
+    __tmp__KMKB=TRUE__;
   } else {
-    __tmp__CMKB=FALSE__;
+    __tmp__KMKB=FALSE__;
   };
-  if ((! __tmp__CMKB)) {
-    if (read_string__LFQ()) {
-      ((__STRING *)string_tmp__VH)->count__WFC= 0;
-      j__PLKB= 1;
-      while ((j__PLKB <= ((__STRING_CONSTANT *)last_string__I0C)->count__DD)) {
-        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)] == '\\')) {
-          j__PLKB=(__INTEGER)(j__PLKB +  1);
-          __tmp__HNKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)];
-          if ((__tmp__HNKB == 'a')) {
-            add_last__ZLT(string_tmp__VH,'\a');
+  if ((! __tmp__KMKB)) {
+    if (read_string__TFQ()) {
+      ((__STRING *)string_tmp__VH)->count__4FC= 0;
+      j__XLKB= 1;
+      while ((j__XLKB <= ((__STRING_CONSTANT *)last_string__Q0C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[(__INTEGER)(j__XLKB -  1)] == '\\')) {
+          j__XLKB=(__INTEGER)(j__XLKB +  1);
+          __tmp__PNKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[(__INTEGER)(j__XLKB -  1)];
+          if ((__tmp__PNKB == 'a')) {
+            add_last__BMT(string_tmp__VH,'\a');
           };
-          if ((__tmp__HNKB == 'b')) {
-            add_last__ZLT(string_tmp__VH,'\b');
+          if ((__tmp__PNKB == 'b')) {
+            add_last__BMT(string_tmp__VH,'\b');
           };
-          if ((__tmp__HNKB == 'f')) {
-            add_last__ZLT(string_tmp__VH,'\f');
+          if ((__tmp__PNKB == 'f')) {
+            add_last__BMT(string_tmp__VH,'\f');
           };
-          if ((__tmp__HNKB == 'n')) {
-            add_last__ZLT(string_tmp__VH,'\n');
+          if ((__tmp__PNKB == 'n')) {
+            add_last__BMT(string_tmp__VH,'\n');
           };
-          if ((__tmp__HNKB == 'r')) {
-            add_last__ZLT(string_tmp__VH,'\r');
+          if ((__tmp__PNKB == 'r')) {
+            add_last__BMT(string_tmp__VH,'\r');
           };
-          if ((__tmp__HNKB == 't')) {
-            add_last__ZLT(string_tmp__VH,'\t');
+          if ((__tmp__PNKB == 't')) {
+            add_last__BMT(string_tmp__VH,'\t');
           };
-          if ((__tmp__HNKB == 'v')) {
-            add_last__ZLT(string_tmp__VH,'\v');
+          if ((__tmp__PNKB == 'v')) {
+            add_last__BMT(string_tmp__VH,'\v');
           };
-          if ((__tmp__HNKB == '\\')) {
-            add_last__ZLT(string_tmp__VH,'\\');
+          if ((__tmp__PNKB == '\\')) {
+            add_last__BMT(string_tmp__VH,'\\');
           };
-          if ((__tmp__HNKB == '?')) {
-            add_last__ZLT(string_tmp__VH,'\?');
+          if ((__tmp__PNKB == '?')) {
+            add_last__BMT(string_tmp__VH,'\?');
           };
-          if ((__tmp__HNKB == '\'')) {
-            add_last__ZLT(string_tmp__VH,'\'');
+          if ((__tmp__PNKB == '\'')) {
+            add_last__BMT(string_tmp__VH,'\'');
           };
-          if ((__tmp__HNKB == '\"')) {
-            add_last__ZLT(string_tmp__VH,'\"');
+          if ((__tmp__PNKB == '\"')) {
+            add_last__BMT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__ZLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[(__INTEGER)(j__PLKB -  1)]);
+          add_last__BMT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[(__INTEGER)(j__XLKB -  1)]);
         };
-        j__PLKB=(__INTEGER)(j__PLKB +  1);
+        j__XLKB=(__INTEGER)(j__XLKB +  1);
       };
-      last_string__I0C=get__IWB(string_tmp__VH);
-      result__OLKB=TRUE__;
+      last_string__Q0C=get__QWB(string_tmp__VH);
+      result__WLKB=TRUE__;
     };
   };
-  return(result__OLKB);
+  return(result__WLKB);
 }
 
-static void fast_put__to__Y1R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__Z1R,void *k__11R)
+static void fast_put__to__A2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__B2R,void *k__D2R)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER result__KCGH,__tmp__MCGH,Self__NCGH,idx__D2R,idx__LUNB;
-  __INTEGER new_capacity__MUNB,i__NUNB,result__PCGH,__tmp__RCGH;
-  __INTEGER Self__SCGH,typ_id__2WNB;
-  __STRING_CONSTANT *Self__QCGH;
-  __POINTER ptr__XWNB,ptr_table__1DHH,next__0DHH,result__2DHH;
-  __POINTER ptr_table__AEHH,next__5DHH,result__BEHH;
-  __UINTEGER_32 sz__ZWNB,a__14DH,new_size__24DH,t__A5DH,a__54DH;
-  __UINTEGER_32 new_size__DEHH,lab_type__CEHH;
-  void *node__G2R,*node1__PUNB,*node2__QUNB,*__tmp__03R;
-  void **old_buckets__OUNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__WWNB;
-  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__XTDC;
-  result__KCGH= 0;
-  __tmp__MCGH=((__STRING_CONSTANT *)k__11R)->count__DD;
-  Self__NCGH= 1;
-  while ((Self__NCGH <= __tmp__MCGH)) {
-    result__KCGH=(__INTEGER)((__INTEGER)( 5 * result__KCGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__11R)->storage__VQO)[(__INTEGER)(Self__NCGH -  1)])));
-    Self__NCGH=(__INTEGER)(Self__NCGH +  1);
-  };
-  if ((result__KCGH <  0)) {
-    result__KCGH=(__INTEGER)(~ result__KCGH);
-  };
-  idx__D2R=(__INTEGER)(result__KCGH % Self__Z1R->capacity__I2R);
-  node__G2R=((void **)Self__Z1R->buckets__N2R)[idx__D2R];
-  while ((! (((void *)node__G2R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__G2R)->key__Z2R == (void *)k__11R)))) {
-    node__G2R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__G2R)->next__E3R;
-  };
-  if (((void *)node__G2R == (void *)NULL)) {
-    if ((Self__Z1R->capacity__I2R == Self__Z1R->count__N3R)) {
-      idx__LUNB= 0;
-      node1__PUNB=NULL;
-      node2__QUNB=NULL;
-      old_buckets__OUNB=Self__Z1R->buckets__N2R;
-      new_capacity__MUNB=prime_number_ceiling__X41((__INTEGER)(Self__Z1R->capacity__I2R +  1));
-      Self__Z1R->buckets__N2R=create__MZ2(new_capacity__MUNB);
-      i__NUNB=(__INTEGER)(Self__Z1R->capacity__I2R -  1);
-      Self__Z1R->capacity__I2R=new_capacity__MUNB;
-      while ((i__NUNB >=  0)) {
-        node1__PUNB=((void **)old_buckets__OUNB)[i__NUNB];
-        while (((void *)node1__PUNB != (void *)NULL)) {
-          node2__QUNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->next__E3R;
-          Self__QCGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->key__Z2R);
-          result__PCGH= 0;
-          __tmp__RCGH=Self__QCGH->count__DD;
-          Self__SCGH= 1;
-          while ((Self__SCGH <= __tmp__RCGH)) {
-            result__PCGH=(__INTEGER)((__INTEGER)( 5 * result__PCGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QCGH->storage__VQO)[(__INTEGER)(Self__SCGH -  1)])));
-            Self__SCGH=(__INTEGER)(Self__SCGH +  1);
-          };
-          if ((result__PCGH <  0)) {
-            result__PCGH=(__INTEGER)(~ result__PCGH);
-          };
-          idx__LUNB=(__INTEGER)(result__PCGH % Self__Z1R->capacity__I2R);
-          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__PUNB)->next__E3R=((void **)Self__Z1R->buckets__N2R)[idx__LUNB];
-          ((void **)Self__Z1R->buckets__N2R)[idx__LUNB]=node1__PUNB;
-          node1__PUNB=node2__QUNB;
-        };
-        i__NUNB=(__INTEGER)(i__NUNB -  1);
-      };
-      idx__D2R=(__INTEGER)(result__KCGH % new_capacity__MUNB);
-    };
-    __tmp__03R=((void **)Self__Z1R->buckets__N2R)[idx__D2R];
-    result__WWNB=NULL;
-    ptr__XWNB=((__POINTER )(NULL));
-    typ_id__2WNB= 0;
-    sz__ZWNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
-    if ((sz__ZWNB ==  0)) {
-      result__WWNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-    } else {
-      typ_id__2WNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZWNB);
-      if ((typ_id__2WNB == (__INTEGER)(-  1))) {
-        a__14DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__24DH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWNB + a__14DH) & (__UINTEGER_32)(~ a__14DH));
-        ptr_table__1DHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__24DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__0DHH=((__POINTER )(NULL));
-        result__2DHH=((__POINTER *)ptr_table__1DHH)[ 0];
-        if ((result__2DHH == (void *)NULL)) {
-          result__2DHH=new_lab__MRJ(new_size__24DH);
-          next__0DHH=(void *)((unsigned long)result__2DHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__24DH)));
-          ((__POINTER *)next__0DHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1DHH)[ 0]=next__0DHH;
-        } else {
-          next__0DHH=((__POINTER *)result__2DHH)[ 0];
-          if ((next__0DHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2DHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__24DH <<  1)) <=  4096)) {
-              next__0DHH=(void *)((unsigned long)result__2DHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__24DH)));
+  __INTEGER result__3DHH,__tmp__5DHH,Self__AEHH,idx__L2R,idx__TUNB;
+  __INTEGER new_capacity__UUNB,i__VUNB,result__CEHH,__tmp__EEHH;
+  __INTEGER Self__FEHH,typ_id__EXNB;
+  __STRING_CONSTANT *Self__DEHH;
+  __POINTER ptr__5WNB,ptr_table__WFIH,next__VFIH,result__XFIH;
+  __POINTER ptr_table__1FIH,next__0FIH,result__2FIH;
+  __UINTEGER_32 sz__BXNB,a__Z5EH,new_size__05EH,t__45EH,a__35EH;
+  __UINTEGER_32 new_size__4FIH,lab_type__3FIH;
+  void *node__O2R,*node1__XUNB,*node2__YUNB,*__tmp__C4R;
+  void **old_buckets__WUNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__4WNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__5TDC;
+  result__3DHH= 0;
+  __tmp__5DHH=((__STRING_CONSTANT *)k__D2R)->count__DD;
+  Self__AEHH= 1;
+  while ((Self__AEHH <= __tmp__5DHH)) {
+    result__3DHH=(__INTEGER)((__INTEGER)( 5 * result__3DHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__D2R)->storage__3QO)[(__INTEGER)(Self__AEHH -  1)])));
+    Self__AEHH=(__INTEGER)(Self__AEHH +  1);
+  };
+  if ((result__3DHH <  0)) {
+    result__3DHH=(__INTEGER)(~ result__3DHH);
+  };
+  idx__L2R=(__INTEGER)(result__3DHH % Self__B2R->capacity__Q2R);
+  node__O2R=((void **)Self__B2R->buckets__V2R)[idx__L2R];
+  while ((! (((void *)node__O2R == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__O2R)->key__B3R == (void *)k__D2R)))) {
+    node__O2R=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__O2R)->next__M3R;
+  };
+  if (((void *)node__O2R == (void *)NULL)) {
+    if ((Self__B2R->capacity__Q2R == Self__B2R->count__V3R)) {
+      idx__TUNB= 0;
+      node1__XUNB=NULL;
+      node2__YUNB=NULL;
+      old_buckets__WUNB=Self__B2R->buckets__V2R;
+      new_capacity__UUNB=prime_number_ceiling__541((__INTEGER)(Self__B2R->capacity__Q2R +  1));
+      Self__B2R->buckets__V2R=create__UZ2(new_capacity__UUNB);
+      i__VUNB=(__INTEGER)(Self__B2R->capacity__Q2R -  1);
+      Self__B2R->capacity__Q2R=new_capacity__UUNB;
+      while ((i__VUNB >=  0)) {
+        node1__XUNB=((void **)old_buckets__WUNB)[i__VUNB];
+        while (((void *)node1__XUNB != (void *)NULL)) {
+          node2__YUNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__XUNB)->next__M3R;
+          Self__DEHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__XUNB)->key__B3R);
+          result__CEHH= 0;
+          __tmp__EEHH=Self__DEHH->count__DD;
+          Self__FEHH= 1;
+          while ((Self__FEHH <= __tmp__EEHH)) {
+            result__CEHH=(__INTEGER)((__INTEGER)( 5 * result__CEHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__DEHH->storage__3QO)[(__INTEGER)(Self__FEHH -  1)])));
+            Self__FEHH=(__INTEGER)(Self__FEHH +  1);
+          };
+          if ((result__CEHH <  0)) {
+            result__CEHH=(__INTEGER)(~ result__CEHH);
+          };
+          idx__TUNB=(__INTEGER)(result__CEHH % Self__B2R->capacity__Q2R);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__XUNB)->next__M3R=((void **)Self__B2R->buckets__V2R)[idx__TUNB];
+          ((void **)Self__B2R->buckets__V2R)[idx__TUNB]=node1__XUNB;
+          node1__XUNB=node2__YUNB;
+        };
+        i__VUNB=(__INTEGER)(i__VUNB -  1);
+      };
+      idx__L2R=(__INTEGER)(result__3DHH % new_capacity__UUNB);
+    };
+    __tmp__C4R=((void **)Self__B2R->buckets__V2R)[idx__L2R];
+    result__4WNB=NULL;
+    ptr__5WNB=((__POINTER )(NULL));
+    typ_id__EXNB= 0;
+    sz__BXNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__BXNB ==  0)) {
+      result__4WNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__EXNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__BXNB);
+      if ((typ_id__EXNB == (__INTEGER)(-  1))) {
+        a__Z5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__05EH=(__UINTEGER_32)((__UINTEGER_32)(sz__BXNB + a__Z5EH) & (__UINTEGER_32)(~ a__Z5EH));
+        ptr_table__WFIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__05EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VFIH=((__POINTER )(NULL));
+        result__XFIH=((__POINTER *)ptr_table__WFIH)[ 0];
+        if ((result__XFIH == (void *)NULL)) {
+          result__XFIH=new_lab__URJ(new_size__05EH);
+          next__VFIH=(void *)((unsigned long)result__XFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05EH)));
+          ((__POINTER *)next__VFIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WFIH)[ 0]=next__VFIH;
+        } else {
+          next__VFIH=((__POINTER *)result__XFIH)[ 0];
+          if ((next__VFIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XFIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__05EH <<  1)) <=  4096)) {
+              next__VFIH=(void *)((unsigned long)result__XFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05EH)));
             } else {
-              next__0DHH=new_lab__MRJ(new_size__24DH);
-            };
-            ((__POINTER *)next__0DHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1DHH)[ 0]=next__0DHH;
-          } else {
-            ((__POINTER *)result__2DHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0DHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2DHH=next__0DHH;
-          };
-        };
-        ptr__XWNB=result__2DHH;
-      } else {
-        t__A5DH=((__UINTEGER_32 )typ_id__2WNB);
-        a__54DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZWNB + a__54DH) & (__UINTEGER_32)(~ a__54DH));
-        ptr_table__AEHH=((__POINTER )(&(table_type[(t__A5DH)])));
-        lab_type__CEHH=(__UINTEGER_32)(t__A5DH |  1);
-        next__5DHH=((__POINTER )(NULL));
-        result__BEHH=((__POINTER *)ptr_table__AEHH)[ 0];
-        if ((result__BEHH == (void *)NULL)) {
-          result__BEHH=new_lab__MRJ(lab_type__CEHH);
-          next__5DHH=(void *)((unsigned long)result__BEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DEHH)));
-          ((__POINTER *)next__5DHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__AEHH)[ 0]=next__5DHH;
-        } else {
-          next__5DHH=((__POINTER *)result__BEHH)[ 0];
-          if ((next__5DHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DEHH <<  1)) <=  4096)) {
-              next__5DHH=(void *)((unsigned long)result__BEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DEHH)));
+              next__VFIH=new_lab__URJ(new_size__05EH);
+            };
+            ((__POINTER *)next__VFIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WFIH)[ 0]=next__VFIH;
+          } else {
+            ((__POINTER *)result__XFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XFIH=next__VFIH;
+          };
+        };
+        ptr__5WNB=result__XFIH;
+      } else {
+        t__45EH=((__UINTEGER_32 )typ_id__EXNB);
+        a__35EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4FIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BXNB + a__35EH) & (__UINTEGER_32)(~ a__35EH));
+        ptr_table__1FIH=((__POINTER )(&(table_type[(t__45EH)])));
+        lab_type__3FIH=(__UINTEGER_32)(t__45EH |  1);
+        next__0FIH=((__POINTER )(NULL));
+        result__2FIH=((__POINTER *)ptr_table__1FIH)[ 0];
+        if ((result__2FIH == (void *)NULL)) {
+          result__2FIH=new_lab__URJ(lab_type__3FIH);
+          next__0FIH=(void *)((unsigned long)result__2FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FIH)));
+          ((__POINTER *)next__0FIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1FIH)[ 0]=next__0FIH;
+        } else {
+          next__0FIH=((__POINTER *)result__2FIH)[ 0];
+          if ((next__0FIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2FIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4FIH <<  1)) <=  4096)) {
+              next__0FIH=(void *)((unsigned long)result__2FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FIH)));
             } else {
-              next__5DHH=new_lab__MRJ(lab_type__CEHH);
+              next__0FIH=new_lab__URJ(lab_type__3FIH);
             };
-            ((__POINTER *)next__5DHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AEHH)[ 0]=next__5DHH;
+            ((__POINTER *)next__0FIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1FIH)[ 0]=next__0FIH;
           } else {
-            ((__POINTER *)result__BEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5DHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BEHH=next__5DHH;
+            ((__POINTER *)result__2FIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0FIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2FIH=next__0FIH;
           };
         };
-        ptr__XWNB=result__BEHH;
+        ptr__5WNB=result__2FIH;
       };
-      result__WWNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__XWNB);
-      *(result__WWNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__4WNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__5WNB);
+      *(result__4WNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    Self__XTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__WWNB);
-    Self__XTDC->key__Z2R=k__11R;
-    Self__XTDC->next__E3R=__tmp__03R;
-    node__G2R=result__WWNB;
-    ((void **)Self__Z1R->buckets__N2R)[idx__D2R]=result__WWNB;
-    Self__Z1R->count__N3R=(__INTEGER)(Self__Z1R->count__N3R +  1);
+    Self__5TDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__4WNB);
+    Self__5TDC->key__B3R=k__D2R;
+    Self__5TDC->next__M3R=__tmp__C4R;
+    node__O2R=result__4WNB;
+    ((void **)Self__B2R->buckets__V2R)[idx__L2R]=result__4WNB;
+    Self__B2R->count__V3R=(__INTEGER)(Self__B2R->count__V3R +  1);
   };
 }
 
-static __TYPE_FULL* create__with__SQB(void *typ__UQB,__UINTEGER_8 code__VQB)
+static __TYPE_FULL* create__with__0QB(void *typ__2QB,__UINTEGER_8 code__3QB)
 // ({TYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_ID},{UINTEGER_8}) With resultNo recursive, No inlinable.
 {
-  __TYPE_FULL *result__10B,*Self__UFS;
-  __POINTER ptr__20B,ptr_table__FEHH,next__EEHH,result__GEHH;
-  __POINTER ptr_table__KEHH,next__JEHH,result__LEHH;
-  __INTEGER typ_id__B1B;
-  __UINTEGER_32 sz__40B,a__D5DH,new_size__E5DH,t__I5DH,a__H5DH;
-  __UINTEGER_32 new_size__NEHH,lab_type__MEHH;
-  void *__tmp__AGS,*__tmp__IGS;
-  __BOOLEAN __tmp__UGS,__tmp__VGS;
-  result__10B=NULL;
-  ptr__20B=((__POINTER )(NULL));
-  typ_id__B1B= 0;
-  sz__40B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
-  if ((sz__40B ==  0)) {
-    result__10B=TYPE_FULL__;
+  __TYPE_FULL *result__D1B,*Self__2FS;
+  __POINTER ptr__E1B,ptr_table__AGIH,next__5FIH,result__BGIH;
+  __POINTER ptr_table__FGIH,next__EGIH,result__GGIH;
+  __INTEGER typ_id__J1B;
+  __UINTEGER_32 sz__G1B,a__BAFH,new_size__CAFH,t__GAFH,a__FAFH;
+  __UINTEGER_32 new_size__IGIH,lab_type__HGIH;
+  void *__tmp__IGS,*__tmp__QGS;
+  __BOOLEAN __tmp__2GS,__tmp__3GS;
+  result__D1B=NULL;
+  ptr__E1B=((__POINTER )(NULL));
+  typ_id__J1B= 0;
+  sz__G1B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
+  if ((sz__G1B ==  0)) {
+    result__D1B=TYPE_FULL__;
   } else {
-    typ_id__B1B=__TYPE_FULL__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__40B);
-    if ((typ_id__B1B == (__INTEGER)(-  1))) {
-      a__D5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__E5DH=(__UINTEGER_32)((__UINTEGER_32)(sz__40B + a__D5DH) & (__UINTEGER_32)(~ a__D5DH));
-      ptr_table__FEHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E5DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__EEHH=((__POINTER )(NULL));
-      result__GEHH=((__POINTER *)ptr_table__FEHH)[ 0];
-      if ((result__GEHH == (void *)NULL)) {
-        result__GEHH=new_lab__MRJ(new_size__E5DH);
-        next__EEHH=(void *)((unsigned long)result__GEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5DH)));
-        ((__POINTER *)next__EEHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__FEHH)[ 0]=next__EEHH;
-      } else {
-        next__EEHH=((__POINTER *)result__GEHH)[ 0];
-        if ((next__EEHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__E5DH <<  1)) <=  4096)) {
-            next__EEHH=(void *)((unsigned long)result__GEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5DH)));
-          } else {
-            next__EEHH=new_lab__MRJ(new_size__E5DH);
-          };
-          ((__POINTER *)next__EEHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FEHH)[ 0]=next__EEHH;
-        } else {
-          ((__POINTER *)result__GEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GEHH=next__EEHH;
-        };
-      };
-      ptr__20B=result__GEHH;
-    } else {
-      t__I5DH=((__UINTEGER_32 )typ_id__B1B);
-      a__H5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__40B + a__H5DH) & (__UINTEGER_32)(~ a__H5DH));
-      ptr_table__KEHH=((__POINTER )(&(table_type[(t__I5DH)])));
-      lab_type__MEHH=(__UINTEGER_32)(t__I5DH |  1);
-      next__JEHH=((__POINTER )(NULL));
-      result__LEHH=((__POINTER *)ptr_table__KEHH)[ 0];
-      if ((result__LEHH == (void *)NULL)) {
-        result__LEHH=new_lab__MRJ(lab_type__MEHH);
-        next__JEHH=(void *)((unsigned long)result__LEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NEHH)));
-        ((__POINTER *)next__JEHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KEHH)[ 0]=next__JEHH;
-      } else {
-        next__JEHH=((__POINTER *)result__LEHH)[ 0];
-        if ((next__JEHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NEHH <<  1)) <=  4096)) {
-            next__JEHH=(void *)((unsigned long)result__LEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NEHH)));
-          } else {
-            next__JEHH=new_lab__MRJ(lab_type__MEHH);
-          };
-          ((__POINTER *)next__JEHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KEHH)[ 0]=next__JEHH;
-        } else {
-          ((__POINTER *)result__LEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__LEHH=next__JEHH;
-        };
-      };
-      ptr__20B=result__LEHH;
-    };
-    result__10B=((__TYPE_FULL *)ptr__20B);
-    *(result__10B) = *(TYPE_FULL__);
-  };
-  Self__UFS=((__TYPE_FULL *)result__10B);
-  Self__UFS->flag__YFS=code__VQB;
-  if (((void *)typ__UQB != (void *)NULL)) {
-    switch (((struct ___OBJ *)typ__UQB)->__id) {
+    typ_id__J1B=__TYPE_FULL__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__G1B);
+    if ((typ_id__J1B == (__INTEGER)(-  1))) {
+      a__BAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CAFH=(__UINTEGER_32)((__UINTEGER_32)(sz__G1B + a__BAFH) & (__UINTEGER_32)(~ a__BAFH));
+      ptr_table__AGIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CAFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5FIH=((__POINTER )(NULL));
+      result__BGIH=((__POINTER *)ptr_table__AGIH)[ 0];
+      if ((result__BGIH == (void *)NULL)) {
+        result__BGIH=new_lab__URJ(new_size__CAFH);
+        next__5FIH=(void *)((unsigned long)result__BGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAFH)));
+        ((__POINTER *)next__5FIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AGIH)[ 0]=next__5FIH;
+      } else {
+        next__5FIH=((__POINTER *)result__BGIH)[ 0];
+        if ((next__5FIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BGIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CAFH <<  1)) <=  4096)) {
+            next__5FIH=(void *)((unsigned long)result__BGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAFH)));
+          } else {
+            next__5FIH=new_lab__URJ(new_size__CAFH);
+          };
+          ((__POINTER *)next__5FIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AGIH)[ 0]=next__5FIH;
+        } else {
+          ((__POINTER *)result__BGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5FIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BGIH=next__5FIH;
+        };
+      };
+      ptr__E1B=result__BGIH;
+    } else {
+      t__GAFH=((__UINTEGER_32 )typ_id__J1B);
+      a__FAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__G1B + a__FAFH) & (__UINTEGER_32)(~ a__FAFH));
+      ptr_table__FGIH=((__POINTER )(&(table_type[(t__GAFH)])));
+      lab_type__HGIH=(__UINTEGER_32)(t__GAFH |  1);
+      next__EGIH=((__POINTER )(NULL));
+      result__GGIH=((__POINTER *)ptr_table__FGIH)[ 0];
+      if ((result__GGIH == (void *)NULL)) {
+        result__GGIH=new_lab__URJ(lab_type__HGIH);
+        next__EGIH=(void *)((unsigned long)result__GGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGIH)));
+        ((__POINTER *)next__EGIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FGIH)[ 0]=next__EGIH;
+      } else {
+        next__EGIH=((__POINTER *)result__GGIH)[ 0];
+        if ((next__EGIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GGIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IGIH <<  1)) <=  4096)) {
+            next__EGIH=(void *)((unsigned long)result__GGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGIH)));
+          } else {
+            next__EGIH=new_lab__URJ(lab_type__HGIH);
+          };
+          ((__POINTER *)next__EGIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FGIH)[ 0]=next__EGIH;
+        } else {
+          ((__POINTER *)result__GGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GGIH=next__EGIH;
+        };
+      };
+      ptr__E1B=result__GGIH;
+    };
+    result__D1B=((__TYPE_FULL *)ptr__E1B);
+    *(result__D1B) = *(TYPE_FULL__);
+  };
+  Self__2FS=((__TYPE_FULL *)result__D1B);
+  Self__2FS->flag__AGS=code__3QB;
+  if (((void *)typ__2QB != (void *)NULL)) {
+    switch (((struct ___OBJ *)typ__2QB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__AGS=(&__string_2);
+      __tmp__IGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__AGS=(&__string_3);
+      __tmp__IGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__AGS=(&__string_45);
+      __tmp__IGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__AGS=(&__string_47);
+      __tmp__IGS=(&__string_47);
     } break;
     };
-    __tmp__UGS=((void *)__tmp__AGS != (void *)NULL);
+    __tmp__2GS=((void *)__tmp__IGS != (void *)NULL);
   } else {
-    __tmp__UGS=FALSE__;
+    __tmp__2GS=FALSE__;
   };
-  if (__tmp__UGS) {
-    switch (((struct ___OBJ *)typ__UQB)->__id) {
+  if (__tmp__2GS) {
+    switch (((struct ___OBJ *)typ__2QB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__IGS=(&__string_2);
+      __tmp__QGS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__IGS=(&__string_3);
+      __tmp__QGS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__IGS=(&__string_45);
+      __tmp__QGS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__IGS=(&__string_47);
+      __tmp__QGS=(&__string_47);
     } break;
     };
-    __tmp__VGS=__infix_equal_equal__45DB(__tmp__IGS,(&__string_33));
+    __tmp__3GS=__infix_equal_equal__GAEB(__tmp__QGS,(&__string_33));
   } else {
-    __tmp__VGS=FALSE__;
+    __tmp__3GS=FALSE__;
   };
-  if ((__tmp__VGS && (! ((__UINTEGER_8)(Self__UFS->flag__YFS &  1) !=  0)))) {
-    print__WHD((&__string_220));
+  if ((__tmp__3GS && (! ((__UINTEGER_8)(Self__2FS->flag__AGS &  1) !=  0)))) {
+    print__4HD((&__string_218));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
-  return(result__10B);
+  return(result__D1B);
 }
 
-static void** create__CZNB(__INTEGER nb_elements__EZNB)
+static void** create__KZNB(__INTEGER nb_elements__MZNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__YHCH,a__L5DH,new_size__ZHCH,new_size2__0HCH,a__P5DH;
-  __UINTEGER_32 new_size__Q5DH;
-  __POINTER result__XHCH,ptr_table__PEHH,next__OEHH,result__QEHH;
-  void *result__TEHH;
-  __INTEGER Self__1FMC;
-  void **Result__F4RB;
-  sz__YHCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__EZNB * ((__INTEGER )(sizeof(void *)))));
-  result__XHCH=((__POINTER )(NULL));
-  a__L5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__ZHCH=(__UINTEGER_32)((__UINTEGER_32)(sz__YHCH + a__L5DH) & (__UINTEGER_32)(~ a__L5DH));
-  new_size2__0HCH=(__UINTEGER_32)(new_size__ZHCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__0HCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__P5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__Q5DH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0HCH + a__P5DH) & (__UINTEGER_32)(~ a__P5DH));
-    ptr_table__PEHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q5DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__OEHH=((__POINTER )(NULL));
-    result__QEHH=((__POINTER *)ptr_table__PEHH)[ 0];
-    if ((result__QEHH == (void *)NULL)) {
-      result__QEHH=new_lab__MRJ(new_size__Q5DH);
-      next__OEHH=(void *)((unsigned long)result__QEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5DH)));
-      ((__POINTER *)next__OEHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__PEHH)[ 0]=next__OEHH;
-    } else {
-      next__OEHH=((__POINTER *)result__QEHH)[ 0];
-      if ((next__OEHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q5DH <<  1)) <=  4096)) {
-          next__OEHH=(void *)((unsigned long)result__QEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5DH)));
-        } else {
-          next__OEHH=new_lab__MRJ(new_size__Q5DH);
-        };
-        ((__POINTER *)next__OEHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__PEHH)[ 0]=next__OEHH;
-      } else {
-        ((__POINTER *)result__QEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__QEHH=next__OEHH;
-      };
-    };
-    ((__POINTER *)result__QEHH)[ 0]=((__POINTER ) 3);
-    result__XHCH=(void *)((unsigned long)result__QEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__KHDH,a__JAFH,new_size__LHDH,new_size2__MHDH,a__NAFH;
+  __UINTEGER_32 new_size__OAFH;
+  __POINTER result__JHDH,ptr_table__KGIH,next__JGIH,result__LGIH;
+  void *result__OGIH;
+  __INTEGER Self__DGMC;
+  void **Result__N4RB;
+  sz__KHDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MZNB * ((__INTEGER )(sizeof(void *)))));
+  result__JHDH=((__POINTER )(NULL));
+  a__JAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__LHDH=(__UINTEGER_32)((__UINTEGER_32)(sz__KHDH + a__JAFH) & (__UINTEGER_32)(~ a__JAFH));
+  new_size2__MHDH=(__UINTEGER_32)(new_size__LHDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__MHDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OAFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MHDH + a__NAFH) & (__UINTEGER_32)(~ a__NAFH));
+    ptr_table__KGIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OAFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JGIH=((__POINTER )(NULL));
+    result__LGIH=((__POINTER *)ptr_table__KGIH)[ 0];
+    if ((result__LGIH == (void *)NULL)) {
+      result__LGIH=new_lab__URJ(new_size__OAFH);
+      next__JGIH=(void *)((unsigned long)result__LGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAFH)));
+      ((__POINTER *)next__JGIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KGIH)[ 0]=next__JGIH;
+    } else {
+      next__JGIH=((__POINTER *)result__LGIH)[ 0];
+      if ((next__JGIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LGIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OAFH <<  1)) <=  4096)) {
+          next__JGIH=(void *)((unsigned long)result__LGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAFH)));
+        } else {
+          next__JGIH=new_lab__URJ(new_size__OAFH);
+        };
+        ((__POINTER *)next__JGIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KGIH)[ 0]=next__JGIH;
+      } else {
+        ((__POINTER *)result__LGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LGIH=next__JGIH;
+      };
+    };
+    ((__POINTER *)result__LGIH)[ 0]=((__POINTER ) 3);
+    result__JHDH=(void *)((unsigned long)result__LGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__TEHH=first_free__XDVB;
-    while ((((void *)result__TEHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__TEHH)->map_size_and_id__ITB &  4294967292LU) < new_size__ZHCH))) {
-      result__TEHH=((__MEMORY *)result__TEHH)->map_next_free__JTB;
+    result__OGIH=first_free__5DVB;
+    while ((((void *)result__OGIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OGIH)->map_size_and_id__QTB &  4294967292LU) < new_size__LHDH))) {
+      result__OGIH=((__MEMORY *)result__OGIH)->map_next_free__RTB;
     };
-    if (((void *)result__TEHH == (void *)NULL)) {
-      result__TEHH=new_page__OA5();
+    if (((void *)result__OGIH == (void *)NULL)) {
+      result__OGIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__TEHH,new_size__ZHCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__TEHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__XHCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__TEHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__OGIH,new_size__LHDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OGIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__JHDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OGIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__F4RB=((void **)result__XHCH);
-  Self__1FMC=(__INTEGER)(nb_elements__EZNB -  1);
-  while ((Self__1FMC >=  0)) {
-    Result__F4RB[Self__1FMC]=NULL;
-    Self__1FMC=(__INTEGER)(Self__1FMC -  1);
+  Result__N4RB=((void **)result__JHDH);
+  Self__DGMC=(__INTEGER)(nb_elements__MZNB -  1);
+  while ((Self__DGMC >=  0)) {
+    Result__N4RB[Self__DGMC]=NULL;
+    Self__DGMC=(__INTEGER)(Self__DGMC -  1);
   };
-  return(Result__F4RB);
+  return(Result__N4RB);
 }
 
-static void add_last__O4R(__FAST_ARRAYoTYPE_IDo *Self__P4R,void *element__Q4R)
+static void add_last__W4R(__FAST_ARRAYoTYPE_IDo *Self__X4R,void *element__Y4R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__R4R,__tmp__05R,__tmp__3VDC,Self__R5UD;
-  __BOOLEAN __tmp__B5R;
-  void **__tmp__Z5R,**new__JVDC;
-  new_capacity__R4R= 0;
-  if (((__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1) <= (__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.capacity__U4R -  1))) {
-    Self__P4R->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1);
-    __tmp__B5R=TRUE__;
+  __INTEGER new_capacity__Z4R,__tmp__CAS,__tmp__FWDC,Self__Z5UD;
+  __BOOLEAN __tmp__J5R;
+  void **__tmp__BAS,**new__RVDC;
+  new_capacity__Z4R= 0;
+  if (((__INTEGER)(Self__X4R->parent_arrayed_collection__0AB.upper__04R +  1) <= (__INTEGER)(Self__X4R->parent_arrayed_collection__0AB.capacity__24R -  1))) {
+    Self__X4R->parent_arrayed_collection__0AB.upper__04R=(__INTEGER)(Self__X4R->parent_arrayed_collection__0AB.upper__04R +  1);
+    __tmp__J5R=TRUE__;
   } else {
-    __tmp__B5R=FALSE__;
-  };
-  if ((! __tmp__B5R)) {
-    if ((Self__P4R->parent_arrayed_collection__UAB.capacity__U4R ==  0)) {
-      Self__P4R->parent_arrayed_collection__UAB.storage__Q5R=create__CZNB( 2);
-      Self__P4R->parent_arrayed_collection__UAB.capacity__U4R= 2;
-      Self__P4R->parent_arrayed_collection__UAB.upper__S4R= 0;
-    } else {
-      new_capacity__R4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.capacity__U4R <<  1);
-      __tmp__Z5R=Self__P4R->parent_arrayed_collection__UAB.storage__Q5R;
-      __tmp__05R=Self__P4R->parent_arrayed_collection__UAB.capacity__U4R;
-      new__JVDC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__Z5R)),((__UINTEGER_32 )(__INTEGER)(__tmp__05R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__R4R * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__3VDC=(__INTEGER)(new_capacity__R4R -  1);
-      Self__R5UD=__tmp__05R;
-      while ((Self__R5UD <= __tmp__3VDC)) {
-        new__JVDC[Self__R5UD]=NULL;
-        Self__R5UD=(__INTEGER)(Self__R5UD +  1);
-      };
-      Self__P4R->parent_arrayed_collection__UAB.storage__Q5R=new__JVDC;
-      Self__P4R->parent_arrayed_collection__UAB.capacity__U4R=new_capacity__R4R;
-      Self__P4R->parent_arrayed_collection__UAB.upper__S4R=(__INTEGER)(Self__P4R->parent_arrayed_collection__UAB.upper__S4R +  1);
-    };
-  };
-  ((void **)Self__P4R->parent_arrayed_collection__UAB.storage__Q5R)[Self__P4R->parent_arrayed_collection__UAB.upper__S4R]=element__Q4R;
+    __tmp__J5R=FALSE__;
+  };
+  if ((! __tmp__J5R)) {
+    if ((Self__X4R->parent_arrayed_collection__0AB.capacity__24R ==  0)) {
+      Self__X4R->parent_arrayed_collection__0AB.storage__Y5R=create__KZNB( 2);
+      Self__X4R->parent_arrayed_collection__0AB.capacity__24R= 2;
+      Self__X4R->parent_arrayed_collection__0AB.upper__04R= 0;
+    } else {
+      new_capacity__Z4R=(__INTEGER)(Self__X4R->parent_arrayed_collection__0AB.capacity__24R <<  1);
+      __tmp__BAS=Self__X4R->parent_arrayed_collection__0AB.storage__Y5R;
+      __tmp__CAS=Self__X4R->parent_arrayed_collection__0AB.capacity__24R;
+      new__RVDC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__BAS)),((__UINTEGER_32 )(__INTEGER)(__tmp__CAS * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Z4R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__FWDC=(__INTEGER)(new_capacity__Z4R -  1);
+      Self__Z5UD=__tmp__CAS;
+      while ((Self__Z5UD <= __tmp__FWDC)) {
+        new__RVDC[Self__Z5UD]=NULL;
+        Self__Z5UD=(__INTEGER)(Self__Z5UD +  1);
+      };
+      Self__X4R->parent_arrayed_collection__0AB.storage__Y5R=new__RVDC;
+      Self__X4R->parent_arrayed_collection__0AB.capacity__24R=new_capacity__Z4R;
+      Self__X4R->parent_arrayed_collection__0AB.upper__04R=(__INTEGER)(Self__X4R->parent_arrayed_collection__0AB.upper__04R +  1);
+    };
+  };
+  ((void **)Self__X4R->parent_arrayed_collection__0AB.storage__Y5R)[Self__X4R->parent_arrayed_collection__0AB.upper__04R]=element__Y4R;
 }
 
-static __BOOLEAN open__ZERD(__DIRECTORY_UNIX *Self__0ERD)
+static __BOOLEAN open__BFRD(__DIRECTORY_UNIX *Self__CFRD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __POINTER dirent__AFRD,ptr__SZLE,ptr_table__XEHH,next__WEHH;
-  __POINTER result__YEHH,ptr_table__2EHH,next__1EHH,result__3EHH;
-  __POINTER dir__4ERD,ptr__GFHH,ptr_table__QFHH,next__PFHH,result__RFHH;
-  __POINTER ptr_table__VFHH,next__UFHH,result__WFHH,ptr__GDNF;
-  __POINTER ptr_table__0FHH,next__ZFHH,result__1FHH,ptr_table__5FHH;
-  __POINTER next__4FHH,result__AGHH;
-  __INTEGER i__EFRD,typ_id__XZLE,i__BFHH,Self__MYEF,i__PAEH,j__RAEH;
-  __INTEGER Self__D2FH,idx__5K3E,idx__UC3,n__GUTD,n__CLEH,typ_id__HFHH;
-  __INTEGER typ_id__LDNF;
-  __UINTEGER_32 sz__UZLE,a__45DH,new_size__55DH,t__DAEH,a__CAEH;
-  __UINTEGER_32 new_size__5EHH,lab_type__4EHH,sz__IFHH,a__JFHH;
-  __UINTEGER_32 new_size__KFHH,t__LFHH,a__MFHH,new_size__YFHH;
-  __UINTEGER_32 lab_type__XFHH,sz__IDNF,a__LMEH,new_size__MMEH,t__QMEH;
-  __UINTEGER_32 a__PMEH,new_size__CGHH,lab_type__BGHH;
-  __STRING *new__YSQE,*Self__5SQE,*Self__ZC3E,*Self__OAEH,*Self__ZXSD;
-  __STRING *Self__FUTD;
-  void *other__QAEH;
-  void *result__4K3E;
-  void *__tmp__SN3E,*dir__QN3E;
-  void *__tmp__THRD;
-  __CHARACTER *n__3ERD,*Self__CFHH,*other__DFHH,*Self__E2FH,*model__F2FH;
-  __CHARACTER *Self__IC3;
-  __BOOLEAN result__DFRD,result__QURE,__tmp__BN3E;
-  __LINKED_LISToENTRYo *result__RZLE,*Self__A1VE,*Self__SPLF;
-  __LINKED_LIST_NODEoENTRYo *result__FFHH,*Self__NFHH,*result__FDNF;
-  __LINKED_LIST_NODEoENTRYo *Self__FLPF;
-  n__3ERD=NULL;
-  dirent__AFRD=((__POINTER )(NULL));
-  result__DFRD=FALSE__;
-  i__EFRD= 0;
-  if (((void *)Self__0ERD->parent_directory__0ED.list__IFRD == (void *)NULL)) {
-    result__RZLE=NULL;
-    ptr__SZLE=((__POINTER )(NULL));
-    typ_id__XZLE= 0;
-    sz__UZLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
-    if ((sz__UZLE ==  0)) {
-      result__RZLE=LINKED_LISToENTRYo__;
-    } else {
-      typ_id__XZLE=__LINKED_LISToENTRYo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UZLE);
-      if ((typ_id__XZLE == (__INTEGER)(-  1))) {
-        a__45DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__55DH=(__UINTEGER_32)((__UINTEGER_32)(sz__UZLE + a__45DH) & (__UINTEGER_32)(~ a__45DH));
-        ptr_table__XEHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__55DH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__WEHH=((__POINTER )(NULL));
-        result__YEHH=((__POINTER *)ptr_table__XEHH)[ 0];
-        if ((result__YEHH == (void *)NULL)) {
-          result__YEHH=new_lab__MRJ(new_size__55DH);
-          next__WEHH=(void *)((unsigned long)result__YEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55DH)));
-          ((__POINTER *)next__WEHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XEHH)[ 0]=next__WEHH;
-        } else {
-          next__WEHH=((__POINTER *)result__YEHH)[ 0];
-          if ((next__WEHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YEHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__55DH <<  1)) <=  4096)) {
-              next__WEHH=(void *)((unsigned long)result__YEHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55DH)));
+  __POINTER dirent__IFRD,ptr__KVLE,ptr_table__SGIH,next__RGIH;
+  __POINTER result__TGIH,ptr_table__XGIH,next__WGIH,result__YGIH;
+  __POINTER dir__GFRD,ptr__BHIH,ptr_table__LHIH,next__KHIH,result__MHIH;
+  __POINTER ptr_table__QHIH,next__PHIH,result__RHIH,ptr__CPNF;
+  __POINTER ptr_table__VHIH,next__UHIH,result__WHIH,ptr_table__0HIH;
+  __POINTER next__ZHIH,result__1HIH;
+  __INTEGER i__MFRD,typ_id__PVLE,i__2GIH,Self__ODFF,i__QBFH,j__SBFH;
+  __INTEGER Self__T3GH,idx__LV3E,idx__2C3,n__OUTD,n__SMFH,typ_id__CHIH;
+  __INTEGER typ_id__HPNF;
+  __UINTEGER_32 sz__MVLE,a__2AFH,new_size__3AFH,t__BBFH,a__ABFH;
+  __UINTEGER_32 new_size__0GIH,lab_type__ZGIH,sz__DHIH,a__EHIH;
+  __UINTEGER_32 new_size__FHIH,t__GHIH,a__HHIH,new_size__THIH;
+  __UINTEGER_32 lab_type__SHIH,sz__EPNF,a__1NFH,new_size__2NFH,t__AOFH;
+  __UINTEGER_32 a__5NFH,new_size__3HIH,lab_type__2HIH;
+  __STRING *new__JSQE,*Self__DBFH,*Self__FN3E,*Self__PBFH,*Self__BYSD;
+  __STRING *Self__NUTD;
+  void *other__RBFH;
+  void *result__KV3E;
+  void *__tmp__4X3E,*dir__2X3E;
+  void *__tmp__1HRD;
+  __CHARACTER *n__FFRD,*Self__3GIH,*other__4GIH,*Self__U3GH,*model__V3GH;
+  __CHARACTER *Self__QC3;
+  __BOOLEAN result__LFRD,result__CBFH,__tmp__NX3E;
+  __LINKED_LISToENTRYo *result__JVLE,*Self__D1VE,*Self__40LF;
+  __LINKED_LIST_NODEoENTRYo *result__AHIH,*Self__IHIH,*result__BPNF;
+  __LINKED_LIST_NODEoENTRYo *Self__JXPF;
+  n__FFRD=NULL;
+  dirent__IFRD=((__POINTER )(NULL));
+  result__LFRD=FALSE__;
+  i__MFRD= 0;
+  if (((void *)Self__CFRD->parent_directory__CFD.list__QFRD == (void *)NULL)) {
+    result__JVLE=NULL;
+    ptr__KVLE=((__POINTER )(NULL));
+    typ_id__PVLE= 0;
+    sz__MVLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__MVLE ==  0)) {
+      result__JVLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__PVLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__MVLE);
+      if ((typ_id__PVLE == (__INTEGER)(-  1))) {
+        a__2AFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3AFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVLE + a__2AFH) & (__UINTEGER_32)(~ a__2AFH));
+        ptr_table__SGIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3AFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__RGIH=((__POINTER )(NULL));
+        result__TGIH=((__POINTER *)ptr_table__SGIH)[ 0];
+        if ((result__TGIH == (void *)NULL)) {
+          result__TGIH=new_lab__URJ(new_size__3AFH);
+          next__RGIH=(void *)((unsigned long)result__TGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3AFH)));
+          ((__POINTER *)next__RGIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SGIH)[ 0]=next__RGIH;
+        } else {
+          next__RGIH=((__POINTER *)result__TGIH)[ 0];
+          if ((next__RGIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TGIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3AFH <<  1)) <=  4096)) {
+              next__RGIH=(void *)((unsigned long)result__TGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3AFH)));
             } else {
-              next__WEHH=new_lab__MRJ(new_size__55DH);
-            };
-            ((__POINTER *)next__WEHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XEHH)[ 0]=next__WEHH;
-          } else {
-            ((__POINTER *)result__YEHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WEHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YEHH=next__WEHH;
-          };
-        };
-        ptr__SZLE=result__YEHH;
-      } else {
-        t__DAEH=((__UINTEGER_32 )typ_id__XZLE);
-        a__CAEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5EHH=(__UINTEGER_32)((__UINTEGER_32)(sz__UZLE + a__CAEH) & (__UINTEGER_32)(~ a__CAEH));
-        ptr_table__2EHH=((__POINTER )(&(table_type[(t__DAEH)])));
-        lab_type__4EHH=(__UINTEGER_32)(t__DAEH |  1);
-        next__1EHH=((__POINTER )(NULL));
-        result__3EHH=((__POINTER *)ptr_table__2EHH)[ 0];
-        if ((result__3EHH == (void *)NULL)) {
-          result__3EHH=new_lab__MRJ(lab_type__4EHH);
-          next__1EHH=(void *)((unsigned long)result__3EHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EHH)));
-          ((__POINTER *)next__1EHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2EHH)[ 0]=next__1EHH;
-        } else {
-          next__1EHH=((__POINTER *)result__3EHH)[ 0];
-          if ((next__1EHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3EHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5EHH <<  1)) <=  4096)) {
-              next__1EHH=(void *)((unsigned long)result__3EHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EHH)));
+              next__RGIH=new_lab__URJ(new_size__3AFH);
+            };
+            ((__POINTER *)next__RGIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SGIH)[ 0]=next__RGIH;
+          } else {
+            ((__POINTER *)result__TGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TGIH=next__RGIH;
+          };
+        };
+        ptr__KVLE=result__TGIH;
+      } else {
+        t__BBFH=((__UINTEGER_32 )typ_id__PVLE);
+        a__ABFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0GIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVLE + a__ABFH) & (__UINTEGER_32)(~ a__ABFH));
+        ptr_table__XGIH=((__POINTER )(&(table_type[(t__BBFH)])));
+        lab_type__ZGIH=(__UINTEGER_32)(t__BBFH |  1);
+        next__WGIH=((__POINTER )(NULL));
+        result__YGIH=((__POINTER *)ptr_table__XGIH)[ 0];
+        if ((result__YGIH == (void *)NULL)) {
+          result__YGIH=new_lab__URJ(lab_type__ZGIH);
+          next__WGIH=(void *)((unsigned long)result__YGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GIH)));
+          ((__POINTER *)next__WGIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XGIH)[ 0]=next__WGIH;
+        } else {
+          next__WGIH=((__POINTER *)result__YGIH)[ 0];
+          if ((next__WGIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YGIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0GIH <<  1)) <=  4096)) {
+              next__WGIH=(void *)((unsigned long)result__YGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0GIH)));
             } else {
-              next__1EHH=new_lab__MRJ(lab_type__4EHH);
+              next__WGIH=new_lab__URJ(lab_type__ZGIH);
             };
-            ((__POINTER *)next__1EHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2EHH)[ 0]=next__1EHH;
+            ((__POINTER *)next__WGIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XGIH)[ 0]=next__WGIH;
           } else {
-            ((__POINTER *)result__3EHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1EHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3EHH=next__1EHH;
+            ((__POINTER *)result__YGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YGIH=next__WGIH;
           };
         };
-        ptr__SZLE=result__3EHH;
+        ptr__KVLE=result__YGIH;
       };
-      result__RZLE=((__LINKED_LISToENTRYo *)ptr__SZLE);
-      *(result__RZLE) = *(LINKED_LISToENTRYo__);
+      result__JVLE=((__LINKED_LISToENTRYo *)ptr__KVLE);
+      *(result__JVLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__0ERD->parent_directory__0ED.list__IFRD=result__RZLE;
+    Self__CFRD->parent_directory__CFD.list__QFRD=result__JVLE;
   } else {
-    Self__A1VE=((__LINKED_LISToENTRYo *)Self__0ERD->parent_directory__0ED.list__IFRD);
-    if (((void *)Self__A1VE->first_link__C1VE != (void *)NULL)) {
-      Self__A1VE->first_link__C1VE=NULL;
-      Self__A1VE->mem_idx__J1VE= 0;
-      Self__A1VE->mem_lnk__K1VE=NULL;
-      Self__A1VE->parent_linked_collection__HFRD.upper__VM3D= 0;
-      Self__A1VE->last_link__L1VE=NULL;
-    };
-  };
-  dir__4ERD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD)->storage__VQO))));
-  if ((dir__4ERD != (void *)NULL)) {
-    result__DFRD=TRUE__;
+    Self__D1VE=((__LINKED_LISToENTRYo *)Self__CFRD->parent_directory__CFD.list__QFRD);
+    if (((void *)Self__D1VE->first_link__F1VE != (void *)NULL)) {
+      Self__D1VE->first_link__F1VE=NULL;
+      Self__D1VE->mem_idx__M1VE= 0;
+      Self__D1VE->mem_lnk__N1VE=NULL;
+      Self__D1VE->parent_linked_collection__PFRD.upper__QM3D= 0;
+      Self__D1VE->last_link__O1VE=NULL;
+    };
+  };
+  dir__GFRD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__CFRD->parent_entry_unix__BFD.parent_entry__AFD.path__BD)->storage__3QO))));
+  if ((dir__GFRD != (void *)NULL)) {
+    result__LFRD=TRUE__;
     do {
-      dirent__AFRD=((__POINTER )(readdir((dir__4ERD))));
-      if ((dirent__AFRD != (void *)NULL)) {
-        n__3ERD=((__CHARACTER *)(((struct dirent *)(dirent__AFRD))->d_name));
-        ((__STRING *)string_tmp__TED)->count__WFC= 0;
-        i__EFRD= 0;
-        while ((((__CHARACTER *)n__3ERD)[i__EFRD] != '\0')) {
-          add_last__ZLT(string_tmp__TED,((__CHARACTER *)n__3ERD)[i__EFRD]);
-          i__EFRD=(__INTEGER)(i__EFRD +  1);
-        };
-        new__YSQE=create__NBB(((__STRING_CONSTANT *)(&__string_221))->count__DD);
-        copy__ZCS(new__YSQE,(&__string_221));
-        Self__5SQE=((__STRING *)string_tmp__TED);
-        result__QURE=FALSE__;
-        if ((Self__5SQE->count__WFC == new__YSQE->count__WFC)) {
-          if ((Self__5SQE->count__WFC ==  0)) {
-            result__QURE=TRUE__;
-          } else {
-            Self__CFHH=((__CHARACTER *)Self__5SQE->storage__BCS);
-            other__DFHH=new__YSQE->storage__BCS;
-            i__BFHH=(__INTEGER)(Self__5SQE->count__WFC -  1);
-            while (((i__BFHH >=  0) && (Self__CFHH[i__BFHH] == ((__CHARACTER *)other__DFHH)[i__BFHH]))) {
-              i__BFHH=(__INTEGER)(i__BFHH -  1);
-            };
-            result__QURE=(i__BFHH <  0);
-          };
-        };
-        if ((! result__QURE)) {
-          Self__ZC3E=((__STRING *)string_tmp__TED);
-          add_last__ZLT(Self__ZC3E,' ');
-          Self__MYEF=Self__ZC3E->count__WFC;
-          while ((Self__MYEF >=  2)) {
-            ((__CHARACTER *)Self__ZC3E->storage__BCS)[(__INTEGER)(Self__MYEF -  1)]=((__CHARACTER *)Self__ZC3E->storage__BCS)[(__INTEGER)((__INTEGER)(Self__MYEF -  1) -  1)];
-            Self__MYEF=(__INTEGER)(Self__MYEF -  1);
-          };
-          ((__CHARACTER *)Self__ZC3E->storage__BCS)[ 0]='/';
-          Self__OAEH=((__STRING *)string_tmp__TED);
-          other__QAEH=Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD;
-          i__PAEH=Self__OAEH->count__WFC;
-          j__RAEH=((__STRING_CONSTANT *)other__QAEH)->count__DD;
-          resize__YXZ(Self__OAEH,(__INTEGER)(i__PAEH + j__RAEH));
-          if (((i__PAEH >  0) && (j__RAEH >  0))) {
-            move__to__by__BWCC(Self__OAEH->storage__BCS, 0,(__INTEGER)(i__PAEH -  1),j__RAEH);
-          };
-          Self__E2FH=((__CHARACTER *)Self__OAEH->storage__BCS);
-          model__F2FH=((__STRING_CONSTANT *)other__QAEH)->storage__VQO;
-          Self__D2FH=(__INTEGER)(j__RAEH -  1);
-          while ((Self__D2FH >=  0)) {
-            Self__E2FH[Self__D2FH]=((__CHARACTER *)model__F2FH)[Self__D2FH];
-            Self__D2FH=(__INTEGER)(Self__D2FH -  1);
-          };
-          reduce_path__BE3E(string_tmp__TED);
-          result__4K3E=NULL;
-          idx__5K3E= 0;
-          copy__ZCS(string_tmp2__Z0AC,Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-          add_last__ZLT(string_tmp2__Z0AC,'/');
-          append__BOS(string_tmp2__Z0AC,string_tmp__TED);
-          reduce_path__BE3E(string_tmp2__Z0AC);
-          copy__ZCS(string_tmp3__50AC,string_tmp2__Z0AC);
+      dirent__IFRD=((__POINTER )(readdir((dir__GFRD))));
+      if ((dirent__IFRD != (void *)NULL)) {
+        n__FFRD=((__CHARACTER *)(((struct dirent *)(dirent__IFRD))->d_name));
+        ((__STRING *)string_tmp__1ED)->count__4FC= 0;
+        i__MFRD= 0;
+        while ((((__CHARACTER *)n__FFRD)[i__MFRD] != '\0')) {
+          add_last__BMT(string_tmp__1ED,((__CHARACTER *)n__FFRD)[i__MFRD]);
+          i__MFRD=(__INTEGER)(i__MFRD +  1);
+        };
+        new__JSQE=create__TBB(((__STRING_CONSTANT *)(&__string_219))->count__DD);
+        copy__BDS(new__JSQE,(&__string_219));
+        Self__DBFH=((__STRING *)string_tmp__1ED);
+        result__CBFH=FALSE__;
+        if ((Self__DBFH->count__4FC == new__JSQE->count__4FC)) {
+          if ((Self__DBFH->count__4FC ==  0)) {
+            result__CBFH=TRUE__;
+          } else {
+            Self__3GIH=((__CHARACTER *)Self__DBFH->storage__JCS);
+            other__4GIH=new__JSQE->storage__JCS;
+            i__2GIH=(__INTEGER)(Self__DBFH->count__4FC -  1);
+            while (((i__2GIH >=  0) && (Self__3GIH[i__2GIH] == ((__CHARACTER *)other__4GIH)[i__2GIH]))) {
+              i__2GIH=(__INTEGER)(i__2GIH -  1);
+            };
+            result__CBFH=(i__2GIH <  0);
+          };
+        };
+        if ((! result__CBFH)) {
+          Self__FN3E=((__STRING *)string_tmp__1ED);
+          add_last__BMT(Self__FN3E,' ');
+          Self__ODFF=Self__FN3E->count__4FC;
+          while ((Self__ODFF >=  2)) {
+            ((__CHARACTER *)Self__FN3E->storage__JCS)[(__INTEGER)(Self__ODFF -  1)]=((__CHARACTER *)Self__FN3E->storage__JCS)[(__INTEGER)((__INTEGER)(Self__ODFF -  1) -  1)];
+            Self__ODFF=(__INTEGER)(Self__ODFF -  1);
+          };
+          ((__CHARACTER *)Self__FN3E->storage__JCS)[ 0]='/';
+          Self__PBFH=((__STRING *)string_tmp__1ED);
+          other__RBFH=Self__CFRD->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
+          i__QBFH=Self__PBFH->count__4FC;
+          j__SBFH=((__STRING_CONSTANT *)other__RBFH)->count__DD;
+          resize__AYZ(Self__PBFH,(__INTEGER)(i__QBFH + j__SBFH));
+          if (((i__QBFH >  0) && (j__SBFH >  0))) {
+            move__to__by__JWCC(Self__PBFH->storage__JCS, 0,(__INTEGER)(i__QBFH -  1),j__SBFH);
+          };
+          Self__U3GH=((__CHARACTER *)Self__PBFH->storage__JCS);
+          model__V3GH=((__STRING_CONSTANT *)other__RBFH)->storage__3QO;
+          Self__T3GH=(__INTEGER)(j__SBFH -  1);
+          while ((Self__T3GH >=  0)) {
+            Self__U3GH[Self__T3GH]=((__CHARACTER *)model__V3GH)[Self__T3GH];
+            Self__T3GH=(__INTEGER)(Self__T3GH -  1);
+          };
+          reduce_path__NO3E(string_tmp__1ED);
+          result__KV3E=NULL;
+          idx__LV3E= 0;
+          copy__BDS(string_tmp2__B1AC,Self__CFRD->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+          add_last__BMT(string_tmp2__B1AC,'/');
+          append__JOS(string_tmp2__B1AC,string_tmp__1ED);
+          reduce_path__NO3E(string_tmp2__B1AC);
+          copy__BDS(string_tmp3__H1AC,string_tmp2__B1AC);
           do {
-            result__4K3E=reference_at__EU0C(alias__EFD,string_tmp2__Z0AC);
-            if (((void *)result__4K3E == (void *)NULL)) {
-              Self__ZXSD=((__STRING *)string_tmp2__Z0AC);
-              Self__IC3=((__CHARACTER *)Self__ZXSD->storage__BCS);
-              idx__UC3=(__INTEGER)(Self__ZXSD->count__WFC -  1);
-              while ((! ((idx__UC3 <  0) || ('/' == Self__IC3[idx__UC3])))) {
-                idx__UC3=(__INTEGER)(idx__UC3 -  1);
+            result__KV3E=reference_at__MU0C(alias__MFD,string_tmp2__B1AC);
+            if (((void *)result__KV3E == (void *)NULL)) {
+              Self__BYSD=((__STRING *)string_tmp2__B1AC);
+              Self__QC3=((__CHARACTER *)Self__BYSD->storage__JCS);
+              idx__2C3=(__INTEGER)(Self__BYSD->count__4FC -  1);
+              while ((! ((idx__2C3 <  0) || ('/' == Self__QC3[idx__2C3])))) {
+                idx__2C3=(__INTEGER)(idx__2C3 -  1);
               };
-              idx__5K3E=(__INTEGER)( 1 + idx__UC3);
-              if ((idx__5K3E >  0)) {
-                Self__FUTD=((__STRING *)string_tmp2__Z0AC);
-                n__GUTD=(__INTEGER)(idx__5K3E -  1);
-                if ((n__GUTD < Self__FUTD->count__WFC)) {
-                  n__CLEH=(__INTEGER)(Self__FUTD->count__WFC - n__GUTD);
-                  if ((n__CLEH > Self__FUTD->count__WFC)) {
-                    Self__FUTD->count__WFC= 0;
+              idx__LV3E=(__INTEGER)( 1 + idx__2C3);
+              if ((idx__LV3E >  0)) {
+                Self__NUTD=((__STRING *)string_tmp2__B1AC);
+                n__OUTD=(__INTEGER)(idx__LV3E -  1);
+                if ((n__OUTD < Self__NUTD->count__4FC)) {
+                  n__SMFH=(__INTEGER)(Self__NUTD->count__4FC - n__OUTD);
+                  if ((n__SMFH > Self__NUTD->count__4FC)) {
+                    Self__NUTD->count__4FC= 0;
                   } else {
-                    Self__FUTD->count__WFC=(__INTEGER)(Self__FUTD->count__WFC - n__CLEH);
+                    Self__NUTD->count__4FC=(__INTEGER)(Self__NUTD->count__4FC - n__SMFH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__Z0AC)->count__WFC= 0;
+                ((__STRING *)string_tmp2__B1AC)->count__4FC= 0;
               };
             };
-          } while ((((void *)result__4K3E == (void *)NULL) && (((__STRING *)string_tmp2__Z0AC)->count__WFC !=  0)));
-          if (((void *)result__4K3E == (void *)NULL)) {
-            if (FILE_SYSTEM__->parent_directory__PFD==0) {
+          } while ((((void *)result__KV3E == (void *)NULL) && (((__STRING *)string_tmp2__B1AC)->count__4FC !=  0)));
+          if (((void *)result__KV3E == (void *)NULL)) {
+            if (FILE_SYSTEM__->parent_directory__XFD==0) {
             } else {
-              parent_directory__OED();
+              parent_directory__WED();
             };
-            result__4K3E=physical_get_entry__YW0C(string_tmp3__50AC);
-            __tmp__BN3E=TRUE__;
+            result__KV3E=physical_get_entry__AX0C(string_tmp3__H1AC);
+            __tmp__NX3E=TRUE__;
           } else {
-            __tmp__BN3E=FALSE__;
+            __tmp__NX3E=FALSE__;
           };
-          if ((! __tmp__BN3E)) {
-            if ((((__STRING *)string_tmp3__50AC)->count__WFC != ((__STRING *)string_tmp2__Z0AC)->count__WFC)) {
-              if (result__4K3E==NULL) {
-                __tmp__SN3E=NULL;
+          if ((! __tmp__NX3E)) {
+            if ((((__STRING *)string_tmp3__H1AC)->count__4FC != ((__STRING *)string_tmp2__B1AC)->count__4FC)) {
+              if (result__KV3E==NULL) {
+                __tmp__4X3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__4K3E)->__id) {
+                switch (((struct ___OBJ *)result__KV3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__SN3E=((void *)result__4K3E);
+                  __tmp__4X3E=((void *)result__KV3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__SN3E=NULL;
+                  __tmp__4X3E=NULL;
                 } break;
                 }
               };
-              dir__QN3E=__tmp__SN3E;
-              result__4K3E=physical_get_entry__JCF(string_tmp3__50AC);
+              dir__2X3E=__tmp__4X3E;
+              result__KV3E=physical_get_entry__RCF(string_tmp3__H1AC);
             };
           };
-          if (((void *)result__4K3E == (void *)NULL)) {
-            result__DFRD=FALSE__;
+          if (((void *)result__KV3E == (void *)NULL)) {
+            result__LFRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__4K3E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__THRD=((__DIRECTORY_UNIX *)result__4K3E)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+            if (((struct ___OBJ *)result__KV3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__1HRD=((__DIRECTORY_UNIX *)result__KV3E)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
             } else {
-              __tmp__THRD=((__FILE_UNIX *)result__4K3E)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
-            };
-            if ((((__STRING_CONSTANT *)__tmp__THRD)->count__DD >= ((__STRING_CONSTANT *)Self__0ERD->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD)) {
-              Self__SPLF=((__LINKED_LISToENTRYo *)Self__0ERD->parent_directory__0ED.list__IFRD);
-              if (((void *)Self__SPLF->first_link__C1VE == (void *)NULL)) {
-                result__FFHH=NULL;
-                ptr__GFHH=((__POINTER )(NULL));
-                typ_id__HFHH= 0;
-                sz__IFHH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__IFHH ==  0)) {
-                  result__FFHH=LINKED_LIST_NODEoENTRYo__;
+              __tmp__1HRD=((__FILE_UNIX *)result__KV3E)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__1HRD)->count__DD >= ((__STRING_CONSTANT *)Self__CFRD->parent_entry_unix__BFD.parent_entry__AFD.path__BD)->count__DD)) {
+              Self__40LF=((__LINKED_LISToENTRYo *)Self__CFRD->parent_directory__CFD.list__QFRD);
+              if (((void *)Self__40LF->first_link__F1VE == (void *)NULL)) {
+                result__AHIH=NULL;
+                ptr__BHIH=((__POINTER )(NULL));
+                typ_id__CHIH= 0;
+                sz__DHIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__DHIH ==  0)) {
+                  result__AHIH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  typ_id__HFHH=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IFHH);
-                  if ((typ_id__HFHH == (__INTEGER)(-  1))) {
-                    a__JFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__KFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFHH + a__JFHH) & (__UINTEGER_32)(~ a__JFHH));
-                    ptr_table__QFHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__PFHH=((__POINTER )(NULL));
-                    result__RFHH=((__POINTER *)ptr_table__QFHH)[ 0];
-                    if ((result__RFHH == (void *)NULL)) {
-                      result__RFHH=new_lab__MRJ(new_size__KFHH);
-                      next__PFHH=(void *)((unsigned long)result__RFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFHH)));
-                      ((__POINTER *)next__PFHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__QFHH)[ 0]=next__PFHH;
+                  typ_id__CHIH=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__DHIH);
+                  if ((typ_id__CHIH == (__INTEGER)(-  1))) {
+                    a__EHIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__FHIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DHIH + a__EHIH) & (__UINTEGER_32)(~ a__EHIH));
+                    ptr_table__LHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FHIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__KHIH=((__POINTER )(NULL));
+                    result__MHIH=((__POINTER *)ptr_table__LHIH)[ 0];
+                    if ((result__MHIH == (void *)NULL)) {
+                      result__MHIH=new_lab__URJ(new_size__FHIH);
+                      next__KHIH=(void *)((unsigned long)result__MHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHIH)));
+                      ((__POINTER *)next__KHIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__LHIH)[ 0]=next__KHIH;
                     } else {
-                      next__PFHH=((__POINTER *)result__RFHH)[ 0];
-                      if ((next__PFHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RFHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KFHH <<  1)) <=  4096)) {
-                          next__PFHH=(void *)((unsigned long)result__RFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KFHH)));
+                      next__KHIH=((__POINTER *)result__MHIH)[ 0];
+                      if ((next__KHIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MHIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FHIH <<  1)) <=  4096)) {
+                          next__KHIH=(void *)((unsigned long)result__MHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHIH)));
                         } else {
-                          next__PFHH=new_lab__MRJ(new_size__KFHH);
+                          next__KHIH=new_lab__URJ(new_size__FHIH);
                         };
-                        ((__POINTER *)next__PFHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__QFHH)[ 0]=next__PFHH;
+                        ((__POINTER *)next__KHIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__LHIH)[ 0]=next__KHIH;
                       } else {
-                        ((__POINTER *)result__RFHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__RFHH=next__PFHH;
+                        ((__POINTER *)result__MHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__MHIH=next__KHIH;
                       };
                     };
-                    ptr__GFHH=result__RFHH;
+                    ptr__BHIH=result__MHIH;
                   } else {
-                    t__LFHH=((__UINTEGER_32 )typ_id__HFHH);
-                    a__MFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__YFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IFHH + a__MFHH) & (__UINTEGER_32)(~ a__MFHH));
-                    ptr_table__VFHH=((__POINTER )(&(table_type[(t__LFHH)])));
-                    lab_type__XFHH=(__UINTEGER_32)(t__LFHH |  1);
-                    next__UFHH=((__POINTER )(NULL));
-                    result__WFHH=((__POINTER *)ptr_table__VFHH)[ 0];
-                    if ((result__WFHH == (void *)NULL)) {
-                      result__WFHH=new_lab__MRJ(lab_type__XFHH);
-                      next__UFHH=(void *)((unsigned long)result__WFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFHH)));
-                      ((__POINTER *)next__UFHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__VFHH)[ 0]=next__UFHH;
+                    t__GHIH=((__UINTEGER_32 )typ_id__CHIH);
+                    a__HHIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__THIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DHIH + a__HHIH) & (__UINTEGER_32)(~ a__HHIH));
+                    ptr_table__QHIH=((__POINTER )(&(table_type[(t__GHIH)])));
+                    lab_type__SHIH=(__UINTEGER_32)(t__GHIH |  1);
+                    next__PHIH=((__POINTER )(NULL));
+                    result__RHIH=((__POINTER *)ptr_table__QHIH)[ 0];
+                    if ((result__RHIH == (void *)NULL)) {
+                      result__RHIH=new_lab__URJ(lab_type__SHIH);
+                      next__PHIH=(void *)((unsigned long)result__RHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THIH)));
+                      ((__POINTER *)next__PHIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QHIH)[ 0]=next__PHIH;
                     } else {
-                      next__UFHH=((__POINTER *)result__WFHH)[ 0];
-                      if ((next__UFHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WFHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YFHH <<  1)) <=  4096)) {
-                          next__UFHH=(void *)((unsigned long)result__WFHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFHH)));
+                      next__PHIH=((__POINTER *)result__RHIH)[ 0];
+                      if ((next__PHIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RHIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__THIH <<  1)) <=  4096)) {
+                          next__PHIH=(void *)((unsigned long)result__RHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__THIH)));
                         } else {
-                          next__UFHH=new_lab__MRJ(lab_type__XFHH);
+                          next__PHIH=new_lab__URJ(lab_type__SHIH);
                         };
-                        ((__POINTER *)next__UFHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__VFHH)[ 0]=next__UFHH;
+                        ((__POINTER *)next__PHIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__QHIH)[ 0]=next__PHIH;
                       } else {
-                        ((__POINTER *)result__WFHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__WFHH=next__UFHH;
+                        ((__POINTER *)result__RHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__RHIH=next__PHIH;
                       };
                     };
-                    ptr__GFHH=result__WFHH;
+                    ptr__BHIH=result__RHIH;
                   };
-                  result__FFHH=((__LINKED_LIST_NODEoENTRYo *)ptr__GFHH);
-                  *(result__FFHH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__AHIH=((__LINKED_LIST_NODEoENTRYo *)ptr__BHIH);
+                  *(result__AHIH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__NFHH=((__LINKED_LIST_NODEoENTRYo *)result__FFHH);
-                Self__NFHH->item__FOWE=result__4K3E;
-                Self__NFHH->next__05EF=NULL;
-                Self__SPLF->first_link__C1VE=result__FFHH;
-                Self__SPLF->parent_linked_collection__HFRD.upper__VM3D= 1;
-                Self__SPLF->last_link__L1VE=result__FFHH;
-                Self__SPLF->mem_idx__J1VE= 1;
-                Self__SPLF->mem_lnk__K1VE=result__FFHH;
+                Self__IHIH=((__LINKED_LIST_NODEoENTRYo *)result__AHIH);
+                Self__IHIH->item__IOWE=result__KV3E;
+                Self__IHIH->next__2KFF=NULL;
+                Self__40LF->first_link__F1VE=result__AHIH;
+                Self__40LF->parent_linked_collection__PFRD.upper__QM3D= 1;
+                Self__40LF->last_link__O1VE=result__AHIH;
+                Self__40LF->mem_idx__M1VE= 1;
+                Self__40LF->mem_lnk__N1VE=result__AHIH;
               } else {
-                result__FDNF=NULL;
-                ptr__GDNF=((__POINTER )(NULL));
-                typ_id__LDNF= 0;
-                sz__IDNF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
-                if ((sz__IDNF ==  0)) {
-                  result__FDNF=LINKED_LIST_NODEoENTRYo__;
+                result__BPNF=NULL;
+                ptr__CPNF=((__POINTER )(NULL));
+                typ_id__HPNF= 0;
+                sz__EPNF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__EPNF ==  0)) {
+                  result__BPNF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  typ_id__LDNF=__LINKED_LIST_NODEoENTRYo__;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IDNF);
-                  if ((typ_id__LDNF == (__INTEGER)(-  1))) {
-                    a__LMEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__MMEH=(__UINTEGER_32)((__UINTEGER_32)(sz__IDNF + a__LMEH) & (__UINTEGER_32)(~ a__LMEH));
-                    ptr_table__0FHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MMEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__ZFHH=((__POINTER )(NULL));
-                    result__1FHH=((__POINTER *)ptr_table__0FHH)[ 0];
-                    if ((result__1FHH == (void *)NULL)) {
-                      result__1FHH=new_lab__MRJ(new_size__MMEH);
-                      next__ZFHH=(void *)((unsigned long)result__1FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMEH)));
-                      ((__POINTER *)next__ZFHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__0FHH)[ 0]=next__ZFHH;
+                  typ_id__HPNF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__EPNF);
+                  if ((typ_id__HPNF == (__INTEGER)(-  1))) {
+                    a__1NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__2NFH=(__UINTEGER_32)((__UINTEGER_32)(sz__EPNF + a__1NFH) & (__UINTEGER_32)(~ a__1NFH));
+                    ptr_table__VHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2NFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__UHIH=((__POINTER )(NULL));
+                    result__WHIH=((__POINTER *)ptr_table__VHIH)[ 0];
+                    if ((result__WHIH == (void *)NULL)) {
+                      result__WHIH=new_lab__URJ(new_size__2NFH);
+                      next__UHIH=(void *)((unsigned long)result__WHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NFH)));
+                      ((__POINTER *)next__UHIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__VHIH)[ 0]=next__UHIH;
                     } else {
-                      next__ZFHH=((__POINTER *)result__1FHH)[ 0];
-                      if ((next__ZFHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1FHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MMEH <<  1)) <=  4096)) {
-                          next__ZFHH=(void *)((unsigned long)result__1FHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMEH)));
+                      next__UHIH=((__POINTER *)result__WHIH)[ 0];
+                      if ((next__UHIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WHIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2NFH <<  1)) <=  4096)) {
+                          next__UHIH=(void *)((unsigned long)result__WHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NFH)));
                         } else {
-                          next__ZFHH=new_lab__MRJ(new_size__MMEH);
+                          next__UHIH=new_lab__URJ(new_size__2NFH);
                         };
-                        ((__POINTER *)next__ZFHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__0FHH)[ 0]=next__ZFHH;
+                        ((__POINTER *)next__UHIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__VHIH)[ 0]=next__UHIH;
                       } else {
-                        ((__POINTER *)result__1FHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__1FHH=next__ZFHH;
+                        ((__POINTER *)result__WHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__WHIH=next__UHIH;
                       };
                     };
-                    ptr__GDNF=result__1FHH;
+                    ptr__CPNF=result__WHIH;
                   } else {
-                    t__QMEH=((__UINTEGER_32 )typ_id__LDNF);
-                    a__PMEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__CGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IDNF + a__PMEH) & (__UINTEGER_32)(~ a__PMEH));
-                    ptr_table__5FHH=((__POINTER )(&(table_type[(t__QMEH)])));
-                    lab_type__BGHH=(__UINTEGER_32)(t__QMEH |  1);
-                    next__4FHH=((__POINTER )(NULL));
-                    result__AGHH=((__POINTER *)ptr_table__5FHH)[ 0];
-                    if ((result__AGHH == (void *)NULL)) {
-                      result__AGHH=new_lab__MRJ(lab_type__BGHH);
-                      next__4FHH=(void *)((unsigned long)result__AGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGHH)));
-                      ((__POINTER *)next__4FHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__5FHH)[ 0]=next__4FHH;
+                    t__AOFH=((__UINTEGER_32 )typ_id__HPNF);
+                    a__5NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__3HIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EPNF + a__5NFH) & (__UINTEGER_32)(~ a__5NFH));
+                    ptr_table__0HIH=((__POINTER )(&(table_type[(t__AOFH)])));
+                    lab_type__2HIH=(__UINTEGER_32)(t__AOFH |  1);
+                    next__ZHIH=((__POINTER )(NULL));
+                    result__1HIH=((__POINTER *)ptr_table__0HIH)[ 0];
+                    if ((result__1HIH == (void *)NULL)) {
+                      result__1HIH=new_lab__URJ(lab_type__2HIH);
+                      next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HIH)));
+                      ((__POINTER *)next__ZHIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
                     } else {
-                      next__4FHH=((__POINTER *)result__AGHH)[ 0];
-                      if ((next__4FHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CGHH <<  1)) <=  4096)) {
-                          next__4FHH=(void *)((unsigned long)result__AGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGHH)));
+                      next__ZHIH=((__POINTER *)result__1HIH)[ 0];
+                      if ((next__ZHIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1HIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3HIH <<  1)) <=  4096)) {
+                          next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HIH)));
                         } else {
-                          next__4FHH=new_lab__MRJ(lab_type__BGHH);
+                          next__ZHIH=new_lab__URJ(lab_type__2HIH);
                         };
-                        ((__POINTER *)next__4FHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__5FHH)[ 0]=next__4FHH;
+                        ((__POINTER *)next__ZHIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
                       } else {
-                        ((__POINTER *)result__AGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__AGHH=next__4FHH;
+                        ((__POINTER *)result__1HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__1HIH=next__ZHIH;
                       };
                     };
-                    ptr__GDNF=result__AGHH;
+                    ptr__CPNF=result__1HIH;
                   };
-                  result__FDNF=((__LINKED_LIST_NODEoENTRYo *)ptr__GDNF);
-                  *(result__FDNF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__BPNF=((__LINKED_LIST_NODEoENTRYo *)ptr__CPNF);
+                  *(result__BPNF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                Self__FLPF=((__LINKED_LIST_NODEoENTRYo *)result__FDNF);
-                Self__FLPF->item__FOWE=result__4K3E;
-                Self__FLPF->next__05EF=NULL;
-                ((__LINKED_LIST_NODEoENTRYo *)Self__SPLF->last_link__L1VE)->next__05EF=result__FDNF;
-                Self__SPLF->parent_linked_collection__HFRD.upper__VM3D=(__INTEGER)(Self__SPLF->parent_linked_collection__HFRD.upper__VM3D +  1);
-                Self__SPLF->last_link__L1VE=result__FDNF;
+                Self__JXPF=((__LINKED_LIST_NODEoENTRYo *)result__BPNF);
+                Self__JXPF->item__IOWE=result__KV3E;
+                Self__JXPF->next__2KFF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__40LF->last_link__O1VE)->next__2KFF=result__BPNF;
+                Self__40LF->parent_linked_collection__PFRD.upper__QM3D=(__INTEGER)(Self__40LF->parent_linked_collection__PFRD.upper__QM3D +  1);
+                Self__40LF->last_link__O1VE=result__BPNF;
               };
             };
           };
         };
       };
-    } while (((dirent__AFRD != (void *)NULL) & result__DFRD));
-    closedir((dir__4ERD));
+    } while (((dirent__IFRD != (void *)NULL) & result__LFRD));
+    closedir((dir__GFRD));
   };
-  return(result__DFRD);
+  return(result__LFRD);
 }
 
-static void check_in__begin__4QQC(void *entry__ARQC,__INTEGER n__BRQC)
+static void check_in__begin__GRQC(void *entry__IRQC,__INTEGER n__JRQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  void *tok__DRQC,*__tmp__NRQC,*__tmp__3SQC,*k__TWDC,*k__0TDG;
-  void *__tmp__JVQC,*__tmp__OVQC;
-  void *dir__FRQC,*__tmp__URQC;
-  __FILE_UNIX *Self__PF2G;
-  __INTEGER __tmp__ZRQC,Self__ZM3D,__tmp__OSQC,Self__KN3D,i1__ZIS;
-  __INTEGER i2__0IS,Self__YPX,result__YCGH,__tmp__0CGH,Self__1CGH;
-  __INTEGER result__3CGH,__tmp__5CGH,Self__ADGH,__tmp__ZTQC,Self__KTDG;
-  __INTEGER result__CDGH,__tmp__EDGH,Self__FDGH,result__HDGH;
-  __INTEGER __tmp__JDGH,Self__KDGH,result__QDGH,__tmp__SDGH,Self__TDGH;
-  __INTEGER result__VDGH,__tmp__XDGH,Self__YDGH,i__IYBD,j__JYBD;
-  __INTEGER Self__ODKB,result__4DGH,__tmp__AEGH,Self__BEGH,result__DEGH;
-  __INTEGER __tmp__FEGH,Self__GEGH,len__BWU,__tmp__4WU,__tmp__5WU;
-  __INTEGER Self__WQGB,__tmp__PQS,Self__ISIC,result__MEGH,__tmp__OEGH;
-  __INTEGER Self__PEGH,result__REGH,__tmp__TEGH,Self__UEGH,__tmp__HYQC;
-  __INTEGER Self__TYRE;
-  void *__tmp__5RQC,*__tmp__USQC,*__tmp__2SQC,*__tmp__IVQC,*__tmp__NVQC;
-  __STRING_CONSTANT *Self__VIS,*Self__DDGH,*Self__IDGH;
-  __STRING *Self__ORS,*Self__USS,*Self__GYBD,*Self__Z32,*Self__HQS;
-  void *tok_lst__ERQC;
-  __BOOLEAN __tmp__GRQC,__tmp__ASQC,__tmp__VSQC,result__YIS;
-  __CHARACTER Self__WJOB,result__YJOB;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UCGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__K2FH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MDGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__O2FH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0DGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__V2FH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IEGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JX3;
-  void *node__WCGH,*node__M2FH,*node__ODGH,*node__Q2FH,*node__2DGH;
-  void *node__X2FH,*node__KEGH,*node__UX3;
-  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__SWDC,*Self__ZTDG;
-  void *node__2WDC,*node__EUDG;
-  __CHARACTER *Self__1MEB,*model__2MEB,*__tmp__MQS,*Self__HMBC;
-  tok__DRQC=NULL;
-  tok_lst__ERQC=NULL;
-  dir__FRQC=NULL;
-  if (((struct ___OBJ *)entry__ARQC)->__id==__DIRECTORY_UNIX__) {
-    __tmp__GRQC=open__ZERD(entry__ARQC);
+  void *tok__LRQC,*__tmp__VRQC,*__tmp__FTQC,*k__1WDC,*k__PMEG;
+  void *__tmp__RVQC,*__tmp__WVQC;
+  void *dir__NRQC,*__tmp__2RQC;
+  __FILE_UNIX *Self__4C3G;
+  __INTEGER __tmp__BSQC,Self__UM3D,__tmp__WSQC,Self__FN3D,i1__BJS;
+  __INTEGER i2__CJS,Self__AQX,result__LEHH,__tmp__NEHH,Self__OEHH;
+  __INTEGER result__QEHH,__tmp__SEHH,Self__TEHH,__tmp__BUQC,Self__5LEG;
+  __INTEGER result__VEHH,__tmp__XEHH,Self__YEHH,result__0EHH;
+  __INTEGER __tmp__2EHH,Self__3EHH,result__DFHH,__tmp__FFHH,Self__GFHH;
+  __INTEGER result__IFHH,__tmp__KFHH,Self__LFHH,i__QYBD,j__RYBD;
+  __INTEGER Self__WDKB,result__RFHH,__tmp__TFHH,Self__UFHH,result__WFHH;
+  __INTEGER __tmp__YFHH,Self__ZFHH,len__JWU,__tmp__GXU,__tmp__HXU;
+  __INTEGER Self__4QGB,__tmp__XQS,Self__QSIC,result__5FHH,__tmp__BGHH;
+  __INTEGER Self__CGHH,result__EGHH,__tmp__GGHH,Self__HGHH,__tmp__PYQC;
+  __INTEGER Self__LYRE;
+  void *__tmp__HSQC,*__tmp__2SQC,*__tmp__ETQC,*__tmp__QVQC,*__tmp__VVQC;
+  __STRING_CONSTANT *Self__3IS,*Self__WEHH,*Self__1EHH;
+  __STRING *Self__WRS,*Self__2SS,*Self__OYBD,*Self__B42,*Self__PQS;
+  void *tok_lst__MRQC;
+  __BOOLEAN __tmp__ORQC,__tmp__ISQC,__tmp__3SQC,result__AJS;
+  __CHARACTER Self__NCFH,result__MCFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HEHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__03GH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5EHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__43GH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NFHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__F4GH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1FHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RX3;
+  void *node__JEHH,*node__23GH,*node__BFHH,*node__A4GH,*node__PFHH;
+  void *node__H4GH,*node__3FHH,*node__2X3;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__0WDC,*Self__OMEG;
+  void *node__EXDC,*node__ZMEG;
+  __CHARACTER *Self__DNEB,*model__ENEB,*__tmp__UQS,*Self__PMBC;
+  tok__LRQC=NULL;
+  tok_lst__MRQC=NULL;
+  dir__NRQC=NULL;
+  if (((struct ___OBJ *)entry__IRQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__ORQC=open__BFRD(entry__IRQC);
   } else {
-    Self__PF2G=((__FILE_UNIX *)entry__ARQC);
-    Self__PF2G->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__PF2G->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
-    __tmp__GRQC=(Self__PF2G->stream__EJRD != (void *)NULL);
+    Self__4C3G=((__FILE_UNIX *)entry__IRQC);
+    Self__4C3G->stream__MJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__4C3G->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->storage__3QO),"r+b")));
+    __tmp__ORQC=(Self__4C3G->stream__MJRD != (void *)NULL);
   };
-  if ((! __tmp__GRQC)) {
-    print__WHD((&__string_222));
-    if (((struct ___OBJ *)entry__ARQC)->__id==__DIRECTORY_UNIX__) {
-      __tmp__NRQC=((__DIRECTORY_UNIX *)entry__ARQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+  if ((! __tmp__ORQC)) {
+    print__4HD((&__string_220));
+    if (((struct ___OBJ *)entry__IRQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__VRQC=((__DIRECTORY_UNIX *)entry__IRQC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
     } else {
-      __tmp__NRQC=((__FILE_UNIX *)entry__ARQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+      __tmp__VRQC=((__FILE_UNIX *)entry__IRQC)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
     };
-    print__WHD(__tmp__NRQC);
-    print__WHD((&__string_167));
+    print__4HD(__tmp__VRQC);
+    print__4HD((&__string_169));
   } else {
-    if (entry__ARQC==NULL) {
-      __tmp__URQC=NULL;
+    if (entry__IRQC==NULL) {
+      __tmp__2RQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__ARQC)->__id) {
+      switch (((struct ___OBJ *)entry__IRQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__URQC=((void *)entry__ARQC);
+        __tmp__2RQC=((void *)entry__IRQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__URQC=NULL;
+        __tmp__2RQC=NULL;
       } break;
       }
     };
-    dir__FRQC=__tmp__URQC;
-    __tmp__ZRQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__URQC)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__VM3D;
-    Self__ZM3D= 1;
-    while ((Self__ZM3D <= __tmp__ZRQC)) {
-      __tmp__5RQC=item__FZPE(dir__FRQC,Self__ZM3D);
-      if (((struct ___OBJ *)__tmp__5RQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__ASQC=((void *)((__DIRECTORY_UNIX *)__tmp__5RQC) != (void *)NULL);
-      } else {
-        __tmp__ASQC=FALSE__;
-      };
-      if (__tmp__ASQC) {
-        check_in__begin__4QQC(item__FZPE(dir__FRQC,Self__ZM3D),n__BRQC);
-      };
-      Self__ZM3D=(__INTEGER)(Self__ZM3D +  1);
-    };
-    __tmp__OSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__URQC)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__VM3D;
-    Self__KN3D= 1;
-    while ((Self__KN3D <= __tmp__OSQC)) {
-      __tmp__USQC=item__FZPE(dir__FRQC,Self__KN3D);
-      if (((struct ___OBJ *)__tmp__USQC)->__id==__DIRECTORY_UNIX__) {
-        __tmp__VSQC=((void *)((__DIRECTORY_UNIX *)__tmp__USQC) != (void *)NULL);
-      } else {
-        __tmp__VSQC=FALSE__;
-      };
-      if ((! __tmp__VSQC)) {
-        __tmp__2SQC=item__FZPE(dir__FRQC,Self__KN3D);
-        if (((struct ___OBJ *)__tmp__2SQC)->__id==__DIRECTORY_UNIX__) {
-          __tmp__3SQC=((__DIRECTORY_UNIX *)__tmp__2SQC)->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
-        } else {
-          __tmp__3SQC=((__FILE_UNIX *)__tmp__2SQC)->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
-        };
-        Self__VIS=((__STRING_CONSTANT *)__tmp__3SQC);
-        result__YIS=FALSE__;
-        i1__ZIS= 0;
-        i2__0IS= 0;
-        if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__VIS->count__DD)) {
-          i1__ZIS=(__INTEGER)((__INTEGER)(Self__VIS->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
-          i2__0IS= 1;
-          while ((! (((i1__ZIS > Self__VIS->count__DD) || (i2__0IS > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__VIS->storage__VQO)[(__INTEGER)(i1__ZIS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__0IS -  1)])))) {
-            i1__ZIS=(__INTEGER)(i1__ZIS +  1);
-            i2__0IS=(__INTEGER)(i2__0IS +  1);
-          };
-          result__YIS=(i1__ZIS > Self__VIS->count__DD);
-        };
-        if (result__YIS) {
-          copy__ZCS(string_tmp__VH,__tmp__3SQC);
-          Self__ORS=((__STRING *)string_tmp__VH);
-          if (( 3 > Self__ORS->count__WFC)) {
-            Self__ORS->count__WFC= 0;
-          } else {
-            Self__ORS->count__WFC=(__INTEGER)(Self__ORS->count__WFC -  3);
-          };
-          Self__USS=((__STRING *)string_tmp__VH);
-          Self__YPX=Self__USS->count__WFC;
-          while ((Self__YPX >=  1)) {
-            Self__WJOB=((__CHARACTER *)Self__USS->storage__BCS)[(__INTEGER)(Self__YPX -  1)];
-            result__YJOB='\0';
-            if (((((__INTEGER_8 )Self__WJOB) <  97) || (((__INTEGER_8 )Self__WJOB) >  122))) {
-              result__YJOB=Self__WJOB;
+    dir__NRQC=__tmp__2RQC;
+    __tmp__BSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__2RQC)->parent_directory__CFD.list__QFRD)->parent_linked_collection__PFRD.upper__QM3D;
+    Self__UM3D= 1;
+    while ((Self__UM3D <= __tmp__BSQC)) {
+      __tmp__HSQC=item__1WPE(dir__NRQC,Self__UM3D);
+      if (((struct ___OBJ *)__tmp__HSQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__ISQC=((void *)((__DIRECTORY_UNIX *)__tmp__HSQC) != (void *)NULL);
+      } else {
+        __tmp__ISQC=FALSE__;
+      };
+      if (__tmp__ISQC) {
+        check_in__begin__GRQC(item__1WPE(dir__NRQC,Self__UM3D),n__JRQC);
+      };
+      Self__UM3D=(__INTEGER)(Self__UM3D +  1);
+    };
+    __tmp__WSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__2RQC)->parent_directory__CFD.list__QFRD)->parent_linked_collection__PFRD.upper__QM3D;
+    Self__FN3D= 1;
+    while ((Self__FN3D <= __tmp__WSQC)) {
+      __tmp__2SQC=item__1WPE(dir__NRQC,Self__FN3D);
+      if (((struct ___OBJ *)__tmp__2SQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__3SQC=((void *)((__DIRECTORY_UNIX *)__tmp__2SQC) != (void *)NULL);
+      } else {
+        __tmp__3SQC=FALSE__;
+      };
+      if ((! __tmp__3SQC)) {
+        __tmp__ETQC=item__1WPE(dir__NRQC,Self__FN3D);
+        if (((struct ___OBJ *)__tmp__ETQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__FTQC=((__DIRECTORY_UNIX *)__tmp__ETQC)->parent_entry_unix__BFD.parent_entry__AFD.name__3NT;
+        } else {
+          __tmp__FTQC=((__FILE_UNIX *)__tmp__ETQC)->parent_entry_unix__EDF.parent_entry__AFD.name__3NT;
+        };
+        Self__3IS=((__STRING_CONSTANT *)__tmp__FTQC);
+        result__AJS=FALSE__;
+        i1__BJS= 0;
+        i2__CJS= 0;
+        if ((((__STRING_CONSTANT *)(&__string_157))->count__DD <= Self__3IS->count__DD)) {
+          i1__BJS=(__INTEGER)((__INTEGER)(Self__3IS->count__DD - ((__STRING_CONSTANT *)(&__string_157))->count__DD) +  1);
+          i2__CJS= 1;
+          while ((! (((i1__BJS > Self__3IS->count__DD) || (i2__CJS > ((__STRING_CONSTANT *)(&__string_157))->count__DD)) || (((__CHARACTER *)Self__3IS->storage__3QO)[(__INTEGER)(i1__BJS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_157))->storage__3QO)[(__INTEGER)(i2__CJS -  1)])))) {
+            i1__BJS=(__INTEGER)(i1__BJS +  1);
+            i2__CJS=(__INTEGER)(i2__CJS +  1);
+          };
+          result__AJS=(i1__BJS > Self__3IS->count__DD);
+        };
+        if (result__AJS) {
+          copy__BDS(string_tmp__VH,__tmp__FTQC);
+          Self__WRS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__WRS->count__4FC)) {
+            Self__WRS->count__4FC= 0;
+          } else {
+            Self__WRS->count__4FC=(__INTEGER)(Self__WRS->count__4FC -  3);
+          };
+          Self__2SS=((__STRING *)string_tmp__VH);
+          Self__AQX=Self__2SS->count__4FC;
+          while ((Self__AQX >=  1)) {
+            Self__NCFH=((__CHARACTER *)Self__2SS->storage__JCS)[(__INTEGER)(Self__AQX -  1)];
+            result__MCFH='\0';
+            if (((((__INTEGER_8 )Self__NCFH) <  97) || (((__INTEGER_8 )Self__NCFH) >  122))) {
+              result__MCFH=Self__NCFH;
             } else {
-              result__YJOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__WJOB) -  32))));
-            };
-            ((__CHARACTER *)Self__USS->storage__BCS)[(__INTEGER)(Self__YPX -  1)]=result__YJOB;
-            Self__YPX=(__INTEGER)(Self__YPX -  1);
-          };
-          tok__DRQC=get__IWB(string_tmp__VH);
-          Self__UCGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__YCGH= 0;
-          __tmp__0CGH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
-          Self__1CGH= 1;
-          while ((Self__1CGH <= __tmp__0CGH)) {
-            result__YCGH=(__INTEGER)((__INTEGER)( 5 * result__YCGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__VQO)[(__INTEGER)(Self__1CGH -  1)])));
-            Self__1CGH=(__INTEGER)(Self__1CGH +  1);
-          };
-          if ((result__YCGH <  0)) {
-            result__YCGH=(__INTEGER)(~ result__YCGH);
-          };
-          node__WCGH=((void **)Self__UCGH->buckets__5CT)[(__INTEGER)(result__YCGH % Self__UCGH->capacity__0CT)];
-          while ((! (((void *)node__WCGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WCGH)->key__LDT == (void *)(&__string_151))))) {
-            node__WCGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WCGH)->next__WDT;
-          };
-          if (((void *)node__WCGH != (void *)NULL)) {
-            Self__K2FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-            result__3CGH= 0;
-            __tmp__5CGH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
-            Self__ADGH= 1;
-            while ((Self__ADGH <= __tmp__5CGH)) {
-              result__3CGH=(__INTEGER)((__INTEGER)( 5 * result__3CGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__VQO)[(__INTEGER)(Self__ADGH -  1)])));
-              Self__ADGH=(__INTEGER)(Self__ADGH +  1);
-            };
-            if ((result__3CGH <  0)) {
-              result__3CGH=(__INTEGER)(~ result__3CGH);
-            };
-            node__M2FH=((void **)Self__K2FH->buckets__5CT)[(__INTEGER)(result__3CGH % Self__K2FH->capacity__0CT)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__M2FH)->key__LDT != (void *)(&__string_151))) {
-              node__M2FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__M2FH)->next__WDT;
-            };
-            tok_lst__ERQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__M2FH)->item__HY3;
-            __tmp__ZTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ERQC)->parent_linked_collection__LD.upper__5CD;
-            Self__KTDG= 1;
-            while ((Self__KTDG <= __tmp__ZTQC)) {
-              if (((void *)item__Y0ND(tok_lst__ERQC,Self__KTDG) == (void *)NULL)) {
-                append__BOS(current_list__2B,tok__DRQC);
-                append__BOS(file_list__0B,tok__DRQC);
+              result__MCFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__NCFH) -  32))));
+            };
+            ((__CHARACTER *)Self__2SS->storage__JCS)[(__INTEGER)(Self__AQX -  1)]=result__MCFH;
+            Self__AQX=(__INTEGER)(Self__AQX -  1);
+          };
+          tok__LRQC=get__QWB(string_tmp__VH);
+          Self__HEHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__LEHH= 0;
+          __tmp__NEHH=((__STRING_CONSTANT *)(&__string_153))->count__DD;
+          Self__OEHH= 1;
+          while ((Self__OEHH <= __tmp__NEHH)) {
+            result__LEHH=(__INTEGER)((__INTEGER)( 5 * result__LEHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_153))->storage__3QO)[(__INTEGER)(Self__OEHH -  1)])));
+            Self__OEHH=(__INTEGER)(Self__OEHH +  1);
+          };
+          if ((result__LEHH <  0)) {
+            result__LEHH=(__INTEGER)(~ result__LEHH);
+          };
+          node__JEHH=((void **)Self__HEHH->buckets__HDT)[(__INTEGER)(result__LEHH % Self__HEHH->capacity__CDT)];
+          while ((! (((void *)node__JEHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JEHH)->key__TDT == (void *)(&__string_153))))) {
+            node__JEHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JEHH)->next__4DT;
+          };
+          if (((void *)node__JEHH != (void *)NULL)) {
+            Self__03GH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+            result__QEHH= 0;
+            __tmp__SEHH=((__STRING_CONSTANT *)(&__string_153))->count__DD;
+            Self__TEHH= 1;
+            while ((Self__TEHH <= __tmp__SEHH)) {
+              result__QEHH=(__INTEGER)((__INTEGER)( 5 * result__QEHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_153))->storage__3QO)[(__INTEGER)(Self__TEHH -  1)])));
+              Self__TEHH=(__INTEGER)(Self__TEHH +  1);
+            };
+            if ((result__QEHH <  0)) {
+              result__QEHH=(__INTEGER)(~ result__QEHH);
+            };
+            node__23GH=((void **)Self__03GH->buckets__HDT)[(__INTEGER)(result__QEHH % Self__03GH->capacity__CDT)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__23GH)->key__TDT != (void *)(&__string_153))) {
+              node__23GH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__23GH)->next__4DT;
+            };
+            tok_lst__MRQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__23GH)->item__PY3;
+            __tmp__BUQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__MRQC)->parent_linked_collection__LD.upper__HDD;
+            Self__5LEG= 1;
+            while ((Self__5LEG <= __tmp__BUQC)) {
+              if (((void *)item__A1ND(tok_lst__MRQC,Self__5LEG) == (void *)NULL)) {
+                append__JOS(current_list__2B,tok__LRQC);
+                append__JOS(file_list__0B,tok__LRQC);
               } else {
-                append__BOS(current_list__2B,item__Y0ND(tok_lst__ERQC,Self__KTDG));
-                append__BOS(file_list__0B,item__Y0ND(tok_lst__ERQC,Self__KTDG));
+                append__JOS(current_list__2B,item__A1ND(tok_lst__MRQC,Self__5LEG));
+                append__JOS(file_list__0B,item__A1ND(tok_lst__MRQC,Self__5LEG));
               };
-              Self__KTDG=(__INTEGER)(Self__KTDG +  1);
-            };
-          } else {
-            append__BOS(current_list__2B,tok__DRQC);
-            add_last__ZLT(current_list__2B,'\n');
-            append__BOS(file_list__0B,tok__DRQC);
-            add_last__ZLT(file_list__0B,'\n');
-          };
-          Self__SWDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
-          k__TWDC=tok__DRQC;
-          Self__DDGH=((__STRING_CONSTANT *)tok__DRQC);
-          result__CDGH= 0;
-          __tmp__EDGH=Self__DDGH->count__DD;
-          Self__FDGH= 1;
-          while ((Self__FDGH <= __tmp__EDGH)) {
-            result__CDGH=(__INTEGER)((__INTEGER)( 5 * result__CDGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__DDGH->storage__VQO)[(__INTEGER)(Self__FDGH -  1)])));
-            Self__FDGH=(__INTEGER)(Self__FDGH +  1);
-          };
-          if ((result__CDGH <  0)) {
-            result__CDGH=(__INTEGER)(~ result__CDGH);
-          };
-          node__2WDC=((void **)Self__SWDC->buckets__VNBC)[(__INTEGER)(result__CDGH % Self__SWDC->capacity__QNBC)];
-          while ((! (((void *)node__2WDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2WDC)->key__BOBC == (void *)k__TWDC)))) {
-            node__2WDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__2WDC)->next__MOBC;
-          };
-          if (((void *)node__2WDC != (void *)NULL)) {
-            print__WHD((&__string_223));
-            Self__ZTDG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__PTS);
-            k__0TDG=tok__DRQC;
-            Self__IDGH=((__STRING_CONSTANT *)tok__DRQC);
-            result__HDGH= 0;
-            __tmp__JDGH=Self__IDGH->count__DD;
-            Self__KDGH= 1;
-            while ((Self__KDGH <= __tmp__JDGH)) {
-              result__HDGH=(__INTEGER)((__INTEGER)( 5 * result__HDGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__IDGH->storage__VQO)[(__INTEGER)(Self__KDGH -  1)])));
-              Self__KDGH=(__INTEGER)(Self__KDGH +  1);
-            };
-            if ((result__HDGH <  0)) {
-              result__HDGH=(__INTEGER)(~ result__HDGH);
-            };
-            node__EUDG=((void **)Self__ZTDG->buckets__VNBC)[(__INTEGER)(result__HDGH % Self__ZTDG->capacity__QNBC)];
-            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EUDG)->key__BOBC != (void *)k__0TDG)) {
-              node__EUDG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EUDG)->next__MOBC;
-            };
-            print__WHD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EUDG)->item__U3GD)->filename__UPG);
+              Self__5LEG=(__INTEGER)(Self__5LEG +  1);
+            };
+          } else {
+            append__JOS(current_list__2B,tok__LRQC);
+            add_last__BMT(current_list__2B,'\n');
+            append__JOS(file_list__0B,tok__LRQC);
+            add_last__BMT(file_list__0B,'\n');
+          };
+          Self__0WDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__XTS);
+          k__1WDC=tok__LRQC;
+          Self__WEHH=((__STRING_CONSTANT *)tok__LRQC);
+          result__VEHH= 0;
+          __tmp__XEHH=Self__WEHH->count__DD;
+          Self__YEHH= 1;
+          while ((Self__YEHH <= __tmp__XEHH)) {
+            result__VEHH=(__INTEGER)((__INTEGER)( 5 * result__VEHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WEHH->storage__3QO)[(__INTEGER)(Self__YEHH -  1)])));
+            Self__YEHH=(__INTEGER)(Self__YEHH +  1);
+          };
+          if ((result__VEHH <  0)) {
+            result__VEHH=(__INTEGER)(~ result__VEHH);
+          };
+          node__EXDC=((void **)Self__0WDC->buckets__3NBC)[(__INTEGER)(result__VEHH % Self__0WDC->capacity__YNBC)];
+          while ((! (((void *)node__EXDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EXDC)->key__JOBC == (void *)k__1WDC)))) {
+            node__EXDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__EXDC)->next__UOBC;
+          };
+          if (((void *)node__EXDC != (void *)NULL)) {
+            print__4HD((&__string_221));
+            Self__OMEG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__XTS);
+            k__PMEG=tok__LRQC;
+            Self__1EHH=((__STRING_CONSTANT *)tok__LRQC);
+            result__0EHH= 0;
+            __tmp__2EHH=Self__1EHH->count__DD;
+            Self__3EHH= 1;
+            while ((Self__3EHH <= __tmp__2EHH)) {
+              result__0EHH=(__INTEGER)((__INTEGER)( 5 * result__0EHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1EHH->storage__3QO)[(__INTEGER)(Self__3EHH -  1)])));
+              Self__3EHH=(__INTEGER)(Self__3EHH +  1);
+            };
+            if ((result__0EHH <  0)) {
+              result__0EHH=(__INTEGER)(~ result__0EHH);
+            };
+            node__ZMEG=((void **)Self__OMEG->buckets__3NBC)[(__INTEGER)(result__0EHH % Self__OMEG->capacity__YNBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ZMEG)->key__JOBC != (void *)k__PMEG)) {
+              node__ZMEG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ZMEG)->next__UOBC;
+            };
+            print__4HD(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__ZMEG)->item__23GD)->filename__2PG);
             fputc((int)('\n'),stdout);
-            __tmp__IVQC=item__FZPE(dir__FRQC,Self__KN3D);
-            if (((struct ___OBJ *)__tmp__IVQC)->__id==__DIRECTORY_UNIX__) {
-              __tmp__JVQC=((__DIRECTORY_UNIX *)__tmp__IVQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+            __tmp__QVQC=item__1WPE(dir__NRQC,Self__FN3D);
+            if (((struct ___OBJ *)__tmp__QVQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__RVQC=((__DIRECTORY_UNIX *)__tmp__QVQC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
             } else {
-              __tmp__JVQC=((__FILE_UNIX *)__tmp__IVQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+              __tmp__RVQC=((__FILE_UNIX *)__tmp__QVQC)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
             };
-            print__WHD(__tmp__JVQC);
+            print__4HD(__tmp__RVQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __tmp__NVQC=item__FZPE(dir__FRQC,Self__KN3D);
-          if (((struct ___OBJ *)__tmp__NVQC)->__id==__DIRECTORY_UNIX__) {
-            __tmp__OVQC=((__DIRECTORY_UNIX *)__tmp__NVQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
-          } else {
-            __tmp__OVQC=((__FILE_UNIX *)__tmp__NVQC)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
-          };
-          proto_input__BI=create__name__generic_count__ZAC(__tmp__OVQC,tok__DRQC);
-          go_on__CBC(proto_input__BI);
-          if (is_shorter__5Y) {
-            save_file__with__PDC(add_ext__EBF(tok__DRQC),output_code__SI);
-          };
-        };
-      };
-      Self__KN3D=(__INTEGER)(Self__KN3D +  1);
-    };
-    if ((((__STRING *)current_list__2B)->count__WFC !=  0)) {
-      Self__MDGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__QDGH= 0;
-      __tmp__SDGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
-      Self__TDGH= 1;
-      while ((Self__TDGH <= __tmp__SDGH)) {
-        result__QDGH=(__INTEGER)((__INTEGER)( 5 * result__QDGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__TDGH -  1)])));
-        Self__TDGH=(__INTEGER)(Self__TDGH +  1);
-      };
-      if ((result__QDGH <  0)) {
-        result__QDGH=(__INTEGER)(~ result__QDGH);
-      };
-      node__ODGH=((void **)Self__MDGH->buckets__5CT)[(__INTEGER)(result__QDGH % Self__MDGH->capacity__0CT)];
-      while ((! (((void *)node__ODGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ODGH)->key__LDT == (void *)(&__string_150))))) {
-        node__ODGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ODGH)->next__WDT;
-      };
-      if (((void *)node__ODGH != (void *)NULL)) {
-        Self__O2FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__VDGH= 0;
-        __tmp__XDGH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
-        Self__YDGH= 1;
-        while ((Self__YDGH <= __tmp__XDGH)) {
-          result__VDGH=(__INTEGER)((__INTEGER)( 5 * result__VDGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__VQO)[(__INTEGER)(Self__YDGH -  1)])));
-          Self__YDGH=(__INTEGER)(Self__YDGH +  1);
-        };
-        if ((result__VDGH <  0)) {
-          result__VDGH=(__INTEGER)(~ result__VDGH);
-        };
-        node__Q2FH=((void **)Self__O2FH->buckets__5CT)[(__INTEGER)(result__VDGH % Self__O2FH->capacity__0CT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Q2FH)->key__LDT != (void *)(&__string_150))) {
-          node__Q2FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Q2FH)->next__WDT;
-        };
-        tok__DRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__Q2FH)->item__HY3)->first_link__EUEC)->item__0VHD;
-        Self__GYBD=((__STRING *)current_list__2B);
-        i__IYBD=Self__GYBD->count__WFC;
-        j__JYBD=((__STRING_CONSTANT *)tok__DRQC)->count__DD;
-        resize__YXZ(Self__GYBD,(__INTEGER)(i__IYBD + j__JYBD));
-        if (((i__IYBD >  0) && (j__JYBD >  0))) {
-          move__to__by__BWCC(Self__GYBD->storage__BCS, 0,(__INTEGER)(i__IYBD -  1),j__JYBD);
-        };
-        Self__1MEB=((__CHARACTER *)Self__GYBD->storage__BCS);
-        model__2MEB=((__STRING_CONSTANT *)tok__DRQC)->storage__VQO;
-        Self__ODKB=(__INTEGER)(j__JYBD -  1);
-        while ((Self__ODKB >=  0)) {
-          Self__1MEB[Self__ODKB]=((__CHARACTER *)model__2MEB)[Self__ODKB];
-          Self__ODKB=(__INTEGER)(Self__ODKB -  1);
-        };
-      };
-      Self__0DGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      result__4DGH= 0;
-      __tmp__AEGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
-      Self__BEGH= 1;
-      while ((Self__BEGH <= __tmp__AEGH)) {
-        result__4DGH=(__INTEGER)((__INTEGER)( 5 * result__4DGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__BEGH -  1)])));
-        Self__BEGH=(__INTEGER)(Self__BEGH +  1);
-      };
-      if ((result__4DGH <  0)) {
-        result__4DGH=(__INTEGER)(~ result__4DGH);
-      };
-      node__2DGH=((void **)Self__0DGH->buckets__5CT)[(__INTEGER)(result__4DGH % Self__0DGH->capacity__0CT)];
-      while ((! (((void *)node__2DGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2DGH)->key__LDT == (void *)(&__string_152))))) {
-        node__2DGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2DGH)->next__WDT;
-      };
-      if (((void *)node__2DGH != (void *)NULL)) {
-        Self__V2FH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__DEGH= 0;
-        __tmp__FEGH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
-        Self__GEGH= 1;
-        while ((Self__GEGH <= __tmp__FEGH)) {
-          result__DEGH=(__INTEGER)((__INTEGER)( 5 * result__DEGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__VQO)[(__INTEGER)(Self__GEGH -  1)])));
-          Self__GEGH=(__INTEGER)(Self__GEGH +  1);
-        };
-        if ((result__DEGH <  0)) {
-          result__DEGH=(__INTEGER)(~ result__DEGH);
-        };
-        node__X2FH=((void **)Self__V2FH->buckets__5CT)[(__INTEGER)(result__DEGH % Self__V2FH->capacity__0CT)];
-        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__X2FH)->key__LDT != (void *)(&__string_152))) {
-          node__X2FH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__X2FH)->next__WDT;
-        };
-        tok__DRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__X2FH)->item__HY3)->first_link__EUEC)->item__0VHD;
-        append__BOS(current_list__2B,tok__DRQC);
-      };
-      copy__ZCS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__URQC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-      Self__Z32=((__STRING *)string_tmp__VH);
-      if ((n__BRQC > Self__Z32->count__WFC)) {
-        Self__Z32->count__WFC= 0;
-      } else {
-        if ((n__BRQC >  0)) {
-          len__BWU=(__INTEGER)((__INTEGER)(n__BRQC -  1) +  1);
-          if ((len__BWU >  0)) {
-            __tmp__4WU=(__INTEGER)(n__BRQC +  1);
-            __tmp__5WU=Self__Z32->count__WFC;
-            Self__WQGB=__tmp__4WU;
-            while ((Self__WQGB <= __tmp__5WU)) {
-              ((__CHARACTER *)Self__Z32->storage__BCS)[(__INTEGER)((__INTEGER)(Self__WQGB - len__BWU) -  1)]=((__CHARACTER *)Self__Z32->storage__BCS)[(__INTEGER)(Self__WQGB -  1)];
-              Self__WQGB=(__INTEGER)(Self__WQGB +  1);
-            };
-            Self__Z32->count__WFC=(__INTEGER)(Self__Z32->count__WFC - len__BWU);
-          };
-        };
-      };
-      if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
-        Self__HQS=((__STRING *)string_tmp__VH);
-        __tmp__MQS=Self__HQS->storage__BCS;
-        __tmp__PQS=(__INTEGER)(Self__HQS->count__WFC -  1);
-        Self__HMBC=((__CHARACTER *)__tmp__MQS);
-        Self__ISIC=__tmp__PQS;
-        while ((Self__ISIC >=  0)) {
-          if (('/' == Self__HMBC[Self__ISIC])) {
-            Self__HMBC[Self__ISIC]='-';
-          };
-          Self__ISIC=(__INTEGER)(Self__ISIC -  1);
-        };
-        tok__DRQC=get__IWB(string_tmp__VH);
-        Self__IEGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-        result__MEGH= 0;
-        __tmp__OEGH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-        Self__PEGH= 1;
-        while ((Self__PEGH <= __tmp__OEGH)) {
-          result__MEGH=(__INTEGER)((__INTEGER)( 5 * result__MEGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__VQO)[(__INTEGER)(Self__PEGH -  1)])));
-          Self__PEGH=(__INTEGER)(Self__PEGH +  1);
-        };
-        if ((result__MEGH <  0)) {
-          result__MEGH=(__INTEGER)(~ result__MEGH);
-        };
-        node__KEGH=((void **)Self__IEGH->buckets__5CT)[(__INTEGER)(result__MEGH % Self__IEGH->capacity__0CT)];
-        while ((! (((void *)node__KEGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KEGH)->key__LDT == (void *)(&__string_148))))) {
-          node__KEGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__KEGH)->next__WDT;
-        };
-        if (((void *)node__KEGH != (void *)NULL)) {
-          Self__JX3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-          result__REGH= 0;
-          __tmp__TEGH=((__STRING_CONSTANT *)(&__string_148))->count__DD;
-          Self__UEGH= 1;
-          while ((Self__UEGH <= __tmp__TEGH)) {
-            result__REGH=(__INTEGER)((__INTEGER)( 5 * result__REGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_148))->storage__VQO)[(__INTEGER)(Self__UEGH -  1)])));
-            Self__UEGH=(__INTEGER)(Self__UEGH +  1);
-          };
-          if ((result__REGH <  0)) {
-            result__REGH=(__INTEGER)(~ result__REGH);
-          };
-          node__UX3=((void **)Self__JX3->buckets__5CT)[(__INTEGER)(result__REGH % Self__JX3->capacity__0CT)];
-          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->key__LDT != (void *)(&__string_148))) {
-            node__UX3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->next__WDT;
-          };
-          tok_lst__ERQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UX3)->item__HY3;
-          __tmp__HYQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ERQC)->parent_linked_collection__LD.upper__5CD;
-          Self__TYRE= 1;
-          while ((Self__TYRE <= __tmp__HYQC)) {
-            if (((void *)item__Y0ND(tok_lst__ERQC,Self__TYRE) == (void *)NULL)) {
-              append__BOS(directory_list__YB,tok__DRQC);
+          __tmp__VVQC=item__1WPE(dir__NRQC,Self__FN3D);
+          if (((struct ___OBJ *)__tmp__VVQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__WVQC=((__DIRECTORY_UNIX *)__tmp__VVQC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
+          } else {
+            __tmp__WVQC=((__FILE_UNIX *)__tmp__VVQC)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+          };
+          proto_input__BI=create__name__generic_count__BBC(__tmp__WVQC,tok__LRQC);
+          go_on__KBC(proto_input__BI);
+          if (is_shorter__FZ) {
+            save_file__with__XDC(add_ext__MBF(tok__LRQC),output_code__SI);
+          };
+        };
+      };
+      Self__FN3D=(__INTEGER)(Self__FN3D +  1);
+    };
+    if ((((__STRING *)current_list__2B)->count__4FC !=  0)) {
+      Self__5EHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__DFHH= 0;
+      __tmp__FFHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+      Self__GFHH= 1;
+      while ((Self__GFHH <= __tmp__FFHH)) {
+        result__DFHH=(__INTEGER)((__INTEGER)( 5 * result__DFHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__3QO)[(__INTEGER)(Self__GFHH -  1)])));
+        Self__GFHH=(__INTEGER)(Self__GFHH +  1);
+      };
+      if ((result__DFHH <  0)) {
+        result__DFHH=(__INTEGER)(~ result__DFHH);
+      };
+      node__BFHH=((void **)Self__5EHH->buckets__HDT)[(__INTEGER)(result__DFHH % Self__5EHH->capacity__CDT)];
+      while ((! (((void *)node__BFHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BFHH)->key__TDT == (void *)(&__string_152))))) {
+        node__BFHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BFHH)->next__4DT;
+      };
+      if (((void *)node__BFHH != (void *)NULL)) {
+        Self__43GH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__IFHH= 0;
+        __tmp__KFHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+        Self__LFHH= 1;
+        while ((Self__LFHH <= __tmp__KFHH)) {
+          result__IFHH=(__INTEGER)((__INTEGER)( 5 * result__IFHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__3QO)[(__INTEGER)(Self__LFHH -  1)])));
+          Self__LFHH=(__INTEGER)(Self__LFHH +  1);
+        };
+        if ((result__IFHH <  0)) {
+          result__IFHH=(__INTEGER)(~ result__IFHH);
+        };
+        node__A4GH=((void **)Self__43GH->buckets__HDT)[(__INTEGER)(result__IFHH % Self__43GH->capacity__CDT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__A4GH)->key__TDT != (void *)(&__string_152))) {
+          node__A4GH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__A4GH)->next__4DT;
+        };
+        tok__LRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__A4GH)->item__PY3)->first_link__MUEC)->item__CWHD;
+        Self__OYBD=((__STRING *)current_list__2B);
+        i__QYBD=Self__OYBD->count__4FC;
+        j__RYBD=((__STRING_CONSTANT *)tok__LRQC)->count__DD;
+        resize__AYZ(Self__OYBD,(__INTEGER)(i__QYBD + j__RYBD));
+        if (((i__QYBD >  0) && (j__RYBD >  0))) {
+          move__to__by__JWCC(Self__OYBD->storage__JCS, 0,(__INTEGER)(i__QYBD -  1),j__RYBD);
+        };
+        Self__DNEB=((__CHARACTER *)Self__OYBD->storage__JCS);
+        model__ENEB=((__STRING_CONSTANT *)tok__LRQC)->storage__3QO;
+        Self__WDKB=(__INTEGER)(j__RYBD -  1);
+        while ((Self__WDKB >=  0)) {
+          Self__DNEB[Self__WDKB]=((__CHARACTER *)model__ENEB)[Self__WDKB];
+          Self__WDKB=(__INTEGER)(Self__WDKB -  1);
+        };
+      };
+      Self__NFHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__RFHH= 0;
+      __tmp__TFHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__UFHH= 1;
+      while ((Self__UFHH <= __tmp__TFHH)) {
+        result__RFHH=(__INTEGER)((__INTEGER)( 5 * result__RFHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__3QO)[(__INTEGER)(Self__UFHH -  1)])));
+        Self__UFHH=(__INTEGER)(Self__UFHH +  1);
+      };
+      if ((result__RFHH <  0)) {
+        result__RFHH=(__INTEGER)(~ result__RFHH);
+      };
+      node__PFHH=((void **)Self__NFHH->buckets__HDT)[(__INTEGER)(result__RFHH % Self__NFHH->capacity__CDT)];
+      while ((! (((void *)node__PFHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PFHH)->key__TDT == (void *)(&__string_154))))) {
+        node__PFHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PFHH)->next__4DT;
+      };
+      if (((void *)node__PFHH != (void *)NULL)) {
+        Self__F4GH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__WFHH= 0;
+        __tmp__YFHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+        Self__ZFHH= 1;
+        while ((Self__ZFHH <= __tmp__YFHH)) {
+          result__WFHH=(__INTEGER)((__INTEGER)( 5 * result__WFHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__3QO)[(__INTEGER)(Self__ZFHH -  1)])));
+          Self__ZFHH=(__INTEGER)(Self__ZFHH +  1);
+        };
+        if ((result__WFHH <  0)) {
+          result__WFHH=(__INTEGER)(~ result__WFHH);
+        };
+        node__H4GH=((void **)Self__F4GH->buckets__HDT)[(__INTEGER)(result__WFHH % Self__F4GH->capacity__CDT)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__H4GH)->key__TDT != (void *)(&__string_154))) {
+          node__H4GH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__H4GH)->next__4DT;
+        };
+        tok__LRQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__H4GH)->item__PY3)->first_link__MUEC)->item__CWHD;
+        append__JOS(current_list__2B,tok__LRQC);
+      };
+      copy__BDS(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__2RQC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+      Self__B42=((__STRING *)string_tmp__VH);
+      if ((n__JRQC > Self__B42->count__4FC)) {
+        Self__B42->count__4FC= 0;
+      } else {
+        if ((n__JRQC >  0)) {
+          len__JWU=(__INTEGER)((__INTEGER)(n__JRQC -  1) +  1);
+          if ((len__JWU >  0)) {
+            __tmp__GXU=(__INTEGER)(n__JRQC +  1);
+            __tmp__HXU=Self__B42->count__4FC;
+            Self__4QGB=__tmp__GXU;
+            while ((Self__4QGB <= __tmp__HXU)) {
+              ((__CHARACTER *)Self__B42->storage__JCS)[(__INTEGER)((__INTEGER)(Self__4QGB - len__JWU) -  1)]=((__CHARACTER *)Self__B42->storage__JCS)[(__INTEGER)(Self__4QGB -  1)];
+              Self__4QGB=(__INTEGER)(Self__4QGB +  1);
+            };
+            Self__B42->count__4FC=(__INTEGER)(Self__B42->count__4FC - len__JWU);
+          };
+        };
+      };
+      if ((((__STRING *)string_tmp__VH)->count__4FC !=  0)) {
+        Self__PQS=((__STRING *)string_tmp__VH);
+        __tmp__UQS=Self__PQS->storage__JCS;
+        __tmp__XQS=(__INTEGER)(Self__PQS->count__4FC -  1);
+        Self__PMBC=((__CHARACTER *)__tmp__UQS);
+        Self__QSIC=__tmp__XQS;
+        while ((Self__QSIC >=  0)) {
+          if (('/' == Self__PMBC[Self__QSIC])) {
+            Self__PMBC[Self__QSIC]='-';
+          };
+          Self__QSIC=(__INTEGER)(Self__QSIC -  1);
+        };
+        tok__LRQC=get__QWB(string_tmp__VH);
+        Self__1FHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__5FHH= 0;
+        __tmp__BGHH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+        Self__CGHH= 1;
+        while ((Self__CGHH <= __tmp__BGHH)) {
+          result__5FHH=(__INTEGER)((__INTEGER)( 5 * result__5FHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__3QO)[(__INTEGER)(Self__CGHH -  1)])));
+          Self__CGHH=(__INTEGER)(Self__CGHH +  1);
+        };
+        if ((result__5FHH <  0)) {
+          result__5FHH=(__INTEGER)(~ result__5FHH);
+        };
+        node__3FHH=((void **)Self__1FHH->buckets__HDT)[(__INTEGER)(result__5FHH % Self__1FHH->capacity__CDT)];
+        while ((! (((void *)node__3FHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3FHH)->key__TDT == (void *)(&__string_150))))) {
+          node__3FHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3FHH)->next__4DT;
+        };
+        if (((void *)node__3FHH != (void *)NULL)) {
+          Self__RX3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__EGHH= 0;
+          __tmp__GGHH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+          Self__HGHH= 1;
+          while ((Self__HGHH <= __tmp__GGHH)) {
+            result__EGHH=(__INTEGER)((__INTEGER)( 5 * result__EGHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__3QO)[(__INTEGER)(Self__HGHH -  1)])));
+            Self__HGHH=(__INTEGER)(Self__HGHH +  1);
+          };
+          if ((result__EGHH <  0)) {
+            result__EGHH=(__INTEGER)(~ result__EGHH);
+          };
+          node__2X3=((void **)Self__RX3->buckets__HDT)[(__INTEGER)(result__EGHH % Self__RX3->capacity__CDT)];
+          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->key__TDT != (void *)(&__string_150))) {
+            node__2X3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->next__4DT;
+          };
+          tok_lst__MRQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2X3)->item__PY3;
+          __tmp__PYQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__MRQC)->parent_linked_collection__LD.upper__HDD;
+          Self__LYRE= 1;
+          while ((Self__LYRE <= __tmp__PYQC)) {
+            if (((void *)item__A1ND(tok_lst__MRQC,Self__LYRE) == (void *)NULL)) {
+              append__JOS(directory_list__YB,tok__LRQC);
             } else {
-              append__BOS(directory_list__YB,item__Y0ND(tok_lst__ERQC,Self__TYRE));
+              append__JOS(directory_list__YB,item__A1ND(tok_lst__MRQC,Self__LYRE));
             };
-            Self__TYRE=(__INTEGER)(Self__TYRE +  1);
+            Self__LYRE=(__INTEGER)(Self__LYRE +  1);
           };
         } else {
-          append__BOS(directory_list__YB,tok__DRQC);
-          add_last__ZLT(directory_list__YB,'\n');
+          append__JOS(directory_list__YB,tok__LRQC);
+          add_last__BMT(directory_list__YB,'\n');
         };
-        save_file__with__PDC(add_ext__EBF(tok__DRQC),current_list__2B);
-        ((__STRING *)current_list__2B)->count__WFC= 0;
+        save_file__with__XDC(add_ext__MBF(tok__LRQC),current_list__2B);
+        ((__STRING *)current_list__2B)->count__4FC= 0;
       };
     };
   };
 }
 
-static void* add_ext__EBF(void *n__GBF)
+static void* add_ext__MBF(void *n__OBF)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__0EGH,__tmp__2EGH,Self__3EGH,result__5EGH;
-  __INTEGER __tmp__BFGH,Self__CFGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WEGH;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WAEH;
-  void *node__YEGH,*node__YAEH;
-  copy__ZCS(string_tmp__VH,n__GBF);
-  Self__WEGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-  result__0EGH= 0;
-  __tmp__2EGH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-  Self__3EGH= 1;
-  while ((Self__3EGH <= __tmp__2EGH)) {
-    result__0EGH=(__INTEGER)((__INTEGER)( 5 * result__0EGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__VQO)[(__INTEGER)(Self__3EGH -  1)])));
-    Self__3EGH=(__INTEGER)(Self__3EGH +  1);
-  };
-  if ((result__0EGH <  0)) {
-    result__0EGH=(__INTEGER)(~ result__0EGH);
-  };
-  node__YEGH=((void **)Self__WEGH->buckets__5CT)[(__INTEGER)(result__0EGH % Self__WEGH->capacity__0CT)];
-  while ((! (((void *)node__YEGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YEGH)->key__LDT == (void *)(&__string_116))))) {
-    node__YEGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YEGH)->next__WDT;
-  };
-  if (((void *)node__YEGH != (void *)NULL)) {
-    Self__WAEH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-    result__5EGH= 0;
-    __tmp__BFGH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
-    Self__CFGH= 1;
-    while ((Self__CFGH <= __tmp__BFGH)) {
-      result__5EGH=(__INTEGER)((__INTEGER)( 5 * result__5EGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__VQO)[(__INTEGER)(Self__CFGH -  1)])));
-      Self__CFGH=(__INTEGER)(Self__CFGH +  1);
-    };
-    if ((result__5EGH <  0)) {
-      result__5EGH=(__INTEGER)(~ result__5EGH);
-    };
-    node__YAEH=((void **)Self__WAEH->buckets__5CT)[(__INTEGER)(result__5EGH % Self__WAEH->capacity__0CT)];
-    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YAEH)->key__LDT != (void *)(&__string_116))) {
-      node__YAEH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YAEH)->next__WDT;
-    };
-    append__BOS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YAEH)->item__HY3)->first_link__EUEC)->item__0VHD);
+  __INTEGER result__NGHH,__tmp__PGHH,Self__QGHH,result__SGHH;
+  __INTEGER __tmp__UGHH,Self__VGHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JGHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__XBFH;
+  void *node__LGHH,*node__ZBFH;
+  copy__BDS(string_tmp__VH,n__OBF);
+  Self__JGHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+  result__NGHH= 0;
+  __tmp__PGHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+  Self__QGHH= 1;
+  while ((Self__QGHH <= __tmp__PGHH)) {
+    result__NGHH=(__INTEGER)((__INTEGER)( 5 * result__NGHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__3QO)[(__INTEGER)(Self__QGHH -  1)])));
+    Self__QGHH=(__INTEGER)(Self__QGHH +  1);
+  };
+  if ((result__NGHH <  0)) {
+    result__NGHH=(__INTEGER)(~ result__NGHH);
+  };
+  node__LGHH=((void **)Self__JGHH->buckets__HDT)[(__INTEGER)(result__NGHH % Self__JGHH->capacity__CDT)];
+  while ((! (((void *)node__LGHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LGHH)->key__TDT == (void *)(&__string_116))))) {
+    node__LGHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LGHH)->next__4DT;
+  };
+  if (((void *)node__LGHH != (void *)NULL)) {
+    Self__XBFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+    result__SGHH= 0;
+    __tmp__UGHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+    Self__VGHH= 1;
+    while ((Self__VGHH <= __tmp__UGHH)) {
+      result__SGHH=(__INTEGER)((__INTEGER)( 5 * result__SGHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__3QO)[(__INTEGER)(Self__VGHH -  1)])));
+      Self__VGHH=(__INTEGER)(Self__VGHH +  1);
+    };
+    if ((result__SGHH <  0)) {
+      result__SGHH=(__INTEGER)(~ result__SGHH);
+    };
+    node__ZBFH=((void **)Self__XBFH->buckets__HDT)[(__INTEGER)(result__SGHH % Self__XBFH->capacity__CDT)];
+    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ZBFH)->key__TDT != (void *)(&__string_116))) {
+      node__ZBFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ZBFH)->next__4DT;
+    };
+    append__JOS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ZBFH)->item__PY3)->first_link__MUEC)->item__CWHD);
   } else {
-    append__BOS(string_tmp__VH,(&__string_224));
+    append__JOS(string_tmp__VH,(&__string_222));
   };
-  return(get__IWB(string_tmp__VH));
+  return(get__QWB(string_tmp__VH));
 }
 
-static void save_file__with__PDC(void *n__RDC,void *buf__SDC)
+static void save_file__with__XDC(void *n__ZDC,void *buf__0DC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING *Self__0AEH,*Self__DET,*Self__XXS;
-  void *result__RZAC,*__tmp__B0AC,*__tmp__TFC,*file__UDC;
-  void *__tmp__B3HC;
-  __POINTER stream__PEIC,ptr__2LOF;
-  void *__tmp__A0AC;
-  __FILE_UNIX *Self__DG2G,*Self__JXTE,*Self__SYTE;
-  __INTEGER __tmp__YFC;
-  __BOOLEAN __tmp__JEC,result__REIC;
+  __STRING *Self__1BFH,*Self__LET,*Self__5XS;
+  void *result__ZZAC,*__tmp__J0AC,*__tmp__1FC,*file__2DC;
+  void *__tmp__J3HC;
+  __POINTER stream__XEIC,ptr__YXOF;
+  void *__tmp__I0AC;
+  __FILE_UNIX *Self__SD3G,*Self__MXTE,*Self__VYTE;
+  __INTEGER __tmp__AGC;
+  __BOOLEAN __tmp__REC,result__ZEIC;
   if (((void *)output_name__DI != (void *)NULL)) {
-    copy__ZCS(string_tmp__VH,output_name__DI);
-    Self__0AEH=((__STRING *)string_tmp__VH);
-    if ((((__CHARACTER *)Self__0AEH->storage__BCS)[(__INTEGER)(Self__0AEH->count__WFC -  1)] != '/')) {
-      __tmp__JEC=TRUE__;
+    copy__BDS(string_tmp__VH,output_name__DI);
+    Self__1BFH=((__STRING *)string_tmp__VH);
+    if ((((__CHARACTER *)Self__1BFH->storage__JCS)[(__INTEGER)(Self__1BFH->count__4FC -  1)] != '/')) {
+      __tmp__REC=TRUE__;
     } else {
-      Self__DET=((__STRING *)string_tmp__VH);
-      __tmp__JEC=(((__CHARACTER *)Self__DET->storage__BCS)[(__INTEGER)(Self__DET->count__WFC -  1)] != '\\');
+      Self__LET=((__STRING *)string_tmp__VH);
+      __tmp__REC=(((__CHARACTER *)Self__LET->storage__JCS)[(__INTEGER)(Self__LET->count__4FC -  1)] != '\\');
     };
-    if (__tmp__JEC) {
-      add_last__ZLT(string_tmp__VH,'/');
+    if (__tmp__REC) {
+      add_last__BMT(string_tmp__VH,'/');
     };
   } else {
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
   };
-  append__BOS(string_tmp__VH,n__RDC);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  append__JOS(string_tmp__VH,n__ZDC);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  result__RZAC=NULL;
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  result__ZZAC=NULL;
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
-    __tmp__B3HC=FILE_SYSTEM__->parent_directory__OFD;
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    __tmp__J3HC=FILE_SYSTEM__->parent_directory__WFD;
   } else {
-    __tmp__B3HC=parent_directory__OED();
+    __tmp__J3HC=parent_directory__WED();
   };
-  copy__ZCS(string_tmp__TED,((__DIRECTORY_UNIX *)__tmp__B3HC)->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  copy__BDS(string_tmp__1ED,((__DIRECTORY_UNIX *)__tmp__J3HC)->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  add_last__ZLT(string_tmp__TED,'/');
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  add_last__BMT(string_tmp__1ED,'/');
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  append__BOS(string_tmp__TED,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  append__JOS(string_tmp__1ED,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  reduce_path__Q3HC(string_tmp__TED);
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  reduce_path__Y3HC(string_tmp__1ED);
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  result__REIC=FALSE__;
-  Self__XXS=((__STRING *)string_tmp__TED);
-  if ((Self__XXS->capacity__YBS > Self__XXS->count__WFC)) {
-    ((__CHARACTER *)Self__XXS->storage__BCS)[Self__XXS->count__WFC]='\0';
+  result__ZEIC=FALSE__;
+  Self__5XS=((__STRING *)string_tmp__1ED);
+  if ((Self__5XS->capacity__ACS > Self__5XS->count__4FC)) {
+    ((__CHARACTER *)Self__5XS->storage__JCS)[Self__5XS->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__XXS,'\0');
-    Self__XXS->count__WFC=(__INTEGER)(Self__XXS->count__WFC -  1);
+    add_last__BMT(Self__5XS,'\0');
+    Self__5XS->count__4FC=(__INTEGER)(Self__5XS->count__4FC -  1);
   };
-  stream__PEIC=((__POINTER )(fopen((char*)(Self__XXS->storage__BCS),"w+b")));
-  if ((stream__PEIC != (void *)NULL)) {
-    result__REIC=(((__INTEGER )(fclose((FILE*)(stream__PEIC)))) ==  0);
+  stream__XEIC=((__POINTER )(fopen((char*)(Self__5XS->storage__JCS),"w+b")));
+  if ((stream__XEIC != (void *)NULL)) {
+    result__ZEIC=(((__INTEGER )(fclose((FILE*)(stream__XEIC)))) ==  0);
   };
-  if (result__REIC) {
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  if (result__ZEIC) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    __tmp__A0AC=get_entry__T0AC(string_tmp__TED);
-    if (__tmp__A0AC==NULL) {
-      __tmp__B0AC=NULL;
+    __tmp__I0AC=get_entry__10AC(string_tmp__1ED);
+    if (__tmp__I0AC==NULL) {
+      __tmp__J0AC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__A0AC)->__id) {
+      switch (((struct ___OBJ *)__tmp__I0AC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__B0AC=NULL;
+        __tmp__J0AC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__B0AC=((void *)__tmp__A0AC);
+        __tmp__J0AC=((void *)__tmp__I0AC);
       } break;
       }
     };
-    result__RZAC=__tmp__B0AC;
+    result__ZZAC=__tmp__J0AC;
   };
-  if (((void *)result__RZAC == (void *)NULL)) {
-    put_string__U1F((&__string_225));
-    put_string__U1F(string_tmp__VH);
-    put_string__U1F((&__string_226));
+  if (((void *)result__ZZAC == (void *)NULL)) {
+    put_string__21F((&__string_223));
+    put_string__21F(string_tmp__VH);
+    put_string__21F((&__string_224));
     exit(( 1));
   };
-  Self__DG2G=((__FILE_UNIX *)result__RZAC);
-  Self__DG2G->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__DG2G->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
-  if ((! (Self__DG2G->stream__EJRD != (void *)NULL))) {
-    put_string__U1F((&__string_225));
-    put_string__U1F(string_tmp__VH);
-    put_string__U1F((&__string_227));
+  Self__SD3G=((__FILE_UNIX *)result__ZZAC);
+  Self__SD3G->stream__MJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__SD3G->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->storage__3QO),"r+b")));
+  if ((! (Self__SD3G->stream__MJRD != (void *)NULL))) {
+    put_string__21F((&__string_223));
+    put_string__21F(string_tmp__VH);
+    put_string__21F((&__string_225));
     exit(( 1));
   };
-  if (result__RZAC==NULL) {
-    __tmp__TFC=NULL;
+  if (result__ZZAC==NULL) {
+    __tmp__1FC=NULL;
   } else {
-    __tmp__TFC=((void *)result__RZAC);
-  };
-  file__UDC=__tmp__TFC;
-  __tmp__YFC=((__STRING *)buf__SDC)->count__WFC;
-  Self__JXTE=((__FILE_UNIX *)__tmp__TFC);
-  ptr__2LOF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__SDC)->storage__BCS));
-  ptr__2LOF=(void *)((unsigned long)ptr__2LOF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
-  fwrite((void *)((((__UINTEGER_8 *)ptr__2LOF))),(size_t)(1), (size_t)((__tmp__YFC)),(FILE*)((Self__JXTE->stream__EJRD)));
-  Self__SYTE=((__FILE_UNIX *)__tmp__TFC);
-  fclose((FILE*)((Self__SYTE->stream__EJRD)));
-  Self__SYTE->stream__EJRD=NULL;
+    __tmp__1FC=((void *)result__ZZAC);
+  };
+  file__2DC=__tmp__1FC;
+  __tmp__AGC=((__STRING *)buf__0DC)->count__4FC;
+  Self__MXTE=((__FILE_UNIX *)__tmp__1FC);
+  ptr__YXOF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__0DC)->storage__JCS));
+  ptr__YXOF=(void *)((unsigned long)ptr__YXOF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__YXOF))),(size_t)(1), (size_t)((__tmp__AGC)),(FILE*)((Self__MXTE->stream__MJRD)));
+  Self__VYTE=((__FILE_UNIX *)__tmp__1FC);
+  fclose((FILE*)((Self__VYTE->stream__MJRD)));
+  Self__VYTE->stream__MJRD=NULL;
 }
 
-static void resize__YXZ(__STRING *Self__ZXZ,__INTEGER new_count__0XZ)
+static void resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER old_nb_elts__5RCH,upper__22FH,Self__02FH,lower__GO3C;
-  __INTEGER upper__HO3C,Self__CUDD;
-  __CHARACTER *Self__4RCH,*new__BSCH,*Self__FO3C;
-  if ((! (new_count__0XZ <= Self__ZXZ->count__WFC))) {
-    if ((Self__ZXZ->capacity__YBS < new_count__0XZ)) {
-      if ((Self__ZXZ->capacity__YBS ==  0)) {
-        Self__ZXZ->storage__BCS=create__BMEB(new_count__0XZ);
-      } else {
-        Self__4RCH=((__CHARACTER *)Self__ZXZ->storage__BCS);
-        old_nb_elts__5RCH=Self__ZXZ->capacity__YBS;
-        new__BSCH=((__CHARACTER *)realloc_dynamic__old_size__new_size__RELC(((__POINTER )Self__4RCH),((__UINTEGER_32 )old_nb_elts__5RCH),((__UINTEGER_32 )new_count__0XZ)));
-        upper__22FH=(__INTEGER)(new_count__0XZ -  1);
-        Self__02FH=old_nb_elts__5RCH;
-        while ((Self__02FH <= upper__22FH)) {
-          new__BSCH[Self__02FH]='\0';
-          Self__02FH=(__INTEGER)(Self__02FH +  1);
-        };
-        Self__ZXZ->storage__BCS=new__BSCH;
-      };
-      Self__ZXZ->capacity__YBS=new_count__0XZ;
-    } else {
-      Self__FO3C=((__CHARACTER *)Self__ZXZ->storage__BCS);
-      lower__GO3C=Self__ZXZ->count__WFC;
-      upper__HO3C=(__INTEGER)(new_count__0XZ -  1);
-      Self__CUDD=lower__GO3C;
-      while ((Self__CUDD <= upper__HO3C)) {
-        Self__FO3C[Self__CUDD]='\0';
-        Self__CUDD=(__INTEGER)(Self__CUDD +  1);
-      };
-    };
-  };
-  Self__ZXZ->count__WFC=new_count__0XZ;
+  __INTEGER old_nb_elts__VRDH,upper__M4GH,Self__K4GH,lower__OO3C;
+  __INTEGER upper__PO3C,Self__KUDD;
+  __CHARACTER *Self__URDH,*new__XRDH,*Self__NO3C;
+  if ((! (new_count__CYZ <= Self__BYZ->count__4FC))) {
+    if ((Self__BYZ->capacity__ACS < new_count__CYZ)) {
+      if ((Self__BYZ->capacity__ACS ==  0)) {
+        Self__BYZ->storage__JCS=create__JMEB(new_count__CYZ);
+      } else {
+        Self__URDH=((__CHARACTER *)Self__BYZ->storage__JCS);
+        old_nb_elts__VRDH=Self__BYZ->capacity__ACS;
+        new__XRDH=((__CHARACTER *)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )Self__URDH),((__UINTEGER_32 )old_nb_elts__VRDH),((__UINTEGER_32 )new_count__CYZ)));
+        upper__M4GH=(__INTEGER)(new_count__CYZ -  1);
+        Self__K4GH=old_nb_elts__VRDH;
+        while ((Self__K4GH <= upper__M4GH)) {
+          new__XRDH[Self__K4GH]='\0';
+          Self__K4GH=(__INTEGER)(Self__K4GH +  1);
+        };
+        Self__BYZ->storage__JCS=new__XRDH;
+      };
+      Self__BYZ->capacity__ACS=new_count__CYZ;
+    } else {
+      Self__NO3C=((__CHARACTER *)Self__BYZ->storage__JCS);
+      lower__OO3C=Self__BYZ->count__4FC;
+      upper__PO3C=(__INTEGER)(new_count__CYZ -  1);
+      Self__KUDD=lower__OO3C;
+      while ((Self__KUDD <= upper__PO3C)) {
+        Self__NO3C[Self__KUDD]='\0';
+        Self__KUDD=(__INTEGER)(Self__KUDD +  1);
+      };
+    };
+  };
+  Self__BYZ->count__4FC=new_count__CYZ;
 }
 
-static void move__to__by__BWCC(__CHARACTER *Self__CWCC,__INTEGER lower__DWCC,__INTEGER upper__EWCC,__INTEGER offset__FWCC)
+static void move__to__by__JWCC(__CHARACTER *Self__KWCC,__INTEGER lower__LWCC,__INTEGER upper__MWCC,__INTEGER offset__NWCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER Self__JJHD,Self__YJHD;
-  if ((offset__FWCC !=  0)) {
-    if ((offset__FWCC <  0)) {
-      Self__JJHD=lower__DWCC;
-      while ((Self__JJHD <= upper__EWCC)) {
-        Self__CWCC[(__INTEGER)(Self__JJHD + offset__FWCC)]=Self__CWCC[Self__JJHD];
-        Self__JJHD=(__INTEGER)(Self__JJHD +  1);
+  __INTEGER Self__RJHD,Self__AKHD;
+  if ((offset__NWCC !=  0)) {
+    if ((offset__NWCC <  0)) {
+      Self__RJHD=lower__LWCC;
+      while ((Self__RJHD <= upper__MWCC)) {
+        Self__KWCC[(__INTEGER)(Self__RJHD + offset__NWCC)]=Self__KWCC[Self__RJHD];
+        Self__RJHD=(__INTEGER)(Self__RJHD +  1);
       };
     } else {
-      Self__YJHD=upper__EWCC;
-      while ((Self__YJHD >= lower__DWCC)) {
-        Self__CWCC[(__INTEGER)(Self__YJHD + offset__FWCC)]=Self__CWCC[Self__YJHD];
-        Self__YJHD=(__INTEGER)(Self__YJHD -  1);
+      Self__AKHD=upper__MWCC;
+      while ((Self__AKHD >= lower__LWCC)) {
+        Self__KWCC[(__INTEGER)(Self__AKHD + offset__NWCC)]=Self__KWCC[Self__AKHD];
+        Self__AKHD=(__INTEGER)(Self__AKHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__45DB(__STRING_CONSTANT *Self__55DB,void *other__AAEB)
+static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__JAEB,__tmp__KAEB,i__A1YB;
-  __BOOLEAN result__CAEB;
-  __CHARACTER *__tmp__1AEB,*__tmp__2AEB,*Self__M0YB,*other__N0YB;
-  result__CAEB=FALSE__;
-  __tmp__JAEB=Self__55DB->count__DD;
-  if (((struct ___OBJ *)other__AAEB)->__id==__STRING_CONSTANT__) {
-    __tmp__KAEB=((__STRING_CONSTANT *)other__AAEB)->count__DD;
+  __INTEGER __tmp__RAEB,__tmp__SAEB,i__5HIH;
+  __BOOLEAN result__KAEB;
+  __CHARACTER *__tmp__DBEB,*__tmp__EBEB,*Self__AIIH,*other__BIIH;
+  result__KAEB=FALSE__;
+  __tmp__RAEB=Self__HAEB->count__DD;
+  if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
+    __tmp__SAEB=((__STRING_CONSTANT *)other__IAEB)->count__DD;
   } else {
-    __tmp__KAEB=((__STRING *)other__AAEB)->count__WFC;
+    __tmp__SAEB=((__STRING *)other__IAEB)->count__4FC;
   };
-  if ((__tmp__JAEB == __tmp__KAEB)) {
-    if ((Self__55DB->count__DD ==  0)) {
-      result__CAEB=TRUE__;
+  if ((__tmp__RAEB == __tmp__SAEB)) {
+    if ((Self__HAEB->count__DD ==  0)) {
+      result__KAEB=TRUE__;
     } else {
-      __tmp__1AEB=Self__55DB->storage__VQO;
-      if (((struct ___OBJ *)other__AAEB)->__id==__STRING_CONSTANT__) {
-        __tmp__2AEB=((__STRING_CONSTANT *)other__AAEB)->storage__VQO;
+      __tmp__DBEB=Self__HAEB->storage__3QO;
+      if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
+        __tmp__EBEB=((__STRING_CONSTANT *)other__IAEB)->storage__3QO;
       } else {
-        __tmp__2AEB=((__STRING *)other__AAEB)->storage__BCS;
+        __tmp__EBEB=((__STRING *)other__IAEB)->storage__JCS;
       };
-      Self__M0YB=((__CHARACTER *)__tmp__1AEB);
-      other__N0YB=__tmp__2AEB;
-      i__A1YB=(__INTEGER)(Self__55DB->count__DD -  1);
-      while (((i__A1YB >=  0) && (Self__M0YB[i__A1YB] == ((__CHARACTER *)other__N0YB)[i__A1YB]))) {
-        i__A1YB=(__INTEGER)(i__A1YB -  1);
+      Self__AIIH=((__CHARACTER *)__tmp__DBEB);
+      other__BIIH=__tmp__EBEB;
+      i__5HIH=(__INTEGER)(Self__HAEB->count__DD -  1);
+      while (((i__5HIH >=  0) && (Self__AIIH[i__5HIH] == ((__CHARACTER *)other__BIIH)[i__5HIH]))) {
+        i__5HIH=(__INTEGER)(i__5HIH -  1);
       };
-      result__CAEB=(i__A1YB <  0);
+      result__KAEB=(i__5HIH <  0);
     };
   };
-  return(result__CAEB);
+  return(result__KAEB);
 }
 
-static void* at__QL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RL4,void *k__SL4)
+static void* at__YL4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ZL4,void *k__0L4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__FFGH;
-  __INTEGER result__EFGH,__tmp__GFGH,Self__HFGH;
-  void *node__2L4;
-  Self__FFGH=((__STRING_CONSTANT *)k__SL4);
-  result__EFGH= 0;
-  __tmp__GFGH=Self__FFGH->count__DD;
-  Self__HFGH= 1;
-  while ((Self__HFGH <= __tmp__GFGH)) {
-    result__EFGH=(__INTEGER)((__INTEGER)( 5 * result__EFGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FFGH->storage__VQO)[(__INTEGER)(Self__HFGH -  1)])));
-    Self__HFGH=(__INTEGER)(Self__HFGH +  1);
-  };
-  if ((result__EFGH <  0)) {
-    result__EFGH=(__INTEGER)(~ result__EFGH);
-  };
-  node__2L4=((void **)Self__RL4->buckets__5CT)[(__INTEGER)(result__EFGH % Self__RL4->capacity__0CT)];
-  while ((! __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->key__LDT,k__SL4))) {
-    node__2L4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->next__WDT;
-  };
-  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2L4)->item__HY3);
+  __STRING_CONSTANT *Self__YGHH;
+  __INTEGER result__XGHH,__tmp__ZGHH,Self__0GHH;
+  void *node__EM4;
+  Self__YGHH=((__STRING_CONSTANT *)k__0L4);
+  result__XGHH= 0;
+  __tmp__ZGHH=Self__YGHH->count__DD;
+  Self__0GHH= 1;
+  while ((Self__0GHH <= __tmp__ZGHH)) {
+    result__XGHH=(__INTEGER)((__INTEGER)( 5 * result__XGHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YGHH->storage__3QO)[(__INTEGER)(Self__0GHH -  1)])));
+    Self__0GHH=(__INTEGER)(Self__0GHH +  1);
+  };
+  if ((result__XGHH <  0)) {
+    result__XGHH=(__INTEGER)(~ result__XGHH);
+  };
+  node__EM4=((void **)Self__ZL4->buckets__HDT)[(__INTEGER)(result__XGHH % Self__ZL4->capacity__CDT)];
+  while ((! __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EM4)->key__TDT,k__0L4))) {
+    node__EM4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EM4)->next__4DT;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__EM4)->item__PY3);
 }
 
-static void go_on__CBC(void *obj__EBC)
+static void go_on__KBC(void *obj__MBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __POINTER ptr__EFG,ptr_table__EGHH,next__DGHH,result__FGHH;
-  __POINTER ptr_table__JGHH,next__IGHH,result__KGHH,ptr__OGHH;
-  __POINTER ptr_table__WGHH,next__VGHH,result__XGHH,ptr_table__1GHH;
-  __POINTER next__0GHH,result__2GHH,ptr__YFID,ptr_table__AHHH;
-  __POINTER next__5GHH,result__BHHH,ptr_table__FHHH,next__EHHH;
-  __POINTER result__GHHH,ptr__NHHH,ptr_table__ZHHH,next__YHHH;
-  __POINTER result__0HHH,ptr_table__4HHH,next__3HHH,result__5HHH;
-  __POINTER ptr__UIHH,ptr_table__AJHH,next__5IHH,result__BJHH;
-  __POINTER ptr_table__FJHH,next__EJHH,result__GJHH,ptr__KJHH;
-  __POINTER ptr_table__WJHH,next__VJHH,result__XJHH,ptr_table__1JHH;
-  __POINTER next__0JHH,result__2JHH,ptr__AKHH,ptr_table__JKHH;
-  __POINTER next__IKHH,result__KKHH,ptr_table__OKHH,next__NKHH;
-  __POINTER result__PKHH,ptr__TKHH,ptr_table__2KHH,next__1KHH;
-  __POINTER result__3KHH,ptr_table__BLHH,next__ALHH,result__CLHH;
-  __INTEGER typ_id__JFG,new_capacity__THY,pos_sec__RXC,old_derive__SXC;
-  __INTEGER typ_id__PGHH,h__W0FC,idx__X0FC,idx__ODID,new_capacity__PDID;
-  __INTEGER i__QDID,typ_id__3FID,old_pos__SXOB,old_derive__TXOB;
-  __INTEGER typ_id__OHHH,new_capacity__OMHC,other_upper__NMHC;
-  __INTEGER Self__M2WD,new_capacity__ZUHC,__tmp__3VHC,__tmp__KJTD;
-  __INTEGER Self__QUXE,__tmp__SEHC,typ_id__VIHH,typ_id__LJHH;
-  __INTEGER typ_id__BKHH,typ_id__UKHH,start__KFGH,end__JFGH,len__LFGH;
-  __INTEGER __tmp__MFGH,__tmp__OFGH,Self__PFGH,__tmp__IK3B,Self__VZPC;
-  __INTEGER start__TFGH,end__SFGH,len__UFGH,__tmp__VFGH,__tmp__XFGH;
-  __INTEGER Self__YFGH;
-  __UINTEGER_32 sz__GFG,a__NBEH,new_size__OBEH,t__SBEH,a__RBEH;
-  __UINTEGER_32 new_size__MGHH,lab_type__LGHH,sz__QGHH,a__RGHH;
-  __UINTEGER_32 new_size__SGHH,t__TGHH,a__UGHH,new_size__4GHH;
-  __UINTEGER_32 lab_type__3GHH,sz__0FID,a__DCEH,new_size__ECEH,t__ICEH;
-  __UINTEGER_32 a__HCEH,new_size__IHHH,lab_type__HHHH,sz__PHHH,a__QHHH;
-  __UINTEGER_32 new_size__RHHH,t__SHHH,a__THHH,new_size__BIHH;
-  __UINTEGER_32 lab_type__AIHH,sz__WIHH,a__XIHH,new_size__YIHH,t__ZIHH;
-  __UINTEGER_32 a__0IHH,new_size__IJHH,lab_type__HJHH,sz__MJHH,a__NJHH;
-  __UINTEGER_32 new_size__OJHH,t__PJHH,a__QJHH,new_size__4JHH;
-  __UINTEGER_32 lab_type__3JHH,sz__CKHH,a__DKHH,new_size__EKHH,t__FKHH;
-  __UINTEGER_32 a__GKHH,new_size__RKHH,lab_type__QKHH,sz__VKHH,a__WKHH;
-  __UINTEGER_32 new_size__XKHH,t__YKHH,a__ZKHH,new_size__ELHH;
-  __UINTEGER_32 lab_type__DLHH;
-  __POSITION pos__EPUG,pos__GPUG,pos__IPUG,pos__TPUG,pos__VPUG;
-  __POSITION pos__YPUG,pos__0PUG,p__VHHH,__tmp__EFHC,__tmp__RFHC;
-  __POSITION pos__JUUG,pos__LUUG,pos__NUUG,pos__PUUG,pos__RZID;
-  __POSITION pos__TUUG,__tmp__HEBD,__tmp__PEBD,__tmp__DFBD,__tmp__MFBD;
-  __POSITION pos__3UUG,__tmp__V5OB,__tmp__X5OB,pos__YVUG,pos__0VUG;
-  void *n__4SOB,*n__0DBD,*__tmp__K5OB,*__tmp__AGZB;
-  __SECTION_ *Self__YK2G,*Self__ZK2G,*result__NGHH,*Self__LQUG;
-  __SECTION_ *Self__QO2G,*Self__RO2G;
-  void *__tmp__X1C,*s__UXOB,*result__ACZB,*__tmp__L1OB,*__tmp__RJ3B;
-  void *s__4FZB,*__tmp__OGZB;
-  void *__tmp__Z1C,*result__BREC,*result__0WOB,*sec__1DBD;
-  void *t__OXOB;
-  void *arg__5BZB,*__tmp__REHC,*__tmp__DFHC,*__tmp__QFHC;
-  __ITM_ARG *result__MHHH,*Self__UHHH,*result__TIHH,*Self__1IHH;
-  __ITM_SLOT_OPERATOR *Self__IEHC,*Self__24FC,*Self__TGHC;
-  void *tm__44FC,*__tmp__H5FC;
-  void *expr__EJ3B;
-  void *__tmp__SJ3B;
-  __ITM_SLOT *result__JJHH,*Self__RJHH;
-  __ITM_PROTOTYPE *result__5JHH;
-  __ITM_READ_ARG1 *result__SKHH;
-  __STRING *Self__NFGH,*Self__WFGH;
-  __PROTOTYPE *Self__3FZB;
-  __HASHED_SEToSTRING_CONSTANTo *result__DFG,*Self__2HT,*Self__DK3B;
-  void *t__0XC,*k__WQEC,*k__P0FC,*lt__PXOB;
-  __BOOLEAN result__JKJH,result__LKJH,result__ZBE,result__OGEB;
-  __BOOLEAN __tmp__1GEB,result__XD5,result__TBEH,result__WX5;
-  __BOOLEAN __tmp__TIEB,result__NVAB,__tmp__UIEB,__tmp__XIEB,__tmp__K2C;
-  __BOOLEAN __tmp__51C,result__NXOB,result__JHHH,result__CIHH;
-  __BOOLEAN __tmp__QDZB,result__FIHH,__tmp__HVHC,__tmp__WEHC;
-  __BOOLEAN result__KIHH,__tmp__HZOB,result__NIHH,result__QIHH;
-  __BOOLEAN result__FLHH,__tmp__A4OB,__tmp__B4OB;
-  __CHARACTER result__HJ2G,result__MJ2G,result__RJ2G,result__WJ2G;
-  __CHARACTER result__1J2G,result__EK2G,result__JK2G,result__OK2G;
-  __CHARACTER result__TK2G,affect__RXOB,style__QXOB,result__KHHH;
-  __CHARACTER result__DIHH,result__GIHH,result__LIHH,result__OIHH;
-  __CHARACTER result__RIHH,result__GLHH,result__1O2G,result__EP2G;
-  __CHARACTER result__JP2G,result__OP2G,result__5P2G;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__VQEC;
-  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__N0FC;
-  void *node__AREC,*node__Y0FC,*node1__SDID,*node2__TDID,*__tmp__G2FC;
-  void **old_buckets__RDID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__XFID;
-  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__JETD;
-  void *result__QU1B,*result__SU4B,*larg__2DBD;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__WCZC,*Self__MDZC;
-  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__XUHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__LMHC,*Self__WCEH,*Self__5CEH;
-  void **__tmp__BNHC,**__tmp__DNHC,**Self__EHSD;
-  void **__tmp__2VHC,**new__WITD;
-  void *__tmp__I5OB,*__tmp__5FZB;
-  void **__tmp__FK3B,**Self__THHC;
-  object__JBC=obj__EBC;
-  source__PBC=((__PROTOTYPE *)obj__EBC)->source__NBC;
-  position__SBC= 1;
-  pos_cur__VBC= 1;
-  pos_line__WBC= 1;
-  pos_col__XBC= 0;
-  is_catch_comment__AXC=FALSE__;
-  if (is_shorter__5Y) {
-    is_active_short__4BC=TRUE__;
-    key_comment_default__ACC=(&__string_129);
-    short_derive__BCC= 0;
-    copy__ZCS(output_code__SI,source__PBC);
-    result__DFG=NULL;
-    ptr__EFG=((__POINTER )(NULL));
-    typ_id__JFG= 0;
-    sz__GFG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
-    if ((sz__GFG ==  0)) {
-      result__DFG=HASHED_SEToSTRING_CONSTANTo__;
-    } else {
-      typ_id__JFG=__HASHED_SEToSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GFG);
-      if ((typ_id__JFG == (__INTEGER)(-  1))) {
-        a__NBEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OBEH=(__UINTEGER_32)((__UINTEGER_32)(sz__GFG + a__NBEH) & (__UINTEGER_32)(~ a__NBEH));
-        ptr_table__EGHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OBEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__DGHH=((__POINTER )(NULL));
-        result__FGHH=((__POINTER *)ptr_table__EGHH)[ 0];
-        if ((result__FGHH == (void *)NULL)) {
-          result__FGHH=new_lab__MRJ(new_size__OBEH);
-          next__DGHH=(void *)((unsigned long)result__FGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBEH)));
-          ((__POINTER *)next__DGHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EGHH)[ 0]=next__DGHH;
-        } else {
-          next__DGHH=((__POINTER *)result__FGHH)[ 0];
-          if ((next__DGHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OBEH <<  1)) <=  4096)) {
-              next__DGHH=(void *)((unsigned long)result__FGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBEH)));
+  __POINTER ptr__MFG,ptr_table__EIIH,next__DIIH,result__FIIH;
+  __POINTER ptr_table__JIIH,next__IIIH,result__KIIH,ptr__OIIH;
+  __POINTER ptr_table__WIIH,next__VIIH,result__XIIH,ptr_table__1IIH;
+  __POINTER next__0IIH,result__2IIH,ptr__AGID,ptr_table__AJIH;
+  __POINTER next__5IIH,result__BJIH,ptr_table__FJIH,next__EJIH;
+  __POINTER result__GJIH,ptr__NJIH,ptr_table__ZJIH,next__YJIH;
+  __POINTER result__0JIH,ptr_table__4JIH,next__3JIH,result__5JIH;
+  __POINTER ptr__UKIH,ptr_table__ALIH,next__5KIH,result__BLIH;
+  __POINTER ptr_table__FLIH,next__ELIH,result__GLIH,ptr__KLIH;
+  __POINTER ptr_table__WLIH,next__VLIH,result__XLIH,ptr_table__1LIH;
+  __POINTER next__0LIH,result__2LIH,ptr__AMIH,ptr_table__JMIH;
+  __POINTER next__IMIH,result__KMIH,ptr_table__OMIH,next__NMIH;
+  __POINTER result__PMIH,ptr__TMIH,ptr_table__2MIH,next__1MIH;
+  __POINTER result__3MIH,ptr_table__BNIH,next__ANIH,result__CNIH;
+  __INTEGER typ_id__RFG,new_capacity__1HY,pos_sec__ZXC,old_derive__0XC;
+  __INTEGER typ_id__PIIH,h__40FC,idx__50FC,idx__WDID,new_capacity__XDID;
+  __INTEGER i__YDID,typ_id__FGID,old_pos__0XOB,old_derive__1XOB;
+  __INTEGER typ_id__OJIH,new_capacity__WMHC,other_upper__VMHC;
+  __INTEGER Self__U2WD,new_capacity__BVHC,__tmp__FWHC,__tmp__SJTD;
+  __INTEGER Self__TUXE,__tmp__0EHC,typ_id__VKIH,typ_id__LLIH;
+  __INTEGER typ_id__BMIH,typ_id__UMIH,start__3GHH,end__2GHH,len__4GHH;
+  __INTEGER __tmp__5GHH,__tmp__BHHH,Self__CHHH,__tmp__QK3B,Self__3ZPC;
+  __INTEGER start__GHHH,end__FHHH,len__HHHH,__tmp__IHHH,__tmp__KHHH;
+  __INTEGER Self__LHHH;
+  __UINTEGER_32 sz__OFG,a__RCFH,new_size__SCFH,t__WCFH,a__VCFH;
+  __UINTEGER_32 new_size__MIIH,lab_type__LIIH,sz__QIIH,a__RIIH;
+  __UINTEGER_32 new_size__SIIH,t__TIIH,a__UIIH,new_size__4IIH;
+  __UINTEGER_32 lab_type__3IIH,sz__CGID,a__IDFH,new_size__JDFH,t__NDFH;
+  __UINTEGER_32 a__MDFH,new_size__IJIH,lab_type__HJIH,sz__PJIH,a__QJIH;
+  __UINTEGER_32 new_size__RJIH,t__SJIH,a__TJIH,new_size__BKIH;
+  __UINTEGER_32 lab_type__AKIH,sz__WKIH,a__XKIH,new_size__YKIH,t__ZKIH;
+  __UINTEGER_32 a__0KIH,new_size__ILIH,lab_type__HLIH,sz__MLIH,a__NLIH;
+  __UINTEGER_32 new_size__OLIH,t__PLIH,a__QLIH,new_size__4LIH;
+  __UINTEGER_32 lab_type__3LIH,sz__CMIH,a__DMIH,new_size__EMIH,t__FMIH;
+  __UINTEGER_32 a__GMIH,new_size__RMIH,lab_type__QMIH,sz__VMIH,a__WMIH;
+  __UINTEGER_32 new_size__XMIH,t__YMIH,a__ZMIH,new_size__ENIH;
+  __UINTEGER_32 lab_type__DNIH;
+  __POSITION pos__SLVG,pos__ULVG,pos__WLVG,pos__BMVG,pos__DMVG;
+  __POSITION pos__GMVG,pos__IMVG,p__VJIH,__tmp__MFHC,__tmp__ZFHC;
+  __POSITION pos__XQVG,pos__ZQVG,pos__1QVG,pos__3QVG,pos__ZZID;
+  __POSITION pos__BRVG,__tmp__PEBD,__tmp__XEBD,__tmp__LFBD,__tmp__UFBD;
+  __POSITION pos__LRVG,__tmp__35OB,__tmp__55OB,pos__GSVG,pos__ISVG;
+  void *n__GTOB,*n__CEBD,*__tmp__S5OB,*__tmp__IGZB;
+  __SECTION_ *Self__1H3G,*Self__2H3G,*result__NIIH,*Self__ZMVG;
+  __SECTION_ *Self__TL3G,*Self__UL3G;
+  void *__tmp__51C,*s__2XOB,*result__ICZB,*__tmp__T1OB,*__tmp__ZJ3B;
+  void *s__GGZB,*__tmp__WGZB;
+  void *__tmp__B2C,*result__JREC,*result__CXOB,*sec__DEBD;
+  void *t__WXOB;
+  void *arg__HCZB,*__tmp__ZEHC,*__tmp__LFHC,*__tmp__YFHC;
+  __ITM_ARG *result__MJIH,*Self__UJIH,*result__TKIH,*Self__1KIH;
+  __ITM_SLOT_OPERATOR *Self__QEHC,*Self__E5FC,*Self__1GHC;
+  void *tm__G5FC,*__tmp__P5FC;
+  void *expr__MJ3B;
+  void *__tmp__0J3B;
+  __ITM_SLOT *result__JLIH,*Self__RLIH;
+  __ITM_PROTOTYPE *result__5LIH;
+  __ITM_READ_ARG1 *result__SMIH;
+  __STRING *Self__AHHH,*Self__JHHH;
+  __PROTOTYPE *Self__FGZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__LFG,*Self__EIT,*Self__LK3B;
+  void *t__CYC,*k__4QEC,*k__X0FC,*lt__XXOB;
+  __BOOLEAN result__JMKH,result__LMKH,result__BCE,result__WGEB;
+  __BOOLEAN __tmp__DHEB,result__5D5,result__XCFH,result__4X5;
+  __BOOLEAN __tmp__1IEB,result__VVAB,__tmp__2IEB,__tmp__5IEB,__tmp__S2C;
+  __BOOLEAN __tmp__H2C,result__VXOB,result__JJIH,result__CKIH;
+  __BOOLEAN __tmp__YDZB,result__FKIH,__tmp__PVHC,__tmp__4EHC;
+  __BOOLEAN result__KKIH,__tmp__PZOB,result__NKIH,result__QKIH;
+  __BOOLEAN result__FNIH,__tmp__I4OB,__tmp__J4OB;
+  __CHARACTER result__KG3G,result__PG3G,result__UG3G,result__ZG3G;
+  __CHARACTER result__4G3G,result__HH3G,result__MH3G,result__RH3G;
+  __CHARACTER result__WH3G,affect__ZXOB,style__YXOB,result__KJIH;
+  __CHARACTER result__DKIH,result__GKIH,result__LKIH,result__OKIH;
+  __CHARACTER result__RKIH,result__GNIH,result__4L3G,result__HM3G;
+  __CHARACTER result__MM3G,result__RM3G,result__CN3G;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__3QEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__V0FC;
+  void *node__IREC,*node__A1FC,*node1__0DID,*node2__1DID,*__tmp__O2FC;
+  void **old_buckets__ZDID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__5FID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__RETD;
+  void *result__YU1B,*result__0U4B,*larg__EEBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__4CZC,*Self__UDZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__5UHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__TMHC,*Self__1DFH,*Self__EEFH;
+  void **__tmp__JNHC,**__tmp__LNHC,**Self__MHSD;
+  void **__tmp__EWHC,**new__4ITD;
+  void *__tmp__Q5OB,*__tmp__HGZB;
+  void **__tmp__NK3B,**Self__1HHC;
+  object__RBC=obj__MBC;
+  source__XBC=((__PROTOTYPE *)obj__MBC)->source__VBC;
+  position__0BC= 1;
+  pos_cur__3BC= 1;
+  pos_line__4BC= 1;
+  pos_col__5BC= 0;
+  is_catch_comment__IXC=FALSE__;
+  if (is_shorter__FZ) {
+    is_active_short__GCC=TRUE__;
+    key_comment_default__ICC=(&__string_129);
+    short_derive__JCC= 0;
+    copy__BDS(output_code__SI,source__XBC);
+    result__LFG=NULL;
+    ptr__MFG=((__POINTER )(NULL));
+    typ_id__RFG= 0;
+    sz__OFG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__OFG ==  0)) {
+      result__LFG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__RFG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__OFG);
+      if ((typ_id__RFG == (__INTEGER)(-  1))) {
+        a__RCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__OFG + a__RCFH) & (__UINTEGER_32)(~ a__RCFH));
+        ptr_table__EIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DIIH=((__POINTER )(NULL));
+        result__FIIH=((__POINTER *)ptr_table__EIIH)[ 0];
+        if ((result__FIIH == (void *)NULL)) {
+          result__FIIH=new_lab__URJ(new_size__SCFH);
+          next__DIIH=(void *)((unsigned long)result__FIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SCFH)));
+          ((__POINTER *)next__DIIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EIIH)[ 0]=next__DIIH;
+        } else {
+          next__DIIH=((__POINTER *)result__FIIH)[ 0];
+          if ((next__DIIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FIIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SCFH <<  1)) <=  4096)) {
+              next__DIIH=(void *)((unsigned long)result__FIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SCFH)));
             } else {
-              next__DGHH=new_lab__MRJ(new_size__OBEH);
-            };
-            ((__POINTER *)next__DGHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EGHH)[ 0]=next__DGHH;
-          } else {
-            ((__POINTER *)result__FGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FGHH=next__DGHH;
-          };
-        };
-        ptr__EFG=result__FGHH;
-      } else {
-        t__SBEH=((__UINTEGER_32 )typ_id__JFG);
-        a__RBEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__GFG + a__RBEH) & (__UINTEGER_32)(~ a__RBEH));
-        ptr_table__JGHH=((__POINTER )(&(table_type[(t__SBEH)])));
-        lab_type__LGHH=(__UINTEGER_32)(t__SBEH |  1);
-        next__IGHH=((__POINTER )(NULL));
-        result__KGHH=((__POINTER *)ptr_table__JGHH)[ 0];
-        if ((result__KGHH == (void *)NULL)) {
-          result__KGHH=new_lab__MRJ(lab_type__LGHH);
-          next__IGHH=(void *)((unsigned long)result__KGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGHH)));
-          ((__POINTER *)next__IGHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JGHH)[ 0]=next__IGHH;
-        } else {
-          next__IGHH=((__POINTER *)result__KGHH)[ 0];
-          if ((next__IGHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MGHH <<  1)) <=  4096)) {
-              next__IGHH=(void *)((unsigned long)result__KGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGHH)));
+              next__DIIH=new_lab__URJ(new_size__SCFH);
+            };
+            ((__POINTER *)next__DIIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EIIH)[ 0]=next__DIIH;
+          } else {
+            ((__POINTER *)result__FIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FIIH=next__DIIH;
+          };
+        };
+        ptr__MFG=result__FIIH;
+      } else {
+        t__WCFH=((__UINTEGER_32 )typ_id__RFG);
+        a__VCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OFG + a__VCFH) & (__UINTEGER_32)(~ a__VCFH));
+        ptr_table__JIIH=((__POINTER )(&(table_type[(t__WCFH)])));
+        lab_type__LIIH=(__UINTEGER_32)(t__WCFH |  1);
+        next__IIIH=((__POINTER )(NULL));
+        result__KIIH=((__POINTER *)ptr_table__JIIH)[ 0];
+        if ((result__KIIH == (void *)NULL)) {
+          result__KIIH=new_lab__URJ(lab_type__LIIH);
+          next__IIIH=(void *)((unsigned long)result__KIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIIH)));
+          ((__POINTER *)next__IIIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JIIH)[ 0]=next__IIIH;
+        } else {
+          next__IIIH=((__POINTER *)result__KIIH)[ 0];
+          if ((next__IIIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KIIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MIIH <<  1)) <=  4096)) {
+              next__IIIH=(void *)((unsigned long)result__KIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIIH)));
             } else {
-              next__IGHH=new_lab__MRJ(lab_type__LGHH);
+              next__IIIH=new_lab__URJ(lab_type__LIIH);
             };
-            ((__POINTER *)next__IGHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JGHH)[ 0]=next__IGHH;
+            ((__POINTER *)next__IIIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JIIH)[ 0]=next__IIIH;
           } else {
-            ((__POINTER *)result__KGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KGHH=next__IGHH;
+            ((__POINTER *)result__KIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KIIH=next__IIIH;
           };
         };
-        ptr__EFG=result__KGHH;
+        ptr__MFG=result__KIIH;
       };
-      result__DFG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__EFG);
-      *(result__DFG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__LFG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__MFG);
+      *(result__LFG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    Self__2HT=((__HASHED_SEToSTRING_CONSTANTo *)result__DFG);
-    new_capacity__THY=prime_number_ceiling__X41( 53);
-    Self__2HT->buckets__PEV=create__T23(new_capacity__THY);
-    Self__2HT->capacity__KIT=new_capacity__THY;
-    Self__2HT->count__YHY= 0;
-    short_local__JCC=result__DFG;
-    short__token__to__LBD((&__string_117), 1, 1);
+    Self__EIT=((__HASHED_SEToSTRING_CONSTANTo *)result__LFG);
+    new_capacity__1HY=prime_number_ceiling__541( 53);
+    Self__EIT->buckets__XEV=create__123(new_capacity__1HY);
+    Self__EIT->capacity__SIT=new_capacity__1HY;
+    Self__EIT->count__AIY= 0;
+    short_local__RCC=result__LFG;
+    short__token__to__TBD((&__string_117), 1, 1);
   };
-  t__0XC=NULL;
-  read_space__3RD();
-  pos_sec__RXC=position__SBC;
-  old_derive__SXC=short_derive__BCC;
-  result__JKJH=read_word__QPF((&__string_4));
-  if (is_shorter__5Y) {
-    if (result__JKJH) {
-      short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+  t__CYC=NULL;
+  read_space__FSD();
+  pos_sec__ZXC=position__0BC;
+  old_derive__0XC=short_derive__JCC;
+  result__JMKH=read_word__YPF((&__string_4));
+  if (is_shorter__FZ) {
+    if (result__JMKH) {
+      short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
     };
   };
-  if ((! result__JKJH)) {
-    pos__EPUG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_228));
-    put_position__UOG(pos__EPUG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((! result__JMKH)) {
+    pos__SLVG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_226));
+    put_position__2OG(pos__SLVG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  key_comment_default__ACC=(&__string_127);
+  key_comment_default__ICC=(&__string_127);
   if (is_shorter2__VI) {
-    is_catch_comment__AXC=FALSE__;
+    is_catch_comment__IXC=FALSE__;
   };
-  result__LKJH=read_word__QPF((&__string_22));
-  if (is_shorter__5Y) {
-    if (result__LKJH) {
+  result__LMKH=read_word__YPF((&__string_22));
+  if (is_shorter__FZ) {
+    if (result__LMKH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
-        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       } else {
-        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       };
     };
   };
-  if ((! result__LKJH)) {
-    pos__GPUG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_229));
-    put_position__UOG(pos__GPUG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((! result__LMKH)) {
+    pos__ULVG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_227));
+    put_position__2OG(pos__ULVG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  if ((! read_slot_header__SDE(TRUE__))) {
-    pos__IPUG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_230));
-    put_position__UOG(pos__IPUG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((! read_slot_header__0DE(TRUE__))) {
+    pos__WLVG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_228));
+    put_position__2OG(pos__WLVG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__SDE(FALSE__)) {
+  while (read_slot_header__0DE(FALSE__)) {
   };
-  while_do__34E:
+  while_do__F5E:
   {
-    result__ZBE=read_word__QPF((&__string_4));
-    if (is_shorter__5Y) {
-      if (result__ZBE) {
-        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+    result__BCE=read_word__YPF((&__string_4));
+    if (is_shorter__FZ) {
+      if (result__BCE) {
+        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       };
     };
-    if (result__ZBE) {
-      result__OGEB=FALSE__;
-      if ((! read_space__3RD())) {
-        __tmp__1GEB=TRUE__;
+    if (result__BCE) {
+      result__WGEB=FALSE__;
+      if ((! read_space__FSD())) {
+        __tmp__DHEB=TRUE__;
       } else {
-        result__HJ2G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__HJ2G=((__CHARACTER )(( 0)));
+        result__KG3G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__KG3G=((__CHARACTER )(( 0)));
         } else {
-          result__HJ2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__KG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        result__XD5=FALSE__;
-        if ((((__INTEGER_8 )result__HJ2G) >= ((__INTEGER_8 )'A'))) {
-          result__XD5=(((__INTEGER_8 )result__HJ2G) <= ((__INTEGER_8 )'Z'));
+        result__5D5=FALSE__;
+        if ((((__INTEGER_8 )result__KG3G) >= ((__INTEGER_8 )'A'))) {
+          result__5D5=(((__INTEGER_8 )result__KG3G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__1GEB=(! result__XD5);
+        __tmp__DHEB=(! result__5D5);
       };
-      if (__tmp__1GEB) {
-        result__OGEB=FALSE__;
+      if (__tmp__DHEB) {
+        result__WGEB=FALSE__;
       } else {
-        ((__STRING *)string_tmp__VH)->count__WFC= 0;
-        result__MJ2G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__MJ2G=((__CHARACTER )(( 0)));
+        ((__STRING *)string_tmp__VH)->count__4FC= 0;
+        result__PG3G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__PG3G=((__CHARACTER )(( 0)));
         } else {
-          result__MJ2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__PG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__MJ2G);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__RJ2G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__RJ2G=((__CHARACTER )(( 0)));
+        add_last__BMT(string_tmp__VH,result__PG3G);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__UG3G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__UG3G=((__CHARACTER )(( 0)));
         } else {
-          result__RJ2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__UG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        result__TBEH=FALSE__;
-        if ((((__INTEGER_8 )result__RJ2G) >= ((__INTEGER_8 )'a'))) {
-          result__TBEH=(((__INTEGER_8 )result__RJ2G) <= ((__INTEGER_8 )'z'));
+        result__XCFH=FALSE__;
+        if ((((__INTEGER_8 )result__UG3G) >= ((__INTEGER_8 )'a'))) {
+          result__XCFH=(((__INTEGER_8 )result__UG3G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__TBEH) {
-          result__WJ2G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__WJ2G=((__CHARACTER )(( 0)));
+        if (result__XCFH) {
+          result__ZG3G='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__ZG3G=((__CHARACTER )(( 0)));
           } else {
-            result__WJ2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__ZG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__WJ2G);
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          while_do__42FF:
+          add_last__BMT(string_tmp__VH,result__ZG3G);
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          while_do__AIGF:
           {
-            result__1J2G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__1J2G=((__CHARACTER )(( 0)));
+            result__4G3G='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__4G3G=((__CHARACTER )(( 0)));
             } else {
-              result__1J2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__4G3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__1J2G != ((__CHARACTER )(( 0))))) {
-              result__EK2G='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__EK2G=((__CHARACTER )(( 0)));
+            if ((result__4G3G != ((__CHARACTER )(( 0))))) {
+              result__HH3G='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__HH3G=((__CHARACTER )(( 0)));
               } else {
-                result__EK2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__HH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              result__WX5=FALSE__;
-              if ((((__INTEGER_8 )result__EK2G) >= ((__INTEGER_8 )'a'))) {
-                result__WX5=(((__INTEGER_8 )result__EK2G) <= ((__INTEGER_8 )'z'));
+              result__4X5=FALSE__;
+              if ((((__INTEGER_8 )result__HH3G) >= ((__INTEGER_8 )'a'))) {
+                result__4X5=(((__INTEGER_8 )result__HH3G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__WX5) {
-                __tmp__TIEB=TRUE__;
+              if (result__4X5) {
+                __tmp__1IEB=TRUE__;
               } else {
-                result__JK2G='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__JK2G=((__CHARACTER )(( 0)));
+                result__MH3G='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__MH3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__JK2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__MH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                result__NVAB=FALSE__;
-                if ((((__INTEGER_8 )result__JK2G) >= ((__INTEGER_8 )'0'))) {
-                  result__NVAB=(((__INTEGER_8 )result__JK2G) <= ((__INTEGER_8 )'9'));
+                result__VVAB=FALSE__;
+                if ((((__INTEGER_8 )result__MH3G) >= ((__INTEGER_8 )'0'))) {
+                  result__VVAB=(((__INTEGER_8 )result__MH3G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__TIEB=result__NVAB;
+                __tmp__1IEB=result__VVAB;
               };
-              if (__tmp__TIEB) {
-                __tmp__UIEB=TRUE__;
+              if (__tmp__1IEB) {
+                __tmp__2IEB=TRUE__;
               } else {
-                result__OK2G='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__OK2G=((__CHARACTER )(( 0)));
+                result__RH3G='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__RH3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__OK2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__RH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                __tmp__UIEB=(result__OK2G == '_');
+                __tmp__2IEB=(result__RH3G == '_');
               };
-              __tmp__XIEB=__tmp__UIEB;
+              __tmp__5IEB=__tmp__2IEB;
             } else {
-              __tmp__XIEB=FALSE__;
+              __tmp__5IEB=FALSE__;
             };
-            if (__tmp__XIEB) {
-              result__TK2G='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__TK2G=((__CHARACTER )(( 0)));
+            if (__tmp__5IEB) {
+              result__WH3G='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__WH3G=((__CHARACTER )(( 0)));
               } else {
-                result__TK2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__WH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              add_last__ZLT(string_tmp__VH,result__TK2G);
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              goto while_do__42FF;
+              add_last__BMT(string_tmp__VH,result__WH3G);
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              goto while_do__AIGF;
             };
           };
-          last_string__I0C=get__IWB(string_tmp__VH);
-          result__OGEB=TRUE__;
-          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          last_string__Q0C=get__QWB(string_tmp__VH);
+          result__WGEB=TRUE__;
+          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         } else {
-          position__SBC=(__INTEGER)(position__SBC -  1);
-          result__OGEB=FALSE__;
+          position__0BC=(__INTEGER)(position__0BC -  1);
+          result__WGEB=FALSE__;
         };
       };
-      if (result__OGEB) {
-        n__4SOB=last_string__I0C;
-        if ((! (((((((((void *)n__4SOB == (void *)(&__string_23)) || ((void *)n__4SOB == (void *)(&__string_24))) || ((void *)n__4SOB == (void *)(&__string_25))) || ((void *)n__4SOB == (void *)(&__string_26))) || ((void *)n__4SOB == (void *)(&__string_27))) || ((void *)n__4SOB == (void *)(&__string_28))) || ((void *)n__4SOB == (void *)(&__string_29))) || ((void *)n__4SOB == (void *)(&__string_30))))) {
-          pos__TPUG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_231));
-          put_position__UOG(pos__TPUG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (result__WGEB) {
+        n__GTOB=last_string__Q0C;
+        if ((! (((((((((void *)n__GTOB == (void *)(&__string_23)) || ((void *)n__GTOB == (void *)(&__string_24))) || ((void *)n__GTOB == (void *)(&__string_25))) || ((void *)n__GTOB == (void *)(&__string_26))) || ((void *)n__GTOB == (void *)(&__string_27))) || ((void *)n__GTOB == (void *)(&__string_28))) || ((void *)n__GTOB == (void *)(&__string_29))) || ((void *)n__GTOB == (void *)(&__string_30))))) {
+          pos__BMVG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_229));
+          put_position__2OG(pos__BMVG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__X0C=get_name__0UOB(last_string__I0C);
-        if (((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_28))) {
-          __tmp__K2C=TRUE__;
+        last_section__50C=get_name__CVOB(last_string__Q0C);
+        if (((void *)((__SECTION_ *)last_section__50C)->name__KZDC == (void *)(&__string_28))) {
+          __tmp__S2C=TRUE__;
         } else {
-          Self__YK2G=((__SECTION_ *)last_section__X0C);
-          if (((((void *)Self__YK2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__YK2G->name__CZDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__JBC)->last_slot__O1C != (void *)NULL))) {
-            __tmp__X1C=((__PROTOTYPE *)object__JBC)->last_slot__O1C;
-            if (((struct ___OBJ *)__tmp__X1C)->__id==__ITM_SLOT__) {
-              __tmp__Z1C=((__ITM_SLOT *)__tmp__X1C)->id_section__Y1C;
+          Self__1H3G=((__SECTION_ *)last_section__50C);
+          if (((((void *)Self__1H3G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__1H3G->name__KZDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__RBC)->last_slot__W1C != (void *)NULL))) {
+            __tmp__51C=((__PROTOTYPE *)object__RBC)->last_slot__W1C;
+            if (((struct ___OBJ *)__tmp__51C)->__id==__ITM_SLOT__) {
+              __tmp__B2C=((__ITM_SLOT *)__tmp__51C)->id_section__A2C;
             } else {
-              __tmp__Z1C=((__ITM_SLOT_OPERATOR *)__tmp__X1C)->parent_itm_slot__OU5B.id_section__Y1C;
+              __tmp__B2C=((__ITM_SLOT_OPERATOR *)__tmp__51C)->parent_itm_slot__WU5B.id_section__A2C;
             };
-            Self__ZK2G=((__SECTION_ *)__tmp__Z1C);
-            __tmp__51C=(! (((void *)Self__ZK2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__ZK2G->name__CZDC == (void *)(&__string_24))));
+            Self__2H3G=((__SECTION_ *)__tmp__B2C);
+            __tmp__H2C=(! (((void *)Self__2H3G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__2H3G->name__KZDC == (void *)(&__string_24))));
           } else {
-            __tmp__51C=FALSE__;
+            __tmp__H2C=FALSE__;
           };
-          if (__tmp__51C) {
-            pos__VPUG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_232));
-            put_position__UOG(pos__VPUG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if (__tmp__H2C) {
+            pos__DMVG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_230));
+            put_position__2OG(pos__DMVG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          __tmp__K2C=__tmp__51C;
+          __tmp__S2C=__tmp__H2C;
         };
-        if ((! __tmp__K2C)) {
-          if ((((((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__JBC)->type_style__X2C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
-            pos__YPUG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_233));
-            put_position__UOG(pos__YPUG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        if ((! __tmp__S2C)) {
+          if ((((((void *)((__SECTION_ *)last_section__50C)->name__KZDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__RBC)->type_style__52C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__RBC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__RBC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
+            pos__GMVG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_231));
+            put_position__2OG(pos__GMVG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__0XC=read_type_list__IMO(PARSER__,TRUE__);
-        if (((void *)t__0XC == (void *)NULL)) {
-          pos__0PUG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_231));
-          put_position__UOG(pos__0PUG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        t__CYC=read_type_list__QMO(PARSER__,TRUE__);
+        if (((void *)t__CYC == (void *)NULL)) {
+          pos__IMVG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_229));
+          put_position__2OG(pos__IMVG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        Self__VQEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__4WOB);
-        k__WQEC=t__0XC;
-        result__BREC=NULL;
-        node__AREC=((void **)Self__VQEC->buckets__IREC)[(__INTEGER)(hash_code__P50(t__0XC) % Self__VQEC->capacity__DREC)];
-        while ((! (((void *)node__AREC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->key__UREC == (void *)k__WQEC)))) {
-          node__AREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->next__5REC;
-        };
-        if (((void *)node__AREC != (void *)NULL)) {
-          result__BREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__AREC)->item__HSEC;
-        };
-        result__0WOB=result__BREC;
-        if (((void *)result__BREC == (void *)NULL)) {
-          result__NGHH=NULL;
-          ptr__OGHH=((__POINTER )(NULL));
-          typ_id__PGHH= 0;
-          sz__QGHH=((__UINTEGER_32 )sizeof(__SECTION_));
-          if ((sz__QGHH ==  0)) {
-            result__NGHH=SECTION___;
-          } else {
-            typ_id__PGHH=__SECTION___;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QGHH);
-            if ((typ_id__PGHH == (__INTEGER)(-  1))) {
-              a__RGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__SGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGHH + a__RGHH) & (__UINTEGER_32)(~ a__RGHH));
-              ptr_table__WGHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__VGHH=((__POINTER )(NULL));
-              result__XGHH=((__POINTER *)ptr_table__WGHH)[ 0];
-              if ((result__XGHH == (void *)NULL)) {
-                result__XGHH=new_lab__MRJ(new_size__SGHH);
-                next__VGHH=(void *)((unsigned long)result__XGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGHH)));
-                ((__POINTER *)next__VGHH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WGHH)[ 0]=next__VGHH;
+        Self__3QEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__GXOB);
+        k__4QEC=t__CYC;
+        result__JREC=NULL;
+        node__IREC=((void **)Self__3QEC->buckets__QREC)[(__INTEGER)(hash_code__X50(t__CYC) % Self__3QEC->capacity__LREC)];
+        while ((! (((void *)node__IREC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__IREC)->key__2REC == (void *)k__4QEC)))) {
+          node__IREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__IREC)->next__HSEC;
+        };
+        if (((void *)node__IREC != (void *)NULL)) {
+          result__JREC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__IREC)->item__PSEC;
+        };
+        result__CXOB=result__JREC;
+        if (((void *)result__JREC == (void *)NULL)) {
+          result__NIIH=NULL;
+          ptr__OIIH=((__POINTER )(NULL));
+          typ_id__PIIH= 0;
+          sz__QIIH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__QIIH ==  0)) {
+            result__NIIH=SECTION___;
+          } else {
+            typ_id__PIIH=__SECTION___;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QIIH);
+            if ((typ_id__PIIH == (__INTEGER)(-  1))) {
+              a__RIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QIIH + a__RIIH) & (__UINTEGER_32)(~ a__RIIH));
+              ptr_table__WIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__VIIH=((__POINTER )(NULL));
+              result__XIIH=((__POINTER *)ptr_table__WIIH)[ 0];
+              if ((result__XIIH == (void *)NULL)) {
+                result__XIIH=new_lab__URJ(new_size__SIIH);
+                next__VIIH=(void *)((unsigned long)result__XIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIIH)));
+                ((__POINTER *)next__VIIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WIIH)[ 0]=next__VIIH;
               } else {
-                next__VGHH=((__POINTER *)result__XGHH)[ 0];
-                if ((next__VGHH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XGHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SGHH <<  1)) <=  4096)) {
-                    next__VGHH=(void *)((unsigned long)result__XGHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGHH)));
+                next__VIIH=((__POINTER *)result__XIIH)[ 0];
+                if ((next__VIIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XIIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SIIH <<  1)) <=  4096)) {
+                    next__VIIH=(void *)((unsigned long)result__XIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SIIH)));
                   } else {
-                    next__VGHH=new_lab__MRJ(new_size__SGHH);
+                    next__VIIH=new_lab__URJ(new_size__SIIH);
                   };
-                  ((__POINTER *)next__VGHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WGHH)[ 0]=next__VGHH;
+                  ((__POINTER *)next__VIIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WIIH)[ 0]=next__VIIH;
                 } else {
-                  ((__POINTER *)result__XGHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VGHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XGHH=next__VGHH;
+                  ((__POINTER *)result__XIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XIIH=next__VIIH;
                 };
               };
-              ptr__OGHH=result__XGHH;
+              ptr__OIIH=result__XIIH;
             } else {
-              t__TGHH=((__UINTEGER_32 )typ_id__PGHH);
-              a__UGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__4GHH=(__UINTEGER_32)((__UINTEGER_32)(sz__QGHH + a__UGHH) & (__UINTEGER_32)(~ a__UGHH));
-              ptr_table__1GHH=((__POINTER )(&(table_type[(t__TGHH)])));
-              lab_type__3GHH=(__UINTEGER_32)(t__TGHH |  1);
-              next__0GHH=((__POINTER )(NULL));
-              result__2GHH=((__POINTER *)ptr_table__1GHH)[ 0];
-              if ((result__2GHH == (void *)NULL)) {
-                result__2GHH=new_lab__MRJ(lab_type__3GHH);
-                next__0GHH=(void *)((unsigned long)result__2GHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GHH)));
-                ((__POINTER *)next__0GHH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1GHH)[ 0]=next__0GHH;
+              t__TIIH=((__UINTEGER_32 )typ_id__PIIH);
+              a__UIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__4IIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QIIH + a__UIIH) & (__UINTEGER_32)(~ a__UIIH));
+              ptr_table__1IIH=((__POINTER )(&(table_type[(t__TIIH)])));
+              lab_type__3IIH=(__UINTEGER_32)(t__TIIH |  1);
+              next__0IIH=((__POINTER )(NULL));
+              result__2IIH=((__POINTER *)ptr_table__1IIH)[ 0];
+              if ((result__2IIH == (void *)NULL)) {
+                result__2IIH=new_lab__URJ(lab_type__3IIH);
+                next__0IIH=(void *)((unsigned long)result__2IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4IIH)));
+                ((__POINTER *)next__0IIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1IIH)[ 0]=next__0IIH;
               } else {
-                next__0GHH=((__POINTER *)result__2GHH)[ 0];
-                if ((next__0GHH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2GHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4GHH <<  1)) <=  4096)) {
-                    next__0GHH=(void *)((unsigned long)result__2GHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GHH)));
+                next__0IIH=((__POINTER *)result__2IIH)[ 0];
+                if ((next__0IIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2IIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4IIH <<  1)) <=  4096)) {
+                    next__0IIH=(void *)((unsigned long)result__2IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4IIH)));
                   } else {
-                    next__0GHH=new_lab__MRJ(lab_type__3GHH);
+                    next__0IIH=new_lab__URJ(lab_type__3IIH);
                   };
-                  ((__POINTER *)next__0GHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1GHH)[ 0]=next__0GHH;
+                  ((__POINTER *)next__0IIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1IIH)[ 0]=next__0IIH;
                 } else {
-                  ((__POINTER *)result__2GHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0GHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2GHH=next__0GHH;
+                  ((__POINTER *)result__2IIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2IIH=next__0IIH;
                 };
               };
-              ptr__OGHH=result__2GHH;
-            };
-            result__NGHH=((__SECTION_ *)ptr__OGHH);
-            *(result__NGHH) = *(SECTION___);
-          };
-          result__0WOB=result__NGHH;
-          Self__LQUG=((__SECTION_ *)result__NGHH);
-          Self__LQUG->name__CZDC=NULL;
-          Self__LQUG->type_list__RXFC=t__0XC;
-          Self__N0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__4WOB);
-          k__P0FC=t__0XC;
-          h__W0FC=hash_code__P50(t__0XC);
-          idx__X0FC=(__INTEGER)(h__W0FC % Self__N0FC->capacity__DREC);
-          node__Y0FC=((void **)Self__N0FC->buckets__IREC)[idx__X0FC];
-          while ((! (((void *)node__Y0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->key__UREC == (void *)k__P0FC)))) {
-            node__Y0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->next__5REC;
-          };
-          if (((void *)node__Y0FC == (void *)NULL)) {
-            if ((Self__N0FC->capacity__DREC == Self__N0FC->count__Z1FC)) {
-              idx__ODID= 0;
-              node1__SDID=NULL;
-              node2__TDID=NULL;
-              old_buckets__RDID=Self__N0FC->buckets__IREC;
-              new_capacity__PDID=prime_number_ceiling__X41((__INTEGER)(Self__N0FC->capacity__DREC +  1));
-              Self__N0FC->buckets__IREC=create__ABYC(new_capacity__PDID);
-              i__QDID=(__INTEGER)(Self__N0FC->capacity__DREC -  1);
-              Self__N0FC->capacity__DREC=new_capacity__PDID;
-              while ((i__QDID >=  0)) {
-                node1__SDID=((void **)old_buckets__RDID)[i__QDID];
-                while (((void *)node1__SDID != (void *)NULL)) {
-                  node2__TDID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->next__5REC;
-                  idx__ODID=(__INTEGER)(hash_code__P50(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->key__UREC) % Self__N0FC->capacity__DREC);
-                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__SDID)->next__5REC=((void **)Self__N0FC->buckets__IREC)[idx__ODID];
-                  ((void **)Self__N0FC->buckets__IREC)[idx__ODID]=node1__SDID;
-                  node1__SDID=node2__TDID;
+              ptr__OIIH=result__2IIH;
+            };
+            result__NIIH=((__SECTION_ *)ptr__OIIH);
+            *(result__NIIH) = *(SECTION___);
+          };
+          result__CXOB=result__NIIH;
+          Self__ZMVG=((__SECTION_ *)result__NIIH);
+          Self__ZMVG->name__KZDC=NULL;
+          Self__ZMVG->type_list__ZXFC=t__CYC;
+          Self__V0FC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__GXOB);
+          k__X0FC=t__CYC;
+          h__40FC=hash_code__X50(t__CYC);
+          idx__50FC=(__INTEGER)(h__40FC % Self__V0FC->capacity__LREC);
+          node__A1FC=((void **)Self__V0FC->buckets__QREC)[idx__50FC];
+          while ((! (((void *)node__A1FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__A1FC)->key__2REC == (void *)k__X0FC)))) {
+            node__A1FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__A1FC)->next__HSEC;
+          };
+          if (((void *)node__A1FC == (void *)NULL)) {
+            if ((Self__V0FC->capacity__LREC == Self__V0FC->count__B2FC)) {
+              idx__WDID= 0;
+              node1__0DID=NULL;
+              node2__1DID=NULL;
+              old_buckets__ZDID=Self__V0FC->buckets__QREC;
+              new_capacity__XDID=prime_number_ceiling__541((__INTEGER)(Self__V0FC->capacity__LREC +  1));
+              Self__V0FC->buckets__QREC=create__IBYC(new_capacity__XDID);
+              i__YDID=(__INTEGER)(Self__V0FC->capacity__LREC -  1);
+              Self__V0FC->capacity__LREC=new_capacity__XDID;
+              while ((i__YDID >=  0)) {
+                node1__0DID=((void **)old_buckets__ZDID)[i__YDID];
+                while (((void *)node1__0DID != (void *)NULL)) {
+                  node2__1DID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__0DID)->next__HSEC;
+                  idx__WDID=(__INTEGER)(hash_code__X50(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__0DID)->key__2REC) % Self__V0FC->capacity__LREC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__0DID)->next__HSEC=((void **)Self__V0FC->buckets__QREC)[idx__WDID];
+                  ((void **)Self__V0FC->buckets__QREC)[idx__WDID]=node1__0DID;
+                  node1__0DID=node2__1DID;
                 };
-                i__QDID=(__INTEGER)(i__QDID -  1);
+                i__YDID=(__INTEGER)(i__YDID -  1);
               };
-              idx__X0FC=(__INTEGER)(h__W0FC % Self__N0FC->capacity__DREC);
-            };
-            __tmp__G2FC=((void **)Self__N0FC->buckets__IREC)[idx__X0FC];
-            result__XFID=NULL;
-            ptr__YFID=((__POINTER )(NULL));
-            typ_id__3FID= 0;
-            sz__0FID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
-            if ((sz__0FID ==  0)) {
-              result__XFID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              idx__50FC=(__INTEGER)(h__40FC % Self__V0FC->capacity__LREC);
+            };
+            __tmp__O2FC=((void **)Self__V0FC->buckets__QREC)[idx__50FC];
+            result__5FID=NULL;
+            ptr__AGID=((__POINTER )(NULL));
+            typ_id__FGID= 0;
+            sz__CGID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__CGID ==  0)) {
+              result__5FID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
             } else {
-              typ_id__3FID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0FID);
-              if ((typ_id__3FID == (__INTEGER)(-  1))) {
-                a__DCEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__ECEH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FID + a__DCEH) & (__UINTEGER_32)(~ a__DCEH));
-                ptr_table__AHHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ECEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__5GHH=((__POINTER )(NULL));
-                result__BHHH=((__POINTER *)ptr_table__AHHH)[ 0];
-                if ((result__BHHH == (void *)NULL)) {
-                  result__BHHH=new_lab__MRJ(new_size__ECEH);
-                  next__5GHH=(void *)((unsigned long)result__BHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECEH)));
-                  ((__POINTER *)next__5GHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__AHHH)[ 0]=next__5GHH;
+              typ_id__FGID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__CGID);
+              if ((typ_id__FGID == (__INTEGER)(-  1))) {
+                a__IDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__JDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__CGID + a__IDFH) & (__UINTEGER_32)(~ a__IDFH));
+                ptr_table__AJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__5IIH=((__POINTER )(NULL));
+                result__BJIH=((__POINTER *)ptr_table__AJIH)[ 0];
+                if ((result__BJIH == (void *)NULL)) {
+                  result__BJIH=new_lab__URJ(new_size__JDFH);
+                  next__5IIH=(void *)((unsigned long)result__BJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDFH)));
+                  ((__POINTER *)next__5IIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AJIH)[ 0]=next__5IIH;
                 } else {
-                  next__5GHH=((__POINTER *)result__BHHH)[ 0];
-                  if ((next__5GHH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BHHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ECEH <<  1)) <=  4096)) {
-                      next__5GHH=(void *)((unsigned long)result__BHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECEH)));
+                  next__5IIH=((__POINTER *)result__BJIH)[ 0];
+                  if ((next__5IIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BJIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JDFH <<  1)) <=  4096)) {
+                      next__5IIH=(void *)((unsigned long)result__BJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDFH)));
                     } else {
-                      next__5GHH=new_lab__MRJ(new_size__ECEH);
+                      next__5IIH=new_lab__URJ(new_size__JDFH);
                     };
-                    ((__POINTER *)next__5GHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__AHHH)[ 0]=next__5GHH;
+                    ((__POINTER *)next__5IIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__AJIH)[ 0]=next__5IIH;
                   } else {
-                    ((__POINTER *)result__BHHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5GHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BHHH=next__5GHH;
+                    ((__POINTER *)result__BJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__BJIH=next__5IIH;
                   };
                 };
-                ptr__YFID=result__BHHH;
+                ptr__AGID=result__BJIH;
               } else {
-                t__ICEH=((__UINTEGER_32 )typ_id__3FID);
-                a__HCEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__IHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FID + a__HCEH) & (__UINTEGER_32)(~ a__HCEH));
-                ptr_table__FHHH=((__POINTER )(&(table_type[(t__ICEH)])));
-                lab_type__HHHH=(__UINTEGER_32)(t__ICEH |  1);
-                next__EHHH=((__POINTER )(NULL));
-                result__GHHH=((__POINTER *)ptr_table__FHHH)[ 0];
-                if ((result__GHHH == (void *)NULL)) {
-                  result__GHHH=new_lab__MRJ(lab_type__HHHH);
-                  next__EHHH=(void *)((unsigned long)result__GHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IHHH)));
-                  ((__POINTER *)next__EHHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FHHH)[ 0]=next__EHHH;
+                t__NDFH=((__UINTEGER_32 )typ_id__FGID);
+                a__MDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__IJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CGID + a__MDFH) & (__UINTEGER_32)(~ a__MDFH));
+                ptr_table__FJIH=((__POINTER )(&(table_type[(t__NDFH)])));
+                lab_type__HJIH=(__UINTEGER_32)(t__NDFH |  1);
+                next__EJIH=((__POINTER )(NULL));
+                result__GJIH=((__POINTER *)ptr_table__FJIH)[ 0];
+                if ((result__GJIH == (void *)NULL)) {
+                  result__GJIH=new_lab__URJ(lab_type__HJIH);
+                  next__EJIH=(void *)((unsigned long)result__GJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJIH)));
+                  ((__POINTER *)next__EJIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FJIH)[ 0]=next__EJIH;
                 } else {
-                  next__EHHH=((__POINTER *)result__GHHH)[ 0];
-                  if ((next__EHHH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GHHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IHHH <<  1)) <=  4096)) {
-                      next__EHHH=(void *)((unsigned long)result__GHHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IHHH)));
+                  next__EJIH=((__POINTER *)result__GJIH)[ 0];
+                  if ((next__EJIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IJIH <<  1)) <=  4096)) {
+                      next__EJIH=(void *)((unsigned long)result__GJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJIH)));
                     } else {
-                      next__EHHH=new_lab__MRJ(lab_type__HHHH);
+                      next__EJIH=new_lab__URJ(lab_type__HJIH);
                     };
-                    ((__POINTER *)next__EHHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__FHHH)[ 0]=next__EHHH;
+                    ((__POINTER *)next__EJIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__FJIH)[ 0]=next__EJIH;
                   } else {
-                    ((__POINTER *)result__GHHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EHHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__GHHH=next__EHHH;
+                    ((__POINTER *)result__GJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__GJIH=next__EJIH;
                   };
                 };
-                ptr__YFID=result__GHHH;
+                ptr__AGID=result__GJIH;
               };
-              result__XFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__YFID);
-              *(result__XFID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__5FID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__AGID);
+              *(result__5FID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            Self__JETD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__XFID);
-            Self__JETD->item__HSEC=result__NGHH;
-            Self__JETD->key__UREC=t__0XC;
-            Self__JETD->next__5REC=__tmp__G2FC;
-            node__Y0FC=result__XFID;
-            ((void **)Self__N0FC->buckets__IREC)[idx__X0FC]=result__XFID;
-            Self__N0FC->count__Z1FC=(__INTEGER)(Self__N0FC->count__Z1FC +  1);
+            Self__RETD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__5FID);
+            Self__RETD->item__PSEC=result__NIIH;
+            Self__RETD->key__2REC=t__CYC;
+            Self__RETD->next__HSEC=__tmp__O2FC;
+            node__A1FC=result__5FID;
+            ((void **)Self__V0FC->buckets__QREC)[idx__50FC]=result__5FID;
+            Self__V0FC->count__B2FC=(__INTEGER)(Self__V0FC->count__B2FC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__Y0FC)->item__HSEC=result__NGHH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__A1FC)->item__PSEC=result__NIIH;
           };
         };
-        last_section__X0C=result__0WOB;
+        last_section__50C=result__CXOB;
       };
       do {
-        result__NXOB=FALSE__;
-        t__OXOB=NULL;
-        lt__PXOB=NULL;
-        affect__RXOB='\0';
-        old_pos__SXOB= 0;
-        old_derive__TXOB= 0;
-        s__UXOB=NULL;
-        style__QXOB=read_style__XRF();
-        if ((style__QXOB != ' ')) {
-          key_comment_default__ACC=(&__string_128);
+        result__VXOB=FALSE__;
+        t__WXOB=NULL;
+        lt__XXOB=NULL;
+        affect__ZXOB='\0';
+        old_pos__0XOB= 0;
+        old_derive__1XOB= 0;
+        s__2XOB=NULL;
+        style__YXOB=read_style__5RF();
+        if ((style__YXOB != ' ')) {
+          key_comment_default__ICC=(&__string_128);
           if (is_shorter2__VI) {
-            is_catch_comment__AXC=TRUE__;
-            ((__STRING *)last_comment__00D)->count__WFC= 0;
-          };
-          result__NXOB=TRUE__;
-          result__ACZB=NULL;
-          result__QU1B=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B)->parent_arrayed_collection__VU1B.upper__QTGC <  0)) {
-            result__QU1B=create_with_capacity__RL5B( 16);
-          } else {
-            Self__WCZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
-            result__QU1B=((void **)Self__WCZC->parent_arrayed_collection__VU1B.storage__DLHC)[Self__WCZC->parent_arrayed_collection__VU1B.upper__QTGC];
-            Self__MDZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
-            Self__MDZC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__MDZC->parent_arrayed_collection__VU1B.upper__QTGC -  1);
-          };
-          arg__5BZB=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,TRUE__);
-          if (((void *)arg__5BZB == (void *)NULL)) {
-            result__JHHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__JHHH=FALSE__;
+            is_catch_comment__IXC=TRUE__;
+            ((__STRING *)last_comment__C1D)->count__4FC= 0;
+          };
+          result__VXOB=TRUE__;
+          result__ICZB=NULL;
+          result__YU1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__4U1B)->parent_arrayed_collection__3U1B.upper__YTGC <  0)) {
+            result__YU1B=create_with_capacity__ZL5B( 16);
+          } else {
+            Self__4CZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__4U1B);
+            result__YU1B=((void **)Self__4CZC->parent_arrayed_collection__3U1B.storage__LLHC)[Self__4CZC->parent_arrayed_collection__3U1B.upper__YTGC];
+            Self__UDZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__4U1B);
+            Self__UDZC->parent_arrayed_collection__3U1B.upper__YTGC=(__INTEGER)(Self__UDZC->parent_arrayed_collection__3U1B.upper__YTGC -  1);
+          };
+          arg__HCZB=read_loc_arg__with_self__QEHB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__HCZB == (void *)NULL)) {
+            result__JJIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__JJIH=FALSE__;
             } else {
-              result__KHHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__KHHH=((__CHARACTER )(( 0)));
+              result__KJIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__KJIH=((__CHARACTER )(( 0)));
               } else {
-                result__KHHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__KJIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__KHHH == '\'')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__JHHH=TRUE__;
+              if ((result__KJIH == '\'')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__JJIH=TRUE__;
               };
             };
-            if (result__JHHH) {
-              result__ACZB=read_slot_operator__FU5B(result__QU1B);
+            if (result__JJIH) {
+              result__ICZB=read_slot_operator__NU5B(result__YU1B);
             } else {
-              p__VHHH=current_position__JXF();
-              result__MHHH=NULL;
-              ptr__NHHH=((__POINTER )(NULL));
-              typ_id__OHHH= 0;
-              sz__PHHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-              if ((sz__PHHH ==  0)) {
-                result__MHHH=ITM_ARG__;
+              p__VJIH=current_position__RXF();
+              result__MJIH=NULL;
+              ptr__NJIH=((__POINTER )(NULL));
+              typ_id__OJIH= 0;
+              sz__PJIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__PJIH ==  0)) {
+                result__MJIH=ITM_ARG__;
               } else {
-                typ_id__OHHH=-1;
-                clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PHHH);
-                if ((typ_id__OHHH == (__INTEGER)(-  1))) {
-                  a__QHHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__RHHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHHH + a__QHHH) & (__UINTEGER_32)(~ a__QHHH));
-                  ptr_table__ZHHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RHHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__YHHH=((__POINTER )(NULL));
-                  result__0HHH=((__POINTER *)ptr_table__ZHHH)[ 0];
-                  if ((result__0HHH == (void *)NULL)) {
-                    result__0HHH=new_lab__MRJ(new_size__RHHH);
-                    next__YHHH=(void *)((unsigned long)result__0HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHHH)));
-                    ((__POINTER *)next__YHHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ZHHH)[ 0]=next__YHHH;
+                typ_id__OJIH=-1;
+                clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__PJIH);
+                if ((typ_id__OJIH == (__INTEGER)(-  1))) {
+                  a__QJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__RJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJIH + a__QJIH) & (__UINTEGER_32)(~ a__QJIH));
+                  ptr_table__ZJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RJIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__YJIH=((__POINTER )(NULL));
+                  result__0JIH=((__POINTER *)ptr_table__ZJIH)[ 0];
+                  if ((result__0JIH == (void *)NULL)) {
+                    result__0JIH=new_lab__URJ(new_size__RJIH);
+                    next__YJIH=(void *)((unsigned long)result__0JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RJIH)));
+                    ((__POINTER *)next__YJIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ZJIH)[ 0]=next__YJIH;
                   } else {
-                    next__YHHH=((__POINTER *)result__0HHH)[ 0];
-                    if ((next__YHHH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0HHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RHHH <<  1)) <=  4096)) {
-                        next__YHHH=(void *)((unsigned long)result__0HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RHHH)));
+                    next__YJIH=((__POINTER *)result__0JIH)[ 0];
+                    if ((next__YJIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0JIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__RJIH <<  1)) <=  4096)) {
+                        next__YJIH=(void *)((unsigned long)result__0JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RJIH)));
                       } else {
-                        next__YHHH=new_lab__MRJ(new_size__RHHH);
+                        next__YJIH=new_lab__URJ(new_size__RJIH);
                       };
-                      ((__POINTER *)next__YHHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ZHHH)[ 0]=next__YHHH;
+                      ((__POINTER *)next__YJIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ZJIH)[ 0]=next__YJIH;
                     } else {
-                      ((__POINTER *)result__0HHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YHHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__0HHH=next__YHHH;
+                      ((__POINTER *)result__0JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__0JIH=next__YJIH;
                     };
                   };
-                  ptr__NHHH=result__0HHH;
+                  ptr__NJIH=result__0JIH;
                 } else {
-                  t__SHHH=((__UINTEGER_32 )typ_id__OHHH);
-                  a__THHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__BIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHHH + a__THHH) & (__UINTEGER_32)(~ a__THHH));
-                  ptr_table__4HHH=((__POINTER )(&(table_type[(t__SHHH)])));
-                  lab_type__AIHH=(__UINTEGER_32)(t__SHHH |  1);
-                  next__3HHH=((__POINTER )(NULL));
-                  result__5HHH=((__POINTER *)ptr_table__4HHH)[ 0];
-                  if ((result__5HHH == (void *)NULL)) {
-                    result__5HHH=new_lab__MRJ(lab_type__AIHH);
-                    next__3HHH=(void *)((unsigned long)result__5HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIHH)));
-                    ((__POINTER *)next__3HHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__4HHH)[ 0]=next__3HHH;
+                  t__SJIH=((__UINTEGER_32 )typ_id__OJIH);
+                  a__TJIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__BKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJIH + a__TJIH) & (__UINTEGER_32)(~ a__TJIH));
+                  ptr_table__4JIH=((__POINTER )(&(table_type[(t__SJIH)])));
+                  lab_type__AKIH=(__UINTEGER_32)(t__SJIH |  1);
+                  next__3JIH=((__POINTER )(NULL));
+                  result__5JIH=((__POINTER *)ptr_table__4JIH)[ 0];
+                  if ((result__5JIH == (void *)NULL)) {
+                    result__5JIH=new_lab__URJ(lab_type__AKIH);
+                    next__3JIH=(void *)((unsigned long)result__5JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKIH)));
+                    ((__POINTER *)next__3JIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__4JIH)[ 0]=next__3JIH;
                   } else {
-                    next__3HHH=((__POINTER *)result__5HHH)[ 0];
-                    if ((next__3HHH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5HHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BIHH <<  1)) <=  4096)) {
-                        next__3HHH=(void *)((unsigned long)result__5HHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIHH)));
+                    next__3JIH=((__POINTER *)result__5JIH)[ 0];
+                    if ((next__3JIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5JIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BKIH <<  1)) <=  4096)) {
+                        next__3JIH=(void *)((unsigned long)result__5JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKIH)));
                       } else {
-                        next__3HHH=new_lab__MRJ(lab_type__AIHH);
+                        next__3JIH=new_lab__URJ(lab_type__AKIH);
                       };
-                      ((__POINTER *)next__3HHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__4HHH)[ 0]=next__3HHH;
+                      ((__POINTER *)next__3JIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__4JIH)[ 0]=next__3JIH;
                     } else {
-                      ((__POINTER *)result__5HHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3HHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__5HHH=next__3HHH;
+                      ((__POINTER *)result__5JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__5JIH=next__3JIH;
                     };
                   };
-                  ptr__NHHH=result__5HHH;
+                  ptr__NJIH=result__5JIH;
                 };
-                result__MHHH=((__ITM_ARG *)ptr__NHHH);
-                *(result__MHHH) = *(ITM_ARG__);
+                result__MJIH=((__ITM_ARG *)ptr__NJIH);
+                *(result__MJIH) = *(ITM_ARG__);
               };
-              Self__UHHH=((__ITM_ARG *)result__MHHH);
-              Self__UHHH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=p__VHHH;
-              Self__UHHH->name__10HC=(&__string_58);
-              Self__UHHH->type__20HC=type_self__HUN;
-              arg__5BZB=result__MHHH;
-              add_last__05GC(result__QU1B,result__MHHH);
-              result__ACZB=read_slot_keyword__SZ5B(result__QU1B);
-            };
-          } else {
-            add_last__05GC(result__QU1B,arg__5BZB);
-            result__CIHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__CIHH=FALSE__;
+              Self__UJIH=((__ITM_ARG *)result__MJIH);
+              Self__UJIH->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ=p__VJIH;
+              Self__UJIH->name__D1HC=(&__string_58);
+              Self__UJIH->type__E1HC=type_self__PUN;
+              arg__HCZB=result__MJIH;
+              add_last__CAHC(result__YU1B,result__MJIH);
+              result__ICZB=read_slot_keyword__0Z5B(result__YU1B);
+            };
+          } else {
+            add_last__CAHC(result__YU1B,arg__HCZB);
+            result__CKIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__CKIH=FALSE__;
             } else {
-              result__DIHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__DIHH=((__CHARACTER )(( 0)));
+              result__DKIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__DKIH=((__CHARACTER )(( 0)));
               } else {
-                result__DIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__DKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__DIHH == '.')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__CIHH=TRUE__;
+              if ((result__DKIH == '.')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__CKIH=TRUE__;
               };
             };
-            if (result__CIHH) {
-              result__ACZB=read_slot_keyword__SZ5B(result__QU1B);
-              __tmp__QDZB=TRUE__;
+            if (result__CKIH) {
+              result__ICZB=read_slot_keyword__0Z5B(result__YU1B);
+              __tmp__YDZB=TRUE__;
             } else {
-              __tmp__QDZB=FALSE__;
+              __tmp__YDZB=FALSE__;
             };
-            if ((! __tmp__QDZB)) {
-              result__FIHH=FALSE__;
-              if ((! read_space__3RD())) {
-                result__FIHH=FALSE__;
+            if ((! __tmp__YDZB)) {
+              result__FKIH=FALSE__;
+              if ((! read_space__FSD())) {
+                result__FKIH=FALSE__;
               } else {
-                result__GIHH='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__GIHH=((__CHARACTER )(( 0)));
+                result__GKIH='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__GKIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__GIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__GKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__GIHH == '\'')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  result__FIHH=TRUE__;
+                if ((result__GKIH == '\'')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  result__FKIH=TRUE__;
                 };
               };
-              if (result__FIHH) {
-                result__ACZB=read_slot_operator__FU5B(result__QU1B);
+              if (result__FKIH) {
+                result__ICZB=read_slot_operator__NU5B(result__YU1B);
               };
             };
           };
-          if (((void *)result__ACZB != (void *)NULL)) {
-            result__SU4B=create_with_capacity__RL5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC +  1));
-            Self__LMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
-            new_capacity__OMHC= 0;
-            other_upper__NMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC;
-            if ((other_upper__NMHC >=  0)) {
-              new_capacity__OMHC=(__INTEGER)(other_upper__NMHC +  1);
-              if ((Self__LMHC->parent_arrayed_collection__FCZB.capacity__AAHC < new_capacity__OMHC)) {
-                Self__LMHC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD(new_capacity__OMHC);
-                Self__LMHC->parent_arrayed_collection__FCZB.capacity__AAHC=new_capacity__OMHC;
+          if (((void *)result__ICZB != (void *)NULL)) {
+            result__0U4B=create_with_capacity__ZL5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__YU1B)->parent_arrayed_collection__NCZB.upper__GAHC +  1));
+            Self__TMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__0U4B);
+            new_capacity__WMHC= 0;
+            other_upper__VMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__YU1B)->parent_arrayed_collection__NCZB.upper__GAHC;
+            if ((other_upper__VMHC >=  0)) {
+              new_capacity__WMHC=(__INTEGER)(other_upper__VMHC +  1);
+              if ((Self__TMHC->parent_arrayed_collection__NCZB.capacity__IAHC < new_capacity__WMHC)) {
+                Self__TMHC->parent_arrayed_collection__NCZB.storage__EBHC=create__4PBD(new_capacity__WMHC);
+                Self__TMHC->parent_arrayed_collection__NCZB.capacity__IAHC=new_capacity__WMHC;
               };
-              __tmp__BNHC=Self__LMHC->parent_arrayed_collection__FCZB.storage__2AHC;
-              __tmp__DNHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.storage__2AHC;
-              Self__EHSD=((void **)__tmp__BNHC);
-              Self__M2WD=other_upper__NMHC;
-              while ((Self__M2WD >=  0)) {
-                Self__EHSD[Self__M2WD]=((void **)__tmp__DNHC)[Self__M2WD];
-                Self__M2WD=(__INTEGER)(Self__M2WD -  1);
+              __tmp__JNHC=Self__TMHC->parent_arrayed_collection__NCZB.storage__EBHC;
+              __tmp__LNHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__YU1B)->parent_arrayed_collection__NCZB.storage__EBHC;
+              Self__MHSD=((void **)__tmp__JNHC);
+              Self__U2WD=other_upper__VMHC;
+              while ((Self__U2WD >=  0)) {
+                Self__MHSD[Self__U2WD]=((void **)__tmp__LNHC)[Self__U2WD];
+                Self__U2WD=(__INTEGER)(Self__U2WD -  1);
               };
             };
-            Self__LMHC->parent_arrayed_collection__FCZB.upper__45GC=other_upper__NMHC;
-            ((__FAST_ARRAYoITM_ARGUMENTo *)result__QU1B)->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(-  1);
-            Self__XUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__WU1B);
-            new_capacity__ZUHC= 0;
-            if (((__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1) <= (__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC -  1))) {
-              Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1);
-              __tmp__HVHC=TRUE__;
+            Self__TMHC->parent_arrayed_collection__NCZB.upper__GAHC=other_upper__VMHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__YU1B)->parent_arrayed_collection__NCZB.upper__GAHC=(__INTEGER)(-  1);
+            Self__5UHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__4U1B);
+            new_capacity__BVHC= 0;
+            if (((__INTEGER)(Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC +  1) <= (__INTEGER)(Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC -  1))) {
+              Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC=(__INTEGER)(Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC +  1);
+              __tmp__PVHC=TRUE__;
             } else {
-              __tmp__HVHC=FALSE__;
+              __tmp__PVHC=FALSE__;
             };
-            if ((! __tmp__HVHC)) {
-              if ((Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC ==  0)) {
-                Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC=create__ELBD( 2);
-                Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC= 2;
-                Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC= 0;
+            if ((! __tmp__PVHC)) {
+              if ((Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC ==  0)) {
+                Self__5UHC->parent_arrayed_collection__3U1B.storage__LLHC=create__MLBD( 2);
+                Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC= 2;
+                Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC= 0;
               } else {
-                new_capacity__ZUHC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC <<  1);
-                __tmp__2VHC=Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC;
-                __tmp__3VHC=Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC;
-                new__WITD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__2VHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__3VHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZUHC * ((__INTEGER )(sizeof(void *)))))));
-                __tmp__KJTD=(__INTEGER)(new_capacity__ZUHC -  1);
-                Self__QUXE=__tmp__3VHC;
-                while ((Self__QUXE <= __tmp__KJTD)) {
-                  new__WITD[Self__QUXE]=NULL;
-                  Self__QUXE=(__INTEGER)(Self__QUXE +  1);
+                new_capacity__BVHC=(__INTEGER)(Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC <<  1);
+                __tmp__EWHC=Self__5UHC->parent_arrayed_collection__3U1B.storage__LLHC;
+                __tmp__FWHC=Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC;
+                new__4ITD=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__EWHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__FWHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BVHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__SJTD=(__INTEGER)(new_capacity__BVHC -  1);
+                Self__TUXE=__tmp__FWHC;
+                while ((Self__TUXE <= __tmp__SJTD)) {
+                  new__4ITD[Self__TUXE]=NULL;
+                  Self__TUXE=(__INTEGER)(Self__TUXE +  1);
                 };
-                Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC=new__WITD;
-                Self__XUHC->parent_arrayed_collection__VU1B.capacity__YKHC=new_capacity__ZUHC;
-                Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC=(__INTEGER)(Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC +  1);
+                Self__5UHC->parent_arrayed_collection__3U1B.storage__LLHC=new__4ITD;
+                Self__5UHC->parent_arrayed_collection__3U1B.capacity__ALHC=new_capacity__BVHC;
+                Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC=(__INTEGER)(Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC +  1);
               };
             };
-            ((void **)Self__XUHC->parent_arrayed_collection__VU1B.storage__DLHC)[Self__XUHC->parent_arrayed_collection__VU1B.upper__QTGC]=result__QU1B;
-            if (((struct ___OBJ *)result__ACZB)->__id==__ITM_SLOT__) {
-              set_argument_list__VCHC(result__ACZB,result__SU4B);
+            ((void **)Self__5UHC->parent_arrayed_collection__3U1B.storage__LLHC)[Self__5UHC->parent_arrayed_collection__3U1B.upper__YTGC]=result__YU1B;
+            if (((struct ___OBJ *)result__ICZB)->__id==__ITM_SLOT__) {
+              set_argument_list__3CHC(result__ICZB,result__0U4B);
             } else {
-              Self__IEHC=((__ITM_SLOT_OPERATOR *)result__ACZB);
-              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B)->parent_arrayed_collection__FCZB.upper__45GC +  1) >  1)) {
-                __tmp__WEHC=TRUE__;
+              Self__QEHC=((__ITM_SLOT_OPERATOR *)result__ICZB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__0U4B)->parent_arrayed_collection__NCZB.upper__GAHC +  1) >  1)) {
+                __tmp__4EHC=TRUE__;
               } else {
-                __tmp__REHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-                if (((struct ___OBJ *)__tmp__REHC)->__id==__ITM_ARG__) {
-                  __tmp__SEHC= 1;
+                __tmp__ZEHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__0U4B)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+                if (((struct ___OBJ *)__tmp__ZEHC)->__id==__ITM_ARG__) {
+                  __tmp__0EHC= 1;
                 } else {
-                  __tmp__SEHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__REHC)->name__LBPF)->parent_arrayed_collection__H5I.upper__15OD +  1);
+                  __tmp__0EHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__ZEHC)->name__PNPF)->parent_arrayed_collection__P5I.upper__DAPD +  1);
                 };
-                __tmp__WEHC=(__tmp__SEHC >  1);
+                __tmp__4EHC=(__tmp__0EHC >  1);
               };
-              if (__tmp__WEHC) {
-                if (((void *)((__SECTION_ *)Self__IEHC->parent_itm_slot__OU5B.id_section__Y1C)->name__CZDC == (void *)(&__string_25))) {
-                  Self__WCEH=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
-                  __tmp__DFHC=((void **)Self__WCEH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__WCEH->parent_arrayed_collection__FCZB.upper__45GC];
-                  if (((struct ___OBJ *)__tmp__DFHC)->__id==__ITM_ARG__) {
-                    __tmp__EFHC=((__ITM_ARG *)__tmp__DFHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
+              if (__tmp__4EHC) {
+                if (((void *)((__SECTION_ *)Self__QEHC->parent_itm_slot__WU5B.id_section__A2C)->name__KZDC == (void *)(&__string_25))) {
+                  Self__1DFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__0U4B);
+                  __tmp__LFHC=((void **)Self__1DFH->parent_arrayed_collection__NCZB.storage__EBHC)[Self__1DFH->parent_arrayed_collection__NCZB.upper__GAHC];
+                  if (((struct ___OBJ *)__tmp__LFHC)->__id==__ITM_ARG__) {
+                    __tmp__MFHC=((__ITM_ARG *)__tmp__LFHC)->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ;
                   } else {
-                    __tmp__EFHC=((__ITM_ARGS *)__tmp__DFHC)->parent_itm_argument__DDFE.parent_itm_code__S4M.position__NDJ;
+                    __tmp__MFHC=((__ITM_ARGS *)__tmp__LFHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
                   };
-                  put_error__text__KNG( 1,(&__string_234));
-                  put_position__UOG(__tmp__EFHC);
-                  put_string__U1F(msg_err__PNG);
-                  if ((type_error__ONG !=  2)) {
+                  put_error__text__SNG( 1,(&__string_232));
+                  put_position__2OG(__tmp__MFHC);
+                  put_string__21F(msg_err__XNG);
+                  if ((type_error__WNG !=  2)) {
                     exit(( 1));
                   };
                 };
-                Self__QO2G=((__SECTION_ *)Self__IEHC->parent_itm_slot__OU5B.id_section__Y1C);
-                if ((((void *)Self__QO2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__QO2G->name__CZDC == (void *)(&__string_24)))) {
-                  Self__5CEH=((__FAST_ARRAYoITM_ARGUMENTo *)result__SU4B);
-                  __tmp__QFHC=((void **)Self__5CEH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__5CEH->parent_arrayed_collection__FCZB.upper__45GC];
-                  if (((struct ___OBJ *)__tmp__QFHC)->__id==__ITM_ARG__) {
-                    __tmp__RFHC=((__ITM_ARG *)__tmp__QFHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
+                Self__TL3G=((__SECTION_ *)Self__QEHC->parent_itm_slot__WU5B.id_section__A2C);
+                if ((((void *)Self__TL3G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__TL3G->name__KZDC == (void *)(&__string_24)))) {
+                  Self__EEFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__0U4B);
+                  __tmp__YFHC=((void **)Self__EEFH->parent_arrayed_collection__NCZB.storage__EBHC)[Self__EEFH->parent_arrayed_collection__NCZB.upper__GAHC];
+                  if (((struct ___OBJ *)__tmp__YFHC)->__id==__ITM_ARG__) {
+                    __tmp__ZFHC=((__ITM_ARG *)__tmp__YFHC)->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ;
                   } else {
-                    __tmp__RFHC=((__ITM_ARGS *)__tmp__QFHC)->parent_itm_argument__DDFE.parent_itm_code__S4M.position__NDJ;
+                    __tmp__ZFHC=((__ITM_ARGS *)__tmp__YFHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
                   };
-                  put_error__text__KNG( 1,(&__string_235));
-                  put_position__UOG(__tmp__RFHC);
-                  put_string__U1F(msg_err__PNG);
-                  if ((type_error__ONG !=  2)) {
+                  put_error__text__SNG( 1,(&__string_233));
+                  put_position__2OG(__tmp__ZFHC);
+                  put_string__21F(msg_err__XNG);
+                  if ((type_error__WNG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__IEHC->parent_itm_slot__OU5B.argument_list__GEHC=result__SU4B;
+              Self__QEHC->parent_itm_slot__WU5B.argument_list__OEHC=result__0U4B;
             };
           };
-          last_slot__Q2D=result__ACZB;
-          if (((void *)result__ACZB == (void *)NULL)) {
-            pos__JUUG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_236));
-            put_position__UOG(pos__JUUG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          last_slot__Y2D=result__ICZB;
+          if (((void *)result__ICZB == (void *)NULL)) {
+            pos__XQVG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_234));
+            put_position__2OG(pos__XQVG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.style__BEU=style__QXOB;
+          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__Y2D)->parent_named__V5.style__JEU=style__YXOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.style__BEU=style__QXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.style__JEU=style__YXOB;
           };
-          if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
-            affect__RXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
+          if (((read_symbol__LXJ((&__string_12)) || read_symbol__LXJ((&__string_13))) || read_symbol__LXJ((&__string_14)))) {
+            affect__ZXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[ 0];
           } else {
-            affect__RXOB=' ';
+            affect__ZXOB=' ';
           };
-          if ((affect__RXOB == ' ')) {
-            result__KIHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__KIHH=FALSE__;
+          if ((affect__ZXOB == ' ')) {
+            result__KKIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__KKIH=FALSE__;
             } else {
-              result__LIHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__LIHH=((__CHARACTER )(( 0)));
+              result__LKIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__LKIH=((__CHARACTER )(( 0)));
               } else {
-                result__LIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__LKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__LIHH == ':')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__KIHH=TRUE__;
+              if ((result__LKIH == ':')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__KKIH=TRUE__;
               };
             };
-            __tmp__HZOB=result__KIHH;
+            __tmp__PZOB=result__KKIH;
           } else {
-            __tmp__HZOB=FALSE__;
+            __tmp__PZOB=FALSE__;
           };
-          if (__tmp__HZOB) {
-            result__NIHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__NIHH=FALSE__;
+          if (__tmp__PZOB) {
+            result__NKIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__NKIH=FALSE__;
             } else {
-              result__OIHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__OIHH=((__CHARACTER )(( 0)));
+              result__OKIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__OKIH=((__CHARACTER )(( 0)));
               } else {
-                result__OIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__OKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__OIHH == '(')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__NIHH=TRUE__;
+              if ((result__OKIH == '(')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__NKIH=TRUE__;
               };
             };
-            if (result__NIHH) {
-              lt__PXOB=read_type_list__IMO(PARSER__,FALSE__);
-              if (((void *)lt__PXOB == (void *)NULL)) {
-                pos__LUUG=current_position__JXF();
-                put_error__text__KNG( 0,(&__string_237));
-                put_position__UOG(pos__LUUG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+            if (result__NKIH) {
+              lt__XXOB=read_type_list__QMO(PARSER__,FALSE__);
+              if (((void *)lt__XXOB == (void *)NULL)) {
+                pos__ZQVG=current_position__RXF();
+                put_error__text__SNG( 0,(&__string_235));
+                put_position__2OG(pos__ZQVG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__QIHH=FALSE__;
-              if ((! read_space__3RD())) {
-                result__QIHH=FALSE__;
+              result__QKIH=FALSE__;
+              if ((! read_space__FSD())) {
+                result__QKIH=FALSE__;
               } else {
-                result__RIHH='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__RIHH=((__CHARACTER )(( 0)));
+                result__RKIH='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__RKIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__RIHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__RKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__RIHH == ')')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  result__QIHH=TRUE__;
+                if ((result__RKIH == ')')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  result__QKIH=TRUE__;
                 };
               };
-              if ((! result__QIHH)) {
-                pos__NUUG=current_position__JXF();
-                put_error__text__KNG( 2,(&__string_238));
-                put_position__UOG(pos__NUUG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+              if ((! result__QKIH)) {
+                pos__1QVG=current_position__RXF();
+                put_error__text__SNG( 2,(&__string_236));
+                put_position__2OG(pos__1QVG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__OXOB=get__CJP(lt__PXOB);
+              t__WXOB=get__KJP(lt__XXOB);
             } else {
-              t__OXOB=read_type__DCM(PARSER__,FALSE__);
-              if (((void *)t__OXOB == (void *)NULL)) {
-                pos__PUUG=current_position__JXF();
-                put_error__text__KNG( 0,(&__string_237));
-                put_position__UOG(pos__PUUG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+              t__WXOB=read_type__LCM(PARSER__,FALSE__);
+              if (((void *)t__WXOB == (void *)NULL)) {
+                pos__3QVG=current_position__RXF();
+                put_error__text__SNG( 0,(&__string_235));
+                put_position__2OG(pos__3QVG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
-              affect__RXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
+            if (((read_symbol__LXJ((&__string_12)) || read_symbol__LXJ((&__string_13))) || read_symbol__LXJ((&__string_14)))) {
+              affect__ZXOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[ 0];
             };
           } else {
-            t__OXOB=type_void__4VF;
+            t__WXOB=type_void__GWF;
           };
-          __tmp__L1OB=last_slot__Q2D;
-          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-            set_result_type__Q3FC(last_slot__Q2D,t__OXOB);
+          __tmp__T1OB=last_slot__Y2D;
+          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            set_result_type__Y3FC(last_slot__Y2D,t__WXOB);
           } else {
-            Self__24FC=((__ITM_SLOT_OPERATOR *)__tmp__L1OB);
-            tm__44FC=NULL;
-            Self__RO2G=((__SECTION_ *)Self__24FC->parent_itm_slot__OU5B.id_section__Y1C);
-            if ((((void *)Self__RO2G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__RO2G->name__CZDC == (void *)(&__string_24)))) {
-              if (t__OXOB==NULL) {
-                __tmp__H5FC=NULL;
+            Self__E5FC=((__ITM_SLOT_OPERATOR *)__tmp__T1OB);
+            tm__G5FC=NULL;
+            Self__UL3G=((__SECTION_ *)Self__E5FC->parent_itm_slot__WU5B.id_section__A2C);
+            if ((((void *)Self__UL3G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__UL3G->name__KZDC == (void *)(&__string_24)))) {
+              if (t__WXOB==NULL) {
+                __tmp__P5FC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__OXOB)->__id) {
+                switch (((struct ___OBJ *)t__WXOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__H5FC=((void *)t__OXOB);
+                  __tmp__P5FC=((void *)t__WXOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__H5FC=((void *)t__OXOB);
+                  __tmp__P5FC=((void *)t__WXOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__H5FC=NULL;
+                  __tmp__P5FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__H5FC=((void *)t__OXOB);
+                  __tmp__P5FC=((void *)t__WXOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__H5FC=((void *)t__OXOB);
+                  __tmp__P5FC=((void *)t__WXOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__H5FC=((void *)t__OXOB);
+                  __tmp__P5FC=((void *)t__WXOB);
                 } break;
                 }
               };
-              tm__44FC=__tmp__H5FC;
-              if (((((void *)__tmp__H5FC == (void *)NULL) || ((void *)__tmp__H5FC == (void *)type_self__HUN)) || ((void *)__tmp__H5FC == (void *)type_void__4VF))) {
-                pos__RZID=Self__24FC->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
-                put_error__text__KNG( 1,(&__string_239));
-                put_position__UOG(pos__RZID);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+              tm__G5FC=__tmp__P5FC;
+              if (((((void *)__tmp__P5FC == (void *)NULL) || ((void *)__tmp__P5FC == (void *)type_self__PUN)) || ((void *)__tmp__P5FC == (void *)type_void__GWF))) {
+                pos__ZZID=Self__E5FC->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+                put_error__text__SNG( 1,(&__string_237));
+                put_position__2OG(pos__ZZID);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__24FC->parent_itm_slot__OU5B.result_type__04FC=t__OXOB;
+            Self__E5FC->parent_itm_slot__WU5B.result_type__C5FC=t__WXOB;
           };
-          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__Q2D)->affect__JAGC=affect__RXOB;
+          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__Y2D)->affect__RAGC=affect__ZXOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.affect__JAGC=affect__RXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.affect__RAGC=affect__ZXOB;
           };
-          if ((affect__RXOB != ' ')) {
-            read_space__3RD();
-            old_pos__SXOB=position__SBC;
-            old_derive__TXOB=short_derive__BCC;
-            if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+          if ((affect__ZXOB != ' ')) {
+            read_space__FSD();
+            old_pos__0XOB=position__0BC;
+            old_derive__1XOB=short_derive__JCC;
+            if (((void *)read_contract__PTF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
               };
             };
-            expr__EJ3B=read_expr__44I(PARSER__);
-            if (((void *)expr__EJ3B == (void *)NULL)) {
-              pos__TUUG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_240));
-              put_position__UOG(pos__TUUG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+            expr__MJ3B=read_expr__G5I(PARSER__);
+            if (((void *)expr__MJ3B == (void *)NULL)) {
+              pos__BRVG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_238));
+              put_position__2OG(pos__BRVG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            __tmp__RJ3B=last_slot__Q2D;
-            __tmp__SJ3B=object__JBC;
-            if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-              set_value__type__ZFHC(last_slot__Q2D,expr__EJ3B,object__JBC);
+            __tmp__ZJ3B=last_slot__Y2D;
+            __tmp__0J3B=object__RBC;
+            if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+              set_value__type__BGHC(last_slot__Y2D,expr__MJ3B,object__RBC);
             } else {
-              Self__TGHC=((__ITM_SLOT_OPERATOR *)__tmp__RJ3B);
-              if ((Self__TGHC->parent_itm_slot__OU5B.affect__JAGC != '<')) {
-                copy__ZCS(string_tmp__VH,(&__string_241));
-                append__BOS(string_tmp__VH,Self__TGHC->parent_itm_slot__OU5B.parent_named__P5.name__LI);
-                n__0DBD=get__IWB(string_tmp__VH);
-                sec__1DBD=get_name__0UOB((&__string_27));
-                larg__2DBD=create_with_capacity__RL5B( 1);
-                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
+              Self__1GHC=((__ITM_SLOT_OPERATOR *)__tmp__ZJ3B);
+              if ((Self__1GHC->parent_itm_slot__WU5B.affect__RAGC != '<')) {
+                copy__BDS(string_tmp__VH,(&__string_239));
+                append__JOS(string_tmp__VH,Self__1GHC->parent_itm_slot__WU5B.parent_named__V5.name__LI);
+                n__CEBD=get__QWB(string_tmp__VH);
+                sec__DEBD=get_name__CVOB((&__string_27));
+                larg__EEBD=create_with_capacity__ZL5B( 1);
+                switch (((struct ___OBJ *)expr__MJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__HEBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__HEBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__HEBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__HEBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__HEBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__HEBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__HEBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__HEBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__HEBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__HEBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__HEBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__HEBD=position__FD5B(expr__EJ3B);
+                  __tmp__PEBD=position__ND5B(expr__MJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__HEBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__HEBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__HEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__HEBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__HEBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__HEBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__HEBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__HEBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__HEBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__PEBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__HEBD=position__FJHC(expr__EJ3B);
+                  __tmp__PEBD=position__NJHC(expr__MJ3B);
                 } break;
                 };
-                result__TIHH=NULL;
-                ptr__UIHH=((__POINTER )(NULL));
-                typ_id__VIHH= 0;
-                sz__WIHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-                if ((sz__WIHH ==  0)) {
-                  result__TIHH=ITM_ARG__;
+                result__TKIH=NULL;
+                ptr__UKIH=((__POINTER )(NULL));
+                typ_id__VKIH= 0;
+                sz__WKIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__WKIH ==  0)) {
+                  result__TKIH=ITM_ARG__;
                 } else {
-                  typ_id__VIHH=-1;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WIHH);
-                  if ((typ_id__VIHH == (__INTEGER)(-  1))) {
-                    a__XIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__YIHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIHH + a__XIHH) & (__UINTEGER_32)(~ a__XIHH));
-                    ptr_table__AJHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YIHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__5IHH=((__POINTER )(NULL));
-                    result__BJHH=((__POINTER *)ptr_table__AJHH)[ 0];
-                    if ((result__BJHH == (void *)NULL)) {
-                      result__BJHH=new_lab__MRJ(new_size__YIHH);
-                      next__5IHH=(void *)((unsigned long)result__BJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIHH)));
-                      ((__POINTER *)next__5IHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__AJHH)[ 0]=next__5IHH;
+                  typ_id__VKIH=-1;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WKIH);
+                  if ((typ_id__VKIH == (__INTEGER)(-  1))) {
+                    a__XKIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__YKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WKIH + a__XKIH) & (__UINTEGER_32)(~ a__XKIH));
+                    ptr_table__ALIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YKIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__5KIH=((__POINTER )(NULL));
+                    result__BLIH=((__POINTER *)ptr_table__ALIH)[ 0];
+                    if ((result__BLIH == (void *)NULL)) {
+                      result__BLIH=new_lab__URJ(new_size__YKIH);
+                      next__5KIH=(void *)((unsigned long)result__BLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YKIH)));
+                      ((__POINTER *)next__5KIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ALIH)[ 0]=next__5KIH;
                     } else {
-                      next__5IHH=((__POINTER *)result__BJHH)[ 0];
-                      if ((next__5IHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YIHH <<  1)) <=  4096)) {
-                          next__5IHH=(void *)((unsigned long)result__BJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIHH)));
+                      next__5KIH=((__POINTER *)result__BLIH)[ 0];
+                      if ((next__5KIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BLIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YKIH <<  1)) <=  4096)) {
+                          next__5KIH=(void *)((unsigned long)result__BLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YKIH)));
                         } else {
-                          next__5IHH=new_lab__MRJ(new_size__YIHH);
+                          next__5KIH=new_lab__URJ(new_size__YKIH);
                         };
-                        ((__POINTER *)next__5IHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__AJHH)[ 0]=next__5IHH;
+                        ((__POINTER *)next__5KIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ALIH)[ 0]=next__5KIH;
                       } else {
-                        ((__POINTER *)result__BJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5IHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__BJHH=next__5IHH;
+                        ((__POINTER *)result__BLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5KIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__BLIH=next__5KIH;
                       };
                     };
-                    ptr__UIHH=result__BJHH;
+                    ptr__UKIH=result__BLIH;
                   } else {
-                    t__ZIHH=((__UINTEGER_32 )typ_id__VIHH);
-                    a__0IHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__IJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIHH + a__0IHH) & (__UINTEGER_32)(~ a__0IHH));
-                    ptr_table__FJHH=((__POINTER )(&(table_type[(t__ZIHH)])));
-                    lab_type__HJHH=(__UINTEGER_32)(t__ZIHH |  1);
-                    next__EJHH=((__POINTER )(NULL));
-                    result__GJHH=((__POINTER *)ptr_table__FJHH)[ 0];
-                    if ((result__GJHH == (void *)NULL)) {
-                      result__GJHH=new_lab__MRJ(lab_type__HJHH);
-                      next__EJHH=(void *)((unsigned long)result__GJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJHH)));
-                      ((__POINTER *)next__EJHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__FJHH)[ 0]=next__EJHH;
+                    t__ZKIH=((__UINTEGER_32 )typ_id__VKIH);
+                    a__0KIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ILIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WKIH + a__0KIH) & (__UINTEGER_32)(~ a__0KIH));
+                    ptr_table__FLIH=((__POINTER )(&(table_type[(t__ZKIH)])));
+                    lab_type__HLIH=(__UINTEGER_32)(t__ZKIH |  1);
+                    next__ELIH=((__POINTER )(NULL));
+                    result__GLIH=((__POINTER *)ptr_table__FLIH)[ 0];
+                    if ((result__GLIH == (void *)NULL)) {
+                      result__GLIH=new_lab__URJ(lab_type__HLIH);
+                      next__ELIH=(void *)((unsigned long)result__GLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ILIH)));
+                      ((__POINTER *)next__ELIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__FLIH)[ 0]=next__ELIH;
                     } else {
-                      next__EJHH=((__POINTER *)result__GJHH)[ 0];
-                      if ((next__EJHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IJHH <<  1)) <=  4096)) {
-                          next__EJHH=(void *)((unsigned long)result__GJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJHH)));
+                      next__ELIH=((__POINTER *)result__GLIH)[ 0];
+                      if ((next__ELIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GLIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ILIH <<  1)) <=  4096)) {
+                          next__ELIH=(void *)((unsigned long)result__GLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ILIH)));
                         } else {
-                          next__EJHH=new_lab__MRJ(lab_type__HJHH);
+                          next__ELIH=new_lab__URJ(lab_type__HLIH);
                         };
-                        ((__POINTER *)next__EJHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FJHH)[ 0]=next__EJHH;
+                        ((__POINTER *)next__ELIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__FLIH)[ 0]=next__ELIH;
                       } else {
-                        ((__POINTER *)result__GJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GJHH=next__EJHH;
+                        ((__POINTER *)result__GLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ELIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__GLIH=next__ELIH;
                       };
                     };
-                    ptr__UIHH=result__GJHH;
+                    ptr__UKIH=result__GLIH;
                   };
-                  result__TIHH=((__ITM_ARG *)ptr__UIHH);
-                  *(result__TIHH) = *(ITM_ARG__);
+                  result__TKIH=((__ITM_ARG *)ptr__UKIH);
+                  *(result__TKIH) = *(ITM_ARG__);
                 };
-                Self__1IHH=((__ITM_ARG *)result__TIHH);
-                Self__1IHH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=__tmp__HEBD;
-                Self__1IHH->name__10HC=(&__string_58);
-                Self__1IHH->type__20HC=type_self__HUN;
-                add_last__05GC(larg__2DBD,result__TIHH);
-                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
+                Self__1KIH=((__ITM_ARG *)result__TKIH);
+                Self__1KIH->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ=__tmp__PEBD;
+                Self__1KIH->name__D1HC=(&__string_58);
+                Self__1KIH->type__E1HC=type_self__PUN;
+                add_last__CAHC(larg__EEBD,result__TKIH);
+                switch (((struct ___OBJ *)expr__MJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__PEBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__PEBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__PEBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__PEBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__PEBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__PEBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__PEBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__PEBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__PEBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__PEBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__PEBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__PEBD=position__FD5B(expr__EJ3B);
+                  __tmp__XEBD=position__ND5B(expr__MJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__PEBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__PEBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__PEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__PEBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__PEBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__PEBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__PEBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__PEBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__PEBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__XEBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__PEBD=position__FJHC(expr__EJ3B);
+                  __tmp__XEBD=position__NJHC(expr__MJ3B);
                 } break;
                 };
-                result__JJHH=NULL;
-                ptr__KJHH=((__POINTER )(NULL));
-                typ_id__LJHH= 0;
-                sz__MJHH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-                if ((sz__MJHH ==  0)) {
-                  result__JJHH=ITM_SLOT__;
+                result__JLIH=NULL;
+                ptr__KLIH=((__POINTER )(NULL));
+                typ_id__LLIH= 0;
+                sz__MLIH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__MLIH ==  0)) {
+                  result__JLIH=ITM_SLOT__;
                 } else {
-                  typ_id__LJHH=-1;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__MJHH);
-                  if ((typ_id__LJHH == (__INTEGER)(-  1))) {
-                    a__NJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__OJHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MJHH + a__NJHH) & (__UINTEGER_32)(~ a__NJHH));
-                    ptr_table__WJHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OJHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__VJHH=((__POINTER )(NULL));
-                    result__XJHH=((__POINTER *)ptr_table__WJHH)[ 0];
-                    if ((result__XJHH == (void *)NULL)) {
-                      result__XJHH=new_lab__MRJ(new_size__OJHH);
-                      next__VJHH=(void *)((unsigned long)result__XJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJHH)));
-                      ((__POINTER *)next__VJHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__WJHH)[ 0]=next__VJHH;
+                  typ_id__LLIH=-1;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__MLIH);
+                  if ((typ_id__LLIH == (__INTEGER)(-  1))) {
+                    a__NLIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__OLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLIH + a__NLIH) & (__UINTEGER_32)(~ a__NLIH));
+                    ptr_table__WLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OLIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__VLIH=((__POINTER )(NULL));
+                    result__XLIH=((__POINTER *)ptr_table__WLIH)[ 0];
+                    if ((result__XLIH == (void *)NULL)) {
+                      result__XLIH=new_lab__URJ(new_size__OLIH);
+                      next__VLIH=(void *)((unsigned long)result__XLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLIH)));
+                      ((__POINTER *)next__VLIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__WLIH)[ 0]=next__VLIH;
                     } else {
-                      next__VJHH=((__POINTER *)result__XJHH)[ 0];
-                      if ((next__VJHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XJHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OJHH <<  1)) <=  4096)) {
-                          next__VJHH=(void *)((unsigned long)result__XJHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OJHH)));
+                      next__VLIH=((__POINTER *)result__XLIH)[ 0];
+                      if ((next__VLIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XLIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OLIH <<  1)) <=  4096)) {
+                          next__VLIH=(void *)((unsigned long)result__XLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLIH)));
                         } else {
-                          next__VJHH=new_lab__MRJ(new_size__OJHH);
+                          next__VLIH=new_lab__URJ(new_size__OLIH);
                         };
-                        ((__POINTER *)next__VJHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__WJHH)[ 0]=next__VJHH;
+                        ((__POINTER *)next__VLIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__WLIH)[ 0]=next__VLIH;
                       } else {
-                        ((__POINTER *)result__XJHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VJHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__XJHH=next__VJHH;
+                        ((__POINTER *)result__XLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__XLIH=next__VLIH;
                       };
                     };
-                    ptr__KJHH=result__XJHH;
+                    ptr__KLIH=result__XLIH;
                   } else {
-                    t__PJHH=((__UINTEGER_32 )typ_id__LJHH);
-                    a__QJHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__4JHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MJHH + a__QJHH) & (__UINTEGER_32)(~ a__QJHH));
-                    ptr_table__1JHH=((__POINTER )(&(table_type[(t__PJHH)])));
-                    lab_type__3JHH=(__UINTEGER_32)(t__PJHH |  1);
-                    next__0JHH=((__POINTER )(NULL));
-                    result__2JHH=((__POINTER *)ptr_table__1JHH)[ 0];
-                    if ((result__2JHH == (void *)NULL)) {
-                      result__2JHH=new_lab__MRJ(lab_type__3JHH);
-                      next__0JHH=(void *)((unsigned long)result__2JHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JHH)));
-                      ((__POINTER *)next__0JHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__1JHH)[ 0]=next__0JHH;
+                    t__PLIH=((__UINTEGER_32 )typ_id__LLIH);
+                    a__QLIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__4LIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MLIH + a__QLIH) & (__UINTEGER_32)(~ a__QLIH));
+                    ptr_table__1LIH=((__POINTER )(&(table_type[(t__PLIH)])));
+                    lab_type__3LIH=(__UINTEGER_32)(t__PLIH |  1);
+                    next__0LIH=((__POINTER )(NULL));
+                    result__2LIH=((__POINTER *)ptr_table__1LIH)[ 0];
+                    if ((result__2LIH == (void *)NULL)) {
+                      result__2LIH=new_lab__URJ(lab_type__3LIH);
+                      next__0LIH=(void *)((unsigned long)result__2LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LIH)));
+                      ((__POINTER *)next__0LIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__1LIH)[ 0]=next__0LIH;
                     } else {
-                      next__0JHH=((__POINTER *)result__2JHH)[ 0];
-                      if ((next__0JHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2JHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4JHH <<  1)) <=  4096)) {
-                          next__0JHH=(void *)((unsigned long)result__2JHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JHH)));
+                      next__0LIH=((__POINTER *)result__2LIH)[ 0];
+                      if ((next__0LIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2LIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4LIH <<  1)) <=  4096)) {
+                          next__0LIH=(void *)((unsigned long)result__2LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LIH)));
                         } else {
-                          next__0JHH=new_lab__MRJ(lab_type__3JHH);
+                          next__0LIH=new_lab__URJ(lab_type__3LIH);
                         };
-                        ((__POINTER *)next__0JHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__1JHH)[ 0]=next__0JHH;
+                        ((__POINTER *)next__0LIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__1LIH)[ 0]=next__0LIH;
                       } else {
-                        ((__POINTER *)result__2JHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0JHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__2JHH=next__0JHH;
+                        ((__POINTER *)result__2LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0LIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__2LIH=next__0LIH;
                       };
                     };
-                    ptr__KJHH=result__2JHH;
+                    ptr__KLIH=result__2LIH;
                   };
-                  result__JJHH=((__ITM_SLOT *)ptr__KJHH);
-                  *(result__JJHH) = *(ITM_SLOT__);
+                  result__JLIH=((__ITM_SLOT *)ptr__KLIH);
+                  *(result__JLIH) = *(ITM_SLOT__);
                 };
-                Self__RJHH=((__ITM_SLOT *)result__JJHH);
-                Self__RJHH->parent_named__P5.name__LI=n__0DBD;
-                Self__RJHH->parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__PEBD;
-                Self__RJHH->id_section__Y1C=sec__1DBD;
-                ((__ITM_SLOT *)result__JJHH)->affect__JAGC='<';
-                set_value__type__ZFHC(result__JJHH,expr__EJ3B,__tmp__SJ3B);
-                set_argument_list__VCHC(result__JJHH,larg__2DBD);
-                set_result_type__Q3FC(result__JJHH,Self__TGHC->parent_itm_slot__OU5B.result_type__04FC);
-                fast_put__to__BOGC(((__PROTOTYPE *)__tmp__SJ3B)->slot_list__2US,result__JJHH,result__JJHH->parent_named__P5.name__LI);
-                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
+                Self__RLIH=((__ITM_SLOT *)result__JLIH);
+                Self__RLIH->parent_named__V5.name__LI=n__CEBD;
+                Self__RLIH->parent_named__V5.parent_itm_object__4.position__VDJ=__tmp__XEBD;
+                Self__RLIH->id_section__A2C=sec__DEBD;
+                ((__ITM_SLOT *)result__JLIH)->affect__RAGC='<';
+                set_value__type__BGHC(result__JLIH,expr__MJ3B,__tmp__0J3B);
+                set_argument_list__3CHC(result__JLIH,larg__EEBD);
+                set_result_type__Y3FC(result__JLIH,Self__1GHC->parent_itm_slot__WU5B.result_type__C5FC);
+                fast_put__to__JOGC(((__PROTOTYPE *)__tmp__0J3B)->slot_list__EVS,result__JLIH,result__JLIH->parent_named__V5.name__LI);
+                switch (((struct ___OBJ *)expr__MJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__DFBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__DFBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__DFBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__DFBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__DFBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__DFBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__DFBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__DFBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__DFBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__DFBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__DFBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__DFBD=position__FD5B(expr__EJ3B);
+                  __tmp__LFBD=position__ND5B(expr__MJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__DFBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__DFBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__DFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__DFBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__DFBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__DFBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__DFBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__DFBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__DFBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__LFBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__DFBD=position__FJHC(expr__EJ3B);
+                  __tmp__LFBD=position__NJHC(expr__MJ3B);
                 } break;
                 };
-                get__DTI(((__PROTOTYPE *)__tmp__SJ3B)->parent_named__5.name__LI);
-                result__5JHH=NULL;
-                ptr__AKHH=((__POINTER )(NULL));
-                typ_id__BKHH= 0;
-                sz__CKHH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-                if ((sz__CKHH ==  0)) {
-                  result__5JHH=ITM_PROTOTYPE__;
+                get__LTI(((__PROTOTYPE *)__tmp__0J3B)->parent_named__5.name__LI);
+                result__5LIH=NULL;
+                ptr__AMIH=((__POINTER )(NULL));
+                typ_id__BMIH= 0;
+                sz__CMIH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__CMIH ==  0)) {
+                  result__5LIH=ITM_PROTOTYPE__;
                 } else {
-                  typ_id__BKHH=-1;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__CKHH);
-                  if ((typ_id__BKHH == (__INTEGER)(-  1))) {
-                    a__DKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__EKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__CKHH + a__DKHH) & (__UINTEGER_32)(~ a__DKHH));
-                    ptr_table__JKHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__IKHH=((__POINTER )(NULL));
-                    result__KKHH=((__POINTER *)ptr_table__JKHH)[ 0];
-                    if ((result__KKHH == (void *)NULL)) {
-                      result__KKHH=new_lab__MRJ(new_size__EKHH);
-                      next__IKHH=(void *)((unsigned long)result__KKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EKHH)));
-                      ((__POINTER *)next__IKHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__JKHH)[ 0]=next__IKHH;
+                  typ_id__BMIH=-1;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__CMIH);
+                  if ((typ_id__BMIH == (__INTEGER)(-  1))) {
+                    a__DMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__EMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CMIH + a__DMIH) & (__UINTEGER_32)(~ a__DMIH));
+                    ptr_table__JMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EMIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__IMIH=((__POINTER )(NULL));
+                    result__KMIH=((__POINTER *)ptr_table__JMIH)[ 0];
+                    if ((result__KMIH == (void *)NULL)) {
+                      result__KMIH=new_lab__URJ(new_size__EMIH);
+                      next__IMIH=(void *)((unsigned long)result__KMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMIH)));
+                      ((__POINTER *)next__IMIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__JMIH)[ 0]=next__IMIH;
                     } else {
-                      next__IKHH=((__POINTER *)result__KKHH)[ 0];
-                      if ((next__IKHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KKHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EKHH <<  1)) <=  4096)) {
-                          next__IKHH=(void *)((unsigned long)result__KKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EKHH)));
+                      next__IMIH=((__POINTER *)result__KMIH)[ 0];
+                      if ((next__IMIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KMIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__EMIH <<  1)) <=  4096)) {
+                          next__IMIH=(void *)((unsigned long)result__KMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMIH)));
                         } else {
-                          next__IKHH=new_lab__MRJ(new_size__EKHH);
+                          next__IMIH=new_lab__URJ(new_size__EMIH);
                         };
-                        ((__POINTER *)next__IKHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__JKHH)[ 0]=next__IKHH;
+                        ((__POINTER *)next__IMIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__JMIH)[ 0]=next__IMIH;
                       } else {
-                        ((__POINTER *)result__KKHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IKHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__KKHH=next__IKHH;
+                        ((__POINTER *)result__KMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__KMIH=next__IMIH;
                       };
                     };
-                    ptr__AKHH=result__KKHH;
+                    ptr__AMIH=result__KMIH;
                   } else {
-                    t__FKHH=((__UINTEGER_32 )typ_id__BKHH);
-                    a__GKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__RKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__CKHH + a__GKHH) & (__UINTEGER_32)(~ a__GKHH));
-                    ptr_table__OKHH=((__POINTER )(&(table_type[(t__FKHH)])));
-                    lab_type__QKHH=(__UINTEGER_32)(t__FKHH |  1);
-                    next__NKHH=((__POINTER )(NULL));
-                    result__PKHH=((__POINTER *)ptr_table__OKHH)[ 0];
-                    if ((result__PKHH == (void *)NULL)) {
-                      result__PKHH=new_lab__MRJ(lab_type__QKHH);
-                      next__NKHH=(void *)((unsigned long)result__PKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RKHH)));
-                      ((__POINTER *)next__NKHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__OKHH)[ 0]=next__NKHH;
+                    t__FMIH=((__UINTEGER_32 )typ_id__BMIH);
+                    a__GMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__RMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CMIH + a__GMIH) & (__UINTEGER_32)(~ a__GMIH));
+                    ptr_table__OMIH=((__POINTER )(&(table_type[(t__FMIH)])));
+                    lab_type__QMIH=(__UINTEGER_32)(t__FMIH |  1);
+                    next__NMIH=((__POINTER )(NULL));
+                    result__PMIH=((__POINTER *)ptr_table__OMIH)[ 0];
+                    if ((result__PMIH == (void *)NULL)) {
+                      result__PMIH=new_lab__URJ(lab_type__QMIH);
+                      next__NMIH=(void *)((unsigned long)result__PMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RMIH)));
+                      ((__POINTER *)next__NMIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__OMIH)[ 0]=next__NMIH;
                     } else {
-                      next__NKHH=((__POINTER *)result__PKHH)[ 0];
-                      if ((next__NKHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PKHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RKHH <<  1)) <=  4096)) {
-                          next__NKHH=(void *)((unsigned long)result__PKHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RKHH)));
+                      next__NMIH=((__POINTER *)result__PMIH)[ 0];
+                      if ((next__NMIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PMIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__RMIH <<  1)) <=  4096)) {
+                          next__NMIH=(void *)((unsigned long)result__PMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RMIH)));
                         } else {
-                          next__NKHH=new_lab__MRJ(lab_type__QKHH);
+                          next__NMIH=new_lab__URJ(lab_type__QMIH);
                         };
-                        ((__POINTER *)next__NKHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__OKHH)[ 0]=next__NKHH;
+                        ((__POINTER *)next__NMIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__OMIH)[ 0]=next__NMIH;
                       } else {
-                        ((__POINTER *)result__PKHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NKHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__PKHH=next__NKHH;
+                        ((__POINTER *)result__PMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__PMIH=next__NMIH;
                       };
                     };
-                    ptr__AKHH=result__PKHH;
+                    ptr__AMIH=result__PMIH;
                   };
-                  result__5JHH=((__ITM_PROTOTYPE *)ptr__AKHH);
-                  *(result__5JHH) = *(ITM_PROTOTYPE__);
+                  result__5LIH=((__ITM_PROTOTYPE *)ptr__AMIH);
+                  *(result__5LIH) = *(ITM_PROTOTYPE__);
                 };
-                ((__ITM_PROTOTYPE *)result__5JHH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__DFBD;
-                switch (((struct ___OBJ *)expr__EJ3B)->__id) {
+                ((__ITM_PROTOTYPE *)result__5LIH)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__LFBD;
+                switch (((struct ___OBJ *)expr__MJ3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__MFBD=((__ITM_LIST *)expr__EJ3B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__MFBD=((__ITM_LDOTS *)expr__EJ3B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__MFBD=((__ITM_PROTOTYPE *)expr__EJ3B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__MFBD=((__ITM_LIST_IDF *)expr__EJ3B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__MFBD=((__ITM_WRITE_VALUE *)expr__EJ3B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__MFBD=((__ITM_WRITE_CAST *)expr__EJ3B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__MFBD=((__ITM_READ *)expr__EJ3B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__MFBD=((__ITM_WRITE_CODE *)expr__EJ3B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__MFBD=((__ITM_OPERATOR *)expr__EJ3B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__MFBD=((__ITM_READ_ARG1 *)expr__EJ3B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__MFBD=((__ITM_READ_ARG2 *)expr__EJ3B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__MFBD=position__FD5B(expr__EJ3B);
+                  __tmp__UFBD=position__ND5B(expr__MJ3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__MFBD=((__ITM_OLD *)expr__EJ3B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__MFBD=((__ITM_EXTERNAL_TYPE *)expr__EJ3B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__MFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__EJ3B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__MFBD=((__ITM_EXTERNAL *)expr__EJ3B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__MFBD=((__ITM_READ_ARGS *)expr__EJ3B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__MFBD=((__ITM_REAL *)expr__EJ3B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__MFBD=((__ITM_NUMBER *)expr__EJ3B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__MFBD=((__ITM_CHARACTER *)expr__EJ3B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__MFBD=((__ITM_STRING *)expr__EJ3B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+                  __tmp__UFBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__MFBD=position__FJHC(expr__EJ3B);
+                  __tmp__UFBD=position__NJHC(expr__MJ3B);
                 } break;
                 };
-                result__SKHH=NULL;
-                ptr__TKHH=((__POINTER )(NULL));
-                typ_id__UKHH= 0;
-                sz__VKHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-                if ((sz__VKHH ==  0)) {
-                  result__SKHH=ITM_READ_ARG1__;
+                result__SMIH=NULL;
+                ptr__TMIH=((__POINTER )(NULL));
+                typ_id__UMIH= 0;
+                sz__VMIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__VMIH ==  0)) {
+                  result__SMIH=ITM_READ_ARG1__;
                 } else {
-                  typ_id__UKHH=-1;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VKHH);
-                  if ((typ_id__UKHH == (__INTEGER)(-  1))) {
-                    a__WKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__XKHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VKHH + a__WKHH) & (__UINTEGER_32)(~ a__WKHH));
-                    ptr_table__2KHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XKHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__1KHH=((__POINTER )(NULL));
-                    result__3KHH=((__POINTER *)ptr_table__2KHH)[ 0];
-                    if ((result__3KHH == (void *)NULL)) {
-                      result__3KHH=new_lab__MRJ(new_size__XKHH);
-                      next__1KHH=(void *)((unsigned long)result__3KHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
-                      ((__POINTER *)next__1KHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__2KHH)[ 0]=next__1KHH;
+                  typ_id__UMIH=-1;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__VMIH);
+                  if ((typ_id__UMIH == (__INTEGER)(-  1))) {
+                    a__WMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__XMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VMIH + a__WMIH) & (__UINTEGER_32)(~ a__WMIH));
+                    ptr_table__2MIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XMIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__1MIH=((__POINTER )(NULL));
+                    result__3MIH=((__POINTER *)ptr_table__2MIH)[ 0];
+                    if ((result__3MIH == (void *)NULL)) {
+                      result__3MIH=new_lab__URJ(new_size__XMIH);
+                      next__1MIH=(void *)((unsigned long)result__3MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMIH)));
+                      ((__POINTER *)next__1MIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__2MIH)[ 0]=next__1MIH;
                     } else {
-                      next__1KHH=((__POINTER *)result__3KHH)[ 0];
-                      if ((next__1KHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3KHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XKHH <<  1)) <=  4096)) {
-                          next__1KHH=(void *)((unsigned long)result__3KHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKHH)));
+                      next__1MIH=((__POINTER *)result__3MIH)[ 0];
+                      if ((next__1MIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3MIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XMIH <<  1)) <=  4096)) {
+                          next__1MIH=(void *)((unsigned long)result__3MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMIH)));
                         } else {
-                          next__1KHH=new_lab__MRJ(new_size__XKHH);
+                          next__1MIH=new_lab__URJ(new_size__XMIH);
                         };
-                        ((__POINTER *)next__1KHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__2KHH)[ 0]=next__1KHH;
+                        ((__POINTER *)next__1MIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__2MIH)[ 0]=next__1MIH;
                       } else {
-                        ((__POINTER *)result__3KHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1KHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__3KHH=next__1KHH;
+                        ((__POINTER *)result__3MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__3MIH=next__1MIH;
                       };
                     };
-                    ptr__TKHH=result__3KHH;
+                    ptr__TMIH=result__3MIH;
                   } else {
-                    t__YKHH=((__UINTEGER_32 )typ_id__UKHH);
-                    a__ZKHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__ELHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VKHH + a__ZKHH) & (__UINTEGER_32)(~ a__ZKHH));
-                    ptr_table__BLHH=((__POINTER )(&(table_type[(t__YKHH)])));
-                    lab_type__DLHH=(__UINTEGER_32)(t__YKHH |  1);
-                    next__ALHH=((__POINTER )(NULL));
-                    result__CLHH=((__POINTER *)ptr_table__BLHH)[ 0];
-                    if ((result__CLHH == (void *)NULL)) {
-                      result__CLHH=new_lab__MRJ(lab_type__DLHH);
-                      next__ALHH=(void *)((unsigned long)result__CLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELHH)));
-                      ((__POINTER *)next__ALHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__BLHH)[ 0]=next__ALHH;
+                    t__YMIH=((__UINTEGER_32 )typ_id__UMIH);
+                    a__ZMIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__ENIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VMIH + a__ZMIH) & (__UINTEGER_32)(~ a__ZMIH));
+                    ptr_table__BNIH=((__POINTER )(&(table_type[(t__YMIH)])));
+                    lab_type__DNIH=(__UINTEGER_32)(t__YMIH |  1);
+                    next__ANIH=((__POINTER )(NULL));
+                    result__CNIH=((__POINTER *)ptr_table__BNIH)[ 0];
+                    if ((result__CNIH == (void *)NULL)) {
+                      result__CNIH=new_lab__URJ(lab_type__DNIH);
+                      next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ENIH)));
+                      ((__POINTER *)next__ANIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
                     } else {
-                      next__ALHH=((__POINTER *)result__CLHH)[ 0];
-                      if ((next__ALHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CLHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ELHH <<  1)) <=  4096)) {
-                          next__ALHH=(void *)((unsigned long)result__CLHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELHH)));
+                      next__ANIH=((__POINTER *)result__CNIH)[ 0];
+                      if ((next__ANIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CNIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ENIH <<  1)) <=  4096)) {
+                          next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ENIH)));
                         } else {
-                          next__ALHH=new_lab__MRJ(lab_type__DLHH);
+                          next__ANIH=new_lab__URJ(lab_type__DNIH);
                         };
-                        ((__POINTER *)next__ALHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__BLHH)[ 0]=next__ALHH;
+                        ((__POINTER *)next__ANIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
                       } else {
-                        ((__POINTER *)result__CLHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ALHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__CLHH=next__ALHH;
+                        ((__POINTER *)result__CNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__CNIH=next__ANIH;
                       };
                     };
-                    ptr__TKHH=result__CLHH;
+                    ptr__TMIH=result__CNIH;
                   };
-                  result__SKHH=((__ITM_READ_ARG1 *)ptr__TKHH);
-                  *(result__SKHH) = *(ITM_READ_ARG1__);
+                  result__SMIH=((__ITM_READ_ARG1 *)ptr__TMIH);
+                  *(result__SMIH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__SKHH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__MFBD;
+                ((__ITM_READ_ARG1 *)result__SMIH)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__UFBD;
               };
             };
-            if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__PTF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__FLHH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__FLHH=FALSE__;
+          result__FNIH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__FNIH=FALSE__;
           } else {
-            result__GLHH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__GLHH=((__CHARACTER )(( 0)));
+            result__GNIH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__GNIH=((__CHARACTER )(( 0)));
             } else {
-              result__GLHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__GNIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__GLHH == ';')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__FLHH=TRUE__;
+            if ((result__GNIH == ';')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__FNIH=TRUE__;
             };
           };
-          if ((! result__FLHH)) {
-            pos__3UUG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_242));
-            put_position__UOG(pos__3UUG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__FNIH)) {
+            pos__LRVG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_240));
+            put_position__2OG(pos__LRVG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          if (is_shorter__5Y) {
-            if ((((! is_short_code__P1) && (old_pos__SXOB !=  0)) && ((void *)((__SECTION_ *)last_section__X0C)->name__CZDC != (void *)(&__string_22)))) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__JXF()) >>  9) &  255) <  5)) {
-                while_do__MSLE:
+          if (is_shorter__FZ) {
+            if ((((! is_short_code__V1) && (old_pos__0XOB !=  0)) && ((void *)((__SECTION_ *)last_section__50C)->name__KZDC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__RXF()) >>  9) &  255) <  5)) {
+                while_do__EOLE:
                 {
-                  result__1O2G='\0';
-                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                    result__1O2G=((__CHARACTER )(( 0)));
+                  result__4L3G='\0';
+                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                    result__4L3G=((__CHARACTER )(( 0)));
                   } else {
-                    result__1O2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                    result__4L3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                   };
-                  if ((result__1O2G != ((__CHARACTER )(( 0))))) {
-                    result__EP2G='\0';
-                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                      result__EP2G=((__CHARACTER )(( 0)));
+                  if ((result__4L3G != ((__CHARACTER )(( 0))))) {
+                    result__HM3G='\0';
+                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                      result__HM3G=((__CHARACTER )(( 0)));
                     } else {
-                      result__EP2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                      result__HM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                     };
-                    __tmp__A4OB=(((((((result__EP2G == ' ') || (result__EP2G == '\t')) || (result__EP2G == '\n')) || (result__EP2G == '\r')) || (result__EP2G == '\0')) || (result__EP2G == '\f')) || (result__EP2G == '\v'));
+                    __tmp__I4OB=(((((((result__HM3G == ' ') || (result__HM3G == '\t')) || (result__HM3G == '\n')) || (result__HM3G == '\r')) || (result__HM3G == '\0')) || (result__HM3G == '\f')) || (result__HM3G == '\v'));
                   } else {
-                    __tmp__A4OB=FALSE__;
+                    __tmp__I4OB=FALSE__;
                   };
-                  if (__tmp__A4OB) {
-                    result__JP2G='\0';
-                    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                      result__JP2G=((__CHARACTER )(( 0)));
+                  if (__tmp__I4OB) {
+                    result__MM3G='\0';
+                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                      result__MM3G=((__CHARACTER )(( 0)));
                     } else {
-                      result__JP2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                      result__MM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                     };
-                    __tmp__B4OB=(result__JP2G != '\n');
+                    __tmp__J4OB=(result__MM3G != '\n');
                   } else {
-                    __tmp__B4OB=FALSE__;
+                    __tmp__J4OB=FALSE__;
                   };
-                  if (__tmp__B4OB) {
-                    position__SBC=(__INTEGER)(position__SBC +  1);
-                    goto while_do__MSLE;
+                  if (__tmp__J4OB) {
+                    position__0BC=(__INTEGER)(position__0BC +  1);
+                    goto while_do__EOLE;
                   };
                 };
-                result__OP2G='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__OP2G=((__CHARACTER )(( 0)));
+                result__RM3G='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__RM3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__OP2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__RM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__OP2G == '\n')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
+                if ((result__RM3G == '\n')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
                 };
               };
-              Self__NFGH=((__STRING *)output_code__SI);
-              start__KFGH=(__INTEGER)(old_pos__SXOB + old_derive__TXOB);
-              end__JFGH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
-              len__LFGH=(__INTEGER)((__INTEGER)(end__JFGH - start__KFGH) +  1);
-              if ((len__LFGH >  0)) {
-                __tmp__MFGH=(__INTEGER)(end__JFGH +  1);
-                __tmp__OFGH=Self__NFGH->count__WFC;
-                Self__PFGH=__tmp__MFGH;
-                while ((Self__PFGH <= __tmp__OFGH)) {
-                  ((__CHARACTER *)Self__NFGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__PFGH - len__LFGH) -  1)]=((__CHARACTER *)Self__NFGH->storage__BCS)[(__INTEGER)(Self__PFGH -  1)];
-                  Self__PFGH=(__INTEGER)(Self__PFGH +  1);
+              Self__AHHH=((__STRING *)output_code__SI);
+              start__3GHH=(__INTEGER)(old_pos__0XOB + old_derive__1XOB);
+              end__2GHH=(__INTEGER)((__INTEGER)(position__0BC + short_derive__JCC) -  1);
+              len__4GHH=(__INTEGER)((__INTEGER)(end__2GHH - start__3GHH) +  1);
+              if ((len__4GHH >  0)) {
+                __tmp__5GHH=(__INTEGER)(end__2GHH +  1);
+                __tmp__BHHH=Self__AHHH->count__4FC;
+                Self__CHHH=__tmp__5GHH;
+                while ((Self__CHHH <= __tmp__BHHH)) {
+                  ((__CHARACTER *)Self__AHHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__CHHH - len__4GHH) -  1)]=((__CHARACTER *)Self__AHHH->storage__JCS)[(__INTEGER)(Self__CHHH -  1)];
+                  Self__CHHH=(__INTEGER)(Self__CHHH +  1);
                 };
-                Self__NFGH->count__WFC=(__INTEGER)(Self__NFGH->count__WFC - len__LFGH);
+                Self__AHHH->count__4FC=(__INTEGER)(Self__AHHH->count__4FC - len__4GHH);
               };
-              short_derive__BCC=(__INTEGER)(old_derive__TXOB - (__INTEGER)(position__SBC - old_pos__SXOB));
+              short_derive__JCC=(__INTEGER)(old_derive__1XOB - (__INTEGER)(position__0BC - old_pos__0XOB));
             };
           };
-          __tmp__I5OB=((__PROTOTYPE *)object__JBC)->slot_list__2US;
-          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-            __tmp__K5OB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.name__LI;
+          __tmp__Q5OB=((__PROTOTYPE *)object__RBC)->slot_list__EVS;
+          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            __tmp__S5OB=((__ITM_SLOT *)last_slot__Y2D)->parent_named__V5.name__LI;
           } else {
-            __tmp__K5OB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__S5OB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          s__UXOB=fast_reference_at__QAGC(__tmp__I5OB,__tmp__K5OB);
-          if (((void *)s__UXOB != (void *)NULL)) {
-            put_error__text__KNG( 1,(&__string_243));
-            if (((struct ___OBJ *)s__UXOB)->__id==__ITM_SLOT__) {
-              __tmp__V5OB=((__ITM_SLOT *)s__UXOB)->parent_named__P5.parent_itm_object__4.position__NDJ;
+          s__2XOB=fast_reference_at__YAGC(__tmp__Q5OB,__tmp__S5OB);
+          if (((void *)s__2XOB != (void *)NULL)) {
+            put_error__text__SNG( 1,(&__string_241));
+            if (((struct ___OBJ *)s__2XOB)->__id==__ITM_SLOT__) {
+              __tmp__35OB=((__ITM_SLOT *)s__2XOB)->parent_named__V5.parent_itm_object__4.position__VDJ;
             } else {
-              __tmp__V5OB=((__ITM_SLOT_OPERATOR *)s__UXOB)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+              __tmp__35OB=((__ITM_SLOT_OPERATOR *)s__2XOB)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
             };
-            put_position__UOG(__tmp__V5OB);
-            if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-              __tmp__X5OB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.parent_itm_object__4.position__NDJ;
+            put_position__2OG(__tmp__35OB);
+            if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+              __tmp__55OB=((__ITM_SLOT *)last_slot__Y2D)->parent_named__V5.parent_itm_object__4.position__VDJ;
             } else {
-              __tmp__X5OB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ;
+              __tmp__55OB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
             };
-            put_position__UOG(__tmp__X5OB);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+            put_position__2OG(__tmp__55OB);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          Self__3FZB=((__PROTOTYPE *)object__JBC);
-          s__4FZB=last_slot__Q2D;
-          __tmp__5FZB=Self__3FZB->slot_list__2US;
-          if (((struct ___OBJ *)last_slot__Q2D)->__id==__ITM_SLOT__) {
-            __tmp__AGZB=((__ITM_SLOT *)last_slot__Q2D)->parent_named__P5.name__LI;
+          Self__FGZB=((__PROTOTYPE *)object__RBC);
+          s__GGZB=last_slot__Y2D;
+          __tmp__HGZB=Self__FGZB->slot_list__EVS;
+          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            __tmp__IGZB=((__ITM_SLOT *)last_slot__Y2D)->parent_named__V5.name__LI;
           } else {
-            __tmp__AGZB=((__ITM_SLOT_OPERATOR *)last_slot__Q2D)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__IGZB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          fast_put__to__BOGC(__tmp__5FZB,last_slot__Q2D,__tmp__AGZB);
-          if (((void *)Self__3FZB->first_slot__CGZB == (void *)NULL)) {
-            Self__3FZB->first_slot__CGZB=s__4FZB;
+          fast_put__to__JOGC(__tmp__HGZB,last_slot__Y2D,__tmp__IGZB);
+          if (((void *)Self__FGZB->first_slot__KGZB == (void *)NULL)) {
+            Self__FGZB->first_slot__KGZB=s__GGZB;
           } else {
-            __tmp__OGZB=Self__3FZB->last_slot__O1C;
-            if (((struct ___OBJ *)__tmp__OGZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__OGZB)->next__OHHC=s__4FZB;
+            __tmp__WGZB=Self__FGZB->last_slot__W1C;
+            if (((struct ___OBJ *)__tmp__WGZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__WGZB)->next__WHHC=s__GGZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__OGZB)->parent_itm_slot__OU5B.next__OHHC=s__4FZB;
-            };
-          };
-          Self__3FZB->last_slot__O1C=s__4FZB;
-          if (is_shorter__5Y) {
-            Self__DK3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__JCC);
-            Self__DK3B->count__YHY= 0;
-            __tmp__FK3B=Self__DK3B->buckets__PEV;
-            __tmp__IK3B=(__INTEGER)(Self__DK3B->capacity__KIT -  1);
-            Self__THHC=((void **)__tmp__FK3B);
-            Self__VZPC=__tmp__IK3B;
-            while ((Self__VZPC >=  0)) {
-              Self__THHC[Self__VZPC]=NULL;
-              Self__VZPC=(__INTEGER)(Self__VZPC -  1);
-            };
-          };
-        };
-      } while (result__NXOB);
-      if (is_shorter__5Y) {
-        if (((! is_short_private__31) && ((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_26)))) {
-          Self__WFGH=((__STRING *)output_code__SI);
-          start__TFGH=(__INTEGER)(pos_sec__RXC + old_derive__SXC);
-          end__SFGH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
-          len__UFGH=(__INTEGER)((__INTEGER)(end__SFGH - start__TFGH) +  1);
-          if ((len__UFGH >  0)) {
-            __tmp__VFGH=(__INTEGER)(end__SFGH +  1);
-            __tmp__XFGH=Self__WFGH->count__WFC;
-            Self__YFGH=__tmp__VFGH;
-            while ((Self__YFGH <= __tmp__XFGH)) {
-              ((__CHARACTER *)Self__WFGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__YFGH - len__UFGH) -  1)]=((__CHARACTER *)Self__WFGH->storage__BCS)[(__INTEGER)(Self__YFGH -  1)];
-              Self__YFGH=(__INTEGER)(Self__YFGH +  1);
-            };
-            Self__WFGH->count__WFC=(__INTEGER)(Self__WFGH->count__WFC - len__UFGH);
-          };
-          short_derive__BCC=(__INTEGER)(old_derive__SXC - (__INTEGER)(position__SBC - pos_sec__RXC));
-        };
-        pos_sec__RXC=position__SBC;
-        old_derive__SXC=short_derive__BCC;
-      };
-      goto while_do__34E;
-    };
-  };
-  if (((void *)read_contract__HTF(PARSER__) != (void *)NULL)) {
-    pos__YVUG=current_position__JXF();
-    put_error__text__KNG( 2,(&__string_244));
-    put_position__UOG(pos__YVUG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+              ((__ITM_SLOT_OPERATOR *)__tmp__WGZB)->parent_itm_slot__WU5B.next__WHHC=s__GGZB;
+            };
+          };
+          Self__FGZB->last_slot__W1C=s__GGZB;
+          if (is_shorter__FZ) {
+            Self__LK3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__RCC);
+            Self__LK3B->count__AIY= 0;
+            __tmp__NK3B=Self__LK3B->buckets__XEV;
+            __tmp__QK3B=(__INTEGER)(Self__LK3B->capacity__SIT -  1);
+            Self__1HHC=((void **)__tmp__NK3B);
+            Self__3ZPC=__tmp__QK3B;
+            while ((Self__3ZPC >=  0)) {
+              Self__1HHC[Self__3ZPC]=NULL;
+              Self__3ZPC=(__INTEGER)(Self__3ZPC -  1);
+            };
+          };
+        };
+      } while (result__VXOB);
+      if (is_shorter__FZ) {
+        if (((! is_short_private__D2) && ((void *)((__SECTION_ *)last_section__50C)->name__KZDC == (void *)(&__string_26)))) {
+          Self__JHHH=((__STRING *)output_code__SI);
+          start__GHHH=(__INTEGER)(pos_sec__ZXC + old_derive__0XC);
+          end__FHHH=(__INTEGER)((__INTEGER)(position__0BC + short_derive__JCC) -  1);
+          len__HHHH=(__INTEGER)((__INTEGER)(end__FHHH - start__GHHH) +  1);
+          if ((len__HHHH >  0)) {
+            __tmp__IHHH=(__INTEGER)(end__FHHH +  1);
+            __tmp__KHHH=Self__JHHH->count__4FC;
+            Self__LHHH=__tmp__IHHH;
+            while ((Self__LHHH <= __tmp__KHHH)) {
+              ((__CHARACTER *)Self__JHHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__LHHH - len__HHHH) -  1)]=((__CHARACTER *)Self__JHHH->storage__JCS)[(__INTEGER)(Self__LHHH -  1)];
+              Self__LHHH=(__INTEGER)(Self__LHHH +  1);
+            };
+            Self__JHHH->count__4FC=(__INTEGER)(Self__JHHH->count__4FC - len__HHHH);
+          };
+          short_derive__JCC=(__INTEGER)(old_derive__0XC - (__INTEGER)(position__0BC - pos_sec__ZXC));
+        };
+        pos_sec__ZXC=position__0BC;
+        old_derive__0XC=short_derive__JCC;
+      };
+      goto while_do__F5E;
+    };
+  };
+  if (((void *)read_contract__PTF(PARSER__) != (void *)NULL)) {
+    pos__GSVG=current_position__RXF();
+    put_error__text__SNG( 2,(&__string_242));
+    put_position__2OG(pos__GSVG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  read_space__3RD();
-  result__5P2G='\0';
-  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-    result__5P2G=((__CHARACTER )(( 0)));
+  read_space__FSD();
+  result__CN3G='\0';
+  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+    result__CN3G=((__CHARACTER )(( 0)));
   } else {
-    result__5P2G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-  };
-  if ((result__5P2G != ((__CHARACTER )(( 0))))) {
-    pos__0VUG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_164));
-    put_position__UOG(pos__0VUG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    result__CN3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+  };
+  if ((result__CN3G != ((__CHARACTER )(( 0))))) {
+    pos__ISVG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_166));
+    put_position__2OG(pos__ISVG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  short__token__to__LBD((&__string_118),((__STRING *)source__PBC)->count__WFC,((__STRING *)source__PBC)->count__WFC);
-  object__JBC=NULL;
+  short__token__to__TBD((&__string_118),((__STRING *)source__XBC)->count__4FC,((__STRING *)source__XBC)->count__4FC);
+  object__RBC=NULL;
 }
 
-static void put__to__like__1ZXD(void *tok__3ZXD,void *buf__4ZXD,void *key__5ZXD)
-// ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
+static void put__to__like__D0XD(void *tok__F0XD,void *buf__G0XD,void *key__H0XD)
+// ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__L0XD,Self__0MNE;
-  void *lst__A0XD;
-  lst__A0XD=fast_reference_at__GB5D(short_dico__QD,key__5ZXD);
-  if (((void *)lst__A0XD != (void *)NULL)) {
-    __tmp__L0XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__A0XD)->parent_linked_collection__LD.upper__5CD;
-    Self__0MNE= 1;
-    while ((Self__0MNE <= __tmp__L0XD)) {
-      if (((void *)item__Y0ND(lst__A0XD,Self__0MNE) == (void *)NULL)) {
-        append__BOS(buf__4ZXD,tok__3ZXD);
-      } else {
-        append__BOS(buf__4ZXD,item__Y0ND(lst__A0XD,Self__0MNE));
+  __INTEGER __tmp__Y0XD,Self__RBQE;
+  void *lst__I0XD;
+  lst__I0XD=NULL;
+  if (((void *)key__H0XD != (void *)NULL)) {
+    lst__I0XD=fast_reference_at__EHNE(short_dico__QD,key__H0XD);
+    if (((void *)lst__I0XD != (void *)NULL)) {
+      __tmp__Y0XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__I0XD)->parent_linked_collection__LD.upper__HDD;
+      Self__RBQE= 1;
+      while ((Self__RBQE <= __tmp__Y0XD)) {
+        if (((void *)item__A1ND(lst__I0XD,Self__RBQE) == (void *)NULL)) {
+          append__JOS(buf__G0XD,tok__F0XD);
+        } else {
+          append__JOS(buf__G0XD,item__A1ND(lst__I0XD,Self__RBQE));
+        };
+        Self__RBQE=(__INTEGER)(Self__RBQE +  1);
       };
-      Self__0MNE=(__INTEGER)(Self__0MNE +  1);
     };
   };
 }
 
-static void shorter_get_all_slot_in__E1XD(__PROTOTYPE *Self__F1XD,void *lst__G1XD)
+static void shorter_get_all_slot_in__T1XD(__PROTOTYPE *Self__U1XD,void *lst__V1XD)
 // ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
 {
-  void *ps__I1XD,*__tmp__G4XD;
-  void *p__J1XD;
-  __INTEGER i__K1XD,new_capacity__YWWE,__tmp__2XWE,__tmp__Q3OF;
-  __INTEGER Self__PY4F,i__NKJH,i__SKJH;
-  void *s__H1XD,*__tmp__U2XD,*__tmp__N3XD,*__tmp__GBYD;
-  void *__tmp__11XD,*__tmp__Z3XD;
-  void *__tmp__V2XD,*__tmp__W2XD,*__tmp__X4XD,*__tmp__B5XD,*__tmp__J5XD;
-  void *__tmp__QAYD,*__tmp__RAYD;
-  __SECTION_ *Self__BCFC;
-  void *__tmp__E4XD;
-  __STRING_CONSTANT *Self__PKJH,*Self__UKJH;
-  __BOOLEAN __tmp__A2XD,__tmp__Z2XD,__tmp__GXWE,__tmp__33XD,__tmp__DQKF;
-  __BOOLEAN __tmp__N5XD,result__MKJH,__tmp__O5XD,result__RKJH;
-  __BOOLEAN __tmp__R5XD;
-  __FAST_ARRAYoITM_SLOTo *Self__WWWE;
-  void **__tmp__1XWE,**new__22OF;
-  __CHARACTER __tmp__Q4XD;
-  ps__I1XD=NULL;
-  p__J1XD=NULL;
-  i__K1XD= 0;
-  s__H1XD=Self__F1XD->first_slot__CGZB;
-  while (((void *)s__H1XD != (void *)NULL)) {
-    if (is_short_private__31) {
-      __tmp__A2XD=TRUE__;
-    } else {
-      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-        __tmp__11XD=((__ITM_SLOT *)s__H1XD)->id_section__Y1C;
-      } else {
-        __tmp__11XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.id_section__Y1C;
-      };
-      __tmp__A2XD=((void *)((__SECTION_ *)__tmp__11XD)->name__CZDC != (void *)(&__string_26));
-    };
-    if (__tmp__A2XD) {
-      i__K1XD= 0;
-      while_do__Y1RE:
+  void *ps__X1XD,*__tmp__V4XD;
+  void *p__Y1XD;
+  __INTEGER i__Z1XD,new_capacity__1WWE,__tmp__5XWE,__tmp__UJPF;
+  __INTEGER Self__DQ5F,i__NMKH,i__SMKH;
+  void *s__W1XD,*__tmp__D3XD,*__tmp__23XD,*__tmp__VBYD;
+  void *__tmp__K2XD,*__tmp__I4XD;
+  void *__tmp__E3XD,*__tmp__F3XD,*__tmp__G5XD,*__tmp__Q5XD,*__tmp__Y5XD;
+  void *__tmp__5AYD,*__tmp__ABYD;
+  __SECTION_ *Self__JCFC;
+  void *__tmp__T4XD;
+  __STRING_CONSTANT *Self__PMKH,*Self__UMKH;
+  __BOOLEAN __tmp__P2XD,__tmp__I3XD,__tmp__JXWE,__tmp__M4XD,__tmp__F1KF;
+  __BOOLEAN __tmp__25XD,result__MMKH,__tmp__35XD,result__RMKH;
+  __BOOLEAN __tmp__AAYD;
+  __FAST_ARRAYoITM_SLOTo *Self__ZWWE;
+  void **__tmp__4XWE,**new__AJPF;
+  __CHARACTER __tmp__54XD;
+  ps__X1XD=NULL;
+  p__Y1XD=NULL;
+  i__Z1XD= 0;
+  s__W1XD=Self__U1XD->first_slot__KGZB;
+  while (((void *)s__W1XD != (void *)NULL)) {
+    if (is_short_private__D2) {
+      __tmp__P2XD=TRUE__;
+    } else {
+      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+        __tmp__K2XD=((__ITM_SLOT *)s__W1XD)->id_section__A2C;
+      } else {
+        __tmp__K2XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.id_section__A2C;
+      };
+      __tmp__P2XD=((void *)((__SECTION_ *)__tmp__K2XD)->name__KZDC != (void *)(&__string_26));
+    };
+    if (__tmp__P2XD) {
+      i__Z1XD= 0;
+      while_do__I1RE:
       {
-        if ((i__K1XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.upper__M2XD)) {
-          __tmp__U2XD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.storage__A4VE)[i__K1XD];
-          if (((struct ___OBJ *)__tmp__U2XD)->__id==__ITM_SLOT__) {
-            __tmp__V2XD=((__ITM_SLOT *)__tmp__U2XD)->parent_named__P5.name__LI;
+        if ((i__Z1XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__V1XD)->parent_arrayed_collection__GKTD.upper__12XD)) {
+          __tmp__D3XD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__V1XD)->parent_arrayed_collection__GKTD.storage__D4VE)[i__Z1XD];
+          if (((struct ___OBJ *)__tmp__D3XD)->__id==__ITM_SLOT__) {
+            __tmp__E3XD=((__ITM_SLOT *)__tmp__D3XD)->parent_named__V5.name__LI;
           } else {
-            __tmp__V2XD=((__ITM_SLOT_OPERATOR *)__tmp__U2XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__E3XD=((__ITM_SLOT_OPERATOR *)__tmp__D3XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-            __tmp__W2XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.name__LI;
+          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+            __tmp__F3XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
           } else {
-            __tmp__W2XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__F3XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          __tmp__Z2XD=((void *)__tmp__V2XD != (void *)__tmp__W2XD);
+          __tmp__I3XD=((void *)__tmp__E3XD != (void *)__tmp__F3XD);
         } else {
-          __tmp__Z2XD=FALSE__;
+          __tmp__I3XD=FALSE__;
         };
-        if (__tmp__Z2XD) {
-          i__K1XD=(__INTEGER)(i__K1XD +  1);
-          goto while_do__Y1RE;
+        if (__tmp__I3XD) {
+          i__Z1XD=(__INTEGER)(i__Z1XD +  1);
+          goto while_do__I1RE;
         };
       };
-      if ((i__K1XD > ((__FAST_ARRAYoITM_SLOTo *)lst__G1XD)->parent_arrayed_collection__4JTD.upper__M2XD)) {
-        Self__WWWE=((__FAST_ARRAYoITM_SLOTo *)lst__G1XD);
-        new_capacity__YWWE= 0;
-        if (((__INTEGER)(Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD +  1) <= (__INTEGER)(Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE -  1))) {
-          Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD=(__INTEGER)(Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD +  1);
-          __tmp__GXWE=TRUE__;
+      if ((i__Z1XD > ((__FAST_ARRAYoITM_SLOTo *)lst__V1XD)->parent_arrayed_collection__GKTD.upper__12XD)) {
+        Self__ZWWE=((__FAST_ARRAYoITM_SLOTo *)lst__V1XD);
+        new_capacity__1WWE= 0;
+        if (((__INTEGER)(Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD +  1) <= (__INTEGER)(Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE -  1))) {
+          Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD=(__INTEGER)(Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD +  1);
+          __tmp__JXWE=TRUE__;
         } else {
-          __tmp__GXWE=FALSE__;
+          __tmp__JXWE=FALSE__;
         };
-        if ((! __tmp__GXWE)) {
-          if ((Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE ==  0)) {
-            Self__WWWE->parent_arrayed_collection__4JTD.storage__A4VE=create__ILEF( 2);
-            Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE= 2;
-            Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD= 0;
+        if ((! __tmp__JXWE)) {
+          if ((Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE ==  0)) {
+            Self__ZWWE->parent_arrayed_collection__GKTD.storage__D4VE=create__UVEF( 2);
+            Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE= 2;
+            Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD= 0;
           } else {
-            new_capacity__YWWE=(__INTEGER)(Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE <<  1);
-            __tmp__1XWE=Self__WWWE->parent_arrayed_collection__4JTD.storage__A4VE;
-            __tmp__2XWE=Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE;
-            new__22OF=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__1XWE)),((__UINTEGER_32 )(__INTEGER)(__tmp__2XWE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__YWWE * ((__INTEGER )(sizeof(void *)))))));
-            __tmp__Q3OF=(__INTEGER)(new_capacity__YWWE -  1);
-            Self__PY4F=__tmp__2XWE;
-            while ((Self__PY4F <= __tmp__Q3OF)) {
-              new__22OF[Self__PY4F]=NULL;
-              Self__PY4F=(__INTEGER)(Self__PY4F +  1);
+            new_capacity__1WWE=(__INTEGER)(Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE <<  1);
+            __tmp__4XWE=Self__ZWWE->parent_arrayed_collection__GKTD.storage__D4VE;
+            __tmp__5XWE=Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE;
+            new__AJPF=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__4XWE)),((__UINTEGER_32 )(__INTEGER)(__tmp__5XWE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__1WWE * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__UJPF=(__INTEGER)(new_capacity__1WWE -  1);
+            Self__DQ5F=__tmp__5XWE;
+            while ((Self__DQ5F <= __tmp__UJPF)) {
+              new__AJPF[Self__DQ5F]=NULL;
+              Self__DQ5F=(__INTEGER)(Self__DQ5F +  1);
             };
-            Self__WWWE->parent_arrayed_collection__4JTD.storage__A4VE=new__22OF;
-            Self__WWWE->parent_arrayed_collection__4JTD.capacity__GRVE=new_capacity__YWWE;
-            Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD=(__INTEGER)(Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD +  1);
+            Self__ZWWE->parent_arrayed_collection__GKTD.storage__D4VE=new__AJPF;
+            Self__ZWWE->parent_arrayed_collection__GKTD.capacity__JRVE=new_capacity__1WWE;
+            Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD=(__INTEGER)(Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD +  1);
           };
         };
-        ((void **)Self__WWWE->parent_arrayed_collection__4JTD.storage__A4VE)[Self__WWWE->parent_arrayed_collection__4JTD.upper__M2XD]=s__H1XD;
+        ((void **)Self__ZWWE->parent_arrayed_collection__GKTD.storage__D4VE)[Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD]=s__W1XD;
       };
     };
-    if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-      __tmp__N3XD=((__ITM_SLOT *)s__H1XD)->next__OHHC;
+    if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+      __tmp__23XD=((__ITM_SLOT *)s__W1XD)->next__WHHC;
     } else {
-      __tmp__N3XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.next__OHHC;
+      __tmp__23XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.next__WHHC;
     };
-    s__H1XD=__tmp__N3XD;
+    s__W1XD=__tmp__23XD;
   };
-  s__H1XD=Self__F1XD->first_slot__CGZB;
-  while_do__2D5D:
+  s__W1XD=Self__U1XD->first_slot__KGZB;
+  while_do__ZB5D:
   {
-    if (((void *)s__H1XD != (void *)NULL)) {
-      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-        __tmp__Z3XD=((__ITM_SLOT *)s__H1XD)->id_section__Y1C;
+    if (((void *)s__W1XD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+        __tmp__I4XD=((__ITM_SLOT *)s__W1XD)->id_section__A2C;
       } else {
-        __tmp__Z3XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.id_section__Y1C;
+        __tmp__I4XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.id_section__A2C;
       };
-      Self__BCFC=((__SECTION_ *)__tmp__Z3XD);
-      __tmp__33XD=(((void *)Self__BCFC->name__CZDC == (void *)(&__string_23)) || ((void *)Self__BCFC->name__CZDC == (void *)(&__string_24)));
+      Self__JCFC=((__SECTION_ *)__tmp__I4XD);
+      __tmp__M4XD=(((void *)Self__JCFC->name__KZDC == (void *)(&__string_23)) || ((void *)Self__JCFC->name__KZDC == (void *)(&__string_24)));
     } else {
-      __tmp__33XD=FALSE__;
+      __tmp__M4XD=FALSE__;
     };
-    if (__tmp__33XD) {
-      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-        __tmp__E4XD=((__ITM_SLOT *)s__H1XD)->result_type__04FC;
+    if (__tmp__M4XD) {
+      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+        __tmp__T4XD=((__ITM_SLOT *)s__W1XD)->result_type__C5FC;
       } else {
-        __tmp__E4XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.result_type__04FC;
+        __tmp__T4XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.result_type__C5FC;
       };
-      if (__tmp__E4XD==NULL) {
-        __tmp__G4XD=NULL;
+      if (__tmp__T4XD==NULL) {
+        __tmp__V4XD=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__E4XD)->__id) {
+        switch (((struct ___OBJ *)__tmp__T4XD)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__G4XD=((void *)__tmp__E4XD);
+          __tmp__V4XD=((void *)__tmp__T4XD);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__G4XD=((void *)__tmp__E4XD);
+          __tmp__V4XD=((void *)__tmp__T4XD);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__G4XD=NULL;
+          __tmp__V4XD=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__G4XD=NULL;
+          __tmp__V4XD=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__G4XD=((void *)__tmp__E4XD);
+          __tmp__V4XD=((void *)__tmp__T4XD);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__G4XD=((void *)__tmp__E4XD);
+          __tmp__V4XD=((void *)__tmp__T4XD);
         } break;
         }
       };
-      ps__I1XD=__tmp__G4XD;
-      if (((void *)__tmp__G4XD != (void *)NULL)) {
-        if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-          __tmp__Q4XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.style__BEU;
+      ps__X1XD=__tmp__V4XD;
+      if (((void *)__tmp__V4XD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+          __tmp__54XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.style__JEU;
         } else {
-          __tmp__Q4XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.style__BEU;
+          __tmp__54XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
         };
-        if ((__tmp__Q4XD == '+')) {
-          switch (((struct ___OBJ *)__tmp__G4XD)->__id) {
+        if ((__tmp__54XD == '+')) {
+          switch (((struct ___OBJ *)__tmp__V4XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__X4XD=NULL;
+            __tmp__G5XD=NULL;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__X4XD=NULL;
+            __tmp__G5XD=NULL;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__X4XD=((__ITM_TYPE_GENERIC *)__tmp__G4XD)->parent_itm_type_style__CSN.style__TYP;
+            __tmp__G5XD=((__ITM_TYPE_GENERIC *)__tmp__V4XD)->parent_itm_type_style__KSN.style__1YP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__X4XD=((__ITM_TYPE_STYLE *)__tmp__G4XD)->style__TYP;
+            __tmp__G5XD=((__ITM_TYPE_STYLE *)__tmp__V4XD)->style__1YP;
           } break;
           };
-          __tmp__DQKF=((void *)__tmp__X4XD == (void *)(&__string_9));
+          __tmp__F1KF=((void *)__tmp__G5XD == (void *)(&__string_9));
         } else {
-          __tmp__DQKF=FALSE__;
+          __tmp__F1KF=FALSE__;
         };
-        if (__tmp__DQKF) {
-          __tmp__N5XD=TRUE__;
+        if (__tmp__F1KF) {
+          __tmp__25XD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-            __tmp__B5XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.name__LI;
+          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+            __tmp__Q5XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
           } else {
-            __tmp__B5XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          Self__PKJH=((__STRING_CONSTANT *)__tmp__B5XD);
-          result__MKJH=FALSE__;
-          i__NKJH= 0;
-          if ((((__STRING_CONSTANT *)(&__string_171))->count__DD <= Self__PKJH->count__DD)) {
-            i__NKJH=((__STRING_CONSTANT *)(&__string_171))->count__DD;
-            while ((! ((i__NKJH ==  0) || (((__CHARACTER *)Self__PKJH->storage__VQO)[(__INTEGER)(i__NKJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_171))->storage__VQO)[(__INTEGER)(i__NKJH -  1)])))) {
-              i__NKJH=(__INTEGER)(i__NKJH -  1);
+          Self__PMKH=((__STRING_CONSTANT *)__tmp__Q5XD);
+          result__MMKH=FALSE__;
+          i__NMKH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_173))->count__DD <= Self__PMKH->count__DD)) {
+            i__NMKH=((__STRING_CONSTANT *)(&__string_173))->count__DD;
+            while ((! ((i__NMKH ==  0) || (((__CHARACTER *)Self__PMKH->storage__3QO)[(__INTEGER)(i__NMKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_173))->storage__3QO)[(__INTEGER)(i__NMKH -  1)])))) {
+              i__NMKH=(__INTEGER)(i__NMKH -  1);
             };
-            result__MKJH=(i__NKJH ==  0);
+            result__MMKH=(i__NMKH ==  0);
           };
-          __tmp__N5XD=result__MKJH;
+          __tmp__25XD=result__MMKH;
         };
-        if (__tmp__N5XD) {
-          __tmp__O5XD=TRUE__;
+        if (__tmp__25XD) {
+          __tmp__35XD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-            __tmp__J5XD=((__ITM_SLOT *)s__H1XD)->parent_named__P5.name__LI;
+          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+            __tmp__Y5XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
           } else {
-            __tmp__J5XD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.parent_named__P5.name__LI;
+            __tmp__Y5XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
           };
-          Self__UKJH=((__STRING_CONSTANT *)__tmp__J5XD);
-          result__RKJH=FALSE__;
-          i__SKJH= 0;
-          if ((((__STRING_CONSTANT *)(&__string_172))->count__DD <= Self__UKJH->count__DD)) {
-            i__SKJH=((__STRING_CONSTANT *)(&__string_172))->count__DD;
-            while ((! ((i__SKJH ==  0) || (((__CHARACTER *)Self__UKJH->storage__VQO)[(__INTEGER)(i__SKJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_172))->storage__VQO)[(__INTEGER)(i__SKJH -  1)])))) {
-              i__SKJH=(__INTEGER)(i__SKJH -  1);
+          Self__UMKH=((__STRING_CONSTANT *)__tmp__Y5XD);
+          result__RMKH=FALSE__;
+          i__SMKH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_174))->count__DD <= Self__UMKH->count__DD)) {
+            i__SMKH=((__STRING_CONSTANT *)(&__string_174))->count__DD;
+            while ((! ((i__SMKH ==  0) || (((__CHARACTER *)Self__UMKH->storage__3QO)[(__INTEGER)(i__SMKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_174))->storage__3QO)[(__INTEGER)(i__SMKH -  1)])))) {
+              i__SMKH=(__INTEGER)(i__SMKH -  1);
             };
-            result__RKJH=(i__SKJH ==  0);
+            result__RMKH=(i__SMKH ==  0);
           };
-          __tmp__O5XD=result__RKJH;
+          __tmp__35XD=result__RMKH;
         };
-        __tmp__R5XD=__tmp__O5XD;
+        __tmp__AAYD=__tmp__35XD;
       } else {
-        __tmp__R5XD=FALSE__;
+        __tmp__AAYD=FALSE__;
       };
-      if (__tmp__R5XD) {
-        p__J1XD=NULL;
-        i__K1XD= 0;
-        while (((i__K1XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__J1XD == (void *)NULL))) {
-          __tmp__QAYD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__K1XD])->parent_named__5.name__LI;
-          switch (((struct ___OBJ *)ps__I1XD)->__id) {
+      if (__tmp__AAYD) {
+        p__Y1XD=NULL;
+        i__Z1XD= 0;
+        while (((i__Z1XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__Y1XD == (void *)NULL))) {
+          __tmp__5AYD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__Z1XD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__X1XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__RAYD=((__ITM_TYPE_PARAMETER *)ps__I1XD)->parent_itm_type__3DE.name__KYP;
+            __tmp__ABYD=((__ITM_TYPE_PARAMETER *)ps__X1XD)->parent_itm_type__FEE.name__SYP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__RAYD=((__ITM_TYPE_SIMPLE *)ps__I1XD)->name__KYP;
+            __tmp__ABYD=((__ITM_TYPE_SIMPLE *)ps__X1XD)->name__SYP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__RAYD=((__ITM_TYPE_GENERIC *)ps__I1XD)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP;
+            __tmp__ABYD=((__ITM_TYPE_GENERIC *)ps__X1XD)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__RAYD=((__ITM_TYPE_STYLE *)ps__I1XD)->parent_itm_type_simple__BSN.name__KYP;
+            __tmp__ABYD=((__ITM_TYPE_STYLE *)ps__X1XD)->parent_itm_type_simple__JSN.name__SYP;
           } break;
           };
-          if (((void *)__tmp__QAYD == (void *)__tmp__RAYD)) {
-            p__J1XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__K1XD];
+          if (((void *)__tmp__5AYD == (void *)__tmp__ABYD)) {
+            p__Y1XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__Z1XD];
           };
-          i__K1XD=(__INTEGER)(i__K1XD +  1);
+          i__Z1XD=(__INTEGER)(i__Z1XD +  1);
         };
-        if (((void *)p__J1XD != (void *)NULL)) {
-          shorter_get_all_slot_in__E1XD(p__J1XD,lst__G1XD);
+        if (((void *)p__Y1XD != (void *)NULL)) {
+          shorter_get_all_slot_in__T1XD(p__Y1XD,lst__V1XD);
         };
       };
-      if (((struct ___OBJ *)s__H1XD)->__id==__ITM_SLOT__) {
-        __tmp__GBYD=((__ITM_SLOT *)s__H1XD)->next__OHHC;
+      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
+        __tmp__VBYD=((__ITM_SLOT *)s__W1XD)->next__WHHC;
       } else {
-        __tmp__GBYD=((__ITM_SLOT_OPERATOR *)s__H1XD)->parent_itm_slot__OU5B.next__OHHC;
+        __tmp__VBYD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.next__WHHC;
       };
-      s__H1XD=__tmp__GBYD;
-      goto while_do__2D5D;
+      s__W1XD=__tmp__VBYD;
+      goto while_do__ZB5D;
     };
   };
 }
 
-static void pretty_name_in__AJ3F(__ITM_SLOT *Self__BJ3F,void *buffer__CJ3F)
+static void pretty_name_in__DA4F(__ITM_SLOT *Self__EA4F,void *buffer__FA4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__DJ3F;
-  __STRING_CONSTANT *Self__ZDEH;
-  j__DJ3F= 1;
-  while ((j__DJ3F < ((__STRING_CONSTANT *)Self__BJ3F->parent_named__P5.name__LI)->count__DD)) {
-    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__BJ3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__DJ3F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__BJ3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)((__INTEGER)(j__DJ3F +  1) -  1)] == '_'))) {
-      add_last__ZLT(buffer__CJ3F,' ');
-      j__DJ3F=(__INTEGER)(j__DJ3F +  2);
+  __INTEGER j__GA4F;
+  __STRING_CONSTANT *Self__BFFH;
+  j__GA4F= 1;
+  while ((j__GA4F < ((__STRING_CONSTANT *)Self__EA4F->parent_named__V5.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__EA4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)(j__GA4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__EA4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)((__INTEGER)(j__GA4F +  1) -  1)] == '_'))) {
+      add_last__BMT(buffer__FA4F,' ');
+      j__GA4F=(__INTEGER)(j__GA4F +  2);
     } else {
-      add_last__ZLT(buffer__CJ3F,((__CHARACTER *)((__STRING_CONSTANT *)Self__BJ3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__DJ3F -  1)]);
-      j__DJ3F=(__INTEGER)(j__DJ3F +  1);
+      add_last__BMT(buffer__FA4F,((__CHARACTER *)((__STRING_CONSTANT *)Self__EA4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)(j__GA4F -  1)]);
+      j__GA4F=(__INTEGER)(j__GA4F +  1);
     };
   };
-  Self__ZDEH=((__STRING_CONSTANT *)Self__BJ3F->parent_named__P5.name__LI);
-  add_last__ZLT(buffer__CJ3F,((__CHARACTER *)Self__ZDEH->storage__VQO)[(__INTEGER)(Self__ZDEH->count__DD -  1)]);
+  Self__BFFH=((__STRING_CONSTANT *)Self__EA4F->parent_named__V5.name__LI);
+  add_last__BMT(buffer__FA4F,((__CHARACTER *)Self__BFFH->storage__3QO)[(__INTEGER)(Self__BFFH->count__DD -  1)]);
 }
 
-static void pretty_name_in__VK3F(__ITM_SLOT_OPERATOR *Self__WK3F,void *buffer__XK3F)
+static void pretty_name_in__YB4F(__ITM_SLOT_OPERATOR *Self__ZB4F,void *buffer__0B4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__ZKJH,*Self__DRSF;
-  __INTEGER i__XKJH,i__HRSF;
-  __BOOLEAN result__WKJH,__tmp__CL3F,result__GRSF;
-  Self__ZKJH=((__STRING_CONSTANT *)Self__WK3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
-  result__WKJH=FALSE__;
-  i__XKJH= 0;
-  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__ZKJH->count__DD)) {
-    i__XKJH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
-    while ((! ((i__XKJH ==  0) || (((__CHARACTER *)Self__ZKJH->storage__VQO)[(__INTEGER)(i__XKJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__VQO)[(__INTEGER)(i__XKJH -  1)])))) {
-      i__XKJH=(__INTEGER)(i__XKJH -  1);
-    };
-    result__WKJH=(i__XKJH ==  0);
-  };
-  if (result__WKJH) {
-    append__BOS(buffer__XK3F,(&__string_245));
-    __tmp__CL3F=TRUE__;
+  __STRING_CONSTANT *Self__ZMKH,*Self__H3SF;
+  __INTEGER i__XMKH,i__L3SF;
+  __BOOLEAN result__WMKH,__tmp__FC4F,result__K3SF;
+  Self__ZMKH=((__STRING_CONSTANT *)Self__ZB4F->parent_itm_slot__WU5B.parent_named__V5.name__LI);
+  result__WMKH=FALSE__;
+  i__XMKH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__ZMKH->count__DD)) {
+    i__XMKH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__XMKH ==  0) || (((__CHARACTER *)Self__ZMKH->storage__3QO)[(__INTEGER)(i__XMKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__3QO)[(__INTEGER)(i__XMKH -  1)])))) {
+      i__XMKH=(__INTEGER)(i__XMKH -  1);
+    };
+    result__WMKH=(i__XMKH ==  0);
+  };
+  if (result__WMKH) {
+    append__JOS(buffer__0B4F,(&__string_243));
+    __tmp__FC4F=TRUE__;
   } else {
-    __tmp__CL3F=FALSE__;
+    __tmp__FC4F=FALSE__;
   };
-  if ((! __tmp__CL3F)) {
-    Self__DRSF=((__STRING_CONSTANT *)Self__WK3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
-    result__GRSF=FALSE__;
-    i__HRSF= 0;
-    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__DRSF->count__DD)) {
-      i__HRSF=((__STRING_CONSTANT *)(&__string_81))->count__DD;
-      while ((! ((i__HRSF ==  0) || (((__CHARACTER *)Self__DRSF->storage__VQO)[(__INTEGER)(i__HRSF -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__VQO)[(__INTEGER)(i__HRSF -  1)])))) {
-        i__HRSF=(__INTEGER)(i__HRSF -  1);
+  if ((! __tmp__FC4F)) {
+    Self__H3SF=((__STRING_CONSTANT *)Self__ZB4F->parent_itm_slot__WU5B.parent_named__V5.name__LI);
+    result__K3SF=FALSE__;
+    i__L3SF= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__H3SF->count__DD)) {
+      i__L3SF=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__L3SF ==  0) || (((__CHARACTER *)Self__H3SF->storage__3QO)[(__INTEGER)(i__L3SF -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__3QO)[(__INTEGER)(i__L3SF -  1)])))) {
+        i__L3SF=(__INTEGER)(i__L3SF -  1);
       };
-      result__GRSF=(i__HRSF ==  0);
+      result__K3SF=(i__L3SF ==  0);
     };
-    if (result__GRSF) {
-      append__BOS(buffer__XK3F,(&__string_246));
+    if (result__K3SF) {
+      append__JOS(buffer__0B4F,(&__string_244));
     } else {
-      append__BOS(buffer__XK3F,(&__string_247));
+      append__JOS(buffer__0B4F,(&__string_245));
     };
   };
-  append__BOS(buffer__XK3F,Self__WK3F->pretty_name__V0HC);
-  add_last__ZLT(buffer__XK3F,'\'');
+  append__JOS(buffer__0B4F,Self__ZB4F->pretty_name__30HC);
+  add_last__BMT(buffer__0B4F,'\'');
 }
 
-static void get_all_comment_slot__in__302E(__PROTOTYPE *Self__402E,void *n__502E,void *buf__A12E)
+static void get_all_comment_slot__in__A12E(__PROTOTYPE *Self__B12E,void *n__C12E,void *buf__D12E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *ps__C12E,*__tmp__Q22E;
-  void *p__D12E;
-  __INTEGER i__E12E;
-  void *s__B12E,*__tmp__F42E;
-  void *__tmp__M12E,*__tmp__V12E,*__tmp__P32E,*__tmp__Q32E;
-  void *__tmp__D22E;
-  __SECTION_ *Self__EH0G;
-  void *__tmp__O22E;
-  __BOOLEAN __tmp__P12E,__tmp__H22E;
-  ps__C12E=NULL;
-  p__D12E=NULL;
-  i__E12E= 0;
-  s__B12E=fast_reference_at__QAGC(Self__402E->slot_list__2US,n__502E);
-  if (((void *)s__B12E != (void *)NULL)) {
-    if (((struct ___OBJ *)s__B12E)->__id==__ITM_SLOT__) {
-      __tmp__M12E=((__ITM_SLOT *)s__B12E)->comment__WJJD;
-    } else {
-      __tmp__M12E=((__ITM_SLOT_OPERATOR *)s__B12E)->parent_itm_slot__OU5B.comment__WJJD;
-    };
-    __tmp__P12E=((void *)__tmp__M12E != (void *)NULL);
+  void *ps__F12E,*__tmp__T22E;
+  void *p__G12E;
+  __INTEGER i__H12E;
+  void *s__E12E,*__tmp__I42E;
+  void *__tmp__P12E,*__tmp__Y12E,*__tmp__S32E,*__tmp__T32E;
+  void *__tmp__G22E;
+  __SECTION_ *Self__NE1G;
+  void *__tmp__R22E;
+  __BOOLEAN __tmp__S12E,__tmp__K22E;
+  ps__F12E=NULL;
+  p__G12E=NULL;
+  i__H12E= 0;
+  s__E12E=fast_reference_at__YAGC(Self__B12E->slot_list__EVS,n__C12E);
+  if (((void *)s__E12E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
+      __tmp__P12E=((__ITM_SLOT *)s__E12E)->comment__4JJD;
+    } else {
+      __tmp__P12E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.comment__4JJD;
+    };
+    __tmp__S12E=((void *)__tmp__P12E != (void *)NULL);
   } else {
-    __tmp__P12E=FALSE__;
+    __tmp__S12E=FALSE__;
   };
-  if (__tmp__P12E) {
-    if (((struct ___OBJ *)s__B12E)->__id==__ITM_SLOT__) {
-      __tmp__V12E=((__ITM_SLOT *)s__B12E)->comment__WJJD;
+  if (__tmp__S12E) {
+    if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
+      __tmp__Y12E=((__ITM_SLOT *)s__E12E)->comment__4JJD;
     } else {
-      __tmp__V12E=((__ITM_SLOT_OPERATOR *)s__B12E)->parent_itm_slot__OU5B.comment__WJJD;
+      __tmp__Y12E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.comment__4JJD;
     };
-    append__BOS(buf__A12E,__tmp__V12E);
+    append__JOS(buf__D12E,__tmp__Y12E);
   };
-  s__B12E=Self__402E->first_slot__CGZB;
-  while_do__0WEF:
+  s__E12E=Self__B12E->first_slot__KGZB;
+  while_do__GBFF:
   {
-    if (((void *)s__B12E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__B12E)->__id==__ITM_SLOT__) {
-        __tmp__D22E=((__ITM_SLOT *)s__B12E)->id_section__Y1C;
+    if (((void *)s__E12E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
+        __tmp__G22E=((__ITM_SLOT *)s__E12E)->id_section__A2C;
       } else {
-        __tmp__D22E=((__ITM_SLOT_OPERATOR *)s__B12E)->parent_itm_slot__OU5B.id_section__Y1C;
+        __tmp__G22E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.id_section__A2C;
       };
-      Self__EH0G=((__SECTION_ *)__tmp__D22E);
-      __tmp__H22E=(((void *)Self__EH0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__EH0G->name__CZDC == (void *)(&__string_24)));
+      Self__NE1G=((__SECTION_ *)__tmp__G22E);
+      __tmp__K22E=(((void *)Self__NE1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__NE1G->name__KZDC == (void *)(&__string_24)));
     } else {
-      __tmp__H22E=FALSE__;
+      __tmp__K22E=FALSE__;
     };
-    if (__tmp__H22E) {
-      if (((struct ___OBJ *)s__B12E)->__id==__ITM_SLOT__) {
-        __tmp__O22E=((__ITM_SLOT *)s__B12E)->result_type__04FC;
+    if (__tmp__K22E) {
+      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
+        __tmp__R22E=((__ITM_SLOT *)s__E12E)->result_type__C5FC;
       } else {
-        __tmp__O22E=((__ITM_SLOT_OPERATOR *)s__B12E)->parent_itm_slot__OU5B.result_type__04FC;
+        __tmp__R22E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.result_type__C5FC;
       };
-      if (__tmp__O22E==NULL) {
-        __tmp__Q22E=NULL;
+      if (__tmp__R22E==NULL) {
+        __tmp__T22E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__O22E)->__id) {
+        switch (((struct ___OBJ *)__tmp__R22E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__Q22E=((void *)__tmp__O22E);
+          __tmp__T22E=((void *)__tmp__R22E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__Q22E=((void *)__tmp__O22E);
+          __tmp__T22E=((void *)__tmp__R22E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__Q22E=NULL;
+          __tmp__T22E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__Q22E=NULL;
+          __tmp__T22E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__Q22E=((void *)__tmp__O22E);
+          __tmp__T22E=((void *)__tmp__R22E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__Q22E=((void *)__tmp__O22E);
+          __tmp__T22E=((void *)__tmp__R22E);
         } break;
         }
       };
-      ps__C12E=__tmp__Q22E;
-      if (((void *)__tmp__Q22E != (void *)NULL)) {
-        p__D12E=NULL;
-        i__E12E= 0;
-        while (((i__E12E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__D12E == (void *)NULL))) {
-          __tmp__P32E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__E12E])->parent_named__5.name__LI;
-          switch (((struct ___OBJ *)ps__C12E)->__id) {
+      ps__F12E=__tmp__T22E;
+      if (((void *)__tmp__T22E != (void *)NULL)) {
+        p__G12E=NULL;
+        i__H12E= 0;
+        while (((i__H12E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__G12E == (void *)NULL))) {
+          __tmp__S32E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__H12E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__F12E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__Q32E=((__ITM_TYPE_PARAMETER *)ps__C12E)->parent_itm_type__3DE.name__KYP;
+            __tmp__T32E=((__ITM_TYPE_PARAMETER *)ps__F12E)->parent_itm_type__FEE.name__SYP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__Q32E=((__ITM_TYPE_SIMPLE *)ps__C12E)->name__KYP;
+            __tmp__T32E=((__ITM_TYPE_SIMPLE *)ps__F12E)->name__SYP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__Q32E=((__ITM_TYPE_GENERIC *)ps__C12E)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP;
+            __tmp__T32E=((__ITM_TYPE_GENERIC *)ps__F12E)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__Q32E=((__ITM_TYPE_STYLE *)ps__C12E)->parent_itm_type_simple__BSN.name__KYP;
+            __tmp__T32E=((__ITM_TYPE_STYLE *)ps__F12E)->parent_itm_type_simple__JSN.name__SYP;
           } break;
           };
-          if (((void *)__tmp__P32E == (void *)__tmp__Q32E)) {
-            p__D12E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__KTT)[i__E12E];
+          if (((void *)__tmp__S32E == (void *)__tmp__T32E)) {
+            p__G12E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__H12E];
           };
-          i__E12E=(__INTEGER)(i__E12E +  1);
+          i__H12E=(__INTEGER)(i__H12E +  1);
         };
-        if (((void *)p__D12E != (void *)NULL)) {
-          get_all_comment_slot__in__302E(p__D12E,n__502E,buf__A12E);
+        if (((void *)p__G12E != (void *)NULL)) {
+          get_all_comment_slot__in__A12E(p__G12E,n__C12E,buf__D12E);
         };
       };
-      if (((struct ___OBJ *)s__B12E)->__id==__ITM_SLOT__) {
-        __tmp__F42E=((__ITM_SLOT *)s__B12E)->next__OHHC;
+      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
+        __tmp__I42E=((__ITM_SLOT *)s__E12E)->next__WHHC;
       } else {
-        __tmp__F42E=((__ITM_SLOT_OPERATOR *)s__B12E)->parent_itm_slot__OU5B.next__OHHC;
+        __tmp__I42E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.next__WHHC;
       };
-      s__B12E=__tmp__F42E;
-      goto while_do__0WEF;
+      s__E12E=__tmp__I42E;
+      goto while_do__GBFF;
     };
   };
 }
 
-static void append_in__OIH(__UINTEGER_32 Self__PIH,void *buffer__QIH)
+static void shorter_comment__in__light__V42E(void *str__X42E,void *buf__Y42E,__BOOLEAN is_light__Z42E)
+// ({NULLxSTRING},{NULLxSTRING},{TRUExFALSE}) VoidNo recursive, No inlinable.
+{
+  __INTEGER stat__142E,old_stat__242E,i__442E,cur__042E,__tmp__S52E;
+  __INTEGER __tmp__QHHH,Self__SHHH,i__I1YB;
+  void *code_balise__A52E;
+  __STRING *Self__OHHH,*Self__RFFH,*Self__FURE;
+  void *__tmp__HF3E;
+  __CHARACTER car__342E,result__NFFH,result__E31F,Self__4JOB;
+  __CHARACTER result__AKOB;
+  __BOOLEAN __tmp__ZA3E,__tmp__4B3E,__tmp__WC3E,__tmp__NC3E;
+  __BOOLEAN result__IURE,__tmp__QF3E,__tmp__QH3E;
+  __CHARACTER *__tmp__PHHH,*Self__RHHH,*Self__EMDH,*Self__U0YB;
+  __CHARACTER *other__V0YB;
+  stat__142E= 0;
+  old_stat__242E= 0;
+  car__342E='\0';
+  i__442E= 0;
+  cur__042E= 1;
+  ((__STRING *)str_tmp__C52E)->count__4FC= 0;
+  code_balise__A52E=(&__string_128);
+  while ((cur__042E <= ((__STRING *)str__X42E)->count__4FC)) {
+    car__342E=((__CHARACTER *)((__STRING *)str__X42E)->storage__JCS)[(__INTEGER)(cur__042E -  1)];
+    __tmp__S52E=stat__142E;
+    if ((stat__142E ==  0)) {
+      if ((car__342E == '*')) {
+        if ((((__STRING *)str_tmp__C52E)->count__4FC >  1)) {
+          if (is_light__Z42E) {
+            append__JOS(buf__Y42E,str_tmp__C52E);
+            cur__042E=(__INTEGER)(((__STRING *)str__X42E)->count__4FC +  1);
+          } else {
+            put__to__like__D0XD((&__string_246),buf__Y42E,(&__string_146));
+            put__to__like__D0XD(str_tmp__C52E,buf__Y42E,code_balise__A52E);
+          };
+        };
+        ((__STRING *)str_tmp__C52E)->count__4FC= 0;
+        stat__142E= 1;
+        __tmp__ZA3E=TRUE__;
+      } else {
+        __tmp__ZA3E=FALSE__;
+      };
+      if ((! __tmp__ZA3E)) {
+        if ((car__342E == '`')) {
+          old_stat__242E=stat__142E;
+          stat__142E= 2;
+          ((__STRING *)str_tmp2__EB3E)->count__4FC= 0;
+        } else {
+          add_last__BMT(str_tmp__C52E,car__342E);
+        };
+      };
+    };
+    if ((__tmp__S52E ==  1)) {
+      result__NFFH='\0';
+      if (((((__INTEGER_8 )car__342E) <  65) || (((__INTEGER_8 )car__342E) >  90))) {
+        result__NFFH=car__342E;
+      } else {
+        result__NFFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__342E) +  32))));
+      };
+      if (((((__INTEGER_8 )result__NFFH) >= ((__INTEGER_8 )'a')) && (((__INTEGER_8 )result__NFFH) <= ((__INTEGER_8 )'z')))) {
+        result__E31F='\0';
+        if (((((__INTEGER_8 )car__342E) <  65) || (((__INTEGER_8 )car__342E) >  90))) {
+          result__E31F=car__342E;
+        } else {
+          result__E31F=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__342E) +  32))));
+        };
+        add_last__BMT(str_tmp__C52E,result__E31F);
+        __tmp__4B3E=TRUE__;
+      } else {
+        __tmp__4B3E=FALSE__;
+      };
+      if (__tmp__4B3E) {
+        __tmp__WC3E=TRUE__;
+      } else {
+        __tmp__NC3E=((car__342E == ' ') && (((__STRING *)str_tmp__C52E)->count__4FC !=  0));
+        if (__tmp__NC3E) {
+          add_last__BMT(str_tmp__C52E,'_');
+        };
+        __tmp__WC3E=__tmp__NC3E;
+      };
+      if ((! __tmp__WC3E)) {
+        if ((car__342E == ':')) {
+          if ((((__STRING *)str_tmp__C52E)->count__4FC !=  0)) {
+            code_balise__A52E=get__QWB(str_tmp__C52E);
+            if (((void *)fast_reference_at__EHNE(short_dico__QD,code_balise__A52E) == (void *)NULL)) {
+              code_balise__A52E=NULL;
+            } else {
+              Self__OHHH=((__STRING *)str_tmp__C52E);
+              __tmp__PHHH=Self__OHHH->storage__JCS;
+              __tmp__QHHH=(__INTEGER)(Self__OHHH->count__4FC -  1);
+              Self__RHHH=((__CHARACTER *)__tmp__PHHH);
+              Self__SHHH=__tmp__QHHH;
+              while ((Self__SHHH >=  0)) {
+                if (('_' == Self__RHHH[Self__SHHH])) {
+                  Self__RHHH[Self__SHHH]=' ';
+                };
+                Self__SHHH=(__INTEGER)(Self__SHHH -  1);
+              };
+              add_last__BMT(str_tmp__C52E,':');
+              Self__EMDH=((__CHARACTER *)((__STRING *)str_tmp__C52E)->storage__JCS);
+              Self__RFFH=((__STRING *)str_tmp__C52E);
+              Self__4JOB=Self__EMDH[ 0];
+              result__AKOB='\0';
+              if (((((__INTEGER_8 )Self__4JOB) <  97) || (((__INTEGER_8 )Self__4JOB) >  122))) {
+                result__AKOB=Self__4JOB;
+              } else {
+                result__AKOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__4JOB) -  32))));
+              };
+              ((__CHARACTER *)Self__RFFH->storage__JCS)[ 0]=result__AKOB;
+              put__to__like__D0XD(str_tmp__C52E,buf__Y42E,(&__string_146));
+            };
+          };
+          ((__STRING *)str_tmp__C52E)->count__4FC= 0;
+          stat__142E= 3;
+        };
+      };
+    };
+    if ((__tmp__S52E ==  2)) {
+      if ((car__342E == '\'')) {
+        if (((void *)code_balise__A52E != (void *)NULL)) {
+          i__442E= 0;
+          while_do__CF3F:
+          {
+            if ((i__442E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD)) {
+              ((__STRING *)str_tmp3__EF3E)->count__4FC= 0;
+              __tmp__HF3E=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.storage__D4VE)[i__442E];
+              if (((struct ___OBJ *)__tmp__HF3E)->__id==__ITM_SLOT__) {
+                pretty_name_in__DA4F(__tmp__HF3E,str_tmp3__EF3E);
+              } else {
+                pretty_name_in__YB4F(__tmp__HF3E,str_tmp3__EF3E);
+              };
+              Self__FURE=((__STRING *)str_tmp3__EF3E);
+              result__IURE=FALSE__;
+              if ((Self__FURE->count__4FC == ((__STRING *)str_tmp2__EB3E)->count__4FC)) {
+                if ((Self__FURE->count__4FC ==  0)) {
+                  result__IURE=TRUE__;
+                } else {
+                  Self__U0YB=((__CHARACTER *)Self__FURE->storage__JCS);
+                  other__V0YB=((__STRING *)str_tmp2__EB3E)->storage__JCS;
+                  i__I1YB=(__INTEGER)(Self__FURE->count__4FC -  1);
+                  while (((i__I1YB >=  0) && (Self__U0YB[i__I1YB] == ((__CHARACTER *)other__V0YB)[i__I1YB]))) {
+                    i__I1YB=(__INTEGER)(i__I1YB -  1);
+                  };
+                  result__IURE=(i__I1YB <  0);
+                };
+              };
+              __tmp__QF3E=(! result__IURE);
+            } else {
+              __tmp__QF3E=FALSE__;
+            };
+            if (__tmp__QF3E) {
+              i__442E=(__INTEGER)(i__442E +  1);
+              goto while_do__CF3F;
+            };
+          };
+          if ((i__442E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__HKTD)->parent_arrayed_collection__GKTD.upper__12XD)) {
+            put__to__like__D0XD(str_tmp2__EB3E,str_tmp__C52E,(&__string_137));
+          } else {
+            put__to__like__D0XD(str_tmp2__EB3E,str_tmp__C52E,(&__string_136));
+          };
+        };
+        stat__142E=old_stat__242E;
+      } else {
+        add_last__BMT(str_tmp2__EB3E,car__342E);
+      };
+    };
+    if ((__tmp__S52E ==  3)) {
+      if ((car__342E == '*')) {
+        if ((((__STRING *)str_tmp__C52E)->count__4FC >  1)) {
+          put__to__like__D0XD(str_tmp__C52E,buf__Y42E,code_balise__A52E);
+        };
+        ((__STRING *)str_tmp__C52E)->count__4FC= 0;
+        stat__142E= 1;
+        __tmp__QH3E=TRUE__;
+      } else {
+        __tmp__QH3E=FALSE__;
+      };
+      if ((! __tmp__QH3E)) {
+        if ((car__342E == '`')) {
+          old_stat__242E=stat__142E;
+          stat__142E= 2;
+          ((__STRING *)str_tmp2__EB3E)->count__4FC= 0;
+        } else {
+          add_last__BMT(str_tmp__C52E,car__342E);
+        };
+      };
+    };
+    cur__042E=(__INTEGER)(cur__042E +  1);
+  };
+  if ((((__STRING *)str_tmp__C52E)->count__4FC >  1)) {
+    if (is_light__Z42E) {
+      append__JOS(buf__Y42E,str_tmp__C52E);
+    } else {
+      if ((stat__142E ==  0)) {
+        put__to__like__D0XD((&__string_246),buf__Y42E,(&__string_146));
+      };
+      put__to__like__D0XD(str_tmp__C52E,buf__Y42E,code_balise__A52E);
+    };
+  };
+}
+
+static void append_in__WIH(__UINTEGER_32 Self__XIH,void *buffer__YIH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __UINTEGER_32 val__RIH;
-  __INTEGER i__UIH,j__VIH;
-  __STRING *Self__A4FH;
-  __CHARACTER tmp__C4FH;
-  val__RIH= 0;
-  i__UIH= 0;
-  j__VIH= 0;
-  if ((Self__PIH ==  0)) {
-    add_last__ZLT(((__STRING *)buffer__QIH),'0');
+  __UINTEGER_32 val__ZIH;
+  __INTEGER i__2IH,j__3IH;
+  __STRING *Self__T5GH;
+  __CHARACTER tmp__V5GH;
+  val__ZIH= 0;
+  i__2IH= 0;
+  j__3IH= 0;
+  if ((Self__XIH ==  0)) {
+    add_last__BMT(((__STRING *)buffer__YIH),'0');
   } else {
-    i__UIH=(__INTEGER)(((__STRING *)buffer__QIH)->count__WFC +  1);
-    val__RIH=Self__PIH;
-    while ((val__RIH !=  0)) {
-      add_last__ZLT(((__STRING *)buffer__QIH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__RIH %  10)) + ((__INTEGER_8 )'0'))))));
-      val__RIH=(__UINTEGER_32)(val__RIH /  10);
-    };
-    j__VIH=((__STRING *)buffer__QIH)->count__WFC;
-    while ((i__UIH < j__VIH)) {
-      Self__A4FH=((__STRING *)buffer__QIH);
-      tmp__C4FH=((__CHARACTER *)Self__A4FH->storage__BCS)[(__INTEGER)(i__UIH -  1)];
-      ((__CHARACTER *)Self__A4FH->storage__BCS)[(__INTEGER)(i__UIH -  1)]=((__CHARACTER *)Self__A4FH->storage__BCS)[(__INTEGER)(j__VIH -  1)];
-      ((__CHARACTER *)Self__A4FH->storage__BCS)[(__INTEGER)(j__VIH -  1)]=tmp__C4FH;
-      j__VIH=(__INTEGER)(j__VIH -  1);
-      i__UIH=(__INTEGER)(i__UIH +  1);
+    i__2IH=(__INTEGER)(((__STRING *)buffer__YIH)->count__4FC +  1);
+    val__ZIH=Self__XIH;
+    while ((val__ZIH !=  0)) {
+      add_last__BMT(((__STRING *)buffer__YIH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__ZIH %  10)) + ((__INTEGER_8 )'0'))))));
+      val__ZIH=(__UINTEGER_32)(val__ZIH /  10);
+    };
+    j__3IH=((__STRING *)buffer__YIH)->count__4FC;
+    while ((i__2IH < j__3IH)) {
+      Self__T5GH=((__STRING *)buffer__YIH);
+      tmp__V5GH=((__CHARACTER *)Self__T5GH->storage__JCS)[(__INTEGER)(i__2IH -  1)];
+      ((__CHARACTER *)Self__T5GH->storage__JCS)[(__INTEGER)(i__2IH -  1)]=((__CHARACTER *)Self__T5GH->storage__JCS)[(__INTEGER)(j__3IH -  1)];
+      ((__CHARACTER *)Self__T5GH->storage__JCS)[(__INTEGER)(j__3IH -  1)]=tmp__V5GH;
+      j__3IH=(__INTEGER)(j__3IH -  1);
+      i__2IH=(__INTEGER)(i__2IH +  1);
     };
   };
 }
 
-static void append_in__MM3F(__SECTION_ *Self__NM3F,void *buf__OM3F)
+static void append_in__PD4F(__SECTION_ *Self__QD4F,void *buf__RD4F)
 // ({SECTION_},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__BN3F,Self__P2BG;
-  void *__tmp__IN3F,*__tmp__LN3F;
-  __ITM_TYPE_STYLE *Self__JEEH,*Self__LEEH;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__J4FH;
-  if (((void *)Self__NM3F->name__CZDC != (void *)NULL)) {
-    append__BOS(buf__OM3F,Self__NM3F->name__CZDC);
+  __INTEGER __tmp__EE4F,Self__OUCG;
+  void *__tmp__LE4F,*__tmp__OE4F;
+  __ITM_TYPE_STYLE *Self__ZFFH,*Self__1FFH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__25GH;
+  if (((void *)Self__QD4F->name__KZDC != (void *)NULL)) {
+    append__JOS(buf__RD4F,Self__QD4F->name__KZDC);
   } else {
-    __tmp__BN3F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NM3F->type_list__RXFC)->parent_arrayed_collection__ZXC.upper__KIV -  1);
-    Self__P2BG= 0;
-    while ((Self__P2BG <= __tmp__BN3F)) {
-      __tmp__IN3F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NM3F->type_list__RXFC)->parent_arrayed_collection__ZXC.storage__RMV)[Self__P2BG];
-      switch (((struct ___OBJ *)__tmp__IN3F)->__id) {
+    __tmp__EE4F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__QD4F->type_list__ZXFC)->parent_arrayed_collection__BYC.upper__SIV -  1);
+    Self__OUCG= 0;
+    while ((Self__OUCG <= __tmp__EE4F)) {
+      __tmp__LE4F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__QD4F->type_list__ZXFC)->parent_arrayed_collection__BYC.storage__ZMV)[Self__OUCG];
+      switch (((struct ___OBJ *)__tmp__LE4F)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__BOS(buf__OM3F,((__ITM_TYPE_PARAMETER *)__tmp__IN3F)->parent_itm_type__3DE.name__KYP);
+        append__JOS(buf__RD4F,((__ITM_TYPE_PARAMETER *)__tmp__LE4F)->parent_itm_type__FEE.name__SYP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__BOS(buf__OM3F,((__ITM_TYPE_SIMPLE *)__tmp__IN3F)->name__KYP);
+        append__JOS(buf__RD4F,((__ITM_TYPE_SIMPLE *)__tmp__LE4F)->name__SYP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__OGPD(__tmp__IN3F,buf__OM3F);
+        append_in__WGPD(__tmp__LE4F,buf__RD4F);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__SHPD(__tmp__IN3F,buf__OM3F);
+        append_in__0HPD(__tmp__LE4F,buf__RD4F);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__JEEH=((__ITM_TYPE_STYLE *)__tmp__IN3F);
-        if (((void *)Self__JEEH->style__TYP != (void *)NULL)) {
-          append__BOS(buf__OM3F,Self__JEEH->style__TYP);
-          add_last__ZLT(buf__OM3F,' ');
+        Self__ZFFH=((__ITM_TYPE_STYLE *)__tmp__LE4F);
+        if (((void *)Self__ZFFH->style__1YP != (void *)NULL)) {
+          append__JOS(buf__RD4F,Self__ZFFH->style__1YP);
+          add_last__BMT(buf__RD4F,' ');
         };
-        append__BOS(buf__OM3F,Self__JEEH->parent_itm_type_simple__BSN.name__KYP);
+        append__JOS(buf__RD4F,Self__ZFFH->parent_itm_type_simple__JSN.name__SYP);
       } break;
       };
-      add_last__ZLT(buf__OM3F,',');
-      add_last__ZLT(buf__OM3F,' ');
-      Self__P2BG=(__INTEGER)(Self__P2BG +  1);
+      add_last__BMT(buf__RD4F,',');
+      add_last__BMT(buf__RD4F,' ');
+      Self__OUCG=(__INTEGER)(Self__OUCG +  1);
     };
-    Self__J4FH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__NM3F->type_list__RXFC);
-    __tmp__LN3F=((void **)Self__J4FH->parent_arrayed_collection__ZXC.storage__RMV)[Self__J4FH->parent_arrayed_collection__ZXC.upper__KIV];
-    switch (((struct ___OBJ *)__tmp__LN3F)->__id) {
+    Self__25GH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__QD4F->type_list__ZXFC);
+    __tmp__OE4F=((void **)Self__25GH->parent_arrayed_collection__BYC.storage__ZMV)[Self__25GH->parent_arrayed_collection__BYC.upper__SIV];
+    switch (((struct ___OBJ *)__tmp__OE4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__BOS(buf__OM3F,((__ITM_TYPE_PARAMETER *)__tmp__LN3F)->parent_itm_type__3DE.name__KYP);
+      append__JOS(buf__RD4F,((__ITM_TYPE_PARAMETER *)__tmp__OE4F)->parent_itm_type__FEE.name__SYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__BOS(buf__OM3F,((__ITM_TYPE_SIMPLE *)__tmp__LN3F)->name__KYP);
+      append__JOS(buf__RD4F,((__ITM_TYPE_SIMPLE *)__tmp__OE4F)->name__SYP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__OGPD(__tmp__LN3F,buf__OM3F);
+      append_in__WGPD(__tmp__OE4F,buf__RD4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__SHPD(__tmp__LN3F,buf__OM3F);
+      append_in__0HPD(__tmp__OE4F,buf__RD4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__LEEH=((__ITM_TYPE_STYLE *)__tmp__LN3F);
-      if (((void *)Self__LEEH->style__TYP != (void *)NULL)) {
-        append__BOS(buf__OM3F,Self__LEEH->style__TYP);
-        add_last__ZLT(buf__OM3F,' ');
+      Self__1FFH=((__ITM_TYPE_STYLE *)__tmp__OE4F);
+      if (((void *)Self__1FFH->style__1YP != (void *)NULL)) {
+        append__JOS(buf__RD4F,Self__1FFH->style__1YP);
+        add_last__BMT(buf__RD4F,' ');
       };
-      append__BOS(buf__OM3F,Self__LEEH->parent_itm_type_simple__BSN.name__KYP);
+      append__JOS(buf__RD4F,Self__1FFH->parent_itm_type_simple__JSN.name__SYP);
     } break;
     };
   };
 }
 
-static void shorter_profile_in__ON3F(__ITM_SLOT *Self__PN3F,void *buf__QN3F)
+static void shorter_profile_in__RE4F(__ITM_SLOT *Self__SE4F,void *buf__TE4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__NR4F,i__OR4F;
-  void *__tmp__TR4F,*__tmp__1S4F,*__tmp__1T4F;
-  __STRING_CONSTANT *Self__3EEH;
-  void *__tmp__IO3F;
-  __ITM_TYPE_MULTI *Self__0H0G;
-  __ITM_TYPE_STYLE *Self__HFEH;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__5EEH;
-  if ((Self__PN3F->parent_named__P5.style__BEU == '+')) {
-    put__to__like__U25F((&__string_248),buf__QN3F,(&__string_132));
+  __INTEGER j__BJ5F,i__CJ5F;
+  void *__tmp__HJ5F,*__tmp__PK5F,*__tmp__PL5F;
+  __STRING_CONSTANT *Self__NGFH;
+  void *__tmp__LF4F;
+  __ITM_TYPE_MULTI *Self__EF1G;
+  __ITM_TYPE_STYLE *Self__XGFH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__PGFH;
+  if ((Self__SE4F->parent_named__V5.style__JEU == '+')) {
+    put__to__like__IUAG((&__string_247),buf__TE4F,(&__string_132));
   } else {
-    put__to__like__U25F((&__string_249),buf__QN3F,(&__string_132));
+    put__to__like__IUAG((&__string_248),buf__TE4F,(&__string_132));
   };
-  ((__STRING *)string_tmp__VH)->count__WFC= 0;
-  j__NR4F= 1;
-  __tmp__TR4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PN3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-  if (((struct ___OBJ *)__tmp__TR4F)->__id==__ITM_ARG__) {
-    shorter_in__VZ5F(__tmp__TR4F,buf__QN3F);
+  ((__STRING *)string_tmp__VH)->count__4FC= 0;
+  j__BJ5F= 1;
+  __tmp__HJ5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE4F->argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+  if (((struct ___OBJ *)__tmp__HJ5F)->__id==__ITM_ARG__) {
+    shorter_in__JRAG(__tmp__HJ5F,buf__TE4F);
   } else {
-    shorter_in__M05F(__tmp__TR4F,buf__QN3F);
-  };
-  add_last__ZLT(buf__QN3F,'.');
-  i__OR4F= 1;
-  while ((j__NR4F < ((__STRING_CONSTANT *)Self__PN3F->parent_named__P5.name__LI)->count__DD)) {
-    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__PN3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__NR4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__PN3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)((__INTEGER)(j__NR4F +  1) -  1)] == '_'))) {
-      put__to__like__U25F(string_tmp__VH,buf__QN3F,(&__string_130));
-      add_last__ZLT(buf__QN3F,' ');
-      __tmp__1S4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PN3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[i__OR4F];
-      if (((struct ___OBJ *)__tmp__1S4F)->__id==__ITM_ARG__) {
-        shorter_in__VZ5F(__tmp__1S4F,buf__QN3F);
-      } else {
-        shorter_in__M05F(__tmp__1S4F,buf__QN3F);
-      };
-      add_last__ZLT(buf__QN3F,' ');
-      ((__STRING *)string_tmp__VH)->count__WFC= 0;
-      j__NR4F=(__INTEGER)(j__NR4F +  2);
-      i__OR4F=(__INTEGER)(i__OR4F +  1);
-    } else {
-      add_last__ZLT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__PN3F->parent_named__P5.name__LI)->storage__VQO)[(__INTEGER)(j__NR4F -  1)]);
-      j__NR4F=(__INTEGER)(j__NR4F +  1);
-    };
-  };
-  Self__3EEH=((__STRING_CONSTANT *)Self__PN3F->parent_named__P5.name__LI);
-  add_last__ZLT(string_tmp__VH,((__CHARACTER *)Self__3EEH->storage__VQO)[(__INTEGER)(Self__3EEH->count__DD -  1)]);
-  put__to__like__U25F(string_tmp__VH,buf__QN3F,(&__string_130));
-  if ((i__OR4F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__PN3F->argument_list__GEHC)->parent_arrayed_collection__FCZB.upper__45GC)) {
-    add_last__ZLT(buf__QN3F,' ');
-    Self__5EEH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__PN3F->argument_list__GEHC);
-    __tmp__1T4F=((void **)Self__5EEH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__5EEH->parent_arrayed_collection__FCZB.upper__45GC];
-    if (((struct ___OBJ *)__tmp__1T4F)->__id==__ITM_ARG__) {
-      shorter_in__VZ5F(__tmp__1T4F,buf__QN3F);
-    } else {
-      shorter_in__M05F(__tmp__1T4F,buf__QN3F);
-    };
-    add_last__ZLT(buf__QN3F,' ');
-  };
-  if (((void *)Self__PN3F->result_type__04FC != (void *)type_void__4VF)) {
-    add_last__ZLT(buf__QN3F,':');
-    __tmp__IO3F=Self__PN3F->result_type__04FC;
-    switch (((struct ___OBJ *)__tmp__IO3F)->__id) {
+    shorter_in__ASAG(__tmp__HJ5F,buf__TE4F);
+  };
+  add_last__BMT(buf__TE4F,'.');
+  i__CJ5F= 1;
+  while ((j__BJ5F < ((__STRING_CONSTANT *)Self__SE4F->parent_named__V5.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__SE4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)(j__BJ5F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__SE4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)((__INTEGER)(j__BJ5F +  1) -  1)] == '_'))) {
+      put__to__like__IUAG(string_tmp__VH,buf__TE4F,(&__string_130));
+      add_last__BMT(buf__TE4F,' ');
+      __tmp__PK5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE4F->argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[i__CJ5F];
+      if (((struct ___OBJ *)__tmp__PK5F)->__id==__ITM_ARG__) {
+        shorter_in__JRAG(__tmp__PK5F,buf__TE4F);
+      } else {
+        shorter_in__ASAG(__tmp__PK5F,buf__TE4F);
+      };
+      add_last__BMT(buf__TE4F,' ');
+      ((__STRING *)string_tmp__VH)->count__4FC= 0;
+      j__BJ5F=(__INTEGER)(j__BJ5F +  2);
+      i__CJ5F=(__INTEGER)(i__CJ5F +  1);
+    } else {
+      add_last__BMT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__SE4F->parent_named__V5.name__LI)->storage__3QO)[(__INTEGER)(j__BJ5F -  1)]);
+      j__BJ5F=(__INTEGER)(j__BJ5F +  1);
+    };
+  };
+  Self__NGFH=((__STRING_CONSTANT *)Self__SE4F->parent_named__V5.name__LI);
+  add_last__BMT(string_tmp__VH,((__CHARACTER *)Self__NGFH->storage__3QO)[(__INTEGER)(Self__NGFH->count__DD -  1)]);
+  put__to__like__IUAG(string_tmp__VH,buf__TE4F,(&__string_130));
+  if ((i__CJ5F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE4F->argument_list__OEHC)->parent_arrayed_collection__NCZB.upper__GAHC)) {
+    add_last__BMT(buf__TE4F,' ');
+    Self__PGFH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__SE4F->argument_list__OEHC);
+    __tmp__PL5F=((void **)Self__PGFH->parent_arrayed_collection__NCZB.storage__EBHC)[Self__PGFH->parent_arrayed_collection__NCZB.upper__GAHC];
+    if (((struct ___OBJ *)__tmp__PL5F)->__id==__ITM_ARG__) {
+      shorter_in__JRAG(__tmp__PL5F,buf__TE4F);
+    } else {
+      shorter_in__ASAG(__tmp__PL5F,buf__TE4F);
+    };
+    add_last__BMT(buf__TE4F,' ');
+  };
+  if (((void *)Self__SE4F->result_type__C5FC != (void *)type_void__GWF)) {
+    add_last__BMT(buf__TE4F,':');
+    __tmp__LF4F=Self__SE4F->result_type__C5FC;
+    switch (((struct ___OBJ *)__tmp__LF4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__IO3F,buf__QN3F);
+      shorter_in__RVCG(__tmp__LF4F,buf__TE4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__IO3F,buf__QN3F);
+      shorter_in__CWCG(__tmp__LF4F,buf__TE4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__0H0G=((__ITM_TYPE_MULTI *)__tmp__IO3F);
-      add_last__ZLT(buf__QN3F,'(');
-      shorter_raw_in__JIEG(Self__0H0G,buf__QN3F);
-      add_last__ZLT(buf__QN3F,')');
+      Self__EF1G=((__ITM_TYPE_MULTI *)__tmp__LF4F);
+      add_last__BMT(buf__TE4F,'(');
+      shorter_raw_in__BCFG(Self__EF1G,buf__TE4F);
+      add_last__BMT(buf__TE4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__IO3F,buf__QN3F);
+      shorter_in__TWCG(__tmp__LF4F,buf__TE4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__IO3F,buf__QN3F);
+      shorter_in__1XCG(__tmp__LF4F,buf__TE4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__HFEH=((__ITM_TYPE_STYLE *)__tmp__IO3F);
-      if (((void *)Self__HFEH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__HFEH->style__TYP,buf__QN3F,(&__string_119));
-        add_last__ZLT(buf__QN3F,' ');
+      Self__XGFH=((__ITM_TYPE_STYLE *)__tmp__LF4F);
+      if (((void *)Self__XGFH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__XGFH->style__1YP,buf__TE4F,(&__string_119));
+        add_last__BMT(buf__TE4F,' ');
       };
-      put__to__like__MGEG(Self__HFEH->parent_itm_type_simple__BSN.name__KYP,buf__QN3F,(&__string_125));
+      put__to__like__35EG(Self__XGFH->parent_itm_type_simple__JSN.name__SYP,buf__TE4F,(&__string_125));
     } break;
     };
   };
 }
 
-static void shorter_profile_in__LO3F(__ITM_SLOT_OPERATOR *Self__MO3F,void *buf__NO3F)
+static void shorter_profile_in__OF4F(__ITM_SLOT_OPERATOR *Self__PF4F,void *buf__QF4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__LLHH,*Self__QLHH;
-  __INTEGER i__JLHH,i__OLHH,Self__LGLG,result__NGLG,i__3HLG,j__4HLG;
-  void *__tmp__3U4F,*__tmp__SV4F,*__tmp__IW4F,*__tmp__SW4F;
-  void *result__N5KG;
-  __INTEGER_32 Self__SHLG,val__0HLG;
-  __STRING *Self__AYFB;
-  void *__tmp__FP3F;
-  __ITM_TYPE_MULTI *Self__2DCG;
-  __ITM_TYPE_STYLE *Self__JFEH;
-  __BOOLEAN result__ILHH,__tmp__CV4F,result__NLHH;
-  __CHARACTER tmp__DYFB;
-  if ((Self__MO3F->parent_itm_slot__OU5B.parent_named__P5.style__BEU == '+')) {
-    put__to__like__DECG((&__string_248),buf__NO3F,(&__string_132));
+  __STRING_CONSTANT *Self__LNIH,*Self__QNIH;
+  __INTEGER i__JNIH,i__ONIH,Self__UCMG,result__WCMG,i__GEMG,j__HEMG;
+  void *__tmp__RM5F,*__tmp__GN5F,*__tmp__2N5F,*__tmp__GO5F;
+  void *result__W1LG;
+  __INTEGER_32 Self__1DMG,val__DEMG;
+  __STRING *Self__IYFB;
+  void *__tmp__IG4F;
+  __ITM_TYPE_MULTI *Self__C2CG;
+  __ITM_TYPE_STYLE *Self__ZGFH;
+  __BOOLEAN result__INIH,__tmp__WM5F,result__NNIH;
+  __CHARACTER tmp__LYFB;
+  if ((Self__PF4F->parent_itm_slot__WU5B.parent_named__V5.style__JEU == '+')) {
+    put__to__like__J2CG((&__string_247),buf__QF4F,(&__string_132));
   } else {
-    put__to__like__DECG((&__string_249),buf__NO3F,(&__string_132));
-  };
-  Self__LLHH=((__STRING_CONSTANT *)Self__MO3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
-  result__ILHH=FALSE__;
-  i__JLHH= 0;
-  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__LLHH->count__DD)) {
-    i__JLHH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
-    while ((! ((i__JLHH ==  0) || (((__CHARACTER *)Self__LLHH->storage__VQO)[(__INTEGER)(i__JLHH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__VQO)[(__INTEGER)(i__JLHH -  1)])))) {
-      i__JLHH=(__INTEGER)(i__JLHH -  1);
-    };
-    result__ILHH=(i__JLHH ==  0);
-  };
-  if (result__ILHH) {
-    __tmp__3U4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__MO3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-    if (((struct ___OBJ *)__tmp__3U4F)->__id==__ITM_ARG__) {
-      shorter_in__VZ5F(__tmp__3U4F,buf__NO3F);
-    } else {
-      shorter_in__M05F(__tmp__3U4F,buf__NO3F);
-    };
-    add_last__ZLT(buf__NO3F,' ');
-    add_last__ZLT(buf__NO3F,'\'');
-    put__to__like__DECG(Self__MO3F->pretty_name__V0HC,buf__NO3F,(&__string_130));
-    add_last__ZLT(buf__NO3F,'\'');
-    add_last__ZLT(buf__NO3F,' ');
-    __tmp__CV4F=TRUE__;
+    put__to__like__J2CG((&__string_248),buf__QF4F,(&__string_132));
+  };
+  Self__LNIH=((__STRING_CONSTANT *)Self__PF4F->parent_itm_slot__WU5B.parent_named__V5.name__LI);
+  result__INIH=FALSE__;
+  i__JNIH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__LNIH->count__DD)) {
+    i__JNIH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__JNIH ==  0) || (((__CHARACTER *)Self__LNIH->storage__3QO)[(__INTEGER)(i__JNIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__3QO)[(__INTEGER)(i__JNIH -  1)])))) {
+      i__JNIH=(__INTEGER)(i__JNIH -  1);
+    };
+    result__INIH=(i__JNIH ==  0);
+  };
+  if (result__INIH) {
+    __tmp__RM5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PF4F->parent_itm_slot__WU5B.argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+    if (((struct ___OBJ *)__tmp__RM5F)->__id==__ITM_ARG__) {
+      shorter_in__JRAG(__tmp__RM5F,buf__QF4F);
+    } else {
+      shorter_in__ASAG(__tmp__RM5F,buf__QF4F);
+    };
+    add_last__BMT(buf__QF4F,' ');
+    add_last__BMT(buf__QF4F,'\'');
+    put__to__like__J2CG(Self__PF4F->pretty_name__30HC,buf__QF4F,(&__string_130));
+    add_last__BMT(buf__QF4F,'\'');
+    add_last__BMT(buf__QF4F,' ');
+    __tmp__WM5F=TRUE__;
   } else {
-    __tmp__CV4F=FALSE__;
-  };
-  if ((! __tmp__CV4F)) {
-    Self__QLHH=((__STRING_CONSTANT *)Self__MO3F->parent_itm_slot__OU5B.parent_named__P5.name__LI);
-    result__NLHH=FALSE__;
-    i__OLHH= 0;
-    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__QLHH->count__DD)) {
-      i__OLHH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
-      while ((! ((i__OLHH ==  0) || (((__CHARACTER *)Self__QLHH->storage__VQO)[(__INTEGER)(i__OLHH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__VQO)[(__INTEGER)(i__OLHH -  1)])))) {
-        i__OLHH=(__INTEGER)(i__OLHH -  1);
-      };
-      result__NLHH=(i__OLHH ==  0);
-    };
-    if (result__NLHH) {
-      __tmp__SV4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__MO3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-      if (((struct ___OBJ *)__tmp__SV4F)->__id==__ITM_ARG__) {
-        shorter_in__VZ5F(__tmp__SV4F,buf__NO3F);
-      } else {
-        shorter_in__M05F(__tmp__SV4F,buf__NO3F);
-      };
-      add_last__ZLT(buf__NO3F,' ');
-      add_last__ZLT(buf__NO3F,'\'');
-      put__to__like__DECG(Self__MO3F->pretty_name__V0HC,buf__NO3F,(&__string_130));
-      add_last__ZLT(buf__NO3F,'\'');
-      if ((Self__MO3F->priority_and_level__K0HC !=  0)) {
-        add_last__ZLT(buf__NO3F,' ');
-        result__N5KG=NULL;
-        if ((Self__MO3F->priority_and_level__K0HC >=  0)) {
-          result__N5KG=(&__string_6);
-        } else {
-          result__N5KG=(&__string_5);
-        };
-        put__to__like__DECG(result__N5KG,buf__NO3F,(&__string_119));
-        add_last__ZLT(buf__NO3F,' ');
-        ((__STRING *)string_tmp__VH)->count__WFC= 0;
-        Self__LGLG=Self__MO3F->priority_and_level__K0HC;
-        result__NGLG= 0;
-        if ((Self__LGLG <  0)) {
-          result__NGLG=(__INTEGER)(- Self__LGLG);
-        } else {
-          result__NGLG=Self__LGLG;
-        };
-        Self__SHLG=((__INTEGER_32 )result__NGLG);
-        val__0HLG= 0;
-        i__3HLG= 0;
-        j__4HLG= 0;
-        if ((Self__SHLG ==  0)) {
-          add_last__ZLT(((__STRING *)string_tmp__VH),'0');
-        } else {
-          if ((Self__SHLG >  0)) {
-            val__0HLG=Self__SHLG;
-          } else {
-            val__0HLG=(__INTEGER_32)(- Self__SHLG);
-            add_last__ZLT(((__STRING *)string_tmp__VH),'-');
-          };
-          i__3HLG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__WFC +  1);
-          while ((val__0HLG !=  0)) {
-            add_last__ZLT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__0HLG %  10)) + ((__INTEGER_8 )'0'))))));
-            val__0HLG=(__INTEGER_32)(val__0HLG /  10);
-          };
-          j__4HLG=((__STRING *)string_tmp__VH)->count__WFC;
-          while ((i__3HLG < j__4HLG)) {
-            Self__AYFB=((__STRING *)string_tmp__VH);
-            tmp__DYFB=((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(i__3HLG -  1)];
-            ((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(i__3HLG -  1)]=((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(j__4HLG -  1)];
-            ((__CHARACTER *)Self__AYFB->storage__BCS)[(__INTEGER)(j__4HLG -  1)]=tmp__DYFB;
-            j__4HLG=(__INTEGER)(j__4HLG -  1);
-            i__3HLG=(__INTEGER)(i__3HLG +  1);
-          };
-        };
-        put__to__like__DECG(string_tmp__VH,buf__NO3F,(&__string_119));
-      };
-      add_last__ZLT(buf__NO3F,' ');
-      __tmp__IW4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__MO3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 1];
-      if (((struct ___OBJ *)__tmp__IW4F)->__id==__ITM_ARG__) {
-        shorter_in__VZ5F(__tmp__IW4F,buf__NO3F);
-      } else {
-        shorter_in__M05F(__tmp__IW4F,buf__NO3F);
-      };
-      add_last__ZLT(buf__NO3F,' ');
-    } else {
-      add_last__ZLT(buf__NO3F,'\'');
-      put__to__like__DECG(Self__MO3F->pretty_name__V0HC,buf__NO3F,(&__string_130));
-      add_last__ZLT(buf__NO3F,'\'');
-      add_last__ZLT(buf__NO3F,' ');
-      __tmp__SW4F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__MO3F->parent_itm_slot__OU5B.argument_list__GEHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-      if (((struct ___OBJ *)__tmp__SW4F)->__id==__ITM_ARG__) {
-        shorter_in__VZ5F(__tmp__SW4F,buf__NO3F);
-      } else {
-        shorter_in__M05F(__tmp__SW4F,buf__NO3F);
-      };
-      add_last__ZLT(buf__NO3F,' ');
-    };
-  };
-  if (((void *)Self__MO3F->parent_itm_slot__OU5B.result_type__04FC != (void *)type_void__4VF)) {
-    add_last__ZLT(buf__NO3F,':');
-    __tmp__FP3F=Self__MO3F->parent_itm_slot__OU5B.result_type__04FC;
-    switch (((struct ___OBJ *)__tmp__FP3F)->__id) {
+    __tmp__WM5F=FALSE__;
+  };
+  if ((! __tmp__WM5F)) {
+    Self__QNIH=((__STRING_CONSTANT *)Self__PF4F->parent_itm_slot__WU5B.parent_named__V5.name__LI);
+    result__NNIH=FALSE__;
+    i__ONIH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__QNIH->count__DD)) {
+      i__ONIH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__ONIH ==  0) || (((__CHARACTER *)Self__QNIH->storage__3QO)[(__INTEGER)(i__ONIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__3QO)[(__INTEGER)(i__ONIH -  1)])))) {
+        i__ONIH=(__INTEGER)(i__ONIH -  1);
+      };
+      result__NNIH=(i__ONIH ==  0);
+    };
+    if (result__NNIH) {
+      __tmp__GN5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PF4F->parent_itm_slot__WU5B.argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+      if (((struct ___OBJ *)__tmp__GN5F)->__id==__ITM_ARG__) {
+        shorter_in__JRAG(__tmp__GN5F,buf__QF4F);
+      } else {
+        shorter_in__ASAG(__tmp__GN5F,buf__QF4F);
+      };
+      add_last__BMT(buf__QF4F,' ');
+      add_last__BMT(buf__QF4F,'\'');
+      put__to__like__J2CG(Self__PF4F->pretty_name__30HC,buf__QF4F,(&__string_130));
+      add_last__BMT(buf__QF4F,'\'');
+      if ((Self__PF4F->priority_and_level__S0HC !=  0)) {
+        add_last__BMT(buf__QF4F,' ');
+        result__W1LG=NULL;
+        if ((Self__PF4F->priority_and_level__S0HC >=  0)) {
+          result__W1LG=(&__string_6);
+        } else {
+          result__W1LG=(&__string_5);
+        };
+        put__to__like__J2CG(result__W1LG,buf__QF4F,(&__string_119));
+        add_last__BMT(buf__QF4F,' ');
+        ((__STRING *)string_tmp__VH)->count__4FC= 0;
+        Self__UCMG=Self__PF4F->priority_and_level__S0HC;
+        result__WCMG= 0;
+        if ((Self__UCMG <  0)) {
+          result__WCMG=(__INTEGER)(- Self__UCMG);
+        } else {
+          result__WCMG=Self__UCMG;
+        };
+        Self__1DMG=((__INTEGER_32 )result__WCMG);
+        val__DEMG= 0;
+        i__GEMG= 0;
+        j__HEMG= 0;
+        if ((Self__1DMG ==  0)) {
+          add_last__BMT(((__STRING *)string_tmp__VH),'0');
+        } else {
+          if ((Self__1DMG >  0)) {
+            val__DEMG=Self__1DMG;
+          } else {
+            val__DEMG=(__INTEGER_32)(- Self__1DMG);
+            add_last__BMT(((__STRING *)string_tmp__VH),'-');
+          };
+          i__GEMG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__4FC +  1);
+          while ((val__DEMG !=  0)) {
+            add_last__BMT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__DEMG %  10)) + ((__INTEGER_8 )'0'))))));
+            val__DEMG=(__INTEGER_32)(val__DEMG /  10);
+          };
+          j__HEMG=((__STRING *)string_tmp__VH)->count__4FC;
+          while ((i__GEMG < j__HEMG)) {
+            Self__IYFB=((__STRING *)string_tmp__VH);
+            tmp__LYFB=((__CHARACTER *)Self__IYFB->storage__JCS)[(__INTEGER)(i__GEMG -  1)];
+            ((__CHARACTER *)Self__IYFB->storage__JCS)[(__INTEGER)(i__GEMG -  1)]=((__CHARACTER *)Self__IYFB->storage__JCS)[(__INTEGER)(j__HEMG -  1)];
+            ((__CHARACTER *)Self__IYFB->storage__JCS)[(__INTEGER)(j__HEMG -  1)]=tmp__LYFB;
+            j__HEMG=(__INTEGER)(j__HEMG -  1);
+            i__GEMG=(__INTEGER)(i__GEMG +  1);
+          };
+        };
+        put__to__like__J2CG(string_tmp__VH,buf__QF4F,(&__string_119));
+      };
+      add_last__BMT(buf__QF4F,' ');
+      __tmp__2N5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PF4F->parent_itm_slot__WU5B.argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 1];
+      if (((struct ___OBJ *)__tmp__2N5F)->__id==__ITM_ARG__) {
+        shorter_in__JRAG(__tmp__2N5F,buf__QF4F);
+      } else {
+        shorter_in__ASAG(__tmp__2N5F,buf__QF4F);
+      };
+      add_last__BMT(buf__QF4F,' ');
+    } else {
+      add_last__BMT(buf__QF4F,'\'');
+      put__to__like__J2CG(Self__PF4F->pretty_name__30HC,buf__QF4F,(&__string_130));
+      add_last__BMT(buf__QF4F,'\'');
+      add_last__BMT(buf__QF4F,' ');
+      __tmp__GO5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__PF4F->parent_itm_slot__WU5B.argument_list__OEHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+      if (((struct ___OBJ *)__tmp__GO5F)->__id==__ITM_ARG__) {
+        shorter_in__JRAG(__tmp__GO5F,buf__QF4F);
+      } else {
+        shorter_in__ASAG(__tmp__GO5F,buf__QF4F);
+      };
+      add_last__BMT(buf__QF4F,' ');
+    };
+  };
+  if (((void *)Self__PF4F->parent_itm_slot__WU5B.result_type__C5FC != (void *)type_void__GWF)) {
+    add_last__BMT(buf__QF4F,':');
+    __tmp__IG4F=Self__PF4F->parent_itm_slot__WU5B.result_type__C5FC;
+    switch (((struct ___OBJ *)__tmp__IG4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__FP3F,buf__NO3F);
+      shorter_in__RVCG(__tmp__IG4F,buf__QF4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__FP3F,buf__NO3F);
+      shorter_in__CWCG(__tmp__IG4F,buf__QF4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__2DCG=((__ITM_TYPE_MULTI *)__tmp__FP3F);
-      add_last__ZLT(buf__NO3F,'(');
-      shorter_raw_in__JIEG(Self__2DCG,buf__NO3F);
-      add_last__ZLT(buf__NO3F,')');
+      Self__C2CG=((__ITM_TYPE_MULTI *)__tmp__IG4F);
+      add_last__BMT(buf__QF4F,'(');
+      shorter_raw_in__BCFG(Self__C2CG,buf__QF4F);
+      add_last__BMT(buf__QF4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__FP3F,buf__NO3F);
+      shorter_in__TWCG(__tmp__IG4F,buf__QF4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__FP3F,buf__NO3F);
+      shorter_in__1XCG(__tmp__IG4F,buf__QF4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__JFEH=((__ITM_TYPE_STYLE *)__tmp__FP3F);
-      if (((void *)Self__JFEH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__JFEH->style__TYP,buf__NO3F,(&__string_119));
-        add_last__ZLT(buf__NO3F,' ');
+      Self__ZGFH=((__ITM_TYPE_STYLE *)__tmp__IG4F);
+      if (((void *)Self__ZGFH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__ZGFH->style__1YP,buf__QF4F,(&__string_119));
+        add_last__BMT(buf__QF4F,' ');
       };
-      put__to__like__MGEG(Self__JFEH->parent_itm_type_simple__BSN.name__KYP,buf__NO3F,(&__string_125));
+      put__to__like__35EG(Self__ZGFH->parent_itm_type_simple__JSN.name__SYP,buf__QF4F,(&__string_125));
     } break;
     };
   };
 }
 
-static __CHARACTER* create__BMEB(__INTEGER nb_elements__DMEB)
+static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__4MCH,a__NFEH,new_size__5MCH,new_size2__ANCH,a__RFEH;
-  __UINTEGER_32 new_size__SFEH;
-  __POINTER result__3MCH,ptr_table__TLHH,next__SLHH,result__ULHH;
-  void *result__XLHH;
-  __INTEGER Self__RUKC;
-  __CHARACTER *Result__CBKB;
-  sz__4MCH=((__UINTEGER_32 )nb_elements__DMEB);
-  result__3MCH=((__POINTER )(NULL));
-  a__NFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__5MCH=(__UINTEGER_32)((__UINTEGER_32)(sz__4MCH + a__NFEH) & (__UINTEGER_32)(~ a__NFEH));
-  new_size2__ANCH=(__UINTEGER_32)(new_size__5MCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__ANCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__RFEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__SFEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ANCH + a__RFEH) & (__UINTEGER_32)(~ a__RFEH));
-    ptr_table__TLHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SFEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__SLHH=((__POINTER )(NULL));
-    result__ULHH=((__POINTER *)ptr_table__TLHH)[ 0];
-    if ((result__ULHH == (void *)NULL)) {
-      result__ULHH=new_lab__MRJ(new_size__SFEH);
-      next__SLHH=(void *)((unsigned long)result__ULHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFEH)));
-      ((__POINTER *)next__SLHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__TLHH)[ 0]=next__SLHH;
-    } else {
-      next__SLHH=((__POINTER *)result__ULHH)[ 0];
-      if ((next__SLHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ULHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SFEH <<  1)) <=  4096)) {
-          next__SLHH=(void *)((unsigned long)result__ULHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFEH)));
-        } else {
-          next__SLHH=new_lab__MRJ(new_size__SFEH);
-        };
-        ((__POINTER *)next__SLHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TLHH)[ 0]=next__SLHH;
-      } else {
-        ((__POINTER *)result__ULHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SLHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__ULHH=next__SLHH;
-      };
-    };
-    ((__POINTER *)result__ULHH)[ 0]=((__POINTER ) 3);
-    result__3MCH=(void *)((unsigned long)result__ULHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__0MDH,a__3GFH,new_size__1MDH,new_size2__2MDH,a__BHFH;
+  __UINTEGER_32 new_size__CHFH;
+  __POINTER result__ZMDH,ptr_table__TNIH,next__SNIH,result__UNIH;
+  void *result__XNIH;
+  __INTEGER Self__ZUKC;
+  __CHARACTER *Result__KBKB;
+  sz__0MDH=((__UINTEGER_32 )nb_elements__LMEB);
+  result__ZMDH=((__POINTER )(NULL));
+  a__3GFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__1MDH=(__UINTEGER_32)((__UINTEGER_32)(sz__0MDH + a__3GFH) & (__UINTEGER_32)(~ a__3GFH));
+  new_size2__2MDH=(__UINTEGER_32)(new_size__1MDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__2MDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CHFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2MDH + a__BHFH) & (__UINTEGER_32)(~ a__BHFH));
+    ptr_table__TNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SNIH=((__POINTER )(NULL));
+    result__UNIH=((__POINTER *)ptr_table__TNIH)[ 0];
+    if ((result__UNIH == (void *)NULL)) {
+      result__UNIH=new_lab__URJ(new_size__CHFH);
+      next__SNIH=(void *)((unsigned long)result__UNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHFH)));
+      ((__POINTER *)next__SNIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TNIH)[ 0]=next__SNIH;
+    } else {
+      next__SNIH=((__POINTER *)result__UNIH)[ 0];
+      if ((next__SNIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UNIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CHFH <<  1)) <=  4096)) {
+          next__SNIH=(void *)((unsigned long)result__UNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHFH)));
+        } else {
+          next__SNIH=new_lab__URJ(new_size__CHFH);
+        };
+        ((__POINTER *)next__SNIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TNIH)[ 0]=next__SNIH;
+      } else {
+        ((__POINTER *)result__UNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UNIH=next__SNIH;
+      };
+    };
+    ((__POINTER *)result__UNIH)[ 0]=((__POINTER ) 3);
+    result__ZMDH=(void *)((unsigned long)result__UNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__XLHH=first_free__XDVB;
-    while ((((void *)result__XLHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XLHH)->map_size_and_id__ITB &  4294967292LU) < new_size__5MCH))) {
-      result__XLHH=((__MEMORY *)result__XLHH)->map_next_free__JTB;
+    result__XNIH=first_free__5DVB;
+    while ((((void *)result__XNIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XNIH)->map_size_and_id__QTB &  4294967292LU) < new_size__1MDH))) {
+      result__XNIH=((__MEMORY *)result__XNIH)->map_next_free__RTB;
     };
-    if (((void *)result__XLHH == (void *)NULL)) {
-      result__XLHH=new_page__OA5();
+    if (((void *)result__XNIH == (void *)NULL)) {
+      result__XNIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__XLHH,new_size__5MCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XLHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__3MCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XLHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__XNIH,new_size__1MDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XNIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__ZMDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XNIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__CBKB=((__CHARACTER *)result__3MCH);
-  Self__RUKC=(__INTEGER)(nb_elements__DMEB -  1);
-  while ((Self__RUKC >=  0)) {
-    Result__CBKB[Self__RUKC]='\0';
-    Self__RUKC=(__INTEGER)(Self__RUKC -  1);
+  Result__KBKB=((__CHARACTER *)result__ZMDH);
+  Self__ZUKC=(__INTEGER)(nb_elements__LMEB -  1);
+  while ((Self__ZUKC >=  0)) {
+    Result__KBKB[Self__ZUKC]='\0';
+    Self__ZUKC=(__INTEGER)(Self__ZUKC -  1);
   };
-  return(Result__CBKB);
+  return(Result__KBKB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__RELC(__POINTER p__TELC,__UINTEGER_32 old_sz__UELC,__UINTEGER_32 new_sz__VELC)
+static __POINTER realloc_dynamic__old_size__new_size__ZELC(__POINTER p__1ELC,__UINTEGER_32 old_sz__2ELC,__UINTEGER_32 new_sz__3ELC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  void *mem__AFLC,*result__HMHH,*nxt__JDED,*result__KDED,*result__KMHH;
-  void *next__ACND,*new_free__5BND,*prev__EHEH,*next__FHEH;
-  __POINTER result__BFLC,result__JNCH,ptr_table__DMHH,next__CMHH;
-  __POINTER result__EMHH,__tmp__FGLC,last__MOHD,src__VAED,dst__WAED;
-  __UINTEGER_32 a__DGEH,old_size__XELC,old_size2__0ELC,a__HGEH;
-  __UINTEGER_32 new_size__3ELC,a__LGEH,new_size__LNCH,new_size2__MNCH;
-  __UINTEGER_32 a__PGEH,new_size__QGEH,a__SRH,__tmp__SGLC,sz__ODED;
-  __UINTEGER_32 old_size__LDED,prev__BCND,new_size__ECND;
-  __INTEGER siz__2FGH,Self__BGGH,siz__0AED,Self__5LHD;
-  __MEMORY *Self__FDED;
-  __POINTER *na_src__4FGH,*na_dst__AGGH,*na_src__YAED,*na_dst__ZAED;
-  mem__AFLC=NULL;
-  result__BFLC=((__POINTER )(NULL));
-  a__DGEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  old_size__XELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__UELC + a__DGEH) & (__UINTEGER_32)(~ a__DGEH));
-  old_size2__0ELC=(__UINTEGER_32)(old_size__XELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  a__HGEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__3ELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__VELC + a__HGEH) & (__UINTEGER_32)(~ a__HGEH));
-  if ((old_size2__0ELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    result__JNCH=((__POINTER )(NULL));
-    a__LGEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__LNCH=(__UINTEGER_32)((__UINTEGER_32)(new_size__3ELC + a__LGEH) & (__UINTEGER_32)(~ a__LGEH));
-    new_size2__MNCH=(__UINTEGER_32)(new_size__LNCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-    if ((new_size2__MNCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-      a__PGEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__QGEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MNCH + a__PGEH) & (__UINTEGER_32)(~ a__PGEH));
-      ptr_table__DMHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QGEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__CMHH=((__POINTER )(NULL));
-      result__EMHH=((__POINTER *)ptr_table__DMHH)[ 0];
-      if ((result__EMHH == (void *)NULL)) {
-        result__EMHH=new_lab__MRJ(new_size__QGEH);
-        next__CMHH=(void *)((unsigned long)result__EMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGEH)));
-        ((__POINTER *)next__CMHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DMHH)[ 0]=next__CMHH;
-      } else {
-        next__CMHH=((__POINTER *)result__EMHH)[ 0];
-        if ((next__CMHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QGEH <<  1)) <=  4096)) {
-            next__CMHH=(void *)((unsigned long)result__EMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QGEH)));
-          } else {
-            next__CMHH=new_lab__MRJ(new_size__QGEH);
-          };
-          ((__POINTER *)next__CMHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DMHH)[ 0]=next__CMHH;
-        } else {
-          ((__POINTER *)result__EMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__EMHH=next__CMHH;
-        };
-      };
-      ((__POINTER *)result__EMHH)[ 0]=((__POINTER ) 3);
-      result__JNCH=(void *)((unsigned long)result__EMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
-    } else {
-      result__HMHH=first_free__XDVB;
-      while ((((void *)result__HMHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HMHH)->map_size_and_id__ITB &  4294967292LU) < new_size__LNCH))) {
-        result__HMHH=((__MEMORY *)result__HMHH)->map_next_free__JTB;
-      };
-      if (((void *)result__HMHH == (void *)NULL)) {
-        result__HMHH=new_page__OA5();
-      };
-      to_busy__index__TTFC(result__HMHH,new_size__LNCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HMHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-      result__JNCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HMHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-    };
-    result__BFLC=result__JNCH;
-    siz__2FGH=((__INTEGER )old_size__XELC);
-    siz__2FGH=(__INTEGER)(siz__2FGH / ((__INTEGER )(sizeof(void *))));
-    na_src__4FGH=((__POINTER *)p__TELC);
-    na_dst__AGGH=((__POINTER *)result__JNCH);
-    Self__BGGH=(__INTEGER)(siz__2FGH -  1);
-    while ((Self__BGGH >=  0)) {
-      na_dst__AGGH[Self__BGGH]=na_src__4FGH[Self__BGGH];
-      Self__BGGH=(__INTEGER)(Self__BGGH -  1);
-    };
-    __tmp__FGLC=(void *)((unsigned long)p__TELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
-    a__SRH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    last__MOHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__0ELC + a__SRH) & (__UINTEGER_32)(~ a__SRH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
-    ((__POINTER *)__tmp__FGLC)[ 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__MOHD)[ 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__MOHD)[ 0]=__tmp__FGLC;
+  void *mem__IFLC,*result__HOIH,*nxt__RDED,*result__SDED,*result__KOIH;
+  void *next__ICND,*new_free__HCND,*prev__UIFH,*next__VIFH;
+  __POINTER result__JFLC,result__FNDH,ptr_table__DOIH,next__COIH;
+  __POINTER result__EOIH,__tmp__NGLC,last__UOHD,src__3AED,dst__4AED;
+  __UINTEGER_32 a__THFH,old_size__5ELC,old_size2__CFLC,a__XHFH;
+  __UINTEGER_32 new_size__FFLC,a__1HFH,new_size__HNDH,new_size2__INDH;
+  __UINTEGER_32 a__5HFH,new_size__AIFH,a__0RH,__tmp__0GLC,sz__WDED;
+  __UINTEGER_32 old_size__TDED,prev__JCND,new_size__MCND;
+  __INTEGER siz__XHHH,Self__2HHH,siz__CBED,Self__HMHD;
+  __MEMORY *Self__NDED;
+  __POINTER *na_src__ZHHH,*na_dst__1HHH,*na_src__ABED,*na_dst__BBED;
+  mem__IFLC=NULL;
+  result__JFLC=((__POINTER )(NULL));
+  a__THFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__5ELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__2ELC + a__THFH) & (__UINTEGER_32)(~ a__THFH));
+  old_size2__CFLC=(__UINTEGER_32)(old_size__5ELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__XHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FFLC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__3ELC + a__XHFH) & (__UINTEGER_32)(~ a__XHFH));
+  if ((old_size2__CFLC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__FNDH=((__POINTER )(NULL));
+    a__1HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HNDH=(__UINTEGER_32)((__UINTEGER_32)(new_size__FFLC + a__1HFH) & (__UINTEGER_32)(~ a__1HFH));
+    new_size2__INDH=(__UINTEGER_32)(new_size__HNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__INDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__5HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AIFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__INDH + a__5HFH) & (__UINTEGER_32)(~ a__5HFH));
+      ptr_table__DOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__COIH=((__POINTER )(NULL));
+      result__EOIH=((__POINTER *)ptr_table__DOIH)[ 0];
+      if ((result__EOIH == (void *)NULL)) {
+        result__EOIH=new_lab__URJ(new_size__AIFH);
+        next__COIH=(void *)((unsigned long)result__EOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AIFH)));
+        ((__POINTER *)next__COIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DOIH)[ 0]=next__COIH;
+      } else {
+        next__COIH=((__POINTER *)result__EOIH)[ 0];
+        if ((next__COIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EOIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AIFH <<  1)) <=  4096)) {
+            next__COIH=(void *)((unsigned long)result__EOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AIFH)));
+          } else {
+            next__COIH=new_lab__URJ(new_size__AIFH);
+          };
+          ((__POINTER *)next__COIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DOIH)[ 0]=next__COIH;
+        } else {
+          ((__POINTER *)result__EOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__COIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EOIH=next__COIH;
+        };
+      };
+      ((__POINTER *)result__EOIH)[ 0]=((__POINTER ) 3);
+      result__FNDH=(void *)((unsigned long)result__EOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__HOIH=first_free__5DVB;
+      while ((((void *)result__HOIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HOIH)->map_size_and_id__QTB &  4294967292LU) < new_size__HNDH))) {
+        result__HOIH=((__MEMORY *)result__HOIH)->map_next_free__RTB;
+      };
+      if (((void *)result__HOIH == (void *)NULL)) {
+        result__HOIH=new_page__WA5();
+      };
+      to_busy__index__1TFC(result__HOIH,new_size__HNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HOIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+      result__FNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HOIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__JFLC=result__FNDH;
+    siz__XHHH=((__INTEGER )old_size__5ELC);
+    siz__XHHH=(__INTEGER)(siz__XHHH / ((__INTEGER )(sizeof(void *))));
+    na_src__ZHHH=((__POINTER *)p__1ELC);
+    na_dst__1HHH=((__POINTER *)result__FNDH);
+    Self__2HHH=(__INTEGER)(siz__XHHH -  1);
+    while ((Self__2HHH >=  0)) {
+      na_dst__1HHH[Self__2HHH]=na_src__ZHHH[Self__2HHH];
+      Self__2HHH=(__INTEGER)(Self__2HHH -  1);
+    };
+    __tmp__NGLC=(void *)((unsigned long)p__1ELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__0RH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__UOHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__CFLC + a__0RH) & (__UINTEGER_32)(~ a__0RH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__NGLC)[ 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__UOHD)[ 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__UOHD)[ 0]=__tmp__NGLC;
   } else {
-    mem__AFLC=((void *)(void *)((unsigned long)p__TELC - (unsigned long)((__POINTER ) 8)));
-    __tmp__SGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__TELC - (unsigned long)begin_memory__PVH)))) >>  26);
-    Self__FDED=((__MEMORY *)mem__AFLC);
-    nxt__JDED=NULL;
-    result__KDED=NULL;
-    sz__ODED= 0;
-    old_size__LDED=(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU);
-    if ((new_size__3ELC > old_size__LDED)) {
-      if ((! ((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0))) {
-        nxt__JDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
-        sz__ODED=(__UINTEGER_32)((__UINTEGER_32)(new_size__3ELC - old_size__LDED) -  8);
-        if ((((__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  4294967292LU) >= sz__ODED))) {
-          to_busy__index__TTFC(nxt__JDED,sz__ODED,__tmp__SGLC);
-          Self__FDED->map_size_and_id__ITB=(__UINTEGER_32)((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB + (__UINTEGER_32)(((__MEMORY *)nxt__JDED)->map_size_and_id__ITB &  4294967294LU)) +  8);
-          if (((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0)) {
-            last_block[(__tmp__SGLC)] = (Self__FDED);
-          } else {
-            nxt__JDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
-            ((__MEMORY *)nxt__JDED)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)begin_memory__PVH))));
-          };
-          result__KDED=Self__FDED;
-        };
-      };
-      if (((void *)result__KDED == (void *)NULL)) {
-        result__KMHH=first_free__XDVB;
-        while ((((void *)result__KMHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KMHH)->map_size_and_id__ITB &  4294967292LU) < new_size__3ELC))) {
-          result__KMHH=((__MEMORY *)result__KMHH)->map_next_free__JTB;
-        };
-        if (((void *)result__KMHH == (void *)NULL)) {
-          result__KMHH=new_page__OA5();
-        };
-        to_busy__index__TTFC(result__KMHH,new_size__3ELC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KMHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-        result__KDED=result__KMHH;
-        src__VAED=(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        dst__WAED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KMHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-        siz__0AED=((__INTEGER )old_size__LDED);
-        siz__0AED=(__INTEGER)(siz__0AED / ((__INTEGER )(sizeof(void *))));
-        na_src__YAED=((__POINTER *)src__VAED);
-        na_dst__ZAED=((__POINTER *)dst__WAED);
-        Self__5LHD=(__INTEGER)(siz__0AED -  1);
-        while ((Self__5LHD >=  0)) {
-          na_dst__ZAED[Self__5LHD]=na_src__YAED[Self__5LHD];
-          Self__5LHD=(__INTEGER)(Self__5LHD -  1);
-        };
-        prev__BCND=Self__FDED->map_previous_linear__HTB;
-        next__ACND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
-        new_free__5BND=((void *)(void *)((unsigned long)begin_memory__PVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__BCND))));
-        new_size__ECND=(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967294LU);
-        if (((prev__BCND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__5BND)->map_size_and_id__ITB &  1) !=  0))) {
-          new_free__5BND=Self__FDED;
-          Self__FDED->map_next_free__JTB=first_free__XDVB;
-          Self__FDED->map_previous_free__KTB=NULL;
-          if (((void *)first_free__XDVB != (void *)NULL)) {
-            ((__MEMORY *)first_free__XDVB)->map_previous_free__KTB=Self__FDED;
-          };
-          first_free__XDVB=Self__FDED;
-        } else {
-          new_size__ECND=(__UINTEGER_32)((__UINTEGER_32)(new_size__ECND + ((__MEMORY *)new_free__5BND)->map_size_and_id__ITB) +  8);
-        };
-        if (((! ((__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__ACND)->map_size_and_id__ITB &  1) ==  0))) {
-          new_size__ECND=(__UINTEGER_32)((__UINTEGER_32)(new_size__ECND + ((__MEMORY *)next__ACND)->map_size_and_id__ITB) +  8);
-          prev__EHEH=((__MEMORY *)next__ACND)->map_previous_free__KTB;
-          next__FHEH=((__MEMORY *)next__ACND)->map_next_free__JTB;
-          if (((void *)prev__EHEH == (void *)NULL)) {
-            first_free__XDVB=next__FHEH;
-          } else {
-            ((__MEMORY *)prev__EHEH)->map_next_free__JTB=next__FHEH;
-          };
-          if (((void *)next__FHEH != (void *)NULL)) {
-            ((__MEMORY *)next__FHEH)->map_previous_free__KTB=prev__EHEH;
-          };
-        };
-        ((__MEMORY *)new_free__5BND)->map_size_and_id__ITB=new_size__ECND;
-        if (((__UINTEGER_32)(((__MEMORY *)new_free__5BND)->map_size_and_id__ITB &  2) !=  0)) {
-          last_block[(__tmp__SGLC)] = (new_free__5BND);
-        } else {
-          next__ACND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__FDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__FDED->map_size_and_id__ITB &  4294967292LU)))));
-          ((__MEMORY *)next__ACND)->map_previous_linear__HTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__5BND) - (unsigned long)begin_memory__PVH))));
-        };
-      };
-    } else {
-      result__KDED=Self__FDED;
-    };
-    result__BFLC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KDED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
-  };
-  return(result__BFLC);
+    mem__IFLC=((void *)(void *)((unsigned long)p__1ELC - (unsigned long)((__POINTER ) 8)));
+    __tmp__0GLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__1ELC - (unsigned long)begin_memory__XVH)))) >>  26);
+    Self__NDED=((__MEMORY *)mem__IFLC);
+    nxt__RDED=NULL;
+    result__SDED=NULL;
+    sz__WDED= 0;
+    old_size__TDED=(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967292LU);
+    if ((new_size__FFLC > old_size__TDED)) {
+      if ((! ((__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  2) !=  0))) {
+        nxt__RDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967292LU)))));
+        sz__WDED=(__UINTEGER_32)((__UINTEGER_32)(new_size__FFLC - old_size__TDED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__RDED)->map_size_and_id__QTB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__RDED)->map_size_and_id__QTB &  4294967292LU) >= sz__WDED))) {
+          to_busy__index__1TFC(nxt__RDED,sz__WDED,__tmp__0GLC);
+          Self__NDED->map_size_and_id__QTB=(__UINTEGER_32)((__UINTEGER_32)(Self__NDED->map_size_and_id__QTB + (__UINTEGER_32)(((__MEMORY *)nxt__RDED)->map_size_and_id__QTB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  2) !=  0)) {
+            last_block[(__tmp__0GLC)] = (Self__NDED);
+          } else {
+            nxt__RDED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967292LU)))));
+            ((__MEMORY *)nxt__RDED)->map_previous_linear__PTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)begin_memory__XVH))));
+          };
+          result__SDED=Self__NDED;
+        };
+      };
+      if (((void *)result__SDED == (void *)NULL)) {
+        result__KOIH=first_free__5DVB;
+        while ((((void *)result__KOIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KOIH)->map_size_and_id__QTB &  4294967292LU) < new_size__FFLC))) {
+          result__KOIH=((__MEMORY *)result__KOIH)->map_next_free__RTB;
+        };
+        if (((void *)result__KOIH == (void *)NULL)) {
+          result__KOIH=new_page__WA5();
+        };
+        to_busy__index__1TFC(result__KOIH,new_size__FFLC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KOIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+        result__SDED=result__KOIH;
+        src__3AED=(void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__4AED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KOIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__CBED=((__INTEGER )old_size__TDED);
+        siz__CBED=(__INTEGER)(siz__CBED / ((__INTEGER )(sizeof(void *))));
+        na_src__ABED=((__POINTER *)src__3AED);
+        na_dst__BBED=((__POINTER *)dst__4AED);
+        Self__HMHD=(__INTEGER)(siz__CBED -  1);
+        while ((Self__HMHD >=  0)) {
+          na_dst__BBED[Self__HMHD]=na_src__ABED[Self__HMHD];
+          Self__HMHD=(__INTEGER)(Self__HMHD -  1);
+        };
+        prev__JCND=Self__NDED->map_previous_linear__PTB;
+        next__ICND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967292LU)))));
+        new_free__HCND=((void *)(void *)((unsigned long)begin_memory__XVH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__JCND))));
+        new_size__MCND=(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967294LU);
+        if (((prev__JCND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__HCND)->map_size_and_id__QTB &  1) !=  0))) {
+          new_free__HCND=Self__NDED;
+          Self__NDED->map_next_free__RTB=first_free__5DVB;
+          Self__NDED->map_previous_free__STB=NULL;
+          if (((void *)first_free__5DVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__5DVB)->map_previous_free__STB=Self__NDED;
+          };
+          first_free__5DVB=Self__NDED;
+        } else {
+          new_size__MCND=(__UINTEGER_32)((__UINTEGER_32)(new_size__MCND + ((__MEMORY *)new_free__HCND)->map_size_and_id__QTB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__ICND)->map_size_and_id__QTB &  1) ==  0))) {
+          new_size__MCND=(__UINTEGER_32)((__UINTEGER_32)(new_size__MCND + ((__MEMORY *)next__ICND)->map_size_and_id__QTB) +  8);
+          prev__UIFH=((__MEMORY *)next__ICND)->map_previous_free__STB;
+          next__VIFH=((__MEMORY *)next__ICND)->map_next_free__RTB;
+          if (((void *)prev__UIFH == (void *)NULL)) {
+            first_free__5DVB=next__VIFH;
+          } else {
+            ((__MEMORY *)prev__UIFH)->map_next_free__RTB=next__VIFH;
+          };
+          if (((void *)next__VIFH != (void *)NULL)) {
+            ((__MEMORY *)next__VIFH)->map_previous_free__STB=prev__UIFH;
+          };
+        };
+        ((__MEMORY *)new_free__HCND)->map_size_and_id__QTB=new_size__MCND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__HCND)->map_size_and_id__QTB &  2) !=  0)) {
+          last_block[(__tmp__0GLC)] = (new_free__HCND);
+        } else {
+          next__ICND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NDED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NDED->map_size_and_id__QTB &  4294967292LU)))));
+          ((__MEMORY *)next__ICND)->map_previous_linear__PTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__HCND) - (unsigned long)begin_memory__XVH))));
+        };
+      };
+    } else {
+      result__SDED=Self__NDED;
+    };
+    result__JFLC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SDED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__JFLC);
 }
 
-static void** create__TBRB(__INTEGER nb_elements__VBRB)
+static void** create__1BRB(__INTEGER nb_elements__3BRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__VNCH,a__0NCH,new_size__WNCH,new_size2__XNCH,a__DIEH;
-  __UINTEGER_32 new_size__EIEH;
-  __POINTER result__UNCH,ptr_table__OMHH,next__NMHH,result__PMHH;
-  void *result__SMHH;
-  __INTEGER Self__E5MC;
-  void **Result__14TB;
-  sz__VNCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__VBRB * ((__INTEGER )(sizeof(void *)))));
-  result__UNCH=((__POINTER )(NULL));
-  a__0NCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__WNCH=(__UINTEGER_32)((__UINTEGER_32)(sz__VNCH + a__0NCH) & (__UINTEGER_32)(~ a__0NCH));
-  new_size2__XNCH=(__UINTEGER_32)(new_size__WNCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__XNCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__DIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__EIEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__XNCH + a__DIEH) & (__UINTEGER_32)(~ a__DIEH));
-    ptr_table__OMHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EIEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__NMHH=((__POINTER )(NULL));
-    result__PMHH=((__POINTER *)ptr_table__OMHH)[ 0];
-    if ((result__PMHH == (void *)NULL)) {
-      result__PMHH=new_lab__MRJ(new_size__EIEH);
-      next__NMHH=(void *)((unsigned long)result__PMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIEH)));
-      ((__POINTER *)next__NMHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__OMHH)[ 0]=next__NMHH;
-    } else {
-      next__NMHH=((__POINTER *)result__PMHH)[ 0];
-      if ((next__NMHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EIEH <<  1)) <=  4096)) {
-          next__NMHH=(void *)((unsigned long)result__PMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIEH)));
-        } else {
-          next__NMHH=new_lab__MRJ(new_size__EIEH);
-        };
-        ((__POINTER *)next__NMHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OMHH)[ 0]=next__NMHH;
-      } else {
-        ((__POINTER *)result__PMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__PMHH=next__NMHH;
-      };
-    };
-    ((__POINTER *)result__PMHH)[ 0]=((__POINTER ) 3);
-    result__UNCH=(void *)((unsigned long)result__PMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__RNDH,a__WNDH,new_size__SNDH,new_size2__TNDH,a__TJFH;
+  __UINTEGER_32 new_size__UJFH;
+  __POINTER result__QNDH,ptr_table__OOIH,next__NOIH,result__POIH;
+  void *result__SOIH;
+  __INTEGER Self__M5MC;
+  void **Result__D5TB;
+  sz__RNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3BRB * ((__INTEGER )(sizeof(void *)))));
+  result__QNDH=((__POINTER )(NULL));
+  a__WNDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNDH + a__WNDH) & (__UINTEGER_32)(~ a__WNDH));
+  new_size2__TNDH=(__UINTEGER_32)(new_size__SNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__TNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__TJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__UJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__TNDH + a__TJFH) & (__UINTEGER_32)(~ a__TJFH));
+    ptr_table__OOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__NOIH=((__POINTER )(NULL));
+    result__POIH=((__POINTER *)ptr_table__OOIH)[ 0];
+    if ((result__POIH == (void *)NULL)) {
+      result__POIH=new_lab__URJ(new_size__UJFH);
+      next__NOIH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJFH)));
+      ((__POINTER *)next__NOIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__OOIH)[ 0]=next__NOIH;
+    } else {
+      next__NOIH=((__POINTER *)result__POIH)[ 0];
+      if ((next__NOIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__POIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UJFH <<  1)) <=  4096)) {
+          next__NOIH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJFH)));
+        } else {
+          next__NOIH=new_lab__URJ(new_size__UJFH);
+        };
+        ((__POINTER *)next__NOIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OOIH)[ 0]=next__NOIH;
+      } else {
+        ((__POINTER *)result__POIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__POIH=next__NOIH;
+      };
+    };
+    ((__POINTER *)result__POIH)[ 0]=((__POINTER ) 3);
+    result__QNDH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__SMHH=first_free__XDVB;
-    while ((((void *)result__SMHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SMHH)->map_size_and_id__ITB &  4294967292LU) < new_size__WNCH))) {
-      result__SMHH=((__MEMORY *)result__SMHH)->map_next_free__JTB;
+    result__SOIH=first_free__5DVB;
+    while ((((void *)result__SOIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SOIH)->map_size_and_id__QTB &  4294967292LU) < new_size__SNDH))) {
+      result__SOIH=((__MEMORY *)result__SOIH)->map_next_free__RTB;
     };
-    if (((void *)result__SMHH == (void *)NULL)) {
-      result__SMHH=new_page__OA5();
+    if (((void *)result__SOIH == (void *)NULL)) {
+      result__SOIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__SMHH,new_size__WNCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SMHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__UNCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SMHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__SOIH,new_size__SNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SOIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__QNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SOIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__14TB=((void **)result__UNCH);
-  Self__E5MC=(__INTEGER)(nb_elements__VBRB -  1);
-  while ((Self__E5MC >=  0)) {
-    Result__14TB[Self__E5MC]=NULL;
-    Self__E5MC=(__INTEGER)(Self__E5MC -  1);
+  Result__D5TB=((void **)result__QNDH);
+  Self__M5MC=(__INTEGER)(nb_elements__3BRB -  1);
+  while ((Self__M5MC >=  0)) {
+    Result__D5TB[Self__M5MC]=NULL;
+    Self__M5MC=(__INTEGER)(Self__M5MC -  1);
   };
-  return(Result__14TB);
+  return(Result__D5TB);
 }
 
-static void* fast_reference_at__Y1T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__Z1T,void *k__01T)
+static void* fast_reference_at__A2T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__B2T,void *k__C2T)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__F2T;
-  __STRING_CONSTANT *Self__OGGH;
-  __INTEGER result__NGGH,__tmp__PGGH,Self__QGGH;
-  void *node__E2T;
-  result__F2T=NULL;
-  Self__OGGH=((__STRING_CONSTANT *)k__01T);
-  result__NGGH= 0;
-  __tmp__PGGH=Self__OGGH->count__DD;
-  Self__QGGH= 1;
-  while ((Self__QGGH <= __tmp__PGGH)) {
-    result__NGGH=(__INTEGER)((__INTEGER)( 5 * result__NGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OGGH->storage__VQO)[(__INTEGER)(Self__QGGH -  1)])));
-    Self__QGGH=(__INTEGER)(Self__QGGH +  1);
-  };
-  if ((result__NGGH <  0)) {
-    result__NGGH=(__INTEGER)(~ result__NGGH);
-  };
-  node__E2T=((void **)Self__Z1T->buckets__M2T)[(__INTEGER)(result__NGGH % Self__Z1T->capacity__H2T)];
-  while ((! (((void *)node__E2T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->key__Y2T == (void *)k__01T)))) {
-    node__E2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->next__D3T;
-  };
-  if (((void *)node__E2T != (void *)NULL)) {
-    result__F2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__E2T)->item__L3T;
-  };
-  return(result__F2T);
+  void *result__N2T;
+  __STRING_CONSTANT *Self__JIHH;
+  __INTEGER result__IIHH,__tmp__KIHH,Self__LIHH;
+  void *node__M2T;
+  result__N2T=NULL;
+  Self__JIHH=((__STRING_CONSTANT *)k__C2T);
+  result__IIHH= 0;
+  __tmp__KIHH=Self__JIHH->count__DD;
+  Self__LIHH= 1;
+  while ((Self__LIHH <= __tmp__KIHH)) {
+    result__IIHH=(__INTEGER)((__INTEGER)( 5 * result__IIHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JIHH->storage__3QO)[(__INTEGER)(Self__LIHH -  1)])));
+    Self__LIHH=(__INTEGER)(Self__LIHH +  1);
+  };
+  if ((result__IIHH <  0)) {
+    result__IIHH=(__INTEGER)(~ result__IIHH);
+  };
+  node__M2T=((void **)Self__B2T->buckets__U2T)[(__INTEGER)(result__IIHH % Self__B2T->capacity__P2T)];
+  while ((! (((void *)node__M2T == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__M2T)->key__A3T == (void *)k__C2T)))) {
+    node__M2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__M2T)->next__L3T;
+  };
+  if (((void *)node__M2T != (void *)NULL)) {
+    result__N2T=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__M2T)->item__T3T;
+  };
+  return(result__N2T);
 }
 
-static void** create__RLHE(__INTEGER nb_elements__TLHE)
+static void** create__OJHE(__INTEGER nb_elements__QJHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__3NCH,a__COCH,new_size__4NCH,new_size2__5NCH,a__EJEH;
-  __UINTEGER_32 new_size__FJEH;
-  __POINTER result__2NCH,ptr_table__WMHH,next__VMHH,result__XMHH;
-  void *result__0MHH;
-  __INTEGER Self__TCYE;
-  void **Result__T3ME;
-  sz__3NCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TLHE * ((__INTEGER )(sizeof(void *)))));
-  result__2NCH=((__POINTER )(NULL));
-  a__COCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__4NCH=(__UINTEGER_32)((__UINTEGER_32)(sz__3NCH + a__COCH) & (__UINTEGER_32)(~ a__COCH));
-  new_size2__5NCH=(__UINTEGER_32)(new_size__4NCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__5NCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__EJEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__FJEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5NCH + a__EJEH) & (__UINTEGER_32)(~ a__EJEH));
-    ptr_table__WMHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FJEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__VMHH=((__POINTER )(NULL));
-    result__XMHH=((__POINTER *)ptr_table__WMHH)[ 0];
-    if ((result__XMHH == (void *)NULL)) {
-      result__XMHH=new_lab__MRJ(new_size__FJEH);
-      next__VMHH=(void *)((unsigned long)result__XMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJEH)));
-      ((__POINTER *)next__VMHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__WMHH)[ 0]=next__VMHH;
-    } else {
-      next__VMHH=((__POINTER *)result__XMHH)[ 0];
-      if ((next__VMHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XMHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FJEH <<  1)) <=  4096)) {
-          next__VMHH=(void *)((unsigned long)result__XMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJEH)));
-        } else {
-          next__VMHH=new_lab__MRJ(new_size__FJEH);
-        };
-        ((__POINTER *)next__VMHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WMHH)[ 0]=next__VMHH;
-      } else {
-        ((__POINTER *)result__XMHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VMHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__XMHH=next__VMHH;
-      };
-    };
-    ((__POINTER *)result__XMHH)[ 0]=((__POINTER ) 3);
-    result__2NCH=(void *)((unsigned long)result__XMHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__ZNDH,a__4NDH,new_size__0NDH,new_size2__1NDH,a__UKFH;
+  __UINTEGER_32 new_size__VKFH;
+  __POINTER result__YNDH,ptr_table__WOIH,next__VOIH,result__XOIH;
+  void *result__0OIH;
+  __INTEGER Self__WCYE;
+  void **Result__LZME;
+  sz__ZNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QJHE * ((__INTEGER )(sizeof(void *)))));
+  result__YNDH=((__POINTER )(NULL));
+  a__4NDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0NDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZNDH + a__4NDH) & (__UINTEGER_32)(~ a__4NDH));
+  new_size2__1NDH=(__UINTEGER_32)(new_size__0NDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1NDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__UKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1NDH + a__UKFH) & (__UINTEGER_32)(~ a__UKFH));
+    ptr_table__WOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__VOIH=((__POINTER )(NULL));
+    result__XOIH=((__POINTER *)ptr_table__WOIH)[ 0];
+    if ((result__XOIH == (void *)NULL)) {
+      result__XOIH=new_lab__URJ(new_size__VKFH);
+      next__VOIH=(void *)((unsigned long)result__XOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKFH)));
+      ((__POINTER *)next__VOIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__WOIH)[ 0]=next__VOIH;
+    } else {
+      next__VOIH=((__POINTER *)result__XOIH)[ 0];
+      if ((next__VOIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XOIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VKFH <<  1)) <=  4096)) {
+          next__VOIH=(void *)((unsigned long)result__XOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKFH)));
+        } else {
+          next__VOIH=new_lab__URJ(new_size__VKFH);
+        };
+        ((__POINTER *)next__VOIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WOIH)[ 0]=next__VOIH;
+      } else {
+        ((__POINTER *)result__XOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__XOIH=next__VOIH;
+      };
+    };
+    ((__POINTER *)result__XOIH)[ 0]=((__POINTER ) 3);
+    result__YNDH=(void *)((unsigned long)result__XOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__0MHH=first_free__XDVB;
-    while ((((void *)result__0MHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0MHH)->map_size_and_id__ITB &  4294967292LU) < new_size__4NCH))) {
-      result__0MHH=((__MEMORY *)result__0MHH)->map_next_free__JTB;
+    result__0OIH=first_free__5DVB;
+    while ((((void *)result__0OIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0OIH)->map_size_and_id__QTB &  4294967292LU) < new_size__0NDH))) {
+      result__0OIH=((__MEMORY *)result__0OIH)->map_next_free__RTB;
     };
-    if (((void *)result__0MHH == (void *)NULL)) {
-      result__0MHH=new_page__OA5();
+    if (((void *)result__0OIH == (void *)NULL)) {
+      result__0OIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__0MHH,new_size__4NCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0MHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__2NCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0MHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__0OIH,new_size__0NDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0OIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__YNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0OIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__T3ME=((void **)result__2NCH);
-  Self__TCYE=(__INTEGER)(nb_elements__TLHE -  1);
-  while ((Self__TCYE >=  0)) {
-    Result__T3ME[Self__TCYE]=NULL;
-    Self__TCYE=(__INTEGER)(Self__TCYE -  1);
+  Result__LZME=((void **)result__YNDH);
+  Self__WCYE=(__INTEGER)(nb_elements__QJHE -  1);
+  while ((Self__WCYE >=  0)) {
+    Result__LZME[Self__WCYE]=NULL;
+    Self__WCYE=(__INTEGER)(Self__WCYE -  1);
   };
-  return(Result__T3ME);
+  return(Result__LZME);
 }
 
-static __BOOLEAN has__1PW(__HASHED_SEToABSTRACT_STRINGo *Self__2PW,void *e__3PW)
+static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__SGGH,__tmp__UGGH,Self__VGGH;
-  void *node__GQW;
-  result__SGGH= 0;
-  __tmp__UGGH=((__STRING_CONSTANT *)e__3PW)->count__DD;
-  Self__VGGH= 1;
-  while ((Self__VGGH <= __tmp__UGGH)) {
-    result__SGGH=(__INTEGER)((__INTEGER)( 5 * result__SGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__3PW)->storage__VQO)[(__INTEGER)(Self__VGGH -  1)])));
-    Self__VGGH=(__INTEGER)(Self__VGGH +  1);
-  };
-  if ((result__SGGH <  0)) {
-    result__SGGH=(__INTEGER)(~ result__SGGH);
-  };
-  node__GQW=((void **)Self__2PW->buckets__4YR)[(__INTEGER)(result__SGGH % Self__2PW->capacity__ZYR)];
-  while ((! (((void *)node__GQW == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__GQW)->item__KZR,e__3PW)))) {
-    node__GQW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__GQW)->next__WZR;
-  };
-  return(((void *)node__GQW != (void *)NULL));
+  __INTEGER result__NIHH,__tmp__PIHH,Self__QIHH;
+  void *node__OQW;
+  result__NIHH= 0;
+  __tmp__PIHH=((__STRING_CONSTANT *)e__FQW)->count__DD;
+  Self__QIHH= 1;
+  while ((Self__QIHH <= __tmp__PIHH)) {
+    result__NIHH=(__INTEGER)((__INTEGER)( 5 * result__NIHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__FQW)->storage__3QO)[(__INTEGER)(Self__QIHH -  1)])));
+    Self__QIHH=(__INTEGER)(Self__QIHH +  1);
+  };
+  if ((result__NIHH <  0)) {
+    result__NIHH=(__INTEGER)(~ result__NIHH);
+  };
+  node__OQW=((void **)Self__EQW->buckets__GZR)[(__INTEGER)(result__NIHH % Self__EQW->capacity__BZR)];
+  while ((! (((void *)node__OQW == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OQW)->item__SZR,e__FQW)))) {
+    node__OQW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__OQW)->next__4ZR;
+  };
+  return(((void *)node__OQW != (void *)NULL));
 }
 
-static void increase_capacity__4RNB(__HASHED_SEToABSTRACT_STRINGo *Self__5RNB)
+static void increase_capacity__GSNB(__HASHED_SEToABSTRACT_STRINGo *Self__HSNB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER idx__BSNB,new_capacity__CSNB,i__ASNB,result__XGGH;
-  __INTEGER __tmp__ZGGH,Self__0GGH;
-  __STRING_CONSTANT *Self__YGGH;
-  void *node1__ESNB,*node2__FSNB;
-  void **old_buckets__DSNB;
-  idx__BSNB= 0;
-  node1__ESNB=NULL;
-  node2__FSNB=NULL;
-  new_capacity__CSNB=prime_number_ceiling__X41((__INTEGER)(Self__5RNB->capacity__ZYR +  1));
-  old_buckets__DSNB=Self__5RNB->buckets__4YR;
-  Self__5RNB->buckets__4YR=create__BK2(new_capacity__CSNB);
-  i__ASNB=(__INTEGER)(Self__5RNB->capacity__ZYR -  1);
-  Self__5RNB->capacity__ZYR=new_capacity__CSNB;
-  while ((i__ASNB >=  0)) {
-    node1__ESNB=((void **)old_buckets__DSNB)[i__ASNB];
-    while (((void *)node1__ESNB != (void *)NULL)) {
-      node2__FSNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->next__WZR;
-      Self__YGGH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->item__KZR);
-      result__XGGH= 0;
-      __tmp__ZGGH=Self__YGGH->count__DD;
-      Self__0GGH= 1;
-      while ((Self__0GGH <= __tmp__ZGGH)) {
-        result__XGGH=(__INTEGER)((__INTEGER)( 5 * result__XGGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YGGH->storage__VQO)[(__INTEGER)(Self__0GGH -  1)])));
-        Self__0GGH=(__INTEGER)(Self__0GGH +  1);
-      };
-      if ((result__XGGH <  0)) {
-        result__XGGH=(__INTEGER)(~ result__XGGH);
-      };
-      idx__BSNB=(__INTEGER)(result__XGGH % Self__5RNB->capacity__ZYR);
-      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__ESNB)->next__WZR=((void **)Self__5RNB->buckets__4YR)[idx__BSNB];
-      ((void **)Self__5RNB->buckets__4YR)[idx__BSNB]=node1__ESNB;
-      node1__ESNB=node2__FSNB;
-    };
-    i__ASNB=(__INTEGER)(i__ASNB -  1);
+  __INTEGER idx__JSNB,new_capacity__KSNB,i__ISNB,result__SIHH;
+  __INTEGER __tmp__UIHH,Self__VIHH;
+  __STRING_CONSTANT *Self__TIHH;
+  void *node1__MSNB,*node2__NSNB;
+  void **old_buckets__LSNB;
+  idx__JSNB= 0;
+  node1__MSNB=NULL;
+  node2__NSNB=NULL;
+  new_capacity__KSNB=prime_number_ceiling__541((__INTEGER)(Self__HSNB->capacity__BZR +  1));
+  old_buckets__LSNB=Self__HSNB->buckets__GZR;
+  Self__HSNB->buckets__GZR=create__JK2(new_capacity__KSNB);
+  i__ISNB=(__INTEGER)(Self__HSNB->capacity__BZR -  1);
+  Self__HSNB->capacity__BZR=new_capacity__KSNB;
+  while ((i__ISNB >=  0)) {
+    node1__MSNB=((void **)old_buckets__LSNB)[i__ISNB];
+    while (((void *)node1__MSNB != (void *)NULL)) {
+      node2__NSNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__MSNB)->next__4ZR;
+      Self__TIHH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__MSNB)->item__SZR);
+      result__SIHH= 0;
+      __tmp__UIHH=Self__TIHH->count__DD;
+      Self__VIHH= 1;
+      while ((Self__VIHH <= __tmp__UIHH)) {
+        result__SIHH=(__INTEGER)((__INTEGER)( 5 * result__SIHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TIHH->storage__3QO)[(__INTEGER)(Self__VIHH -  1)])));
+        Self__VIHH=(__INTEGER)(Self__VIHH +  1);
+      };
+      if ((result__SIHH <  0)) {
+        result__SIHH=(__INTEGER)(~ result__SIHH);
+      };
+      idx__JSNB=(__INTEGER)(result__SIHH % Self__HSNB->capacity__BZR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__MSNB)->next__4ZR=((void **)Self__HSNB->buckets__GZR)[idx__JSNB];
+      ((void **)Self__HSNB->buckets__GZR)[idx__JSNB]=node1__MSNB;
+      node1__MSNB=node2__NSNB;
+    };
+    i__ISNB=(__INTEGER)(i__ISNB -  1);
   };
 }
 
-static void put_string__YHF(void *s__0HF)
+static void put_string__AIF(void *s__CIF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__LIF,Self__5AG,limit_up__ABG;
-  __CHARACTER __tmp__SIF;
-  if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__TIF,Self__HBG,limit_up__IBG;
+  __CHARACTER __tmp__0IF;
+  if (((struct ___OBJ *)s__CIF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
-    __tmp__LIF=((__STRING_CONSTANT *)s__0HF)->count__DD;
+  if (((struct ___OBJ *)s__CIF)->__id==__STRING_CONSTANT__) {
+    __tmp__TIF=((__STRING_CONSTANT *)s__CIF)->count__DD;
   } else {
-    __tmp__LIF=((__STRING *)s__0HF)->count__WFC;
+    __tmp__TIF=((__STRING *)s__CIF)->count__4FC;
   };
-  Self__5AG= 1;
-  limit_up__ABG=__tmp__LIF;
-  while ((Self__5AG <= limit_up__ABG)) {
-    if (((struct ___OBJ *)s__0HF)->__id==__STRING_CONSTANT__) {
-      __tmp__SIF=((__CHARACTER *)((__STRING_CONSTANT *)s__0HF)->storage__VQO)[(__INTEGER)(Self__5AG -  1)];
+  Self__HBG= 1;
+  limit_up__IBG=__tmp__TIF;
+  while ((Self__HBG <= limit_up__IBG)) {
+    if (((struct ___OBJ *)s__CIF)->__id==__STRING_CONSTANT__) {
+      __tmp__0IF=((__CHARACTER *)((__STRING_CONSTANT *)s__CIF)->storage__3QO)[(__INTEGER)(Self__HBG -  1)];
     } else {
-      __tmp__SIF=((__CHARACTER *)((__STRING *)s__0HF)->storage__BCS)[(__INTEGER)(Self__5AG -  1)];
+      __tmp__0IF=((__CHARACTER *)((__STRING *)s__CIF)->storage__JCS)[(__INTEGER)(Self__HBG -  1)];
     };
-    fputc((int)(__tmp__SIF),stdout);
-    Self__5AG=(__INTEGER)(Self__5AG +  1);
+    fputc((int)(__tmp__0IF),stdout);
+    Self__HBG=(__INTEGER)(Self__HBG +  1);
   };
 }
 
-static __BOOLEAN fast_has__OAY(__HASHED_SEToABSTRACT_STRINGo *Self__PAY,void *e__QAY)
+static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__3GGH;
-  __INTEGER result__2GGH,__tmp__4GGH,Self__5GGH;
-  void *node__ZAY;
-  Self__3GGH=((__STRING_CONSTANT *)e__QAY);
-  result__2GGH= 0;
-  __tmp__4GGH=Self__3GGH->count__DD;
-  Self__5GGH= 1;
-  while ((Self__5GGH <= __tmp__4GGH)) {
-    result__2GGH=(__INTEGER)((__INTEGER)( 5 * result__2GGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3GGH->storage__VQO)[(__INTEGER)(Self__5GGH -  1)])));
-    Self__5GGH=(__INTEGER)(Self__5GGH +  1);
-  };
-  if ((result__2GGH <  0)) {
-    result__2GGH=(__INTEGER)(~ result__2GGH);
-  };
-  node__ZAY=((void **)Self__PAY->buckets__4YR)[(__INTEGER)(result__2GGH % Self__PAY->capacity__ZYR)];
-  while ((! (((void *)node__ZAY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZAY)->item__KZR == (void *)e__QAY)))) {
-    node__ZAY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZAY)->next__WZR;
-  };
-  return(((void *)node__ZAY != (void *)NULL));
+  __STRING_CONSTANT *Self__YIHH;
+  __INTEGER result__XIHH,__tmp__ZIHH,Self__0IHH;
+  void *node__BBY;
+  Self__YIHH=((__STRING_CONSTANT *)e__YAY);
+  result__XIHH= 0;
+  __tmp__ZIHH=Self__YIHH->count__DD;
+  Self__0IHH= 1;
+  while ((Self__0IHH <= __tmp__ZIHH)) {
+    result__XIHH=(__INTEGER)((__INTEGER)( 5 * result__XIHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YIHH->storage__3QO)[(__INTEGER)(Self__0IHH -  1)])));
+    Self__0IHH=(__INTEGER)(Self__0IHH +  1);
+  };
+  if ((result__XIHH <  0)) {
+    result__XIHH=(__INTEGER)(~ result__XIHH);
+  };
+  node__BBY=((void **)Self__XAY->buckets__GZR)[(__INTEGER)(result__XIHH % Self__XAY->capacity__BZR)];
+  while ((! (((void *)node__BBY == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__BBY)->item__SZR == (void *)e__YAY)))) {
+    node__BBY=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__BBY)->next__4ZR;
+  };
+  return(((void *)node__BBY != (void *)NULL));
 }
 
-static void* physical_get_entry__JCF(void *new_path__LCF)
+static void* physical_get_entry__RCF(void *new_path__TCF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__OCF;
-  __STRING *Self__0JEH;
-  __FILE_UNIX *result__3MHH;
-  __POINTER ptr__4MHH,ptr_table__GNHH,next__FNHH,result__HNHH;
-  __POINTER ptr_table__LNHH,next__KNHH,result__MNHH,ptr__QNHH;
-  __POINTER ptr_table__YNHH,next__XNHH,result__ZNHH,ptr_table__3NHH;
-  __POINTER next__2NHH,result__4NHH;
-  __INTEGER typ_id__5MHH,typ_id__RNHH;
-  __UINTEGER_32 sz__ANHH,a__BNHH,new_size__CNHH,t__DNHH,a__ENHH;
-  __UINTEGER_32 new_size__ONHH,lab_type__NNHH,sz__SNHH,a__TNHH;
-  __UINTEGER_32 new_size__UNHH,t__VNHH,a__WNHH,new_size__AOHH;
-  __UINTEGER_32 lab_type__5NHH;
-  __DIRECTORY_UNIX *result__PNHH;
-  void *__tmp__HDF;
-  __CHARACTER *pe__NCF;
-  result__OCF=NULL;
-  Self__0JEH=((__STRING *)new_path__LCF);
-  if ((Self__0JEH->capacity__YBS > Self__0JEH->count__WFC)) {
-    ((__CHARACTER *)Self__0JEH->storage__BCS)[Self__0JEH->count__WFC]='\0';
+  void *result__WCF;
+  __STRING *Self__KLFH;
+  __FILE_UNIX *result__3OIH;
+  __POINTER ptr__4OIH,ptr_table__GPIH,next__FPIH,result__HPIH;
+  __POINTER ptr_table__LPIH,next__KPIH,result__MPIH,ptr__QPIH;
+  __POINTER ptr_table__YPIH,next__XPIH,result__ZPIH,ptr_table__3PIH;
+  __POINTER next__2PIH,result__4PIH;
+  __INTEGER typ_id__5OIH,typ_id__RPIH;
+  __UINTEGER_32 sz__APIH,a__BPIH,new_size__CPIH,t__DPIH,a__EPIH;
+  __UINTEGER_32 new_size__OPIH,lab_type__NPIH,sz__SPIH,a__TPIH;
+  __UINTEGER_32 new_size__UPIH,t__VPIH,a__WPIH,new_size__AQIH;
+  __UINTEGER_32 lab_type__5PIH;
+  __DIRECTORY_UNIX *result__PPIH;
+  void *__tmp__PDF;
+  __CHARACTER *pe__VCF;
+  result__WCF=NULL;
+  Self__KLFH=((__STRING *)new_path__TCF);
+  if ((Self__KLFH->capacity__ACS > Self__KLFH->count__4FC)) {
+    ((__CHARACTER *)Self__KLFH->storage__JCS)[Self__KLFH->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__0JEH,'\0');
-    Self__0JEH->count__WFC=(__INTEGER)(Self__0JEH->count__WFC -  1);
+    add_last__BMT(Self__KLFH,'\0');
+    Self__KLFH->count__4FC=(__INTEGER)(Self__KLFH->count__4FC -  1);
   };
-  pe__NCF=Self__0JEH->storage__BCS;
+  pe__VCF=Self__KLFH->storage__JCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__NCF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__VCF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__3MHH=NULL;
-      ptr__4MHH=((__POINTER )(NULL));
-      typ_id__5MHH= 0;
-      sz__ANHH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__ANHH ==  0)) {
-        result__3MHH=FILE_UNIX__;
-      } else {
-        typ_id__5MHH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ANHH);
-        if ((typ_id__5MHH == (__INTEGER)(-  1))) {
-          a__BNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__CNHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ANHH + a__BNHH) & (__UINTEGER_32)(~ a__BNHH));
-          ptr_table__GNHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CNHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__FNHH=((__POINTER )(NULL));
-          result__HNHH=((__POINTER *)ptr_table__GNHH)[ 0];
-          if ((result__HNHH == (void *)NULL)) {
-            result__HNHH=new_lab__MRJ(new_size__CNHH);
-            next__FNHH=(void *)((unsigned long)result__HNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CNHH)));
-            ((__POINTER *)next__FNHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GNHH)[ 0]=next__FNHH;
-          } else {
-            next__FNHH=((__POINTER *)result__HNHH)[ 0];
-            if ((next__FNHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CNHH <<  1)) <=  4096)) {
-                next__FNHH=(void *)((unsigned long)result__HNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CNHH)));
+      result__3OIH=NULL;
+      ptr__4OIH=((__POINTER )(NULL));
+      typ_id__5OIH= 0;
+      sz__APIH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__APIH ==  0)) {
+        result__3OIH=FILE_UNIX__;
+      } else {
+        typ_id__5OIH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__APIH);
+        if ((typ_id__5OIH == (__INTEGER)(-  1))) {
+          a__BPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__APIH + a__BPIH) & (__UINTEGER_32)(~ a__BPIH));
+          ptr_table__GPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CPIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__FPIH=((__POINTER )(NULL));
+          result__HPIH=((__POINTER *)ptr_table__GPIH)[ 0];
+          if ((result__HPIH == (void *)NULL)) {
+            result__HPIH=new_lab__URJ(new_size__CPIH);
+            next__FPIH=(void *)((unsigned long)result__HPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CPIH)));
+            ((__POINTER *)next__FPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GPIH)[ 0]=next__FPIH;
+          } else {
+            next__FPIH=((__POINTER *)result__HPIH)[ 0];
+            if ((next__FPIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HPIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CPIH <<  1)) <=  4096)) {
+                next__FPIH=(void *)((unsigned long)result__HPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CPIH)));
               } else {
-                next__FNHH=new_lab__MRJ(new_size__CNHH);
+                next__FPIH=new_lab__URJ(new_size__CPIH);
               };
-              ((__POINTER *)next__FNHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GNHH)[ 0]=next__FNHH;
+              ((__POINTER *)next__FPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GPIH)[ 0]=next__FPIH;
             } else {
-              ((__POINTER *)result__HNHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__HNHH=next__FNHH;
-            };
-          };
-          ptr__4MHH=result__HNHH;
-        } else {
-          t__DNHH=((__UINTEGER_32 )typ_id__5MHH);
-          a__ENHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ONHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ANHH + a__ENHH) & (__UINTEGER_32)(~ a__ENHH));
-          ptr_table__LNHH=((__POINTER )(&(table_type[(t__DNHH)])));
-          lab_type__NNHH=(__UINTEGER_32)(t__DNHH |  1);
-          next__KNHH=((__POINTER )(NULL));
-          result__MNHH=((__POINTER *)ptr_table__LNHH)[ 0];
-          if ((result__MNHH == (void *)NULL)) {
-            result__MNHH=new_lab__MRJ(lab_type__NNHH);
-            next__KNHH=(void *)((unsigned long)result__MNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ONHH)));
-            ((__POINTER *)next__KNHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LNHH)[ 0]=next__KNHH;
-          } else {
-            next__KNHH=((__POINTER *)result__MNHH)[ 0];
-            if ((next__KNHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MNHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ONHH <<  1)) <=  4096)) {
-                next__KNHH=(void *)((unsigned long)result__MNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ONHH)));
+              ((__POINTER *)result__HPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HPIH=next__FPIH;
+            };
+          };
+          ptr__4OIH=result__HPIH;
+        } else {
+          t__DPIH=((__UINTEGER_32 )typ_id__5OIH);
+          a__EPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__APIH + a__EPIH) & (__UINTEGER_32)(~ a__EPIH));
+          ptr_table__LPIH=((__POINTER )(&(table_type[(t__DPIH)])));
+          lab_type__NPIH=(__UINTEGER_32)(t__DPIH |  1);
+          next__KPIH=((__POINTER )(NULL));
+          result__MPIH=((__POINTER *)ptr_table__LPIH)[ 0];
+          if ((result__MPIH == (void *)NULL)) {
+            result__MPIH=new_lab__URJ(lab_type__NPIH);
+            next__KPIH=(void *)((unsigned long)result__MPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPIH)));
+            ((__POINTER *)next__KPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LPIH)[ 0]=next__KPIH;
+          } else {
+            next__KPIH=((__POINTER *)result__MPIH)[ 0];
+            if ((next__KPIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OPIH <<  1)) <=  4096)) {
+                next__KPIH=(void *)((unsigned long)result__MPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OPIH)));
               } else {
-                next__KNHH=new_lab__MRJ(lab_type__NNHH);
+                next__KPIH=new_lab__URJ(lab_type__NPIH);
               };
-              ((__POINTER *)next__KNHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LNHH)[ 0]=next__KNHH;
+              ((__POINTER *)next__KPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LPIH)[ 0]=next__KPIH;
             } else {
-              ((__POINTER *)result__MNHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MNHH=next__KNHH;
-            };
-          };
-          ptr__4MHH=result__MNHH;
-        };
-        result__3MHH=((__FILE_UNIX *)ptr__4MHH);
-        *(result__3MHH) = *(FILE_UNIX__);
-      };
-      result__OCF=result__3MHH;
-    } else {
-      result__PNHH=NULL;
-      ptr__QNHH=((__POINTER )(NULL));
-      typ_id__RNHH= 0;
-      sz__SNHH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__SNHH ==  0)) {
-        result__PNHH=DIRECTORY_UNIX__;
-      } else {
-        typ_id__RNHH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SNHH);
-        if ((typ_id__RNHH == (__INTEGER)(-  1))) {
-          a__TNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__UNHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SNHH + a__TNHH) & (__UINTEGER_32)(~ a__TNHH));
-          ptr_table__YNHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UNHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__XNHH=((__POINTER )(NULL));
-          result__ZNHH=((__POINTER *)ptr_table__YNHH)[ 0];
-          if ((result__ZNHH == (void *)NULL)) {
-            result__ZNHH=new_lab__MRJ(new_size__UNHH);
-            next__XNHH=(void *)((unsigned long)result__ZNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNHH)));
-            ((__POINTER *)next__XNHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YNHH)[ 0]=next__XNHH;
-          } else {
-            next__XNHH=((__POINTER *)result__ZNHH)[ 0];
-            if ((next__XNHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZNHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UNHH <<  1)) <=  4096)) {
-                next__XNHH=(void *)((unsigned long)result__ZNHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNHH)));
+              ((__POINTER *)result__MPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MPIH=next__KPIH;
+            };
+          };
+          ptr__4OIH=result__MPIH;
+        };
+        result__3OIH=((__FILE_UNIX *)ptr__4OIH);
+        *(result__3OIH) = *(FILE_UNIX__);
+      };
+      result__WCF=result__3OIH;
+    } else {
+      result__PPIH=NULL;
+      ptr__QPIH=((__POINTER )(NULL));
+      typ_id__RPIH= 0;
+      sz__SPIH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__SPIH ==  0)) {
+        result__PPIH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__RPIH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SPIH);
+        if ((typ_id__RPIH == (__INTEGER)(-  1))) {
+          a__TPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__UPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SPIH + a__TPIH) & (__UINTEGER_32)(~ a__TPIH));
+          ptr_table__YPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UPIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__XPIH=((__POINTER )(NULL));
+          result__ZPIH=((__POINTER *)ptr_table__YPIH)[ 0];
+          if ((result__ZPIH == (void *)NULL)) {
+            result__ZPIH=new_lab__URJ(new_size__UPIH);
+            next__XPIH=(void *)((unsigned long)result__ZPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UPIH)));
+            ((__POINTER *)next__XPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YPIH)[ 0]=next__XPIH;
+          } else {
+            next__XPIH=((__POINTER *)result__ZPIH)[ 0];
+            if ((next__XPIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZPIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UPIH <<  1)) <=  4096)) {
+                next__XPIH=(void *)((unsigned long)result__ZPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UPIH)));
               } else {
-                next__XNHH=new_lab__MRJ(new_size__UNHH);
+                next__XPIH=new_lab__URJ(new_size__UPIH);
               };
-              ((__POINTER *)next__XNHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YNHH)[ 0]=next__XNHH;
+              ((__POINTER *)next__XPIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YPIH)[ 0]=next__XPIH;
             } else {
-              ((__POINTER *)result__ZNHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XNHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ZNHH=next__XNHH;
-            };
-          };
-          ptr__QNHH=result__ZNHH;
-        } else {
-          t__VNHH=((__UINTEGER_32 )typ_id__RNHH);
-          a__WNHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__AOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SNHH + a__WNHH) & (__UINTEGER_32)(~ a__WNHH));
-          ptr_table__3NHH=((__POINTER )(&(table_type[(t__VNHH)])));
-          lab_type__5NHH=(__UINTEGER_32)(t__VNHH |  1);
-          next__2NHH=((__POINTER )(NULL));
-          result__4NHH=((__POINTER *)ptr_table__3NHH)[ 0];
-          if ((result__4NHH == (void *)NULL)) {
-            result__4NHH=new_lab__MRJ(lab_type__5NHH);
-            next__2NHH=(void *)((unsigned long)result__4NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AOHH)));
-            ((__POINTER *)next__2NHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3NHH)[ 0]=next__2NHH;
-          } else {
-            next__2NHH=((__POINTER *)result__4NHH)[ 0];
-            if ((next__2NHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4NHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AOHH <<  1)) <=  4096)) {
-                next__2NHH=(void *)((unsigned long)result__4NHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AOHH)));
+              ((__POINTER *)result__ZPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZPIH=next__XPIH;
+            };
+          };
+          ptr__QPIH=result__ZPIH;
+        } else {
+          t__VPIH=((__UINTEGER_32 )typ_id__RPIH);
+          a__WPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SPIH + a__WPIH) & (__UINTEGER_32)(~ a__WPIH));
+          ptr_table__3PIH=((__POINTER )(&(table_type[(t__VPIH)])));
+          lab_type__5PIH=(__UINTEGER_32)(t__VPIH |  1);
+          next__2PIH=((__POINTER )(NULL));
+          result__4PIH=((__POINTER *)ptr_table__3PIH)[ 0];
+          if ((result__4PIH == (void *)NULL)) {
+            result__4PIH=new_lab__URJ(lab_type__5PIH);
+            next__2PIH=(void *)((unsigned long)result__4PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AQIH)));
+            ((__POINTER *)next__2PIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3PIH)[ 0]=next__2PIH;
+          } else {
+            next__2PIH=((__POINTER *)result__4PIH)[ 0];
+            if ((next__2PIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4PIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AQIH <<  1)) <=  4096)) {
+                next__2PIH=(void *)((unsigned long)result__4PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AQIH)));
               } else {
-                next__2NHH=new_lab__MRJ(lab_type__5NHH);
+                next__2PIH=new_lab__URJ(lab_type__5PIH);
               };
-              ((__POINTER *)next__2NHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3NHH)[ 0]=next__2NHH;
+              ((__POINTER *)next__2PIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3PIH)[ 0]=next__2PIH;
             } else {
-              ((__POINTER *)result__4NHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2NHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4NHH=next__2NHH;
+              ((__POINTER *)result__4PIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4PIH=next__2PIH;
             };
           };
-          ptr__QNHH=result__4NHH;
+          ptr__QPIH=result__4PIH;
         };
-        result__PNHH=((__DIRECTORY_UNIX *)ptr__QNHH);
-        *(result__PNHH) = *(DIRECTORY_UNIX__);
+        result__PPIH=((__DIRECTORY_UNIX *)ptr__QPIH);
+        *(result__PPIH) = *(DIRECTORY_UNIX__);
       };
-      result__OCF=result__PNHH;
+      result__WCF=result__PPIH;
     };
-    if (((struct ___OBJ *)result__OCF)->__id==__DIRECTORY_UNIX__) {
-      set_path__ONT(result__OCF,new_path__LCF);
+    if (((struct ___OBJ *)result__WCF)->__id==__DIRECTORY_UNIX__) {
+      set_path__WNT(result__WCF,new_path__TCF);
     } else {
-      set_path__JOT(result__OCF,new_path__LCF);
+      set_path__ROT(result__WCF,new_path__TCF);
     };
-    if (((struct ___OBJ *)result__OCF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__HDF=((__DIRECTORY_UNIX *)result__OCF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+    if (((struct ___OBJ *)result__WCF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__PDF=((__DIRECTORY_UNIX *)result__WCF)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
     } else {
-      __tmp__HDF=((__FILE_UNIX *)result__OCF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+      __tmp__PDF=((__FILE_UNIX *)result__WCF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
     };
-    put__to__R0S(alias__EFD,result__OCF,__tmp__HDF);
+    put__to__Z0S(alias__MFD,result__WCF,__tmp__PDF);
   };
   };
-  return(result__OCF);
+  return(result__WCF);
 }
 
-static void put__to__R0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__S0S,void *v__T0S,void *k__U0S)
+static void put__to__Z0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__00S,void *v__10S,void *k__20S)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__CHGH,*Self__HHGH;
-  __INTEGER result__BHGH,__tmp__DHGH,Self__EHGH,idx__20S,idx__GOOB;
-  __INTEGER new_capacity__HOOB,i__IOOB,result__GHGH,__tmp__IHGH;
-  __INTEGER Self__JHGH,typ_id__WQOB;
-  __POINTER ptr__RQOB,ptr_table__COHH,next__BOHH,result__DOHH;
-  __POINTER ptr_table__HOHH,next__GOHH,result__IOHH;
-  __UINTEGER_32 sz__TQOB,a__OKEH,new_size__PKEH,t__TKEH,a__SKEH;
-  __UINTEGER_32 new_size__KOHH,lab_type__JOHH;
-  void *node__40S,*node1__KOOB,*node2__LOOB,*__tmp__T2S;
-  void **old_buckets__JOOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__QQOB;
-  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__GYDC;
-  Self__CHGH=((__STRING_CONSTANT *)k__U0S);
-  result__BHGH= 0;
-  __tmp__DHGH=Self__CHGH->count__DD;
-  Self__EHGH= 1;
-  while ((Self__EHGH <= __tmp__DHGH)) {
-    result__BHGH=(__INTEGER)((__INTEGER)( 5 * result__BHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CHGH->storage__VQO)[(__INTEGER)(Self__EHGH -  1)])));
-    Self__EHGH=(__INTEGER)(Self__EHGH +  1);
-  };
-  if ((result__BHGH <  0)) {
-    result__BHGH=(__INTEGER)(~ result__BHGH);
-  };
-  idx__20S=(__INTEGER)(result__BHGH % Self__S0S->capacity__A1S);
-  node__40S=((void **)Self__S0S->buckets__F1S)[idx__20S];
-  while ((! (((void *)node__40S == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->key__R1S,k__U0S)))) {
-    node__40S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->next__31S;
-  };
-  if (((void *)node__40S == (void *)NULL)) {
-    if ((Self__S0S->capacity__A1S == Self__S0S->count__G2S)) {
-      idx__GOOB= 0;
-      node1__KOOB=NULL;
-      node2__LOOB=NULL;
-      old_buckets__JOOB=Self__S0S->buckets__F1S;
-      new_capacity__HOOB=prime_number_ceiling__X41((__INTEGER)(Self__S0S->capacity__A1S +  1));
-      Self__S0S->buckets__F1S=create__XB4(new_capacity__HOOB);
-      i__IOOB=(__INTEGER)(Self__S0S->capacity__A1S -  1);
-      Self__S0S->capacity__A1S=new_capacity__HOOB;
-      while ((i__IOOB >=  0)) {
-        node1__KOOB=((void **)old_buckets__JOOB)[i__IOOB];
-        while (((void *)node1__KOOB != (void *)NULL)) {
-          node2__LOOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->next__31S;
-          Self__HHGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->key__R1S);
-          result__GHGH= 0;
-          __tmp__IHGH=Self__HHGH->count__DD;
-          Self__JHGH= 1;
-          while ((Self__JHGH <= __tmp__IHGH)) {
-            result__GHGH=(__INTEGER)((__INTEGER)( 5 * result__GHGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HHGH->storage__VQO)[(__INTEGER)(Self__JHGH -  1)])));
-            Self__JHGH=(__INTEGER)(Self__JHGH +  1);
-          };
-          if ((result__GHGH <  0)) {
-            result__GHGH=(__INTEGER)(~ result__GHGH);
-          };
-          idx__GOOB=(__INTEGER)(result__GHGH % Self__S0S->capacity__A1S);
-          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__KOOB)->next__31S=((void **)Self__S0S->buckets__F1S)[idx__GOOB];
-          ((void **)Self__S0S->buckets__F1S)[idx__GOOB]=node1__KOOB;
-          node1__KOOB=node2__LOOB;
-        };
-        i__IOOB=(__INTEGER)(i__IOOB -  1);
-      };
-      idx__20S=(__INTEGER)(result__BHGH % new_capacity__HOOB);
-    };
-    __tmp__T2S=((void **)Self__S0S->buckets__F1S)[idx__20S];
-    result__QQOB=NULL;
-    ptr__RQOB=((__POINTER )(NULL));
-    typ_id__WQOB= 0;
-    sz__TQOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
-    if ((sz__TQOB ==  0)) {
-      result__QQOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-    } else {
-      typ_id__WQOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TQOB);
-      if ((typ_id__WQOB == (__INTEGER)(-  1))) {
-        a__OKEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__PKEH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQOB + a__OKEH) & (__UINTEGER_32)(~ a__OKEH));
-        ptr_table__COHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PKEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__BOHH=((__POINTER )(NULL));
-        result__DOHH=((__POINTER *)ptr_table__COHH)[ 0];
-        if ((result__DOHH == (void *)NULL)) {
-          result__DOHH=new_lab__MRJ(new_size__PKEH);
-          next__BOHH=(void *)((unsigned long)result__DOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKEH)));
-          ((__POINTER *)next__BOHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__COHH)[ 0]=next__BOHH;
-        } else {
-          next__BOHH=((__POINTER *)result__DOHH)[ 0];
-          if ((next__BOHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PKEH <<  1)) <=  4096)) {
-              next__BOHH=(void *)((unsigned long)result__DOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PKEH)));
+  __STRING_CONSTANT *Self__3IHH,*Self__CJHH;
+  __INTEGER result__2IHH,__tmp__4IHH,Self__5IHH,idx__E1S,idx__OOOB;
+  __INTEGER new_capacity__POOB,i__QOOB,result__BJHH,__tmp__DJHH;
+  __INTEGER Self__EJHH,typ_id__4QOB;
+  __POINTER ptr__ZQOB,ptr_table__CQIH,next__BQIH,result__DQIH;
+  __POINTER ptr_table__HQIH,next__GQIH,result__IQIH;
+  __UINTEGER_32 sz__1QOB,a__4LFH,new_size__5LFH,t__DMFH,a__CMFH;
+  __UINTEGER_32 new_size__KQIH,lab_type__JQIH;
+  void *node__G1S,*node1__SOOB,*node2__TOOB,*__tmp__12S;
+  void **old_buckets__ROOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__YQOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__OYDC;
+  Self__3IHH=((__STRING_CONSTANT *)k__20S);
+  result__2IHH= 0;
+  __tmp__4IHH=Self__3IHH->count__DD;
+  Self__5IHH= 1;
+  while ((Self__5IHH <= __tmp__4IHH)) {
+    result__2IHH=(__INTEGER)((__INTEGER)( 5 * result__2IHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3IHH->storage__3QO)[(__INTEGER)(Self__5IHH -  1)])));
+    Self__5IHH=(__INTEGER)(Self__5IHH +  1);
+  };
+  if ((result__2IHH <  0)) {
+    result__2IHH=(__INTEGER)(~ result__2IHH);
+  };
+  idx__E1S=(__INTEGER)(result__2IHH % Self__00S->capacity__I1S);
+  node__G1S=((void **)Self__00S->buckets__N1S)[idx__E1S];
+  while ((! (((void *)node__G1S == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__G1S)->key__Z1S,k__20S)))) {
+    node__G1S=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__G1S)->next__F2S;
+  };
+  if (((void *)node__G1S == (void *)NULL)) {
+    if ((Self__00S->capacity__I1S == Self__00S->count__O2S)) {
+      idx__OOOB= 0;
+      node1__SOOB=NULL;
+      node2__TOOB=NULL;
+      old_buckets__ROOB=Self__00S->buckets__N1S;
+      new_capacity__POOB=prime_number_ceiling__541((__INTEGER)(Self__00S->capacity__I1S +  1));
+      Self__00S->buckets__N1S=create__5B4(new_capacity__POOB);
+      i__QOOB=(__INTEGER)(Self__00S->capacity__I1S -  1);
+      Self__00S->capacity__I1S=new_capacity__POOB;
+      while ((i__QOOB >=  0)) {
+        node1__SOOB=((void **)old_buckets__ROOB)[i__QOOB];
+        while (((void *)node1__SOOB != (void *)NULL)) {
+          node2__TOOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__SOOB)->next__F2S;
+          Self__CJHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__SOOB)->key__Z1S);
+          result__BJHH= 0;
+          __tmp__DJHH=Self__CJHH->count__DD;
+          Self__EJHH= 1;
+          while ((Self__EJHH <= __tmp__DJHH)) {
+            result__BJHH=(__INTEGER)((__INTEGER)( 5 * result__BJHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__CJHH->storage__3QO)[(__INTEGER)(Self__EJHH -  1)])));
+            Self__EJHH=(__INTEGER)(Self__EJHH +  1);
+          };
+          if ((result__BJHH <  0)) {
+            result__BJHH=(__INTEGER)(~ result__BJHH);
+          };
+          idx__OOOB=(__INTEGER)(result__BJHH % Self__00S->capacity__I1S);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__SOOB)->next__F2S=((void **)Self__00S->buckets__N1S)[idx__OOOB];
+          ((void **)Self__00S->buckets__N1S)[idx__OOOB]=node1__SOOB;
+          node1__SOOB=node2__TOOB;
+        };
+        i__QOOB=(__INTEGER)(i__QOOB -  1);
+      };
+      idx__E1S=(__INTEGER)(result__2IHH % new_capacity__POOB);
+    };
+    __tmp__12S=((void **)Self__00S->buckets__N1S)[idx__E1S];
+    result__YQOB=NULL;
+    ptr__ZQOB=((__POINTER )(NULL));
+    typ_id__4QOB= 0;
+    sz__1QOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__1QOB ==  0)) {
+      result__YQOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__4QOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__1QOB);
+      if ((typ_id__4QOB == (__INTEGER)(-  1))) {
+        a__4LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5LFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1QOB + a__4LFH) & (__UINTEGER_32)(~ a__4LFH));
+        ptr_table__CQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5LFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__BQIH=((__POINTER )(NULL));
+        result__DQIH=((__POINTER *)ptr_table__CQIH)[ 0];
+        if ((result__DQIH == (void *)NULL)) {
+          result__DQIH=new_lab__URJ(new_size__5LFH);
+          next__BQIH=(void *)((unsigned long)result__DQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LFH)));
+          ((__POINTER *)next__BQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CQIH)[ 0]=next__BQIH;
+        } else {
+          next__BQIH=((__POINTER *)result__DQIH)[ 0];
+          if ((next__BQIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DQIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5LFH <<  1)) <=  4096)) {
+              next__BQIH=(void *)((unsigned long)result__DQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LFH)));
             } else {
-              next__BOHH=new_lab__MRJ(new_size__PKEH);
-            };
-            ((__POINTER *)next__BOHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__COHH)[ 0]=next__BOHH;
-          } else {
-            ((__POINTER *)result__DOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DOHH=next__BOHH;
-          };
-        };
-        ptr__RQOB=result__DOHH;
-      } else {
-        t__TKEH=((__UINTEGER_32 )typ_id__WQOB);
-        a__SKEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQOB + a__SKEH) & (__UINTEGER_32)(~ a__SKEH));
-        ptr_table__HOHH=((__POINTER )(&(table_type[(t__TKEH)])));
-        lab_type__JOHH=(__UINTEGER_32)(t__TKEH |  1);
-        next__GOHH=((__POINTER )(NULL));
-        result__IOHH=((__POINTER *)ptr_table__HOHH)[ 0];
-        if ((result__IOHH == (void *)NULL)) {
-          result__IOHH=new_lab__MRJ(lab_type__JOHH);
-          next__GOHH=(void *)((unsigned long)result__IOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOHH)));
-          ((__POINTER *)next__GOHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HOHH)[ 0]=next__GOHH;
-        } else {
-          next__GOHH=((__POINTER *)result__IOHH)[ 0];
-          if ((next__GOHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KOHH <<  1)) <=  4096)) {
-              next__GOHH=(void *)((unsigned long)result__IOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOHH)));
+              next__BQIH=new_lab__URJ(new_size__5LFH);
+            };
+            ((__POINTER *)next__BQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CQIH)[ 0]=next__BQIH;
+          } else {
+            ((__POINTER *)result__DQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DQIH=next__BQIH;
+          };
+        };
+        ptr__ZQOB=result__DQIH;
+      } else {
+        t__DMFH=((__UINTEGER_32 )typ_id__4QOB);
+        a__CMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1QOB + a__CMFH) & (__UINTEGER_32)(~ a__CMFH));
+        ptr_table__HQIH=((__POINTER )(&(table_type[(t__DMFH)])));
+        lab_type__JQIH=(__UINTEGER_32)(t__DMFH |  1);
+        next__GQIH=((__POINTER )(NULL));
+        result__IQIH=((__POINTER *)ptr_table__HQIH)[ 0];
+        if ((result__IQIH == (void *)NULL)) {
+          result__IQIH=new_lab__URJ(lab_type__JQIH);
+          next__GQIH=(void *)((unsigned long)result__IQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KQIH)));
+          ((__POINTER *)next__GQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HQIH)[ 0]=next__GQIH;
+        } else {
+          next__GQIH=((__POINTER *)result__IQIH)[ 0];
+          if ((next__GQIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IQIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KQIH <<  1)) <=  4096)) {
+              next__GQIH=(void *)((unsigned long)result__IQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KQIH)));
             } else {
-              next__GOHH=new_lab__MRJ(lab_type__JOHH);
+              next__GQIH=new_lab__URJ(lab_type__JQIH);
             };
-            ((__POINTER *)next__GOHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HOHH)[ 0]=next__GOHH;
+            ((__POINTER *)next__GQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HQIH)[ 0]=next__GQIH;
           } else {
-            ((__POINTER *)result__IOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IOHH=next__GOHH;
+            ((__POINTER *)result__IQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IQIH=next__GQIH;
           };
         };
-        ptr__RQOB=result__IOHH;
+        ptr__ZQOB=result__IQIH;
       };
-      result__QQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__RQOB);
-      *(result__QQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__YQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__ZQOB);
+      *(result__YQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    Self__GYDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__QQOB);
-    Self__GYDC->item__0SOB=v__T0S;
-    Self__GYDC->key__R1S=k__U0S;
-    Self__GYDC->next__31S=__tmp__T2S;
-    node__40S=result__QQOB;
-    ((void **)Self__S0S->buckets__F1S)[idx__20S]=result__QQOB;
-    Self__S0S->count__G2S=(__INTEGER)(Self__S0S->count__G2S +  1);
+    Self__OYDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__YQOB);
+    Self__OYDC->item__CTOB=v__10S;
+    Self__OYDC->key__Z1S=k__20S;
+    Self__OYDC->next__F2S=__tmp__12S;
+    node__G1S=result__YQOB;
+    ((void **)Self__00S->buckets__N1S)[idx__E1S]=result__YQOB;
+    Self__00S->count__O2S=(__INTEGER)(Self__00S->count__O2S +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__40S)->item__0SOB=v__T0S;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__G1S)->item__CTOB=v__10S;
   };
 }
 
-static void reduce_path__Q3HC(void *st__S3HC)
+static void reduce_path__Y3HC(void *st__03HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__U3HC,__tmp__NHGH,Self__PHGH,i__T3HC,Self__FROE;
-  __INTEGER n__YKEH,len__VHGH,__tmp__WHGH,__tmp__YHGH,Self__ZHGH;
-  __INTEGER len__4HGH,__tmp__5HGH,__tmp__BIGH,Self__CIGH,result__GIGH;
-  __INTEGER n__0KEH,len__LIGH,__tmp__MIGH,__tmp__OIGH,Self__PIGH;
-  __INTEGER end__SIGH,len__UIGH,__tmp__VIGH,__tmp__XIGH,Self__YIGH;
-  __INTEGER Self__DPEF,n__2KEH,len__3IGH,__tmp__4IGH,__tmp__AJGH;
-  __INTEGER Self__BJGH,result__FJGH,end__IJGH,len__KJGH,__tmp__LJGH;
-  __INTEGER __tmp__NJGH,Self__OJGH;
-  __STRING *Self__LHGH,*Self__XKEH,*Self__AIGH,*Self__HIGH,*Self__ZKEH;
-  __STRING *Self__WIGH,*Self__1KEH,*Self__3KEH,*Self__5KEH,*Self__GJGH;
-  __STRING *Self__MJGH;
-  __CHARACTER car__V3HC,Self__MOHH;
-  __CHARACTER *__tmp__MHGH,*Self__OHGH;
-  __BOOLEAN __tmp__25HC,__tmp__BBIC,result__LKHE,result__LOHH;
-  __BOOLEAN __tmp__NOHH,__tmp__CCIC;
-  stat__U3HC= 0;
-  car__V3HC='\0';
-  Self__LHGH=((__STRING *)st__S3HC);
-  __tmp__MHGH=Self__LHGH->storage__BCS;
-  __tmp__NHGH=(__INTEGER)(Self__LHGH->count__WFC -  1);
-  Self__OHGH=((__CHARACTER *)__tmp__MHGH);
-  Self__PHGH=__tmp__NHGH;
-  while ((Self__PHGH >=  0)) {
-    if (('\\' == Self__OHGH[Self__PHGH])) {
-      Self__OHGH[Self__PHGH]='/';
-    };
-    Self__PHGH=(__INTEGER)(Self__PHGH -  1);
-  };
-  i__T3HC= 1;
-  while ((i__T3HC <= ((__STRING *)st__S3HC)->count__WFC)) {
-    car__V3HC=((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)(i__T3HC -  1)];
-    if ((car__V3HC == '/')) {
-      Self__FROE=stat__U3HC;
-      if ((stat__U3HC ==  0)) {
-        stat__U3HC= 1;
-      };
-      if ((Self__FROE ==  1)) {
-        Self__XKEH=((__STRING *)st__S3HC);
-        n__YKEH=(__INTEGER)(i__T3HC -  1);
-        if ((n__YKEH > Self__XKEH->count__WFC)) {
-          Self__XKEH->count__WFC= 0;
-        } else {
-          if ((n__YKEH >  0)) {
-            len__VHGH=(__INTEGER)((__INTEGER)(n__YKEH -  1) +  1);
-            if ((len__VHGH >  0)) {
-              __tmp__WHGH=(__INTEGER)(n__YKEH +  1);
-              __tmp__YHGH=Self__XKEH->count__WFC;
-              Self__ZHGH=__tmp__WHGH;
-              while ((Self__ZHGH <= __tmp__YHGH)) {
-                ((__CHARACTER *)Self__XKEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__ZHGH - len__VHGH) -  1)]=((__CHARACTER *)Self__XKEH->storage__BCS)[(__INTEGER)(Self__ZHGH -  1)];
-                Self__ZHGH=(__INTEGER)(Self__ZHGH +  1);
+  __INTEGER stat__23HC,__tmp__IJHH,Self__KJHH,i__13HC,Self__INOE;
+  __INTEGER n__IMFH,len__QJHH,__tmp__RJHH,__tmp__TJHH,Self__UJHH;
+  __INTEGER len__ZJHH,__tmp__0JHH,__tmp__2JHH,Self__3JHH,result__BKHH;
+  __INTEGER n__KMFH,len__GKHH,__tmp__HKHH,__tmp__JKHH,Self__KKHH;
+  __INTEGER end__NKHH,len__PKHH,__tmp__QKHH,__tmp__SKHH,Self__TKHH;
+  __INTEGER Self__PZEF,n__MMFH,len__YKHH,__tmp__ZKHH,__tmp__1KHH;
+  __INTEGER Self__2KHH,result__ALHH,end__DLHH,len__FLHH,__tmp__GLHH;
+  __INTEGER __tmp__ILHH,Self__JLHH;
+  __STRING *Self__GJHH,*Self__HMFH,*Self__1JHH,*Self__CKHH,*Self__JMFH;
+  __STRING *Self__RKHH,*Self__LMFH,*Self__NMFH,*Self__PMFH,*Self__BLHH;
+  __STRING *Self__HLHH;
+  __CHARACTER car__33HC,Self__MQIH;
+  __CHARACTER *__tmp__HJHH,*Self__JJHH;
+  __BOOLEAN __tmp__EAIC,__tmp__JBIC,result__IIHE,result__LQIH;
+  __BOOLEAN __tmp__NQIH,__tmp__KCIC;
+  stat__23HC= 0;
+  car__33HC='\0';
+  Self__GJHH=((__STRING *)st__03HC);
+  __tmp__HJHH=Self__GJHH->storage__JCS;
+  __tmp__IJHH=(__INTEGER)(Self__GJHH->count__4FC -  1);
+  Self__JJHH=((__CHARACTER *)__tmp__HJHH);
+  Self__KJHH=__tmp__IJHH;
+  while ((Self__KJHH >=  0)) {
+    if (('\\' == Self__JJHH[Self__KJHH])) {
+      Self__JJHH[Self__KJHH]='/';
+    };
+    Self__KJHH=(__INTEGER)(Self__KJHH -  1);
+  };
+  i__13HC= 1;
+  while ((i__13HC <= ((__STRING *)st__03HC)->count__4FC)) {
+    car__33HC=((__CHARACTER *)((__STRING *)st__03HC)->storage__JCS)[(__INTEGER)(i__13HC -  1)];
+    if ((car__33HC == '/')) {
+      Self__INOE=stat__23HC;
+      if ((stat__23HC ==  0)) {
+        stat__23HC= 1;
+      };
+      if ((Self__INOE ==  1)) {
+        Self__HMFH=((__STRING *)st__03HC);
+        n__IMFH=(__INTEGER)(i__13HC -  1);
+        if ((n__IMFH > Self__HMFH->count__4FC)) {
+          Self__HMFH->count__4FC= 0;
+        } else {
+          if ((n__IMFH >  0)) {
+            len__QJHH=(__INTEGER)((__INTEGER)(n__IMFH -  1) +  1);
+            if ((len__QJHH >  0)) {
+              __tmp__RJHH=(__INTEGER)(n__IMFH +  1);
+              __tmp__TJHH=Self__HMFH->count__4FC;
+              Self__UJHH=__tmp__RJHH;
+              while ((Self__UJHH <= __tmp__TJHH)) {
+                ((__CHARACTER *)Self__HMFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__UJHH - len__QJHH) -  1)]=((__CHARACTER *)Self__HMFH->storage__JCS)[(__INTEGER)(Self__UJHH -  1)];
+                Self__UJHH=(__INTEGER)(Self__UJHH +  1);
               };
-              Self__XKEH->count__WFC=(__INTEGER)(Self__XKEH->count__WFC - len__VHGH);
-            };
-          };
-        };
-        i__T3HC= 1;
-      };
-      if ((Self__FROE ==  2)) {
-        Self__AIGH=((__STRING *)st__S3HC);
-        len__4HGH=(__INTEGER)((__INTEGER)(i__T3HC - (__INTEGER)(i__T3HC -  1)) +  1);
-        if ((len__4HGH >  0)) {
-          __tmp__5HGH=(__INTEGER)(i__T3HC +  1);
-          __tmp__BIGH=Self__AIGH->count__WFC;
-          Self__CIGH=__tmp__5HGH;
-          while ((Self__CIGH <= __tmp__BIGH)) {
-            ((__CHARACTER *)Self__AIGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__CIGH - len__4HGH) -  1)]=((__CHARACTER *)Self__AIGH->storage__BCS)[(__INTEGER)(Self__CIGH -  1)];
-            Self__CIGH=(__INTEGER)(Self__CIGH +  1);
-          };
-          Self__AIGH->count__WFC=(__INTEGER)(Self__AIGH->count__WFC - len__4HGH);
-        };
-        i__T3HC=(__INTEGER)(i__T3HC -  2);
-        stat__U3HC= 1;
-      };
-      if ((Self__FROE ==  3)) {
-        Self__HIGH=((__STRING *)st__S3HC);
-        result__GIGH=(__INTEGER)(i__T3HC -  4);
-        while ((! ((result__GIGH <  1) || ('/' == ((__CHARACTER *)Self__HIGH->storage__BCS)[(__INTEGER)(result__GIGH -  1)])))) {
-          result__GIGH=(__INTEGER)(result__GIGH -  1);
-        };
-        if ((result__GIGH ==  0)) {
-          Self__ZKEH=((__STRING *)st__S3HC);
-          n__0KEH=(__INTEGER)(i__T3HC -  1);
-          if ((n__0KEH > Self__ZKEH->count__WFC)) {
-            Self__ZKEH->count__WFC= 0;
-          } else {
-            if ((n__0KEH >  0)) {
-              len__LIGH=(__INTEGER)((__INTEGER)(n__0KEH -  1) +  1);
-              if ((len__LIGH >  0)) {
-                __tmp__MIGH=(__INTEGER)(n__0KEH +  1);
-                __tmp__OIGH=Self__ZKEH->count__WFC;
-                Self__PIGH=__tmp__MIGH;
-                while ((Self__PIGH <= __tmp__OIGH)) {
-                  ((__CHARACTER *)Self__ZKEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__PIGH - len__LIGH) -  1)]=((__CHARACTER *)Self__ZKEH->storage__BCS)[(__INTEGER)(Self__PIGH -  1)];
-                  Self__PIGH=(__INTEGER)(Self__PIGH +  1);
+              Self__HMFH->count__4FC=(__INTEGER)(Self__HMFH->count__4FC - len__QJHH);
+            };
+          };
+        };
+        i__13HC= 1;
+      };
+      if ((Self__INOE ==  2)) {
+        Self__1JHH=((__STRING *)st__03HC);
+        len__ZJHH=(__INTEGER)((__INTEGER)(i__13HC - (__INTEGER)(i__13HC -  1)) +  1);
+        if ((len__ZJHH >  0)) {
+          __tmp__0JHH=(__INTEGER)(i__13HC +  1);
+          __tmp__2JHH=Self__1JHH->count__4FC;
+          Self__3JHH=__tmp__0JHH;
+          while ((Self__3JHH <= __tmp__2JHH)) {
+            ((__CHARACTER *)Self__1JHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__3JHH - len__ZJHH) -  1)]=((__CHARACTER *)Self__1JHH->storage__JCS)[(__INTEGER)(Self__3JHH -  1)];
+            Self__3JHH=(__INTEGER)(Self__3JHH +  1);
+          };
+          Self__1JHH->count__4FC=(__INTEGER)(Self__1JHH->count__4FC - len__ZJHH);
+        };
+        i__13HC=(__INTEGER)(i__13HC -  2);
+        stat__23HC= 1;
+      };
+      if ((Self__INOE ==  3)) {
+        Self__CKHH=((__STRING *)st__03HC);
+        result__BKHH=(__INTEGER)(i__13HC -  4);
+        while ((! ((result__BKHH <  1) || ('/' == ((__CHARACTER *)Self__CKHH->storage__JCS)[(__INTEGER)(result__BKHH -  1)])))) {
+          result__BKHH=(__INTEGER)(result__BKHH -  1);
+        };
+        if ((result__BKHH ==  0)) {
+          Self__JMFH=((__STRING *)st__03HC);
+          n__KMFH=(__INTEGER)(i__13HC -  1);
+          if ((n__KMFH > Self__JMFH->count__4FC)) {
+            Self__JMFH->count__4FC= 0;
+          } else {
+            if ((n__KMFH >  0)) {
+              len__GKHH=(__INTEGER)((__INTEGER)(n__KMFH -  1) +  1);
+              if ((len__GKHH >  0)) {
+                __tmp__HKHH=(__INTEGER)(n__KMFH +  1);
+                __tmp__JKHH=Self__JMFH->count__4FC;
+                Self__KKHH=__tmp__HKHH;
+                while ((Self__KKHH <= __tmp__JKHH)) {
+                  ((__CHARACTER *)Self__JMFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__KKHH - len__GKHH) -  1)]=((__CHARACTER *)Self__JMFH->storage__JCS)[(__INTEGER)(Self__KKHH -  1)];
+                  Self__KKHH=(__INTEGER)(Self__KKHH +  1);
                 };
-                Self__ZKEH->count__WFC=(__INTEGER)(Self__ZKEH->count__WFC - len__LIGH);
+                Self__JMFH->count__4FC=(__INTEGER)(Self__JMFH->count__4FC - len__GKHH);
               };
             };
           };
-          i__T3HC= 1;
+          i__13HC= 1;
         } else {
-          Self__WIGH=((__STRING *)st__S3HC);
-          end__SIGH=(__INTEGER)(i__T3HC -  1);
-          len__UIGH=(__INTEGER)((__INTEGER)(end__SIGH - result__GIGH) +  1);
-          if ((len__UIGH >  0)) {
-            __tmp__VIGH=(__INTEGER)(end__SIGH +  1);
-            __tmp__XIGH=Self__WIGH->count__WFC;
-            Self__YIGH=__tmp__VIGH;
-            while ((Self__YIGH <= __tmp__XIGH)) {
-              ((__CHARACTER *)Self__WIGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__YIGH - len__UIGH) -  1)]=((__CHARACTER *)Self__WIGH->storage__BCS)[(__INTEGER)(Self__YIGH -  1)];
-              Self__YIGH=(__INTEGER)(Self__YIGH +  1);
+          Self__RKHH=((__STRING *)st__03HC);
+          end__NKHH=(__INTEGER)(i__13HC -  1);
+          len__PKHH=(__INTEGER)((__INTEGER)(end__NKHH - result__BKHH) +  1);
+          if ((len__PKHH >  0)) {
+            __tmp__QKHH=(__INTEGER)(end__NKHH +  1);
+            __tmp__SKHH=Self__RKHH->count__4FC;
+            Self__TKHH=__tmp__QKHH;
+            while ((Self__TKHH <= __tmp__SKHH)) {
+              ((__CHARACTER *)Self__RKHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__TKHH - len__PKHH) -  1)]=((__CHARACTER *)Self__RKHH->storage__JCS)[(__INTEGER)(Self__TKHH -  1)];
+              Self__TKHH=(__INTEGER)(Self__TKHH +  1);
             };
-            Self__WIGH->count__WFC=(__INTEGER)(Self__WIGH->count__WFC - len__UIGH);
+            Self__RKHH->count__4FC=(__INTEGER)(Self__RKHH->count__4FC - len__PKHH);
           };
-          i__T3HC=result__GIGH;
+          i__13HC=result__BKHH;
         };
-        stat__U3HC= 1;
+        stat__23HC= 1;
       };
-      __tmp__25HC=TRUE__;
+      __tmp__EAIC=TRUE__;
     } else {
-      __tmp__25HC=FALSE__;
+      __tmp__EAIC=FALSE__;
     };
-    if (__tmp__25HC) {
-      __tmp__BBIC=TRUE__;
+    if (__tmp__EAIC) {
+      __tmp__JBIC=TRUE__;
     } else {
-      result__LKHE=(car__V3HC == '.');
-      if (result__LKHE) {
-        Self__DPEF=stat__U3HC;
-        if ((stat__U3HC ==  1)) {
-          stat__U3HC= 2;
+      result__IIHE=(car__33HC == '.');
+      if (result__IIHE) {
+        Self__PZEF=stat__23HC;
+        if ((stat__23HC ==  1)) {
+          stat__23HC= 2;
         };
-        if ((Self__DPEF ==  2)) {
-          stat__U3HC= 3;
+        if ((Self__PZEF ==  2)) {
+          stat__23HC= 3;
         };
-        if ((Self__DPEF ==  3)) {
-          stat__U3HC= 0;
+        if ((Self__PZEF ==  3)) {
+          stat__23HC= 0;
         };
       };
-      __tmp__BBIC=result__LKHE;
+      __tmp__JBIC=result__IIHE;
     };
-    if ((! __tmp__BBIC)) {
-      if (((car__V3HC == ':') && (i__T3HC >  2))) {
-        Self__MOHH=((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)((__INTEGER)(i__T3HC -  1) -  1)];
-        result__LOHH=FALSE__;
-        if ((((__INTEGER_8 )Self__MOHH) >= ((__INTEGER_8 )'a'))) {
-          result__LOHH=(((__INTEGER_8 )Self__MOHH) <= ((__INTEGER_8 )'z'));
-          __tmp__NOHH=TRUE__;
+    if ((! __tmp__JBIC)) {
+      if (((car__33HC == ':') && (i__13HC >  2))) {
+        Self__MQIH=((__CHARACTER *)((__STRING *)st__03HC)->storage__JCS)[(__INTEGER)((__INTEGER)(i__13HC -  1) -  1)];
+        result__LQIH=FALSE__;
+        if ((((__INTEGER_8 )Self__MQIH) >= ((__INTEGER_8 )'a'))) {
+          result__LQIH=(((__INTEGER_8 )Self__MQIH) <= ((__INTEGER_8 )'z'));
+          __tmp__NQIH=TRUE__;
         } else {
-          __tmp__NOHH=FALSE__;
+          __tmp__NQIH=FALSE__;
         };
-        if ((! __tmp__NOHH)) {
-          if ((((__INTEGER_8 )Self__MOHH) >= ((__INTEGER_8 )'A'))) {
-            result__LOHH=(((__INTEGER_8 )Self__MOHH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__NQIH)) {
+          if ((((__INTEGER_8 )Self__MQIH) >= ((__INTEGER_8 )'A'))) {
+            result__LQIH=(((__INTEGER_8 )Self__MQIH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__CCIC=result__LOHH;
+        __tmp__KCIC=result__LQIH;
       } else {
-        __tmp__CCIC=FALSE__;
+        __tmp__KCIC=FALSE__;
       };
-      if ((__tmp__CCIC && (((__CHARACTER *)((__STRING *)st__S3HC)->storage__BCS)[(__INTEGER)((__INTEGER)(i__T3HC -  2) -  1)] == '/'))) {
-        Self__1KEH=((__STRING *)st__S3HC);
-        n__2KEH=(__INTEGER)(i__T3HC -  2);
-        if ((n__2KEH > Self__1KEH->count__WFC)) {
-          Self__1KEH->count__WFC= 0;
+      if ((__tmp__KCIC && (((__CHARACTER *)((__STRING *)st__03HC)->storage__JCS)[(__INTEGER)((__INTEGER)(i__13HC -  2) -  1)] == '/'))) {
+        Self__LMFH=((__STRING *)st__03HC);
+        n__MMFH=(__INTEGER)(i__13HC -  2);
+        if ((n__MMFH > Self__LMFH->count__4FC)) {
+          Self__LMFH->count__4FC= 0;
         } else {
-          if ((n__2KEH >  0)) {
-            len__3IGH=(__INTEGER)((__INTEGER)(n__2KEH -  1) +  1);
-            if ((len__3IGH >  0)) {
-              __tmp__4IGH=(__INTEGER)(n__2KEH +  1);
-              __tmp__AJGH=Self__1KEH->count__WFC;
-              Self__BJGH=__tmp__4IGH;
-              while ((Self__BJGH <= __tmp__AJGH)) {
-                ((__CHARACTER *)Self__1KEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__BJGH - len__3IGH) -  1)]=((__CHARACTER *)Self__1KEH->storage__BCS)[(__INTEGER)(Self__BJGH -  1)];
-                Self__BJGH=(__INTEGER)(Self__BJGH +  1);
+          if ((n__MMFH >  0)) {
+            len__YKHH=(__INTEGER)((__INTEGER)(n__MMFH -  1) +  1);
+            if ((len__YKHH >  0)) {
+              __tmp__ZKHH=(__INTEGER)(n__MMFH +  1);
+              __tmp__1KHH=Self__LMFH->count__4FC;
+              Self__2KHH=__tmp__ZKHH;
+              while ((Self__2KHH <= __tmp__1KHH)) {
+                ((__CHARACTER *)Self__LMFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__2KHH - len__YKHH) -  1)]=((__CHARACTER *)Self__LMFH->storage__JCS)[(__INTEGER)(Self__2KHH -  1)];
+                Self__2KHH=(__INTEGER)(Self__2KHH +  1);
               };
-              Self__1KEH->count__WFC=(__INTEGER)(Self__1KEH->count__WFC - len__3IGH);
+              Self__LMFH->count__4FC=(__INTEGER)(Self__LMFH->count__4FC - len__YKHH);
             };
           };
         };
-        i__T3HC= 1;
+        i__13HC= 1;
       } else {
-        stat__U3HC= 0;
+        stat__23HC= 0;
       };
     };
-    i__T3HC=(__INTEGER)(i__T3HC +  1);
+    i__13HC=(__INTEGER)(i__13HC +  1);
   };
-  if ((stat__U3HC ==  1)) {
-    Self__3KEH=((__STRING *)st__S3HC);
-    if (( 1 > Self__3KEH->count__WFC)) {
-      Self__3KEH->count__WFC= 0;
+  if ((stat__23HC ==  1)) {
+    Self__NMFH=((__STRING *)st__03HC);
+    if (( 1 > Self__NMFH->count__4FC)) {
+      Self__NMFH->count__4FC= 0;
     } else {
-      Self__3KEH->count__WFC=(__INTEGER)(Self__3KEH->count__WFC -  1);
+      Self__NMFH->count__4FC=(__INTEGER)(Self__NMFH->count__4FC -  1);
     };
   };
-  if ((stat__U3HC ==  2)) {
-    Self__5KEH=((__STRING *)st__S3HC);
-    if (( 2 > Self__5KEH->count__WFC)) {
-      Self__5KEH->count__WFC= 0;
+  if ((stat__23HC ==  2)) {
+    Self__PMFH=((__STRING *)st__03HC);
+    if (( 2 > Self__PMFH->count__4FC)) {
+      Self__PMFH->count__4FC= 0;
     } else {
-      Self__5KEH->count__WFC=(__INTEGER)(Self__5KEH->count__WFC -  2);
+      Self__PMFH->count__4FC=(__INTEGER)(Self__PMFH->count__4FC -  2);
     };
   };
-  if ((stat__U3HC ==  3)) {
-    Self__GJGH=((__STRING *)st__S3HC);
-    result__FJGH=(__INTEGER)(i__T3HC -  4);
-    while ((! ((result__FJGH <  1) || ('/' == ((__CHARACTER *)Self__GJGH->storage__BCS)[(__INTEGER)(result__FJGH -  1)])))) {
-      result__FJGH=(__INTEGER)(result__FJGH -  1);
+  if ((stat__23HC ==  3)) {
+    Self__BLHH=((__STRING *)st__03HC);
+    result__ALHH=(__INTEGER)(i__13HC -  4);
+    while ((! ((result__ALHH <  1) || ('/' == ((__CHARACTER *)Self__BLHH->storage__JCS)[(__INTEGER)(result__ALHH -  1)])))) {
+      result__ALHH=(__INTEGER)(result__ALHH -  1);
     };
-    if ((result__FJGH ==  0)) {
-      ((__STRING *)st__S3HC)->count__WFC= 0;
+    if ((result__ALHH ==  0)) {
+      ((__STRING *)st__03HC)->count__4FC= 0;
     } else {
-      Self__MJGH=((__STRING *)st__S3HC);
-      end__IJGH=(__INTEGER)(i__T3HC -  1);
-      len__KJGH=(__INTEGER)((__INTEGER)(end__IJGH - result__FJGH) +  1);
-      if ((len__KJGH >  0)) {
-        __tmp__LJGH=(__INTEGER)(end__IJGH +  1);
-        __tmp__NJGH=Self__MJGH->count__WFC;
-        Self__OJGH=__tmp__LJGH;
-        while ((Self__OJGH <= __tmp__NJGH)) {
-          ((__CHARACTER *)Self__MJGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__OJGH - len__KJGH) -  1)]=((__CHARACTER *)Self__MJGH->storage__BCS)[(__INTEGER)(Self__OJGH -  1)];
-          Self__OJGH=(__INTEGER)(Self__OJGH +  1);
+      Self__HLHH=((__STRING *)st__03HC);
+      end__DLHH=(__INTEGER)(i__13HC -  1);
+      len__FLHH=(__INTEGER)((__INTEGER)(end__DLHH - result__ALHH) +  1);
+      if ((len__FLHH >  0)) {
+        __tmp__GLHH=(__INTEGER)(end__DLHH +  1);
+        __tmp__ILHH=Self__HLHH->count__4FC;
+        Self__JLHH=__tmp__GLHH;
+        while ((Self__JLHH <= __tmp__ILHH)) {
+          ((__CHARACTER *)Self__HLHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__JLHH - len__FLHH) -  1)]=((__CHARACTER *)Self__HLHH->storage__JCS)[(__INTEGER)(Self__JLHH -  1)];
+          Self__JLHH=(__INTEGER)(Self__JLHH +  1);
         };
-        Self__MJGH->count__WFC=(__INTEGER)(Self__MJGH->count__WFC - len__KJGH);
+        Self__HLHH->count__4FC=(__INTEGER)(Self__HLHH->count__4FC - len__FLHH);
       };
     };
   };
-  if ((((__STRING *)st__S3HC)->count__WFC ==  0)) {
-    add_last__ZLT(st__S3HC,'/');
+  if ((((__STRING *)st__03HC)->count__4FC ==  0)) {
+    add_last__BMT(st__03HC,'/');
   };
 }
 
-static void* reference_at__EU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__FU0C,void *k__GU0C)
+static void* reference_at__MU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NU0C,void *k__OU0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__QU0C;
-  __STRING *Self__SJGH;
-  __INTEGER result__RJGH,__tmp__TJGH,Self__UJGH;
-  void *node__PU0C;
-  result__QU0C=NULL;
-  Self__SJGH=((__STRING *)k__GU0C);
-  result__RJGH= 0;
-  __tmp__TJGH=Self__SJGH->count__WFC;
-  Self__UJGH= 1;
-  while ((Self__UJGH <= __tmp__TJGH)) {
-    result__RJGH=(__INTEGER)((__INTEGER)( 5 * result__RJGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SJGH->storage__BCS)[(__INTEGER)(Self__UJGH -  1)])));
-    Self__UJGH=(__INTEGER)(Self__UJGH +  1);
-  };
-  if ((result__RJGH <  0)) {
-    result__RJGH=(__INTEGER)(~ result__RJGH);
-  };
-  node__PU0C=((void **)Self__FU0C->buckets__F1S)[(__INTEGER)(result__RJGH % Self__FU0C->capacity__A1S)];
-  while ((! (((void *)node__PU0C == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->key__R1S,k__GU0C)))) {
-    node__PU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->next__31S;
-  };
-  if (((void *)node__PU0C != (void *)NULL)) {
-    result__QU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__PU0C)->item__0SOB;
-  };
-  return(result__QU0C);
+  void *result__YU0C;
+  __STRING *Self__NLHH;
+  __INTEGER result__MLHH,__tmp__OLHH,Self__PLHH;
+  void *node__XU0C;
+  result__YU0C=NULL;
+  Self__NLHH=((__STRING *)k__OU0C);
+  result__MLHH= 0;
+  __tmp__OLHH=Self__NLHH->count__4FC;
+  Self__PLHH= 1;
+  while ((Self__PLHH <= __tmp__OLHH)) {
+    result__MLHH=(__INTEGER)((__INTEGER)( 5 * result__MLHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__NLHH->storage__JCS)[(__INTEGER)(Self__PLHH -  1)])));
+    Self__PLHH=(__INTEGER)(Self__PLHH +  1);
+  };
+  if ((result__MLHH <  0)) {
+    result__MLHH=(__INTEGER)(~ result__MLHH);
+  };
+  node__XU0C=((void **)Self__NU0C->buckets__N1S)[(__INTEGER)(result__MLHH % Self__NU0C->capacity__I1S)];
+  while ((! (((void *)node__XU0C == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__XU0C)->key__Z1S,k__OU0C)))) {
+    node__XU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__XU0C)->next__F2S;
+  };
+  if (((void *)node__XU0C != (void *)NULL)) {
+    result__YU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__XU0C)->item__CTOB;
+  };
+  return(result__YU0C);
 }
 
-static void* physical_get_entry__YW0C(void *new_path__0W0C)
+static void* physical_get_entry__AX0C(void *new_path__CX0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  void *result__3W0C;
-  __STRING *Self__DLEH;
-  __FILE_UNIX *result__4XI;
-  __POINTER ptr__5XI,ptr_table__POHH,next__OOHH,result__QOHH;
-  __POINTER ptr_table__UOHH,next__TOHH,result__VOHH,ptr__QZI;
-  __POINTER ptr_table__ZOHH,next__YOHH,result__0OHH,ptr_table__4OHH;
-  __POINTER next__3OHH,result__5OHH;
-  __INTEGER typ_id__EYI,typ_id__VZI;
-  __UINTEGER_32 sz__BYI,a__R0EH,new_size__S0EH,t__W0EH,a__V0EH;
-  __UINTEGER_32 new_size__XOHH,lab_type__WOHH,sz__SZI,a__Z0EH;
-  __UINTEGER_32 new_size__00EH,t__40EH,a__30EH,new_size__BPHH;
-  __UINTEGER_32 lab_type__APHH;
-  __DIRECTORY_UNIX *result__PZI;
-  void *__tmp__UX0C;
-  __CHARACTER *pe__2W0C;
-  result__3W0C=NULL;
-  Self__DLEH=((__STRING *)new_path__0W0C);
-  if ((Self__DLEH->capacity__YBS > Self__DLEH->count__WFC)) {
-    ((__CHARACTER *)Self__DLEH->storage__BCS)[Self__DLEH->count__WFC]='\0';
+  void *result__FX0C;
+  __STRING *Self__TMFH;
+  __FILE_UNIX *result__GYI;
+  __POINTER ptr__HYI,ptr_table__PQIH,next__OQIH,result__QQIH;
+  __POINTER ptr_table__UQIH,next__TQIH,result__VQIH,ptr__YZI;
+  __POINTER ptr_table__ZQIH,next__YQIH,result__0QIH,ptr_table__4QIH;
+  __POINTER next__3QIH,result__5QIH;
+  __INTEGER typ_id__MYI,typ_id__3ZI;
+  __UINTEGER_32 sz__JYI,a__B2FH,new_size__C2FH,t__G2FH,a__F2FH;
+  __UINTEGER_32 new_size__XQIH,lab_type__WQIH,sz__0ZI,a__J2FH;
+  __UINTEGER_32 new_size__K2FH,t__O2FH,a__N2FH,new_size__BRIH;
+  __UINTEGER_32 lab_type__ARIH;
+  __DIRECTORY_UNIX *result__XZI;
+  void *__tmp__2X0C;
+  __CHARACTER *pe__EX0C;
+  result__FX0C=NULL;
+  Self__TMFH=((__STRING *)new_path__CX0C);
+  if ((Self__TMFH->capacity__ACS > Self__TMFH->count__4FC)) {
+    ((__CHARACTER *)Self__TMFH->storage__JCS)[Self__TMFH->count__4FC]='\0';
   } else {
-    add_last__ZLT(Self__DLEH,'\0');
-    Self__DLEH->count__WFC=(__INTEGER)(Self__DLEH->count__WFC -  1);
+    add_last__BMT(Self__TMFH,'\0');
+    Self__TMFH->count__4FC=(__INTEGER)(Self__TMFH->count__4FC -  1);
   };
-  pe__2W0C=Self__DLEH->storage__BCS;
+  pe__EX0C=Self__TMFH->storage__JCS;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__2W0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__EX0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      result__4XI=NULL;
-      ptr__5XI=((__POINTER )(NULL));
-      typ_id__EYI= 0;
-      sz__BYI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
-      if ((sz__BYI ==  0)) {
-        result__4XI=FILE_UNIX__;
-      } else {
-        typ_id__EYI=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BYI);
-        if ((typ_id__EYI == (__INTEGER)(-  1))) {
-          a__R0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__S0EH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYI + a__R0EH) & (__UINTEGER_32)(~ a__R0EH));
-          ptr_table__POHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S0EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__OOHH=((__POINTER )(NULL));
-          result__QOHH=((__POINTER *)ptr_table__POHH)[ 0];
-          if ((result__QOHH == (void *)NULL)) {
-            result__QOHH=new_lab__MRJ(new_size__S0EH);
-            next__OOHH=(void *)((unsigned long)result__QOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0EH)));
-            ((__POINTER *)next__OOHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__POHH)[ 0]=next__OOHH;
-          } else {
-            next__OOHH=((__POINTER *)result__QOHH)[ 0];
-            if ((next__OOHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__S0EH <<  1)) <=  4096)) {
-                next__OOHH=(void *)((unsigned long)result__QOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0EH)));
+      result__GYI=NULL;
+      ptr__HYI=((__POINTER )(NULL));
+      typ_id__MYI= 0;
+      sz__JYI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__JYI ==  0)) {
+        result__GYI=FILE_UNIX__;
+      } else {
+        typ_id__MYI=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__JYI);
+        if ((typ_id__MYI == (__INTEGER)(-  1))) {
+          a__B2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__C2FH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYI + a__B2FH) & (__UINTEGER_32)(~ a__B2FH));
+          ptr_table__PQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C2FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OQIH=((__POINTER )(NULL));
+          result__QQIH=((__POINTER *)ptr_table__PQIH)[ 0];
+          if ((result__QQIH == (void *)NULL)) {
+            result__QQIH=new_lab__URJ(new_size__C2FH);
+            next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2FH)));
+            ((__POINTER *)next__OQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+          } else {
+            next__OQIH=((__POINTER *)result__QQIH)[ 0];
+            if ((next__OQIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QQIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__C2FH <<  1)) <=  4096)) {
+                next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C2FH)));
               } else {
-                next__OOHH=new_lab__MRJ(new_size__S0EH);
+                next__OQIH=new_lab__URJ(new_size__C2FH);
               };
-              ((__POINTER *)next__OOHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__POHH)[ 0]=next__OOHH;
+              ((__POINTER *)next__OQIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
             } else {
-              ((__POINTER *)result__QOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QOHH=next__OOHH;
-            };
-          };
-          ptr__5XI=result__QOHH;
-        } else {
-          t__W0EH=((__UINTEGER_32 )typ_id__EYI);
-          a__V0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__XOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BYI + a__V0EH) & (__UINTEGER_32)(~ a__V0EH));
-          ptr_table__UOHH=((__POINTER )(&(table_type[(t__W0EH)])));
-          lab_type__WOHH=(__UINTEGER_32)(t__W0EH |  1);
-          next__TOHH=((__POINTER )(NULL));
-          result__VOHH=((__POINTER *)ptr_table__UOHH)[ 0];
-          if ((result__VOHH == (void *)NULL)) {
-            result__VOHH=new_lab__MRJ(lab_type__WOHH);
-            next__TOHH=(void *)((unsigned long)result__VOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOHH)));
-            ((__POINTER *)next__TOHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UOHH)[ 0]=next__TOHH;
-          } else {
-            next__TOHH=((__POINTER *)result__VOHH)[ 0];
-            if ((next__TOHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VOHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XOHH <<  1)) <=  4096)) {
-                next__TOHH=(void *)((unsigned long)result__VOHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOHH)));
+              ((__POINTER *)result__QQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QQIH=next__OQIH;
+            };
+          };
+          ptr__HYI=result__QQIH;
+        } else {
+          t__G2FH=((__UINTEGER_32 )typ_id__MYI);
+          a__F2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYI + a__F2FH) & (__UINTEGER_32)(~ a__F2FH));
+          ptr_table__UQIH=((__POINTER )(&(table_type[(t__G2FH)])));
+          lab_type__WQIH=(__UINTEGER_32)(t__G2FH |  1);
+          next__TQIH=((__POINTER )(NULL));
+          result__VQIH=((__POINTER *)ptr_table__UQIH)[ 0];
+          if ((result__VQIH == (void *)NULL)) {
+            result__VQIH=new_lab__URJ(lab_type__WQIH);
+            next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQIH)));
+            ((__POINTER *)next__TQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
+          } else {
+            next__TQIH=((__POINTER *)result__VQIH)[ 0];
+            if ((next__TQIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VQIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XQIH <<  1)) <=  4096)) {
+                next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQIH)));
               } else {
-                next__TOHH=new_lab__MRJ(lab_type__WOHH);
+                next__TQIH=new_lab__URJ(lab_type__WQIH);
               };
-              ((__POINTER *)next__TOHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UOHH)[ 0]=next__TOHH;
+              ((__POINTER *)next__TQIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
             } else {
-              ((__POINTER *)result__VOHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VOHH=next__TOHH;
-            };
-          };
-          ptr__5XI=result__VOHH;
-        };
-        result__4XI=((__FILE_UNIX *)ptr__5XI);
-        *(result__4XI) = *(FILE_UNIX__);
-      };
-      result__3W0C=result__4XI;
-    } else {
-      result__PZI=NULL;
-      ptr__QZI=((__POINTER )(NULL));
-      typ_id__VZI= 0;
-      sz__SZI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
-      if ((sz__SZI ==  0)) {
-        result__PZI=DIRECTORY_UNIX__;
-      } else {
-        typ_id__VZI=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SZI);
-        if ((typ_id__VZI == (__INTEGER)(-  1))) {
-          a__Z0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__00EH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZI + a__Z0EH) & (__UINTEGER_32)(~ a__Z0EH));
-          ptr_table__ZOHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__00EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__YOHH=((__POINTER )(NULL));
-          result__0OHH=((__POINTER *)ptr_table__ZOHH)[ 0];
-          if ((result__0OHH == (void *)NULL)) {
-            result__0OHH=new_lab__MRJ(new_size__00EH);
-            next__YOHH=(void *)((unsigned long)result__0OHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00EH)));
-            ((__POINTER *)next__YOHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZOHH)[ 0]=next__YOHH;
-          } else {
-            next__YOHH=((__POINTER *)result__0OHH)[ 0];
-            if ((next__YOHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0OHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__00EH <<  1)) <=  4096)) {
-                next__YOHH=(void *)((unsigned long)result__0OHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__00EH)));
+              ((__POINTER *)result__VQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VQIH=next__TQIH;
+            };
+          };
+          ptr__HYI=result__VQIH;
+        };
+        result__GYI=((__FILE_UNIX *)ptr__HYI);
+        *(result__GYI) = *(FILE_UNIX__);
+      };
+      result__FX0C=result__GYI;
+    } else {
+      result__XZI=NULL;
+      ptr__YZI=((__POINTER )(NULL));
+      typ_id__3ZI= 0;
+      sz__0ZI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__0ZI ==  0)) {
+        result__XZI=DIRECTORY_UNIX__;
+      } else {
+        typ_id__3ZI=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__0ZI);
+        if ((typ_id__3ZI == (__INTEGER)(-  1))) {
+          a__J2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__K2FH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ZI + a__J2FH) & (__UINTEGER_32)(~ a__J2FH));
+          ptr_table__ZQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K2FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__YQIH=((__POINTER )(NULL));
+          result__0QIH=((__POINTER *)ptr_table__ZQIH)[ 0];
+          if ((result__0QIH == (void *)NULL)) {
+            result__0QIH=new_lab__URJ(new_size__K2FH);
+            next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K2FH)));
+            ((__POINTER *)next__YQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
+          } else {
+            next__YQIH=((__POINTER *)result__0QIH)[ 0];
+            if ((next__YQIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0QIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__K2FH <<  1)) <=  4096)) {
+                next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K2FH)));
               } else {
-                next__YOHH=new_lab__MRJ(new_size__00EH);
+                next__YQIH=new_lab__URJ(new_size__K2FH);
               };
-              ((__POINTER *)next__YOHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZOHH)[ 0]=next__YOHH;
+              ((__POINTER *)next__YQIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
             } else {
-              ((__POINTER *)result__0OHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__0OHH=next__YOHH;
-            };
-          };
-          ptr__QZI=result__0OHH;
-        } else {
-          t__40EH=((__UINTEGER_32 )typ_id__VZI);
-          a__30EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__BPHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SZI + a__30EH) & (__UINTEGER_32)(~ a__30EH));
-          ptr_table__4OHH=((__POINTER )(&(table_type[(t__40EH)])));
-          lab_type__APHH=(__UINTEGER_32)(t__40EH |  1);
-          next__3OHH=((__POINTER )(NULL));
-          result__5OHH=((__POINTER *)ptr_table__4OHH)[ 0];
-          if ((result__5OHH == (void *)NULL)) {
-            result__5OHH=new_lab__MRJ(lab_type__APHH);
-            next__3OHH=(void *)((unsigned long)result__5OHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPHH)));
-            ((__POINTER *)next__3OHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4OHH)[ 0]=next__3OHH;
-          } else {
-            next__3OHH=((__POINTER *)result__5OHH)[ 0];
-            if ((next__3OHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5OHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BPHH <<  1)) <=  4096)) {
-                next__3OHH=(void *)((unsigned long)result__5OHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPHH)));
+              ((__POINTER *)result__0QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0QIH=next__YQIH;
+            };
+          };
+          ptr__YZI=result__0QIH;
+        } else {
+          t__O2FH=((__UINTEGER_32 )typ_id__3ZI);
+          a__N2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0ZI + a__N2FH) & (__UINTEGER_32)(~ a__N2FH));
+          ptr_table__4QIH=((__POINTER )(&(table_type[(t__O2FH)])));
+          lab_type__ARIH=(__UINTEGER_32)(t__O2FH |  1);
+          next__3QIH=((__POINTER )(NULL));
+          result__5QIH=((__POINTER *)ptr_table__4QIH)[ 0];
+          if ((result__5QIH == (void *)NULL)) {
+            result__5QIH=new_lab__URJ(lab_type__ARIH);
+            next__3QIH=(void *)((unsigned long)result__5QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRIH)));
+            ((__POINTER *)next__3QIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4QIH)[ 0]=next__3QIH;
+          } else {
+            next__3QIH=((__POINTER *)result__5QIH)[ 0];
+            if ((next__3QIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5QIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BRIH <<  1)) <=  4096)) {
+                next__3QIH=(void *)((unsigned long)result__5QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRIH)));
               } else {
-                next__3OHH=new_lab__MRJ(lab_type__APHH);
+                next__3QIH=new_lab__URJ(lab_type__ARIH);
               };
-              ((__POINTER *)next__3OHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4OHH)[ 0]=next__3OHH;
+              ((__POINTER *)next__3QIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4QIH)[ 0]=next__3QIH;
             } else {
-              ((__POINTER *)result__5OHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3OHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5OHH=next__3OHH;
+              ((__POINTER *)result__5QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5QIH=next__3QIH;
             };
           };
-          ptr__QZI=result__5OHH;
+          ptr__YZI=result__5QIH;
         };
-        result__PZI=((__DIRECTORY_UNIX *)ptr__QZI);
-        *(result__PZI) = *(DIRECTORY_UNIX__);
+        result__XZI=((__DIRECTORY_UNIX *)ptr__YZI);
+        *(result__XZI) = *(DIRECTORY_UNIX__);
       };
-      result__3W0C=result__PZI;
+      result__FX0C=result__XZI;
     };
-    if (((struct ___OBJ *)result__3W0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__ONT(result__3W0C,new_path__0W0C);
+    if (((struct ___OBJ *)result__FX0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__WNT(result__FX0C,new_path__CX0C);
     } else {
-      set_path__JOT(result__3W0C,new_path__0W0C);
+      set_path__ROT(result__FX0C,new_path__CX0C);
     };
-    if (FILE_SYSTEM__->parent_directory__PFD==0) {
+    if (FILE_SYSTEM__->parent_directory__XFD==0) {
     } else {
-      parent_directory__OED();
+      parent_directory__WED();
     };
-    if (((struct ___OBJ *)result__3W0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UX0C=((__DIRECTORY_UNIX *)result__3W0C)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+    if (((struct ___OBJ *)result__FX0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__2X0C=((__DIRECTORY_UNIX *)result__FX0C)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
     } else {
-      __tmp__UX0C=((__FILE_UNIX *)result__3W0C)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+      __tmp__2X0C=((__FILE_UNIX *)result__FX0C)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
     };
-    put__to__R0S(alias__EFD,result__3W0C,__tmp__UX0C);
+    put__to__Z0S(alias__MFD,result__FX0C,__tmp__2X0C);
   };
   };
-  return(result__3W0C);
+  return(result__FX0C);
 }
 
-static void** create__VY1C(__INTEGER nb_elements__XY1C)
+static void** create__3Y1C(__INTEGER nb_elements__5Y1C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__KPCH,a__PPCH,new_size__LPCH,new_size2__MPCH,a__ILEH;
-  __UINTEGER_32 new_size__JLEH;
-  __POINTER result__JPCH,ptr_table__DPHH,next__CPHH,result__EPHH;
-  void *result__HPHH;
-  __INTEGER Self__Z3WD;
-  void **Result__SVCD;
-  sz__KPCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XY1C * ((__INTEGER )(sizeof(void *)))));
-  result__JPCH=((__POINTER )(NULL));
-  a__PPCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__LPCH=(__UINTEGER_32)((__UINTEGER_32)(sz__KPCH + a__PPCH) & (__UINTEGER_32)(~ a__PPCH));
-  new_size2__MPCH=(__UINTEGER_32)(new_size__LPCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__MPCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__ILEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__JLEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MPCH + a__ILEH) & (__UINTEGER_32)(~ a__ILEH));
-    ptr_table__DPHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JLEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__CPHH=((__POINTER )(NULL));
-    result__EPHH=((__POINTER *)ptr_table__DPHH)[ 0];
-    if ((result__EPHH == (void *)NULL)) {
-      result__EPHH=new_lab__MRJ(new_size__JLEH);
-      next__CPHH=(void *)((unsigned long)result__EPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLEH)));
-      ((__POINTER *)next__CPHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__DPHH)[ 0]=next__CPHH;
-    } else {
-      next__CPHH=((__POINTER *)result__EPHH)[ 0];
-      if ((next__CPHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EPHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JLEH <<  1)) <=  4096)) {
-          next__CPHH=(void *)((unsigned long)result__EPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JLEH)));
-        } else {
-          next__CPHH=new_lab__MRJ(new_size__JLEH);
-        };
-        ((__POINTER *)next__CPHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__DPHH)[ 0]=next__CPHH;
-      } else {
-        ((__POINTER *)result__EPHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CPHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__EPHH=next__CPHH;
-      };
-    };
-    ((__POINTER *)result__EPHH)[ 0]=((__POINTER ) 3);
-    result__JPCH=(void *)((unsigned long)result__EPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__GPDH,a__LPDH,new_size__HPDH,new_size2__IPDH,a__YMFH;
+  __UINTEGER_32 new_size__ZMFH;
+  __POINTER result__FPDH,ptr_table__DRIH,next__CRIH,result__ERIH;
+  void *result__HRIH;
+  __INTEGER Self__B4WD;
+  void **Result__0VCD;
+  sz__GPDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5Y1C * ((__INTEGER )(sizeof(void *)))));
+  result__FPDH=((__POINTER )(NULL));
+  a__LPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HPDH=(__UINTEGER_32)((__UINTEGER_32)(sz__GPDH + a__LPDH) & (__UINTEGER_32)(~ a__LPDH));
+  new_size2__IPDH=(__UINTEGER_32)(new_size__HPDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__IPDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZMFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IPDH + a__YMFH) & (__UINTEGER_32)(~ a__YMFH));
+    ptr_table__DRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CRIH=((__POINTER )(NULL));
+    result__ERIH=((__POINTER *)ptr_table__DRIH)[ 0];
+    if ((result__ERIH == (void *)NULL)) {
+      result__ERIH=new_lab__URJ(new_size__ZMFH);
+      next__CRIH=(void *)((unsigned long)result__ERIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMFH)));
+      ((__POINTER *)next__CRIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DRIH)[ 0]=next__CRIH;
+    } else {
+      next__CRIH=((__POINTER *)result__ERIH)[ 0];
+      if ((next__CRIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ERIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ZMFH <<  1)) <=  4096)) {
+          next__CRIH=(void *)((unsigned long)result__ERIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMFH)));
+        } else {
+          next__CRIH=new_lab__URJ(new_size__ZMFH);
+        };
+        ((__POINTER *)next__CRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DRIH)[ 0]=next__CRIH;
+      } else {
+        ((__POINTER *)result__ERIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ERIH=next__CRIH;
+      };
+    };
+    ((__POINTER *)result__ERIH)[ 0]=((__POINTER ) 3);
+    result__FPDH=(void *)((unsigned long)result__ERIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__HPHH=first_free__XDVB;
-    while ((((void *)result__HPHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HPHH)->map_size_and_id__ITB &  4294967292LU) < new_size__LPCH))) {
-      result__HPHH=((__MEMORY *)result__HPHH)->map_next_free__JTB;
+    result__HRIH=first_free__5DVB;
+    while ((((void *)result__HRIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HRIH)->map_size_and_id__QTB &  4294967292LU) < new_size__HPDH))) {
+      result__HRIH=((__MEMORY *)result__HRIH)->map_next_free__RTB;
     };
-    if (((void *)result__HPHH == (void *)NULL)) {
-      result__HPHH=new_page__OA5();
+    if (((void *)result__HRIH == (void *)NULL)) {
+      result__HRIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__HPHH,new_size__LPCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HPHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__JPCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HPHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__HRIH,new_size__HPDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HRIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__FPDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HRIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__SVCD=((void **)result__JPCH);
-  Self__Z3WD=(__INTEGER)(nb_elements__XY1C -  1);
-  while ((Self__Z3WD >=  0)) {
-    Result__SVCD[Self__Z3WD]=NULL;
-    Self__Z3WD=(__INTEGER)(Self__Z3WD -  1);
+  Result__0VCD=((void **)result__FPDH);
+  Self__B4WD=(__INTEGER)(nb_elements__5Y1C -  1);
+  while ((Self__B4WD >=  0)) {
+    Result__0VCD[Self__B4WD]=NULL;
+    Self__B4WD=(__INTEGER)(Self__B4WD -  1);
   };
-  return(Result__SVCD);
+  return(Result__0VCD);
 }
 
-static void** create__3QSC(__INTEGER nb_elements__5QSC)
+static void** create__FRSC(__INTEGER nb_elements__HRSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__SPCH,a__XPCH,new_size__TPCH,new_size2__UPCH,a__PLEH;
-  __UINTEGER_32 new_size__QLEH;
-  __POINTER result__RPCH,ptr_table__LPHH,next__KPHH,result__MPHH;
-  void *result__PPHH;
-  __INTEGER Self__5OWD;
-  void **Result__W11C;
-  sz__SPCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5QSC * ((__INTEGER )(sizeof(void *)))));
-  result__RPCH=((__POINTER )(NULL));
-  a__XPCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__TPCH=(__UINTEGER_32)((__UINTEGER_32)(sz__SPCH + a__XPCH) & (__UINTEGER_32)(~ a__XPCH));
-  new_size2__UPCH=(__UINTEGER_32)(new_size__TPCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__UPCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__PLEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__QLEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UPCH + a__PLEH) & (__UINTEGER_32)(~ a__PLEH));
-    ptr_table__LPHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QLEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__KPHH=((__POINTER )(NULL));
-    result__MPHH=((__POINTER *)ptr_table__LPHH)[ 0];
-    if ((result__MPHH == (void *)NULL)) {
-      result__MPHH=new_lab__MRJ(new_size__QLEH);
-      next__KPHH=(void *)((unsigned long)result__MPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLEH)));
-      ((__POINTER *)next__KPHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__LPHH)[ 0]=next__KPHH;
-    } else {
-      next__KPHH=((__POINTER *)result__MPHH)[ 0];
-      if ((next__KPHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MPHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QLEH <<  1)) <=  4096)) {
-          next__KPHH=(void *)((unsigned long)result__MPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QLEH)));
-        } else {
-          next__KPHH=new_lab__MRJ(new_size__QLEH);
-        };
-        ((__POINTER *)next__KPHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LPHH)[ 0]=next__KPHH;
-      } else {
-        ((__POINTER *)result__MPHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KPHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__MPHH=next__KPHH;
-      };
-    };
-    ((__POINTER *)result__MPHH)[ 0]=((__POINTER ) 3);
-    result__RPCH=(void *)((unsigned long)result__MPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__OPDH,a__TPDH,new_size__PPDH,new_size2__QPDH,a__5MFH;
+  __UINTEGER_32 new_size__ANFH;
+  __POINTER result__NPDH,ptr_table__LRIH,next__KRIH,result__MRIH;
+  void *result__PRIH;
+  __INTEGER Self__HPWD;
+  void **Result__411C;
+  sz__OPDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HRSC * ((__INTEGER )(sizeof(void *)))));
+  result__NPDH=((__POINTER )(NULL));
+  a__TPDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__PPDH=(__UINTEGER_32)((__UINTEGER_32)(sz__OPDH + a__TPDH) & (__UINTEGER_32)(~ a__TPDH));
+  new_size2__QPDH=(__UINTEGER_32)(new_size__PPDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__QPDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__5MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ANFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QPDH + a__5MFH) & (__UINTEGER_32)(~ a__5MFH));
+    ptr_table__LRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ANFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KRIH=((__POINTER )(NULL));
+    result__MRIH=((__POINTER *)ptr_table__LRIH)[ 0];
+    if ((result__MRIH == (void *)NULL)) {
+      result__MRIH=new_lab__URJ(new_size__ANFH);
+      next__KRIH=(void *)((unsigned long)result__MRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANFH)));
+      ((__POINTER *)next__KRIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LRIH)[ 0]=next__KRIH;
+    } else {
+      next__KRIH=((__POINTER *)result__MRIH)[ 0];
+      if ((next__KRIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MRIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ANFH <<  1)) <=  4096)) {
+          next__KRIH=(void *)((unsigned long)result__MRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANFH)));
+        } else {
+          next__KRIH=new_lab__URJ(new_size__ANFH);
+        };
+        ((__POINTER *)next__KRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LRIH)[ 0]=next__KRIH;
+      } else {
+        ((__POINTER *)result__MRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MRIH=next__KRIH;
+      };
+    };
+    ((__POINTER *)result__MRIH)[ 0]=((__POINTER ) 3);
+    result__NPDH=(void *)((unsigned long)result__MRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__PPHH=first_free__XDVB;
-    while ((((void *)result__PPHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PPHH)->map_size_and_id__ITB &  4294967292LU) < new_size__TPCH))) {
-      result__PPHH=((__MEMORY *)result__PPHH)->map_next_free__JTB;
+    result__PRIH=first_free__5DVB;
+    while ((((void *)result__PRIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PRIH)->map_size_and_id__QTB &  4294967292LU) < new_size__PPDH))) {
+      result__PRIH=((__MEMORY *)result__PRIH)->map_next_free__RTB;
     };
-    if (((void *)result__PPHH == (void *)NULL)) {
-      result__PPHH=new_page__OA5();
+    if (((void *)result__PRIH == (void *)NULL)) {
+      result__PRIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__PPHH,new_size__TPCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PPHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__RPCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PPHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__PRIH,new_size__PPDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PRIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__NPDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PRIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__W11C=((void **)result__RPCH);
-  Self__5OWD=(__INTEGER)(nb_elements__5QSC -  1);
-  while ((Self__5OWD >=  0)) {
-    Result__W11C[Self__5OWD]=NULL;
-    Self__5OWD=(__INTEGER)(Self__5OWD -  1);
+  Result__411C=((void **)result__NPDH);
+  Self__HPWD=(__INTEGER)(nb_elements__HRSC -  1);
+  while ((Self__HPWD >=  0)) {
+    Result__411C[Self__HPWD]=NULL;
+    Self__HPWD=(__INTEGER)(Self__HPWD -  1);
   };
-  return(Result__W11C);
+  return(Result__411C);
 }
 
-static void short__token__to__LBD(void *key__NBD,__INTEGER beg__OBD,__INTEGER end__PBD)
+static void short__token__to__TBD(void *key__VBD,__INTEGER beg__WBD,__INTEGER end__XBD)
 // ({NULLxSTRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER pos__QBD,result__0JGH,__tmp__2JGH,Self__3JGH,__tmp__LCD;
-  __INTEGER Self__CL4,__tmp__CKGH,__tmp__EKGH,Self__FKGH,__tmp__BDD;
-  __INTEGER Self__TM4,__tmp__XDD,__tmp__0DD;
-  void *add_text__RBD;
-  __STRING_CONSTANT *Self__1JGH;
-  __STRING *Self__DKGH;
-  void *fmt__SBD;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WJGH;
-  void *node__YJGH;
-  pos__QBD= 0;
-  add_text__RBD=NULL;
-  fmt__SBD=NULL;
-  if (is_shorter__5Y) {
-    if (is_active_short__4BC) {
-      Self__WJGH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
-      Self__1JGH=((__STRING_CONSTANT *)key__NBD);
-      result__0JGH= 0;
-      __tmp__2JGH=Self__1JGH->count__DD;
-      Self__3JGH= 1;
-      while ((Self__3JGH <= __tmp__2JGH)) {
-        result__0JGH=(__INTEGER)((__INTEGER)( 5 * result__0JGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1JGH->storage__VQO)[(__INTEGER)(Self__3JGH -  1)])));
-        Self__3JGH=(__INTEGER)(Self__3JGH +  1);
-      };
-      if ((result__0JGH <  0)) {
-        result__0JGH=(__INTEGER)(~ result__0JGH);
-      };
-      node__YJGH=((void **)Self__WJGH->buckets__5CT)[(__INTEGER)(result__0JGH % Self__WJGH->capacity__0CT)];
-      while ((! (((void *)node__YJGH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YJGH)->key__LDT == (void *)key__NBD)))) {
-        node__YJGH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YJGH)->next__WDT;
-      };
-      if (((void *)node__YJGH != (void *)NULL)) {
-        ((__STRING *)token__GCD)->count__WFC= 0;
-        pos__QBD=(__INTEGER)(beg__OBD + short_derive__BCC);
-        __tmp__LCD=(__INTEGER)(end__PBD -  1);
-        Self__CL4=beg__OBD;
-        while ((Self__CL4 <= __tmp__LCD)) {
-          add_last__ZLT(token__GCD,((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(Self__CL4 -  1)]);
-          Self__DKGH=((__STRING *)output_code__SI);
-          __tmp__CKGH=(__INTEGER)(pos__QBD +  1);
-          __tmp__EKGH=Self__DKGH->count__WFC;
-          Self__FKGH=__tmp__CKGH;
-          while ((Self__FKGH <= __tmp__EKGH)) {
-            ((__CHARACTER *)Self__DKGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__FKGH -  1) -  1)]=((__CHARACTER *)Self__DKGH->storage__BCS)[(__INTEGER)(Self__FKGH -  1)];
-            Self__FKGH=(__INTEGER)(Self__FKGH +  1);
-          };
-          Self__DKGH->count__WFC=(__INTEGER)(Self__DKGH->count__WFC -  1);
-          Self__CL4=(__INTEGER)(Self__CL4 +  1);
-        };
-        short_derive__BCC=(__INTEGER)(short_derive__BCC - ((__STRING *)token__GCD)->count__WFC);
-        fmt__SBD=at__QL4(short_dico__QD,key__NBD);
-        __tmp__BDD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__SBD)->parent_linked_collection__LD.upper__5CD;
-        Self__TM4= 1;
-        while ((Self__TM4 <= __tmp__BDD)) {
-          if (((void *)item__Y0ND(fmt__SBD,Self__TM4) == (void *)NULL)) {
-            add_text__RBD=token__GCD;
-          } else {
-            add_text__RBD=item__Y0ND(fmt__SBD,Self__TM4);
-          };
-          insert_string__to__0XU(output_code__SI,add_text__RBD,pos__QBD);
-          if (((struct ___OBJ *)add_text__RBD)->__id==__STRING_CONSTANT__) {
-            __tmp__XDD=((__STRING_CONSTANT *)add_text__RBD)->count__DD;
-          } else {
-            __tmp__XDD=((__STRING *)add_text__RBD)->count__WFC;
-          };
-          pos__QBD=(__INTEGER)(pos__QBD + __tmp__XDD);
-          if (((struct ___OBJ *)add_text__RBD)->__id==__STRING_CONSTANT__) {
-            __tmp__0DD=((__STRING_CONSTANT *)add_text__RBD)->count__DD;
-          } else {
-            __tmp__0DD=((__STRING *)add_text__RBD)->count__WFC;
-          };
-          short_derive__BCC=(__INTEGER)(short_derive__BCC + __tmp__0DD);
-          Self__TM4=(__INTEGER)(Self__TM4 +  1);
+  __INTEGER pos__YBD,result__VLHH,__tmp__XLHH,Self__YLHH,__tmp__TCD;
+  __INTEGER Self__KL4,__tmp__3LHH,__tmp__5LHH,Self__AMHH,__tmp__JDD;
+  __INTEGER Self__1M4,__tmp__5DD,__tmp__CED;
+  void *add_text__ZBD;
+  __STRING_CONSTANT *Self__WLHH;
+  __STRING *Self__4LHH;
+  void *fmt__0BD;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RLHH;
+  void *node__TLHH;
+  pos__YBD= 0;
+  add_text__ZBD=NULL;
+  fmt__0BD=NULL;
+  if (is_shorter__FZ) {
+    if (is_active_short__GCC) {
+      Self__RLHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      Self__WLHH=((__STRING_CONSTANT *)key__VBD);
+      result__VLHH= 0;
+      __tmp__XLHH=Self__WLHH->count__DD;
+      Self__YLHH= 1;
+      while ((Self__YLHH <= __tmp__XLHH)) {
+        result__VLHH=(__INTEGER)((__INTEGER)( 5 * result__VLHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WLHH->storage__3QO)[(__INTEGER)(Self__YLHH -  1)])));
+        Self__YLHH=(__INTEGER)(Self__YLHH +  1);
+      };
+      if ((result__VLHH <  0)) {
+        result__VLHH=(__INTEGER)(~ result__VLHH);
+      };
+      node__TLHH=((void **)Self__RLHH->buckets__HDT)[(__INTEGER)(result__VLHH % Self__RLHH->capacity__CDT)];
+      while ((! (((void *)node__TLHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TLHH)->key__TDT == (void *)key__VBD)))) {
+        node__TLHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TLHH)->next__4DT;
+      };
+      if (((void *)node__TLHH != (void *)NULL)) {
+        ((__STRING *)token__OCD)->count__4FC= 0;
+        pos__YBD=(__INTEGER)(beg__WBD + short_derive__JCC);
+        __tmp__TCD=(__INTEGER)(end__XBD -  1);
+        Self__KL4=beg__WBD;
+        while ((Self__KL4 <= __tmp__TCD)) {
+          add_last__BMT(token__OCD,((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(Self__KL4 -  1)]);
+          Self__4LHH=((__STRING *)output_code__SI);
+          __tmp__3LHH=(__INTEGER)(pos__YBD +  1);
+          __tmp__5LHH=Self__4LHH->count__4FC;
+          Self__AMHH=__tmp__3LHH;
+          while ((Self__AMHH <= __tmp__5LHH)) {
+            ((__CHARACTER *)Self__4LHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__AMHH -  1) -  1)]=((__CHARACTER *)Self__4LHH->storage__JCS)[(__INTEGER)(Self__AMHH -  1)];
+            Self__AMHH=(__INTEGER)(Self__AMHH +  1);
+          };
+          Self__4LHH->count__4FC=(__INTEGER)(Self__4LHH->count__4FC -  1);
+          Self__KL4=(__INTEGER)(Self__KL4 +  1);
+        };
+        short_derive__JCC=(__INTEGER)(short_derive__JCC - ((__STRING *)token__OCD)->count__4FC);
+        fmt__0BD=at__YL4(short_dico__QD,key__VBD);
+        __tmp__JDD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__0BD)->parent_linked_collection__LD.upper__HDD;
+        Self__1M4= 1;
+        while ((Self__1M4 <= __tmp__JDD)) {
+          if (((void *)item__A1ND(fmt__0BD,Self__1M4) == (void *)NULL)) {
+            add_text__ZBD=token__OCD;
+          } else {
+            add_text__ZBD=item__A1ND(fmt__0BD,Self__1M4);
+          };
+          insert_string__to__CYU(output_code__SI,add_text__ZBD,pos__YBD);
+          if (((struct ___OBJ *)add_text__ZBD)->__id==__STRING_CONSTANT__) {
+            __tmp__5DD=((__STRING_CONSTANT *)add_text__ZBD)->count__DD;
+          } else {
+            __tmp__5DD=((__STRING *)add_text__ZBD)->count__4FC;
+          };
+          pos__YBD=(__INTEGER)(pos__YBD + __tmp__5DD);
+          if (((struct ___OBJ *)add_text__ZBD)->__id==__STRING_CONSTANT__) {
+            __tmp__CED=((__STRING_CONSTANT *)add_text__ZBD)->count__DD;
+          } else {
+            __tmp__CED=((__STRING *)add_text__ZBD)->count__4FC;
+          };
+          short_derive__JCC=(__INTEGER)(short_derive__JCC + __tmp__CED);
+          Self__1M4=(__INTEGER)(Self__1M4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__JIZE(__STRING *Self__KIZE)
+static __INTEGER first_substring_index__MIZE(__STRING *Self__NIZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __INTEGER i__SD4E,result__UD4E,s__TD4E;
-  i__SD4E= 0;
-  result__UD4E= 0;
-  s__TD4E= 1;
-  while ((! ((result__UD4E !=  0) || ((__INTEGER)((__INTEGER)(s__TD4E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__KIZE->count__WFC)))) {
-    i__SD4E= 1;
-    while ((! ((i__SD4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__KIZE->storage__BCS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__TD4E + i__SD4E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__VQO)[(__INTEGER)(i__SD4E -  1)])))) {
-      i__SD4E=(__INTEGER)(i__SD4E +  1);
+  __INTEGER i__4N4E,result__AO4E,s__5N4E;
+  i__4N4E= 0;
+  result__AO4E= 0;
+  s__5N4E= 1;
+  while ((! ((result__AO4E !=  0) || ((__INTEGER)((__INTEGER)(s__5N4E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__NIZE->count__4FC)))) {
+    i__4N4E= 1;
+    while ((! ((i__4N4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__NIZE->storage__JCS)[(__INTEGER)((__INTEGER)((__INTEGER)(s__5N4E + i__4N4E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__3QO)[(__INTEGER)(i__4N4E -  1)])))) {
+      i__4N4E=(__INTEGER)(i__4N4E +  1);
     };
-    if ((i__SD4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__UD4E=s__TD4E;
+    if ((i__4N4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__AO4E=s__5N4E;
     } else {
-      s__TD4E=(__INTEGER)(s__TD4E +  1);
+      s__5N4E=(__INTEGER)(s__5N4E +  1);
     };
   };
-  return(result__UD4E);
+  return(result__AO4E);
 }
 
-static __BOOLEAN read_string__LFQ()
+static __BOOLEAN read_string__TFQ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__PFQ;
-  __POSITION pos__L0VG;
-  __BOOLEAN result__OFQ,__tmp__ZFQ,__tmp__YGQ,__tmp__ZGQ;
-  __CHARACTER result__PY3G,result__ZY3G,result__CZ3G,result__HZ3G;
-  __CHARACTER result__MZ3G,result__RZ3G,result__WZ3G;
-  result__OFQ=FALSE__;
-  old_pos__PFQ= 0;
-  if (read_space__3RD()) {
-    result__PY3G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__PY3G=((__CHARACTER )(( 0)));
-    } else {
-      result__PY3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-    };
-    __tmp__ZFQ=(result__PY3G == '\"');
+  __INTEGER old_pos__XFQ;
+  __POSITION pos__IXWG;
+  __BOOLEAN result__WFQ,__tmp__BGQ,__tmp__AHQ,__tmp__BHQ;
+  __CHARACTER result__YW4G,result__CX4G,result__LX4G,result__QX4G;
+  __CHARACTER result__VX4G,result__0X4G,result__5X4G;
+  result__WFQ=FALSE__;
+  old_pos__XFQ= 0;
+  if (read_space__FSD()) {
+    result__YW4G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__YW4G=((__CHARACTER )(( 0)));
+    } else {
+      result__YW4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    };
+    __tmp__BGQ=(result__YW4G == '\"');
   } else {
-    __tmp__ZFQ=FALSE__;
+    __tmp__BGQ=FALSE__;
   };
-  if (__tmp__ZFQ) {
-    old_pos__PFQ=position__SBC;
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    until_do__4JRC:
+  if (__tmp__BGQ) {
+    old_pos__XFQ=position__0BC;
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    until_do__GKRC:
     {
-      result__ZY3G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__ZY3G=((__CHARACTER )(( 0)));
+      result__CX4G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__CX4G=((__CHARACTER )(( 0)));
       } else {
-        result__ZY3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__CX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__ZY3G == ((__CHARACTER )(( 0))))) {
-        __tmp__YGQ=TRUE__;
+      if ((result__CX4G == ((__CHARACTER )(( 0))))) {
+        __tmp__AHQ=TRUE__;
       } else {
-        result__CZ3G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__CZ3G=((__CHARACTER )(( 0)));
+        result__LX4G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__LX4G=((__CHARACTER )(( 0)));
         } else {
-          result__CZ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__LX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__YGQ=(result__CZ3G == '\n');
+        __tmp__AHQ=(result__LX4G == '\n');
       };
-      if (__tmp__YGQ) {
-        __tmp__ZGQ=TRUE__;
+      if (__tmp__AHQ) {
+        __tmp__BHQ=TRUE__;
       } else {
-        result__HZ3G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__HZ3G=((__CHARACTER )(( 0)));
+        result__QX4G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__QX4G=((__CHARACTER )(( 0)));
         } else {
-          result__HZ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__QX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__ZGQ=(result__HZ3G == '\"');
+        __tmp__BHQ=(result__QX4G == '\"');
       };
-      if ((! __tmp__ZGQ)) {
-        result__MZ3G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__MZ3G=((__CHARACTER )(( 0)));
+      if ((! __tmp__BHQ)) {
+        result__VX4G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__VX4G=((__CHARACTER )(( 0)));
         } else {
-          result__MZ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__VX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__MZ3G);
-        result__RZ3G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__RZ3G=((__CHARACTER )(( 0)));
+        add_last__BMT(string_tmp__VH,result__VX4G);
+        result__0X4G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__0X4G=((__CHARACTER )(( 0)));
         } else {
-          result__RZ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__0X4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__RZ3G == '\\')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          read_escape_character__WAKF();
+        if ((result__0X4G == '\\')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          read_escape_character__YLKF();
         } else {
-          position__SBC=(__INTEGER)(position__SBC +  1);
+          position__0BC=(__INTEGER)(position__0BC +  1);
         };
-        goto until_do__4JRC;
+        goto until_do__GKRC;
       };
     };
-    result__WZ3G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__WZ3G=((__CHARACTER )(( 0)));
+    result__5X4G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__5X4G=((__CHARACTER )(( 0)));
     } else {
-      result__WZ3G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__5X4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__WZ3G == '\"')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      last_string__I0C=get__IWB(string_tmp__VH);
-      result__OFQ=TRUE__;
-      short__token__to__LBD((&__string_123),old_pos__PFQ,position__SBC);
+    if ((result__5X4G == '\"')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      last_string__Q0C=get__QWB(string_tmp__VH);
+      result__WFQ=TRUE__;
+      short__token__to__TBD((&__string_123),old_pos__XFQ,position__0BC);
     } else {
-      position__SBC=begin_position__LBE;
-      pos__L0VG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_250));
-      put_position__UOG(pos__L0VG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+      position__0BC=begin_position__TBE;
+      pos__IXWG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_249));
+      put_position__2OG(pos__IXWG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__OFQ);
+  return(result__WFQ);
 }
 
-static void reduce_path__BE3E(void *st__DE3E)
+static void reduce_path__NO3E(void *st__PO3E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER stat__FE3E,__tmp__KKGH,Self__MKGH,i__EE3E,Self__NS0F;
-  __INTEGER n__AMEH,len__SKGH,__tmp__TKGH,__tmp__VKGH,Self__WKGH;
-  __INTEGER len__1KGH,__tmp__2KGH,__tmp__4KGH,Self__5KGH,result__DLGH;
-  __INTEGER n__CMEH,len__ILGH,__tmp__JLGH,__tmp__LLGH,Self__MLGH;
-  __INTEGER end__PLGH,len__RLGH,__tmp__SLGH,__tmp__ULGH,Self__VLGH;
-  __INTEGER Self__KEDG,n__EMEH,len__0LGH,__tmp__1LGH,__tmp__3LGH;
-  __INTEGER Self__4LGH,result__WLGD,end__BMGH,len__DMGH,__tmp__EMGH;
-  __INTEGER __tmp__GMGH,Self__HMGH;
-  __STRING *Self__IKGH,*Self__5LEH,*Self__3KGH,*Self__ELGH,*Self__BMEH;
-  __STRING *Self__TLGH,*Self__DMEH,*Self__FMEH,*Self__HMEH,*Self__SLGD;
-  __STRING *Self__FMGH;
-  __CHARACTER car__GE3E,Self__QR2E;
-  __CHARACTER *__tmp__JKGH,*Self__LKGH;
-  __BOOLEAN __tmp__NG3E,__tmp__SH3E,result__X4WF,result__SR2E;
-  __BOOLEAN __tmp__2R2E,__tmp__TI3E;
-  stat__FE3E= 0;
-  car__GE3E='\0';
-  Self__IKGH=((__STRING *)st__DE3E);
-  __tmp__JKGH=Self__IKGH->storage__BCS;
-  __tmp__KKGH=(__INTEGER)(Self__IKGH->count__WFC -  1);
-  Self__LKGH=((__CHARACTER *)__tmp__JKGH);
-  Self__MKGH=__tmp__KKGH;
-  while ((Self__MKGH >=  0)) {
-    if (('\\' == Self__LKGH[Self__MKGH])) {
-      Self__LKGH[Self__MKGH]='/';
-    };
-    Self__MKGH=(__INTEGER)(Self__MKGH -  1);
-  };
-  i__EE3E= 1;
-  while ((i__EE3E <= ((__STRING *)st__DE3E)->count__WFC)) {
-    car__GE3E=((__CHARACTER *)((__STRING *)st__DE3E)->storage__BCS)[(__INTEGER)(i__EE3E -  1)];
-    if ((car__GE3E == '/')) {
-      Self__NS0F=stat__FE3E;
-      if ((stat__FE3E ==  0)) {
-        stat__FE3E= 1;
-      };
-      if ((Self__NS0F ==  1)) {
-        Self__5LEH=((__STRING *)st__DE3E);
-        n__AMEH=(__INTEGER)(i__EE3E -  1);
-        if ((n__AMEH > Self__5LEH->count__WFC)) {
-          Self__5LEH->count__WFC= 0;
-        } else {
-          if ((n__AMEH >  0)) {
-            len__SKGH=(__INTEGER)((__INTEGER)(n__AMEH -  1) +  1);
-            if ((len__SKGH >  0)) {
-              __tmp__TKGH=(__INTEGER)(n__AMEH +  1);
-              __tmp__VKGH=Self__5LEH->count__WFC;
-              Self__WKGH=__tmp__TKGH;
-              while ((Self__WKGH <= __tmp__VKGH)) {
-                ((__CHARACTER *)Self__5LEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__WKGH - len__SKGH) -  1)]=((__CHARACTER *)Self__5LEH->storage__BCS)[(__INTEGER)(Self__WKGH -  1)];
-                Self__WKGH=(__INTEGER)(Self__WKGH +  1);
+  __INTEGER stat__RO3E,__tmp__FMHH,Self__HMHH,i__QO3E,Self__TA1F;
+  __INTEGER n__QNFH,len__NMHH,__tmp__OMHH,__tmp__QMHH,Self__RMHH;
+  __INTEGER len__WMHH,__tmp__XMHH,__tmp__ZMHH,Self__0MHH,result__4MHH;
+  __INTEGER n__SNFH,len__DNHH,__tmp__ENHH,__tmp__GNHH,Self__HNHH;
+  __INTEGER end__KNHH,len__MNHH,__tmp__NNHH,__tmp__PNHH,Self__QNHH;
+  __INTEGER Self__X2DG,n__UNFH,len__VNHH,__tmp__WNHH,__tmp__YNHH;
+  __INTEGER Self__ZNHH,result__4LGD,end__2NHH,len__4NHH,__tmp__5NHH;
+  __INTEGER __tmp__BOHH,Self__COHH;
+  __STRING *Self__DMHH,*Self__PNFH,*Self__YMHH,*Self__5MHH,*Self__RNFH;
+  __STRING *Self__ONHH,*Self__TNFH,*Self__VNFH,*Self__XNFH,*Self__0LGD;
+  __STRING *Self__AOHH;
+  __CHARACTER car__SO3E,Self__NR2E;
+  __CHARACTER *__tmp__EMHH,*Self__GMHH;
+  __BOOLEAN __tmp__ZQ3E,__tmp__4R3E,result__3LXF,result__PR2E;
+  __BOOLEAN __tmp__ZR2E,__tmp__5S3E;
+  stat__RO3E= 0;
+  car__SO3E='\0';
+  Self__DMHH=((__STRING *)st__PO3E);
+  __tmp__EMHH=Self__DMHH->storage__JCS;
+  __tmp__FMHH=(__INTEGER)(Self__DMHH->count__4FC -  1);
+  Self__GMHH=((__CHARACTER *)__tmp__EMHH);
+  Self__HMHH=__tmp__FMHH;
+  while ((Self__HMHH >=  0)) {
+    if (('\\' == Self__GMHH[Self__HMHH])) {
+      Self__GMHH[Self__HMHH]='/';
+    };
+    Self__HMHH=(__INTEGER)(Self__HMHH -  1);
+  };
+  i__QO3E= 1;
+  while ((i__QO3E <= ((__STRING *)st__PO3E)->count__4FC)) {
+    car__SO3E=((__CHARACTER *)((__STRING *)st__PO3E)->storage__JCS)[(__INTEGER)(i__QO3E -  1)];
+    if ((car__SO3E == '/')) {
+      Self__TA1F=stat__RO3E;
+      if ((stat__RO3E ==  0)) {
+        stat__RO3E= 1;
+      };
+      if ((Self__TA1F ==  1)) {
+        Self__PNFH=((__STRING *)st__PO3E);
+        n__QNFH=(__INTEGER)(i__QO3E -  1);
+        if ((n__QNFH > Self__PNFH->count__4FC)) {
+          Self__PNFH->count__4FC= 0;
+        } else {
+          if ((n__QNFH >  0)) {
+            len__NMHH=(__INTEGER)((__INTEGER)(n__QNFH -  1) +  1);
+            if ((len__NMHH >  0)) {
+              __tmp__OMHH=(__INTEGER)(n__QNFH +  1);
+              __tmp__QMHH=Self__PNFH->count__4FC;
+              Self__RMHH=__tmp__OMHH;
+              while ((Self__RMHH <= __tmp__QMHH)) {
+                ((__CHARACTER *)Self__PNFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__RMHH - len__NMHH) -  1)]=((__CHARACTER *)Self__PNFH->storage__JCS)[(__INTEGER)(Self__RMHH -  1)];
+                Self__RMHH=(__INTEGER)(Self__RMHH +  1);
               };
-              Self__5LEH->count__WFC=(__INTEGER)(Self__5LEH->count__WFC - len__SKGH);
-            };
-          };
-        };
-        i__EE3E= 1;
-      };
-      if ((Self__NS0F ==  2)) {
-        Self__3KGH=((__STRING *)st__DE3E);
-        len__1KGH=(__INTEGER)((__INTEGER)(i__EE3E - (__INTEGER)(i__EE3E -  1)) +  1);
-        if ((len__1KGH >  0)) {
-          __tmp__2KGH=(__INTEGER)(i__EE3E +  1);
-          __tmp__4KGH=Self__3KGH->count__WFC;
-          Self__5KGH=__tmp__2KGH;
-          while ((Self__5KGH <= __tmp__4KGH)) {
-            ((__CHARACTER *)Self__3KGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__5KGH - len__1KGH) -  1)]=((__CHARACTER *)Self__3KGH->storage__BCS)[(__INTEGER)(Self__5KGH -  1)];
-            Self__5KGH=(__INTEGER)(Self__5KGH +  1);
-          };
-          Self__3KGH->count__WFC=(__INTEGER)(Self__3KGH->count__WFC - len__1KGH);
-        };
-        i__EE3E=(__INTEGER)(i__EE3E -  2);
-        stat__FE3E= 1;
-      };
-      if ((Self__NS0F ==  3)) {
-        Self__ELGH=((__STRING *)st__DE3E);
-        result__DLGH=(__INTEGER)(i__EE3E -  4);
-        while ((! ((result__DLGH <  1) || ('/' == ((__CHARACTER *)Self__ELGH->storage__BCS)[(__INTEGER)(result__DLGH -  1)])))) {
-          result__DLGH=(__INTEGER)(result__DLGH -  1);
-        };
-        if ((result__DLGH ==  0)) {
-          Self__BMEH=((__STRING *)st__DE3E);
-          n__CMEH=(__INTEGER)(i__EE3E -  1);
-          if ((n__CMEH > Self__BMEH->count__WFC)) {
-            Self__BMEH->count__WFC= 0;
-          } else {
-            if ((n__CMEH >  0)) {
-              len__ILGH=(__INTEGER)((__INTEGER)(n__CMEH -  1) +  1);
-              if ((len__ILGH >  0)) {
-                __tmp__JLGH=(__INTEGER)(n__CMEH +  1);
-                __tmp__LLGH=Self__BMEH->count__WFC;
-                Self__MLGH=__tmp__JLGH;
-                while ((Self__MLGH <= __tmp__LLGH)) {
-                  ((__CHARACTER *)Self__BMEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__MLGH - len__ILGH) -  1)]=((__CHARACTER *)Self__BMEH->storage__BCS)[(__INTEGER)(Self__MLGH -  1)];
-                  Self__MLGH=(__INTEGER)(Self__MLGH +  1);
+              Self__PNFH->count__4FC=(__INTEGER)(Self__PNFH->count__4FC - len__NMHH);
+            };
+          };
+        };
+        i__QO3E= 1;
+      };
+      if ((Self__TA1F ==  2)) {
+        Self__YMHH=((__STRING *)st__PO3E);
+        len__WMHH=(__INTEGER)((__INTEGER)(i__QO3E - (__INTEGER)(i__QO3E -  1)) +  1);
+        if ((len__WMHH >  0)) {
+          __tmp__XMHH=(__INTEGER)(i__QO3E +  1);
+          __tmp__ZMHH=Self__YMHH->count__4FC;
+          Self__0MHH=__tmp__XMHH;
+          while ((Self__0MHH <= __tmp__ZMHH)) {
+            ((__CHARACTER *)Self__YMHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__0MHH - len__WMHH) -  1)]=((__CHARACTER *)Self__YMHH->storage__JCS)[(__INTEGER)(Self__0MHH -  1)];
+            Self__0MHH=(__INTEGER)(Self__0MHH +  1);
+          };
+          Self__YMHH->count__4FC=(__INTEGER)(Self__YMHH->count__4FC - len__WMHH);
+        };
+        i__QO3E=(__INTEGER)(i__QO3E -  2);
+        stat__RO3E= 1;
+      };
+      if ((Self__TA1F ==  3)) {
+        Self__5MHH=((__STRING *)st__PO3E);
+        result__4MHH=(__INTEGER)(i__QO3E -  4);
+        while ((! ((result__4MHH <  1) || ('/' == ((__CHARACTER *)Self__5MHH->storage__JCS)[(__INTEGER)(result__4MHH -  1)])))) {
+          result__4MHH=(__INTEGER)(result__4MHH -  1);
+        };
+        if ((result__4MHH ==  0)) {
+          Self__RNFH=((__STRING *)st__PO3E);
+          n__SNFH=(__INTEGER)(i__QO3E -  1);
+          if ((n__SNFH > Self__RNFH->count__4FC)) {
+            Self__RNFH->count__4FC= 0;
+          } else {
+            if ((n__SNFH >  0)) {
+              len__DNHH=(__INTEGER)((__INTEGER)(n__SNFH -  1) +  1);
+              if ((len__DNHH >  0)) {
+                __tmp__ENHH=(__INTEGER)(n__SNFH +  1);
+                __tmp__GNHH=Self__RNFH->count__4FC;
+                Self__HNHH=__tmp__ENHH;
+                while ((Self__HNHH <= __tmp__GNHH)) {
+                  ((__CHARACTER *)Self__RNFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__HNHH - len__DNHH) -  1)]=((__CHARACTER *)Self__RNFH->storage__JCS)[(__INTEGER)(Self__HNHH -  1)];
+                  Self__HNHH=(__INTEGER)(Self__HNHH +  1);
                 };
-                Self__BMEH->count__WFC=(__INTEGER)(Self__BMEH->count__WFC - len__ILGH);
+                Self__RNFH->count__4FC=(__INTEGER)(Self__RNFH->count__4FC - len__DNHH);
               };
             };
           };
-          i__EE3E= 1;
+          i__QO3E= 1;
         } else {
-          Self__TLGH=((__STRING *)st__DE3E);
-          end__PLGH=(__INTEGER)(i__EE3E -  1);
-          len__RLGH=(__INTEGER)((__INTEGER)(end__PLGH - result__DLGH) +  1);
-          if ((len__RLGH >  0)) {
-            __tmp__SLGH=(__INTEGER)(end__PLGH +  1);
-            __tmp__ULGH=Self__TLGH->count__WFC;
-            Self__VLGH=__tmp__SLGH;
-            while ((Self__VLGH <= __tmp__ULGH)) {
-              ((__CHARACTER *)Self__TLGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__VLGH - len__RLGH) -  1)]=((__CHARACTER *)Self__TLGH->storage__BCS)[(__INTEGER)(Self__VLGH -  1)];
-              Self__VLGH=(__INTEGER)(Self__VLGH +  1);
+          Self__ONHH=((__STRING *)st__PO3E);
+          end__KNHH=(__INTEGER)(i__QO3E -  1);
+          len__MNHH=(__INTEGER)((__INTEGER)(end__KNHH - result__4MHH) +  1);
+          if ((len__MNHH >  0)) {
+            __tmp__NNHH=(__INTEGER)(end__KNHH +  1);
+            __tmp__PNHH=Self__ONHH->count__4FC;
+            Self__QNHH=__tmp__NNHH;
+            while ((Self__QNHH <= __tmp__PNHH)) {
+              ((__CHARACTER *)Self__ONHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__QNHH - len__MNHH) -  1)]=((__CHARACTER *)Self__ONHH->storage__JCS)[(__INTEGER)(Self__QNHH -  1)];
+              Self__QNHH=(__INTEGER)(Self__QNHH +  1);
             };
-            Self__TLGH->count__WFC=(__INTEGER)(Self__TLGH->count__WFC - len__RLGH);
+            Self__ONHH->count__4FC=(__INTEGER)(Self__ONHH->count__4FC - len__MNHH);
           };
-          i__EE3E=result__DLGH;
+          i__QO3E=result__4MHH;
         };
-        stat__FE3E= 1;
+        stat__RO3E= 1;
       };
-      __tmp__NG3E=TRUE__;
+      __tmp__ZQ3E=TRUE__;
     } else {
-      __tmp__NG3E=FALSE__;
+      __tmp__ZQ3E=FALSE__;
     };
-    if (__tmp__NG3E) {
-      __tmp__SH3E=TRUE__;
+    if (__tmp__ZQ3E) {
+      __tmp__4R3E=TRUE__;
     } else {
-      result__X4WF=(car__GE3E == '.');
-      if (result__X4WF) {
-        Self__KEDG=stat__FE3E;
-        if ((stat__FE3E ==  1)) {
-          stat__FE3E= 2;
+      result__3LXF=(car__SO3E == '.');
+      if (result__3LXF) {
+        Self__X2DG=stat__RO3E;
+        if ((stat__RO3E ==  1)) {
+          stat__RO3E= 2;
         };
-        if ((Self__KEDG ==  2)) {
-          stat__FE3E= 3;
+        if ((Self__X2DG ==  2)) {
+          stat__RO3E= 3;
         };
-        if ((Self__KEDG ==  3)) {
-          stat__FE3E= 0;
+        if ((Self__X2DG ==  3)) {
+          stat__RO3E= 0;
         };
       };
-      __tmp__SH3E=result__X4WF;
+      __tmp__4R3E=result__3LXF;
     };
-    if ((! __tmp__SH3E)) {
-      if (((car__GE3E == ':') && (i__EE3E >  2))) {
-        Self__QR2E=((__CHARACTER *)((__STRING *)st__DE3E)->storage__BCS)[(__INTEGER)((__INTEGER)(i__EE3E -  1) -  1)];
-        result__SR2E=FALSE__;
-        if ((((__INTEGER_8 )Self__QR2E) >= ((__INTEGER_8 )'a'))) {
-          result__SR2E=(((__INTEGER_8 )Self__QR2E) <= ((__INTEGER_8 )'z'));
-          __tmp__2R2E=TRUE__;
+    if ((! __tmp__4R3E)) {
+      if (((car__SO3E == ':') && (i__QO3E >  2))) {
+        Self__NR2E=((__CHARACTER *)((__STRING *)st__PO3E)->storage__JCS)[(__INTEGER)((__INTEGER)(i__QO3E -  1) -  1)];
+        result__PR2E=FALSE__;
+        if ((((__INTEGER_8 )Self__NR2E) >= ((__INTEGER_8 )'a'))) {
+          result__PR2E=(((__INTEGER_8 )Self__NR2E) <= ((__INTEGER_8 )'z'));
+          __tmp__ZR2E=TRUE__;
         } else {
-          __tmp__2R2E=FALSE__;
+          __tmp__ZR2E=FALSE__;
         };
-        if ((! __tmp__2R2E)) {
-          if ((((__INTEGER_8 )Self__QR2E) >= ((__INTEGER_8 )'A'))) {
-            result__SR2E=(((__INTEGER_8 )Self__QR2E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__ZR2E)) {
+          if ((((__INTEGER_8 )Self__NR2E) >= ((__INTEGER_8 )'A'))) {
+            result__PR2E=(((__INTEGER_8 )Self__NR2E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__TI3E=result__SR2E;
+        __tmp__5S3E=result__PR2E;
       } else {
-        __tmp__TI3E=FALSE__;
+        __tmp__5S3E=FALSE__;
       };
-      if ((__tmp__TI3E && (((__CHARACTER *)((__STRING *)st__DE3E)->storage__BCS)[(__INTEGER)((__INTEGER)(i__EE3E -  2) -  1)] == '/'))) {
-        Self__DMEH=((__STRING *)st__DE3E);
-        n__EMEH=(__INTEGER)(i__EE3E -  2);
-        if ((n__EMEH > Self__DMEH->count__WFC)) {
-          Self__DMEH->count__WFC= 0;
+      if ((__tmp__5S3E && (((__CHARACTER *)((__STRING *)st__PO3E)->storage__JCS)[(__INTEGER)((__INTEGER)(i__QO3E -  2) -  1)] == '/'))) {
+        Self__TNFH=((__STRING *)st__PO3E);
+        n__UNFH=(__INTEGER)(i__QO3E -  2);
+        if ((n__UNFH > Self__TNFH->count__4FC)) {
+          Self__TNFH->count__4FC= 0;
         } else {
-          if ((n__EMEH >  0)) {
-            len__0LGH=(__INTEGER)((__INTEGER)(n__EMEH -  1) +  1);
-            if ((len__0LGH >  0)) {
-              __tmp__1LGH=(__INTEGER)(n__EMEH +  1);
-              __tmp__3LGH=Self__DMEH->count__WFC;
-              Self__4LGH=__tmp__1LGH;
-              while ((Self__4LGH <= __tmp__3LGH)) {
-                ((__CHARACTER *)Self__DMEH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__4LGH - len__0LGH) -  1)]=((__CHARACTER *)Self__DMEH->storage__BCS)[(__INTEGER)(Self__4LGH -  1)];
-                Self__4LGH=(__INTEGER)(Self__4LGH +  1);
+          if ((n__UNFH >  0)) {
+            len__VNHH=(__INTEGER)((__INTEGER)(n__UNFH -  1) +  1);
+            if ((len__VNHH >  0)) {
+              __tmp__WNHH=(__INTEGER)(n__UNFH +  1);
+              __tmp__YNHH=Self__TNFH->count__4FC;
+              Self__ZNHH=__tmp__WNHH;
+              while ((Self__ZNHH <= __tmp__YNHH)) {
+                ((__CHARACTER *)Self__TNFH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__ZNHH - len__VNHH) -  1)]=((__CHARACTER *)Self__TNFH->storage__JCS)[(__INTEGER)(Self__ZNHH -  1)];
+                Self__ZNHH=(__INTEGER)(Self__ZNHH +  1);
               };
-              Self__DMEH->count__WFC=(__INTEGER)(Self__DMEH->count__WFC - len__0LGH);
+              Self__TNFH->count__4FC=(__INTEGER)(Self__TNFH->count__4FC - len__VNHH);
             };
           };
         };
-        i__EE3E= 1;
+        i__QO3E= 1;
       } else {
-        stat__FE3E= 0;
+        stat__RO3E= 0;
       };
     };
-    i__EE3E=(__INTEGER)(i__EE3E +  1);
+    i__QO3E=(__INTEGER)(i__QO3E +  1);
   };
-  if ((stat__FE3E ==  1)) {
-    Self__FMEH=((__STRING *)st__DE3E);
-    if (( 1 > Self__FMEH->count__WFC)) {
-      Self__FMEH->count__WFC= 0;
+  if ((stat__RO3E ==  1)) {
+    Self__VNFH=((__STRING *)st__PO3E);
+    if (( 1 > Self__VNFH->count__4FC)) {
+      Self__VNFH->count__4FC= 0;
     } else {
-      Self__FMEH->count__WFC=(__INTEGER)(Self__FMEH->count__WFC -  1);
+      Self__VNFH->count__4FC=(__INTEGER)(Self__VNFH->count__4FC -  1);
     };
   };
-  if ((stat__FE3E ==  2)) {
-    Self__HMEH=((__STRING *)st__DE3E);
-    if (( 2 > Self__HMEH->count__WFC)) {
-      Self__HMEH->count__WFC= 0;
+  if ((stat__RO3E ==  2)) {
+    Self__XNFH=((__STRING *)st__PO3E);
+    if (( 2 > Self__XNFH->count__4FC)) {
+      Self__XNFH->count__4FC= 0;
     } else {
-      Self__HMEH->count__WFC=(__INTEGER)(Self__HMEH->count__WFC -  2);
+      Self__XNFH->count__4FC=(__INTEGER)(Self__XNFH->count__4FC -  2);
     };
   };
-  if ((stat__FE3E ==  3)) {
-    Self__SLGD=((__STRING *)st__DE3E);
-    result__WLGD=(__INTEGER)(i__EE3E -  4);
-    while ((! ((result__WLGD <  1) || ('/' == ((__CHARACTER *)Self__SLGD->storage__BCS)[(__INTEGER)(result__WLGD -  1)])))) {
-      result__WLGD=(__INTEGER)(result__WLGD -  1);
+  if ((stat__RO3E ==  3)) {
+    Self__0LGD=((__STRING *)st__PO3E);
+    result__4LGD=(__INTEGER)(i__QO3E -  4);
+    while ((! ((result__4LGD <  1) || ('/' == ((__CHARACTER *)Self__0LGD->storage__JCS)[(__INTEGER)(result__4LGD -  1)])))) {
+      result__4LGD=(__INTEGER)(result__4LGD -  1);
     };
-    if ((result__WLGD ==  0)) {
-      ((__STRING *)st__DE3E)->count__WFC= 0;
+    if ((result__4LGD ==  0)) {
+      ((__STRING *)st__PO3E)->count__4FC= 0;
     } else {
-      Self__FMGH=((__STRING *)st__DE3E);
-      end__BMGH=(__INTEGER)(i__EE3E -  1);
-      len__DMGH=(__INTEGER)((__INTEGER)(end__BMGH - result__WLGD) +  1);
-      if ((len__DMGH >  0)) {
-        __tmp__EMGH=(__INTEGER)(end__BMGH +  1);
-        __tmp__GMGH=Self__FMGH->count__WFC;
-        Self__HMGH=__tmp__EMGH;
-        while ((Self__HMGH <= __tmp__GMGH)) {
-          ((__CHARACTER *)Self__FMGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__HMGH - len__DMGH) -  1)]=((__CHARACTER *)Self__FMGH->storage__BCS)[(__INTEGER)(Self__HMGH -  1)];
-          Self__HMGH=(__INTEGER)(Self__HMGH +  1);
+      Self__AOHH=((__STRING *)st__PO3E);
+      end__2NHH=(__INTEGER)(i__QO3E -  1);
+      len__4NHH=(__INTEGER)((__INTEGER)(end__2NHH - result__4LGD) +  1);
+      if ((len__4NHH >  0)) {
+        __tmp__5NHH=(__INTEGER)(end__2NHH +  1);
+        __tmp__BOHH=Self__AOHH->count__4FC;
+        Self__COHH=__tmp__5NHH;
+        while ((Self__COHH <= __tmp__BOHH)) {
+          ((__CHARACTER *)Self__AOHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__COHH - len__4NHH) -  1)]=((__CHARACTER *)Self__AOHH->storage__JCS)[(__INTEGER)(Self__COHH -  1)];
+          Self__COHH=(__INTEGER)(Self__COHH +  1);
         };
-        Self__FMGH->count__WFC=(__INTEGER)(Self__FMGH->count__WFC - len__DMGH);
+        Self__AOHH->count__4FC=(__INTEGER)(Self__AOHH->count__4FC - len__4NHH);
       };
     };
   };
-  if ((((__STRING *)st__DE3E)->count__WFC ==  0)) {
-    add_last__ZLT(st__DE3E,'/');
+  if ((((__STRING *)st__PO3E)->count__4FC ==  0)) {
+    add_last__BMT(st__PO3E,'/');
   };
 }
 
-static void* item__FZPE(__DIRECTORY_UNIX *Self__GZPE,__INTEGER i__HZPE)
+static void* item__1WPE(__DIRECTORY_UNIX *Self__2WPE,__INTEGER i__3WPE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __LINKED_LISToENTRYo *Self__SNWE;
-  Self__SNWE=((__LINKED_LISToENTRYo *)Self__GZPE->parent_directory__0ED.list__IFRD);
-  if ((i__HZPE != Self__SNWE->mem_idx__J1VE)) {
-    if ((Self__SNWE->mem_idx__J1VE > i__HZPE)) {
-      Self__SNWE->mem_idx__J1VE= 1;
-      Self__SNWE->mem_lnk__K1VE=Self__SNWE->first_link__C1VE;
+  __LINKED_LISToENTRYo *Self__VNWE;
+  Self__VNWE=((__LINKED_LISToENTRYo *)Self__2WPE->parent_directory__CFD.list__QFRD);
+  if ((i__3WPE != Self__VNWE->mem_idx__M1VE)) {
+    if ((Self__VNWE->mem_idx__M1VE > i__3WPE)) {
+      Self__VNWE->mem_idx__M1VE= 1;
+      Self__VNWE->mem_lnk__N1VE=Self__VNWE->first_link__F1VE;
     };
-    while ((i__HZPE != Self__SNWE->mem_idx__J1VE)) {
-      Self__SNWE->mem_lnk__K1VE=((__LINKED_LIST_NODEoENTRYo *)Self__SNWE->mem_lnk__K1VE)->next__05EF;
-      Self__SNWE->mem_idx__J1VE=(__INTEGER)(Self__SNWE->mem_idx__J1VE +  1);
+    while ((i__3WPE != Self__VNWE->mem_idx__M1VE)) {
+      Self__VNWE->mem_lnk__N1VE=((__LINKED_LIST_NODEoENTRYo *)Self__VNWE->mem_lnk__N1VE)->next__2KFF;
+      Self__VNWE->mem_idx__M1VE=(__INTEGER)(Self__VNWE->mem_idx__M1VE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__SNWE->mem_lnk__K1VE)->item__FOWE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__VNWE->mem_lnk__N1VE)->item__IOWE);
 }
 
-static void* item__Y0ND(__LINKED_LISToSTRING_CONSTANTo *Self__Z0ND,__INTEGER i__00ND)
+static void* item__A1ND(__LINKED_LISToSTRING_CONSTANTo *Self__B1ND,__INTEGER i__C1ND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  if ((i__00ND != Self__Z0ND->mem_idx__OUEC)) {
-    if ((Self__Z0ND->mem_idx__OUEC > i__00ND)) {
-      Self__Z0ND->mem_idx__OUEC= 1;
-      Self__Z0ND->mem_lnk__QUEC=Self__Z0ND->first_link__EUEC;
+  if ((i__C1ND != Self__B1ND->mem_idx__WUEC)) {
+    if ((Self__B1ND->mem_idx__WUEC > i__C1ND)) {
+      Self__B1ND->mem_idx__WUEC= 1;
+      Self__B1ND->mem_lnk__YUEC=Self__B1ND->first_link__MUEC;
     };
-    while ((i__00ND != Self__Z0ND->mem_idx__OUEC)) {
-      Self__Z0ND->mem_lnk__QUEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Z0ND->mem_lnk__QUEC)->next__MOOD;
-      Self__Z0ND->mem_idx__OUEC=(__INTEGER)(Self__Z0ND->mem_idx__OUEC +  1);
+    while ((i__C1ND != Self__B1ND->mem_idx__WUEC)) {
+      Self__B1ND->mem_lnk__YUEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__B1ND->mem_lnk__YUEC)->next__UOOD;
+      Self__B1ND->mem_idx__WUEC=(__INTEGER)(Self__B1ND->mem_idx__WUEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__Z0ND->mem_lnk__QUEC)->item__0VHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__B1ND->mem_lnk__YUEC)->item__CWHD);
 }
 
-static void** create__T23(__INTEGER nb_elements__V23)
+static void** create__123(__INTEGER nb_elements__323)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__JSCH,a__OSCH,new_size__KSCH,new_size2__LSCH,a__TMEH;
-  __UINTEGER_32 new_size__UMEH;
-  __POINTER result__ISCH,ptr_table__TPHH,next__SPHH,result__UPHH;
-  void *result__XPHH;
-  __INTEGER Self__C0JC;
-  void **Result__5UEB;
-  sz__JSCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__V23 * ((__INTEGER )(sizeof(void *)))));
-  result__ISCH=((__POINTER )(NULL));
-  a__OSCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__KSCH=(__UINTEGER_32)((__UINTEGER_32)(sz__JSCH + a__OSCH) & (__UINTEGER_32)(~ a__OSCH));
-  new_size2__LSCH=(__UINTEGER_32)(new_size__KSCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__LSCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__TMEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__UMEH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LSCH + a__TMEH) & (__UINTEGER_32)(~ a__TMEH));
-    ptr_table__TPHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UMEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__SPHH=((__POINTER )(NULL));
-    result__UPHH=((__POINTER *)ptr_table__TPHH)[ 0];
-    if ((result__UPHH == (void *)NULL)) {
-      result__UPHH=new_lab__MRJ(new_size__UMEH);
-      next__SPHH=(void *)((unsigned long)result__UPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMEH)));
-      ((__POINTER *)next__SPHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__TPHH)[ 0]=next__SPHH;
-    } else {
-      next__SPHH=((__POINTER *)result__UPHH)[ 0];
-      if ((next__SPHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UPHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UMEH <<  1)) <=  4096)) {
-          next__SPHH=(void *)((unsigned long)result__UPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMEH)));
-        } else {
-          next__SPHH=new_lab__MRJ(new_size__UMEH);
-        };
-        ((__POINTER *)next__SPHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TPHH)[ 0]=next__SPHH;
-      } else {
-        ((__POINTER *)result__UPHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SPHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__UPHH=next__SPHH;
-      };
-    };
-    ((__POINTER *)result__UPHH)[ 0]=((__POINTER ) 3);
-    result__ISCH=(void *)((unsigned long)result__UPHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__5RDH,a__ESDH,new_size__ASDH,new_size2__BSDH,a__DOFH;
+  __UINTEGER_32 new_size__EOFH;
+  __POINTER result__4RDH,ptr_table__TRIH,next__SRIH,result__URIH;
+  void *result__XRIH;
+  __INTEGER Self__K0JC;
+  void **Result__HVEB;
+  sz__5RDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__323 * ((__INTEGER )(sizeof(void *)))));
+  result__4RDH=((__POINTER )(NULL));
+  a__ESDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ASDH=(__UINTEGER_32)((__UINTEGER_32)(sz__5RDH + a__ESDH) & (__UINTEGER_32)(~ a__ESDH));
+  new_size2__BSDH=(__UINTEGER_32)(new_size__ASDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__BSDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EOFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BSDH + a__DOFH) & (__UINTEGER_32)(~ a__DOFH));
+    ptr_table__TRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EOFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SRIH=((__POINTER )(NULL));
+    result__URIH=((__POINTER *)ptr_table__TRIH)[ 0];
+    if ((result__URIH == (void *)NULL)) {
+      result__URIH=new_lab__URJ(new_size__EOFH);
+      next__SRIH=(void *)((unsigned long)result__URIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EOFH)));
+      ((__POINTER *)next__SRIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TRIH)[ 0]=next__SRIH;
+    } else {
+      next__SRIH=((__POINTER *)result__URIH)[ 0];
+      if ((next__SRIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__URIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__EOFH <<  1)) <=  4096)) {
+          next__SRIH=(void *)((unsigned long)result__URIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EOFH)));
+        } else {
+          next__SRIH=new_lab__URJ(new_size__EOFH);
+        };
+        ((__POINTER *)next__SRIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TRIH)[ 0]=next__SRIH;
+      } else {
+        ((__POINTER *)result__URIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__URIH=next__SRIH;
+      };
+    };
+    ((__POINTER *)result__URIH)[ 0]=((__POINTER ) 3);
+    result__4RDH=(void *)((unsigned long)result__URIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__XPHH=first_free__XDVB;
-    while ((((void *)result__XPHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XPHH)->map_size_and_id__ITB &  4294967292LU) < new_size__KSCH))) {
-      result__XPHH=((__MEMORY *)result__XPHH)->map_next_free__JTB;
+    result__XRIH=first_free__5DVB;
+    while ((((void *)result__XRIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XRIH)->map_size_and_id__QTB &  4294967292LU) < new_size__ASDH))) {
+      result__XRIH=((__MEMORY *)result__XRIH)->map_next_free__RTB;
     };
-    if (((void *)result__XPHH == (void *)NULL)) {
-      result__XPHH=new_page__OA5();
+    if (((void *)result__XRIH == (void *)NULL)) {
+      result__XRIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__XPHH,new_size__KSCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XPHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__ISCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XPHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__XRIH,new_size__ASDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XRIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__4RDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XRIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__5UEB=((void **)result__ISCH);
-  Self__C0JC=(__INTEGER)(nb_elements__V23 -  1);
-  while ((Self__C0JC >=  0)) {
-    Result__5UEB[Self__C0JC]=NULL;
-    Self__C0JC=(__INTEGER)(Self__C0JC -  1);
+  Result__HVEB=((void **)result__4RDH);
+  Self__K0JC=(__INTEGER)(nb_elements__323 -  1);
+  while ((Self__K0JC >=  0)) {
+    Result__HVEB[Self__K0JC]=NULL;
+    Self__K0JC=(__INTEGER)(Self__K0JC -  1);
   };
-  return(Result__5UEB);
+  return(Result__HVEB);
 }
 
-static __BOOLEAN read_word__QPF(void *st__SPF)
+static __BOOLEAN read_word__YPF(void *st__0PF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__UPF,idx__VPF;
-  __BOOLEAN result__WPF,__tmp__UQF;
-  __CHARACTER result__G44G;
-  posold__UPF= 0;
-  idx__VPF= 0;
-  result__WPF=FALSE__;
-  if ((! read_space__3RD())) {
-    result__WPF=FALSE__;
+  __INTEGER posold__2PF,idx__3PF;
+  __BOOLEAN result__4PF,__tmp__2QF;
+  __CHARACTER result__X35G;
+  posold__2PF= 0;
+  idx__3PF= 0;
+  result__4PF=FALSE__;
+  if ((! read_space__FSD())) {
+    result__4PF=FALSE__;
   } else {
-    posold__UPF=position__SBC;
-    idx__VPF= 1;
-    until_do__JA4:
+    posold__2PF=position__0BC;
+    idx__3PF= 1;
+    until_do__RA4:
     {
-      if ((idx__VPF > ((__STRING_CONSTANT *)st__SPF)->count__DD)) {
-        __tmp__UQF=TRUE__;
+      if ((idx__3PF > ((__STRING_CONSTANT *)st__0PF)->count__DD)) {
+        __tmp__2QF=TRUE__;
       } else {
-        result__G44G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__G44G=((__CHARACTER )(( 0)));
+        result__X35G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__X35G=((__CHARACTER )(( 0)));
         } else {
-          result__G44G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__X35G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__UQF=(result__G44G != ((__CHARACTER *)((__STRING_CONSTANT *)st__SPF)->storage__VQO)[(__INTEGER)(idx__VPF -  1)]);
+        __tmp__2QF=(result__X35G != ((__CHARACTER *)((__STRING_CONSTANT *)st__0PF)->storage__3QO)[(__INTEGER)(idx__3PF -  1)]);
       };
-      if ((! __tmp__UQF)) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        idx__VPF=(__INTEGER)(idx__VPF +  1);
-        goto until_do__JA4;
+      if ((! __tmp__2QF)) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        idx__3PF=(__INTEGER)(idx__3PF +  1);
+        goto until_do__RA4;
       };
     };
-    if ((idx__VPF > ((__STRING_CONSTANT *)st__SPF)->count__DD)) {
-      last_string__I0C=st__SPF;
-      result__WPF=TRUE__;
+    if ((idx__3PF > ((__STRING_CONSTANT *)st__0PF)->count__DD)) {
+      last_string__Q0C=st__0PF;
+      result__4PF=TRUE__;
     } else {
-      position__SBC=posold__UPF;
+      position__0BC=posold__2PF;
     };
   };
-  return(result__WPF);
+  return(result__4PF);
 }
 
-static __BOOLEAN read_slot_header__SDE(__BOOLEAN first__UDE)
+static __BOOLEAN read_slot_header__0DE(__BOOLEAN first__2DE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *v__YDE;
-  void *instr__AEE;
-  __POSITION pos__LCWG,pos__NCWG,pos__PCWG,pos__RCWG,pos__TCWG;
-  __POSITION pos__VCWG,pos__XCWG,pos__1L0G,pos__ZCWG,pos__1CWG;
-  __POSITION pos__3CWG,pos__5CWG,pos__3L0G,pos__BDWG,pos__DDWG;
-  __POSITION pos__FDWG,pos__HDWG,pos__JDWG,pos__LDWG,pos__NDWG;
-  __POSITION pos__PDWG,pos__RDWG,pos__TDWG,pos__VDWG,pos__5L0G;
-  __POSITION pos__XDWG,pos__ZDWG,pos__CJM,pos__1DWG,pos__3DWG,pos__5DWG;
-  __POSITION pos__BEWG,__tmp__VCQD,__tmp__0CQD,__tmp__BM0G,pos__DEWG;
-  __POSITION pos__FEWG,pos__HEWG,pos__JEWG,pos__LEWG,pos__NEWG;
-  void *res__2IE,*__tmp__4KE;
-  __INTEGER __tmp__VKE,__tmp__XKE,__tmp__ZKE,typ_id__MMGH,typ_id__WMGH;
-  void *n__YMEH,*n__AQGB;
-  void *result__ZMEH,*result__IQGB;
-  __ITM_TYPE_PARAMETER *result__KMGH,*Self__SMGH,*result__UMGH;
-  __ITM_TYPE_PARAMETER *Self__2MGH;
-  __POINTER ptr__LMGH,ptr_table__FQHH,next__EQHH,result__GQHH;
-  __POINTER ptr_table__KQHH,next__JQHH,result__LQHH,ptr__VMGH;
-  __POINTER ptr_table__VQHH,next__UQHH,result__WQHH,ptr_table__0QHH;
-  __POINTER next__ZQHH,result__1QHH;
-  __UINTEGER_32 sz__NMGH,a__OMGH,new_size__PMGH,t__QMGH,a__RMGH;
-  __UINTEGER_32 new_size__NQHH,lab_type__MQHH,sz__XMGH,a__YMGH;
-  __UINTEGER_32 new_size__ZMGH,t__0MGH,a__1MGH,new_size__3QHH;
-  __UINTEGER_32 lab_type__2QHH;
-  __BOOLEAN result__WDE,result__1PHH,__tmp__GHE,result__3PHH;
-  __BOOLEAN result__4PHH,__tmp__4IE,result__BQHH,__tmp__OJE,__tmp__2JE;
-  __BOOLEAN result__VSL,__tmp__KKE,result__OQHH,result__RQHH;
-  __BOOLEAN result__4QHH,__tmp__JPE,__tmp__PRE,__tmp__1PE,__tmp__FTE;
-  __BOOLEAN result__A5G,__tmp__BVE,result__S5G,__tmp__3WE,result__EAH;
-  __BOOLEAN __tmp__KYE,result__WAH,__tmp__Q0E,result__IBH,result__BRHH;
-  __BOOLEAN result__ERHH,result__HRHH,result__KRHH;
-  __CHARACTER style__0DE,result__5PHH,result__CQHH,result__PQHH;
-  __CHARACTER result__SQHH,result__5QHH,result__CRHH,result__FRHH;
-  __CHARACTER result__IRHH,result__LRHH;
-  result__WDE=FALSE__;
-  v__YDE=NULL;
-  instr__AEE=NULL;
-  style__0DE=read_style__XRF();
-  if ((style__0DE != ' ')) {
-    result__WDE=TRUE__;
-    if (((! first__UDE) && (style__0DE == '+'))) {
-      pos__LCWG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_251));
-      put_position__UOG(pos__LCWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  void *v__AEE;
+  void *instr__IEE;
+  __POSITION pos__N5WG,pos__P5WG,pos__R5WG,pos__T5WG,pos__V5WG;
+  __POSITION pos__X5WG,pos__Z5WG,pos__JJ1G,pos__15WG,pos__35WG;
+  __POSITION pos__55WG,pos__BAXG,pos__LJ1G,pos__DAXG,pos__FAXG;
+  __POSITION pos__HAXG,pos__JAXG,pos__LAXG,pos__NAXG,pos__PAXG;
+  __POSITION pos__RAXG,pos__TAXG,pos__VAXG,pos__XAXG,pos__NJ1G;
+  __POSITION pos__ZAXG,pos__1AXG,pos__KJM,pos__3AXG,pos__5AXG,pos__BBXG;
+  __POSITION pos__DBXG,__tmp__3CQD,__tmp__CDQD,__tmp__PJ1G,pos__FBXG;
+  __POSITION pos__HBXG,pos__JBXG,pos__LBXG,pos__NBXG,pos__PBXG;
+  void *res__EJE,*__tmp__GLE;
+  __INTEGER __tmp__3KE,__tmp__5KE,__tmp__BLE,typ_id__HOHH,typ_id__ROHH;
+  void *n__IOFH,*n__IQGB;
+  void *result__JOFH,*result__QQGB;
+  __ITM_TYPE_PARAMETER *result__FOHH,*Self__NOHH,*result__POHH;
+  __ITM_TYPE_PARAMETER *Self__XOHH;
+  __POINTER ptr__GOHH,ptr_table__FSIH,next__ESIH,result__GSIH;
+  __POINTER ptr_table__KSIH,next__JSIH,result__LSIH,ptr__QOHH;
+  __POINTER ptr_table__VSIH,next__USIH,result__WSIH,ptr_table__0SIH;
+  __POINTER next__ZSIH,result__1SIH;
+  __UINTEGER_32 sz__IOHH,a__JOHH,new_size__KOHH,t__LOHH,a__MOHH;
+  __UINTEGER_32 new_size__NSIH,lab_type__MSIH,sz__SOHH,a__TOHH;
+  __UINTEGER_32 new_size__UOHH,t__VOHH,a__WOHH,new_size__3SIH;
+  __UINTEGER_32 lab_type__2SIH;
+  __BOOLEAN result__4DE,result__1RIH,__tmp__OHE,result__3RIH;
+  __BOOLEAN result__4RIH,__tmp__GJE,result__BSIH,__tmp__WJE,__tmp__EKE;
+  __BOOLEAN result__3SL,__tmp__SKE,result__OSIH,result__RSIH;
+  __BOOLEAN result__4SIH,__tmp__RPE,__tmp__XRE,__tmp__DQE,__tmp__NTE;
+  __BOOLEAN result__I5G,__tmp__JVE,result__05G,__tmp__FXE,result__MAH;
+  __BOOLEAN __tmp__SYE,result__4AH,__tmp__Y0E,result__QBH,result__BTIH;
+  __BOOLEAN result__ETIH,result__HTIH,result__KTIH;
+  __CHARACTER style__CEE,result__5RIH,result__CSIH,result__PSIH;
+  __CHARACTER result__SSIH,result__5SIH,result__CTIH,result__FTIH;
+  __CHARACTER result__ITIH,result__LTIH;
+  result__4DE=FALSE__;
+  v__AEE=NULL;
+  instr__IEE=NULL;
+  style__CEE=read_style__5RF();
+  if ((style__CEE != ' ')) {
+    result__4DE=TRUE__;
+    if (((! first__2DE) && (style__CEE == '+'))) {
+      pos__N5WG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_250));
+      put_position__2OG(pos__N5WG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    if (first__UDE) {
-      if (read_word__QPF((&__string_62))) {
-        if ((style__0DE == '-')) {
-          append__BOS(output_decl__3FE,(&__string_252));
-        };
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        ((__PROTOTYPE *)object__JBC)->parent_named__5.parent_itm_object__4.position__NDJ=current_position__JXF();
-        ((__PROTOTYPE *)object__JBC)->parent_named__5.style__BEU=style__0DE;
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__NCWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__NCWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+    if (first__2DE) {
+      if (read_word__YPF((&__string_62))) {
+        if ((style__CEE == '-')) {
+          append__JOS(output_decl__FGE,(&__string_251));
+        };
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        ((__PROTOTYPE *)object__RBC)->parent_named__5.parent_itm_object__4.position__VDJ=current_position__RXF();
+        ((__PROTOTYPE *)object__RBC)->parent_named__5.style__JEU=style__CEE;
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__P5WG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__P5WG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__1PHH=read_word__QPF((&__string_9));
-        if (is_shorter__5Y) {
-          if (result__1PHH) {
+        result__1RIH=read_word__YPF((&__string_9));
+        if (is_shorter__FZ) {
+          if (result__1RIH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
-              short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+              short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
             } else {
-              short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+              short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
             };
           };
         };
-        if (result__1PHH) {
-          __tmp__GHE=TRUE__;
+        if (result__1RIH) {
+          __tmp__OHE=TRUE__;
         } else {
-          result__3PHH=read_word__QPF((&__string_10));
-          if (is_shorter__5Y) {
-            if (result__3PHH) {
+          result__3RIH=read_word__YPF((&__string_10));
+          if (is_shorter__FZ) {
+            if (result__3RIH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
-                short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+                short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
               } else {
-                short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+                short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
               };
             };
           };
-          __tmp__GHE=result__3PHH;
+          __tmp__OHE=result__3RIH;
         };
-        if (__tmp__GHE) {
-          ((__PROTOTYPE *)object__JBC)->type_style__X2C=last_string__I0C;
+        if (__tmp__OHE) {
+          ((__PROTOTYPE *)object__RBC)->type_style__52C=last_string__Q0C;
         };
-        if ((! read_cap_identifier__SZJ())) {
-          pos__PCWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_254));
-          put_position__UOG(pos__PCWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! read_cap_identifier__0ZJ())) {
+          pos__R5WG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_253));
+          put_position__2OG(pos__R5WG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__LBD((&__string_125),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if (((void *)((__PROTOTYPE *)object__JBC)->shortname__FIE != (void *)last_string__I0C)) {
-          pos__RCWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_255));
-          put_position__UOG(pos__RCWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        short__token__to__TBD((&__string_125),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if (((void *)((__PROTOTYPE *)object__RBC)->shortname__NIE != (void *)last_string__Q0C)) {
+          pos__T5WG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_254));
+          put_position__2OG(pos__T5WG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__4PHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__4PHH=FALSE__;
+        result__4RIH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__4RIH=FALSE__;
         } else {
-          result__5PHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__5PHH=((__CHARACTER )(( 0)));
+          result__5RIH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__5RIH=((__CHARACTER )(( 0)));
           } else {
-            result__5PHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__5RIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__5PHH == '(')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__4PHH=TRUE__;
+          if ((result__5RIH == '(')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__4RIH=TRUE__;
           };
         };
-        if (result__4PHH) {
-          if (((! is_shorter__5Y) && (! is_shorter2__VI))) {
-            pos__TCWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_256));
-            put_position__UOG(pos__TCWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        if (result__4RIH) {
+          if (((! is_shorter__FZ) && (! is_shorter2__VI))) {
+            pos__V5WG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_255));
+            put_position__2OG(pos__V5WG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          res__2IE=NULL;
-          __tmp__4IE=read_identifier__LAL();
-          if (__tmp__4IE) {
-            result__BQHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__BQHH=FALSE__;
+          res__EJE=NULL;
+          __tmp__GJE=read_identifier__TAL();
+          if (__tmp__GJE) {
+            result__BSIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__BSIH=FALSE__;
             } else {
-              result__CQHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__CQHH=((__CHARACTER )(( 0)));
+              result__CSIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__CSIH=((__CHARACTER )(( 0)));
               } else {
-                result__CQHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__CSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__CQHH == ':')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__BQHH=TRUE__;
+              if ((result__CSIH == ':')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__BSIH=TRUE__;
               };
             };
-            if ((! result__BQHH)) {
-              pos__VCWG=current_position__JXF();
-              put_error__text__KNG( 2,(&__string_257));
-              put_position__UOG(pos__VCWG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+            if ((! result__BSIH)) {
+              pos__X5WG=current_position__RXF();
+              put_error__text__SNG( 2,(&__string_256));
+              put_position__2OG(pos__X5WG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            __tmp__OJE=((void *)read_type__DCM(PARSER__,TRUE__) == (void *)NULL);
-            if (__tmp__OJE) {
-              pos__XCWG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_258));
-              put_position__UOG(pos__XCWG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+            __tmp__WJE=((void *)read_type__LCM(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__WJE) {
+              pos__Z5WG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_257));
+              put_position__2OG(pos__Z5WG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            pos__1L0G=current_position__JXF();
-            put_error__text__KNG( 1,(&__string_259));
-            put_position__UOG(pos__1L0G);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+            pos__JJ1G=current_position__RXF();
+            put_error__text__SNG( 1,(&__string_258));
+            put_position__2OG(pos__JJ1G);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
-            __tmp__2JE=TRUE__;
+            __tmp__EKE=TRUE__;
           } else {
-            __tmp__2JE=FALSE__;
+            __tmp__EKE=FALSE__;
           };
-          if ((! __tmp__2JE)) {
-            result__VSL=read_cap_identifier__SZJ();
-            if (result__VSL) {
-              __tmp__KKE=is_parameter_type__IKE;
-              if ((! __tmp__KKE)) {
-                pos__ZCWG=current_position__JXF();
-                put_error__text__KNG( 0,(&__string_260));
-                put_position__UOG(pos__ZCWG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+          if ((! __tmp__EKE)) {
+            result__3SL=read_cap_identifier__0ZJ();
+            if (result__3SL) {
+              __tmp__SKE=is_parameter_type__QKE;
+              if ((! __tmp__SKE)) {
+                pos__15WG=current_position__RXF();
+                put_error__text__SNG( 0,(&__string_259));
+                put_position__2OG(pos__15WG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              __tmp__VKE=position__SBC;
-              __tmp__XKE=((__STRING_CONSTANT *)last_string__I0C)->count__DD;
-              __tmp__ZKE=(__INTEGER)(__tmp__VKE - __tmp__XKE);
-              short__token__to__LBD((&__string_126),__tmp__ZKE,position__SBC);
-              n__YMEH=last_string__I0C;
-              result__ZMEH=fast_reference_at__Y1T(dico__STI,n__YMEH);
-              if (((void *)result__ZMEH == (void *)NULL)) {
-                result__KMGH=NULL;
-                ptr__LMGH=((__POINTER )(NULL));
-                typ_id__MMGH= 0;
-                sz__NMGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                if ((sz__NMGH ==  0)) {
-                  result__KMGH=ITM_TYPE_PARAMETER__;
+              __tmp__3KE=position__0BC;
+              __tmp__5KE=((__STRING_CONSTANT *)last_string__Q0C)->count__DD;
+              __tmp__BLE=(__INTEGER)(__tmp__3KE - __tmp__5KE);
+              short__token__to__TBD((&__string_126),__tmp__BLE,position__0BC);
+              n__IOFH=last_string__Q0C;
+              result__JOFH=fast_reference_at__A2T(dico__0TI,n__IOFH);
+              if (((void *)result__JOFH == (void *)NULL)) {
+                result__FOHH=NULL;
+                ptr__GOHH=((__POINTER )(NULL));
+                typ_id__HOHH= 0;
+                sz__IOHH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__IOHH ==  0)) {
+                  result__FOHH=ITM_TYPE_PARAMETER__;
                 } else {
-                  typ_id__MMGH=-1;
-                  clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NMGH);
-                  if ((typ_id__MMGH == (__INTEGER)(-  1))) {
-                    a__OMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__PMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NMGH + a__OMGH) & (__UINTEGER_32)(~ a__OMGH));
-                    ptr_table__FQHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                    next__EQHH=((__POINTER )(NULL));
-                    result__GQHH=((__POINTER *)ptr_table__FQHH)[ 0];
-                    if ((result__GQHH == (void *)NULL)) {
-                      result__GQHH=new_lab__MRJ(new_size__PMGH);
-                      next__EQHH=(void *)((unsigned long)result__GQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMGH)));
-                      ((__POINTER *)next__EQHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__FQHH)[ 0]=next__EQHH;
+                  typ_id__HOHH=-1;
+                  clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__IOHH);
+                  if ((typ_id__HOHH == (__INTEGER)(-  1))) {
+                    a__JOHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__KOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IOHH + a__JOHH) & (__UINTEGER_32)(~ a__JOHH));
+                    ptr_table__FSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KOHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__ESIH=((__POINTER )(NULL));
+                    result__GSIH=((__POINTER *)ptr_table__FSIH)[ 0];
+                    if ((result__GSIH == (void *)NULL)) {
+                      result__GSIH=new_lab__URJ(new_size__KOHH);
+                      next__ESIH=(void *)((unsigned long)result__GSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOHH)));
+                      ((__POINTER *)next__ESIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__FSIH)[ 0]=next__ESIH;
                     } else {
-                      next__EQHH=((__POINTER *)result__GQHH)[ 0];
-                      if ((next__EQHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PMGH <<  1)) <=  4096)) {
-                          next__EQHH=(void *)((unsigned long)result__GQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PMGH)));
+                      next__ESIH=((__POINTER *)result__GSIH)[ 0];
+                      if ((next__ESIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GSIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KOHH <<  1)) <=  4096)) {
+                          next__ESIH=(void *)((unsigned long)result__GSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOHH)));
                         } else {
-                          next__EQHH=new_lab__MRJ(new_size__PMGH);
+                          next__ESIH=new_lab__URJ(new_size__KOHH);
                         };
-                        ((__POINTER *)next__EQHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FQHH)[ 0]=next__EQHH;
+                        ((__POINTER *)next__ESIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__FSIH)[ 0]=next__ESIH;
                       } else {
-                        ((__POINTER *)result__GQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GQHH=next__EQHH;
+                        ((__POINTER *)result__GSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ESIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__GSIH=next__ESIH;
                       };
                     };
-                    ptr__LMGH=result__GQHH;
+                    ptr__GOHH=result__GSIH;
                   } else {
-                    t__QMGH=((__UINTEGER_32 )typ_id__MMGH);
-                    a__RMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                    new_size__NQHH=(__UINTEGER_32)((__UINTEGER_32)(sz__NMGH + a__RMGH) & (__UINTEGER_32)(~ a__RMGH));
-                    ptr_table__KQHH=((__POINTER )(&(table_type[(t__QMGH)])));
-                    lab_type__MQHH=(__UINTEGER_32)(t__QMGH |  1);
-                    next__JQHH=((__POINTER )(NULL));
-                    result__LQHH=((__POINTER *)ptr_table__KQHH)[ 0];
-                    if ((result__LQHH == (void *)NULL)) {
-                      result__LQHH=new_lab__MRJ(lab_type__MQHH);
-                      next__JQHH=(void *)((unsigned long)result__LQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NQHH)));
-                      ((__POINTER *)next__JQHH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__KQHH)[ 0]=next__JQHH;
+                    t__LOHH=((__UINTEGER_32 )typ_id__HOHH);
+                    a__MOHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__NSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IOHH + a__MOHH) & (__UINTEGER_32)(~ a__MOHH));
+                    ptr_table__KSIH=((__POINTER )(&(table_type[(t__LOHH)])));
+                    lab_type__MSIH=(__UINTEGER_32)(t__LOHH |  1);
+                    next__JSIH=((__POINTER )(NULL));
+                    result__LSIH=((__POINTER *)ptr_table__KSIH)[ 0];
+                    if ((result__LSIH == (void *)NULL)) {
+                      result__LSIH=new_lab__URJ(lab_type__MSIH);
+                      next__JSIH=(void *)((unsigned long)result__LSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSIH)));
+                      ((__POINTER *)next__JSIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__KSIH)[ 0]=next__JSIH;
                     } else {
-                      next__JQHH=((__POINTER *)result__LQHH)[ 0];
-                      if ((next__JQHH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NQHH <<  1)) <=  4096)) {
-                          next__JQHH=(void *)((unsigned long)result__LQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NQHH)));
+                      next__JSIH=((__POINTER *)result__LSIH)[ 0];
+                      if ((next__JSIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LSIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__NSIH <<  1)) <=  4096)) {
+                          next__JSIH=(void *)((unsigned long)result__LSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSIH)));
                         } else {
-                          next__JQHH=new_lab__MRJ(lab_type__MQHH);
+                          next__JSIH=new_lab__URJ(lab_type__MSIH);
                         };
-                        ((__POINTER *)next__JQHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__KQHH)[ 0]=next__JQHH;
+                        ((__POINTER *)next__JSIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__KSIH)[ 0]=next__JSIH;
                       } else {
-                        ((__POINTER *)result__LQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__LQHH=next__JQHH;
+                        ((__POINTER *)result__LSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__LSIH=next__JSIH;
                       };
                     };
-                    ptr__LMGH=result__LQHH;
+                    ptr__GOHH=result__LSIH;
                   };
-                  result__KMGH=((__ITM_TYPE_PARAMETER *)ptr__LMGH);
-                  *(result__KMGH) = *(ITM_TYPE_PARAMETER__);
+                  result__FOHH=((__ITM_TYPE_PARAMETER *)ptr__GOHH);
+                  *(result__FOHH) = *(ITM_TYPE_PARAMETER__);
                 };
-                Self__SMGH=((__ITM_TYPE_PARAMETER *)result__KMGH);
-                Self__SMGH->parent_itm_type__3DE.name__KYP=n__YMEH;
-                fast_put__to__TOZ(dico__STI,Self__SMGH,n__YMEH);
-                result__ZMEH=result__KMGH;
+                Self__NOHH=((__ITM_TYPE_PARAMETER *)result__FOHH);
+                Self__NOHH->parent_itm_type__FEE.name__SYP=n__IOFH;
+                fast_put__to__1OZ(dico__0TI,Self__NOHH,n__IOFH);
+                result__JOFH=result__FOHH;
               };
-              if (result__ZMEH==NULL) {
-                __tmp__4KE=NULL;
+              if (result__JOFH==NULL) {
+                __tmp__GLE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__ZMEH)->__id) {
+                switch (((struct ___OBJ *)result__JOFH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__4KE=((void *)result__ZMEH);
+                  __tmp__GLE=((void *)result__JOFH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__4KE=NULL;
+                  __tmp__GLE=NULL;
                 } break;
                 }
               };
-              res__2IE=__tmp__4KE;
+              res__EJE=__tmp__GLE;
             };
           };
-          if (((void *)res__2IE == (void *)NULL)) {
-            pos__1CWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_260));
-            put_position__UOG(pos__1CWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if (((void *)res__EJE == (void *)NULL)) {
+            pos__35WG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_259));
+            put_position__2OG(pos__35WG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__SBBC(((__PROTOTYPE *)object__JBC)->idf_generic_list__UME,res__2IE);
-          while_do__0WK:
+          add_last__0BBC(((__PROTOTYPE *)object__RBC)->idf_generic_list__2ME,res__EJE);
+          while_do__CXK:
           {
-            result__OQHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__OQHH=FALSE__;
+            result__OSIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__OSIH=FALSE__;
             } else {
-              result__PQHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__PQHH=((__CHARACTER )(( 0)));
+              result__PSIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__PSIH=((__CHARACTER )(( 0)));
               } else {
-                result__PQHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__PSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__PQHH == ',')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__OQHH=TRUE__;
+              if ((result__PSIH == ',')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__OSIH=TRUE__;
               };
             };
-            if (result__OQHH) {
-              res__2IE=NULL;
-              __tmp__4IE=read_identifier__LAL();
-              if (__tmp__4IE) {
-                result__RQHH=FALSE__;
-                if ((! read_space__3RD())) {
-                  result__RQHH=FALSE__;
+            if (result__OSIH) {
+              res__EJE=NULL;
+              __tmp__GJE=read_identifier__TAL();
+              if (__tmp__GJE) {
+                result__RSIH=FALSE__;
+                if ((! read_space__FSD())) {
+                  result__RSIH=FALSE__;
                 } else {
-                  result__SQHH='\0';
-                  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                    result__SQHH=((__CHARACTER )(( 0)));
+                  result__SSIH='\0';
+                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                    result__SSIH=((__CHARACTER )(( 0)));
                   } else {
-                    result__SQHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                    result__SSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                   };
-                  if ((result__SQHH == ':')) {
-                    position__SBC=(__INTEGER)(position__SBC +  1);
-                    result__RQHH=TRUE__;
+                  if ((result__SSIH == ':')) {
+                    position__0BC=(__INTEGER)(position__0BC +  1);
+                    result__RSIH=TRUE__;
                   };
                 };
-                if ((! result__RQHH)) {
-                  pos__3CWG=current_position__JXF();
-                  put_error__text__KNG( 2,(&__string_257));
-                  put_position__UOG(pos__3CWG);
-                  put_string__U1F(msg_err__PNG);
-                  if ((type_error__ONG !=  2)) {
+                if ((! result__RSIH)) {
+                  pos__55WG=current_position__RXF();
+                  put_error__text__SNG( 2,(&__string_256));
+                  put_position__2OG(pos__55WG);
+                  put_string__21F(msg_err__XNG);
+                  if ((type_error__WNG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __tmp__OJE=((void *)read_type__DCM(PARSER__,TRUE__) == (void *)NULL);
-                if (__tmp__OJE) {
-                  pos__5CWG=current_position__JXF();
-                  put_error__text__KNG( 0,(&__string_258));
-                  put_position__UOG(pos__5CWG);
-                  put_string__U1F(msg_err__PNG);
-                  if ((type_error__ONG !=  2)) {
+                __tmp__WJE=((void *)read_type__LCM(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__WJE) {
+                  pos__BAXG=current_position__RXF();
+                  put_error__text__SNG( 0,(&__string_257));
+                  put_position__2OG(pos__BAXG);
+                  put_string__21F(msg_err__XNG);
+                  if ((type_error__WNG !=  2)) {
                     exit(( 1));
                   };
                 };
-                pos__3L0G=current_position__JXF();
-                put_error__text__KNG( 1,(&__string_259));
-                put_position__UOG(pos__3L0G);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+                pos__LJ1G=current_position__RXF();
+                put_error__text__SNG( 1,(&__string_258));
+                put_position__2OG(pos__LJ1G);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__2JE=TRUE__;
+                __tmp__EKE=TRUE__;
               } else {
-                __tmp__2JE=FALSE__;
+                __tmp__EKE=FALSE__;
               };
-              if ((! __tmp__2JE)) {
-                result__VSL=read_cap_identifier__SZJ();
-                if (result__VSL) {
-                  __tmp__KKE=is_parameter_type__IKE;
-                  if ((! __tmp__KKE)) {
-                    pos__BDWG=current_position__JXF();
-                    put_error__text__KNG( 0,(&__string_260));
-                    put_position__UOG(pos__BDWG);
-                    put_string__U1F(msg_err__PNG);
-                    if ((type_error__ONG !=  2)) {
+              if ((! __tmp__EKE)) {
+                result__3SL=read_cap_identifier__0ZJ();
+                if (result__3SL) {
+                  __tmp__SKE=is_parameter_type__QKE;
+                  if ((! __tmp__SKE)) {
+                    pos__DAXG=current_position__RXF();
+                    put_error__text__SNG( 0,(&__string_259));
+                    put_position__2OG(pos__DAXG);
+                    put_string__21F(msg_err__XNG);
+                    if ((type_error__WNG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __tmp__VKE=position__SBC;
-                  __tmp__XKE=((__STRING_CONSTANT *)last_string__I0C)->count__DD;
-                  __tmp__ZKE=(__INTEGER)(__tmp__VKE - __tmp__XKE);
-                  short__token__to__LBD((&__string_126),__tmp__ZKE,position__SBC);
-                  n__AQGB=last_string__I0C;
-                  result__IQGB=fast_reference_at__Y1T(dico__STI,n__AQGB);
-                  if (((void *)result__IQGB == (void *)NULL)) {
-                    result__UMGH=NULL;
-                    ptr__VMGH=((__POINTER )(NULL));
-                    typ_id__WMGH= 0;
-                    sz__XMGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-                    if ((sz__XMGH ==  0)) {
-                      result__UMGH=ITM_TYPE_PARAMETER__;
+                  __tmp__3KE=position__0BC;
+                  __tmp__5KE=((__STRING_CONSTANT *)last_string__Q0C)->count__DD;
+                  __tmp__BLE=(__INTEGER)(__tmp__3KE - __tmp__5KE);
+                  short__token__to__TBD((&__string_126),__tmp__BLE,position__0BC);
+                  n__IQGB=last_string__Q0C;
+                  result__QQGB=fast_reference_at__A2T(dico__0TI,n__IQGB);
+                  if (((void *)result__QQGB == (void *)NULL)) {
+                    result__POHH=NULL;
+                    ptr__QOHH=((__POINTER )(NULL));
+                    typ_id__ROHH= 0;
+                    sz__SOHH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__SOHH ==  0)) {
+                      result__POHH=ITM_TYPE_PARAMETER__;
                     } else {
-                      typ_id__WMGH=-1;
-                      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XMGH);
-                      if ((typ_id__WMGH == (__INTEGER)(-  1))) {
-                        a__YMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__ZMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMGH + a__YMGH) & (__UINTEGER_32)(~ a__YMGH));
-                        ptr_table__VQHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                        next__UQHH=((__POINTER )(NULL));
-                        result__WQHH=((__POINTER *)ptr_table__VQHH)[ 0];
-                        if ((result__WQHH == (void *)NULL)) {
-                          result__WQHH=new_lab__MRJ(new_size__ZMGH);
-                          next__UQHH=(void *)((unsigned long)result__WQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMGH)));
-                          ((__POINTER *)next__UQHH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__VQHH)[ 0]=next__UQHH;
+                      typ_id__ROHH=-1;
+                      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SOHH);
+                      if ((typ_id__ROHH == (__INTEGER)(-  1))) {
+                        a__TOHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__UOHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SOHH + a__TOHH) & (__UINTEGER_32)(~ a__TOHH));
+                        ptr_table__VSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UOHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__USIH=((__POINTER )(NULL));
+                        result__WSIH=((__POINTER *)ptr_table__VSIH)[ 0];
+                        if ((result__WSIH == (void *)NULL)) {
+                          result__WSIH=new_lab__URJ(new_size__UOHH);
+                          next__USIH=(void *)((unsigned long)result__WSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UOHH)));
+                          ((__POINTER *)next__USIH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__VSIH)[ 0]=next__USIH;
                         } else {
-                          next__UQHH=((__POINTER *)result__WQHH)[ 0];
-                          if ((next__UQHH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WQHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ZMGH <<  1)) <=  4096)) {
-                              next__UQHH=(void *)((unsigned long)result__WQHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZMGH)));
+                          next__USIH=((__POINTER *)result__WSIH)[ 0];
+                          if ((next__USIH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WSIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UOHH <<  1)) <=  4096)) {
+                              next__USIH=(void *)((unsigned long)result__WSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UOHH)));
                             } else {
-                              next__UQHH=new_lab__MRJ(new_size__ZMGH);
+                              next__USIH=new_lab__URJ(new_size__UOHH);
                             };
-                            ((__POINTER *)next__UQHH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__VQHH)[ 0]=next__UQHH;
+                            ((__POINTER *)next__USIH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__VSIH)[ 0]=next__USIH;
                           } else {
-                            ((__POINTER *)result__WQHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__WQHH=next__UQHH;
+                            ((__POINTER *)result__WSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__WSIH=next__USIH;
                           };
                         };
-                        ptr__VMGH=result__WQHH;
+                        ptr__QOHH=result__WSIH;
                       } else {
-                        t__0MGH=((__UINTEGER_32 )typ_id__WMGH);
-                        a__1MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                        new_size__3QHH=(__UINTEGER_32)((__UINTEGER_32)(sz__XMGH + a__1MGH) & (__UINTEGER_32)(~ a__1MGH));
-                        ptr_table__0QHH=((__POINTER )(&(table_type[(t__0MGH)])));
-                        lab_type__2QHH=(__UINTEGER_32)(t__0MGH |  1);
-                        next__ZQHH=((__POINTER )(NULL));
-                        result__1QHH=((__POINTER *)ptr_table__0QHH)[ 0];
-                        if ((result__1QHH == (void *)NULL)) {
-                          result__1QHH=new_lab__MRJ(lab_type__2QHH);
-                          next__ZQHH=(void *)((unsigned long)result__1QHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3QHH)));
-                          ((__POINTER *)next__ZQHH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__0QHH)[ 0]=next__ZQHH;
+                        t__VOHH=((__UINTEGER_32 )typ_id__ROHH);
+                        a__WOHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__3SIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SOHH + a__WOHH) & (__UINTEGER_32)(~ a__WOHH));
+                        ptr_table__0SIH=((__POINTER )(&(table_type[(t__VOHH)])));
+                        lab_type__2SIH=(__UINTEGER_32)(t__VOHH |  1);
+                        next__ZSIH=((__POINTER )(NULL));
+                        result__1SIH=((__POINTER *)ptr_table__0SIH)[ 0];
+                        if ((result__1SIH == (void *)NULL)) {
+                          result__1SIH=new_lab__URJ(lab_type__2SIH);
+                          next__ZSIH=(void *)((unsigned long)result__1SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SIH)));
+                          ((__POINTER *)next__ZSIH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__0SIH)[ 0]=next__ZSIH;
                         } else {
-                          next__ZQHH=((__POINTER *)result__1QHH)[ 0];
-                          if ((next__ZQHH == (void *)NULL)) {
-                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1QHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3QHH <<  1)) <=  4096)) {
-                              next__ZQHH=(void *)((unsigned long)result__1QHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3QHH)));
+                          next__ZSIH=((__POINTER *)result__1SIH)[ 0];
+                          if ((next__ZSIH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1SIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3SIH <<  1)) <=  4096)) {
+                              next__ZSIH=(void *)((unsigned long)result__1SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SIH)));
                             } else {
-                              next__ZQHH=new_lab__MRJ(lab_type__2QHH);
+                              next__ZSIH=new_lab__URJ(lab_type__2SIH);
                             };
-                            ((__POINTER *)next__ZQHH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__0QHH)[ 0]=next__ZQHH;
+                            ((__POINTER *)next__ZSIH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__0SIH)[ 0]=next__ZSIH;
                           } else {
-                            ((__POINTER *)result__1QHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZQHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__1QHH=next__ZQHH;
+                            ((__POINTER *)result__1SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__1SIH=next__ZSIH;
                           };
                         };
-                        ptr__VMGH=result__1QHH;
+                        ptr__QOHH=result__1SIH;
                       };
-                      result__UMGH=((__ITM_TYPE_PARAMETER *)ptr__VMGH);
-                      *(result__UMGH) = *(ITM_TYPE_PARAMETER__);
+                      result__POHH=((__ITM_TYPE_PARAMETER *)ptr__QOHH);
+                      *(result__POHH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    Self__2MGH=((__ITM_TYPE_PARAMETER *)result__UMGH);
-                    Self__2MGH->parent_itm_type__3DE.name__KYP=n__AQGB;
-                    fast_put__to__TOZ(dico__STI,Self__2MGH,n__AQGB);
-                    result__IQGB=result__UMGH;
+                    Self__XOHH=((__ITM_TYPE_PARAMETER *)result__POHH);
+                    Self__XOHH->parent_itm_type__FEE.name__SYP=n__IQGB;
+                    fast_put__to__1OZ(dico__0TI,Self__XOHH,n__IQGB);
+                    result__QQGB=result__POHH;
                   };
-                  if (result__IQGB==NULL) {
-                    __tmp__4KE=NULL;
+                  if (result__QQGB==NULL) {
+                    __tmp__GLE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__IQGB)->__id) {
+                    switch (((struct ___OBJ *)result__QQGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__4KE=((void *)result__IQGB);
+                      __tmp__GLE=((void *)result__QQGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__4KE=NULL;
+                      __tmp__GLE=NULL;
                     } break;
                     }
                   };
-                  res__2IE=__tmp__4KE;
+                  res__EJE=__tmp__GLE;
                 };
               };
-              if (((void *)res__2IE == (void *)NULL)) {
-                pos__DDWG=current_position__JXF();
-                put_error__text__KNG( 0,(&__string_260));
-                put_position__UOG(pos__DDWG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+              if (((void *)res__EJE == (void *)NULL)) {
+                pos__FAXG=current_position__RXF();
+                put_error__text__SNG( 0,(&__string_259));
+                put_position__2OG(pos__FAXG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__SBBC(((__PROTOTYPE *)object__JBC)->idf_generic_list__UME,res__2IE);
-              goto while_do__0WK;
+              add_last__0BBC(((__PROTOTYPE *)object__RBC)->idf_generic_list__2ME,res__EJE);
+              goto while_do__CXK;
             };
           };
-          result__4QHH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__4QHH=FALSE__;
+          result__4SIH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__4SIH=FALSE__;
           } else {
-            result__5QHH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__5QHH=((__CHARACTER )(( 0)));
+            result__5SIH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__5SIH=((__CHARACTER )(( 0)));
             } else {
-              result__5QHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__5SIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__5QHH == ')')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__4QHH=TRUE__;
+            if ((result__5SIH == ')')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__4SIH=TRUE__;
             };
           };
-          if ((! result__4QHH)) {
-            pos__FDWG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_261));
-            put_position__UOG(pos__FDWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__4SIH)) {
+            pos__HAXG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_260));
+            put_position__2OG(pos__HAXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          if (((! is_shorter__5Y) && (! is_shorter2__VI))) {
-            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__JBC)->idf_generic_list__UME)->parent_arrayed_collection__TME.upper__WBBC +  1) !=  0)) {
-              pos__HDWG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_262));
-              put_position__UOG(pos__HDWG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+          if (((! is_shorter__FZ) && (! is_shorter2__VI))) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__RBC)->idf_generic_list__2ME)->parent_arrayed_collection__1ME.upper__4BBC +  1) !=  0)) {
+              pos__JAXG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_261));
+              put_position__2OG(pos__JAXG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        pos__JDWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_263));
-        put_position__UOG(pos__JDWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        pos__LAXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_262));
+        put_position__2OG(pos__LAXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__JPE=TRUE__;
+      __tmp__RPE=TRUE__;
     } else {
-      __tmp__JPE=FALSE__;
+      __tmp__RPE=FALSE__;
     };
-    if (__tmp__JPE) {
-      __tmp__PRE=TRUE__;
+    if (__tmp__RPE) {
+      __tmp__XRE=TRUE__;
     } else {
-      __tmp__1PE=(read_word__QPF((&__string_63)) || read_word__QPF((&__string_64)));
-      if (__tmp__1PE) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__LDWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__LDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      __tmp__DQE=(read_word__YPF((&__string_63)) || read_word__YPF((&__string_64)));
+      if (__tmp__DQE) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__NAXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__NAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)read_type_list__IMO(PARSER__,FALSE__) == (void *)NULL)) {
-          pos__NDWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_264));
-          put_position__UOG(pos__NDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((void *)read_type_list__QMO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__PAXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_263));
+          put_position__2OG(pos__PAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__PRE=__tmp__1PE;
+      __tmp__XRE=__tmp__DQE;
     };
-    if (__tmp__PRE) {
-      __tmp__FTE=TRUE__;
+    if (__tmp__XRE) {
+      __tmp__NTE=TRUE__;
     } else {
-      result__A5G=read_word__QPF((&__string_65));
-      if (result__A5G) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__PDWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__PDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__I5G=read_word__YPF((&__string_65));
+      if (result__I5G) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__RAXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__RAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_external__ATO())) {
-          pos__RDWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_265));
-          put_position__UOG(pos__RDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! read_external__ITO())) {
+          pos__TAXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_264));
+          put_position__2OG(pos__TAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        append__BOS(output_decl__3FE,(&__string_266));
-        append__BOS(output_decl__3FE,((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI);
-        add_last__ZLT(output_decl__3FE,'\n');
-        append__BOS(output_decl__3FE,last_string__I0C);
-        add_last__ZLT(output_decl__3FE,'\n');
+        append__JOS(output_decl__FGE,(&__string_265));
+        append__JOS(output_decl__FGE,((__PROTOTYPE *)object__RBC)->parent_named__5.name__LI);
+        add_last__BMT(output_decl__FGE,'\n');
+        append__JOS(output_decl__FGE,last_string__Q0C);
+        add_last__BMT(output_decl__FGE,'\n');
       };
-      __tmp__FTE=result__A5G;
+      __tmp__NTE=result__I5G;
     };
-    if (__tmp__FTE) {
-      __tmp__BVE=TRUE__;
+    if (__tmp__NTE) {
+      __tmp__JVE=TRUE__;
     } else {
-      result__S5G=read_word__QPF((&__string_66));
-      if (result__S5G) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__TDWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__TDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__05G=read_word__YPF((&__string_66));
+      if (result__05G) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__VAXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__VAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        v__YDE=read_expr_primary__I4M(PARSER__);
-        if (((void *)v__YDE == (void *)NULL)) {
-          pos__VDWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_267));
-          put_position__UOG(pos__VDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        v__AEE=read_expr_primary__Q4M(PARSER__);
+        if (((void *)v__AEE == (void *)NULL)) {
+          pos__XAXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_266));
+          put_position__2OG(pos__XAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__JBC)->default_value__TUE != (void *)NULL)) {
-          pos__5L0G=current_position__JXF();
-          put_error__text__KNG( 1,(&__string_268));
-          put_position__UOG(pos__5L0G);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((void *)((__PROTOTYPE *)object__RBC)->default_value__1UE != (void *)NULL)) {
+          pos__NJ1G=current_position__RXF();
+          put_error__text__SNG( 1,(&__string_267));
+          put_position__2OG(pos__NJ1G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__JBC)->default_value__TUE=v__YDE;
+        ((__PROTOTYPE *)object__RBC)->default_value__1UE=v__AEE;
       };
-      __tmp__BVE=result__S5G;
+      __tmp__JVE=result__05G;
     };
-    if (__tmp__BVE) {
-      __tmp__3WE=TRUE__;
+    if (__tmp__JVE) {
+      __tmp__FXE=TRUE__;
     } else {
-      result__EAH=read_word__QPF((&__string_67));
-      if (result__EAH) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__XDWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__XDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__MAH=read_word__YPF((&__string_67));
+      if (result__MAH) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__ZAXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__ZAXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_external__ATO())) {
-          pos__ZDWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_265));
-          put_position__UOG(pos__ZDWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! read_external__ITO())) {
+          pos__1AXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_264));
+          put_position__2OG(pos__1AXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (((void *)((__PROTOTYPE *)object__JBC)->type_c__OWE != (void *)NULL)) {
-          pos__CJM=current_position__JXF();
-          put_error__text__KNG( 1,(&__string_269));
-          put_position__UOG(pos__CJM);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((void *)((__PROTOTYPE *)object__RBC)->type_c__WWE != (void *)NULL)) {
+          pos__KJM=current_position__RXF();
+          put_error__text__SNG( 1,(&__string_268));
+          put_position__2OG(pos__KJM);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__JBC)->type_c__OWE=last_string__I0C;
+        ((__PROTOTYPE *)object__RBC)->type_c__WWE=last_string__Q0C;
       };
-      __tmp__3WE=result__EAH;
+      __tmp__FXE=result__MAH;
     };
-    if (__tmp__3WE) {
-      __tmp__KYE=TRUE__;
+    if (__tmp__FXE) {
+      __tmp__SYE=TRUE__;
     } else {
-      result__WAH=read_word__QPF((&__string_68));
-      if (result__WAH) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__1DWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__1DWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__4AH=read_word__YPF((&__string_68));
+      if (result__4AH) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__3AXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__3AXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_integer__A2P())) {
-          pos__3DWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_270));
-          put_position__UOG(pos__3DWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! read_integer__I2P())) {
+          pos__5AXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_269));
+          put_position__2OG(pos__5AXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__KYE=result__WAH;
+      __tmp__SYE=result__4AH;
     };
-    if (__tmp__KYE) {
-      __tmp__Q0E=TRUE__;
+    if (__tmp__SYE) {
+      __tmp__Y0E=TRUE__;
     } else {
-      result__IBH=read_word__QPF((&__string_88));
-      if (result__IBH) {
-        if ((! read_symbol__DXJ((&__string_14)))) {
-          pos__5DWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_271));
-          put_position__UOG(pos__5DWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__QBH=read_word__YPF((&__string_88));
+      if (result__QBH) {
+        if ((! read_symbol__LXJ((&__string_14)))) {
+          pos__BBXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_270));
+          put_position__2OG(pos__BBXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__BRHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__BRHH=FALSE__;
+        result__BTIH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__BTIH=FALSE__;
         } else {
-          result__CRHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__CRHH=((__CHARACTER )(( 0)));
+          result__CTIH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__CTIH=((__CHARACTER )(( 0)));
           } else {
-            result__CRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__CTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__CRHH == '(')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__BRHH=TRUE__;
+          if ((result__CTIH == '(')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__BTIH=TRUE__;
           };
         };
-        if ((! result__BRHH)) {
-          pos__BEWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_272));
-          put_position__UOG(pos__BEWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__BTIH)) {
+          pos__DBXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_271));
+          put_position__2OG(pos__DBXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__MGFB:
+        while_do__UGFB:
         {
-          instr__AEE=readlip_expr__JTPB();
-          if (((void *)instr__AEE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__AEE)->__id) {
+          instr__IEE=readlip_expr__RTPB();
+          if (((void *)instr__IEE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__IEE)->__id) {
             case __LIP_AFFECT__: {
-              run__QGFC(instr__AEE);
+              run__YGFC(instr__IEE);
             } break;
             case __LIP_BINARY__: {
-              __tmp__VCQD=((__LIP_BINARY *)instr__AEE)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
-              put_error__text__KNG( 2,(&__string_273));
-              put_position__UOG(__tmp__VCQD);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+              __tmp__3CQD=((__LIP_BINARY *)instr__IEE)->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ;
+              put_error__text__SNG( 2,(&__string_272));
+              put_position__2OG(__tmp__3CQD);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __tmp__0CQD=((__LIP_UNARY *)instr__AEE)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
-              put_error__text__KNG( 2,(&__string_273));
-              put_position__UOG(__tmp__0CQD);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+              __tmp__CDQD=((__LIP_UNARY *)instr__IEE)->parent_lip_code__T14B.parent_itm_object__HEE.position__VDJ;
+              put_error__text__SNG( 2,(&__string_272));
+              put_position__2OG(__tmp__CDQD);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__T5TE(instr__AEE);
+              run__W5TE(instr__IEE);
             } break;
             case __LIP_IF__: {
-              run__2CQD(instr__AEE);
+              run__EDQD(instr__IEE);
             } break;
             case __LIP_PRINT__: {
-              run__HEUE(instr__AEE);
+              run__KEUE(instr__IEE);
             } break;
             case __LIP_VALUE__: {
-              __tmp__BM0G=((__LIP_VALUE *)instr__AEE)->parent_lip_code__2HFE.parent_itm_object__5DE.position__NDJ;
-              put_error__text__KNG( 2,(&__string_273));
-              put_position__UOG(__tmp__BM0G);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+              __tmp__PJ1G=((__LIP_VALUE *)instr__IEE)->parent_lip_code__ZFFE.parent_itm_object__HEE.position__VDJ;
+              put_error__text__SNG( 2,(&__string_272));
+              put_position__2OG(__tmp__PJ1G);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__ERHH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__ERHH=FALSE__;
+            result__ETIH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__ETIH=FALSE__;
             } else {
-              result__FRHH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__FRHH=((__CHARACTER )(( 0)));
+              result__FTIH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__FTIH=((__CHARACTER )(( 0)));
               } else {
-                result__FRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__FTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__FRHH == ';')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__ERHH=TRUE__;
+              if ((result__FTIH == ';')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__ETIH=TRUE__;
               };
             };
-            if ((! result__ERHH)) {
-              pos__DEWG=current_position__JXF();
-              put_error__text__KNG( 2,(&__string_163));
-              put_position__UOG(pos__DEWG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+            if ((! result__ETIH)) {
+              pos__FBXG=current_position__RXF();
+              put_error__text__SNG( 2,(&__string_165));
+              put_position__2OG(pos__FBXG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__MGFB;
+            goto while_do__UGFB;
           };
         };
-        result__HRHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__HRHH=FALSE__;
+        result__HTIH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__HTIH=FALSE__;
         } else {
-          result__IRHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__IRHH=((__CHARACTER )(( 0)));
+          result__ITIH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__ITIH=((__CHARACTER )(( 0)));
           } else {
-            result__IRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__ITIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__IRHH == ')')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__HRHH=TRUE__;
+          if ((result__ITIH == ')')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__HTIH=TRUE__;
           };
         };
-        if ((! result__HRHH)) {
-          pos__FEWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_238));
-          put_position__UOG(pos__FEWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__HTIH)) {
+          pos__HBXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_236));
+          put_position__2OG(pos__HBXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__Q0E=result__IBH;
+      __tmp__Y0E=result__QBH;
     };
-    if ((! __tmp__Q0E)) {
-      if (((((((read_word__QPF((&__string_69)) || read_word__QPF((&__string_70))) || read_word__QPF((&__string_71))) || read_word__QPF((&__string_72))) || read_word__QPF((&__string_73))) || read_word__QPF((&__string_74))) || read_word__QPF((&__string_75)))) {
-        short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        if ((! read_symbol__DXJ((&__string_12)))) {
-          pos__HEWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_253));
-          put_position__UOG(pos__HEWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+    if ((! __tmp__Y0E)) {
+      if (((((((read_word__YPF((&__string_69)) || read_word__YPF((&__string_70))) || read_word__YPF((&__string_71))) || read_word__YPF((&__string_72))) || read_word__YPF((&__string_73))) || read_word__YPF((&__string_74))) || read_word__YPF((&__string_75)))) {
+        short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        if ((! read_symbol__LXJ((&__string_12)))) {
+          pos__JBXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_252));
+          put_position__2OG(pos__JBXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if ((! read_string__LFQ())) {
-          pos__JEWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_274));
-          put_position__UOG(pos__JEWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! read_string__TFQ())) {
+          pos__LBXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_273));
+          put_position__2OG(pos__LBXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        pos__LEWG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_275));
-        put_position__UOG(pos__LEWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        pos__NBXG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_274));
+        put_position__2OG(pos__NBXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__KRHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__KRHH=FALSE__;
+    result__KTIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__KTIH=FALSE__;
     } else {
-      result__LRHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__LRHH=((__CHARACTER )(( 0)));
+      result__LTIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__LTIH=((__CHARACTER )(( 0)));
       } else {
-        result__LRHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__LTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__LRHH == ';')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__KRHH=TRUE__;
+      if ((result__LTIH == ';')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__KTIH=TRUE__;
       };
     };
-    if ((! result__KRHH)) {
-      pos__NEWG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_242));
-      put_position__UOG(pos__NEWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    if ((! result__KTIH)) {
+      pos__PBXG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_240));
+      put_position__2OG(pos__PBXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__WDE);
+  return(result__4DE);
 }
 
-static void* get_name__0UOB(void *n__2UOB)
+static void* get_name__CVOB(void *n__EVOB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__1OEC,*result__4UOB;
-  __STRING_CONSTANT *Self__5MGH,*Self__ENGH,*Self__JNGH;
-  __INTEGER result__4MGH,__tmp__ANGH,Self__BNGH,typ_id__14YB;
-  __INTEGER result__DNGH,__tmp__FNGH,Self__GNGH,idx__3XFC,idx__W2HD;
-  __INTEGER new_capacity__X2HD,i__Y2HD,result__INGH,__tmp__KNGH;
-  __INTEGER Self__LNGH,typ_id__F5HD;
-  __SECTION_ *result__V4YB,*Self__OXFC;
-  __POINTER ptr__W4YB,ptr_table__ORHH,next__NRHH,result__PRHH;
-  __POINTER ptr_table__TRHH,next__SRHH,result__URHH,ptr__A5HD;
-  __POINTER ptr_table__YRHH,next__XRHH,result__ZRHH,ptr_table__3RHH;
-  __POINTER next__2RHH,result__4RHH;
-  __UINTEGER_32 sz__Y4YB,a__KOEH,new_size__LOEH,t__POEH,a__OOEH;
-  __UINTEGER_32 new_size__WRHH,lab_type__VRHH,sz__C5HD,a__ONEH;
-  __UINTEGER_32 new_size__PNEH,t__TNEH,a__SNEH,new_size__ASHH;
-  __UINTEGER_32 lab_type__5RHH;
-  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__POEC,*Self__TXFC;
-  void *node__0OEC,*node__4XFC,*node1__02HD,*node2__12HD,*__tmp__MZFC;
-  void **old_buckets__Z2HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__54HD;
-  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__KDTD;
-  Self__POEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__DVOB);
-  result__1OEC=NULL;
-  Self__5MGH=((__STRING_CONSTANT *)n__2UOB);
-  result__4MGH= 0;
-  __tmp__ANGH=Self__5MGH->count__DD;
-  Self__BNGH= 1;
-  while ((Self__BNGH <= __tmp__ANGH)) {
-    result__4MGH=(__INTEGER)((__INTEGER)( 5 * result__4MGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5MGH->storage__VQO)[(__INTEGER)(Self__BNGH -  1)])));
-    Self__BNGH=(__INTEGER)(Self__BNGH +  1);
-  };
-  if ((result__4MGH <  0)) {
-    result__4MGH=(__INTEGER)(~ result__4MGH);
-  };
-  node__0OEC=((void **)Self__POEC->buckets__CPEC)[(__INTEGER)(result__4MGH % Self__POEC->capacity__3OEC)];
-  while ((! (((void *)node__0OEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->key__OPEC == (void *)n__2UOB)))) {
-    node__0OEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->next__ZPEC;
-  };
-  if (((void *)node__0OEC != (void *)NULL)) {
-    result__1OEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__0OEC)->item__BQEC;
-  };
-  result__4UOB=result__1OEC;
-  if (((void *)result__1OEC == (void *)NULL)) {
-    result__V4YB=NULL;
-    ptr__W4YB=((__POINTER )(NULL));
-    typ_id__14YB= 0;
-    sz__Y4YB=((__UINTEGER_32 )sizeof(__SECTION_));
-    if ((sz__Y4YB ==  0)) {
-      result__V4YB=SECTION___;
-    } else {
-      typ_id__14YB=__SECTION___;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y4YB);
-      if ((typ_id__14YB == (__INTEGER)(-  1))) {
-        a__KOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__LOEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y4YB + a__KOEH) & (__UINTEGER_32)(~ a__KOEH));
-        ptr_table__ORHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LOEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__NRHH=((__POINTER )(NULL));
-        result__PRHH=((__POINTER *)ptr_table__ORHH)[ 0];
-        if ((result__PRHH == (void *)NULL)) {
-          result__PRHH=new_lab__MRJ(new_size__LOEH);
-          next__NRHH=(void *)((unsigned long)result__PRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOEH)));
-          ((__POINTER *)next__NRHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ORHH)[ 0]=next__NRHH;
-        } else {
-          next__NRHH=((__POINTER *)result__PRHH)[ 0];
-          if ((next__NRHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PRHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LOEH <<  1)) <=  4096)) {
-              next__NRHH=(void *)((unsigned long)result__PRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOEH)));
+  void *result__DPEC,*result__GVOB;
+  __STRING_CONSTANT *Self__0OHH,*Self__5OHH,*Self__EPHH;
+  __INTEGER result__ZOHH,__tmp__1OHH,Self__2OHH,typ_id__D5YB;
+  __INTEGER result__4OHH,__tmp__APHH,Self__BPHH,idx__FYFC,idx__42HD;
+  __INTEGER new_capacity__52HD,i__A3HD,result__DPHH,__tmp__FPHH;
+  __INTEGER Self__GPHH,typ_id__N5HD;
+  __SECTION_ *result__34YB,*Self__WXFC;
+  __POINTER ptr__44YB,ptr_table__OTIH,next__NTIH,result__PTIH;
+  __POINTER ptr_table__TTIH,next__STIH,result__UTIH,ptr__I5HD;
+  __POINTER ptr_table__YTIH,next__XTIH,result__ZTIH,ptr_table__3TIH;
+  __POINTER next__2TIH,result__4TIH;
+  __UINTEGER_32 sz__A5YB,a__0PFH,new_size__1PFH,t__5PFH,a__4PFH;
+  __UINTEGER_32 new_size__WTIH,lab_type__VTIH,sz__K5HD,a__4OFH;
+  __UINTEGER_32 new_size__5OFH,t__DPFH,a__CPFH,new_size__AUIH;
+  __UINTEGER_32 lab_type__5TIH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__XOEC,*Self__1XFC;
+  void *node__CPEC,*node__GYFC,*node1__C3HD,*node2__D3HD,*__tmp__UZFC;
+  void **old_buckets__B3HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__H5HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__SDTD;
+  Self__XOEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__LVOB);
+  result__DPEC=NULL;
+  Self__0OHH=((__STRING_CONSTANT *)n__EVOB);
+  result__ZOHH= 0;
+  __tmp__1OHH=Self__0OHH->count__DD;
+  Self__2OHH= 1;
+  while ((Self__2OHH <= __tmp__1OHH)) {
+    result__ZOHH=(__INTEGER)((__INTEGER)( 5 * result__ZOHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__0OHH->storage__3QO)[(__INTEGER)(Self__2OHH -  1)])));
+    Self__2OHH=(__INTEGER)(Self__2OHH +  1);
+  };
+  if ((result__ZOHH <  0)) {
+    result__ZOHH=(__INTEGER)(~ result__ZOHH);
+  };
+  node__CPEC=((void **)Self__XOEC->buckets__KPEC)[(__INTEGER)(result__ZOHH % Self__XOEC->capacity__FPEC)];
+  while ((! (((void *)node__CPEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__CPEC)->key__WPEC == (void *)n__EVOB)))) {
+    node__CPEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__CPEC)->next__BQEC;
+  };
+  if (((void *)node__CPEC != (void *)NULL)) {
+    result__DPEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__CPEC)->item__JQEC;
+  };
+  result__GVOB=result__DPEC;
+  if (((void *)result__DPEC == (void *)NULL)) {
+    result__34YB=NULL;
+    ptr__44YB=((__POINTER )(NULL));
+    typ_id__D5YB= 0;
+    sz__A5YB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__A5YB ==  0)) {
+      result__34YB=SECTION___;
+    } else {
+      typ_id__D5YB=__SECTION___;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__A5YB);
+      if ((typ_id__D5YB == (__INTEGER)(-  1))) {
+        a__0PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1PFH=(__UINTEGER_32)((__UINTEGER_32)(sz__A5YB + a__0PFH) & (__UINTEGER_32)(~ a__0PFH));
+        ptr_table__OTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__NTIH=((__POINTER )(NULL));
+        result__PTIH=((__POINTER *)ptr_table__OTIH)[ 0];
+        if ((result__PTIH == (void *)NULL)) {
+          result__PTIH=new_lab__URJ(new_size__1PFH);
+          next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
+          ((__POINTER *)next__NTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OTIH)[ 0]=next__NTIH;
+        } else {
+          next__NTIH=((__POINTER *)result__PTIH)[ 0];
+          if ((next__NTIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1PFH <<  1)) <=  4096)) {
+              next__NTIH=(void *)((unsigned long)result__PTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
             } else {
-              next__NRHH=new_lab__MRJ(new_size__LOEH);
-            };
-            ((__POINTER *)next__NRHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ORHH)[ 0]=next__NRHH;
-          } else {
-            ((__POINTER *)result__PRHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PRHH=next__NRHH;
-          };
-        };
-        ptr__W4YB=result__PRHH;
-      } else {
-        t__POEH=((__UINTEGER_32 )typ_id__14YB);
-        a__OOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__WRHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y4YB + a__OOEH) & (__UINTEGER_32)(~ a__OOEH));
-        ptr_table__TRHH=((__POINTER )(&(table_type[(t__POEH)])));
-        lab_type__VRHH=(__UINTEGER_32)(t__POEH |  1);
-        next__SRHH=((__POINTER )(NULL));
-        result__URHH=((__POINTER *)ptr_table__TRHH)[ 0];
-        if ((result__URHH == (void *)NULL)) {
-          result__URHH=new_lab__MRJ(lab_type__VRHH);
-          next__SRHH=(void *)((unsigned long)result__URHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WRHH)));
-          ((__POINTER *)next__SRHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TRHH)[ 0]=next__SRHH;
-        } else {
-          next__SRHH=((__POINTER *)result__URHH)[ 0];
-          if ((next__SRHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__URHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WRHH <<  1)) <=  4096)) {
-              next__SRHH=(void *)((unsigned long)result__URHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WRHH)));
+              next__NTIH=new_lab__URJ(new_size__1PFH);
+            };
+            ((__POINTER *)next__NTIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OTIH)[ 0]=next__NTIH;
+          } else {
+            ((__POINTER *)result__PTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PTIH=next__NTIH;
+          };
+        };
+        ptr__44YB=result__PTIH;
+      } else {
+        t__5PFH=((__UINTEGER_32 )typ_id__D5YB);
+        a__4PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__A5YB + a__4PFH) & (__UINTEGER_32)(~ a__4PFH));
+        ptr_table__TTIH=((__POINTER )(&(table_type[(t__5PFH)])));
+        lab_type__VTIH=(__UINTEGER_32)(t__5PFH |  1);
+        next__STIH=((__POINTER )(NULL));
+        result__UTIH=((__POINTER *)ptr_table__TTIH)[ 0];
+        if ((result__UTIH == (void *)NULL)) {
+          result__UTIH=new_lab__URJ(lab_type__VTIH);
+          next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTIH)));
+          ((__POINTER *)next__STIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TTIH)[ 0]=next__STIH;
+        } else {
+          next__STIH=((__POINTER *)result__UTIH)[ 0];
+          if ((next__STIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UTIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WTIH <<  1)) <=  4096)) {
+              next__STIH=(void *)((unsigned long)result__UTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTIH)));
             } else {
-              next__SRHH=new_lab__MRJ(lab_type__VRHH);
-            };
-            ((__POINTER *)next__SRHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__TRHH)[ 0]=next__SRHH;
-          } else {
-            ((__POINTER *)result__URHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__URHH=next__SRHH;
-          };
-        };
-        ptr__W4YB=result__URHH;
-      };
-      result__V4YB=((__SECTION_ *)ptr__W4YB);
-      *(result__V4YB) = *(SECTION___);
-    };
-    result__4UOB=result__V4YB;
-    Self__OXFC=((__SECTION_ *)result__V4YB);
-    Self__OXFC->name__CZDC=n__2UOB;
-    Self__OXFC->type_list__RXFC=NULL;
-    Self__TXFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__DVOB);
-    Self__ENGH=((__STRING_CONSTANT *)n__2UOB);
-    result__DNGH= 0;
-    __tmp__FNGH=Self__ENGH->count__DD;
-    Self__GNGH= 1;
-    while ((Self__GNGH <= __tmp__FNGH)) {
-      result__DNGH=(__INTEGER)((__INTEGER)( 5 * result__DNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ENGH->storage__VQO)[(__INTEGER)(Self__GNGH -  1)])));
-      Self__GNGH=(__INTEGER)(Self__GNGH +  1);
-    };
-    if ((result__DNGH <  0)) {
-      result__DNGH=(__INTEGER)(~ result__DNGH);
-    };
-    idx__3XFC=(__INTEGER)(result__DNGH % Self__TXFC->capacity__3OEC);
-    node__4XFC=((void **)Self__TXFC->buckets__CPEC)[idx__3XFC];
-    while ((! (((void *)node__4XFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->key__OPEC == (void *)n__2UOB)))) {
-      node__4XFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->next__ZPEC;
-    };
-    if (((void *)node__4XFC == (void *)NULL)) {
-      if ((Self__TXFC->capacity__3OEC == Self__TXFC->count__5YFC)) {
-        idx__W2HD= 0;
-        node1__02HD=NULL;
-        node2__12HD=NULL;
-        old_buckets__Z2HD=Self__TXFC->buckets__CPEC;
-        new_capacity__X2HD=prime_number_ceiling__X41((__INTEGER)(Self__TXFC->capacity__3OEC +  1));
-        Self__TXFC->buckets__CPEC=create__31XC(new_capacity__X2HD);
-        i__Y2HD=(__INTEGER)(Self__TXFC->capacity__3OEC -  1);
-        Self__TXFC->capacity__3OEC=new_capacity__X2HD;
-        while ((i__Y2HD >=  0)) {
-          node1__02HD=((void **)old_buckets__Z2HD)[i__Y2HD];
-          while (((void *)node1__02HD != (void *)NULL)) {
-            node2__12HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->next__ZPEC;
-            Self__JNGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->key__OPEC);
-            result__INGH= 0;
-            __tmp__KNGH=Self__JNGH->count__DD;
-            Self__LNGH= 1;
-            while ((Self__LNGH <= __tmp__KNGH)) {
-              result__INGH=(__INTEGER)((__INTEGER)( 5 * result__INGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JNGH->storage__VQO)[(__INTEGER)(Self__LNGH -  1)])));
-              Self__LNGH=(__INTEGER)(Self__LNGH +  1);
-            };
-            if ((result__INGH <  0)) {
-              result__INGH=(__INTEGER)(~ result__INGH);
-            };
-            idx__W2HD=(__INTEGER)(result__INGH % Self__TXFC->capacity__3OEC);
-            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__02HD)->next__ZPEC=((void **)Self__TXFC->buckets__CPEC)[idx__W2HD];
-            ((void **)Self__TXFC->buckets__CPEC)[idx__W2HD]=node1__02HD;
-            node1__02HD=node2__12HD;
-          };
-          i__Y2HD=(__INTEGER)(i__Y2HD -  1);
-        };
-        idx__3XFC=(__INTEGER)(result__DNGH % new_capacity__X2HD);
-      };
-      __tmp__MZFC=((void **)Self__TXFC->buckets__CPEC)[idx__3XFC];
-      result__54HD=NULL;
-      ptr__A5HD=((__POINTER )(NULL));
-      typ_id__F5HD= 0;
-      sz__C5HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
-      if ((sz__C5HD ==  0)) {
-        result__54HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-      } else {
-        typ_id__F5HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__C5HD);
-        if ((typ_id__F5HD == (__INTEGER)(-  1))) {
-          a__ONEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__PNEH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5HD + a__ONEH) & (__UINTEGER_32)(~ a__ONEH));
-          ptr_table__YRHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PNEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__XRHH=((__POINTER )(NULL));
-          result__ZRHH=((__POINTER *)ptr_table__YRHH)[ 0];
-          if ((result__ZRHH == (void *)NULL)) {
-            result__ZRHH=new_lab__MRJ(new_size__PNEH);
-            next__XRHH=(void *)((unsigned long)result__ZRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNEH)));
-            ((__POINTER *)next__XRHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YRHH)[ 0]=next__XRHH;
-          } else {
-            next__XRHH=((__POINTER *)result__ZRHH)[ 0];
-            if ((next__XRHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZRHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PNEH <<  1)) <=  4096)) {
-                next__XRHH=(void *)((unsigned long)result__ZRHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PNEH)));
+              next__STIH=new_lab__URJ(lab_type__VTIH);
+            };
+            ((__POINTER *)next__STIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TTIH)[ 0]=next__STIH;
+          } else {
+            ((__POINTER *)result__UTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UTIH=next__STIH;
+          };
+        };
+        ptr__44YB=result__UTIH;
+      };
+      result__34YB=((__SECTION_ *)ptr__44YB);
+      *(result__34YB) = *(SECTION___);
+    };
+    result__GVOB=result__34YB;
+    Self__WXFC=((__SECTION_ *)result__34YB);
+    Self__WXFC->name__KZDC=n__EVOB;
+    Self__WXFC->type_list__ZXFC=NULL;
+    Self__1XFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__LVOB);
+    Self__5OHH=((__STRING_CONSTANT *)n__EVOB);
+    result__4OHH= 0;
+    __tmp__APHH=Self__5OHH->count__DD;
+    Self__BPHH= 1;
+    while ((Self__BPHH <= __tmp__APHH)) {
+      result__4OHH=(__INTEGER)((__INTEGER)( 5 * result__4OHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5OHH->storage__3QO)[(__INTEGER)(Self__BPHH -  1)])));
+      Self__BPHH=(__INTEGER)(Self__BPHH +  1);
+    };
+    if ((result__4OHH <  0)) {
+      result__4OHH=(__INTEGER)(~ result__4OHH);
+    };
+    idx__FYFC=(__INTEGER)(result__4OHH % Self__1XFC->capacity__FPEC);
+    node__GYFC=((void **)Self__1XFC->buckets__KPEC)[idx__FYFC];
+    while ((! (((void *)node__GYFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__GYFC)->key__WPEC == (void *)n__EVOB)))) {
+      node__GYFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__GYFC)->next__BQEC;
+    };
+    if (((void *)node__GYFC == (void *)NULL)) {
+      if ((Self__1XFC->capacity__FPEC == Self__1XFC->count__HZFC)) {
+        idx__42HD= 0;
+        node1__C3HD=NULL;
+        node2__D3HD=NULL;
+        old_buckets__B3HD=Self__1XFC->buckets__KPEC;
+        new_capacity__52HD=prime_number_ceiling__541((__INTEGER)(Self__1XFC->capacity__FPEC +  1));
+        Self__1XFC->buckets__KPEC=create__F2XC(new_capacity__52HD);
+        i__A3HD=(__INTEGER)(Self__1XFC->capacity__FPEC -  1);
+        Self__1XFC->capacity__FPEC=new_capacity__52HD;
+        while ((i__A3HD >=  0)) {
+          node1__C3HD=((void **)old_buckets__B3HD)[i__A3HD];
+          while (((void *)node1__C3HD != (void *)NULL)) {
+            node2__D3HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__C3HD)->next__BQEC;
+            Self__EPHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__C3HD)->key__WPEC);
+            result__DPHH= 0;
+            __tmp__FPHH=Self__EPHH->count__DD;
+            Self__GPHH= 1;
+            while ((Self__GPHH <= __tmp__FPHH)) {
+              result__DPHH=(__INTEGER)((__INTEGER)( 5 * result__DPHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EPHH->storage__3QO)[(__INTEGER)(Self__GPHH -  1)])));
+              Self__GPHH=(__INTEGER)(Self__GPHH +  1);
+            };
+            if ((result__DPHH <  0)) {
+              result__DPHH=(__INTEGER)(~ result__DPHH);
+            };
+            idx__42HD=(__INTEGER)(result__DPHH % Self__1XFC->capacity__FPEC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__C3HD)->next__BQEC=((void **)Self__1XFC->buckets__KPEC)[idx__42HD];
+            ((void **)Self__1XFC->buckets__KPEC)[idx__42HD]=node1__C3HD;
+            node1__C3HD=node2__D3HD;
+          };
+          i__A3HD=(__INTEGER)(i__A3HD -  1);
+        };
+        idx__FYFC=(__INTEGER)(result__4OHH % new_capacity__52HD);
+      };
+      __tmp__UZFC=((void **)Self__1XFC->buckets__KPEC)[idx__FYFC];
+      result__H5HD=NULL;
+      ptr__I5HD=((__POINTER )(NULL));
+      typ_id__N5HD= 0;
+      sz__K5HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__K5HD ==  0)) {
+        result__H5HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__N5HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__K5HD);
+        if ((typ_id__N5HD == (__INTEGER)(-  1))) {
+          a__4OFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5OFH=(__UINTEGER_32)((__UINTEGER_32)(sz__K5HD + a__4OFH) & (__UINTEGER_32)(~ a__4OFH));
+          ptr_table__YTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5OFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__XTIH=((__POINTER )(NULL));
+          result__ZTIH=((__POINTER *)ptr_table__YTIH)[ 0];
+          if ((result__ZTIH == (void *)NULL)) {
+            result__ZTIH=new_lab__URJ(new_size__5OFH);
+            next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OFH)));
+            ((__POINTER *)next__XTIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YTIH)[ 0]=next__XTIH;
+          } else {
+            next__XTIH=((__POINTER *)result__ZTIH)[ 0];
+            if ((next__XTIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZTIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5OFH <<  1)) <=  4096)) {
+                next__XTIH=(void *)((unsigned long)result__ZTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5OFH)));
               } else {
-                next__XRHH=new_lab__MRJ(new_size__PNEH);
+                next__XTIH=new_lab__URJ(new_size__5OFH);
               };
-              ((__POINTER *)next__XRHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YRHH)[ 0]=next__XRHH;
+              ((__POINTER *)next__XTIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YTIH)[ 0]=next__XTIH;
             } else {
-              ((__POINTER *)result__ZRHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ZRHH=next__XRHH;
-            };
-          };
-          ptr__A5HD=result__ZRHH;
-        } else {
-          t__TNEH=((__UINTEGER_32 )typ_id__F5HD);
-          a__SNEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__ASHH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5HD + a__SNEH) & (__UINTEGER_32)(~ a__SNEH));
-          ptr_table__3RHH=((__POINTER )(&(table_type[(t__TNEH)])));
-          lab_type__5RHH=(__UINTEGER_32)(t__TNEH |  1);
-          next__2RHH=((__POINTER )(NULL));
-          result__4RHH=((__POINTER *)ptr_table__3RHH)[ 0];
-          if ((result__4RHH == (void *)NULL)) {
-            result__4RHH=new_lab__MRJ(lab_type__5RHH);
-            next__2RHH=(void *)((unsigned long)result__4RHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASHH)));
-            ((__POINTER *)next__2RHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3RHH)[ 0]=next__2RHH;
-          } else {
-            next__2RHH=((__POINTER *)result__4RHH)[ 0];
-            if ((next__2RHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4RHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ASHH <<  1)) <=  4096)) {
-                next__2RHH=(void *)((unsigned long)result__4RHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ASHH)));
+              ((__POINTER *)result__ZTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZTIH=next__XTIH;
+            };
+          };
+          ptr__I5HD=result__ZTIH;
+        } else {
+          t__DPFH=((__UINTEGER_32 )typ_id__N5HD);
+          a__CPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__K5HD + a__CPFH) & (__UINTEGER_32)(~ a__CPFH));
+          ptr_table__3TIH=((__POINTER )(&(table_type[(t__DPFH)])));
+          lab_type__5TIH=(__UINTEGER_32)(t__DPFH |  1);
+          next__2TIH=((__POINTER )(NULL));
+          result__4TIH=((__POINTER *)ptr_table__3TIH)[ 0];
+          if ((result__4TIH == (void *)NULL)) {
+            result__4TIH=new_lab__URJ(lab_type__5TIH);
+            next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUIH)));
+            ((__POINTER *)next__2TIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3TIH)[ 0]=next__2TIH;
+          } else {
+            next__2TIH=((__POINTER *)result__4TIH)[ 0];
+            if ((next__2TIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4TIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AUIH <<  1)) <=  4096)) {
+                next__2TIH=(void *)((unsigned long)result__4TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUIH)));
               } else {
-                next__2RHH=new_lab__MRJ(lab_type__5RHH);
+                next__2TIH=new_lab__URJ(lab_type__5TIH);
               };
-              ((__POINTER *)next__2RHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3RHH)[ 0]=next__2RHH;
+              ((__POINTER *)next__2TIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3TIH)[ 0]=next__2TIH;
             } else {
-              ((__POINTER *)result__4RHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2RHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4RHH=next__2RHH;
+              ((__POINTER *)result__4TIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4TIH=next__2TIH;
             };
           };
-          ptr__A5HD=result__4RHH;
+          ptr__I5HD=result__4TIH;
         };
-        result__54HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__A5HD);
-        *(result__54HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__H5HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__I5HD);
+        *(result__H5HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      Self__KDTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__54HD);
-      Self__KDTD->item__BQEC=result__V4YB;
-      Self__KDTD->key__OPEC=n__2UOB;
-      Self__KDTD->next__ZPEC=__tmp__MZFC;
-      node__4XFC=result__54HD;
-      ((void **)Self__TXFC->buckets__CPEC)[idx__3XFC]=result__54HD;
-      Self__TXFC->count__5YFC=(__INTEGER)(Self__TXFC->count__5YFC +  1);
+      Self__SDTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__H5HD);
+      Self__SDTD->item__JQEC=result__34YB;
+      Self__SDTD->key__WPEC=n__EVOB;
+      Self__SDTD->next__BQEC=__tmp__UZFC;
+      node__GYFC=result__H5HD;
+      ((void **)Self__1XFC->buckets__KPEC)[idx__FYFC]=result__H5HD;
+      Self__1XFC->count__HZFC=(__INTEGER)(Self__1XFC->count__HZFC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__4XFC)->item__BQEC=result__V4YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__GYFC)->item__JQEC=result__34YB;
     };
   };
-  return(result__4UOB);
+  return(result__GVOB);
 }
 
-static void* read_type_list__IMO(__PARSER *Self__JMO,__BOOLEAN is_section__KMO)
+static void* read_type_list__QMO(__PARSER *Self__RMO,__BOOLEAN is_section__SMO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *ts__OMO,*__tmp__1MO,*__tmp__FOO;
-  void *t__NMO;
-  __POSITION pos__ZGWG,pos__1GWG,pos__3GWG;
-  void *lst__MMO,*result__NNGH;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__ONGH,*Self__PNGH;
-  __BOOLEAN result__BSHH;
-  __CHARACTER result__CSHH;
-  lst__MMO=NULL;
-  ts__OMO=NULL;
-  t__NMO=read_type__DCM(Self__JMO,FALSE__);
-  if (((void *)t__NMO != (void *)NULL)) {
-    if (is_section__KMO) {
-      if (t__NMO==NULL) {
-        __tmp__1MO=NULL;
-      } else {
-        switch (((struct ___OBJ *)t__NMO)->__id) {
+  void *ts__WMO,*__tmp__DNO,*__tmp__NOO;
+  void *t__VMO;
+  __POSITION pos__1DXG,pos__3DXG,pos__5DXG;
+  void *lst__UMO,*result__IPHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__JPHH,*Self__KPHH;
+  __BOOLEAN result__BUIH;
+  __CHARACTER result__CUIH;
+  lst__UMO=NULL;
+  ts__WMO=NULL;
+  t__VMO=read_type__LCM(Self__RMO,FALSE__);
+  if (((void *)t__VMO != (void *)NULL)) {
+    if (is_section__SMO) {
+      if (t__VMO==NULL) {
+        __tmp__DNO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__VMO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__1MO=((void *)t__NMO);
+          __tmp__DNO=((void *)t__VMO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__1MO=((void *)t__NMO);
+          __tmp__DNO=((void *)t__VMO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__1MO=NULL;
+          __tmp__DNO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__1MO=((void *)t__NMO);
+          __tmp__DNO=((void *)t__VMO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__1MO=((void *)t__NMO);
+          __tmp__DNO=((void *)t__VMO);
         } break;
         }
       };
-      ts__OMO=__tmp__1MO;
-      if (((void *)__tmp__1MO == (void *)NULL)) {
-        pos__ZGWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_276));
-        put_position__UOG(pos__ZGWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      ts__WMO=__tmp__DNO;
+      if (((void *)__tmp__DNO == (void *)NULL)) {
+        pos__1DXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_275));
+        put_position__2OG(pos__1DXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__NNGH=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
-      result__NNGH=create_with_capacity__IFR( 16);
+    result__IPHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP)->parent_arrayed_collection__RUP.upper__NVV <  0)) {
+      result__IPHH=create_with_capacity__QFR( 16);
     } else {
-      Self__ONGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-      result__NNGH=((void **)Self__ONGH->parent_arrayed_collection__JUP.storage__1ZV)[Self__ONGH->parent_arrayed_collection__JUP.upper__FVV];
-      Self__PNGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-      Self__PNGH->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__PNGH->parent_arrayed_collection__JUP.upper__FVV -  1);
+      Self__JPHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+      result__IPHH=((void **)Self__JPHH->parent_arrayed_collection__RUP.storage__D0V)[Self__JPHH->parent_arrayed_collection__RUP.upper__NVV];
+      Self__KPHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+      Self__KPHH->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(Self__KPHH->parent_arrayed_collection__RUP.upper__NVV -  1);
     };
-    lst__MMO=result__NNGH;
-    add_last__0NV(result__NNGH,t__NMO);
-    while_do__2UP:
+    lst__UMO=result__IPHH;
+    add_last__COV(result__IPHH,t__VMO);
+    while_do__EVP:
     {
-      result__BSHH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__BSHH=FALSE__;
+      result__BUIH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__BUIH=FALSE__;
       } else {
-        result__CSHH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__CSHH=((__CHARACTER )(( 0)));
+        result__CUIH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__CUIH=((__CHARACTER )(( 0)));
         } else {
-          result__CSHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__CUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__CSHH == ',')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__BSHH=TRUE__;
+        if ((result__CUIH == ',')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__BUIH=TRUE__;
         };
       };
-      if (result__BSHH) {
-        t__NMO=read_type__DCM(Self__JMO,FALSE__);
-        if (((void *)t__NMO == (void *)NULL)) {
-          pos__1GWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_264));
-          put_position__UOG(pos__1GWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (result__BUIH) {
+        t__VMO=read_type__LCM(Self__RMO,FALSE__);
+        if (((void *)t__VMO == (void *)NULL)) {
+          pos__3DXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_263));
+          put_position__2OG(pos__3DXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__KMO) {
-          if (t__NMO==NULL) {
-            __tmp__FOO=NULL;
+        if (is_section__SMO) {
+          if (t__VMO==NULL) {
+            __tmp__NOO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__NMO)->__id) {
+            switch (((struct ___OBJ *)t__VMO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__FOO=((void *)t__NMO);
+              __tmp__NOO=((void *)t__VMO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__FOO=((void *)t__NMO);
+              __tmp__NOO=((void *)t__VMO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__FOO=NULL;
+              __tmp__NOO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__FOO=((void *)t__NMO);
+              __tmp__NOO=((void *)t__VMO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__FOO=((void *)t__NMO);
+              __tmp__NOO=((void *)t__VMO);
             } break;
             }
           };
-          ts__OMO=__tmp__FOO;
-          if (((void *)__tmp__FOO == (void *)NULL)) {
-            pos__3GWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_276));
-            put_position__UOG(pos__3GWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          ts__WMO=__tmp__NOO;
+          if (((void *)__tmp__NOO == (void *)NULL)) {
+            pos__5DXG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_275));
+            put_position__2OG(pos__5DXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__0NV(lst__MMO,t__NMO);
-        goto while_do__2UP;
+        add_last__COV(lst__UMO,t__VMO);
+        goto while_do__EVP;
       };
     };
-    lst__MMO=alias__GVP(result__NNGH);
+    lst__UMO=alias__OVP(result__IPHH);
   };
-  return(lst__MMO);
+  return(lst__UMO);
 }
 
-static __INTEGER hash_code__P50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Q50)
+static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__S50,result__QNGH,__tmp__SNGH,Self__TNGH,__tmp__BA1;
-  __INTEGER result__VNGH,__tmp__XNGH,Self__YNGH,result__0NGH;
-  __INTEGER __tmp__2NGH,Self__3NGH,result__5NGH,__tmp__BOGH,Self__COGH;
-  __INTEGER result__EOGH,__tmp__GOGH,Self__HOGH,__tmp__QA1,result__JOGH;
-  __INTEGER __tmp__LOGH,Self__MOGH,result__OOGH,__tmp__QOGH,Self__ROGH;
-  __INTEGER result__TOGH,__tmp__VOGH,Self__WOGH;
-  void *__tmp__AA1,*__tmp__PA1;
-  __STRING_CONSTANT *Self__RNGH,*Self__WNGH,*Self__1NGH,*Self__AOGH;
-  __STRING_CONSTANT *Self__FOGH,*Self__KOGH,*Self__POGH,*Self__UOGH;
-  __BOOLEAN __tmp__DA1;
-  result__S50= 0;
-  if ((! (Self__Q50->parent_arrayed_collection__ZXC.upper__KIV <  0))) {
-    if (((void *)((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[Self__Q50->parent_arrayed_collection__ZXC.upper__KIV] != (void *)NULL)) {
-      __tmp__AA1=((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[Self__Q50->parent_arrayed_collection__ZXC.upper__KIV];
-      switch (((struct ___OBJ *)__tmp__AA1)->__id) {
+  __INTEGER result__050,result__LPHH,__tmp__NPHH,Self__OPHH,__tmp__JA1;
+  __INTEGER result__QPHH,__tmp__SPHH,Self__TPHH,result__VPHH;
+  __INTEGER __tmp__XPHH,Self__YPHH,result__0PHH,__tmp__2PHH,Self__3PHH;
+  __INTEGER result__5PHH,__tmp__BQHH,Self__CQHH,__tmp__YA1,result__EQHH;
+  __INTEGER __tmp__GQHH,Self__HQHH,result__JQHH,__tmp__LQHH,Self__MQHH;
+  __INTEGER result__OQHH,__tmp__QQHH,Self__RQHH;
+  void *__tmp__IA1,*__tmp__XA1;
+  __STRING_CONSTANT *Self__MPHH,*Self__RPHH,*Self__WPHH,*Self__1PHH;
+  __STRING_CONSTANT *Self__AQHH,*Self__FQHH,*Self__KQHH,*Self__PQHH;
+  __BOOLEAN __tmp__LA1;
+  result__050= 0;
+  if ((! (Self__Y50->parent_arrayed_collection__BYC.upper__SIV <  0))) {
+    if (((void *)((void **)Self__Y50->parent_arrayed_collection__BYC.storage__ZMV)[Self__Y50->parent_arrayed_collection__BYC.upper__SIV] != (void *)NULL)) {
+      __tmp__IA1=((void **)Self__Y50->parent_arrayed_collection__BYC.storage__ZMV)[Self__Y50->parent_arrayed_collection__BYC.upper__SIV];
+      switch (((struct ___OBJ *)__tmp__IA1)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        Self__RNGH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__AA1)->parent_itm_type__3DE.name__KYP);
-        result__QNGH= 0;
-        __tmp__SNGH=Self__RNGH->count__DD;
-        Self__TNGH= 1;
-        while ((Self__TNGH <= __tmp__SNGH)) {
-          result__QNGH=(__INTEGER)((__INTEGER)( 5 * result__QNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RNGH->storage__VQO)[(__INTEGER)(Self__TNGH -  1)])));
-          Self__TNGH=(__INTEGER)(Self__TNGH +  1);
-        };
-        if ((result__QNGH <  0)) {
-          result__QNGH=(__INTEGER)(~ result__QNGH);
-        };
-        __tmp__BA1=result__QNGH;
+        Self__MPHH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__IA1)->parent_itm_type__FEE.name__SYP);
+        result__LPHH= 0;
+        __tmp__NPHH=Self__MPHH->count__DD;
+        Self__OPHH= 1;
+        while ((Self__OPHH <= __tmp__NPHH)) {
+          result__LPHH=(__INTEGER)((__INTEGER)( 5 * result__LPHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MPHH->storage__3QO)[(__INTEGER)(Self__OPHH -  1)])));
+          Self__OPHH=(__INTEGER)(Self__OPHH +  1);
+        };
+        if ((result__LPHH <  0)) {
+          result__LPHH=(__INTEGER)(~ result__LPHH);
+        };
+        __tmp__JA1=result__LPHH;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        Self__WNGH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__AA1)->name__KYP);
-        result__VNGH= 0;
-        __tmp__XNGH=Self__WNGH->count__DD;
-        Self__YNGH= 1;
-        while ((Self__YNGH <= __tmp__XNGH)) {
-          result__VNGH=(__INTEGER)((__INTEGER)( 5 * result__VNGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WNGH->storage__VQO)[(__INTEGER)(Self__YNGH -  1)])));
-          Self__YNGH=(__INTEGER)(Self__YNGH +  1);
-        };
-        if ((result__VNGH <  0)) {
-          result__VNGH=(__INTEGER)(~ result__VNGH);
-        };
-        __tmp__BA1=result__VNGH;
+        Self__RPHH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__IA1)->name__SYP);
+        result__QPHH= 0;
+        __tmp__SPHH=Self__RPHH->count__DD;
+        Self__TPHH= 1;
+        while ((Self__TPHH <= __tmp__SPHH)) {
+          result__QPHH=(__INTEGER)((__INTEGER)( 5 * result__QPHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RPHH->storage__3QO)[(__INTEGER)(Self__TPHH -  1)])));
+          Self__TPHH=(__INTEGER)(Self__TPHH +  1);
+        };
+        if ((result__QPHH <  0)) {
+          result__QPHH=(__INTEGER)(~ result__QPHH);
+        };
+        __tmp__JA1=result__QPHH;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__WHD((&__string_277));
+        print__4HD((&__string_276));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__BA1= 0;
+        __tmp__JA1= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        Self__1NGH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__AA1)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
-        result__0NGH= 0;
-        __tmp__2NGH=Self__1NGH->count__DD;
-        Self__3NGH= 1;
-        while ((Self__3NGH <= __tmp__2NGH)) {
-          result__0NGH=(__INTEGER)((__INTEGER)( 5 * result__0NGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1NGH->storage__VQO)[(__INTEGER)(Self__3NGH -  1)])));
-          Self__3NGH=(__INTEGER)(Self__3NGH +  1);
-        };
-        if ((result__0NGH <  0)) {
-          result__0NGH=(__INTEGER)(~ result__0NGH);
-        };
-        __tmp__BA1=result__0NGH;
+        Self__WPHH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__IA1)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP);
+        result__VPHH= 0;
+        __tmp__XPHH=Self__WPHH->count__DD;
+        Self__YPHH= 1;
+        while ((Self__YPHH <= __tmp__XPHH)) {
+          result__VPHH=(__INTEGER)((__INTEGER)( 5 * result__VPHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__WPHH->storage__3QO)[(__INTEGER)(Self__YPHH -  1)])));
+          Self__YPHH=(__INTEGER)(Self__YPHH +  1);
+        };
+        if ((result__VPHH <  0)) {
+          result__VPHH=(__INTEGER)(~ result__VPHH);
+        };
+        __tmp__JA1=result__VPHH;
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__AOGH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__AA1)->parent_itm_type_simple__BSN.name__KYP);
-        result__5NGH= 0;
-        __tmp__BOGH=Self__AOGH->count__DD;
-        Self__COGH= 1;
-        while ((Self__COGH <= __tmp__BOGH)) {
-          result__5NGH=(__INTEGER)((__INTEGER)( 5 * result__5NGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__AOGH->storage__VQO)[(__INTEGER)(Self__COGH -  1)])));
-          Self__COGH=(__INTEGER)(Self__COGH +  1);
-        };
-        if ((result__5NGH <  0)) {
-          result__5NGH=(__INTEGER)(~ result__5NGH);
-        };
-        __tmp__BA1=result__5NGH;
+        Self__1PHH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__IA1)->parent_itm_type_simple__JSN.name__SYP);
+        result__0PHH= 0;
+        __tmp__2PHH=Self__1PHH->count__DD;
+        Self__3PHH= 1;
+        while ((Self__3PHH <= __tmp__2PHH)) {
+          result__0PHH=(__INTEGER)((__INTEGER)( 5 * result__0PHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1PHH->storage__3QO)[(__INTEGER)(Self__3PHH -  1)])));
+          Self__3PHH=(__INTEGER)(Self__3PHH +  1);
+        };
+        if ((result__0PHH <  0)) {
+          result__0PHH=(__INTEGER)(~ result__0PHH);
+        };
+        __tmp__JA1=result__0PHH;
       } break;
       };
-      result__S50=__tmp__BA1;
-      __tmp__DA1=TRUE__;
+      result__050=__tmp__JA1;
+      __tmp__LA1=TRUE__;
     } else {
-      __tmp__DA1=FALSE__;
+      __tmp__LA1=FALSE__;
     };
-    if ((! __tmp__DA1)) {
-      if (((void *)((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[ 0] != (void *)NULL)) {
-        __tmp__PA1=((void **)Self__Q50->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
-        switch (((struct ___OBJ *)__tmp__PA1)->__id) {
+    if ((! __tmp__LA1)) {
+      if (((void *)((void **)Self__Y50->parent_arrayed_collection__BYC.storage__ZMV)[ 0] != (void *)NULL)) {
+        __tmp__XA1=((void **)Self__Y50->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
+        switch (((struct ___OBJ *)__tmp__XA1)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          Self__FOGH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__PA1)->parent_itm_type__3DE.name__KYP);
-          result__EOGH= 0;
-          __tmp__GOGH=Self__FOGH->count__DD;
-          Self__HOGH= 1;
-          while ((Self__HOGH <= __tmp__GOGH)) {
-            result__EOGH=(__INTEGER)((__INTEGER)( 5 * result__EOGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FOGH->storage__VQO)[(__INTEGER)(Self__HOGH -  1)])));
-            Self__HOGH=(__INTEGER)(Self__HOGH +  1);
-          };
-          if ((result__EOGH <  0)) {
-            result__EOGH=(__INTEGER)(~ result__EOGH);
-          };
-          __tmp__QA1=result__EOGH;
+          Self__AQHH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__XA1)->parent_itm_type__FEE.name__SYP);
+          result__5PHH= 0;
+          __tmp__BQHH=Self__AQHH->count__DD;
+          Self__CQHH= 1;
+          while ((Self__CQHH <= __tmp__BQHH)) {
+            result__5PHH=(__INTEGER)((__INTEGER)( 5 * result__5PHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__AQHH->storage__3QO)[(__INTEGER)(Self__CQHH -  1)])));
+            Self__CQHH=(__INTEGER)(Self__CQHH +  1);
+          };
+          if ((result__5PHH <  0)) {
+            result__5PHH=(__INTEGER)(~ result__5PHH);
+          };
+          __tmp__YA1=result__5PHH;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          Self__KOGH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__PA1)->name__KYP);
-          result__JOGH= 0;
-          __tmp__LOGH=Self__KOGH->count__DD;
-          Self__MOGH= 1;
-          while ((Self__MOGH <= __tmp__LOGH)) {
-            result__JOGH=(__INTEGER)((__INTEGER)( 5 * result__JOGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KOGH->storage__VQO)[(__INTEGER)(Self__MOGH -  1)])));
-            Self__MOGH=(__INTEGER)(Self__MOGH +  1);
-          };
-          if ((result__JOGH <  0)) {
-            result__JOGH=(__INTEGER)(~ result__JOGH);
-          };
-          __tmp__QA1=result__JOGH;
+          Self__FQHH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__XA1)->name__SYP);
+          result__EQHH= 0;
+          __tmp__GQHH=Self__FQHH->count__DD;
+          Self__HQHH= 1;
+          while ((Self__HQHH <= __tmp__GQHH)) {
+            result__EQHH=(__INTEGER)((__INTEGER)( 5 * result__EQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FQHH->storage__3QO)[(__INTEGER)(Self__HQHH -  1)])));
+            Self__HQHH=(__INTEGER)(Self__HQHH +  1);
+          };
+          if ((result__EQHH <  0)) {
+            result__EQHH=(__INTEGER)(~ result__EQHH);
+          };
+          __tmp__YA1=result__EQHH;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__WHD((&__string_277));
+          print__4HD((&__string_276));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__QA1= 0;
+          __tmp__YA1= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          Self__POGH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__PA1)->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
-          result__OOGH= 0;
-          __tmp__QOGH=Self__POGH->count__DD;
-          Self__ROGH= 1;
-          while ((Self__ROGH <= __tmp__QOGH)) {
-            result__OOGH=(__INTEGER)((__INTEGER)( 5 * result__OOGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__POGH->storage__VQO)[(__INTEGER)(Self__ROGH -  1)])));
-            Self__ROGH=(__INTEGER)(Self__ROGH +  1);
-          };
-          if ((result__OOGH <  0)) {
-            result__OOGH=(__INTEGER)(~ result__OOGH);
-          };
-          __tmp__QA1=result__OOGH;
+          Self__KQHH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__XA1)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP);
+          result__JQHH= 0;
+          __tmp__LQHH=Self__KQHH->count__DD;
+          Self__MQHH= 1;
+          while ((Self__MQHH <= __tmp__LQHH)) {
+            result__JQHH=(__INTEGER)((__INTEGER)( 5 * result__JQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KQHH->storage__3QO)[(__INTEGER)(Self__MQHH -  1)])));
+            Self__MQHH=(__INTEGER)(Self__MQHH +  1);
+          };
+          if ((result__JQHH <  0)) {
+            result__JQHH=(__INTEGER)(~ result__JQHH);
+          };
+          __tmp__YA1=result__JQHH;
         } break;
         case __ITM_TYPE_STYLE__: {
-          Self__UOGH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__PA1)->parent_itm_type_simple__BSN.name__KYP);
-          result__TOGH= 0;
-          __tmp__VOGH=Self__UOGH->count__DD;
-          Self__WOGH= 1;
-          while ((Self__WOGH <= __tmp__VOGH)) {
-            result__TOGH=(__INTEGER)((__INTEGER)( 5 * result__TOGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UOGH->storage__VQO)[(__INTEGER)(Self__WOGH -  1)])));
-            Self__WOGH=(__INTEGER)(Self__WOGH +  1);
-          };
-          if ((result__TOGH <  0)) {
-            result__TOGH=(__INTEGER)(~ result__TOGH);
-          };
-          __tmp__QA1=result__TOGH;
+          Self__PQHH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__XA1)->parent_itm_type_simple__JSN.name__SYP);
+          result__OQHH= 0;
+          __tmp__QQHH=Self__PQHH->count__DD;
+          Self__RQHH= 1;
+          while ((Self__RQHH <= __tmp__QQHH)) {
+            result__OQHH=(__INTEGER)((__INTEGER)( 5 * result__OQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PQHH->storage__3QO)[(__INTEGER)(Self__RQHH -  1)])));
+            Self__RQHH=(__INTEGER)(Self__RQHH +  1);
+          };
+          if ((result__OQHH <  0)) {
+            result__OQHH=(__INTEGER)(~ result__OQHH);
+          };
+          __tmp__YA1=result__OQHH;
         } break;
         };
-        result__S50=__tmp__QA1;
+        result__050=__tmp__YA1;
       };
     };
   };
-  return(result__S50);
+  return(result__050);
 }
 
-static __CHARACTER read_style__XRF()
+static __CHARACTER read_style__5RF()
 // () With resultNo recursive, No inlinable.
 {
-  __CHARACTER result__0RF,result__FSHH,result__ISHH;
-  __BOOLEAN result__ESHH,__tmp__HSF,result__HSHH;
-  result__0RF='\0';
-  result__ESHH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__ESHH=FALSE__;
+  __CHARACTER result__CSF,result__FUIH,result__IUIH;
+  __BOOLEAN result__EUIH,__tmp__PSF,result__HUIH;
+  result__CSF='\0';
+  result__EUIH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__EUIH=FALSE__;
   } else {
-    result__FSHH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__FSHH=((__CHARACTER )(( 0)));
+    result__FUIH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__FUIH=((__CHARACTER )(( 0)));
     } else {
-      result__FSHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__FUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__FSHH == '-')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__ESHH=TRUE__;
+    if ((result__FUIH == '-')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__EUIH=TRUE__;
     };
   };
-  if (result__ESHH) {
-    result__0RF='-';
-    short__token__to__LBD((&__string_132),(__INTEGER)(position__SBC -  1),position__SBC);
-    __tmp__HSF=TRUE__;
+  if (result__EUIH) {
+    result__CSF='-';
+    short__token__to__TBD((&__string_132),(__INTEGER)(position__0BC -  1),position__0BC);
+    __tmp__PSF=TRUE__;
   } else {
-    __tmp__HSF=FALSE__;
+    __tmp__PSF=FALSE__;
   };
-  if ((! __tmp__HSF)) {
-    result__HSHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__HSHH=FALSE__;
+  if ((! __tmp__PSF)) {
+    result__HUIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__HUIH=FALSE__;
     } else {
-      result__ISHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__ISHH=((__CHARACTER )(( 0)));
+      result__IUIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__IUIH=((__CHARACTER )(( 0)));
       } else {
-        result__ISHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__IUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__ISHH == '+')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__HSHH=TRUE__;
+      if ((result__IUIH == '+')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__HUIH=TRUE__;
       };
     };
-    if (result__HSHH) {
-      result__0RF='+';
-      short__token__to__LBD((&__string_132),(__INTEGER)(position__SBC -  1),position__SBC);
+    if (result__HUIH) {
+      result__CSF='+';
+      short__token__to__TBD((&__string_132),(__INTEGER)(position__0BC -  1),position__0BC);
     } else {
-      result__0RF=' ';
+      result__CSF=' ';
     };
   };
-  return(result__0RF);
+  return(result__CSF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__RL5B(__INTEGER new_count__TL5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__ZL5B(__INTEGER new_count__1L5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__W25B,ptr_table__LSHH,next__KSHH,result__MSHH;
-  __POINTER ptr_table__QSHH,next__PSHH,result__RSHH;
-  __INTEGER typ_id__125B;
-  __UINTEGER_32 sz__Y25B,a__SOEH,new_size__TOEH,t__XOEH,a__WOEH;
-  __UINTEGER_32 new_size__TSHH,lab_type__SSHH;
-  __FAST_ARRAYoITM_ARGUMENTo *result__V25B,*Self__ATHC;
-  result__V25B=NULL;
-  ptr__W25B=((__POINTER )(NULL));
-  typ_id__125B= 0;
-  sz__Y25B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
-  if ((sz__Y25B ==  0)) {
-    result__V25B=FAST_ARRAYoITM_ARGUMENTo__;
+  __POINTER ptr__425B,ptr_table__LUIH,next__KUIH,result__MUIH;
+  __POINTER ptr_table__QUIH,next__PUIH,result__RUIH;
+  __INTEGER typ_id__D35B;
+  __UINTEGER_32 sz__A35B,a__CQFH,new_size__DQFH,t__HQFH,a__GQFH;
+  __UINTEGER_32 new_size__TUIH,lab_type__SUIH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__325B,*Self__ITHC;
+  result__325B=NULL;
+  ptr__425B=((__POINTER )(NULL));
+  typ_id__D35B= 0;
+  sz__A35B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__A35B ==  0)) {
+    result__325B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    typ_id__125B=__FAST_ARRAYoITM_ARGUMENTo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y25B);
-    if ((typ_id__125B == (__INTEGER)(-  1))) {
-      a__SOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TOEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y25B + a__SOEH) & (__UINTEGER_32)(~ a__SOEH));
-      ptr_table__LSHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TOEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__KSHH=((__POINTER )(NULL));
-      result__MSHH=((__POINTER *)ptr_table__LSHH)[ 0];
-      if ((result__MSHH == (void *)NULL)) {
-        result__MSHH=new_lab__MRJ(new_size__TOEH);
-        next__KSHH=(void *)((unsigned long)result__MSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOEH)));
-        ((__POINTER *)next__KSHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LSHH)[ 0]=next__KSHH;
-      } else {
-        next__KSHH=((__POINTER *)result__MSHH)[ 0];
-        if ((next__KSHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TOEH <<  1)) <=  4096)) {
-            next__KSHH=(void *)((unsigned long)result__MSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TOEH)));
-          } else {
-            next__KSHH=new_lab__MRJ(new_size__TOEH);
-          };
-          ((__POINTER *)next__KSHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LSHH)[ 0]=next__KSHH;
-        } else {
-          ((__POINTER *)result__MSHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MSHH=next__KSHH;
-        };
-      };
-      ptr__W25B=result__MSHH;
-    } else {
-      t__XOEH=((__UINTEGER_32 )typ_id__125B);
-      a__WOEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__TSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y25B + a__WOEH) & (__UINTEGER_32)(~ a__WOEH));
-      ptr_table__QSHH=((__POINTER )(&(table_type[(t__XOEH)])));
-      lab_type__SSHH=(__UINTEGER_32)(t__XOEH |  1);
-      next__PSHH=((__POINTER )(NULL));
-      result__RSHH=((__POINTER *)ptr_table__QSHH)[ 0];
-      if ((result__RSHH == (void *)NULL)) {
-        result__RSHH=new_lab__MRJ(lab_type__SSHH);
-        next__PSHH=(void *)((unsigned long)result__RSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSHH)));
-        ((__POINTER *)next__PSHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QSHH)[ 0]=next__PSHH;
-      } else {
-        next__PSHH=((__POINTER *)result__RSHH)[ 0];
-        if ((next__PSHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TSHH <<  1)) <=  4096)) {
-            next__PSHH=(void *)((unsigned long)result__RSHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSHH)));
-          } else {
-            next__PSHH=new_lab__MRJ(lab_type__SSHH);
-          };
-          ((__POINTER *)next__PSHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QSHH)[ 0]=next__PSHH;
-        } else {
-          ((__POINTER *)result__RSHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__RSHH=next__PSHH;
-        };
-      };
-      ptr__W25B=result__RSHH;
-    };
-    result__V25B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__W25B);
-    *(result__V25B) = *(FAST_ARRAYoITM_ARGUMENTo__);
-  };
-  Self__ATHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__V25B);
-  if ((Self__ATHC->parent_arrayed_collection__FCZB.capacity__AAHC < new_count__TL5B)) {
-    Self__ATHC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD(new_count__TL5B);
-    Self__ATHC->parent_arrayed_collection__FCZB.capacity__AAHC=new_count__TL5B;
-  };
-  Self__ATHC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(-  1);
-  return(result__V25B);
+    typ_id__D35B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__A35B);
+    if ((typ_id__D35B == (__INTEGER)(-  1))) {
+      a__CQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__A35B + a__CQFH) & (__UINTEGER_32)(~ a__CQFH));
+      ptr_table__LUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KUIH=((__POINTER )(NULL));
+      result__MUIH=((__POINTER *)ptr_table__LUIH)[ 0];
+      if ((result__MUIH == (void *)NULL)) {
+        result__MUIH=new_lab__URJ(new_size__DQFH);
+        next__KUIH=(void *)((unsigned long)result__MUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
+        ((__POINTER *)next__KUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LUIH)[ 0]=next__KUIH;
+      } else {
+        next__KUIH=((__POINTER *)result__MUIH)[ 0];
+        if ((next__KUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MUIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DQFH <<  1)) <=  4096)) {
+            next__KUIH=(void *)((unsigned long)result__MUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
+          } else {
+            next__KUIH=new_lab__URJ(new_size__DQFH);
+          };
+          ((__POINTER *)next__KUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LUIH)[ 0]=next__KUIH;
+        } else {
+          ((__POINTER *)result__MUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MUIH=next__KUIH;
+        };
+      };
+      ptr__425B=result__MUIH;
+    } else {
+      t__HQFH=((__UINTEGER_32 )typ_id__D35B);
+      a__GQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__A35B + a__GQFH) & (__UINTEGER_32)(~ a__GQFH));
+      ptr_table__QUIH=((__POINTER )(&(table_type[(t__HQFH)])));
+      lab_type__SUIH=(__UINTEGER_32)(t__HQFH |  1);
+      next__PUIH=((__POINTER )(NULL));
+      result__RUIH=((__POINTER *)ptr_table__QUIH)[ 0];
+      if ((result__RUIH == (void *)NULL)) {
+        result__RUIH=new_lab__URJ(lab_type__SUIH);
+        next__PUIH=(void *)((unsigned long)result__RUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUIH)));
+        ((__POINTER *)next__PUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QUIH)[ 0]=next__PUIH;
+      } else {
+        next__PUIH=((__POINTER *)result__RUIH)[ 0];
+        if ((next__PUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RUIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TUIH <<  1)) <=  4096)) {
+            next__PUIH=(void *)((unsigned long)result__RUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TUIH)));
+          } else {
+            next__PUIH=new_lab__URJ(lab_type__SUIH);
+          };
+          ((__POINTER *)next__PUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QUIH)[ 0]=next__PUIH;
+        } else {
+          ((__POINTER *)result__RUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RUIH=next__PUIH;
+        };
+      };
+      ptr__425B=result__RUIH;
+    };
+    result__325B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__425B);
+    *(result__325B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+  };
+  Self__ITHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__325B);
+  if ((Self__ITHC->parent_arrayed_collection__NCZB.capacity__IAHC < new_count__1L5B)) {
+    Self__ITHC->parent_arrayed_collection__NCZB.storage__EBHC=create__4PBD(new_count__1L5B);
+    Self__ITHC->parent_arrayed_collection__NCZB.capacity__IAHC=new_count__1L5B;
+  };
+  Self__ITHC->parent_arrayed_collection__NCZB.upper__GAHC=(__INTEGER)(-  1);
+  return(result__325B);
 }
 
-static void* read_loc_arg__with_self__IEHB(__PARSER *Self__JEHB,__BOOLEAN mute__KEHB,__BOOLEAN self_first__LEHB)
+static void* read_loc_arg__with_self__QEHB(__PARSER *Self__REHB,__BOOLEAN mute__SEHB,__BOOLEAN self_first__TEHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  void *result__NEHB,*result__B3EE;
-  void *t__OEHB,*t__12EE,*__tmp__0BFE,*t__OZ5B;
-  __POSITION pos__PEHB,pos__JIWG,pos__LIWG,pos__NIWG,pos__PIWG;
-  __POSITION pos__RIWG,pos__4IWG,pos__AJWG,p__MZ5B,p__BOLF,pos__KLWG;
-  __POSITION pos__MLWG;
-  void *n__SEHB,*n__NZ5B;
-  void *tb__TEHB,*__tmp__HHHB,*tb__C3EE,*__tmp__1BFE;
-  __ITM_ARG *result__ZSHH,*Self__BTHH,*result__MEAC,*Self__X0HC;
-  __POINTER ptr__0SHH,ptr_table__GTHH,next__FTHH,result__HTHH;
-  __POINTER ptr_table__LTHH,next__KTHH,result__MTHH,ptr__NEAC;
-  __POINTER ptr_table__1THH,next__0THH,result__2THH,ptr_table__AUHH;
-  __POINTER next__5THH,result__BUHH,ptr__WM0F,ptr_table__JUHH;
-  __POINTER next__IUHH,result__KUHH,ptr_table__OUHH,next__NUHH;
-  __POINTER result__PUHH,ptr__D5LF,ptr_table__TUHH,next__SUHH;
-  __POINTER result__UUHH,ptr_table__YUHH,next__XUHH,result__ZUHH;
-  __INTEGER typ_id__1SHH,beg__52EE,Self__5KSF,limit_up__ALSF;
-  __INTEGER typ_id__SEAC,__tmp__VHHG,i__OZMG,h__SMPF,idx__TMPF;
-  __INTEGER idx__3K1F,new_capacity__4K1F,i__2K1F,typ_id__1M0F;
-  __INTEGER typ_id__I5LF,__tmp__QDFE,Self__KOLF;
-  __UINTEGER_32 sz__2SHH,a__3SHH,new_size__4SHH,t__5SHH,a__ATHH;
-  __UINTEGER_32 new_size__OTHH,lab_type__NTHH,sz__PEAC,a__UREH;
-  __UINTEGER_32 new_size__VREH,t__ZREH,a__YREH,new_size__DUHH;
-  __UINTEGER_32 lab_type__CUHH,sz__YM0F,a__TQEH,new_size__UQEH,t__YQEH;
-  __UINTEGER_32 a__XQEH,new_size__RUHH,lab_type__QUHH,sz__F5LF,a__4QEH;
-  __UINTEGER_32 new_size__5QEH,t__DREH,a__CREH,new_size__1UHH;
-  __UINTEGER_32 lab_type__0UHH;
-  void *tm__22EE;
-  __ITM_ARGS *result__C5LF,*Self__HBPF;
-  __BOOLEAN result__VSHH,__tmp__4EHB,result__WSHH,__tmp__BGHB;
-  __BOOLEAN __tmp__KHHB,__tmp__OHHB,__tmp__TIHB,result__PTHH,mute__A3EE;
-  __BOOLEAN result__TTHH,__tmp__N3EE,result__UTHH,__tmp__K5EE;
-  __BOOLEAN result__XTHH,__tmp__BCFE,__tmp__4BFE,__tmp__ECFE;
-  __BOOLEAN __tmp__WJPF,result__TGHG,result__2UHH;
-  __CHARACTER result__XSHH,result__XF4G,result__QTHH,result__VTHH;
-  __CHARACTER result__2F4G,result__YTHH,result__3UHH;
-  void *type__32EE,*result__EUP;
-  void *name__42EE,*result__YOGH,*result__5MLF,*e__LIPF,*result__4IPF;
-  void *e__LMPF,*e__FUHH,*e__31QF;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__ZOGH,*Self__0OGH;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__BDBB,*Self__XDBB;
-  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__KIPF,*Self__KMPF;
-  void *node__3IPF,*node__GUHH,*node__G2QF,*node__UMPF,*node1__AL1F;
-  void *node2__BL1F,*__tmp__EOPF;
-  __FAST_ARRAYoSTRING_CONSTANTo *Self__QGHG,*o__UGHG,*__tmp__AHHG;
-  void **__tmp__QHHG,**__tmp__SHHG,**Self__0YMG;
-  void **old_buckets__5K1F;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__VM0F;
-  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__V33F;
-  result__NEHB=NULL;
-  t__OEHB=NULL;
-  pos__PEHB=((__POSITION ) 0);
-  n__SEHB=NULL;
-  tb__TEHB=NULL;
-  if (self_first__LEHB) {
-    result__VSHH=read_word__QPF((&__string_58));
-    if (is_shorter__5Y) {
-      if (result__VSHH) {
+  void *result__VEHB,*result__40EE;
+  void *t__WEHB,*t__Y0EE,*__tmp__X5EE,*t__WZ5B;
+  __POSITION pos__XEHB,pos__LFXG,pos__NFXG,pos__PFXG,pos__RFXG;
+  __POSITION pos__TFXG,pos__AGXG,pos__CGXG,p__UZ5B,p__NZLF,pos__MIXG;
+  __POSITION pos__OIXG;
+  void *n__0EHB,*n__VZ5B;
+  void *tb__1EHB,*__tmp__PHHB,*tb__50EE,*__tmp__Y5EE;
+  __ITM_ARG *result__ZUIH,*Self__BVIH,*result__UEAC,*Self__50HC;
+  __POINTER ptr__0UIH,ptr_table__GVIH,next__FVIH,result__HVIH;
+  __POINTER ptr_table__LVIH,next__KVIH,result__MVIH,ptr__VEAC;
+  __POINTER ptr_table__1VIH,next__0VIH,result__2VIH,ptr_table__AWIH;
+  __POINTER next__5VIH,result__BWIH,ptr__200F,ptr_table__JWIH;
+  __POINTER next__IWIH,result__KWIH,ptr_table__OWIH,next__NWIH;
+  __POINTER result__PWIH,ptr__PKMF,ptr_table__TWIH,next__SWIH;
+  __POINTER result__UWIH,ptr_table__YWIH,next__XWIH,result__ZWIH;
+  __INTEGER typ_id__1UIH,beg__20EE,Self__DXSF,limit_up__EXSF;
+  __INTEGER typ_id__0EAC,__tmp__PEIG,i__XVNG,h__WYPF,idx__XYPF;
+  __INTEGER idx__DZ1F,new_capacity__EZ1F,i__CZ1F,typ_id__B10F;
+  __INTEGER typ_id__UKMF,__tmp__NBFE,Self__WZLF;
+  __UINTEGER_32 sz__2UIH,a__3UIH,new_size__4UIH,t__5UIH,a__AVIH;
+  __UINTEGER_32 new_size__OVIH,lab_type__NVIH,sz__XEAC,a__ETFH;
+  __UINTEGER_32 new_size__FTFH,t__JTFH,a__ITFH,new_size__DWIH;
+  __UINTEGER_32 lab_type__CWIH,sz__400F,a__DSFH,new_size__ESFH,t__ISFH;
+  __UINTEGER_32 a__HSFH,new_size__RWIH,lab_type__QWIH,sz__RKMF,a__OSFH;
+  __UINTEGER_32 new_size__PSFH,t__TSFH,a__SSFH,new_size__1WIH;
+  __UINTEGER_32 lab_type__0WIH;
+  void *tm__Z0EE;
+  __ITM_ARGS *result__OKMF,*Self__LNPF;
+  __BOOLEAN result__VUIH,__tmp__GFHB,result__WUIH,__tmp__JGHB;
+  __BOOLEAN __tmp__SHHB,__tmp__WHHB,__tmp__1IHB,result__PVIH,mute__30EE;
+  __BOOLEAN result__TVIH,__tmp__K1EE,result__UVIH,__tmp__H3EE;
+  __BOOLEAN result__XVIH,__tmp__45EE,__tmp__15EE,__tmp__BAFE;
+  __BOOLEAN __tmp__0VPF,result__NDIG,result__2WIH;
+  __CHARACTER result__XUIH,result__KE5G,result__QVIH,result__VVIH;
+  __CHARACTER result__PE5G,result__YVIH,result__3WIH;
+  void *type__00EE,*result__MUP;
+  void *name__10EE,*result__TQHH,*result__LYLF,*e__PUPF,*result__CVPF;
+  void *e__PYPF,*e__FWIH,*e__BIRF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__UQHH,*Self__VQHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__JDBB,*Self__5DBB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__OUPF,*Self__OYPF;
+  void *node__BVPF,*node__GWIH,*node__KIRF,*node__YYPF,*node1__GZ1F;
+  void *node2__HZ1F,*__tmp__I0PF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__KDIG,*o__ODIG,*__tmp__0DIG;
+  void **__tmp__KEIG,**__tmp__MEIG,**Self__DVNG;
+  void **old_buckets__FZ1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__100F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__YU4F;
+  result__VEHB=NULL;
+  t__WEHB=NULL;
+  pos__XEHB=((__POSITION ) 0);
+  n__0EHB=NULL;
+  tb__1EHB=NULL;
+  if (self_first__TEHB) {
+    result__VUIH=read_word__YPF((&__string_58));
+    if (is_shorter__FZ) {
+      if (result__VUIH) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
-          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         } else {
-          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         };
       };
     };
-    __tmp__4EHB=result__VSHH;
+    __tmp__GFHB=result__VUIH;
   } else {
-    __tmp__4EHB=FALSE__;
+    __tmp__GFHB=FALSE__;
   };
-  if ((__tmp__4EHB || ((! self_first__LEHB) && read_identifier__LAL()))) {
-    pos__PEHB=current_position__JXF();
-    n__SEHB=last_string__I0C;
-    result__WSHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__WSHH=FALSE__;
+  if ((__tmp__GFHB || ((! self_first__TEHB) && read_identifier__TAL()))) {
+    pos__XEHB=current_position__RXF();
+    n__0EHB=last_string__Q0C;
+    result__WUIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__WUIH=FALSE__;
     } else {
-      result__XSHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__XSHH=((__CHARACTER )(( 0)));
+      result__XUIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__XUIH=((__CHARACTER )(( 0)));
       } else {
-        result__XSHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__XUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__XSHH == ':')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__WSHH=TRUE__;
+      if ((result__XUIH == ':')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__WUIH=TRUE__;
       };
     };
-    if (result__WSHH) {
-      result__XF4G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__XF4G=((__CHARACTER )(( 0)));
+    if (result__WUIH) {
+      result__KE5G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__KE5G=((__CHARACTER )(( 0)));
       } else {
-        result__XF4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__KE5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      __tmp__BGHB=(result__XF4G != '=');
+      __tmp__JGHB=(result__KE5G != '=');
     } else {
-      __tmp__BGHB=FALSE__;
+      __tmp__JGHB=FALSE__;
     };
-    if (__tmp__BGHB) {
-      t__OEHB=read_type__DCM(Self__JEHB,TRUE__);
-      if (((void *)t__OEHB == (void *)NULL)) {
-        pos__JIWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_278));
-        put_position__UOG(pos__JIWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    if (__tmp__JGHB) {
+      t__WEHB=read_type__LCM(Self__REHB,TRUE__);
+      if (((void *)t__WEHB == (void *)NULL)) {
+        pos__LFXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_277));
+        put_position__2OG(pos__LFXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      if ((self_first__LEHB && ((void *)t__OEHB != (void *)type_self__HUN))) {
-        if (((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__KHHB=TRUE__;
+      if ((self_first__TEHB && ((void *)t__WEHB != (void *)type_self__PUN))) {
+        if (((void *)((__PROTOTYPE *)object__RBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
+          __tmp__SHHB=TRUE__;
         } else {
-          if (t__OEHB==NULL) {
-            __tmp__HHHB=NULL;
+          if (t__WEHB==NULL) {
+            __tmp__PHHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__OEHB)->__id) {
+            switch (((struct ___OBJ *)t__WEHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__HHHB=NULL;
+              __tmp__PHHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__HHHB=NULL;
+              __tmp__PHHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__HHHB=((void *)t__OEHB);
+              __tmp__PHHB=((void *)t__WEHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__HHHB=NULL;
+              __tmp__PHHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__HHHB=NULL;
+              __tmp__PHHB=NULL;
             } break;
             }
           };
-          tb__TEHB=__tmp__HHHB;
-          __tmp__KHHB=((void *)__tmp__HHHB == (void *)NULL);
+          tb__1EHB=__tmp__PHHB;
+          __tmp__SHHB=((void *)__tmp__PHHB == (void *)NULL);
         };
-        __tmp__OHHB=__tmp__KHHB;
+        __tmp__WHHB=__tmp__SHHB;
       } else {
-        __tmp__OHHB=FALSE__;
+        __tmp__WHHB=FALSE__;
       };
-      if (__tmp__OHHB) {
-        pos__LIWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_279));
-        put_position__UOG(pos__LIWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if (__tmp__WHHB) {
+        pos__NFXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_278));
+        put_position__2OG(pos__NFXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      result__ZSHH=NULL;
-      ptr__0SHH=((__POINTER )(NULL));
-      typ_id__1SHH= 0;
-      sz__2SHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-      if ((sz__2SHH ==  0)) {
-        result__ZSHH=ITM_ARG__;
-      } else {
-        typ_id__1SHH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2SHH);
-        if ((typ_id__1SHH == (__INTEGER)(-  1))) {
-          a__3SHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__4SHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SHH + a__3SHH) & (__UINTEGER_32)(~ a__3SHH));
-          ptr_table__GTHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4SHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__FTHH=((__POINTER )(NULL));
-          result__HTHH=((__POINTER *)ptr_table__GTHH)[ 0];
-          if ((result__HTHH == (void *)NULL)) {
-            result__HTHH=new_lab__MRJ(new_size__4SHH);
-            next__FTHH=(void *)((unsigned long)result__HTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SHH)));
-            ((__POINTER *)next__FTHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GTHH)[ 0]=next__FTHH;
-          } else {
-            next__FTHH=((__POINTER *)result__HTHH)[ 0];
-            if ((next__FTHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HTHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4SHH <<  1)) <=  4096)) {
-                next__FTHH=(void *)((unsigned long)result__HTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SHH)));
+      result__ZUIH=NULL;
+      ptr__0UIH=((__POINTER )(NULL));
+      typ_id__1UIH= 0;
+      sz__2UIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__2UIH ==  0)) {
+        result__ZUIH=ITM_ARG__;
+      } else {
+        typ_id__1UIH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__2UIH);
+        if ((typ_id__1UIH == (__INTEGER)(-  1))) {
+          a__3UIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4UIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UIH + a__3UIH) & (__UINTEGER_32)(~ a__3UIH));
+          ptr_table__GVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4UIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__FVIH=((__POINTER )(NULL));
+          result__HVIH=((__POINTER *)ptr_table__GVIH)[ 0];
+          if ((result__HVIH == (void *)NULL)) {
+            result__HVIH=new_lab__URJ(new_size__4UIH);
+            next__FVIH=(void *)((unsigned long)result__HVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4UIH)));
+            ((__POINTER *)next__FVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GVIH)[ 0]=next__FVIH;
+          } else {
+            next__FVIH=((__POINTER *)result__HVIH)[ 0];
+            if ((next__FVIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HVIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4UIH <<  1)) <=  4096)) {
+                next__FVIH=(void *)((unsigned long)result__HVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4UIH)));
               } else {
-                next__FTHH=new_lab__MRJ(new_size__4SHH);
+                next__FVIH=new_lab__URJ(new_size__4UIH);
               };
-              ((__POINTER *)next__FTHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GTHH)[ 0]=next__FTHH;
+              ((__POINTER *)next__FVIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GVIH)[ 0]=next__FVIH;
             } else {
-              ((__POINTER *)result__HTHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__HTHH=next__FTHH;
-            };
-          };
-          ptr__0SHH=result__HTHH;
-        } else {
-          t__5SHH=((__UINTEGER_32 )typ_id__1SHH);
-          a__ATHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__OTHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SHH + a__ATHH) & (__UINTEGER_32)(~ a__ATHH));
-          ptr_table__LTHH=((__POINTER )(&(table_type[(t__5SHH)])));
-          lab_type__NTHH=(__UINTEGER_32)(t__5SHH |  1);
-          next__KTHH=((__POINTER )(NULL));
-          result__MTHH=((__POINTER *)ptr_table__LTHH)[ 0];
-          if ((result__MTHH == (void *)NULL)) {
-            result__MTHH=new_lab__MRJ(lab_type__NTHH);
-            next__KTHH=(void *)((unsigned long)result__MTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTHH)));
-            ((__POINTER *)next__KTHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LTHH)[ 0]=next__KTHH;
-          } else {
-            next__KTHH=((__POINTER *)result__MTHH)[ 0];
-            if ((next__KTHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MTHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OTHH <<  1)) <=  4096)) {
-                next__KTHH=(void *)((unsigned long)result__MTHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OTHH)));
+              ((__POINTER *)result__HVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HVIH=next__FVIH;
+            };
+          };
+          ptr__0UIH=result__HVIH;
+        } else {
+          t__5UIH=((__UINTEGER_32 )typ_id__1UIH);
+          a__AVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2UIH + a__AVIH) & (__UINTEGER_32)(~ a__AVIH));
+          ptr_table__LVIH=((__POINTER )(&(table_type[(t__5UIH)])));
+          lab_type__NVIH=(__UINTEGER_32)(t__5UIH |  1);
+          next__KVIH=((__POINTER )(NULL));
+          result__MVIH=((__POINTER *)ptr_table__LVIH)[ 0];
+          if ((result__MVIH == (void *)NULL)) {
+            result__MVIH=new_lab__URJ(lab_type__NVIH);
+            next__KVIH=(void *)((unsigned long)result__MVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVIH)));
+            ((__POINTER *)next__KVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LVIH)[ 0]=next__KVIH;
+          } else {
+            next__KVIH=((__POINTER *)result__MVIH)[ 0];
+            if ((next__KVIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MVIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OVIH <<  1)) <=  4096)) {
+                next__KVIH=(void *)((unsigned long)result__MVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVIH)));
               } else {
-                next__KTHH=new_lab__MRJ(lab_type__NTHH);
+                next__KVIH=new_lab__URJ(lab_type__NVIH);
               };
-              ((__POINTER *)next__KTHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LTHH)[ 0]=next__KTHH;
+              ((__POINTER *)next__KVIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LVIH)[ 0]=next__KVIH;
             } else {
-              ((__POINTER *)result__MTHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KTHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MTHH=next__KTHH;
+              ((__POINTER *)result__MVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MVIH=next__KVIH;
             };
           };
-          ptr__0SHH=result__MTHH;
+          ptr__0UIH=result__MVIH;
         };
-        result__ZSHH=((__ITM_ARG *)ptr__0SHH);
-        *(result__ZSHH) = *(ITM_ARG__);
+        result__ZUIH=((__ITM_ARG *)ptr__0UIH);
+        *(result__ZUIH) = *(ITM_ARG__);
       };
-      Self__BTHH=((__ITM_ARG *)result__ZSHH);
-      Self__BTHH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=pos__PEHB;
-      Self__BTHH->name__10HC=n__SEHB;
-      Self__BTHH->type__20HC=t__OEHB;
-      result__NEHB=result__ZSHH;
-      if (is_shorter__5Y) {
-        add__CMHB(short_local__JCC,n__SEHB);
+      Self__BVIH=((__ITM_ARG *)result__ZUIH);
+      Self__BVIH->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ=pos__XEHB;
+      Self__BVIH->name__D1HC=n__0EHB;
+      Self__BVIH->type__E1HC=t__WEHB;
+      result__VEHB=result__ZUIH;
+      if (is_shorter__FZ) {
+        add__KMHB(short_local__RCC,n__0EHB);
       };
     } else {
-      if ((! mute__KEHB)) {
-        pos__NIWG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_280));
-        put_position__UOG(pos__NIWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! mute__SEHB)) {
+        pos__PFXG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_279));
+        put_position__2OG(pos__PFXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__TIHB=TRUE__;
+    __tmp__1IHB=TRUE__;
   } else {
-    __tmp__TIHB=FALSE__;
-  };
-  if ((! __tmp__TIHB)) {
-    result__PTHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__PTHH=FALSE__;
-    } else {
-      result__QTHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__QTHH=((__CHARACTER )(( 0)));
-      } else {
-        result__QTHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-      };
-      if ((result__QTHH == '(')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__PTHH=TRUE__;
-      };
-    };
-    if (result__PTHH) {
-      t__12EE=NULL;
-      tm__22EE=NULL;
-      type__32EE=NULL;
-      name__42EE=NULL;
-      beg__52EE= 0;
-      result__B3EE=NULL;
-      tb__C3EE=NULL;
-      mute__A3EE=mute__KEHB;
-      if (self_first__LEHB) {
-        result__TTHH=read_word__QPF((&__string_58));
-        if (is_shorter__5Y) {
-          if (result__TTHH) {
+    __tmp__1IHB=FALSE__;
+  };
+  if ((! __tmp__1IHB)) {
+    result__PVIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__PVIH=FALSE__;
+    } else {
+      result__QVIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__QVIH=((__CHARACTER )(( 0)));
+      } else {
+        result__QVIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      };
+      if ((result__QVIH == '(')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__PVIH=TRUE__;
+      };
+    };
+    if (result__PVIH) {
+      t__Y0EE=NULL;
+      tm__Z0EE=NULL;
+      type__00EE=NULL;
+      name__10EE=NULL;
+      beg__20EE= 0;
+      result__40EE=NULL;
+      tb__50EE=NULL;
+      mute__30EE=mute__SEHB;
+      if (self_first__TEHB) {
+        result__TVIH=read_word__YPF((&__string_58));
+        if (is_shorter__FZ) {
+          if (result__TVIH) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
-              short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+              short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
             } else {
-              short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+              short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
             };
           };
         };
-        __tmp__N3EE=result__TTHH;
+        __tmp__K1EE=result__TVIH;
       } else {
-        __tmp__N3EE=FALSE__;
+        __tmp__K1EE=FALSE__;
       };
-      if ((__tmp__N3EE || read_identifier__LAL())) {
-        result__YOGH=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K)->parent_arrayed_collection__J5K.upper__0SU <  0)) {
-          result__YOGH=create_with_capacity__BHRC( 16);
+      if ((__tmp__K1EE || read_identifier__TAL())) {
+        result__TQHH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K)->parent_arrayed_collection__R5K.upper__CTU <  0)) {
+          result__TQHH=create_with_capacity__JHRC( 16);
         } else {
-          Self__ZOGH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
-          result__YOGH=((void **)Self__ZOGH->parent_arrayed_collection__J5K.storage__KVU)[Self__ZOGH->parent_arrayed_collection__J5K.upper__0SU];
-          Self__0OGH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
-          Self__0OGH->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__0OGH->parent_arrayed_collection__J5K.upper__0SU -  1);
+          Self__UQHH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K);
+          result__TQHH=((void **)Self__UQHH->parent_arrayed_collection__R5K.storage__SVU)[Self__UQHH->parent_arrayed_collection__R5K.upper__CTU];
+          Self__VQHH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K);
+          Self__VQHH->parent_arrayed_collection__R5K.upper__CTU=(__INTEGER)(Self__VQHH->parent_arrayed_collection__R5K.upper__CTU -  1);
         };
-        name__42EE=result__YOGH;
-        result__EUP=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
-          result__EUP=create_with_capacity__IFR( 16);
+        name__10EE=result__TQHH;
+        result__MUP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP)->parent_arrayed_collection__RUP.upper__NVV <  0)) {
+          result__MUP=create_with_capacity__QFR( 16);
         } else {
-          Self__BDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-          result__EUP=((void **)Self__BDBB->parent_arrayed_collection__JUP.storage__1ZV)[Self__BDBB->parent_arrayed_collection__JUP.upper__FVV];
-          Self__XDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-          Self__XDBB->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__XDBB->parent_arrayed_collection__JUP.upper__FVV -  1);
+          Self__JDBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+          result__MUP=((void **)Self__JDBB->parent_arrayed_collection__RUP.storage__D0V)[Self__JDBB->parent_arrayed_collection__RUP.upper__NVV];
+          Self__5DBB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+          Self__5DBB->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(Self__5DBB->parent_arrayed_collection__RUP.upper__NVV -  1);
         };
-        type__32EE=result__EUP;
-        beg__52EE= 0;
+        type__00EE=result__MUP;
+        beg__20EE= 0;
         do {
-          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__42EE)->parent_arrayed_collection__H5I.upper__15OD +  1) !=  0) && (! read_identifier__LAL())) && (! mute__A3EE))) {
-            pos__PIWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_281));
-            put_position__UOG(pos__PIWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.upper__DAPD +  1) !=  0) && (! read_identifier__TAL())) && (! mute__30EE))) {
+            pos__RFXG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_280));
+            put_position__2OG(pos__RFXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__RBPD(name__42EE,last_string__I0C);
-          result__UTHH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__UTHH=FALSE__;
+          add_last__ZBPD(name__10EE,last_string__Q0C);
+          result__UVIH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__UVIH=FALSE__;
           } else {
-            result__VTHH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__VTHH=((__CHARACTER )(( 0)));
+            result__VVIH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__VVIH=((__CHARACTER )(( 0)));
             } else {
-              result__VTHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__VVIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__VTHH == ':')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__UTHH=TRUE__;
+            if ((result__VVIH == ':')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__UVIH=TRUE__;
             };
           };
-          if (result__UTHH) {
-            result__2F4G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__2F4G=((__CHARACTER )(( 0)));
+          if (result__UVIH) {
+            result__PE5G='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__PE5G=((__CHARACTER )(( 0)));
             } else {
-              result__2F4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__PE5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            __tmp__K5EE=(result__2F4G != '=');
+            __tmp__H3EE=(result__PE5G != '=');
           } else {
-            __tmp__K5EE=FALSE__;
+            __tmp__H3EE=FALSE__;
           };
-          if (__tmp__K5EE) {
-            mute__A3EE=FALSE__;
-            t__12EE=read_type__DCM(Self__JEHB,TRUE__);
-            if (((void *)t__12EE == (void *)NULL)) {
-              pos__RIWG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_282));
-              put_position__UOG(pos__RIWG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+          if (__tmp__H3EE) {
+            mute__30EE=FALSE__;
+            t__Y0EE=read_type__LCM(Self__REHB,TRUE__);
+            if (((void *)t__Y0EE == (void *)NULL)) {
+              pos__TFXG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_281));
+              put_position__2OG(pos__TFXG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            Self__5KSF=beg__52EE;
-            limit_up__ALSF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__42EE)->parent_arrayed_collection__H5I.upper__15OD;
-            while ((Self__5KSF <= limit_up__ALSF)) {
-              add_last__0NV(type__32EE,t__12EE);
-              Self__5KSF=(__INTEGER)(Self__5KSF +  1);
+            Self__DXSF=beg__20EE;
+            limit_up__EXSF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.upper__DAPD;
+            while ((Self__DXSF <= limit_up__EXSF)) {
+              add_last__COV(type__00EE,t__Y0EE);
+              Self__DXSF=(__INTEGER)(Self__DXSF +  1);
             };
-            beg__52EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__42EE)->parent_arrayed_collection__H5I.upper__15OD +  1);
+            beg__20EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.upper__DAPD +  1);
           };
-          result__XTHH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__XTHH=FALSE__;
+          result__XVIH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__XVIH=FALSE__;
           } else {
-            result__YTHH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__YTHH=((__CHARACTER )(( 0)));
+            result__YVIH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__YVIH=((__CHARACTER )(( 0)));
             } else {
-              result__YTHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__YVIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__YTHH == ',')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__XTHH=TRUE__;
+            if ((result__YVIH == ',')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__XVIH=TRUE__;
             };
           };
-        } while (result__XTHH);
-        if ((beg__52EE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__YOGH)->parent_arrayed_collection__H5I.upper__15OD +  1))) {
-          if ((! mute__A3EE)) {
-            pos__4IWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_282));
-            put_position__UOG(pos__4IWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        } while (result__XVIH);
+        if ((beg__20EE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__TQHH)->parent_arrayed_collection__P5I.upper__DAPD +  1))) {
+          if ((! mute__30EE)) {
+            pos__AGXG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_281));
+            put_position__2OG(pos__AGXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          free__0S5(result__YOGH);
-          free__2MQ(result__EUP);
+          free__CT5(result__TQHH);
+          free__ENQ(result__MUP);
         } else {
-          if (self_first__LEHB) {
-            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0] != (void *)type_self__HUN)) {
-              __tmp__BCFE=TRUE__;
+          if (self_first__TEHB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__MUP)->parent_arrayed_collection__BYC.storage__ZMV)[ 0] != (void *)type_self__PUN)) {
+              __tmp__45EE=TRUE__;
             } else {
-              if (((void *)((__PROTOTYPE *)object__JBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
-                __tmp__0BFE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
-                if (__tmp__0BFE==NULL) {
-                  __tmp__1BFE=NULL;
+              if (((void *)((__PROTOTYPE *)object__RBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
+                __tmp__X5EE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__MUP)->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
+                if (__tmp__X5EE==NULL) {
+                  __tmp__Y5EE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__0BFE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__X5EE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__1BFE=NULL;
+                    __tmp__Y5EE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__1BFE=NULL;
+                    __tmp__Y5EE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__1BFE=((void *)__tmp__0BFE);
+                    __tmp__Y5EE=((void *)__tmp__X5EE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__1BFE=NULL;
+                    __tmp__Y5EE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__1BFE=NULL;
+                    __tmp__Y5EE=NULL;
                   } break;
                   }
                 };
-                tb__C3EE=__tmp__1BFE;
-                __tmp__4BFE=((void *)__tmp__1BFE == (void *)NULL);
+                tb__50EE=__tmp__Y5EE;
+                __tmp__15EE=((void *)__tmp__Y5EE == (void *)NULL);
               } else {
-                __tmp__4BFE=FALSE__;
+                __tmp__15EE=FALSE__;
               };
-              __tmp__BCFE=__tmp__4BFE;
+              __tmp__45EE=__tmp__15EE;
             };
-            __tmp__ECFE=__tmp__BCFE;
+            __tmp__BAFE=__tmp__45EE;
           } else {
-            __tmp__ECFE=FALSE__;
+            __tmp__BAFE=FALSE__;
           };
-          if (__tmp__ECFE) {
-            pos__AJWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_279));
-            put_position__UOG(pos__AJWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if (__tmp__BAFE) {
+            pos__CGXG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_278));
+            put_position__2OG(pos__CGXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__YOGH)->parent_arrayed_collection__H5I.upper__15OD +  1) ==  1)) {
-            p__MZ5B=current_position__JXF();
-            n__NZ5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__YOGH)->parent_arrayed_collection__H5I.storage__RCPD)[ 0];
-            t__OZ5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__EUP)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
-            result__MEAC=NULL;
-            ptr__NEAC=((__POINTER )(NULL));
-            typ_id__SEAC= 0;
-            sz__PEAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
-            if ((sz__PEAC ==  0)) {
-              result__MEAC=ITM_ARG__;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__TQHH)->parent_arrayed_collection__P5I.upper__DAPD +  1) ==  1)) {
+            p__UZ5B=current_position__RXF();
+            n__VZ5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__TQHH)->parent_arrayed_collection__P5I.storage__ZCPD)[ 0];
+            t__WZ5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__MUP)->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
+            result__UEAC=NULL;
+            ptr__VEAC=((__POINTER )(NULL));
+            typ_id__0EAC= 0;
+            sz__XEAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__XEAC ==  0)) {
+              result__UEAC=ITM_ARG__;
             } else {
-              typ_id__SEAC=-1;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__PEAC);
-              if ((typ_id__SEAC == (__INTEGER)(-  1))) {
-                a__UREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__VREH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEAC + a__UREH) & (__UINTEGER_32)(~ a__UREH));
-                ptr_table__1THH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VREH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__0THH=((__POINTER )(NULL));
-                result__2THH=((__POINTER *)ptr_table__1THH)[ 0];
-                if ((result__2THH == (void *)NULL)) {
-                  result__2THH=new_lab__MRJ(new_size__VREH);
-                  next__0THH=(void *)((unsigned long)result__2THH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VREH)));
-                  ((__POINTER *)next__0THH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1THH)[ 0]=next__0THH;
+              typ_id__0EAC=-1;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__XEAC);
+              if ((typ_id__0EAC == (__INTEGER)(-  1))) {
+                a__ETFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__FTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XEAC + a__ETFH) & (__UINTEGER_32)(~ a__ETFH));
+                ptr_table__1VIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FTFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__0VIH=((__POINTER )(NULL));
+                result__2VIH=((__POINTER *)ptr_table__1VIH)[ 0];
+                if ((result__2VIH == (void *)NULL)) {
+                  result__2VIH=new_lab__URJ(new_size__FTFH);
+                  next__0VIH=(void *)((unsigned long)result__2VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FTFH)));
+                  ((__POINTER *)next__0VIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1VIH)[ 0]=next__0VIH;
                 } else {
-                  next__0THH=((__POINTER *)result__2THH)[ 0];
-                  if ((next__0THH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2THH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VREH <<  1)) <=  4096)) {
-                      next__0THH=(void *)((unsigned long)result__2THH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VREH)));
+                  next__0VIH=((__POINTER *)result__2VIH)[ 0];
+                  if ((next__0VIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2VIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FTFH <<  1)) <=  4096)) {
+                      next__0VIH=(void *)((unsigned long)result__2VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FTFH)));
                     } else {
-                      next__0THH=new_lab__MRJ(new_size__VREH);
+                      next__0VIH=new_lab__URJ(new_size__FTFH);
                     };
-                    ((__POINTER *)next__0THH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__1THH)[ 0]=next__0THH;
+                    ((__POINTER *)next__0VIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__1VIH)[ 0]=next__0VIH;
                   } else {
-                    ((__POINTER *)result__2THH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0THH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__2THH=next__0THH;
+                    ((__POINTER *)result__2VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__2VIH=next__0VIH;
                   };
                 };
-                ptr__NEAC=result__2THH;
+                ptr__VEAC=result__2VIH;
               } else {
-                t__ZREH=((__UINTEGER_32 )typ_id__SEAC);
-                a__YREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__DUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEAC + a__YREH) & (__UINTEGER_32)(~ a__YREH));
-                ptr_table__AUHH=((__POINTER )(&(table_type[(t__ZREH)])));
-                lab_type__CUHH=(__UINTEGER_32)(t__ZREH |  1);
-                next__5THH=((__POINTER )(NULL));
-                result__BUHH=((__POINTER *)ptr_table__AUHH)[ 0];
-                if ((result__BUHH == (void *)NULL)) {
-                  result__BUHH=new_lab__MRJ(lab_type__CUHH);
-                  next__5THH=(void *)((unsigned long)result__BUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DUHH)));
-                  ((__POINTER *)next__5THH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__AUHH)[ 0]=next__5THH;
+                t__JTFH=((__UINTEGER_32 )typ_id__0EAC);
+                a__ITFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__DWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XEAC + a__ITFH) & (__UINTEGER_32)(~ a__ITFH));
+                ptr_table__AWIH=((__POINTER )(&(table_type[(t__JTFH)])));
+                lab_type__CWIH=(__UINTEGER_32)(t__JTFH |  1);
+                next__5VIH=((__POINTER )(NULL));
+                result__BWIH=((__POINTER *)ptr_table__AWIH)[ 0];
+                if ((result__BWIH == (void *)NULL)) {
+                  result__BWIH=new_lab__URJ(lab_type__CWIH);
+                  next__5VIH=(void *)((unsigned long)result__BWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWIH)));
+                  ((__POINTER *)next__5VIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AWIH)[ 0]=next__5VIH;
                 } else {
-                  next__5THH=((__POINTER *)result__BUHH)[ 0];
-                  if ((next__5THH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DUHH <<  1)) <=  4096)) {
-                      next__5THH=(void *)((unsigned long)result__BUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DUHH)));
+                  next__5VIH=((__POINTER *)result__BWIH)[ 0];
+                  if ((next__5VIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BWIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DWIH <<  1)) <=  4096)) {
+                      next__5VIH=(void *)((unsigned long)result__BWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DWIH)));
                     } else {
-                      next__5THH=new_lab__MRJ(lab_type__CUHH);
+                      next__5VIH=new_lab__URJ(lab_type__CWIH);
                     };
-                    ((__POINTER *)next__5THH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__AUHH)[ 0]=next__5THH;
+                    ((__POINTER *)next__5VIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__AWIH)[ 0]=next__5VIH;
                   } else {
-                    ((__POINTER *)result__BUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5THH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BUHH=next__5THH;
+                    ((__POINTER *)result__BWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__BWIH=next__5VIH;
                   };
                 };
-                ptr__NEAC=result__BUHH;
+                ptr__VEAC=result__BWIH;
               };
-              result__MEAC=((__ITM_ARG *)ptr__NEAC);
-              *(result__MEAC) = *(ITM_ARG__);
-            };
-            Self__X0HC=((__ITM_ARG *)result__MEAC);
-            Self__X0HC->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=p__MZ5B;
-            Self__X0HC->name__10HC=n__NZ5B;
-            Self__X0HC->type__20HC=t__OZ5B;
-            result__B3EE=result__MEAC;
-            free__0S5(result__YOGH);
-            free__2MQ(result__EUP);
-          } else {
-            result__5MLF=NULL;
-            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__YOGH)->parent_arrayed_collection__H5I.upper__15OD <  0)) {
-              result__5MLF=empty_list__GNLF;
+              result__UEAC=((__ITM_ARG *)ptr__VEAC);
+              *(result__UEAC) = *(ITM_ARG__);
+            };
+            Self__50HC=((__ITM_ARG *)result__UEAC);
+            Self__50HC->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ=p__UZ5B;
+            Self__50HC->name__D1HC=n__VZ5B;
+            Self__50HC->type__E1HC=t__WZ5B;
+            result__40EE=result__UEAC;
+            free__CT5(result__TQHH);
+            free__ENQ(result__MUP);
+          } else {
+            result__LYLF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__TQHH)->parent_arrayed_collection__P5I.upper__DAPD <  0)) {
+              result__LYLF=empty_list__SYLF;
             } else {
-              Self__KIPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__QNLF);
-              e__LIPF=result__YOGH;
-              result__4IPF=NULL;
-              node__3IPF=((void **)Self__KIPF->buckets__FJPF)[(__INTEGER)(hash_code__BTQF(result__YOGH) % Self__KIPF->capacity__AJPF)];
-              until_do__JUQF:
+              Self__OUPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__2YLF);
+              e__PUPF=result__TQHH;
+              result__CVPF=NULL;
+              node__BVPF=((void **)Self__OUPF->buckets__JVPF)[(__INTEGER)(hash_code__F5QF(result__TQHH) % Self__OUPF->capacity__EVPF)];
+              until_do__NARF:
               {
-                if (((void *)node__3IPF == (void *)NULL)) {
-                  __tmp__WJPF=TRUE__;
+                if (((void *)node__BVPF == (void *)NULL)) {
+                  __tmp__0VPF=TRUE__;
                 } else {
-                  Self__QGHG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3IPF)->item__RJPF);
-                  result__TGHG=FALSE__;
-                  o__UGHG=NULL;
-                  if (((void *)Self__QGHG == (void *)e__LIPF)) {
-                    result__TGHG=TRUE__;
+                  Self__KDIG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__BVPF)->item__VVPF);
+                  result__NDIG=FALSE__;
+                  o__ODIG=NULL;
+                  if (((void *)Self__KDIG == (void *)e__PUPF)) {
+                    result__NDIG=TRUE__;
                   } else {
-                    if (e__LIPF==NULL) {
-                      __tmp__AHHG=NULL;
+                    if (e__PUPF==NULL) {
+                      __tmp__0DIG=NULL;
                     } else {
-                      __tmp__AHHG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__LIPF);
+                      __tmp__0DIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__PUPF);
                     };
-                    o__UGHG=__tmp__AHHG;
-                    if ((((void *)__tmp__AHHG != (void *)NULL) && (Self__QGHG->parent_arrayed_collection__H5I.upper__15OD == __tmp__AHHG->parent_arrayed_collection__H5I.upper__15OD))) {
-                      __tmp__QHHG=Self__QGHG->parent_arrayed_collection__H5I.storage__RCPD;
-                      __tmp__SHHG=__tmp__AHHG->parent_arrayed_collection__H5I.storage__RCPD;
-                      __tmp__VHHG=(__INTEGER)(Self__QGHG->parent_arrayed_collection__H5I.upper__15OD +  1);
-                      Self__0YMG=((void **)__tmp__QHHG);
-                      i__OZMG=(__INTEGER)(__tmp__VHHG -  1);
-                      while (((i__OZMG >=  0) && ((void *)Self__0YMG[i__OZMG] == (void *)((void **)__tmp__SHHG)[i__OZMG]))) {
-                        i__OZMG=(__INTEGER)(i__OZMG -  1);
+                    o__ODIG=__tmp__0DIG;
+                    if ((((void *)__tmp__0DIG != (void *)NULL) && (Self__KDIG->parent_arrayed_collection__P5I.upper__DAPD == __tmp__0DIG->parent_arrayed_collection__P5I.upper__DAPD))) {
+                      __tmp__KEIG=Self__KDIG->parent_arrayed_collection__P5I.storage__ZCPD;
+                      __tmp__MEIG=__tmp__0DIG->parent_arrayed_collection__P5I.storage__ZCPD;
+                      __tmp__PEIG=(__INTEGER)(Self__KDIG->parent_arrayed_collection__P5I.upper__DAPD +  1);
+                      Self__DVNG=((void **)__tmp__KEIG);
+                      i__XVNG=(__INTEGER)(__tmp__PEIG -  1);
+                      while (((i__XVNG >=  0) && ((void *)Self__DVNG[i__XVNG] == (void *)((void **)__tmp__MEIG)[i__XVNG]))) {
+                        i__XVNG=(__INTEGER)(i__XVNG -  1);
                       };
-                      result__TGHG=(i__OZMG <  0);
+                      result__NDIG=(i__XVNG <  0);
                     };
                   };
-                  __tmp__WJPF=result__TGHG;
+                  __tmp__0VPF=result__NDIG;
                 };
-                if ((! __tmp__WJPF)) {
-                  node__3IPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3IPF)->next__3JPF;
-                  goto until_do__JUQF;
+                if ((! __tmp__0VPF)) {
+                  node__BVPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__BVPF)->next__BWPF;
+                  goto until_do__NARF;
                 };
               };
-              if (((void *)node__3IPF != (void *)NULL)) {
-                result__4IPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__3IPF)->item__RJPF;
+              if (((void *)node__BVPF != (void *)NULL)) {
+                result__CVPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__BVPF)->item__VVPF;
               };
-              result__5MLF=result__4IPF;
-              if (((void *)result__4IPF == (void *)NULL)) {
-                result__5MLF=create_with_capacity__BHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__YOGH)->parent_arrayed_collection__H5I.upper__15OD +  1));
-                copy__22RD(result__5MLF,result__YOGH);
-                Self__KMPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__QNLF);
-                e__LMPF=result__5MLF;
-                e__FUHH=result__5MLF;
-                node__GUHH=((void **)Self__KMPF->buckets__FJPF)[(__INTEGER)(hash_code__BTQF(result__5MLF) % Self__KMPF->capacity__AJPF)];
-                while ((! (((void *)node__GUHH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GUHH)->item__RJPF == (void *)e__FUHH)))) {
-                  node__GUHH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GUHH)->next__3JPF;
+              result__LYLF=result__CVPF;
+              if (((void *)result__CVPF == (void *)NULL)) {
+                result__LYLF=create_with_capacity__JHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__TQHH)->parent_arrayed_collection__P5I.upper__DAPD +  1));
+                copy__E3RD(result__LYLF,result__TQHH);
+                Self__OYPF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__2YLF);
+                e__PYPF=result__LYLF;
+                e__FWIH=result__LYLF;
+                node__GWIH=((void **)Self__OYPF->buckets__JVPF)[(__INTEGER)(hash_code__F5QF(result__LYLF) % Self__OYPF->capacity__EVPF)];
+                while ((! (((void *)node__GWIH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GWIH)->item__VVPF == (void *)e__FWIH)))) {
+                  node__GWIH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GWIH)->next__BWPF;
                 };
-                e__31QF=result__5MLF;
-                node__G2QF=((void **)Self__KMPF->buckets__FJPF)[(__INTEGER)(hash_code__BTQF(result__5MLF) % Self__KMPF->capacity__AJPF)];
-                while ((! (((void *)node__G2QF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__G2QF)->item__RJPF == (void *)e__31QF)))) {
-                  node__G2QF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__G2QF)->next__3JPF;
+                e__BIRF=result__LYLF;
+                node__KIRF=((void **)Self__OYPF->buckets__JVPF)[(__INTEGER)(hash_code__F5QF(result__LYLF) % Self__OYPF->capacity__EVPF)];
+                while ((! (((void *)node__KIRF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__KIRF)->item__VVPF == (void *)e__BIRF)))) {
+                  node__KIRF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__KIRF)->next__BWPF;
                 };
-                h__SMPF=hash_code__BTQF(result__5MLF);
-                idx__TMPF=(__INTEGER)(h__SMPF % Self__KMPF->capacity__AJPF);
-                node__UMPF=((void **)Self__KMPF->buckets__FJPF)[idx__TMPF];
-                while ((! (((void *)node__UMPF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__UMPF)->item__RJPF == (void *)e__LMPF)))) {
-                  node__UMPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__UMPF)->next__3JPF;
+                h__WYPF=hash_code__F5QF(result__LYLF);
+                idx__XYPF=(__INTEGER)(h__WYPF % Self__OYPF->capacity__EVPF);
+                node__YYPF=((void **)Self__OYPF->buckets__JVPF)[idx__XYPF];
+                while ((! (((void *)node__YYPF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__YYPF)->item__VVPF == (void *)e__PYPF)))) {
+                  node__YYPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__YYPF)->next__BWPF;
                 };
-                if (((void *)node__UMPF == (void *)NULL)) {
-                  if ((Self__KMPF->capacity__AJPF == Self__KMPF->count__XNPF)) {
-                    idx__3K1F= 0;
-                    node1__AL1F=NULL;
-                    node2__BL1F=NULL;
-                    new_capacity__4K1F=prime_number_ceiling__X41((__INTEGER)(Self__KMPF->capacity__AJPF +  1));
-                    old_buckets__5K1F=Self__KMPF->buckets__FJPF;
-                    Self__KMPF->buckets__FJPF=create__ZKTF(new_capacity__4K1F);
-                    i__2K1F=(__INTEGER)(Self__KMPF->capacity__AJPF -  1);
-                    Self__KMPF->capacity__AJPF=new_capacity__4K1F;
-                    while ((i__2K1F >=  0)) {
-                      node1__AL1F=((void **)old_buckets__5K1F)[i__2K1F];
-                      while (((void *)node1__AL1F != (void *)NULL)) {
-                        node2__BL1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__AL1F)->next__3JPF;
-                        idx__3K1F=(__INTEGER)(hash_code__BTQF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__AL1F)->item__RJPF) % Self__KMPF->capacity__AJPF);
-                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__AL1F)->next__3JPF=((void **)Self__KMPF->buckets__FJPF)[idx__3K1F];
-                        ((void **)Self__KMPF->buckets__FJPF)[idx__3K1F]=node1__AL1F;
-                        node1__AL1F=node2__BL1F;
+                if (((void *)node__YYPF == (void *)NULL)) {
+                  if ((Self__OYPF->capacity__EVPF == Self__OYPF->count__1ZPF)) {
+                    idx__DZ1F= 0;
+                    node1__GZ1F=NULL;
+                    node2__HZ1F=NULL;
+                    new_capacity__EZ1F=prime_number_ceiling__541((__INTEGER)(Self__OYPF->capacity__EVPF +  1));
+                    old_buckets__FZ1F=Self__OYPF->buckets__JVPF;
+                    Self__OYPF->buckets__JVPF=create__3WTF(new_capacity__EZ1F);
+                    i__CZ1F=(__INTEGER)(Self__OYPF->capacity__EVPF -  1);
+                    Self__OYPF->capacity__EVPF=new_capacity__EZ1F;
+                    while ((i__CZ1F >=  0)) {
+                      node1__GZ1F=((void **)old_buckets__FZ1F)[i__CZ1F];
+                      while (((void *)node1__GZ1F != (void *)NULL)) {
+                        node2__HZ1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__GZ1F)->next__BWPF;
+                        idx__DZ1F=(__INTEGER)(hash_code__F5QF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__GZ1F)->item__VVPF) % Self__OYPF->capacity__EVPF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__GZ1F)->next__BWPF=((void **)Self__OYPF->buckets__JVPF)[idx__DZ1F];
+                        ((void **)Self__OYPF->buckets__JVPF)[idx__DZ1F]=node1__GZ1F;
+                        node1__GZ1F=node2__HZ1F;
                       };
-                      i__2K1F=(__INTEGER)(i__2K1F -  1);
+                      i__CZ1F=(__INTEGER)(i__CZ1F -  1);
                     };
-                    idx__TMPF=(__INTEGER)(h__SMPF % Self__KMPF->capacity__AJPF);
+                    idx__XYPF=(__INTEGER)(h__WYPF % Self__OYPF->capacity__EVPF);
                   };
-                  __tmp__EOPF=((void **)Self__KMPF->buckets__FJPF)[idx__TMPF];
-                  result__VM0F=NULL;
-                  ptr__WM0F=((__POINTER )(NULL));
-                  typ_id__1M0F= 0;
-                  sz__YM0F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
-                  if ((sz__YM0F ==  0)) {
-                    result__VM0F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                  __tmp__I0PF=((void **)Self__OYPF->buckets__JVPF)[idx__XYPF];
+                  result__100F=NULL;
+                  ptr__200F=((__POINTER )(NULL));
+                  typ_id__B10F= 0;
+                  sz__400F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__400F ==  0)) {
+                    result__100F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    typ_id__1M0F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
-                    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YM0F);
-                    if ((typ_id__1M0F == (__INTEGER)(-  1))) {
-                      a__TQEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__UQEH=(__UINTEGER_32)((__UINTEGER_32)(sz__YM0F + a__TQEH) & (__UINTEGER_32)(~ a__TQEH));
-                      ptr_table__JUHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UQEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                      next__IUHH=((__POINTER )(NULL));
-                      result__KUHH=((__POINTER *)ptr_table__JUHH)[ 0];
-                      if ((result__KUHH == (void *)NULL)) {
-                        result__KUHH=new_lab__MRJ(new_size__UQEH);
-                        next__IUHH=(void *)((unsigned long)result__KUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UQEH)));
-                        ((__POINTER *)next__IUHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__JUHH)[ 0]=next__IUHH;
+                    typ_id__B10F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__400F);
+                    if ((typ_id__B10F == (__INTEGER)(-  1))) {
+                      a__DSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__ESFH=(__UINTEGER_32)((__UINTEGER_32)(sz__400F + a__DSFH) & (__UINTEGER_32)(~ a__DSFH));
+                      ptr_table__JWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ESFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                      next__IWIH=((__POINTER )(NULL));
+                      result__KWIH=((__POINTER *)ptr_table__JWIH)[ 0];
+                      if ((result__KWIH == (void *)NULL)) {
+                        result__KWIH=new_lab__URJ(new_size__ESFH);
+                        next__IWIH=(void *)((unsigned long)result__KWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESFH)));
+                        ((__POINTER *)next__IWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__JWIH)[ 0]=next__IWIH;
                       } else {
-                        next__IUHH=((__POINTER *)result__KUHH)[ 0];
-                        if ((next__IUHH == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UQEH <<  1)) <=  4096)) {
-                            next__IUHH=(void *)((unsigned long)result__KUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UQEH)));
+                        next__IWIH=((__POINTER *)result__KWIH)[ 0];
+                        if ((next__IWIH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KWIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ESFH <<  1)) <=  4096)) {
+                            next__IWIH=(void *)((unsigned long)result__KWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESFH)));
                           } else {
-                            next__IUHH=new_lab__MRJ(new_size__UQEH);
+                            next__IWIH=new_lab__URJ(new_size__ESFH);
                           };
-                          ((__POINTER *)next__IUHH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__JUHH)[ 0]=next__IUHH;
+                          ((__POINTER *)next__IWIH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__JWIH)[ 0]=next__IWIH;
                         } else {
-                          ((__POINTER *)result__KUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__KUHH=next__IUHH;
+                          ((__POINTER *)result__KWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__KWIH=next__IWIH;
                         };
                       };
-                      ptr__WM0F=result__KUHH;
+                      ptr__200F=result__KWIH;
                     } else {
-                      t__YQEH=((__UINTEGER_32 )typ_id__1M0F);
-                      a__XQEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                      new_size__RUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YM0F + a__XQEH) & (__UINTEGER_32)(~ a__XQEH));
-                      ptr_table__OUHH=((__POINTER )(&(table_type[(t__YQEH)])));
-                      lab_type__QUHH=(__UINTEGER_32)(t__YQEH |  1);
-                      next__NUHH=((__POINTER )(NULL));
-                      result__PUHH=((__POINTER *)ptr_table__OUHH)[ 0];
-                      if ((result__PUHH == (void *)NULL)) {
-                        result__PUHH=new_lab__MRJ(lab_type__QUHH);
-                        next__NUHH=(void *)((unsigned long)result__PUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RUHH)));
-                        ((__POINTER *)next__NUHH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__OUHH)[ 0]=next__NUHH;
+                      t__ISFH=((__UINTEGER_32 )typ_id__B10F);
+                      a__HSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__RWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__400F + a__HSFH) & (__UINTEGER_32)(~ a__HSFH));
+                      ptr_table__OWIH=((__POINTER )(&(table_type[(t__ISFH)])));
+                      lab_type__QWIH=(__UINTEGER_32)(t__ISFH |  1);
+                      next__NWIH=((__POINTER )(NULL));
+                      result__PWIH=((__POINTER *)ptr_table__OWIH)[ 0];
+                      if ((result__PWIH == (void *)NULL)) {
+                        result__PWIH=new_lab__URJ(lab_type__QWIH);
+                        next__NWIH=(void *)((unsigned long)result__PWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWIH)));
+                        ((__POINTER *)next__NWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__OWIH)[ 0]=next__NWIH;
                       } else {
-                        next__NUHH=((__POINTER *)result__PUHH)[ 0];
-                        if ((next__NUHH == (void *)NULL)) {
-                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__RUHH <<  1)) <=  4096)) {
-                            next__NUHH=(void *)((unsigned long)result__PUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RUHH)));
+                        next__NWIH=((__POINTER *)result__PWIH)[ 0];
+                        if ((next__NWIH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PWIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__RWIH <<  1)) <=  4096)) {
+                            next__NWIH=(void *)((unsigned long)result__PWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWIH)));
                           } else {
-                            next__NUHH=new_lab__MRJ(lab_type__QUHH);
+                            next__NWIH=new_lab__URJ(lab_type__QWIH);
                           };
-                          ((__POINTER *)next__NUHH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__OUHH)[ 0]=next__NUHH;
+                          ((__POINTER *)next__NWIH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__OWIH)[ 0]=next__NWIH;
                         } else {
-                          ((__POINTER *)result__PUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__PUHH=next__NUHH;
+                          ((__POINTER *)result__PWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__PWIH=next__NWIH;
                         };
                       };
-                      ptr__WM0F=result__PUHH;
+                      ptr__200F=result__PWIH;
                     };
-                    result__VM0F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__WM0F);
-                    *(result__VM0F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__100F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__200F);
+                    *(result__100F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  Self__V33F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__VM0F);
-                  Self__V33F->item__RJPF=result__5MLF;
-                  Self__V33F->next__3JPF=__tmp__EOPF;
-                  node__UMPF=result__VM0F;
-                  ((void **)Self__KMPF->buckets__FJPF)[idx__TMPF]=result__VM0F;
-                  Self__KMPF->count__XNPF=(__INTEGER)(Self__KMPF->count__XNPF +  1);
+                  Self__YU4F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__100F);
+                  Self__YU4F->item__VVPF=result__LYLF;
+                  Self__YU4F->next__BWPF=__tmp__I0PF;
+                  node__YYPF=result__100F;
+                  ((void **)Self__OYPF->buckets__JVPF)[idx__XYPF]=result__100F;
+                  Self__OYPF->count__1ZPF=(__INTEGER)(Self__OYPF->count__1ZPF +  1);
                 };
               };
             };
-            free__0S5(result__YOGH);
-            name__42EE=result__5MLF;
-            type__32EE=alias__GVP(result__EUP);
-            tm__22EE=get__CJP(type__32EE);
-            p__BOLF=current_position__JXF();
-            result__C5LF=NULL;
-            ptr__D5LF=((__POINTER )(NULL));
-            typ_id__I5LF= 0;
-            sz__F5LF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
-            if ((sz__F5LF ==  0)) {
-              result__C5LF=ITM_ARGS__;
+            free__CT5(result__TQHH);
+            name__10EE=result__LYLF;
+            type__00EE=alias__OVP(result__MUP);
+            tm__Z0EE=get__KJP(type__00EE);
+            p__NZLF=current_position__RXF();
+            result__OKMF=NULL;
+            ptr__PKMF=((__POINTER )(NULL));
+            typ_id__UKMF= 0;
+            sz__RKMF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__RKMF ==  0)) {
+              result__OKMF=ITM_ARGS__;
             } else {
-              typ_id__I5LF=-1;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__F5LF);
-              if ((typ_id__I5LF == (__INTEGER)(-  1))) {
-                a__4QEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__5QEH=(__UINTEGER_32)((__UINTEGER_32)(sz__F5LF + a__4QEH) & (__UINTEGER_32)(~ a__4QEH));
-                ptr_table__TUHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5QEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__SUHH=((__POINTER )(NULL));
-                result__UUHH=((__POINTER *)ptr_table__TUHH)[ 0];
-                if ((result__UUHH == (void *)NULL)) {
-                  result__UUHH=new_lab__MRJ(new_size__5QEH);
-                  next__SUHH=(void *)((unsigned long)result__UUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QEH)));
-                  ((__POINTER *)next__SUHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TUHH)[ 0]=next__SUHH;
+              typ_id__UKMF=-1;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__RKMF);
+              if ((typ_id__UKMF == (__INTEGER)(-  1))) {
+                a__OSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__PSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RKMF + a__OSFH) & (__UINTEGER_32)(~ a__OSFH));
+                ptr_table__TWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__SWIH=((__POINTER )(NULL));
+                result__UWIH=((__POINTER *)ptr_table__TWIH)[ 0];
+                if ((result__UWIH == (void *)NULL)) {
+                  result__UWIH=new_lab__URJ(new_size__PSFH);
+                  next__SWIH=(void *)((unsigned long)result__UWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSFH)));
+                  ((__POINTER *)next__SWIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TWIH)[ 0]=next__SWIH;
                 } else {
-                  next__SUHH=((__POINTER *)result__UUHH)[ 0];
-                  if ((next__SUHH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5QEH <<  1)) <=  4096)) {
-                      next__SUHH=(void *)((unsigned long)result__UUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QEH)));
+                  next__SWIH=((__POINTER *)result__UWIH)[ 0];
+                  if ((next__SWIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UWIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__PSFH <<  1)) <=  4096)) {
+                      next__SWIH=(void *)((unsigned long)result__UWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PSFH)));
                     } else {
-                      next__SUHH=new_lab__MRJ(new_size__5QEH);
+                      next__SWIH=new_lab__URJ(new_size__PSFH);
                     };
-                    ((__POINTER *)next__SUHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__TUHH)[ 0]=next__SUHH;
+                    ((__POINTER *)next__SWIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__TWIH)[ 0]=next__SWIH;
                   } else {
-                    ((__POINTER *)result__UUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__UUHH=next__SUHH;
+                    ((__POINTER *)result__UWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__UWIH=next__SWIH;
                   };
                 };
-                ptr__D5LF=result__UUHH;
+                ptr__PKMF=result__UWIH;
               } else {
-                t__DREH=((__UINTEGER_32 )typ_id__I5LF);
-                a__CREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__1UHH=(__UINTEGER_32)((__UINTEGER_32)(sz__F5LF + a__CREH) & (__UINTEGER_32)(~ a__CREH));
-                ptr_table__YUHH=((__POINTER )(&(table_type[(t__DREH)])));
-                lab_type__0UHH=(__UINTEGER_32)(t__DREH |  1);
-                next__XUHH=((__POINTER )(NULL));
-                result__ZUHH=((__POINTER *)ptr_table__YUHH)[ 0];
-                if ((result__ZUHH == (void *)NULL)) {
-                  result__ZUHH=new_lab__MRJ(lab_type__0UHH);
-                  next__XUHH=(void *)((unsigned long)result__ZUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UHH)));
-                  ((__POINTER *)next__XUHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__YUHH)[ 0]=next__XUHH;
+                t__TSFH=((__UINTEGER_32 )typ_id__UKMF);
+                a__SSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__1WIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RKMF + a__SSFH) & (__UINTEGER_32)(~ a__SSFH));
+                ptr_table__YWIH=((__POINTER )(&(table_type[(t__TSFH)])));
+                lab_type__0WIH=(__UINTEGER_32)(t__TSFH |  1);
+                next__XWIH=((__POINTER )(NULL));
+                result__ZWIH=((__POINTER *)ptr_table__YWIH)[ 0];
+                if ((result__ZWIH == (void *)NULL)) {
+                  result__ZWIH=new_lab__URJ(lab_type__0WIH);
+                  next__XWIH=(void *)((unsigned long)result__ZWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WIH)));
+                  ((__POINTER *)next__XWIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
                 } else {
-                  next__XUHH=((__POINTER *)result__ZUHH)[ 0];
-                  if ((next__XUHH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZUHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1UHH <<  1)) <=  4096)) {
-                      next__XUHH=(void *)((unsigned long)result__ZUHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1UHH)));
+                  next__XWIH=((__POINTER *)result__ZWIH)[ 0];
+                  if ((next__XWIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZWIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1WIH <<  1)) <=  4096)) {
+                      next__XWIH=(void *)((unsigned long)result__ZWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1WIH)));
                     } else {
-                      next__XUHH=new_lab__MRJ(lab_type__0UHH);
+                      next__XWIH=new_lab__URJ(lab_type__0WIH);
                     };
-                    ((__POINTER *)next__XUHH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__YUHH)[ 0]=next__XUHH;
+                    ((__POINTER *)next__XWIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
                   } else {
-                    ((__POINTER *)result__ZUHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__ZUHH=next__XUHH;
+                    ((__POINTER *)result__ZWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__ZWIH=next__XWIH;
                   };
                 };
-                ptr__D5LF=result__ZUHH;
+                ptr__PKMF=result__ZWIH;
               };
-              result__C5LF=((__ITM_ARGS *)ptr__D5LF);
-              *(result__C5LF) = *(ITM_ARGS__);
+              result__OKMF=((__ITM_ARGS *)ptr__PKMF);
+              *(result__OKMF) = *(ITM_ARGS__);
             };
-            Self__HBPF=((__ITM_ARGS *)result__C5LF);
-            Self__HBPF->parent_itm_argument__DDFE.parent_itm_code__S4M.position__NDJ=p__BOLF;
-            Self__HBPF->name__LBPF=result__5MLF;
-            Self__HBPF->type__MBPF=tm__22EE;
-            result__B3EE=result__C5LF;
+            Self__LNPF=((__ITM_ARGS *)result__OKMF);
+            Self__LNPF->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ=p__NZLF;
+            Self__LNPF->name__PNPF=result__LYLF;
+            Self__LNPF->type__QNPF=tm__Z0EE;
+            result__40EE=result__OKMF;
           };
-          if (is_shorter__5Y) {
-            __tmp__QDFE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__42EE)->parent_arrayed_collection__H5I.upper__15OD;
-            Self__KOLF= 0;
-            while ((Self__KOLF <= __tmp__QDFE)) {
-              add__CMHB(short_local__JCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__42EE)->parent_arrayed_collection__H5I.storage__RCPD)[Self__KOLF]);
-              Self__KOLF=(__INTEGER)(Self__KOLF +  1);
+          if (is_shorter__FZ) {
+            __tmp__NBFE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.upper__DAPD;
+            Self__WZLF= 0;
+            while ((Self__WZLF <= __tmp__NBFE)) {
+              add__KMHB(short_local__RCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.storage__ZCPD)[Self__WZLF]);
+              Self__WZLF=(__INTEGER)(Self__WZLF +  1);
             };
           };
         };
       };
-      result__NEHB=result__B3EE;
-      if (((void *)result__B3EE == (void *)NULL)) {
-        if ((! mute__KEHB)) {
-          pos__KLWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_283));
-          put_position__UOG(pos__KLWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      result__VEHB=result__40EE;
+      if (((void *)result__40EE == (void *)NULL)) {
+        if ((! mute__SEHB)) {
+          pos__MIXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_282));
+          put_position__2OG(pos__MIXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__2UHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__2UHH=FALSE__;
+        result__2WIH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__2WIH=FALSE__;
         } else {
-          result__3UHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__3UHH=((__CHARACTER )(( 0)));
+          result__3WIH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__3WIH=((__CHARACTER )(( 0)));
           } else {
-            result__3UHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__3WIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__3UHH == ')')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__2UHH=TRUE__;
+          if ((result__3WIH == ')')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__2WIH=TRUE__;
           };
         };
-        if ((! result__2UHH)) {
-          pos__MLWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_261));
-          put_position__UOG(pos__MLWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__2WIH)) {
+          pos__OIXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_260));
+          put_position__2OG(pos__OIXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__NEHB);
+  return(result__VEHB);
 }
 
-static void* read_slot_operator__FU5B(void *list_arg__HU5B)
+static void* read_slot_operator__NU5B(void *list_arg__PU5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *associativity__LU5B,*name__JU5B,*pretty_name__KU5B;
-  __INTEGER priority__MU5B,typ_id__2LAC;
-  void *arg__NU5B;
-  __POSITION pos__OLWG,pos__QLWG,pos__SLWG,pos__XLWG,pos__ZLWG;
-  __POSITION pos__1LWG,__tmp__HZ5B;
-  void *__tmp__IZ5B;
-  __ITM_SLOT_OPERATOR *result__WLAC,*Self__A2HC,*Self__B0HC;
-  __POINTER ptr__XLAC,ptr_table__HVHH,next__GVHH,result__IVHH;
-  __POINTER ptr_table__MVHH,next__LVHH,result__NVHH;
-  __UINTEGER_32 sz__ZLAC,a__MREH,new_size__NREH,t__RREH,a__QREH;
-  __UINTEGER_32 new_size__PVHH,lab_type__OVHH;
-  __BOOLEAN result__5UHH,result__DVHH,__tmp__MW5B,result__FVHH;
-  __CHARACTER result__AVHH;
-  associativity__LU5B=NULL;
-  priority__MU5B= 0;
-  arg__NU5B=NULL;
-  if ((! read_operator__HNM())) {
-    pos__OLWG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_284));
-    put_position__UOG(pos__OLWG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  void *associativity__TU5B,*name__RU5B,*pretty_name__SU5B;
+  __INTEGER priority__UU5B,typ_id__EMAC;
+  void *arg__VU5B;
+  __POSITION pos__QIXG,pos__SIXG,pos__UIXG,pos__ZIXG,pos__1IXG;
+  __POSITION pos__3IXG,__tmp__PZ5B;
+  void *__tmp__QZ5B;
+  __ITM_SLOT_OPERATOR *result__4LAC,*Self__I2HC,*Self__J0HC;
+  __POINTER ptr__5LAC,ptr_table__HXIH,next__GXIH,result__IXIH;
+  __POINTER ptr_table__MXIH,next__LXIH,result__NXIH;
+  __UINTEGER_32 sz__BMAC,a__2SFH,new_size__3SFH,t__BTFH,a__ATFH;
+  __UINTEGER_32 new_size__PXIH,lab_type__OXIH;
+  __BOOLEAN result__5WIH,result__DXIH,__tmp__UW5B,result__FXIH;
+  __CHARACTER result__AXIH;
+  associativity__TU5B=NULL;
+  priority__UU5B= 0;
+  arg__VU5B=NULL;
+  if ((! read_operator__PNM())) {
+    pos__QIXG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_283));
+    put_position__2OG(pos__QIXG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  if ((((void *)last_string__I0C == (void *)(&__string_16)) || ((void *)last_string__I0C == (void *)(&__string_17)))) {
-    pos__QLWG=current_position__JXF();
-    put_error__text__KNG( 0,(&__string_285));
-    put_position__UOG(pos__QLWG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((((void *)last_string__Q0C == (void *)(&__string_16)) || ((void *)last_string__Q0C == (void *)(&__string_17)))) {
+    pos__SIXG=current_position__RXF();
+    put_error__text__SNG( 0,(&__string_284));
+    put_position__2OG(pos__SIXG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  name__JU5B=last_string__I0C;
-  pretty_name__KU5B=name__JU5B;
-  result__5UHH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__5UHH=FALSE__;
+  name__RU5B=last_string__Q0C;
+  pretty_name__SU5B=name__RU5B;
+  result__5WIH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__5WIH=FALSE__;
   } else {
-    result__AVHH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__AVHH=((__CHARACTER )(( 0)));
+    result__AXIH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__AXIH=((__CHARACTER )(( 0)));
     } else {
-      result__AVHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__AXIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__AVHH == '\'')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__5UHH=TRUE__;
+    if ((result__AXIH == '\'')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__5WIH=TRUE__;
     };
   };
-  if ((! result__5UHH)) {
-    pos__SLWG=current_position__JXF();
-    put_error__text__KNG( 2,(&__string_286));
-    put_position__UOG(pos__SLWG);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if ((! result__5WIH)) {
+    pos__UIXG=current_position__RXF();
+    put_error__text__SNG( 2,(&__string_285));
+    put_position__2OG(pos__UIXG);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  result__DVHH=read_word__QPF((&__string_6));
-  if (is_shorter__5Y) {
-    if (result__DVHH) {
+  result__DXIH=read_word__YPF((&__string_6));
+  if (is_shorter__FZ) {
+    if (result__DXIH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
-        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       } else {
-        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       };
     };
   };
-  if (result__DVHH) {
-    __tmp__MW5B=TRUE__;
+  if (result__DXIH) {
+    __tmp__UW5B=TRUE__;
   } else {
-    result__FVHH=read_word__QPF((&__string_5));
-    if (is_shorter__5Y) {
-      if (result__FVHH) {
+    result__FXIH=read_word__YPF((&__string_5));
+    if (is_shorter__FZ) {
+      if (result__FXIH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
-          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         } else {
-          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         };
       };
     };
-    __tmp__MW5B=result__FVHH;
+    __tmp__UW5B=result__FXIH;
   };
-  if (__tmp__MW5B) {
-    associativity__LU5B=last_string__I0C;
-    if (read_integer__A2P()) {
-      priority__MU5B=((__INTEGER )last_integer__ZRO);
+  if (__tmp__UW5B) {
+    associativity__TU5B=last_string__Q0C;
+    if (read_integer__I2P()) {
+      priority__UU5B=((__INTEGER )last_integer__BSO);
     };
   };
-  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__HU5B)->parent_arrayed_collection__FCZB.upper__45GC <  0)) {
-    arg__NU5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,TRUE__);
-    if (((void *)arg__NU5B == (void *)NULL)) {
-      pos__XLWG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_287));
-      put_position__UOG(pos__XLWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__PU5B)->parent_arrayed_collection__NCZB.upper__GAHC <  0)) {
+    arg__VU5B=read_loc_arg__with_self__QEHB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__VU5B == (void *)NULL)) {
+      pos__ZIXG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_286));
+      put_position__2OG(pos__ZIXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    add_last__05GC(list_arg__HU5B,arg__NU5B);
-    name__JU5B=operator__name__3DO((&__string_83),name__JU5B);
-    if (((void *)associativity__LU5B != (void *)NULL)) {
-      pos__ZLWG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_288));
-      put_position__UOG(pos__ZLWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    add_last__CAHC(list_arg__PU5B,arg__VU5B);
+    name__RU5B=operator__name__FEO((&__string_83),name__RU5B);
+    if (((void *)associativity__TU5B != (void *)NULL)) {
+      pos__1IXG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_287));
+      put_position__2OG(pos__1IXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    arg__NU5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__NU5B != (void *)NULL)) {
-      add_last__05GC(list_arg__HU5B,arg__NU5B);
-      name__JU5B=operator__name__3DO((&__string_81),name__JU5B);
-      if (((void *)associativity__LU5B == (void *)NULL)) {
-        associativity__LU5B=(&__string_6);
-      };
-    } else {
-      name__JU5B=operator__name__3DO((&__string_82),name__JU5B);
-      if (((void *)associativity__LU5B != (void *)NULL)) {
-        pos__1LWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_289));
-        put_position__UOG(pos__1LWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    arg__VU5B=read_loc_arg__with_self__QEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__VU5B != (void *)NULL)) {
+      add_last__CAHC(list_arg__PU5B,arg__VU5B);
+      name__RU5B=operator__name__FEO((&__string_81),name__RU5B);
+      if (((void *)associativity__TU5B == (void *)NULL)) {
+        associativity__TU5B=(&__string_6);
+      };
+    } else {
+      name__RU5B=operator__name__FEO((&__string_82),name__RU5B);
+      if (((void *)associativity__TU5B != (void *)NULL)) {
+        pos__3IXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_288));
+        put_position__2OG(pos__3IXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __tmp__HZ5B=current_position__JXF();
-  __tmp__IZ5B=last_section__X0C;
-  result__WLAC=NULL;
-  ptr__XLAC=((__POINTER )(NULL));
-  typ_id__2LAC= 0;
-  sz__ZLAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
-  if ((sz__ZLAC ==  0)) {
-    result__WLAC=ITM_SLOT_OPERATOR__;
+  __tmp__PZ5B=current_position__RXF();
+  __tmp__QZ5B=last_section__50C;
+  result__4LAC=NULL;
+  ptr__5LAC=((__POINTER )(NULL));
+  typ_id__EMAC= 0;
+  sz__BMAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__BMAC ==  0)) {
+    result__4LAC=ITM_SLOT_OPERATOR__;
   } else {
-    typ_id__2LAC=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZLAC);
-    if ((typ_id__2LAC == (__INTEGER)(-  1))) {
-      a__MREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__NREH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLAC + a__MREH) & (__UINTEGER_32)(~ a__MREH));
-      ptr_table__HVHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NREH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__GVHH=((__POINTER )(NULL));
-      result__IVHH=((__POINTER *)ptr_table__HVHH)[ 0];
-      if ((result__IVHH == (void *)NULL)) {
-        result__IVHH=new_lab__MRJ(new_size__NREH);
-        next__GVHH=(void *)((unsigned long)result__IVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NREH)));
-        ((__POINTER *)next__GVHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HVHH)[ 0]=next__GVHH;
-      } else {
-        next__GVHH=((__POINTER *)result__IVHH)[ 0];
-        if ((next__GVHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IVHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NREH <<  1)) <=  4096)) {
-            next__GVHH=(void *)((unsigned long)result__IVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NREH)));
-          } else {
-            next__GVHH=new_lab__MRJ(new_size__NREH);
-          };
-          ((__POINTER *)next__GVHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HVHH)[ 0]=next__GVHH;
-        } else {
-          ((__POINTER *)result__IVHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GVHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IVHH=next__GVHH;
-        };
-      };
-      ptr__XLAC=result__IVHH;
-    } else {
-      t__RREH=((__UINTEGER_32 )typ_id__2LAC);
-      a__QREH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__PVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZLAC + a__QREH) & (__UINTEGER_32)(~ a__QREH));
-      ptr_table__MVHH=((__POINTER )(&(table_type[(t__RREH)])));
-      lab_type__OVHH=(__UINTEGER_32)(t__RREH |  1);
-      next__LVHH=((__POINTER )(NULL));
-      result__NVHH=((__POINTER *)ptr_table__MVHH)[ 0];
-      if ((result__NVHH == (void *)NULL)) {
-        result__NVHH=new_lab__MRJ(lab_type__OVHH);
-        next__LVHH=(void *)((unsigned long)result__NVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PVHH)));
-        ((__POINTER *)next__LVHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__MVHH)[ 0]=next__LVHH;
-      } else {
-        next__LVHH=((__POINTER *)result__NVHH)[ 0];
-        if ((next__LVHH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NVHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PVHH <<  1)) <=  4096)) {
-            next__LVHH=(void *)((unsigned long)result__NVHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PVHH)));
-          } else {
-            next__LVHH=new_lab__MRJ(lab_type__OVHH);
-          };
-          ((__POINTER *)next__LVHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MVHH)[ 0]=next__LVHH;
-        } else {
-          ((__POINTER *)result__NVHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LVHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__NVHH=next__LVHH;
-        };
-      };
-      ptr__XLAC=result__NVHH;
-    };
-    result__WLAC=((__ITM_SLOT_OPERATOR *)ptr__XLAC);
-    *(result__WLAC) = *(ITM_SLOT_OPERATOR__);
-  };
-  Self__A2HC=((__ITM_SLOT_OPERATOR *)result__WLAC);
-  Self__A2HC->parent_itm_slot__OU5B.parent_named__P5.name__LI=name__JU5B;
-  Self__A2HC->parent_itm_slot__OU5B.parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__HZ5B;
-  Self__A2HC->parent_itm_slot__OU5B.id_section__Y1C=__tmp__IZ5B;
-  Self__B0HC=((__ITM_SLOT_OPERATOR *)result__WLAC);
-  if (((void *)associativity__LU5B == (void *)(&__string_6))) {
-    Self__B0HC->priority_and_level__K0HC=priority__MU5B;
+    typ_id__EMAC=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__BMAC);
+    if ((typ_id__EMAC == (__INTEGER)(-  1))) {
+      a__2SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3SFH=(__UINTEGER_32)((__UINTEGER_32)(sz__BMAC + a__2SFH) & (__UINTEGER_32)(~ a__2SFH));
+      ptr_table__HXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3SFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GXIH=((__POINTER )(NULL));
+      result__IXIH=((__POINTER *)ptr_table__HXIH)[ 0];
+      if ((result__IXIH == (void *)NULL)) {
+        result__IXIH=new_lab__URJ(new_size__3SFH);
+        next__GXIH=(void *)((unsigned long)result__IXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SFH)));
+        ((__POINTER *)next__GXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HXIH)[ 0]=next__GXIH;
+      } else {
+        next__GXIH=((__POINTER *)result__IXIH)[ 0];
+        if ((next__GXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IXIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3SFH <<  1)) <=  4096)) {
+            next__GXIH=(void *)((unsigned long)result__IXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3SFH)));
+          } else {
+            next__GXIH=new_lab__URJ(new_size__3SFH);
+          };
+          ((__POINTER *)next__GXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HXIH)[ 0]=next__GXIH;
+        } else {
+          ((__POINTER *)result__IXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IXIH=next__GXIH;
+        };
+      };
+      ptr__5LAC=result__IXIH;
+    } else {
+      t__BTFH=((__UINTEGER_32 )typ_id__EMAC);
+      a__ATFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BMAC + a__ATFH) & (__UINTEGER_32)(~ a__ATFH));
+      ptr_table__MXIH=((__POINTER )(&(table_type[(t__BTFH)])));
+      lab_type__OXIH=(__UINTEGER_32)(t__BTFH |  1);
+      next__LXIH=((__POINTER )(NULL));
+      result__NXIH=((__POINTER *)ptr_table__MXIH)[ 0];
+      if ((result__NXIH == (void *)NULL)) {
+        result__NXIH=new_lab__URJ(lab_type__OXIH);
+        next__LXIH=(void *)((unsigned long)result__NXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXIH)));
+        ((__POINTER *)next__LXIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MXIH)[ 0]=next__LXIH;
+      } else {
+        next__LXIH=((__POINTER *)result__NXIH)[ 0];
+        if ((next__LXIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NXIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__PXIH <<  1)) <=  4096)) {
+            next__LXIH=(void *)((unsigned long)result__NXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXIH)));
+          } else {
+            next__LXIH=new_lab__URJ(lab_type__OXIH);
+          };
+          ((__POINTER *)next__LXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MXIH)[ 0]=next__LXIH;
+        } else {
+          ((__POINTER *)result__NXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NXIH=next__LXIH;
+        };
+      };
+      ptr__5LAC=result__NXIH;
+    };
+    result__4LAC=((__ITM_SLOT_OPERATOR *)ptr__5LAC);
+    *(result__4LAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__I2HC=((__ITM_SLOT_OPERATOR *)result__4LAC);
+  Self__I2HC->parent_itm_slot__WU5B.parent_named__V5.name__LI=name__RU5B;
+  Self__I2HC->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ=__tmp__PZ5B;
+  Self__I2HC->parent_itm_slot__WU5B.id_section__A2C=__tmp__QZ5B;
+  Self__J0HC=((__ITM_SLOT_OPERATOR *)result__4LAC);
+  if (((void *)associativity__TU5B == (void *)(&__string_6))) {
+    Self__J0HC->priority_and_level__S0HC=priority__UU5B;
   } else {
-    Self__B0HC->priority_and_level__K0HC=(__INTEGER)(- priority__MU5B);
+    Self__J0HC->priority_and_level__S0HC=(__INTEGER)(- priority__UU5B);
   };
-  ((__ITM_SLOT_OPERATOR *)result__WLAC)->pretty_name__V0HC=pretty_name__KU5B;
-  return(result__WLAC);
+  ((__ITM_SLOT_OPERATOR *)result__4LAC)->pretty_name__30HC=pretty_name__SU5B;
+  return(result__4LAC);
 }
 
-static void add_last__05GC(__FAST_ARRAYoITM_ARGUMENTo *Self__15GC,void *element__25GC)
+static void add_last__CAHC(__FAST_ARRAYoITM_ARGUMENTo *Self__DAHC,void *element__EAHC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__35GC,__tmp__GBHC,__tmp__OHTD,Self__RSXE;
-  __BOOLEAN __tmp__NAHC;
-  void **__tmp__FBHC,**new__0GTD;
-  new_capacity__35GC= 0;
-  if (((__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1) <= (__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC -  1))) {
-    Self__15GC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1);
-    __tmp__NAHC=TRUE__;
+  __INTEGER new_capacity__FAHC,__tmp__OBHC,__tmp__WHTD,Self__USXE;
+  __BOOLEAN __tmp__VAHC;
+  void **__tmp__NBHC,**new__CHTD;
+  new_capacity__FAHC= 0;
+  if (((__INTEGER)(Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC +  1) <= (__INTEGER)(Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC -  1))) {
+    Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC=(__INTEGER)(Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC +  1);
+    __tmp__VAHC=TRUE__;
   } else {
-    __tmp__NAHC=FALSE__;
-  };
-  if ((! __tmp__NAHC)) {
-    if ((Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC ==  0)) {
-      Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC=create__WPBD( 2);
-      Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC= 2;
-      Self__15GC->parent_arrayed_collection__FCZB.upper__45GC= 0;
-    } else {
-      new_capacity__35GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC <<  1);
-      __tmp__FBHC=Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC;
-      __tmp__GBHC=Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC;
-      new__0GTD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__FBHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__GBHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__35GC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__OHTD=(__INTEGER)(new_capacity__35GC -  1);
-      Self__RSXE=__tmp__GBHC;
-      while ((Self__RSXE <= __tmp__OHTD)) {
-        new__0GTD[Self__RSXE]=NULL;
-        Self__RSXE=(__INTEGER)(Self__RSXE +  1);
-      };
-      Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC=new__0GTD;
-      Self__15GC->parent_arrayed_collection__FCZB.capacity__AAHC=new_capacity__35GC;
-      Self__15GC->parent_arrayed_collection__FCZB.upper__45GC=(__INTEGER)(Self__15GC->parent_arrayed_collection__FCZB.upper__45GC +  1);
-    };
-  };
-  ((void **)Self__15GC->parent_arrayed_collection__FCZB.storage__2AHC)[Self__15GC->parent_arrayed_collection__FCZB.upper__45GC]=element__25GC;
+    __tmp__VAHC=FALSE__;
+  };
+  if ((! __tmp__VAHC)) {
+    if ((Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC ==  0)) {
+      Self__DAHC->parent_arrayed_collection__NCZB.storage__EBHC=create__4PBD( 2);
+      Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC= 2;
+      Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC= 0;
+    } else {
+      new_capacity__FAHC=(__INTEGER)(Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC <<  1);
+      __tmp__NBHC=Self__DAHC->parent_arrayed_collection__NCZB.storage__EBHC;
+      __tmp__OBHC=Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC;
+      new__CHTD=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__NBHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__OBHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FAHC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__WHTD=(__INTEGER)(new_capacity__FAHC -  1);
+      Self__USXE=__tmp__OBHC;
+      while ((Self__USXE <= __tmp__WHTD)) {
+        new__CHTD[Self__USXE]=NULL;
+        Self__USXE=(__INTEGER)(Self__USXE +  1);
+      };
+      Self__DAHC->parent_arrayed_collection__NCZB.storage__EBHC=new__CHTD;
+      Self__DAHC->parent_arrayed_collection__NCZB.capacity__IAHC=new_capacity__FAHC;
+      Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC=(__INTEGER)(Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC +  1);
+    };
+  };
+  ((void **)Self__DAHC->parent_arrayed_collection__NCZB.storage__EBHC)[Self__DAHC->parent_arrayed_collection__NCZB.upper__GAHC]=element__EAHC;
 }
 
-static void* read_slot_keyword__SZ5B(void *list_arg__UZ5B)
+static void* read_slot_keyword__0Z5B(void *list_arg__2Z5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  void *n__WZ5B,*result__AOP;
-  void *arg__XZ5B;
-  void *result__YZ5B;
-  __POSITION pos__XNWG,pos__ZNWG,p__0VHH;
-  void *result__QQP;
-  void *sec__1VHH;
-  __ITM_SLOT *result__QVHH,*Self__YVHH;
-  __POINTER ptr__RVHH,ptr_table__3VHH,next__2VHH,result__4VHH;
-  __POINTER ptr_table__CWHH,next__BWHH,result__DWHH;
-  __INTEGER typ_id__SVHH;
-  __UINTEGER_32 sz__TVHH,a__UVHH,new_size__VVHH,t__WVHH,a__XVHH;
-  __UINTEGER_32 new_size__FWHH,lab_type__EWHH;
-  __FAST_ARRAYoSTRINGo *Self__C3AB,*Self__Y3AB;
-  n__WZ5B=NULL;
-  arg__XZ5B=NULL;
-  result__YZ5B=NULL;
-  if (read_identifier__LAL()) {
-    short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-    result__AOP=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__BOP)->parent_arrayed_collection__DKC.upper__GKC <  0)) {
-      result__AOP=create__NBB( 128);
-    } else {
-      Self__C3AB=((__FAST_ARRAYoSTRINGo *)free__BOP);
-      result__AOP=((void **)Self__C3AB->parent_arrayed_collection__DKC.storage__XGT)[Self__C3AB->parent_arrayed_collection__DKC.upper__GKC];
-      Self__Y3AB=((__FAST_ARRAYoSTRINGo *)free__BOP);
-      Self__Y3AB->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__Y3AB->parent_arrayed_collection__DKC.upper__GKC -  1);
-    };
-    n__WZ5B=result__AOP;
-    copy__ZCS(result__AOP,last_string__I0C);
-    arg__XZ5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
-    if (((void *)arg__XZ5B != (void *)NULL)) {
-      add_last__05GC(list_arg__UZ5B,arg__XZ5B);
-      if (read_identifier__LAL()) {
-        if (((void *)((__SECTION_ *)last_section__X0C)->name__CZDC == (void *)(&__string_30))) {
-          pos__XNWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_290));
-          put_position__UOG(pos__XNWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+  void *n__4Z5B,*result__IOP;
+  void *arg__5Z5B;
+  void *result__A05B;
+  __POSITION pos__ZKXG,pos__1KXG,p__0XIH;
+  void *result__YQP;
+  void *sec__1XIH;
+  __ITM_SLOT *result__QXIH,*Self__YXIH;
+  __POINTER ptr__RXIH,ptr_table__3XIH,next__2XIH,result__4XIH;
+  __POINTER ptr_table__CYIH,next__BYIH,result__DYIH;
+  __INTEGER typ_id__SXIH;
+  __UINTEGER_32 sz__TXIH,a__UXIH,new_size__VXIH,t__WXIH,a__XXIH;
+  __UINTEGER_32 new_size__FYIH,lab_type__EYIH;
+  __FAST_ARRAYoSTRINGo *Self__K3AB,*Self__A4AB;
+  n__4Z5B=NULL;
+  arg__5Z5B=NULL;
+  result__A05B=NULL;
+  if (read_identifier__TAL()) {
+    short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+    result__IOP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__JOP)->parent_arrayed_collection__LKC.upper__OKC <  0)) {
+      result__IOP=create__TBB( 128);
+    } else {
+      Self__K3AB=((__FAST_ARRAYoSTRINGo *)free__JOP);
+      result__IOP=((void **)Self__K3AB->parent_arrayed_collection__LKC.storage__5GT)[Self__K3AB->parent_arrayed_collection__LKC.upper__OKC];
+      Self__A4AB=((__FAST_ARRAYoSTRINGo *)free__JOP);
+      Self__A4AB->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(Self__A4AB->parent_arrayed_collection__LKC.upper__OKC -  1);
+    };
+    n__4Z5B=result__IOP;
+    copy__BDS(result__IOP,last_string__Q0C);
+    arg__5Z5B=read_loc_arg__with_self__QEHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__5Z5B != (void *)NULL)) {
+      add_last__CAHC(list_arg__2Z5B,arg__5Z5B);
+      if (read_identifier__TAL()) {
+        if (((void *)((__SECTION_ *)last_section__50C)->name__KZDC == (void *)(&__string_30))) {
+          pos__ZKXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_289));
+          put_position__2OG(pos__ZKXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
         do {
-          short__token__to__LBD((&__string_130),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-          append__BOS(n__WZ5B,(&__string_112));
-          append__BOS(n__WZ5B,last_string__I0C);
-          arg__XZ5B=read_loc_arg__with_self__IEHB(PARSER__,FALSE__,FALSE__);
-          if (((void *)arg__XZ5B == (void *)NULL)) {
-            pos__ZNWG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_164));
-            put_position__UOG(pos__ZNWG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          short__token__to__TBD((&__string_130),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          append__JOS(n__4Z5B,(&__string_112));
+          append__JOS(n__4Z5B,last_string__Q0C);
+          arg__5Z5B=read_loc_arg__with_self__QEHB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__5Z5B == (void *)NULL)) {
+            pos__1KXG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_166));
+            put_position__2OG(pos__1KXG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__05GC(list_arg__UZ5B,arg__XZ5B);
-        } while (read_identifier__LAL());
-      };
-    };
-    result__QQP=get__IWB(result__AOP);
-    add_last__ASV(free__BOP,result__AOP);
-    ((__STRING *)result__AOP)->count__WFC= 0;
-    p__0VHH=current_position__JXF();
-    sec__1VHH=last_section__X0C;
-    result__QVHH=NULL;
-    ptr__RVHH=((__POINTER )(NULL));
-    typ_id__SVHH= 0;
-    sz__TVHH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__TVHH ==  0)) {
-      result__QVHH=ITM_SLOT__;
-    } else {
-      typ_id__SVHH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TVHH);
-      if ((typ_id__SVHH == (__INTEGER)(-  1))) {
-        a__UVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVHH + a__UVHH) & (__UINTEGER_32)(~ a__UVHH));
-        ptr_table__3VHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VVHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__2VHH=((__POINTER )(NULL));
-        result__4VHH=((__POINTER *)ptr_table__3VHH)[ 0];
-        if ((result__4VHH == (void *)NULL)) {
-          result__4VHH=new_lab__MRJ(new_size__VVHH);
-          next__2VHH=(void *)((unsigned long)result__4VHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVHH)));
-          ((__POINTER *)next__2VHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3VHH)[ 0]=next__2VHH;
-        } else {
-          next__2VHH=((__POINTER *)result__4VHH)[ 0];
-          if ((next__2VHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4VHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VVHH <<  1)) <=  4096)) {
-              next__2VHH=(void *)((unsigned long)result__4VHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVHH)));
+          add_last__CAHC(list_arg__2Z5B,arg__5Z5B);
+        } while (read_identifier__TAL());
+      };
+    };
+    result__YQP=get__QWB(result__IOP);
+    add_last__ISV(free__JOP,result__IOP);
+    ((__STRING *)result__IOP)->count__4FC= 0;
+    p__0XIH=current_position__RXF();
+    sec__1XIH=last_section__50C;
+    result__QXIH=NULL;
+    ptr__RXIH=((__POINTER )(NULL));
+    typ_id__SXIH= 0;
+    sz__TXIH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__TXIH ==  0)) {
+      result__QXIH=ITM_SLOT__;
+    } else {
+      typ_id__SXIH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__TXIH);
+      if ((typ_id__SXIH == (__INTEGER)(-  1))) {
+        a__UXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TXIH + a__UXIH) & (__UINTEGER_32)(~ a__UXIH));
+        ptr_table__3XIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VXIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2XIH=((__POINTER )(NULL));
+        result__4XIH=((__POINTER *)ptr_table__3XIH)[ 0];
+        if ((result__4XIH == (void *)NULL)) {
+          result__4XIH=new_lab__URJ(new_size__VXIH);
+          next__2XIH=(void *)((unsigned long)result__4XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VXIH)));
+          ((__POINTER *)next__2XIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3XIH)[ 0]=next__2XIH;
+        } else {
+          next__2XIH=((__POINTER *)result__4XIH)[ 0];
+          if ((next__2XIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4XIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VXIH <<  1)) <=  4096)) {
+              next__2XIH=(void *)((unsigned long)result__4XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VXIH)));
             } else {
-              next__2VHH=new_lab__MRJ(new_size__VVHH);
-            };
-            ((__POINTER *)next__2VHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3VHH)[ 0]=next__2VHH;
-          } else {
-            ((__POINTER *)result__4VHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2VHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__4VHH=next__2VHH;
-          };
-        };
-        ptr__RVHH=result__4VHH;
-      } else {
-        t__WVHH=((__UINTEGER_32 )typ_id__SVHH);
-        a__XVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__FWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVHH + a__XVHH) & (__UINTEGER_32)(~ a__XVHH));
-        ptr_table__CWHH=((__POINTER )(&(table_type[(t__WVHH)])));
-        lab_type__EWHH=(__UINTEGER_32)(t__WVHH |  1);
-        next__BWHH=((__POINTER )(NULL));
-        result__DWHH=((__POINTER *)ptr_table__CWHH)[ 0];
-        if ((result__DWHH == (void *)NULL)) {
-          result__DWHH=new_lab__MRJ(lab_type__EWHH);
-          next__BWHH=(void *)((unsigned long)result__DWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWHH)));
-          ((__POINTER *)next__BWHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CWHH)[ 0]=next__BWHH;
-        } else {
-          next__BWHH=((__POINTER *)result__DWHH)[ 0];
-          if ((next__BWHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FWHH <<  1)) <=  4096)) {
-              next__BWHH=(void *)((unsigned long)result__DWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWHH)));
+              next__2XIH=new_lab__URJ(new_size__VXIH);
+            };
+            ((__POINTER *)next__2XIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3XIH)[ 0]=next__2XIH;
+          } else {
+            ((__POINTER *)result__4XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4XIH=next__2XIH;
+          };
+        };
+        ptr__RXIH=result__4XIH;
+      } else {
+        t__WXIH=((__UINTEGER_32 )typ_id__SXIH);
+        a__XXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TXIH + a__XXIH) & (__UINTEGER_32)(~ a__XXIH));
+        ptr_table__CYIH=((__POINTER )(&(table_type[(t__WXIH)])));
+        lab_type__EYIH=(__UINTEGER_32)(t__WXIH |  1);
+        next__BYIH=((__POINTER )(NULL));
+        result__DYIH=((__POINTER *)ptr_table__CYIH)[ 0];
+        if ((result__DYIH == (void *)NULL)) {
+          result__DYIH=new_lab__URJ(lab_type__EYIH);
+          next__BYIH=(void *)((unsigned long)result__DYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYIH)));
+          ((__POINTER *)next__BYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CYIH)[ 0]=next__BYIH;
+        } else {
+          next__BYIH=((__POINTER *)result__DYIH)[ 0];
+          if ((next__BYIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DYIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FYIH <<  1)) <=  4096)) {
+              next__BYIH=(void *)((unsigned long)result__DYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYIH)));
             } else {
-              next__BWHH=new_lab__MRJ(lab_type__EWHH);
+              next__BYIH=new_lab__URJ(lab_type__EYIH);
             };
-            ((__POINTER *)next__BWHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CWHH)[ 0]=next__BWHH;
+            ((__POINTER *)next__BYIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CYIH)[ 0]=next__BYIH;
           } else {
-            ((__POINTER *)result__DWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DWHH=next__BWHH;
+            ((__POINTER *)result__DYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DYIH=next__BYIH;
           };
         };
-        ptr__RVHH=result__DWHH;
+        ptr__RXIH=result__DYIH;
       };
-      result__QVHH=((__ITM_SLOT *)ptr__RVHH);
-      *(result__QVHH) = *(ITM_SLOT__);
+      result__QXIH=((__ITM_SLOT *)ptr__RXIH);
+      *(result__QXIH) = *(ITM_SLOT__);
     };
-    Self__YVHH=((__ITM_SLOT *)result__QVHH);
-    Self__YVHH->parent_named__P5.name__LI=result__QQP;
-    Self__YVHH->parent_named__P5.parent_itm_object__4.position__NDJ=p__0VHH;
-    Self__YVHH->id_section__Y1C=sec__1VHH;
-    result__YZ5B=result__QVHH;
+    Self__YXIH=((__ITM_SLOT *)result__QXIH);
+    Self__YXIH->parent_named__V5.name__LI=result__YQP;
+    Self__YXIH->parent_named__V5.parent_itm_object__4.position__VDJ=p__0XIH;
+    Self__YXIH->id_section__A2C=sec__1XIH;
+    result__A05B=result__QXIH;
   };
-  return(result__YZ5B);
+  return(result__A05B);
 }
 
-static void** create__WPBD(__INTEGER nb_elements__YPBD)
+static void** create__4PBD(__INTEGER nb_elements__AQBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__ZSCH,a__4SCH,new_size__0SCH,new_size2__1SCH,a__2REH;
-  __UINTEGER_32 new_size__3REH;
-  __POINTER result__YSCH,ptr_table__HWHH,next__GWHH,result__IWHH;
-  void *result__LWHH;
-  __INTEGER Self__RFXD;
-  void **Result__SDGD;
-  sz__ZSCH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YPBD * ((__INTEGER )(sizeof(void *)))));
-  result__YSCH=((__POINTER )(NULL));
-  a__4SCH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__0SCH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSCH + a__4SCH) & (__UINTEGER_32)(~ a__4SCH));
-  new_size2__1SCH=(__UINTEGER_32)(new_size__0SCH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__1SCH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__2REH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__3REH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1SCH + a__2REH) & (__UINTEGER_32)(~ a__2REH));
-    ptr_table__HWHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3REH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__GWHH=((__POINTER )(NULL));
-    result__IWHH=((__POINTER *)ptr_table__HWHH)[ 0];
-    if ((result__IWHH == (void *)NULL)) {
-      result__IWHH=new_lab__MRJ(new_size__3REH);
-      next__GWHH=(void *)((unsigned long)result__IWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3REH)));
-      ((__POINTER *)next__GWHH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__HWHH)[ 0]=next__GWHH;
-    } else {
-      next__GWHH=((__POINTER *)result__IWHH)[ 0];
-      if ((next__GWHH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3REH <<  1)) <=  4096)) {
-          next__GWHH=(void *)((unsigned long)result__IWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3REH)));
-        } else {
-          next__GWHH=new_lab__MRJ(new_size__3REH);
-        };
-        ((__POINTER *)next__GWHH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HWHH)[ 0]=next__GWHH;
-      } else {
-        ((__POINTER *)result__IWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__IWHH=next__GWHH;
-      };
-    };
-    ((__POINTER *)result__IWHH)[ 0]=((__POINTER ) 3);
-    result__YSCH=(void *)((unsigned long)result__IWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__PSDH,a__USDH,new_size__QSDH,new_size2__RSDH,a__MTFH;
+  __UINTEGER_32 new_size__NTFH;
+  __POINTER result__OSDH,ptr_table__HYIH,next__GYIH,result__IYIH;
+  void *result__LYIH;
+  __INTEGER Self__ZFXD;
+  void **Result__0DGD;
+  sz__PSDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__AQBD * ((__INTEGER )(sizeof(void *)))));
+  result__OSDH=((__POINTER )(NULL));
+  a__USDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__QSDH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSDH + a__USDH) & (__UINTEGER_32)(~ a__USDH));
+  new_size2__RSDH=(__UINTEGER_32)(new_size__QSDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__RSDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NTFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RSDH + a__MTFH) & (__UINTEGER_32)(~ a__MTFH));
+    ptr_table__HYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NTFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__GYIH=((__POINTER )(NULL));
+    result__IYIH=((__POINTER *)ptr_table__HYIH)[ 0];
+    if ((result__IYIH == (void *)NULL)) {
+      result__IYIH=new_lab__URJ(new_size__NTFH);
+      next__GYIH=(void *)((unsigned long)result__IYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTFH)));
+      ((__POINTER *)next__GYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__HYIH)[ 0]=next__GYIH;
+    } else {
+      next__GYIH=((__POINTER *)result__IYIH)[ 0];
+      if ((next__GYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IYIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__NTFH <<  1)) <=  4096)) {
+          next__GYIH=(void *)((unsigned long)result__IYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTFH)));
+        } else {
+          next__GYIH=new_lab__URJ(new_size__NTFH);
+        };
+        ((__POINTER *)next__GYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HYIH)[ 0]=next__GYIH;
+      } else {
+        ((__POINTER *)result__IYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__IYIH=next__GYIH;
+      };
+    };
+    ((__POINTER *)result__IYIH)[ 0]=((__POINTER ) 3);
+    result__OSDH=(void *)((unsigned long)result__IYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__LWHH=first_free__XDVB;
-    while ((((void *)result__LWHH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LWHH)->map_size_and_id__ITB &  4294967292LU) < new_size__0SCH))) {
-      result__LWHH=((__MEMORY *)result__LWHH)->map_next_free__JTB;
+    result__LYIH=first_free__5DVB;
+    while ((((void *)result__LYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LYIH)->map_size_and_id__QTB &  4294967292LU) < new_size__QSDH))) {
+      result__LYIH=((__MEMORY *)result__LYIH)->map_next_free__RTB;
     };
-    if (((void *)result__LWHH == (void *)NULL)) {
-      result__LWHH=new_page__OA5();
+    if (((void *)result__LYIH == (void *)NULL)) {
+      result__LYIH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__LWHH,new_size__0SCH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LWHH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__YSCH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LWHH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__LYIH,new_size__QSDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LYIH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__OSDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__SDGD=((void **)result__YSCH);
-  Self__RFXD=(__INTEGER)(nb_elements__YPBD -  1);
-  while ((Self__RFXD >=  0)) {
-    Result__SDGD[Self__RFXD]=NULL;
-    Self__RFXD=(__INTEGER)(Self__RFXD -  1);
+  Result__0DGD=((void **)result__OSDH);
+  Self__ZFXD=(__INTEGER)(nb_elements__AQBD -  1);
+  while ((Self__ZFXD >=  0)) {
+    Result__0DGD[Self__ZFXD]=NULL;
+    Self__ZFXD=(__INTEGER)(Self__ZFXD -  1);
   };
-  return(Result__SDGD);
+  return(Result__0DGD);
 }
 
-static void set_argument_list__VCHC(__ITM_SLOT *Self__WCHC,void *p__XCHC)
+static void set_argument_list__3CHC(__ITM_SLOT *Self__4CHC,void *p__5CHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__5CHC,*__tmp__RDHC,*__tmp__4DHC;
-  __INTEGER __tmp__ADHC;
-  __POSITION __tmp__SDHC,__tmp__5DHC;
-  __SECTION_ *Self__UM0G;
-  __BOOLEAN __tmp__EDHC;
-  __FAST_ARRAYoITM_ARGUMENTo *Self__CSEH,*Self__VWID;
-  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC)->parent_arrayed_collection__FCZB.upper__45GC +  1) >  1)) {
-    __tmp__EDHC=TRUE__;
+  void *__tmp__HDHC,*__tmp__ZDHC,*__tmp__GEHC;
+  __INTEGER __tmp__IDHC;
+  __POSITION __tmp__0DHC,__tmp__HEHC;
+  __SECTION_ *Self__DK1G;
+  __BOOLEAN __tmp__MDHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__STFH,*Self__3WID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__5CHC)->parent_arrayed_collection__NCZB.upper__GAHC +  1) >  1)) {
+    __tmp__MDHC=TRUE__;
   } else {
-    __tmp__5CHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC)->parent_arrayed_collection__FCZB.storage__2AHC)[ 0];
-    if (((struct ___OBJ *)__tmp__5CHC)->__id==__ITM_ARG__) {
-      __tmp__ADHC= 1;
+    __tmp__HDHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__5CHC)->parent_arrayed_collection__NCZB.storage__EBHC)[ 0];
+    if (((struct ___OBJ *)__tmp__HDHC)->__id==__ITM_ARG__) {
+      __tmp__IDHC= 1;
     } else {
-      __tmp__ADHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__5CHC)->name__LBPF)->parent_arrayed_collection__H5I.upper__15OD +  1);
+      __tmp__IDHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__HDHC)->name__PNPF)->parent_arrayed_collection__P5I.upper__DAPD +  1);
     };
-    __tmp__EDHC=(__tmp__ADHC >  1);
+    __tmp__MDHC=(__tmp__IDHC >  1);
   };
-  if (__tmp__EDHC) {
-    if (((void *)((__SECTION_ *)Self__WCHC->id_section__Y1C)->name__CZDC == (void *)(&__string_25))) {
-      Self__CSEH=((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC);
-      __tmp__RDHC=((void **)Self__CSEH->parent_arrayed_collection__FCZB.storage__2AHC)[Self__CSEH->parent_arrayed_collection__FCZB.upper__45GC];
-      if (((struct ___OBJ *)__tmp__RDHC)->__id==__ITM_ARG__) {
-        __tmp__SDHC=((__ITM_ARG *)__tmp__RDHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
+  if (__tmp__MDHC) {
+    if (((void *)((__SECTION_ *)Self__4CHC->id_section__A2C)->name__KZDC == (void *)(&__string_25))) {
+      Self__STFH=((__FAST_ARRAYoITM_ARGUMENTo *)p__5CHC);
+      __tmp__ZDHC=((void **)Self__STFH->parent_arrayed_collection__NCZB.storage__EBHC)[Self__STFH->parent_arrayed_collection__NCZB.upper__GAHC];
+      if (((struct ___OBJ *)__tmp__ZDHC)->__id==__ITM_ARG__) {
+        __tmp__0DHC=((__ITM_ARG *)__tmp__ZDHC)->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ;
       } else {
-        __tmp__SDHC=((__ITM_ARGS *)__tmp__RDHC)->parent_itm_argument__DDFE.parent_itm_code__S4M.position__NDJ;
+        __tmp__0DHC=((__ITM_ARGS *)__tmp__ZDHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
       };
-      put_error__text__KNG( 1,(&__string_234));
-      put_position__UOG(__tmp__SDHC);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+      put_error__text__SNG( 1,(&__string_232));
+      put_position__2OG(__tmp__0DHC);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    Self__UM0G=((__SECTION_ *)Self__WCHC->id_section__Y1C);
-    if ((((void *)Self__UM0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__UM0G->name__CZDC == (void *)(&__string_24)))) {
-      Self__VWID=((__FAST_ARRAYoITM_ARGUMENTo *)p__XCHC);
-      __tmp__4DHC=((void **)Self__VWID->parent_arrayed_collection__FCZB.storage__2AHC)[Self__VWID->parent_arrayed_collection__FCZB.upper__45GC];
-      if (((struct ___OBJ *)__tmp__4DHC)->__id==__ITM_ARG__) {
-        __tmp__5DHC=((__ITM_ARG *)__tmp__4DHC)->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ;
+    Self__DK1G=((__SECTION_ *)Self__4CHC->id_section__A2C);
+    if ((((void *)Self__DK1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__DK1G->name__KZDC == (void *)(&__string_24)))) {
+      Self__3WID=((__FAST_ARRAYoITM_ARGUMENTo *)p__5CHC);
+      __tmp__GEHC=((void **)Self__3WID->parent_arrayed_collection__NCZB.storage__EBHC)[Self__3WID->parent_arrayed_collection__NCZB.upper__GAHC];
+      if (((struct ___OBJ *)__tmp__GEHC)->__id==__ITM_ARG__) {
+        __tmp__HEHC=((__ITM_ARG *)__tmp__GEHC)->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ;
       } else {
-        __tmp__5DHC=((__ITM_ARGS *)__tmp__4DHC)->parent_itm_argument__DDFE.parent_itm_code__S4M.position__NDJ;
+        __tmp__HEHC=((__ITM_ARGS *)__tmp__GEHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
       };
-      put_error__text__KNG( 1,(&__string_235));
-      put_position__UOG(__tmp__5DHC);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+      put_error__text__SNG( 1,(&__string_233));
+      put_position__2OG(__tmp__HEHC);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__WCHC->argument_list__GEHC=p__XCHC;
+  Self__4CHC->argument_list__OEHC=p__5CHC;
 }
 
-static __ITM_TYPE_MULTI* get__CJP(void *lt__EJP)
+static __ITM_TYPE_MULTI* get__KJP(void *lt__MJP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __ITM_TYPE_MULTI *result__GJP,*__tmp__YKP,*result__X2HB;
-  __INTEGER idx__HJP,typ_id__32HB,new_capacity__VZAB,__tmp__Z0AB;
-  __INTEGER __tmp__QNFC,Self__AYVD;
-  void *__tmp__XKP;
-  __POINTER ptr__Y2HB,ptr_table__PWHH,next__OWHH,result__QWHH;
-  __POINTER ptr_table__UWHH,next__TWHH,result__VWHH;
-  __UINTEGER_32 sz__02HB,a__MSEH,new_size__NSEH,t__RSEH,a__QSEH;
-  __UINTEGER_32 new_size__XWHH,lab_type__WWHH;
-  __FAST_ARRAYoITM_TYPE_MULTIo *Self__TZAB;
-  __BOOLEAN __tmp__D0AB;
-  void **__tmp__Y0AB,**new__2MFC;
-  result__GJP=NULL;
-  idx__HJP= 0;
-  while (((idx__HJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.upper__WJP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.storage__I2V)[idx__HJP])->list_type__AKP != (void *)lt__EJP))) {
-    idx__HJP=(__INTEGER)(idx__HJP +  1);
-  };
-  if ((idx__HJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.upper__WJP)) {
-    __tmp__XKP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP)->parent_arrayed_collection__MJP.storage__I2V)[idx__HJP];
-    if (__tmp__XKP==NULL) {
-      __tmp__YKP=NULL;
-    } else {
-      __tmp__YKP=((__ITM_TYPE_MULTI *)__tmp__XKP);
-    };
-    result__GJP=__tmp__YKP;
+  __ITM_TYPE_MULTI *result__OJP,*__tmp__ALP,*result__52HB;
+  __INTEGER idx__PJP,typ_id__F3HB,new_capacity__3ZAB,__tmp__B1AB;
+  __INTEGER __tmp__YNFC,Self__IYVD;
+  void *__tmp__5KP;
+  __POINTER ptr__A3HB,ptr_table__PYIH,next__OYIH,result__QYIH;
+  __POINTER ptr_table__UYIH,next__TYIH,result__VYIH;
+  __UINTEGER_32 sz__C3HB,a__2TFH,new_size__3TFH,t__BUFH,a__AUFH;
+  __UINTEGER_32 new_size__XYIH,lab_type__WYIH;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__1ZAB;
+  __BOOLEAN __tmp__L0AB;
+  void **__tmp__A1AB,**new__ENFC;
+  result__OJP=NULL;
+  idx__PJP= 0;
+  while (((idx__PJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__VJP)->parent_arrayed_collection__UJP.upper__4JP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__VJP)->parent_arrayed_collection__UJP.storage__Q2V)[idx__PJP])->list_type__IKP != (void *)lt__MJP))) {
+    idx__PJP=(__INTEGER)(idx__PJP +  1);
+  };
+  if ((idx__PJP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__VJP)->parent_arrayed_collection__UJP.upper__4JP)) {
+    __tmp__5KP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__VJP)->parent_arrayed_collection__UJP.storage__Q2V)[idx__PJP];
+    if (__tmp__5KP==NULL) {
+      __tmp__ALP=NULL;
+    } else {
+      __tmp__ALP=((__ITM_TYPE_MULTI *)__tmp__5KP);
+    };
+    result__OJP=__tmp__ALP;
   } else {
-    result__X2HB=NULL;
-    ptr__Y2HB=((__POINTER )(NULL));
-    typ_id__32HB= 0;
-    sz__02HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
-    if ((sz__02HB ==  0)) {
-      result__X2HB=ITM_TYPE_MULTI__;
-    } else {
-      typ_id__32HB=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__02HB);
-      if ((typ_id__32HB == (__INTEGER)(-  1))) {
-        a__MSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NSEH=(__UINTEGER_32)((__UINTEGER_32)(sz__02HB + a__MSEH) & (__UINTEGER_32)(~ a__MSEH));
-        ptr_table__PWHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NSEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__OWHH=((__POINTER )(NULL));
-        result__QWHH=((__POINTER *)ptr_table__PWHH)[ 0];
-        if ((result__QWHH == (void *)NULL)) {
-          result__QWHH=new_lab__MRJ(new_size__NSEH);
-          next__OWHH=(void *)((unsigned long)result__QWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSEH)));
-          ((__POINTER *)next__OWHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PWHH)[ 0]=next__OWHH;
-        } else {
-          next__OWHH=((__POINTER *)result__QWHH)[ 0];
-          if ((next__OWHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NSEH <<  1)) <=  4096)) {
-              next__OWHH=(void *)((unsigned long)result__QWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NSEH)));
+    result__52HB=NULL;
+    ptr__A3HB=((__POINTER )(NULL));
+    typ_id__F3HB= 0;
+    sz__C3HB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__C3HB ==  0)) {
+      result__52HB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__F3HB=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__C3HB);
+      if ((typ_id__F3HB == (__INTEGER)(-  1))) {
+        a__2TFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3TFH=(__UINTEGER_32)((__UINTEGER_32)(sz__C3HB + a__2TFH) & (__UINTEGER_32)(~ a__2TFH));
+        ptr_table__PYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3TFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__OYIH=((__POINTER )(NULL));
+        result__QYIH=((__POINTER *)ptr_table__PYIH)[ 0];
+        if ((result__QYIH == (void *)NULL)) {
+          result__QYIH=new_lab__URJ(new_size__3TFH);
+          next__OYIH=(void *)((unsigned long)result__QYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3TFH)));
+          ((__POINTER *)next__OYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PYIH)[ 0]=next__OYIH;
+        } else {
+          next__OYIH=((__POINTER *)result__QYIH)[ 0];
+          if ((next__OYIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QYIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3TFH <<  1)) <=  4096)) {
+              next__OYIH=(void *)((unsigned long)result__QYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3TFH)));
             } else {
-              next__OWHH=new_lab__MRJ(new_size__NSEH);
-            };
-            ((__POINTER *)next__OWHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PWHH)[ 0]=next__OWHH;
-          } else {
-            ((__POINTER *)result__QWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QWHH=next__OWHH;
-          };
-        };
-        ptr__Y2HB=result__QWHH;
-      } else {
-        t__RSEH=((__UINTEGER_32 )typ_id__32HB);
-        a__QSEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__XWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__02HB + a__QSEH) & (__UINTEGER_32)(~ a__QSEH));
-        ptr_table__UWHH=((__POINTER )(&(table_type[(t__RSEH)])));
-        lab_type__WWHH=(__UINTEGER_32)(t__RSEH |  1);
-        next__TWHH=((__POINTER )(NULL));
-        result__VWHH=((__POINTER *)ptr_table__UWHH)[ 0];
-        if ((result__VWHH == (void *)NULL)) {
-          result__VWHH=new_lab__MRJ(lab_type__WWHH);
-          next__TWHH=(void *)((unsigned long)result__VWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XWHH)));
-          ((__POINTER *)next__TWHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UWHH)[ 0]=next__TWHH;
-        } else {
-          next__TWHH=((__POINTER *)result__VWHH)[ 0];
-          if ((next__TWHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VWHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XWHH <<  1)) <=  4096)) {
-              next__TWHH=(void *)((unsigned long)result__VWHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XWHH)));
+              next__OYIH=new_lab__URJ(new_size__3TFH);
+            };
+            ((__POINTER *)next__OYIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PYIH)[ 0]=next__OYIH;
+          } else {
+            ((__POINTER *)result__QYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QYIH=next__OYIH;
+          };
+        };
+        ptr__A3HB=result__QYIH;
+      } else {
+        t__BUFH=((__UINTEGER_32 )typ_id__F3HB);
+        a__AUFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__C3HB + a__AUFH) & (__UINTEGER_32)(~ a__AUFH));
+        ptr_table__UYIH=((__POINTER )(&(table_type[(t__BUFH)])));
+        lab_type__WYIH=(__UINTEGER_32)(t__BUFH |  1);
+        next__TYIH=((__POINTER )(NULL));
+        result__VYIH=((__POINTER *)ptr_table__UYIH)[ 0];
+        if ((result__VYIH == (void *)NULL)) {
+          result__VYIH=new_lab__URJ(lab_type__WYIH);
+          next__TYIH=(void *)((unsigned long)result__VYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYIH)));
+          ((__POINTER *)next__TYIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UYIH)[ 0]=next__TYIH;
+        } else {
+          next__TYIH=((__POINTER *)result__VYIH)[ 0];
+          if ((next__TYIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VYIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XYIH <<  1)) <=  4096)) {
+              next__TYIH=(void *)((unsigned long)result__VYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYIH)));
             } else {
-              next__TWHH=new_lab__MRJ(lab_type__WWHH);
+              next__TYIH=new_lab__URJ(lab_type__WYIH);
             };
-            ((__POINTER *)next__TWHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UWHH)[ 0]=next__TWHH;
+            ((__POINTER *)next__TYIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UYIH)[ 0]=next__TYIH;
           } else {
-            ((__POINTER *)result__VWHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TWHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VWHH=next__TWHH;
+            ((__POINTER *)result__VYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VYIH=next__TYIH;
           };
         };
-        ptr__Y2HB=result__VWHH;
+        ptr__A3HB=result__VYIH;
       };
-      result__X2HB=((__ITM_TYPE_MULTI *)ptr__Y2HB);
-      *(result__X2HB) = *(ITM_TYPE_MULTI__);
+      result__52HB=((__ITM_TYPE_MULTI *)ptr__A3HB);
+      *(result__52HB) = *(ITM_TYPE_MULTI__);
     };
-    ((__ITM_TYPE_MULTI *)result__X2HB)->list_type__AKP=lt__EJP;
-    result__GJP=result__X2HB;
-    Self__TZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__NJP);
-    new_capacity__VZAB= 0;
-    if (((__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1) <= (__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.capacity__31V -  1))) {
-      Self__TZAB->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1);
-      __tmp__D0AB=TRUE__;
+    ((__ITM_TYPE_MULTI *)result__52HB)->list_type__IKP=lt__MJP;
+    result__OJP=result__52HB;
+    Self__1ZAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__VJP);
+    new_capacity__3ZAB= 0;
+    if (((__INTEGER)(Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP +  1) <= (__INTEGER)(Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V -  1))) {
+      Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP +  1);
+      __tmp__L0AB=TRUE__;
     } else {
-      __tmp__D0AB=FALSE__;
+      __tmp__L0AB=FALSE__;
     };
-    if ((! __tmp__D0AB)) {
-      if ((Self__TZAB->parent_arrayed_collection__MJP.capacity__31V ==  0)) {
-        Self__TZAB->parent_arrayed_collection__MJP.storage__I2V=create__VLXB( 2);
-        Self__TZAB->parent_arrayed_collection__MJP.capacity__31V= 2;
-        Self__TZAB->parent_arrayed_collection__MJP.upper__WJP= 0;
+    if ((! __tmp__L0AB)) {
+      if ((Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V ==  0)) {
+        Self__1ZAB->parent_arrayed_collection__UJP.storage__Q2V=create__3LXB( 2);
+        Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V= 2;
+        Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP= 0;
       } else {
-        new_capacity__VZAB=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.capacity__31V <<  1);
-        __tmp__Y0AB=Self__TZAB->parent_arrayed_collection__MJP.storage__I2V;
-        __tmp__Z0AB=Self__TZAB->parent_arrayed_collection__MJP.capacity__31V;
-        new__2MFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__Y0AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__Z0AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VZAB * ((__INTEGER )(sizeof(void *)))))));
-        __tmp__QNFC=(__INTEGER)(new_capacity__VZAB -  1);
-        Self__AYVD=__tmp__Z0AB;
-        while ((Self__AYVD <= __tmp__QNFC)) {
-          new__2MFC[Self__AYVD]=NULL;
-          Self__AYVD=(__INTEGER)(Self__AYVD +  1);
+        new_capacity__3ZAB=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V <<  1);
+        __tmp__A1AB=Self__1ZAB->parent_arrayed_collection__UJP.storage__Q2V;
+        __tmp__B1AB=Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V;
+        new__ENFC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__A1AB)),((__UINTEGER_32 )(__INTEGER)(__tmp__B1AB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3ZAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__YNFC=(__INTEGER)(new_capacity__3ZAB -  1);
+        Self__IYVD=__tmp__B1AB;
+        while ((Self__IYVD <= __tmp__YNFC)) {
+          new__ENFC[Self__IYVD]=NULL;
+          Self__IYVD=(__INTEGER)(Self__IYVD +  1);
         };
-        Self__TZAB->parent_arrayed_collection__MJP.storage__I2V=new__2MFC;
-        Self__TZAB->parent_arrayed_collection__MJP.capacity__31V=new_capacity__VZAB;
-        Self__TZAB->parent_arrayed_collection__MJP.upper__WJP=(__INTEGER)(Self__TZAB->parent_arrayed_collection__MJP.upper__WJP +  1);
+        Self__1ZAB->parent_arrayed_collection__UJP.storage__Q2V=new__ENFC;
+        Self__1ZAB->parent_arrayed_collection__UJP.capacity__F2V=new_capacity__3ZAB;
+        Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP=(__INTEGER)(Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP +  1);
       };
     };
-    ((void **)Self__TZAB->parent_arrayed_collection__MJP.storage__I2V)[Self__TZAB->parent_arrayed_collection__MJP.upper__WJP]=result__X2HB;
+    ((void **)Self__1ZAB->parent_arrayed_collection__UJP.storage__Q2V)[Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP]=result__52HB;
   };
-  return(result__GJP);
+  return(result__OJP);
 }
 
-static void* read_type__DCM(__PARSER *Self__ECM,__BOOLEAN is_local__FCM)
+static void* read_type__LCM(__PARSER *Self__MCM,__BOOLEAN is_local__NCM)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  void *style__HCM;
-  void *result__ICM;
-  void *typ_arg__KCM,*typ_res__LCM,*typ_arg__VLN,*typ_res__WLN;
-  __POSITION pos__IRWG,pos__KRWG,pos__MRWG,__tmp__OFM,pos__QRWG;
-  __POSITION pos__PTWG,pos__RTWG;
-  __ITM_TYPE_STYLE *Self__NTEH;
-  void *result__YLN;
-  __INTEGER idx__ZLN,typ_id__L1GB,new_capacity__ZMAB,__tmp__3NAB;
-  __INTEGER __tmp__CLFC,Self__BWVD;
-  __ITM_TYPE_BLOCK *result__F1GB,*Self__BZCC;
-  __POINTER ptr__G1GB,ptr_table__LXHH,next__KXHH,result__MXHH;
-  __POINTER ptr_table__QXHH,next__PXHH,result__RXHH;
-  __UINTEGER_32 sz__I1GB,a__WTEH,new_size__XTEH,t__1TEH,a__0TEH;
-  __UINTEGER_32 new_size__TXHH,lab_type__SXHH;
-  void *lst__JCM;
-  __BOOLEAN result__YWHH,result__1WHH,result__4WHH,result__BXHH;
-  __BOOLEAN result__EXHH,result__HXHH,__tmp__HNAB,result__VXHH;
-  __BOOLEAN __tmp__NHM,result__XXHH;
-  __CHARACTER result__ZWHH,result__2WHH,result__5WHH,result__CXHH;
-  __CHARACTER result__FXHH,result__IXHH;
-  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__XMAB;
-  void **__tmp__2NAB,**new__OKFC;
-  style__HCM=NULL;
-  result__ICM=NULL;
-  lst__JCM=NULL;
-  typ_arg__KCM=NULL;
-  typ_res__LCM=NULL;
-  result__YWHH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__YWHH=FALSE__;
+  void *style__PCM;
+  void *result__QCM;
+  void *typ_arg__SCM,*typ_res__TCM,*typ_arg__3LN,*typ_res__4LN;
+  __POSITION pos__KOXG,pos__MOXG,pos__OOXG,__tmp__WFM,pos__SOXG;
+  __POSITION pos__RQXG,pos__TQXG;
+  __ITM_TYPE_STYLE *Self__3UFH;
+  void *result__AMN;
+  __INTEGER idx__BMN,typ_id__T1GB,new_capacity__BNAB,__tmp__FOAB;
+  __INTEGER __tmp__KLFC,Self__JWVD;
+  __ITM_TYPE_BLOCK *result__N1GB,*Self__JZCC;
+  __POINTER ptr__O1GB,ptr_table__LZIH,next__KZIH,result__MZIH;
+  __POINTER ptr_table__QZIH,next__PZIH,result__RZIH;
+  __UINTEGER_32 sz__Q1GB,a__GVFH,new_size__HVFH,t__LVFH,a__KVFH;
+  __UINTEGER_32 new_size__TZIH,lab_type__SZIH;
+  void *lst__RCM;
+  __BOOLEAN result__YYIH,result__1YIH,result__4YIH,result__BZIH;
+  __BOOLEAN result__EZIH,result__HZIH,__tmp__PNAB,result__VZIH;
+  __BOOLEAN __tmp__VHM,result__XZIH;
+  __CHARACTER result__ZYIH,result__2YIH,result__5YIH,result__CZIH;
+  __CHARACTER result__FZIH,result__IZIH;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__5MAB;
+  void **__tmp__EOAB,**new__WKFC;
+  style__PCM=NULL;
+  result__QCM=NULL;
+  lst__RCM=NULL;
+  typ_arg__SCM=NULL;
+  typ_res__TCM=NULL;
+  result__YYIH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__YYIH=FALSE__;
   } else {
-    result__ZWHH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__ZWHH=((__CHARACTER )(( 0)));
+    result__ZYIH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__ZYIH=((__CHARACTER )(( 0)));
     } else {
-      result__ZWHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__ZYIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__ZWHH == '{')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__YWHH=TRUE__;
+    if ((result__ZYIH == '{')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__YYIH=TRUE__;
     };
   };
-  if (result__YWHH) {
-    result__1WHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__1WHH=FALSE__;
+  if (result__YYIH) {
+    result__1YIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__1YIH=FALSE__;
     } else {
-      result__2WHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__2WHH=((__CHARACTER )(( 0)));
+      result__2YIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__2YIH=((__CHARACTER )(( 0)));
       } else {
-        result__2WHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__2YIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__2WHH == '(')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__1WHH=TRUE__;
+      if ((result__2YIH == '(')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__1YIH=TRUE__;
       };
     };
-    if (result__1WHH) {
-      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
-      if (((void *)lst__JCM == (void *)NULL)) {
-        pos__IRWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_264));
-        put_position__UOG(pos__IRWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    if (result__1YIH) {
+      lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
+      if (((void *)lst__RCM == (void *)NULL)) {
+        pos__KOXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_263));
+        put_position__2OG(pos__KOXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
-        typ_arg__KCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.upper__SIV +  1) ==  1)) {
+        typ_arg__SCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
       } else {
-        typ_arg__KCM=get__CJP(lst__JCM);
+        typ_arg__SCM=get__KJP(lst__RCM);
       };
-      result__4WHH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__4WHH=FALSE__;
+      result__4YIH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__4YIH=FALSE__;
       } else {
-        result__5WHH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__5WHH=((__CHARACTER )(( 0)));
+        result__5YIH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__5YIH=((__CHARACTER )(( 0)));
         } else {
-          result__5WHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__5YIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__5WHH == ')')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__4WHH=TRUE__;
+        if ((result__5YIH == ')')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__4YIH=TRUE__;
         };
       };
-      if ((! result__4WHH)) {
-        pos__KRWG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_261));
-        put_position__UOG(pos__KRWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! result__4YIH)) {
+        pos__MOXG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_260));
+        put_position__2OG(pos__MOXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      result__BXHH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__BXHH=FALSE__;
+      result__BZIH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__BZIH=FALSE__;
       } else {
-        result__CXHH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__CXHH=((__CHARACTER )(( 0)));
+        result__CZIH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__CZIH=((__CHARACTER )(( 0)));
         } else {
-          result__CXHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__CZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__CXHH == ';')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__BXHH=TRUE__;
+        if ((result__CZIH == ';')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__BZIH=TRUE__;
         };
       };
-      if ((! result__BXHH)) {
-        pos__MRWG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_242));
-        put_position__UOG(pos__MRWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! result__BZIH)) {
+        pos__OOXG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_240));
+        put_position__2OG(pos__OOXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
+      lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
     } else {
-      lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
-      if (((void *)lst__JCM != (void *)NULL)) {
-        result__EXHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__EXHH=FALSE__;
+      lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
+      if (((void *)lst__RCM != (void *)NULL)) {
+        result__EZIH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__EZIH=FALSE__;
         } else {
-          result__FXHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__FXHH=((__CHARACTER )(( 0)));
+          result__FZIH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__FZIH=((__CHARACTER )(( 0)));
           } else {
-            result__FXHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__FZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__FXHH == ';')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__EXHH=TRUE__;
+          if ((result__FZIH == ';')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__EZIH=TRUE__;
           };
         };
-        if (result__EXHH) {
-          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
-            typ_arg__KCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+        if (result__EZIH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.upper__SIV +  1) ==  1)) {
+            typ_arg__SCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
           } else {
-            typ_arg__KCM=get__CJP(lst__JCM);
-            copy__ZCS(string_tmp__VH,(&__string_291));
-            switch (((struct ___OBJ *)typ_arg__KCM)->__id) {
+            typ_arg__SCM=get__KJP(lst__RCM);
+            copy__BDS(string_tmp__VH,(&__string_290));
+            switch (((struct ___OBJ *)typ_arg__SCM)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__BOS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__KCM)->parent_itm_type__3DE.name__KYP);
+              append__JOS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__SCM)->parent_itm_type__FEE.name__SYP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__BOS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__KCM)->name__KYP);
+              append__JOS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__SCM)->name__SYP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__SIBC(typ_arg__KCM,string_tmp__VH);
+              append_in__0IBC(typ_arg__SCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__OGPD(typ_arg__KCM,string_tmp__VH);
+              append_in__WGPD(typ_arg__SCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__SHPD(typ_arg__KCM,string_tmp__VH);
+              append_in__0HPD(typ_arg__SCM,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              Self__NTEH=((__ITM_TYPE_STYLE *)typ_arg__KCM);
-              if (((void *)Self__NTEH->style__TYP != (void *)NULL)) {
-                append__BOS(string_tmp__VH,Self__NTEH->style__TYP);
-                add_last__ZLT(string_tmp__VH,' ');
+              Self__3UFH=((__ITM_TYPE_STYLE *)typ_arg__SCM);
+              if (((void *)Self__3UFH->style__1YP != (void *)NULL)) {
+                append__JOS(string_tmp__VH,Self__3UFH->style__1YP);
+                add_last__BMT(string_tmp__VH,' ');
               };
-              append__BOS(string_tmp__VH,Self__NTEH->parent_itm_type_simple__BSN.name__KYP);
+              append__JOS(string_tmp__VH,Self__3UFH->parent_itm_type_simple__JSN.name__SYP);
             } break;
             };
-            append__BOS(string_tmp__VH,(&__string_292));
-            __tmp__OFM=current_position__JXF();
-            put_error__text__KNG( 2,string_tmp__VH);
-            put_position__UOG(__tmp__OFM);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+            append__JOS(string_tmp__VH,(&__string_291));
+            __tmp__WFM=current_position__RXF();
+            put_error__text__SNG( 2,string_tmp__VH);
+            put_position__2OG(__tmp__WFM);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          lst__JCM=read_type_list__IMO(Self__ECM,FALSE__);
+          lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
         };
       };
     };
-    if (((void *)lst__JCM != (void *)NULL)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.upper__KIV +  1) ==  1)) {
-        typ_res__LCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__JCM)->parent_arrayed_collection__ZXC.storage__RMV)[ 0];
+    if (((void *)lst__RCM != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.upper__SIV +  1) ==  1)) {
+        typ_res__TCM=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__RCM)->parent_arrayed_collection__BYC.storage__ZMV)[ 0];
       } else {
-        typ_res__LCM=get__CJP(lst__JCM);
+        typ_res__TCM=get__KJP(lst__RCM);
       };
     };
-    result__HXHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__HXHH=FALSE__;
+    result__HZIH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__HZIH=FALSE__;
     } else {
-      result__IXHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__IXHH=((__CHARACTER )(( 0)));
+      result__IZIH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__IZIH=((__CHARACTER )(( 0)));
       } else {
-        result__IXHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__IZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__IXHH == '}')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__HXHH=TRUE__;
+      if ((result__IZIH == '}')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__HZIH=TRUE__;
       };
     };
-    if ((! result__HXHH)) {
-      pos__QRWG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_293));
-      put_position__UOG(pos__QRWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    if ((! result__HZIH)) {
+      pos__SOXG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_292));
+      put_position__2OG(pos__SOXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    typ_arg__VLN=typ_arg__KCM;
-    typ_res__WLN=typ_res__LCM;
-    result__YLN=NULL;
-    idx__ZLN= 0;
-    while (((idx__ZLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.upper__IMN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN])->type_argument__WMN != (void *)typ_arg__VLN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN])->type_result__ANN != (void *)typ_res__WLN)))) {
-      idx__ZLN=(__INTEGER)(idx__ZLN +  1);
-    };
-    if ((idx__ZLN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.upper__IMN)) {
-      result__YLN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN)->parent_arrayed_collection__4LN.storage__RKV)[idx__ZLN];
-    } else {
-      result__F1GB=NULL;
-      ptr__G1GB=((__POINTER )(NULL));
-      typ_id__L1GB= 0;
-      sz__I1GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
-      if ((sz__I1GB ==  0)) {
-        result__F1GB=ITM_TYPE_BLOCK__;
-      } else {
-        typ_id__L1GB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__I1GB);
-        if ((typ_id__L1GB == (__INTEGER)(-  1))) {
-          a__WTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__XTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1GB + a__WTEH) & (__UINTEGER_32)(~ a__WTEH));
-          ptr_table__LXHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XTEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__KXHH=((__POINTER )(NULL));
-          result__MXHH=((__POINTER *)ptr_table__LXHH)[ 0];
-          if ((result__MXHH == (void *)NULL)) {
-            result__MXHH=new_lab__MRJ(new_size__XTEH);
-            next__KXHH=(void *)((unsigned long)result__MXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTEH)));
-            ((__POINTER *)next__KXHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LXHH)[ 0]=next__KXHH;
-          } else {
-            next__KXHH=((__POINTER *)result__MXHH)[ 0];
-            if ((next__KXHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XTEH <<  1)) <=  4096)) {
-                next__KXHH=(void *)((unsigned long)result__MXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTEH)));
+    typ_arg__3LN=typ_arg__SCM;
+    typ_res__4LN=typ_res__TCM;
+    result__AMN=NULL;
+    idx__BMN= 0;
+    while (((idx__BMN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN)->parent_arrayed_collection__GMN.upper__QMN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN)->parent_arrayed_collection__GMN.storage__ZKV)[idx__BMN])->type_argument__4MN != (void *)typ_arg__3LN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN)->parent_arrayed_collection__GMN.storage__ZKV)[idx__BMN])->type_result__INN != (void *)typ_res__4LN)))) {
+      idx__BMN=(__INTEGER)(idx__BMN +  1);
+    };
+    if ((idx__BMN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN)->parent_arrayed_collection__GMN.upper__QMN)) {
+      result__AMN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN)->parent_arrayed_collection__GMN.storage__ZKV)[idx__BMN];
+    } else {
+      result__N1GB=NULL;
+      ptr__O1GB=((__POINTER )(NULL));
+      typ_id__T1GB= 0;
+      sz__Q1GB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__Q1GB ==  0)) {
+        result__N1GB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__T1GB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__Q1GB);
+        if ((typ_id__T1GB == (__INTEGER)(-  1))) {
+          a__GVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__HVFH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q1GB + a__GVFH) & (__UINTEGER_32)(~ a__GVFH));
+          ptr_table__LZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HVFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__KZIH=((__POINTER )(NULL));
+          result__MZIH=((__POINTER *)ptr_table__LZIH)[ 0];
+          if ((result__MZIH == (void *)NULL)) {
+            result__MZIH=new_lab__URJ(new_size__HVFH);
+            next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVFH)));
+            ((__POINTER *)next__KZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
+          } else {
+            next__KZIH=((__POINTER *)result__MZIH)[ 0];
+            if ((next__KZIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MZIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__HVFH <<  1)) <=  4096)) {
+                next__KZIH=(void *)((unsigned long)result__MZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVFH)));
               } else {
-                next__KXHH=new_lab__MRJ(new_size__XTEH);
+                next__KZIH=new_lab__URJ(new_size__HVFH);
               };
-              ((__POINTER *)next__KXHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LXHH)[ 0]=next__KXHH;
+              ((__POINTER *)next__KZIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
             } else {
-              ((__POINTER *)result__MXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MXHH=next__KXHH;
-            };
-          };
-          ptr__G1GB=result__MXHH;
-        } else {
-          t__1TEH=((__UINTEGER_32 )typ_id__L1GB);
-          a__0TEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TXHH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1GB + a__0TEH) & (__UINTEGER_32)(~ a__0TEH));
-          ptr_table__QXHH=((__POINTER )(&(table_type[(t__1TEH)])));
-          lab_type__SXHH=(__UINTEGER_32)(t__1TEH |  1);
-          next__PXHH=((__POINTER )(NULL));
-          result__RXHH=((__POINTER *)ptr_table__QXHH)[ 0];
-          if ((result__RXHH == (void *)NULL)) {
-            result__RXHH=new_lab__MRJ(lab_type__SXHH);
-            next__PXHH=(void *)((unsigned long)result__RXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXHH)));
-            ((__POINTER *)next__PXHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QXHH)[ 0]=next__PXHH;
-          } else {
-            next__PXHH=((__POINTER *)result__RXHH)[ 0];
-            if ((next__PXHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RXHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TXHH <<  1)) <=  4096)) {
-                next__PXHH=(void *)((unsigned long)result__RXHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXHH)));
+              ((__POINTER *)result__MZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MZIH=next__KZIH;
+            };
+          };
+          ptr__O1GB=result__MZIH;
+        } else {
+          t__LVFH=((__UINTEGER_32 )typ_id__T1GB);
+          a__KVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__TZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q1GB + a__KVFH) & (__UINTEGER_32)(~ a__KVFH));
+          ptr_table__QZIH=((__POINTER )(&(table_type[(t__LVFH)])));
+          lab_type__SZIH=(__UINTEGER_32)(t__LVFH |  1);
+          next__PZIH=((__POINTER )(NULL));
+          result__RZIH=((__POINTER *)ptr_table__QZIH)[ 0];
+          if ((result__RZIH == (void *)NULL)) {
+            result__RZIH=new_lab__URJ(lab_type__SZIH);
+            next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZIH)));
+            ((__POINTER *)next__PZIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
+          } else {
+            next__PZIH=((__POINTER *)result__RZIH)[ 0];
+            if ((next__PZIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RZIH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TZIH <<  1)) <=  4096)) {
+                next__PZIH=(void *)((unsigned long)result__RZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TZIH)));
               } else {
-                next__PXHH=new_lab__MRJ(lab_type__SXHH);
+                next__PZIH=new_lab__URJ(lab_type__SZIH);
               };
-              ((__POINTER *)next__PXHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QXHH)[ 0]=next__PXHH;
+              ((__POINTER *)next__PZIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
             } else {
-              ((__POINTER *)result__RXHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PXHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RXHH=next__PXHH;
+              ((__POINTER *)result__RZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RZIH=next__PZIH;
             };
           };
-          ptr__G1GB=result__RXHH;
+          ptr__O1GB=result__RZIH;
         };
-        result__F1GB=((__ITM_TYPE_BLOCK *)ptr__G1GB);
-        *(result__F1GB) = *(ITM_TYPE_BLOCK__);
+        result__N1GB=((__ITM_TYPE_BLOCK *)ptr__O1GB);
+        *(result__N1GB) = *(ITM_TYPE_BLOCK__);
       };
-      Self__BZCC=((__ITM_TYPE_BLOCK *)result__F1GB);
-      Self__BZCC->type_argument__WMN=typ_arg__KCM;
-      Self__BZCC->type_result__ANN=typ_res__LCM;
-      result__YLN=result__F1GB;
-      Self__XMAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__5LN);
-      new_capacity__ZMAB= 0;
-      if (((__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1) <= (__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV -  1))) {
-        Self__XMAB->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1);
-        __tmp__HNAB=TRUE__;
+      Self__JZCC=((__ITM_TYPE_BLOCK *)result__N1GB);
+      Self__JZCC->type_argument__4MN=typ_arg__SCM;
+      Self__JZCC->type_result__INN=typ_res__TCM;
+      result__AMN=result__N1GB;
+      Self__5MAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__HMN);
+      new_capacity__BNAB= 0;
+      if (((__INTEGER)(Self__5MAB->parent_arrayed_collection__GMN.upper__QMN +  1) <= (__INTEGER)(Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV -  1))) {
+        Self__5MAB->parent_arrayed_collection__GMN.upper__QMN=(__INTEGER)(Self__5MAB->parent_arrayed_collection__GMN.upper__QMN +  1);
+        __tmp__PNAB=TRUE__;
       } else {
-        __tmp__HNAB=FALSE__;
+        __tmp__PNAB=FALSE__;
       };
-      if ((! __tmp__HNAB)) {
-        if ((Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV ==  0)) {
-          Self__XMAB->parent_arrayed_collection__4LN.storage__RKV=create__QUWB( 2);
-          Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV= 2;
-          Self__XMAB->parent_arrayed_collection__4LN.upper__IMN= 0;
+      if ((! __tmp__PNAB)) {
+        if ((Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV ==  0)) {
+          Self__5MAB->parent_arrayed_collection__GMN.storage__ZKV=create__YUWB( 2);
+          Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV= 2;
+          Self__5MAB->parent_arrayed_collection__GMN.upper__QMN= 0;
         } else {
-          new_capacity__ZMAB=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV <<  1);
-          __tmp__2NAB=Self__XMAB->parent_arrayed_collection__4LN.storage__RKV;
-          __tmp__3NAB=Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV;
-          new__OKFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__2NAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__3NAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZMAB * ((__INTEGER )(sizeof(void *)))))));
-          __tmp__CLFC=(__INTEGER)(new_capacity__ZMAB -  1);
-          Self__BWVD=__tmp__3NAB;
-          while ((Self__BWVD <= __tmp__CLFC)) {
-            new__OKFC[Self__BWVD]=NULL;
-            Self__BWVD=(__INTEGER)(Self__BWVD +  1);
+          new_capacity__BNAB=(__INTEGER)(Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV <<  1);
+          __tmp__EOAB=Self__5MAB->parent_arrayed_collection__GMN.storage__ZKV;
+          __tmp__FOAB=Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV;
+          new__WKFC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__EOAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__FOAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BNAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__KLFC=(__INTEGER)(new_capacity__BNAB -  1);
+          Self__JWVD=__tmp__FOAB;
+          while ((Self__JWVD <= __tmp__KLFC)) {
+            new__WKFC[Self__JWVD]=NULL;
+            Self__JWVD=(__INTEGER)(Self__JWVD +  1);
           };
-          Self__XMAB->parent_arrayed_collection__4LN.storage__RKV=new__OKFC;
-          Self__XMAB->parent_arrayed_collection__4LN.capacity__GKV=new_capacity__ZMAB;
-          Self__XMAB->parent_arrayed_collection__4LN.upper__IMN=(__INTEGER)(Self__XMAB->parent_arrayed_collection__4LN.upper__IMN +  1);
+          Self__5MAB->parent_arrayed_collection__GMN.storage__ZKV=new__WKFC;
+          Self__5MAB->parent_arrayed_collection__GMN.capacity__OKV=new_capacity__BNAB;
+          Self__5MAB->parent_arrayed_collection__GMN.upper__QMN=(__INTEGER)(Self__5MAB->parent_arrayed_collection__GMN.upper__QMN +  1);
         };
       };
-      ((void **)Self__XMAB->parent_arrayed_collection__4LN.storage__RKV)[Self__XMAB->parent_arrayed_collection__4LN.upper__IMN]=result__F1GB;
+      ((void **)Self__5MAB->parent_arrayed_collection__GMN.storage__ZKV)[Self__5MAB->parent_arrayed_collection__GMN.upper__QMN]=result__N1GB;
     };
-    result__ICM=result__YLN;
+    result__QCM=result__AMN;
   } else {
-    result__VXHH=read_word__QPF((&__string_9));
-    if (is_shorter__5Y) {
-      if (result__VXHH) {
+    result__VZIH=read_word__YPF((&__string_9));
+    if (is_shorter__FZ) {
+      if (result__VZIH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
-          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         } else {
-          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         };
       };
     };
-    if (result__VXHH) {
-      __tmp__NHM=TRUE__;
+    if (result__VZIH) {
+      __tmp__VHM=TRUE__;
     } else {
-      result__XXHH=read_word__QPF((&__string_10));
-      if (is_shorter__5Y) {
-        if (result__XXHH) {
+      result__XZIH=read_word__YPF((&__string_10));
+      if (is_shorter__FZ) {
+        if (result__XZIH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
-            short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+            short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
           } else {
-            short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+            short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
           };
         };
       };
-      __tmp__NHM=result__XXHH;
+      __tmp__VHM=result__XZIH;
     };
-    if (__tmp__NHM) {
-      style__HCM=last_string__I0C;
-      if ((is_local__FCM && ((void *)last_string__I0C == (void *)(&__string_9)))) {
-        pos__PTWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_294));
-        put_position__UOG(pos__PTWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    if (__tmp__VHM) {
+      style__PCM=last_string__Q0C;
+      if ((is_local__NCM && ((void *)last_string__Q0C == (void *)(&__string_9)))) {
+        pos__RQXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_293));
+        put_position__2OG(pos__RQXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__ICM=read_prototype__HON(Self__ECM,style__HCM);
-    if (((void *)read_contract__HTF(Self__ECM) != (void *)NULL)) {
-      pos__RTWG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_259));
-      put_position__UOG(pos__RTWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    result__QCM=read_prototype__PON(Self__MCM,style__PCM);
+    if (((void *)read_contract__PTF(Self__MCM) != (void *)NULL)) {
+      pos__TQXG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_258));
+      put_position__2OG(pos__TQXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__ICM);
+  return(result__QCM);
 }
 
-static void set_result_type__Q3FC(__ITM_SLOT *Self__R3FC,void *t__S3FC)
+static void set_result_type__Y3FC(__ITM_SLOT *Self__Z3FC,void *t__03FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  void *tm__T3FC,*__tmp__23FC;
-  __SECTION_ *Self__0M0G;
-  __POSITION pos__DZID;
-  tm__T3FC=NULL;
-  Self__0M0G=((__SECTION_ *)Self__R3FC->id_section__Y1C);
-  if ((((void *)Self__0M0G->name__CZDC == (void *)(&__string_23)) || ((void *)Self__0M0G->name__CZDC == (void *)(&__string_24)))) {
-    if (t__S3FC==NULL) {
-      __tmp__23FC=NULL;
-    } else {
-      switch (((struct ___OBJ *)t__S3FC)->__id) {
+  void *tm__13FC,*__tmp__E4FC;
+  __SECTION_ *Self__JK1G;
+  __POSITION pos__LZID;
+  tm__13FC=NULL;
+  Self__JK1G=((__SECTION_ *)Self__Z3FC->id_section__A2C);
+  if ((((void *)Self__JK1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__JK1G->name__KZDC == (void *)(&__string_24)))) {
+    if (t__03FC==NULL) {
+      __tmp__E4FC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__03FC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__23FC=((void *)t__S3FC);
+        __tmp__E4FC=((void *)t__03FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__23FC=((void *)t__S3FC);
+        __tmp__E4FC=((void *)t__03FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__23FC=NULL;
+        __tmp__E4FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__23FC=((void *)t__S3FC);
+        __tmp__E4FC=((void *)t__03FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__23FC=((void *)t__S3FC);
+        __tmp__E4FC=((void *)t__03FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__23FC=((void *)t__S3FC);
+        __tmp__E4FC=((void *)t__03FC);
       } break;
       }
     };
-    tm__T3FC=__tmp__23FC;
-    if (((((void *)__tmp__23FC == (void *)NULL) || ((void *)__tmp__23FC == (void *)type_self__HUN)) || ((void *)__tmp__23FC == (void *)type_void__4VF))) {
-      pos__DZID=Self__R3FC->parent_named__P5.parent_itm_object__4.position__NDJ;
-      put_error__text__KNG( 1,(&__string_239));
-      put_position__UOG(pos__DZID);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    tm__13FC=__tmp__E4FC;
+    if (((((void *)__tmp__E4FC == (void *)NULL) || ((void *)__tmp__E4FC == (void *)type_self__PUN)) || ((void *)__tmp__E4FC == (void *)type_void__GWF))) {
+      pos__LZID=Self__Z3FC->parent_named__V5.parent_itm_object__4.position__VDJ;
+      put_error__text__SNG( 1,(&__string_237));
+      put_position__2OG(pos__LZID);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__R3FC->result_type__04FC=t__S3FC;
+  Self__Z3FC->result_type__C5FC=t__03FC;
 }
 
-static void* read_contract__HTF(__PARSER *Self__ITF)
+static void* read_contract__PTF(__PARSER *Self__QTF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__LTF;
-  void *result__MTF;
-  __POSITION p__DYHH,p__HXL,pos__ZTWG,pos__1TWG,p__GZHH;
-  __ITM_LIST *result__1XHH;
-  __POINTER ptr__2XHH,ptr_table__FYHH,next__EYHH,result__GYHH;
-  __POINTER ptr_table__KYHH,next__JYHH,result__LYHH,ptr__R3L;
-  __POINTER ptr_table__PYHH,next__OYHH,result__QYHH,ptr_table__UYHH;
-  __POINTER next__TYHH,result__VYHH,ptr__5YHH,ptr_table__IZHH;
-  __POINTER next__HZHH,result__JZHH,ptr_table__NZHH,next__MZHH;
-  __POINTER result__OZHH;
-  __INTEGER typ_id__3XHH,typ_id__W3L,typ_id__AZHH;
-  __UINTEGER_32 sz__4XHH,a__5XHH,new_size__AYHH,t__BYHH,a__CYHH;
-  __UINTEGER_32 new_size__NYHH,lab_type__MYHH,sz__T3L,a__EUEH;
-  __UINTEGER_32 new_size__FUEH,t__JUEH,a__IUEH,new_size__XYHH;
-  __UINTEGER_32 lab_type__WYHH,sz__BZHH,a__CZHH,new_size__DZHH,t__EZHH;
-  __UINTEGER_32 a__FZHH,new_size__QZHH,lab_type__PZHH;
-  __ITM_LDOTS *result__Q3L;
-  __ITM_PROTOTYPE *result__4YHH;
-  __BOOLEAN continue__KTF,result__YXHH,result__YYHH,result__1YHH;
-  void *lst__STF,*result__1OGH;
-  __CHARACTER result__ZXHH,result__ZYHH,result__2YHH;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__2OGH,*Self__3OGH;
-  continue__KTF=FALSE__;
-  e__LTF=NULL;
-  result__MTF=NULL;
-  lst__STF=NULL;
-  result__YXHH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__YXHH=FALSE__;
+  void *e__TTF;
+  void *result__UTF;
+  __POSITION p__D0IH,p__PXL,pos__1QXG,pos__3QXG,p__G1IH;
+  __ITM_LIST *result__1ZIH;
+  __POINTER ptr__2ZIH,ptr_table__F0IH,next__E0IH,result__G0IH;
+  __POINTER ptr_table__K0IH,next__J0IH,result__L0IH,ptr__Z3L;
+  __POINTER ptr_table__P0IH,next__O0IH,result__Q0IH,ptr_table__U0IH;
+  __POINTER next__T0IH,result__V0IH,ptr__50IH,ptr_table__I1IH;
+  __POINTER next__H1IH,result__J1IH,ptr_table__N1IH,next__M1IH;
+  __POINTER result__O1IH;
+  __INTEGER typ_id__3ZIH,typ_id__43L,typ_id__A1IH;
+  __UINTEGER_32 sz__4ZIH,a__5ZIH,new_size__A0IH,t__B0IH,a__C0IH;
+  __UINTEGER_32 new_size__N0IH,lab_type__M0IH,sz__13L,a__UVFH;
+  __UINTEGER_32 new_size__VVFH,t__ZVFH,a__YVFH,new_size__X0IH;
+  __UINTEGER_32 lab_type__W0IH,sz__B1IH,a__C1IH,new_size__D1IH,t__E1IH;
+  __UINTEGER_32 a__F1IH,new_size__Q1IH,lab_type__P1IH;
+  __ITM_LDOTS *result__Y3L;
+  __ITM_PROTOTYPE *result__40IH;
+  __BOOLEAN continue__STF,result__YZIH,result__Y0IH,result__10IH;
+  void *lst__0TF,*result__WQHH;
+  __CHARACTER result__ZZIH,result__Z0IH,result__20IH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__XQHH,*Self__YQHH;
+  continue__STF=FALSE__;
+  e__TTF=NULL;
+  result__UTF=NULL;
+  lst__0TF=NULL;
+  result__YZIH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__YZIH=FALSE__;
   } else {
-    result__ZXHH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__ZXHH=((__CHARACTER )(( 0)));
-    } else {
-      result__ZXHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-    };
-    if ((result__ZXHH == '[')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__YXHH=TRUE__;
-    };
-  };
-  if (result__YXHH) {
-    p__DYHH=current_position__JXF();
-    result__1XHH=NULL;
-    ptr__2XHH=((__POINTER )(NULL));
-    typ_id__3XHH= 0;
-    sz__4XHH=((__UINTEGER_32 )sizeof(__ITM_LIST));
-    if ((sz__4XHH ==  0)) {
-      result__1XHH=ITM_LIST__;
-    } else {
-      typ_id__3XHH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4XHH);
-      if ((typ_id__3XHH == (__INTEGER)(-  1))) {
-        a__5XHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__AYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4XHH + a__5XHH) & (__UINTEGER_32)(~ a__5XHH));
-        ptr_table__FYHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AYHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__EYHH=((__POINTER )(NULL));
-        result__GYHH=((__POINTER *)ptr_table__FYHH)[ 0];
-        if ((result__GYHH == (void *)NULL)) {
-          result__GYHH=new_lab__MRJ(new_size__AYHH);
-          next__EYHH=(void *)((unsigned long)result__GYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AYHH)));
-          ((__POINTER *)next__EYHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__FYHH)[ 0]=next__EYHH;
-        } else {
-          next__EYHH=((__POINTER *)result__GYHH)[ 0];
-          if ((next__EYHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AYHH <<  1)) <=  4096)) {
-              next__EYHH=(void *)((unsigned long)result__GYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AYHH)));
+    result__ZZIH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__ZZIH=((__CHARACTER )(( 0)));
+    } else {
+      result__ZZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    };
+    if ((result__ZZIH == '[')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__YZIH=TRUE__;
+    };
+  };
+  if (result__YZIH) {
+    p__D0IH=current_position__RXF();
+    result__1ZIH=NULL;
+    ptr__2ZIH=((__POINTER )(NULL));
+    typ_id__3ZIH= 0;
+    sz__4ZIH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+    if ((sz__4ZIH ==  0)) {
+      result__1ZIH=ITM_LIST__;
+    } else {
+      typ_id__3ZIH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__4ZIH);
+      if ((typ_id__3ZIH == (__INTEGER)(-  1))) {
+        a__5ZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__A0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__4ZIH + a__5ZIH) & (__UINTEGER_32)(~ a__5ZIH));
+        ptr_table__F0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A0IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__E0IH=((__POINTER )(NULL));
+        result__G0IH=((__POINTER *)ptr_table__F0IH)[ 0];
+        if ((result__G0IH == (void *)NULL)) {
+          result__G0IH=new_lab__URJ(new_size__A0IH);
+          next__E0IH=(void *)((unsigned long)result__G0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
+          ((__POINTER *)next__E0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F0IH)[ 0]=next__E0IH;
+        } else {
+          next__E0IH=((__POINTER *)result__G0IH)[ 0];
+          if ((next__E0IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G0IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__A0IH <<  1)) <=  4096)) {
+              next__E0IH=(void *)((unsigned long)result__G0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
             } else {
-              next__EYHH=new_lab__MRJ(new_size__AYHH);
-            };
-            ((__POINTER *)next__EYHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FYHH)[ 0]=next__EYHH;
-          } else {
-            ((__POINTER *)result__GYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__GYHH=next__EYHH;
-          };
-        };
-        ptr__2XHH=result__GYHH;
-      } else {
-        t__BYHH=((__UINTEGER_32 )typ_id__3XHH);
-        a__CYHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4XHH + a__CYHH) & (__UINTEGER_32)(~ a__CYHH));
-        ptr_table__KYHH=((__POINTER )(&(table_type[(t__BYHH)])));
-        lab_type__MYHH=(__UINTEGER_32)(t__BYHH |  1);
-        next__JYHH=((__POINTER )(NULL));
-        result__LYHH=((__POINTER *)ptr_table__KYHH)[ 0];
-        if ((result__LYHH == (void *)NULL)) {
-          result__LYHH=new_lab__MRJ(lab_type__MYHH);
-          next__JYHH=(void *)((unsigned long)result__LYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYHH)));
-          ((__POINTER *)next__JYHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__KYHH)[ 0]=next__JYHH;
-        } else {
-          next__JYHH=((__POINTER *)result__LYHH)[ 0];
-          if ((next__JYHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NYHH <<  1)) <=  4096)) {
-              next__JYHH=(void *)((unsigned long)result__LYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYHH)));
+              next__E0IH=new_lab__URJ(new_size__A0IH);
+            };
+            ((__POINTER *)next__E0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__F0IH)[ 0]=next__E0IH;
+          } else {
+            ((__POINTER *)result__G0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__G0IH=next__E0IH;
+          };
+        };
+        ptr__2ZIH=result__G0IH;
+      } else {
+        t__B0IH=((__UINTEGER_32 )typ_id__3ZIH);
+        a__C0IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__N0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__4ZIH + a__C0IH) & (__UINTEGER_32)(~ a__C0IH));
+        ptr_table__K0IH=((__POINTER )(&(table_type[(t__B0IH)])));
+        lab_type__M0IH=(__UINTEGER_32)(t__B0IH |  1);
+        next__J0IH=((__POINTER )(NULL));
+        result__L0IH=((__POINTER *)ptr_table__K0IH)[ 0];
+        if ((result__L0IH == (void *)NULL)) {
+          result__L0IH=new_lab__URJ(lab_type__M0IH);
+          next__J0IH=(void *)((unsigned long)result__L0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0IH)));
+          ((__POINTER *)next__J0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K0IH)[ 0]=next__J0IH;
+        } else {
+          next__J0IH=((__POINTER *)result__L0IH)[ 0];
+          if ((next__J0IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L0IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__N0IH <<  1)) <=  4096)) {
+              next__J0IH=(void *)((unsigned long)result__L0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N0IH)));
             } else {
-              next__JYHH=new_lab__MRJ(lab_type__MYHH);
+              next__J0IH=new_lab__URJ(lab_type__M0IH);
             };
-            ((__POINTER *)next__JYHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KYHH)[ 0]=next__JYHH;
+            ((__POINTER *)next__J0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__K0IH)[ 0]=next__J0IH;
           } else {
-            ((__POINTER *)result__LYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LYHH=next__JYHH;
+            ((__POINTER *)result__L0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__L0IH=next__J0IH;
           };
         };
-        ptr__2XHH=result__LYHH;
+        ptr__2ZIH=result__L0IH;
       };
-      result__1XHH=((__ITM_LIST *)ptr__2XHH);
-      *(result__1XHH) = *(ITM_LIST__);
+      result__1ZIH=((__ITM_LIST *)ptr__2ZIH);
+      *(result__1ZIH) = *(ITM_LIST__);
     };
-    ((__ITM_LIST *)result__1XHH)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__DYHH;
-    last_group__1TF=result__1XHH;
-    result__MTF=result__1XHH;
-    read_def_local__30H(Self__ITF);
-    result__1OGH=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
-      result__1OGH=create_with_capacity__SVI( 16);
+    ((__ITM_LIST *)result__1ZIH)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ=p__D0IH;
+    last_group__DUF=result__1ZIH;
+    result__UTF=result__1ZIH;
+    read_def_local__F1H(Self__QTF);
+    result__WQHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H)->parent_arrayed_collection__I4H.upper__QWT <  0)) {
+      result__WQHH=create_with_capacity__0VI( 16);
     } else {
-      Self__2OGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      result__1OGH=((void **)Self__2OGH->parent_arrayed_collection__A4H.storage__WAU)[Self__2OGH->parent_arrayed_collection__A4H.upper__IWT];
-      Self__3OGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      Self__3OGH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__3OGH->parent_arrayed_collection__A4H.upper__IWT -  1);
+      Self__XQHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      result__WQHH=((void **)Self__XQHH->parent_arrayed_collection__I4H.storage__4AU)[Self__XQHH->parent_arrayed_collection__I4H.upper__QWT];
+      Self__YQHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      Self__YQHH->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__YQHH->parent_arrayed_collection__I4H.upper__QWT -  1);
     };
-    lst__STF=result__1OGH;
+    lst__0TF=result__WQHH;
     do {
-      e__LTF=read_expr__44I(Self__ITF);
-      if (((void *)e__LTF == (void *)NULL)) {
-        continue__KTF=read_word__QPF((&__string_7));
-        if (continue__KTF) {
-          p__HXL=current_position__JXF();
-          result__Q3L=NULL;
-          ptr__R3L=((__POINTER )(NULL));
-          typ_id__W3L= 0;
-          sz__T3L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
-          if ((sz__T3L ==  0)) {
-            result__Q3L=ITM_LDOTS__;
-          } else {
-            typ_id__W3L=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T3L);
-            if ((typ_id__W3L == (__INTEGER)(-  1))) {
-              a__EUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__FUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3L + a__EUEH) & (__UINTEGER_32)(~ a__EUEH));
-              ptr_table__PYHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__OYHH=((__POINTER )(NULL));
-              result__QYHH=((__POINTER *)ptr_table__PYHH)[ 0];
-              if ((result__QYHH == (void *)NULL)) {
-                result__QYHH=new_lab__MRJ(new_size__FUEH);
-                next__OYHH=(void *)((unsigned long)result__QYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FUEH)));
-                ((__POINTER *)next__OYHH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PYHH)[ 0]=next__OYHH;
+      e__TTF=read_expr__G5I(Self__QTF);
+      if (((void *)e__TTF == (void *)NULL)) {
+        continue__STF=read_word__YPF((&__string_7));
+        if (continue__STF) {
+          p__PXL=current_position__RXF();
+          result__Y3L=NULL;
+          ptr__Z3L=((__POINTER )(NULL));
+          typ_id__43L= 0;
+          sz__13L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__13L ==  0)) {
+            result__Y3L=ITM_LDOTS__;
+          } else {
+            typ_id__43L=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__13L);
+            if ((typ_id__43L == (__INTEGER)(-  1))) {
+              a__UVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__VVFH=(__UINTEGER_32)((__UINTEGER_32)(sz__13L + a__UVFH) & (__UINTEGER_32)(~ a__UVFH));
+              ptr_table__P0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VVFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__O0IH=((__POINTER )(NULL));
+              result__Q0IH=((__POINTER *)ptr_table__P0IH)[ 0];
+              if ((result__Q0IH == (void *)NULL)) {
+                result__Q0IH=new_lab__URJ(new_size__VVFH);
+                next__O0IH=(void *)((unsigned long)result__Q0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVFH)));
+                ((__POINTER *)next__O0IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__P0IH)[ 0]=next__O0IH;
               } else {
-                next__OYHH=((__POINTER *)result__QYHH)[ 0];
-                if ((next__OYHH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FUEH <<  1)) <=  4096)) {
-                    next__OYHH=(void *)((unsigned long)result__QYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FUEH)));
+                next__O0IH=((__POINTER *)result__Q0IH)[ 0];
+                if ((next__O0IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Q0IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VVFH <<  1)) <=  4096)) {
+                    next__O0IH=(void *)((unsigned long)result__Q0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VVFH)));
                   } else {
-                    next__OYHH=new_lab__MRJ(new_size__FUEH);
+                    next__O0IH=new_lab__URJ(new_size__VVFH);
                   };
-                  ((__POINTER *)next__OYHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PYHH)[ 0]=next__OYHH;
+                  ((__POINTER *)next__O0IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__P0IH)[ 0]=next__O0IH;
                 } else {
-                  ((__POINTER *)result__QYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QYHH=next__OYHH;
+                  ((__POINTER *)result__Q0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__Q0IH=next__O0IH;
                 };
               };
-              ptr__R3L=result__QYHH;
+              ptr__Z3L=result__Q0IH;
             } else {
-              t__JUEH=((__UINTEGER_32 )typ_id__W3L);
-              a__IUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__XYHH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3L + a__IUEH) & (__UINTEGER_32)(~ a__IUEH));
-              ptr_table__UYHH=((__POINTER )(&(table_type[(t__JUEH)])));
-              lab_type__WYHH=(__UINTEGER_32)(t__JUEH |  1);
-              next__TYHH=((__POINTER )(NULL));
-              result__VYHH=((__POINTER *)ptr_table__UYHH)[ 0];
-              if ((result__VYHH == (void *)NULL)) {
-                result__VYHH=new_lab__MRJ(lab_type__WYHH);
-                next__TYHH=(void *)((unsigned long)result__VYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYHH)));
-                ((__POINTER *)next__TYHH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__UYHH)[ 0]=next__TYHH;
+              t__ZVFH=((__UINTEGER_32 )typ_id__43L);
+              a__YVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__X0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__13L + a__YVFH) & (__UINTEGER_32)(~ a__YVFH));
+              ptr_table__U0IH=((__POINTER )(&(table_type[(t__ZVFH)])));
+              lab_type__W0IH=(__UINTEGER_32)(t__ZVFH |  1);
+              next__T0IH=((__POINTER )(NULL));
+              result__V0IH=((__POINTER *)ptr_table__U0IH)[ 0];
+              if ((result__V0IH == (void *)NULL)) {
+                result__V0IH=new_lab__URJ(lab_type__W0IH);
+                next__T0IH=(void *)((unsigned long)result__V0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0IH)));
+                ((__POINTER *)next__T0IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__U0IH)[ 0]=next__T0IH;
               } else {
-                next__TYHH=((__POINTER *)result__VYHH)[ 0];
-                if ((next__TYHH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VYHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XYHH <<  1)) <=  4096)) {
-                    next__TYHH=(void *)((unsigned long)result__VYHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XYHH)));
+                next__T0IH=((__POINTER *)result__V0IH)[ 0];
+                if ((next__T0IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V0IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__X0IH <<  1)) <=  4096)) {
+                    next__T0IH=(void *)((unsigned long)result__V0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X0IH)));
                   } else {
-                    next__TYHH=new_lab__MRJ(lab_type__WYHH);
+                    next__T0IH=new_lab__URJ(lab_type__W0IH);
                   };
-                  ((__POINTER *)next__TYHH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UYHH)[ 0]=next__TYHH;
+                  ((__POINTER *)next__T0IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__U0IH)[ 0]=next__T0IH;
                 } else {
-                  ((__POINTER *)result__VYHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TYHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__VYHH=next__TYHH;
+                  ((__POINTER *)result__V0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__V0IH=next__T0IH;
                 };
               };
-              ptr__R3L=result__VYHH;
+              ptr__Z3L=result__V0IH;
             };
-            result__Q3L=((__ITM_LDOTS *)ptr__R3L);
-            *(result__Q3L) = *(ITM_LDOTS__);
+            result__Y3L=((__ITM_LDOTS *)ptr__Z3L);
+            *(result__Y3L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__Q3L)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ=p__HXL;
-          add_last__U5U(lst__STF,result__Q3L);
+          ((__ITM_LDOTS *)result__Y3L)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ=p__PXL;
+          add_last__25U(lst__0TF,result__Y3L);
         };
       } else {
-        add_last__U5U(lst__STF,e__LTF);
-        result__YYHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__YYHH=FALSE__;
+        add_last__25U(lst__0TF,e__TTF);
+        result__Y0IH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__Y0IH=FALSE__;
         } else {
-          result__ZYHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__ZYHH=((__CHARACTER )(( 0)));
+          result__Z0IH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__Z0IH=((__CHARACTER )(( 0)));
           } else {
-            result__ZYHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__Z0IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__ZYHH == ';')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__YYHH=TRUE__;
+          if ((result__Z0IH == ';')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__Y0IH=TRUE__;
           };
         };
-        if ((! result__YYHH)) {
-          pos__ZTWG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_242));
-          put_position__UOG(pos__ZTWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__Y0IH)) {
+          pos__1QXG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_240));
+          put_position__2OG(pos__1QXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        continue__KTF=TRUE__;
+        continue__STF=TRUE__;
       };
-    } while (continue__KTF);
-    result__1YHH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__1YHH=FALSE__;
+    } while (continue__STF);
+    result__10IH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__10IH=FALSE__;
     } else {
-      result__2YHH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__2YHH=((__CHARACTER )(( 0)));
+      result__20IH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__20IH=((__CHARACTER )(( 0)));
       } else {
-        result__2YHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__20IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__2YHH == ']')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__1YHH=TRUE__;
+      if ((result__20IH == ']')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__10IH=TRUE__;
       };
     };
-    if ((! result__1YHH)) {
-      pos__1TWG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_295));
-      put_position__UOG(pos__1TWG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    if ((! result__10IH)) {
+      pos__3QXG=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_294));
+      put_position__2OG(pos__3QXG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    p__GZHH=current_position__JXF();
-    result__4YHH=NULL;
-    ptr__5YHH=((__POINTER )(NULL));
-    typ_id__AZHH= 0;
-    sz__BZHH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__BZHH ==  0)) {
-      result__4YHH=ITM_PROTOTYPE__;
-    } else {
-      typ_id__AZHH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__BZHH);
-      if ((typ_id__AZHH == (__INTEGER)(-  1))) {
-        a__CZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__DZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BZHH + a__CZHH) & (__UINTEGER_32)(~ a__CZHH));
-        ptr_table__IZHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DZHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__HZHH=((__POINTER )(NULL));
-        result__JZHH=((__POINTER *)ptr_table__IZHH)[ 0];
-        if ((result__JZHH == (void *)NULL)) {
-          result__JZHH=new_lab__MRJ(new_size__DZHH);
-          next__HZHH=(void *)((unsigned long)result__JZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZHH)));
-          ((__POINTER *)next__HZHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__IZHH)[ 0]=next__HZHH;
-        } else {
-          next__HZHH=((__POINTER *)result__JZHH)[ 0];
-          if ((next__HZHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__DZHH <<  1)) <=  4096)) {
-              next__HZHH=(void *)((unsigned long)result__JZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZHH)));
+    p__G1IH=current_position__RXF();
+    result__40IH=NULL;
+    ptr__50IH=((__POINTER )(NULL));
+    typ_id__A1IH= 0;
+    sz__B1IH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__B1IH ==  0)) {
+      result__40IH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__A1IH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__B1IH);
+      if ((typ_id__A1IH == (__INTEGER)(-  1))) {
+        a__C1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__D1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1IH + a__C1IH) & (__UINTEGER_32)(~ a__C1IH));
+        ptr_table__I1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D1IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__H1IH=((__POINTER )(NULL));
+        result__J1IH=((__POINTER *)ptr_table__I1IH)[ 0];
+        if ((result__J1IH == (void *)NULL)) {
+          result__J1IH=new_lab__URJ(new_size__D1IH);
+          next__H1IH=(void *)((unsigned long)result__J1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D1IH)));
+          ((__POINTER *)next__H1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I1IH)[ 0]=next__H1IH;
+        } else {
+          next__H1IH=((__POINTER *)result__J1IH)[ 0];
+          if ((next__H1IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J1IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__D1IH <<  1)) <=  4096)) {
+              next__H1IH=(void *)((unsigned long)result__J1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D1IH)));
             } else {
-              next__HZHH=new_lab__MRJ(new_size__DZHH);
-            };
-            ((__POINTER *)next__HZHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__IZHH)[ 0]=next__HZHH;
-          } else {
-            ((__POINTER *)result__JZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__JZHH=next__HZHH;
-          };
-        };
-        ptr__5YHH=result__JZHH;
-      } else {
-        t__EZHH=((__UINTEGER_32 )typ_id__AZHH);
-        a__FZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__QZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__BZHH + a__FZHH) & (__UINTEGER_32)(~ a__FZHH));
-        ptr_table__NZHH=((__POINTER )(&(table_type[(t__EZHH)])));
-        lab_type__PZHH=(__UINTEGER_32)(t__EZHH |  1);
-        next__MZHH=((__POINTER )(NULL));
-        result__OZHH=((__POINTER *)ptr_table__NZHH)[ 0];
-        if ((result__OZHH == (void *)NULL)) {
-          result__OZHH=new_lab__MRJ(lab_type__PZHH);
-          next__MZHH=(void *)((unsigned long)result__OZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZHH)));
-          ((__POINTER *)next__MZHH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NZHH)[ 0]=next__MZHH;
-        } else {
-          next__MZHH=((__POINTER *)result__OZHH)[ 0];
-          if ((next__MZHH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__QZHH <<  1)) <=  4096)) {
-              next__MZHH=(void *)((unsigned long)result__OZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZHH)));
+              next__H1IH=new_lab__URJ(new_size__D1IH);
+            };
+            ((__POINTER *)next__H1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__I1IH)[ 0]=next__H1IH;
+          } else {
+            ((__POINTER *)result__J1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__J1IH=next__H1IH;
+          };
+        };
+        ptr__50IH=result__J1IH;
+      } else {
+        t__E1IH=((__UINTEGER_32 )typ_id__A1IH);
+        a__F1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Q1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1IH + a__F1IH) & (__UINTEGER_32)(~ a__F1IH));
+        ptr_table__N1IH=((__POINTER )(&(table_type[(t__E1IH)])));
+        lab_type__P1IH=(__UINTEGER_32)(t__E1IH |  1);
+        next__M1IH=((__POINTER )(NULL));
+        result__O1IH=((__POINTER *)ptr_table__N1IH)[ 0];
+        if ((result__O1IH == (void *)NULL)) {
+          result__O1IH=new_lab__URJ(lab_type__P1IH);
+          next__M1IH=(void *)((unsigned long)result__O1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1IH)));
+          ((__POINTER *)next__M1IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__N1IH)[ 0]=next__M1IH;
+        } else {
+          next__M1IH=((__POINTER *)result__O1IH)[ 0];
+          if ((next__M1IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O1IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Q1IH <<  1)) <=  4096)) {
+              next__M1IH=(void *)((unsigned long)result__O1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q1IH)));
             } else {
-              next__MZHH=new_lab__MRJ(lab_type__PZHH);
+              next__M1IH=new_lab__URJ(lab_type__P1IH);
             };
-            ((__POINTER *)next__MZHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NZHH)[ 0]=next__MZHH;
+            ((__POINTER *)next__M1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__N1IH)[ 0]=next__M1IH;
           } else {
-            ((__POINTER *)result__OZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OZHH=next__MZHH;
+            ((__POINTER *)result__O1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__O1IH=next__M1IH;
           };
         };
-        ptr__5YHH=result__OZHH;
+        ptr__50IH=result__O1IH;
       };
-      result__4YHH=((__ITM_PROTOTYPE *)ptr__5YHH);
-      *(result__4YHH) = *(ITM_PROTOTYPE__);
+      result__40IH=((__ITM_PROTOTYPE *)ptr__50IH);
+      *(result__40IH) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__4YHH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=p__GZHH;
-    e__LTF=result__4YHH;
-    add_last__U5U(result__1OGH,result__4YHH);
-    copy__Q5H(result__1OGH);
+    ((__ITM_PROTOTYPE *)result__40IH)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=p__G1IH;
+    e__TTF=result__40IH;
+    add_last__25U(result__WQHH,result__40IH);
+    copy__Y5H(result__WQHH);
   };
-  return(result__MTF);
+  return(result__UTF);
 }
 
-static void* read_expr__44I(__PARSER *Self__54I)
+static void* read_expr__G5I(__PARSER *Self__H5I)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__B5I,*value__C5I,*result__BFL,*expr__CFL,*__tmp__IIL;
-  void *__tmp__PJL,*__tmp__VKL;
-  __INTEGER p__J5I,typ_id__040C,typ_id__G0HH,typ_id__Z0HH,typ_id__M1HH;
-  __INTEGER typ_id__3MJD,typ_id__10JD,typ_id__QOJD,last_msg__GFL;
-  __INTEGER first_msg__HFL,typ_id__32HH,typ_id__ZSP,typ_id__23HH;
-  __INTEGER index__R4HH,__tmp__P4HH,i__S4HH,typ_id__W4HH,__tmp__RE1C;
-  __INTEGER i__DICD,typ_id__NXO,typ_id__AZO;
-  void *name__K5I,*n__F3HH,*n__QHP;
-  __POSITION p__WERC,pos__EUWG,p__M0HH,pos__GUWG,pos__IUWG,__tmp__EEJ;
-  __POSITION p__S1HH,pos__MUWG,__tmp__FHJ,__tmp__PHJ,__tmp__YHJ,p__E3HH;
-  __POSITION pos__XUWG,p__PHP,__tmp__MIL,__tmp__SJL,__tmp__ZKL;
-  __ITM_LIST_IDF *result__U40C;
-  __POINTER ptr__V40C,ptr_table__1ZHH,next__0ZHH,result__2ZHH;
-  __POINTER ptr_table__A0HH,next__5ZHH,result__B0HH,ptr__F0HH;
-  __POINTER ptr_table__O0HH,next__N0HH,result__P0HH,ptr_table__T0HH;
-  __POINTER next__S0HH,result__U0HH,ptr__Y0HH,ptr_table__B1HH;
-  __POINTER next__A1HH,result__C1HH,ptr_table__G1HH,next__F1HH;
-  __POINTER result__H1HH,ptr__L1HH,ptr_table__U1HH,next__T1HH;
-  __POINTER result__V1HH,ptr_table__Z1HH,next__Y1HH,result__01HH;
-  __POINTER ptr__YMJD,ptr_table__41HH,next__31HH,result__51HH;
-  __POINTER ptr_table__D2HH,next__C2HH,result__E2HH,ptr__W0JD;
-  __POINTER ptr_table__I2HH,next__H2HH,result__J2HH,ptr_table__N2HH;
-  __POINTER next__M2HH,result__O2HH,ptr__LOJD,ptr_table__S2HH;
-  __POINTER next__R2HH,result__T2HH,ptr_table__X2HH,next__W2HH;
-  __POINTER result__Y2HH,ptr__22HH,ptr_table__H3HH,next__G3HH;
-  __POINTER result__I3HH,ptr_table__M3HH,next__L3HH,result__N3HH;
-  __POINTER ptr__USP,ptr_table__R3HH,next__Q3HH,result__S3HH;
-  __POINTER ptr_table__W3HH,next__V3HH,result__X3HH,ptr__13HH;
-  __POINTER ptr_table__E4HH,next__D4HH,result__F4HH,ptr_table__J4HH;
-  __POINTER next__I4HH,result__K4HH,ptr__V4HH,ptr_table__44HH;
-  __POINTER next__34HH,result__54HH,ptr_table__D5HH,next__C5HH;
-  __POINTER result__E5HH,ptr__IXO,ptr_table__I5HH,next__H5HH;
-  __POINTER result__J5HH,ptr_table__N5HH,next__M5HH,result__O5HH;
-  __POINTER ptr__1YO,ptr_table__S5HH,next__R5HH,result__T5HH;
-  __POINTER ptr_table__X5HH,next__W5HH,result__Y5HH;
-  __UINTEGER_32 sz__X40C,a__MUEH,new_size__NUEH,t__RUEH,a__QUEH;
-  __UINTEGER_32 new_size__D0HH,lab_type__C0HH,sz__H0HH,a__I0HH;
-  __UINTEGER_32 new_size__J0HH,t__K0HH,a__L0HH,new_size__W0HH;
-  __UINTEGER_32 lab_type__V0HH,sz__00HH,a__10HH,new_size__20HH,t__30HH;
-  __UINTEGER_32 a__40HH,new_size__J1HH,lab_type__I1HH,sz__N1HH,a__O1HH;
-  __UINTEGER_32 new_size__P1HH,t__Q1HH,a__R1HH,new_size__21HH;
-  __UINTEGER_32 lab_type__11HH,sz__0MJD,a__NDFH,new_size__ODFH,t__SDFH;
-  __UINTEGER_32 a__RDFH,new_size__G2HH,lab_type__F2HH,sz__Y0JD,a__UUEH;
-  __UINTEGER_32 new_size__VUEH,t__ZUEH,a__YUEH,new_size__Q2HH;
-  __UINTEGER_32 lab_type__P2HH,sz__NOJD,a__VDFH,new_size__WDFH,t__0DFH;
-  __UINTEGER_32 a__ZDFH,new_size__02HH,lab_type__Z2HH,sz__42HH,a__52HH;
-  __UINTEGER_32 new_size__A3HH,t__B3HH,a__C3HH,new_size__P3HH;
-  __UINTEGER_32 lab_type__O3HH,sz__WSP,a__FEFH,new_size__GEFH,t__KEFH;
-  __UINTEGER_32 a__JEFH,new_size__Z3HH,lab_type__Y3HH,sz__33HH,a__43HH;
-  __UINTEGER_32 new_size__53HH,t__A4HH,a__B4HH,new_size__M4HH;
-  __UINTEGER_32 lab_type__L4HH,sz__X4HH,a__Y4HH,new_size__Z4HH,t__04HH;
-  __UINTEGER_32 a__14HH,new_size__G5HH,lab_type__F5HH,sz__KXO,a__1EFH;
-  __UINTEGER_32 new_size__2EFH,t__AFFH,a__5EFH,new_size__Q5HH;
-  __UINTEGER_32 lab_type__P5HH,sz__3YO,a__UWEH,new_size__VWEH,t__ZWEH;
-  __UINTEGER_32 a__YWEH,new_size__05HH,lab_type__Z5HH;
-  __ITM_WRITE_VALUE *result__E0HH,*result__XMJD;
-  __ITM_WRITE_CAST *result__X0HH,*result__KOJD;
-  __ITM_READ *result__K1HH;
-  __ITM_WRITE_CODE *result__V0JD;
-  void *itm_op__FFL,*__tmp__JIL,*__tmp__QJL,*__tmp__WKL;
-  __ITM_OPERATOR *result__12HH,*Self__D3HH,*result__TSP,*Self__XNV;
-  __ITM_READ_ARG1 *result__03HH,*result__U4HH;
-  __ITM_READ_ARG2 *result__HXO;
-  __ITM_EXPRESSION *result__0YO;
-  __CHARACTER affect__D5I,result__SZHH,result__VZHH,result__YZHH;
-  __BOOLEAN again__E5I,result__RZHH,result__UZHH,result__XZHH;
-  __BOOLEAN __tmp__OCJ,__tmp__QEJ,__tmp__IKL;
-  void *l_assignment__I5I,*result__E5K,*result__QERC;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__4V5,*Self__UW5;
-  void *result__13H,*l_expr__DFL;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__1N4,*Self__RO4;
-  __FAST_ARRAYoITM_CODEo *Self__N4HH,*Self__HE1C;
-  void **__tmp__O4HH,**Self__Q4HH,**__tmp__QE1C,**Self__SHCD;
-  result__B5I=NULL;
-  value__C5I=NULL;
-  affect__D5I='\0';
-  again__E5I=FALSE__;
-  l_assignment__I5I=NULL;
-  p__J5I= 0;
-  name__K5I=NULL;
-  old_position__DRI=position__SBC;
-  old_pos_cur__FRI=pos_cur__VBC;
-  old_pos_line__HRI=pos_line__WBC;
-  old_pos_col__JRI=pos_col__XBC;
-  old_short_derive__LRI=short_derive__BCC;
-  result__RZHH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__RZHH=FALSE__;
+  void *result__J5I,*value__K5I,*result__JFL,*expr__KFL,*__tmp__QIL;
+  void *__tmp__XJL,*__tmp__3KL;
+  __INTEGER p__R5I,typ_id__C50C,typ_id__G2IH,typ_id__Z2IH,typ_id__M3IH;
+  __INTEGER typ_id__FNJD,typ_id__D1JD,typ_id__YOJD,last_msg__OFL;
+  __INTEGER first_msg__PFL,typ_id__34IH,typ_id__BTP,typ_id__25IH;
+  __INTEGER index__RAJH,__tmp__PAJH,i__SAJH,typ_id__WAJH,__tmp__ZE1C;
+  __INTEGER i__LICD,typ_id__VXO,typ_id__IZO;
+  void *name__S5I,*n__F5IH,*n__YHP;
+  __POSITION p__4ERC,pos__GRXG,p__M2IH,pos__IRXG,pos__KRXG,__tmp__MEJ;
+  __POSITION p__S3IH,pos__ORXG,__tmp__NHJ,__tmp__XHJ,__tmp__AIJ,p__E5IH;
+  __POSITION pos__ZRXG,p__XHP,__tmp__UIL,__tmp__0JL,__tmp__BLL;
+  __ITM_LIST_IDF *result__240C;
+  __POINTER ptr__340C,ptr_table__11IH,next__01IH,result__21IH;
+  __POINTER ptr_table__A2IH,next__51IH,result__B2IH,ptr__F2IH;
+  __POINTER ptr_table__O2IH,next__N2IH,result__P2IH,ptr_table__T2IH;
+  __POINTER next__S2IH,result__U2IH,ptr__Y2IH,ptr_table__B3IH;
+  __POINTER next__A3IH,result__C3IH,ptr_table__G3IH,next__F3IH;
+  __POINTER result__H3IH,ptr__L3IH,ptr_table__U3IH,next__T3IH;
+  __POINTER result__V3IH,ptr_table__Z3IH,next__Y3IH,result__03IH;
+  __POINTER ptr__ANJD,ptr_table__43IH,next__33IH,result__53IH;
+  __POINTER ptr_table__D4IH,next__C4IH,result__E4IH,ptr__40JD;
+  __POINTER ptr_table__I4IH,next__H4IH,result__J4IH,ptr_table__N4IH;
+  __POINTER next__M4IH,result__O4IH,ptr__TOJD,ptr_table__S4IH;
+  __POINTER next__R4IH,result__T4IH,ptr_table__X4IH,next__W4IH;
+  __POINTER result__Y4IH,ptr__24IH,ptr_table__H5IH,next__G5IH;
+  __POINTER result__I5IH,ptr_table__M5IH,next__L5IH,result__N5IH;
+  __POINTER ptr__2SP,ptr_table__R5IH,next__Q5IH,result__S5IH;
+  __POINTER ptr_table__W5IH,next__V5IH,result__X5IH,ptr__15IH;
+  __POINTER ptr_table__EAJH,next__DAJH,result__FAJH,ptr_table__JAJH;
+  __POINTER next__IAJH,result__KAJH,ptr__VAJH,ptr_table__4AJH;
+  __POINTER next__3AJH,result__5AJH,ptr_table__DBJH,next__CBJH;
+  __POINTER result__EBJH,ptr__QXO,ptr_table__IBJH,next__HBJH;
+  __POINTER result__JBJH,ptr_table__NBJH,next__MBJH,result__OBJH;
+  __POINTER ptr__DZO,ptr_table__SBJH,next__RBJH,result__TBJH;
+  __POINTER ptr_table__XBJH,next__WBJH,result__YBJH;
+  __UINTEGER_32 sz__540C,a__2VFH,new_size__3VFH,t__BWFH,a__AWFH;
+  __UINTEGER_32 new_size__D2IH,lab_type__C2IH,sz__H2IH,a__I2IH;
+  __UINTEGER_32 new_size__J2IH,t__K2IH,a__L2IH,new_size__W2IH;
+  __UINTEGER_32 lab_type__V2IH,sz__02IH,a__12IH,new_size__22IH,t__32IH;
+  __UINTEGER_32 a__42IH,new_size__J3IH,lab_type__I3IH,sz__N3IH,a__O3IH;
+  __UINTEGER_32 new_size__P3IH,t__Q3IH,a__R3IH,new_size__23IH;
+  __UINTEGER_32 lab_type__13IH,sz__CNJD,a__3EGH,new_size__4EGH,t__CFGH;
+  __UINTEGER_32 a__BFGH,new_size__G4IH,lab_type__F4IH,sz__A1JD,a__EWFH;
+  __UINTEGER_32 new_size__FWFH,t__JWFH,a__IWFH,new_size__Q4IH;
+  __UINTEGER_32 lab_type__P4IH,sz__VOJD,a__FFGH,new_size__GFGH,t__KFGH;
+  __UINTEGER_32 a__JFGH,new_size__04IH,lab_type__Z4IH,sz__44IH,a__54IH;
+  __UINTEGER_32 new_size__A5IH,t__B5IH,a__C5IH,new_size__P5IH;
+  __UINTEGER_32 lab_type__O5IH,sz__4SP,a__VFGH,new_size__WFGH,t__0FGH;
+  __UINTEGER_32 a__ZFGH,new_size__Z5IH,lab_type__Y5IH,sz__35IH,a__45IH;
+  __UINTEGER_32 new_size__55IH,t__AAJH,a__BAJH,new_size__MAJH;
+  __UINTEGER_32 lab_type__LAJH,sz__XAJH,a__YAJH,new_size__ZAJH,t__0AJH;
+  __UINTEGER_32 a__1AJH,new_size__GBJH,lab_type__FBJH,sz__SXO,a__LGGH;
+  __UINTEGER_32 new_size__MGGH,t__QGGH,a__PGGH,new_size__QBJH;
+  __UINTEGER_32 lab_type__PBJH,sz__FZO,a__EYFH,new_size__FYFH,t__JYFH;
+  __UINTEGER_32 a__IYFH,new_size__0BJH,lab_type__ZBJH;
+  __ITM_WRITE_VALUE *result__E2IH,*result__5MJD;
+  __ITM_WRITE_CAST *result__X2IH,*result__SOJD;
+  __ITM_READ *result__K3IH;
+  __ITM_WRITE_CODE *result__30JD;
+  void *itm_op__NFL,*__tmp__RIL,*__tmp__YJL,*__tmp__4KL;
+  __ITM_OPERATOR *result__14IH,*Self__D5IH,*result__1SP,*Self__5NV;
+  __ITM_READ_ARG1 *result__05IH,*result__UAJH;
+  __ITM_READ_ARG2 *result__PXO;
+  __ITM_EXPRESSION *result__CZO;
+  __CHARACTER affect__L5I,result__S1IH,result__V1IH,result__Y1IH;
+  __BOOLEAN again__M5I,result__R1IH,result__U1IH,result__X1IH;
+  __BOOLEAN __tmp__WCJ,__tmp__YEJ,__tmp__QKL;
+  void *l_assignment__Q5I,*result__M5K,*result__YERC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__GW5,*Self__2W5;
+  void *result__D4H,*l_expr__LFL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__DO4,*Self__ZO4;
+  __FAST_ARRAYoITM_CODEo *Self__NAJH,*Self__PE1C;
+  void **__tmp__OAJH,**Self__QAJH,**__tmp__YE1C,**Self__0HCD;
+  result__J5I=NULL;
+  value__K5I=NULL;
+  affect__L5I='\0';
+  again__M5I=FALSE__;
+  l_assignment__Q5I=NULL;
+  p__R5I= 0;
+  name__S5I=NULL;
+  old_position__LRI=position__0BC;
+  old_pos_cur__NRI=pos_cur__3BC;
+  old_pos_line__PRI=pos_line__4BC;
+  old_pos_col__RRI=pos_col__5BC;
+  old_short_derive__TRI=short_derive__JCC;
+  result__R1IH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__R1IH=FALSE__;
   } else {
-    result__SZHH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__SZHH=((__CHARACTER )(( 0)));
+    result__S1IH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__S1IH=((__CHARACTER )(( 0)));
     } else {
-      result__SZHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__S1IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__SZHH == '(')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__RZHH=TRUE__;
+    if ((result__S1IH == '(')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__R1IH=TRUE__;
     };
   };
-  if (result__RZHH) {
-    result__E5K=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K)->parent_arrayed_collection__J5K.upper__0SU <  0)) {
-      result__E5K=create_with_capacity__BHRC( 16);
+  if (result__R1IH) {
+    result__M5K=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K)->parent_arrayed_collection__R5K.upper__CTU <  0)) {
+      result__M5K=create_with_capacity__JHRC( 16);
     } else {
-      Self__4V5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
-      result__E5K=((void **)Self__4V5->parent_arrayed_collection__J5K.storage__KVU)[Self__4V5->parent_arrayed_collection__J5K.upper__0SU];
-      Self__UW5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
-      Self__UW5->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__UW5->parent_arrayed_collection__J5K.upper__0SU -  1);
+      Self__GW5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K);
+      result__M5K=((void **)Self__GW5->parent_arrayed_collection__R5K.storage__SVU)[Self__GW5->parent_arrayed_collection__R5K.upper__CTU];
+      Self__2W5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K);
+      Self__2W5->parent_arrayed_collection__R5K.upper__CTU=(__INTEGER)(Self__2W5->parent_arrayed_collection__R5K.upper__CTU -  1);
     };
-    l_assignment__I5I=result__E5K;
+    l_assignment__Q5I=result__M5K;
     do {
-      again__E5I=FALSE__;
-      if (read_identifier__LAL()) {
-        p__J5I=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
-        copy__ZCS(string_tmp2__BAJ,last_string__I0C);
-        while (read_identifier__LAL()) {
-          append__BOS(string_tmp2__BAJ,(&__string_112));
-          append__BOS(string_tmp2__BAJ,last_string__I0C);
-        };
-        name__K5I=get__IWB(string_tmp2__BAJ);
-        add_last__RBPD(l_assignment__I5I,name__K5I);
-        if (is_shorter__5Y) {
-          if ((! fast_has__3DV(short_local__JCC,name__K5I))) {
-            short__token__to__LBD((&__string_131),p__J5I,position__SBC);
-          };
-        };
-        result__UZHH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__UZHH=FALSE__;
-        } else {
-          result__VZHH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__VZHH=((__CHARACTER )(( 0)));
-          } else {
-            result__VZHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-          };
-          if ((result__VZHH == ',')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__UZHH=TRUE__;
-          };
-        };
-        if (result__UZHH) {
-          again__E5I=TRUE__;
-        };
-      };
-    } while (again__E5I);
-    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__E5K)->parent_arrayed_collection__H5I.upper__15OD <  0))) {
-      result__XZHH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__XZHH=FALSE__;
-      } else {
-        result__YZHH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__YZHH=((__CHARACTER )(( 0)));
-        } else {
-          result__YZHH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-        };
-        if ((result__YZHH == ')')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__XZHH=TRUE__;
-        };
-      };
-      __tmp__OCJ=result__XZHH;
-    } else {
-      __tmp__OCJ=FALSE__;
-    };
-    if ((__tmp__OCJ && ((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14))))) {
-      result__QERC=create_with_capacity__BHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__E5K)->parent_arrayed_collection__H5I.upper__15OD +  1));
-      copy__22RD(result__QERC,result__E5K);
-      free__0S5(result__E5K);
-      l_assignment__I5I=result__QERC;
-      p__WERC=current_position__JXF();
-      result__U40C=NULL;
-      ptr__V40C=((__POINTER )(NULL));
-      typ_id__040C= 0;
-      sz__X40C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
-      if ((sz__X40C ==  0)) {
-        result__U40C=ITM_LIST_IDF__;
-      } else {
-        typ_id__040C=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__X40C);
-        if ((typ_id__040C == (__INTEGER)(-  1))) {
-          a__MUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__NUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__X40C + a__MUEH) & (__UINTEGER_32)(~ a__MUEH));
-          ptr_table__1ZHH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__0ZHH=((__POINTER )(NULL));
-          result__2ZHH=((__POINTER *)ptr_table__1ZHH)[ 0];
-          if ((result__2ZHH == (void *)NULL)) {
-            result__2ZHH=new_lab__MRJ(new_size__NUEH);
-            next__0ZHH=(void *)((unsigned long)result__2ZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUEH)));
-            ((__POINTER *)next__0ZHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1ZHH)[ 0]=next__0ZHH;
-          } else {
-            next__0ZHH=((__POINTER *)result__2ZHH)[ 0];
-            if ((next__0ZHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2ZHH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NUEH <<  1)) <=  4096)) {
-                next__0ZHH=(void *)((unsigned long)result__2ZHH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUEH)));
+      again__M5I=FALSE__;
+      if (read_identifier__TAL()) {
+        p__R5I=(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD);
+        copy__BDS(string_tmp2__JAJ,last_string__Q0C);
+        while (read_identifier__TAL()) {
+          append__JOS(string_tmp2__JAJ,(&__string_112));
+          append__JOS(string_tmp2__JAJ,last_string__Q0C);
+        };
+        name__S5I=get__QWB(string_tmp2__JAJ);
+        add_last__ZBPD(l_assignment__Q5I,name__S5I);
+        if (is_shorter__FZ) {
+          if ((! fast_has__FEV(short_local__RCC,name__S5I))) {
+            short__token__to__TBD((&__string_131),p__R5I,position__0BC);
+          };
+        };
+        result__U1IH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__U1IH=FALSE__;
+        } else {
+          result__V1IH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__V1IH=((__CHARACTER )(( 0)));
+          } else {
+            result__V1IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          };
+          if ((result__V1IH == ',')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__U1IH=TRUE__;
+          };
+        };
+        if (result__U1IH) {
+          again__M5I=TRUE__;
+        };
+      };
+    } while (again__M5I);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__M5K)->parent_arrayed_collection__P5I.upper__DAPD <  0))) {
+      result__X1IH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__X1IH=FALSE__;
+      } else {
+        result__Y1IH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__Y1IH=((__CHARACTER )(( 0)));
+        } else {
+          result__Y1IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        };
+        if ((result__Y1IH == ')')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__X1IH=TRUE__;
+        };
+      };
+      __tmp__WCJ=result__X1IH;
+    } else {
+      __tmp__WCJ=FALSE__;
+    };
+    if ((__tmp__WCJ && ((read_symbol__LXJ((&__string_12)) || read_symbol__LXJ((&__string_13))) || read_symbol__LXJ((&__string_14))))) {
+      result__YERC=create_with_capacity__JHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__M5K)->parent_arrayed_collection__P5I.upper__DAPD +  1));
+      copy__E3RD(result__YERC,result__M5K);
+      free__CT5(result__M5K);
+      l_assignment__Q5I=result__YERC;
+      p__4ERC=current_position__RXF();
+      result__240C=NULL;
+      ptr__340C=((__POINTER )(NULL));
+      typ_id__C50C= 0;
+      sz__540C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__540C ==  0)) {
+        result__240C=ITM_LIST_IDF__;
+      } else {
+        typ_id__C50C=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__540C);
+        if ((typ_id__C50C == (__INTEGER)(-  1))) {
+          a__2VFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__3VFH=(__UINTEGER_32)((__UINTEGER_32)(sz__540C + a__2VFH) & (__UINTEGER_32)(~ a__2VFH));
+          ptr_table__11IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3VFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__01IH=((__POINTER )(NULL));
+          result__21IH=((__POINTER *)ptr_table__11IH)[ 0];
+          if ((result__21IH == (void *)NULL)) {
+            result__21IH=new_lab__URJ(new_size__3VFH);
+            next__01IH=(void *)((unsigned long)result__21IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VFH)));
+            ((__POINTER *)next__01IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__11IH)[ 0]=next__01IH;
+          } else {
+            next__01IH=((__POINTER *)result__21IH)[ 0];
+            if ((next__01IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__21IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3VFH <<  1)) <=  4096)) {
+                next__01IH=(void *)((unsigned long)result__21IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VFH)));
               } else {
-                next__0ZHH=new_lab__MRJ(new_size__NUEH);
+                next__01IH=new_lab__URJ(new_size__3VFH);
               };
-              ((__POINTER *)next__0ZHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1ZHH)[ 0]=next__0ZHH;
+              ((__POINTER *)next__01IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__11IH)[ 0]=next__01IH;
             } else {
-              ((__POINTER *)result__2ZHH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0ZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2ZHH=next__0ZHH;
-            };
-          };
-          ptr__V40C=result__2ZHH;
-        } else {
-          t__RUEH=((__UINTEGER_32 )typ_id__040C);
-          a__QUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__D0HH=(__UINTEGER_32)((__UINTEGER_32)(sz__X40C + a__QUEH) & (__UINTEGER_32)(~ a__QUEH));
-          ptr_table__A0HH=((__POINTER )(&(table_type[(t__RUEH)])));
-          lab_type__C0HH=(__UINTEGER_32)(t__RUEH |  1);
-          next__5ZHH=((__POINTER )(NULL));
-          result__B0HH=((__POINTER *)ptr_table__A0HH)[ 0];
-          if ((result__B0HH == (void *)NULL)) {
-            result__B0HH=new_lab__MRJ(lab_type__C0HH);
-            next__5ZHH=(void *)((unsigned long)result__B0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0HH)));
-            ((__POINTER *)next__5ZHH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__A0HH)[ 0]=next__5ZHH;
-          } else {
-            next__5ZHH=((__POINTER *)result__B0HH)[ 0];
-            if ((next__5ZHH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__D0HH <<  1)) <=  4096)) {
-                next__5ZHH=(void *)((unsigned long)result__B0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0HH)));
+              ((__POINTER *)result__21IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__01IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__21IH=next__01IH;
+            };
+          };
+          ptr__340C=result__21IH;
+        } else {
+          t__BWFH=((__UINTEGER_32 )typ_id__C50C);
+          a__AWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__D2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__540C + a__AWFH) & (__UINTEGER_32)(~ a__AWFH));
+          ptr_table__A2IH=((__POINTER )(&(table_type[(t__BWFH)])));
+          lab_type__C2IH=(__UINTEGER_32)(t__BWFH |  1);
+          next__51IH=((__POINTER )(NULL));
+          result__B2IH=((__POINTER *)ptr_table__A2IH)[ 0];
+          if ((result__B2IH == (void *)NULL)) {
+            result__B2IH=new_lab__URJ(lab_type__C2IH);
+            next__51IH=(void *)((unsigned long)result__B2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2IH)));
+            ((__POINTER *)next__51IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__A2IH)[ 0]=next__51IH;
+          } else {
+            next__51IH=((__POINTER *)result__B2IH)[ 0];
+            if ((next__51IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B2IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__D2IH <<  1)) <=  4096)) {
+                next__51IH=(void *)((unsigned long)result__B2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2IH)));
               } else {
-                next__5ZHH=new_lab__MRJ(lab_type__C0HH);
+                next__51IH=new_lab__URJ(lab_type__C2IH);
               };
-              ((__POINTER *)next__5ZHH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__A0HH)[ 0]=next__5ZHH;
+              ((__POINTER *)next__51IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__A2IH)[ 0]=next__51IH;
             } else {
-              ((__POINTER *)result__B0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5ZHH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__B0HH=next__5ZHH;
+              ((__POINTER *)result__B2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__B2IH=next__51IH;
             };
           };
-          ptr__V40C=result__B0HH;
+          ptr__340C=result__B2IH;
         };
-        result__U40C=((__ITM_LIST_IDF *)ptr__V40C);
-        *(result__U40C) = *(ITM_LIST_IDF__);
+        result__240C=((__ITM_LIST_IDF *)ptr__340C);
+        *(result__240C) = *(ITM_LIST_IDF__);
       };
-      ((__ITM_LIST_IDF *)result__U40C)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ=p__WERC;
-      result__B5I=result__U40C;
-      affect__D5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
-      value__C5I=read_expr__44I(Self__54I);
-      if (((void *)value__C5I == (void *)NULL)) {
-        pos__EUWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_240));
-        put_position__UOG(pos__EUWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      ((__ITM_LIST_IDF *)result__240C)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ=p__4ERC;
+      result__J5I=result__240C;
+      affect__L5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[ 0];
+      value__K5I=read_expr__G5I(Self__H5I);
+      if (((void *)value__K5I == (void *)NULL)) {
+        pos__GRXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_238));
+        put_position__2OG(pos__GRXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      if ((affect__D5I == ':')) {
-        p__M0HH=result__U40C->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
-        result__E0HH=NULL;
-        ptr__F0HH=((__POINTER )(NULL));
-        typ_id__G0HH= 0;
-        sz__H0HH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-        if ((sz__H0HH ==  0)) {
-          result__E0HH=ITM_WRITE_VALUE__;
-        } else {
-          typ_id__G0HH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__H0HH);
-          if ((typ_id__G0HH == (__INTEGER)(-  1))) {
-            a__I0HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__J0HH=(__UINTEGER_32)((__UINTEGER_32)(sz__H0HH + a__I0HH) & (__UINTEGER_32)(~ a__I0HH));
-            ptr_table__O0HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J0HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__N0HH=((__POINTER )(NULL));
-            result__P0HH=((__POINTER *)ptr_table__O0HH)[ 0];
-            if ((result__P0HH == (void *)NULL)) {
-              result__P0HH=new_lab__MRJ(new_size__J0HH);
-              next__N0HH=(void *)((unsigned long)result__P0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0HH)));
-              ((__POINTER *)next__N0HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__O0HH)[ 0]=next__N0HH;
+      if ((affect__L5I == ':')) {
+        p__M2IH=result__240C->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+        result__E2IH=NULL;
+        ptr__F2IH=((__POINTER )(NULL));
+        typ_id__G2IH= 0;
+        sz__H2IH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__H2IH ==  0)) {
+          result__E2IH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__G2IH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__H2IH);
+          if ((typ_id__G2IH == (__INTEGER)(-  1))) {
+            a__I2IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__J2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__H2IH + a__I2IH) & (__UINTEGER_32)(~ a__I2IH));
+            ptr_table__O2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J2IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__N2IH=((__POINTER )(NULL));
+            result__P2IH=((__POINTER *)ptr_table__O2IH)[ 0];
+            if ((result__P2IH == (void *)NULL)) {
+              result__P2IH=new_lab__URJ(new_size__J2IH);
+              next__N2IH=(void *)((unsigned long)result__P2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J2IH)));
+              ((__POINTER *)next__N2IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__O2IH)[ 0]=next__N2IH;
             } else {
-              next__N0HH=((__POINTER *)result__P0HH)[ 0];
-              if ((next__N0HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J0HH <<  1)) <=  4096)) {
-                  next__N0HH=(void *)((unsigned long)result__P0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J0HH)));
+              next__N2IH=((__POINTER *)result__P2IH)[ 0];
+              if ((next__N2IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P2IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__J2IH <<  1)) <=  4096)) {
+                  next__N2IH=(void *)((unsigned long)result__P2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J2IH)));
                 } else {
-                  next__N0HH=new_lab__MRJ(new_size__J0HH);
+                  next__N2IH=new_lab__URJ(new_size__J2IH);
                 };
-                ((__POINTER *)next__N0HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__O0HH)[ 0]=next__N0HH;
+                ((__POINTER *)next__N2IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__O2IH)[ 0]=next__N2IH;
               } else {
-                ((__POINTER *)result__P0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__P0HH=next__N0HH;
+                ((__POINTER *)result__P2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__P2IH=next__N2IH;
               };
             };
-            ptr__F0HH=result__P0HH;
-          } else {
-            t__K0HH=((__UINTEGER_32 )typ_id__G0HH);
-            a__L0HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__W0HH=(__UINTEGER_32)((__UINTEGER_32)(sz__H0HH + a__L0HH) & (__UINTEGER_32)(~ a__L0HH));
-            ptr_table__T0HH=((__POINTER )(&(table_type[(t__K0HH)])));
-            lab_type__V0HH=(__UINTEGER_32)(t__K0HH |  1);
-            next__S0HH=((__POINTER )(NULL));
-            result__U0HH=((__POINTER *)ptr_table__T0HH)[ 0];
-            if ((result__U0HH == (void *)NULL)) {
-              result__U0HH=new_lab__MRJ(lab_type__V0HH);
-              next__S0HH=(void *)((unsigned long)result__U0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0HH)));
-              ((__POINTER *)next__S0HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__T0HH)[ 0]=next__S0HH;
+            ptr__F2IH=result__P2IH;
+          } else {
+            t__K2IH=((__UINTEGER_32 )typ_id__G2IH);
+            a__L2IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__W2IH=(__UINTEGER_32)((__UINTEGER_32)(sz__H2IH + a__L2IH) & (__UINTEGER_32)(~ a__L2IH));
+            ptr_table__T2IH=((__POINTER )(&(table_type[(t__K2IH)])));
+            lab_type__V2IH=(__UINTEGER_32)(t__K2IH |  1);
+            next__S2IH=((__POINTER )(NULL));
+            result__U2IH=((__POINTER *)ptr_table__T2IH)[ 0];
+            if ((result__U2IH == (void *)NULL)) {
+              result__U2IH=new_lab__URJ(lab_type__V2IH);
+              next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2IH)));
+              ((__POINTER *)next__S2IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
             } else {
-              next__S0HH=((__POINTER *)result__U0HH)[ 0];
-              if ((next__S0HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__W0HH <<  1)) <=  4096)) {
-                  next__S0HH=(void *)((unsigned long)result__U0HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0HH)));
+              next__S2IH=((__POINTER *)result__U2IH)[ 0];
+              if ((next__S2IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U2IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__W2IH <<  1)) <=  4096)) {
+                  next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2IH)));
                 } else {
-                  next__S0HH=new_lab__MRJ(lab_type__V0HH);
+                  next__S2IH=new_lab__URJ(lab_type__V2IH);
                 };
-                ((__POINTER *)next__S0HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__T0HH)[ 0]=next__S0HH;
+                ((__POINTER *)next__S2IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
               } else {
-                ((__POINTER *)result__U0HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__U0HH=next__S0HH;
+                ((__POINTER *)result__U2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__U2IH=next__S2IH;
               };
             };
-            ptr__F0HH=result__U0HH;
+            ptr__F2IH=result__U2IH;
           };
-          result__E0HH=((__ITM_WRITE_VALUE *)ptr__F0HH);
-          *(result__E0HH) = *(ITM_WRITE_VALUE__);
+          result__E2IH=((__ITM_WRITE_VALUE *)ptr__F2IH);
+          *(result__E2IH) = *(ITM_WRITE_VALUE__);
         };
-        ((__ITM_WRITE_VALUE *)result__E0HH)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=p__M0HH;
-        result__B5I=result__E0HH;
+        ((__ITM_WRITE_VALUE *)result__E2IH)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ=p__M2IH;
+        result__J5I=result__E2IH;
       };
-      if ((affect__D5I == '<')) {
-        pos__GUWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_296));
-        put_position__UOG(pos__GUWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((affect__L5I == '<')) {
+        pos__IRXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_295));
+        put_position__2OG(pos__IRXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      if ((affect__D5I == '?')) {
-        pos__IUWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_297));
-        put_position__UOG(pos__IUWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((affect__L5I == '?')) {
+        pos__KRXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_296));
+        put_position__2OG(pos__KRXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__B5I)->__id) {
+        switch (((struct ___OBJ *)result__J5I)->__id) {
         case __ITM_LIST__: {
-          __tmp__EEJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__EEJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__EEJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__EEJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__EEJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__EEJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_READ__: {
-          __tmp__EEJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__EEJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__EEJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__EEJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__EEJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__EEJ=position__FD5B(result__B5I);
+          __tmp__MEJ=position__ND5B(result__J5I);
         } break;
         case __ITM_OLD__: {
-          __tmp__EEJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__EEJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__EEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__EEJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__EEJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__EEJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__EEJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__EEJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__EEJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+          __tmp__MEJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__EEJ=position__FJHC(result__B5I);
+          __tmp__MEJ=position__NJHC(result__J5I);
         } break;
         };
-        result__X0HH=NULL;
-        ptr__Y0HH=((__POINTER )(NULL));
-        typ_id__Z0HH= 0;
-        sz__00HH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-        if ((sz__00HH ==  0)) {
-          result__X0HH=ITM_WRITE_CAST__;
-        } else {
-          typ_id__Z0HH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__00HH);
-          if ((typ_id__Z0HH == (__INTEGER)(-  1))) {
-            a__10HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__20HH=(__UINTEGER_32)((__UINTEGER_32)(sz__00HH + a__10HH) & (__UINTEGER_32)(~ a__10HH));
-            ptr_table__B1HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__20HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__A1HH=((__POINTER )(NULL));
-            result__C1HH=((__POINTER *)ptr_table__B1HH)[ 0];
-            if ((result__C1HH == (void *)NULL)) {
-              result__C1HH=new_lab__MRJ(new_size__20HH);
-              next__A1HH=(void *)((unsigned long)result__C1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20HH)));
-              ((__POINTER *)next__A1HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B1HH)[ 0]=next__A1HH;
+        result__X2IH=NULL;
+        ptr__Y2IH=((__POINTER )(NULL));
+        typ_id__Z2IH= 0;
+        sz__02IH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__02IH ==  0)) {
+          result__X2IH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__Z2IH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__02IH);
+          if ((typ_id__Z2IH == (__INTEGER)(-  1))) {
+            a__12IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__22IH=(__UINTEGER_32)((__UINTEGER_32)(sz__02IH + a__12IH) & (__UINTEGER_32)(~ a__12IH));
+            ptr_table__B3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__22IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__A3IH=((__POINTER )(NULL));
+            result__C3IH=((__POINTER *)ptr_table__B3IH)[ 0];
+            if ((result__C3IH == (void *)NULL)) {
+              result__C3IH=new_lab__URJ(new_size__22IH);
+              next__A3IH=(void *)((unsigned long)result__C3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22IH)));
+              ((__POINTER *)next__A3IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B3IH)[ 0]=next__A3IH;
             } else {
-              next__A1HH=((__POINTER *)result__C1HH)[ 0];
-              if ((next__A1HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__20HH <<  1)) <=  4096)) {
-                  next__A1HH=(void *)((unsigned long)result__C1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20HH)));
+              next__A3IH=((__POINTER *)result__C3IH)[ 0];
+              if ((next__A3IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C3IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__22IH <<  1)) <=  4096)) {
+                  next__A3IH=(void *)((unsigned long)result__C3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22IH)));
                 } else {
-                  next__A1HH=new_lab__MRJ(new_size__20HH);
+                  next__A3IH=new_lab__URJ(new_size__22IH);
                 };
-                ((__POINTER *)next__A1HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__B1HH)[ 0]=next__A1HH;
+                ((__POINTER *)next__A3IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__B3IH)[ 0]=next__A3IH;
               } else {
-                ((__POINTER *)result__C1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__C1HH=next__A1HH;
+                ((__POINTER *)result__C3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__C3IH=next__A3IH;
               };
             };
-            ptr__Y0HH=result__C1HH;
-          } else {
-            t__30HH=((__UINTEGER_32 )typ_id__Z0HH);
-            a__40HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__J1HH=(__UINTEGER_32)((__UINTEGER_32)(sz__00HH + a__40HH) & (__UINTEGER_32)(~ a__40HH));
-            ptr_table__G1HH=((__POINTER )(&(table_type[(t__30HH)])));
-            lab_type__I1HH=(__UINTEGER_32)(t__30HH |  1);
-            next__F1HH=((__POINTER )(NULL));
-            result__H1HH=((__POINTER *)ptr_table__G1HH)[ 0];
-            if ((result__H1HH == (void *)NULL)) {
-              result__H1HH=new_lab__MRJ(lab_type__I1HH);
-              next__F1HH=(void *)((unsigned long)result__H1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1HH)));
-              ((__POINTER *)next__F1HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__G1HH)[ 0]=next__F1HH;
+            ptr__Y2IH=result__C3IH;
+          } else {
+            t__32IH=((__UINTEGER_32 )typ_id__Z2IH);
+            a__42IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__J3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__02IH + a__42IH) & (__UINTEGER_32)(~ a__42IH));
+            ptr_table__G3IH=((__POINTER )(&(table_type[(t__32IH)])));
+            lab_type__I3IH=(__UINTEGER_32)(t__32IH |  1);
+            next__F3IH=((__POINTER )(NULL));
+            result__H3IH=((__POINTER *)ptr_table__G3IH)[ 0];
+            if ((result__H3IH == (void *)NULL)) {
+              result__H3IH=new_lab__URJ(lab_type__I3IH);
+              next__F3IH=(void *)((unsigned long)result__H3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J3IH)));
+              ((__POINTER *)next__F3IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__G3IH)[ 0]=next__F3IH;
             } else {
-              next__F1HH=((__POINTER *)result__H1HH)[ 0];
-              if ((next__F1HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__J1HH <<  1)) <=  4096)) {
-                  next__F1HH=(void *)((unsigned long)result__H1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1HH)));
+              next__F3IH=((__POINTER *)result__H3IH)[ 0];
+              if ((next__F3IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H3IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__J3IH <<  1)) <=  4096)) {
+                  next__F3IH=(void *)((unsigned long)result__H3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J3IH)));
                 } else {
-                  next__F1HH=new_lab__MRJ(lab_type__I1HH);
+                  next__F3IH=new_lab__URJ(lab_type__I3IH);
                 };
-                ((__POINTER *)next__F1HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__G1HH)[ 0]=next__F1HH;
+                ((__POINTER *)next__F3IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__G3IH)[ 0]=next__F3IH;
               } else {
-                ((__POINTER *)result__H1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__H1HH=next__F1HH;
+                ((__POINTER *)result__H3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__H3IH=next__F3IH;
               };
             };
-            ptr__Y0HH=result__H1HH;
+            ptr__Y2IH=result__H3IH;
           };
-          result__X0HH=((__ITM_WRITE_CAST *)ptr__Y0HH);
-          *(result__X0HH) = *(ITM_WRITE_CAST__);
+          result__X2IH=((__ITM_WRITE_CAST *)ptr__Y2IH);
+          *(result__X2IH) = *(ITM_WRITE_CAST__);
         };
-        ((__ITM_WRITE_CAST *)result__X0HH)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__EEJ;
-        result__B5I=result__X0HH;
+        ((__ITM_WRITE_CAST *)result__X2IH)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ=__tmp__MEJ;
+        result__J5I=result__X2IH;
       };
     } else {
-      free__0S5(l_assignment__I5I);
+      free__CT5(l_assignment__Q5I);
     };
-    __tmp__QEJ=TRUE__;
+    __tmp__YEJ=TRUE__;
   } else {
-    __tmp__QEJ=FALSE__;
-  };
-  if ((! __tmp__QEJ)) {
-    if (read_identifier__LAL()) {
-      p__J5I=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
-      copy__ZCS(string_tmp2__BAJ,last_string__I0C);
-      while (read_identifier__LAL()) {
-        append__BOS(string_tmp2__BAJ,(&__string_112));
-        append__BOS(string_tmp2__BAJ,last_string__I0C);
-      };
-      name__K5I=get__IWB(string_tmp2__BAJ);
-      if (is_shorter__5Y) {
-        if ((! fast_has__3DV(short_local__JCC,name__K5I))) {
-          short__token__to__LBD((&__string_131),p__J5I,position__SBC);
-        };
-      };
-      if (((read_symbol__DXJ((&__string_12)) || read_symbol__DXJ((&__string_13))) || read_symbol__DXJ((&__string_14)))) {
-        p__S1HH=current_position__JXF();
-        result__K1HH=NULL;
-        ptr__L1HH=((__POINTER )(NULL));
-        typ_id__M1HH= 0;
-        sz__N1HH=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__N1HH ==  0)) {
-          result__K1HH=ITM_READ__;
-        } else {
-          typ_id__M1HH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__N1HH);
-          if ((typ_id__M1HH == (__INTEGER)(-  1))) {
-            a__O1HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__P1HH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1HH + a__O1HH) & (__UINTEGER_32)(~ a__O1HH));
-            ptr_table__U1HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P1HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__T1HH=((__POINTER )(NULL));
-            result__V1HH=((__POINTER *)ptr_table__U1HH)[ 0];
-            if ((result__V1HH == (void *)NULL)) {
-              result__V1HH=new_lab__MRJ(new_size__P1HH);
-              next__T1HH=(void *)((unsigned long)result__V1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1HH)));
-              ((__POINTER *)next__T1HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__U1HH)[ 0]=next__T1HH;
+    __tmp__YEJ=FALSE__;
+  };
+  if ((! __tmp__YEJ)) {
+    if (read_identifier__TAL()) {
+      p__R5I=(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD);
+      copy__BDS(string_tmp2__JAJ,last_string__Q0C);
+      while (read_identifier__TAL()) {
+        append__JOS(string_tmp2__JAJ,(&__string_112));
+        append__JOS(string_tmp2__JAJ,last_string__Q0C);
+      };
+      name__S5I=get__QWB(string_tmp2__JAJ);
+      if (is_shorter__FZ) {
+        if ((! fast_has__FEV(short_local__RCC,name__S5I))) {
+          short__token__to__TBD((&__string_131),p__R5I,position__0BC);
+        };
+      };
+      if (((read_symbol__LXJ((&__string_12)) || read_symbol__LXJ((&__string_13))) || read_symbol__LXJ((&__string_14)))) {
+        p__S3IH=current_position__RXF();
+        result__K3IH=NULL;
+        ptr__L3IH=((__POINTER )(NULL));
+        typ_id__M3IH= 0;
+        sz__N3IH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__N3IH ==  0)) {
+          result__K3IH=ITM_READ__;
+        } else {
+          typ_id__M3IH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__N3IH);
+          if ((typ_id__M3IH == (__INTEGER)(-  1))) {
+            a__O3IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__P3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__N3IH + a__O3IH) & (__UINTEGER_32)(~ a__O3IH));
+            ptr_table__U3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P3IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__T3IH=((__POINTER )(NULL));
+            result__V3IH=((__POINTER *)ptr_table__U3IH)[ 0];
+            if ((result__V3IH == (void *)NULL)) {
+              result__V3IH=new_lab__URJ(new_size__P3IH);
+              next__T3IH=(void *)((unsigned long)result__V3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3IH)));
+              ((__POINTER *)next__T3IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__U3IH)[ 0]=next__T3IH;
             } else {
-              next__T1HH=((__POINTER *)result__V1HH)[ 0];
-              if ((next__T1HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V1HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__P1HH <<  1)) <=  4096)) {
-                  next__T1HH=(void *)((unsigned long)result__V1HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1HH)));
+              next__T3IH=((__POINTER *)result__V3IH)[ 0];
+              if ((next__T3IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V3IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__P3IH <<  1)) <=  4096)) {
+                  next__T3IH=(void *)((unsigned long)result__V3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3IH)));
                 } else {
-                  next__T1HH=new_lab__MRJ(new_size__P1HH);
+                  next__T3IH=new_lab__URJ(new_size__P3IH);
                 };
-                ((__POINTER *)next__T1HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__U1HH)[ 0]=next__T1HH;
+                ((__POINTER *)next__T3IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__U3IH)[ 0]=next__T3IH;
               } else {
-                ((__POINTER *)result__V1HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__V1HH=next__T1HH;
+                ((__POINTER *)result__V3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__V3IH=next__T3IH;
               };
             };
-            ptr__L1HH=result__V1HH;
-          } else {
-            t__Q1HH=((__UINTEGER_32 )typ_id__M1HH);
-            a__R1HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__21HH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1HH + a__R1HH) & (__UINTEGER_32)(~ a__R1HH));
-            ptr_table__Z1HH=((__POINTER )(&(table_type[(t__Q1HH)])));
-            lab_type__11HH=(__UINTEGER_32)(t__Q1HH |  1);
-            next__Y1HH=((__POINTER )(NULL));
-            result__01HH=((__POINTER *)ptr_table__Z1HH)[ 0];
-            if ((result__01HH == (void *)NULL)) {
-              result__01HH=new_lab__MRJ(lab_type__11HH);
-              next__Y1HH=(void *)((unsigned long)result__01HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21HH)));
-              ((__POINTER *)next__Y1HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__Z1HH)[ 0]=next__Y1HH;
+            ptr__L3IH=result__V3IH;
+          } else {
+            t__Q3IH=((__UINTEGER_32 )typ_id__M3IH);
+            a__R3IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__23IH=(__UINTEGER_32)((__UINTEGER_32)(sz__N3IH + a__R3IH) & (__UINTEGER_32)(~ a__R3IH));
+            ptr_table__Z3IH=((__POINTER )(&(table_type[(t__Q3IH)])));
+            lab_type__13IH=(__UINTEGER_32)(t__Q3IH |  1);
+            next__Y3IH=((__POINTER )(NULL));
+            result__03IH=((__POINTER *)ptr_table__Z3IH)[ 0];
+            if ((result__03IH == (void *)NULL)) {
+              result__03IH=new_lab__URJ(lab_type__13IH);
+              next__Y3IH=(void *)((unsigned long)result__03IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23IH)));
+              ((__POINTER *)next__Y3IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Z3IH)[ 0]=next__Y3IH;
             } else {
-              next__Y1HH=((__POINTER *)result__01HH)[ 0];
-              if ((next__Y1HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__01HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__21HH <<  1)) <=  4096)) {
-                  next__Y1HH=(void *)((unsigned long)result__01HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21HH)));
+              next__Y3IH=((__POINTER *)result__03IH)[ 0];
+              if ((next__Y3IH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__03IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__23IH <<  1)) <=  4096)) {
+                  next__Y3IH=(void *)((unsigned long)result__03IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23IH)));
                 } else {
-                  next__Y1HH=new_lab__MRJ(lab_type__11HH);
+                  next__Y3IH=new_lab__URJ(lab_type__13IH);
                 };
-                ((__POINTER *)next__Y1HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Z1HH)[ 0]=next__Y1HH;
+                ((__POINTER *)next__Y3IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__Z3IH)[ 0]=next__Y3IH;
               } else {
-                ((__POINTER *)result__01HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__01HH=next__Y1HH;
+                ((__POINTER *)result__03IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__03IH=next__Y3IH;
               };
             };
-            ptr__L1HH=result__01HH;
-          };
-          result__K1HH=((__ITM_READ *)ptr__L1HH);
-          *(result__K1HH) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__K1HH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__S1HH;
-        result__B5I=result__K1HH;
-        affect__D5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__I0C)->storage__VQO)[ 0];
-        value__C5I=read_expr__44I(Self__54I);
-        if (((void *)value__C5I == (void *)NULL)) {
-          pos__MUWG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_240));
-          put_position__UOG(pos__MUWG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+            ptr__L3IH=result__03IH;
+          };
+          result__K3IH=((__ITM_READ *)ptr__L3IH);
+          *(result__K3IH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__K3IH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__S3IH;
+        result__J5I=result__K3IH;
+        affect__L5I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[ 0];
+        value__K5I=read_expr__G5I(Self__H5I);
+        if (((void *)value__K5I == (void *)NULL)) {
+          pos__ORXG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_238));
+          put_position__2OG(pos__ORXG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if ((affect__D5I == ':')) {
-          __tmp__FHJ=result__K1HH->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
-          result__XMJD=NULL;
-          ptr__YMJD=((__POINTER )(NULL));
-          typ_id__3MJD= 0;
-          sz__0MJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
-          if ((sz__0MJD ==  0)) {
-            result__XMJD=ITM_WRITE_VALUE__;
-          } else {
-            typ_id__3MJD=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0MJD);
-            if ((typ_id__3MJD == (__INTEGER)(-  1))) {
-              a__NDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__ODFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0MJD + a__NDFH) & (__UINTEGER_32)(~ a__NDFH));
-              ptr_table__41HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ODFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__31HH=((__POINTER )(NULL));
-              result__51HH=((__POINTER *)ptr_table__41HH)[ 0];
-              if ((result__51HH == (void *)NULL)) {
-                result__51HH=new_lab__MRJ(new_size__ODFH);
-                next__31HH=(void *)((unsigned long)result__51HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODFH)));
-                ((__POINTER *)next__31HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__41HH)[ 0]=next__31HH;
+        if ((affect__L5I == ':')) {
+          __tmp__NHJ=result__K3IH->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+          result__5MJD=NULL;
+          ptr__ANJD=((__POINTER )(NULL));
+          typ_id__FNJD= 0;
+          sz__CNJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__CNJD ==  0)) {
+            result__5MJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__FNJD=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__CNJD);
+            if ((typ_id__FNJD == (__INTEGER)(-  1))) {
+              a__3EGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__4EGH=(__UINTEGER_32)((__UINTEGER_32)(sz__CNJD + a__3EGH) & (__UINTEGER_32)(~ a__3EGH));
+              ptr_table__43IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4EGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__33IH=((__POINTER )(NULL));
+              result__53IH=((__POINTER *)ptr_table__43IH)[ 0];
+              if ((result__53IH == (void *)NULL)) {
+                result__53IH=new_lab__URJ(new_size__4EGH);
+                next__33IH=(void *)((unsigned long)result__53IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EGH)));
+                ((__POINTER *)next__33IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
               } else {
-                next__31HH=((__POINTER *)result__51HH)[ 0];
-                if ((next__31HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__51HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ODFH <<  1)) <=  4096)) {
-                    next__31HH=(void *)((unsigned long)result__51HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODFH)));
+                next__33IH=((__POINTER *)result__53IH)[ 0];
+                if ((next__33IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__53IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4EGH <<  1)) <=  4096)) {
+                    next__33IH=(void *)((unsigned long)result__53IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4EGH)));
                   } else {
-                    next__31HH=new_lab__MRJ(new_size__ODFH);
+                    next__33IH=new_lab__URJ(new_size__4EGH);
                   };
-                  ((__POINTER *)next__31HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__41HH)[ 0]=next__31HH;
+                  ((__POINTER *)next__33IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
                 } else {
-                  ((__POINTER *)result__51HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__31HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__51HH=next__31HH;
+                  ((__POINTER *)result__53IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__53IH=next__33IH;
                 };
               };
-              ptr__YMJD=result__51HH;
+              ptr__ANJD=result__53IH;
             } else {
-              t__SDFH=((__UINTEGER_32 )typ_id__3MJD);
-              a__RDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__G2HH=(__UINTEGER_32)((__UINTEGER_32)(sz__0MJD + a__RDFH) & (__UINTEGER_32)(~ a__RDFH));
-              ptr_table__D2HH=((__POINTER )(&(table_type[(t__SDFH)])));
-              lab_type__F2HH=(__UINTEGER_32)(t__SDFH |  1);
-              next__C2HH=((__POINTER )(NULL));
-              result__E2HH=((__POINTER *)ptr_table__D2HH)[ 0];
-              if ((result__E2HH == (void *)NULL)) {
-                result__E2HH=new_lab__MRJ(lab_type__F2HH);
-                next__C2HH=(void *)((unsigned long)result__E2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
-                ((__POINTER *)next__C2HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__D2HH)[ 0]=next__C2HH;
+              t__CFGH=((__UINTEGER_32 )typ_id__FNJD);
+              a__BFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__G4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__CNJD + a__BFGH) & (__UINTEGER_32)(~ a__BFGH));
+              ptr_table__D4IH=((__POINTER )(&(table_type[(t__CFGH)])));
+              lab_type__F4IH=(__UINTEGER_32)(t__CFGH |  1);
+              next__C4IH=((__POINTER )(NULL));
+              result__E4IH=((__POINTER *)ptr_table__D4IH)[ 0];
+              if ((result__E4IH == (void *)NULL)) {
+                result__E4IH=new_lab__URJ(lab_type__F4IH);
+                next__C4IH=(void *)((unsigned long)result__E4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4IH)));
+                ((__POINTER *)next__C4IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
               } else {
-                next__C2HH=((__POINTER *)result__E2HH)[ 0];
-                if ((next__C2HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G2HH <<  1)) <=  4096)) {
-                    next__C2HH=(void *)((unsigned long)result__E2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
+                next__C4IH=((__POINTER *)result__E4IH)[ 0];
+                if ((next__C4IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E4IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__G4IH <<  1)) <=  4096)) {
+                    next__C4IH=(void *)((unsigned long)result__E4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4IH)));
                   } else {
-                    next__C2HH=new_lab__MRJ(lab_type__F2HH);
+                    next__C4IH=new_lab__URJ(lab_type__F4IH);
                   };
-                  ((__POINTER *)next__C2HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__D2HH)[ 0]=next__C2HH;
+                  ((__POINTER *)next__C4IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
                 } else {
-                  ((__POINTER *)result__E2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__E2HH=next__C2HH;
+                  ((__POINTER *)result__E4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__E4IH=next__C4IH;
                 };
               };
-              ptr__YMJD=result__E2HH;
+              ptr__ANJD=result__E4IH;
             };
-            result__XMJD=((__ITM_WRITE_VALUE *)ptr__YMJD);
-            *(result__XMJD) = *(ITM_WRITE_VALUE__);
+            result__5MJD=((__ITM_WRITE_VALUE *)ptr__ANJD);
+            *(result__5MJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__ITM_WRITE_VALUE *)result__XMJD)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__FHJ;
-          result__B5I=result__XMJD;
+          ((__ITM_WRITE_VALUE *)result__5MJD)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ=__tmp__NHJ;
+          result__J5I=result__5MJD;
         };
-        if ((affect__D5I == '<')) {
-          switch (((struct ___OBJ *)result__B5I)->__id) {
+        if ((affect__L5I == '<')) {
+          switch (((struct ___OBJ *)result__J5I)->__id) {
           case __ITM_LIST__: {
-            __tmp__PHJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__PHJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__PHJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__PHJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__PHJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__PHJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__PHJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__PHJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__PHJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__PHJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__PHJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__PHJ=position__FD5B(result__B5I);
+            __tmp__XHJ=position__ND5B(result__J5I);
           } break;
           case __ITM_OLD__: {
-            __tmp__PHJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__PHJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__PHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__PHJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__PHJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__PHJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__PHJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__PHJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__PHJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__XHJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__PHJ=position__FJHC(result__B5I);
+            __tmp__XHJ=position__NJHC(result__J5I);
           } break;
           };
-          result__V0JD=NULL;
-          ptr__W0JD=((__POINTER )(NULL));
-          typ_id__10JD= 0;
-          sz__Y0JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
-          if ((sz__Y0JD ==  0)) {
-            result__V0JD=ITM_WRITE_CODE__;
-          } else {
-            typ_id__10JD=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__Y0JD);
-            if ((typ_id__10JD == (__INTEGER)(-  1))) {
-              a__UUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__VUEH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0JD + a__UUEH) & (__UINTEGER_32)(~ a__UUEH));
-              ptr_table__I2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VUEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__H2HH=((__POINTER )(NULL));
-              result__J2HH=((__POINTER *)ptr_table__I2HH)[ 0];
-              if ((result__J2HH == (void *)NULL)) {
-                result__J2HH=new_lab__MRJ(new_size__VUEH);
-                next__H2HH=(void *)((unsigned long)result__J2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VUEH)));
-                ((__POINTER *)next__H2HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__I2HH)[ 0]=next__H2HH;
+          result__30JD=NULL;
+          ptr__40JD=((__POINTER )(NULL));
+          typ_id__D1JD= 0;
+          sz__A1JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__A1JD ==  0)) {
+            result__30JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__D1JD=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__A1JD);
+            if ((typ_id__D1JD == (__INTEGER)(-  1))) {
+              a__EWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__FWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__A1JD + a__EWFH) & (__UINTEGER_32)(~ a__EWFH));
+              ptr_table__I4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__H4IH=((__POINTER )(NULL));
+              result__J4IH=((__POINTER *)ptr_table__I4IH)[ 0];
+              if ((result__J4IH == (void *)NULL)) {
+                result__J4IH=new_lab__URJ(new_size__FWFH);
+                next__H4IH=(void *)((unsigned long)result__J4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWFH)));
+                ((__POINTER *)next__H4IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__I4IH)[ 0]=next__H4IH;
               } else {
-                next__H2HH=((__POINTER *)result__J2HH)[ 0];
-                if ((next__H2HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VUEH <<  1)) <=  4096)) {
-                    next__H2HH=(void *)((unsigned long)result__J2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VUEH)));
+                next__H4IH=((__POINTER *)result__J4IH)[ 0];
+                if ((next__H4IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J4IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FWFH <<  1)) <=  4096)) {
+                    next__H4IH=(void *)((unsigned long)result__J4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FWFH)));
                   } else {
-                    next__H2HH=new_lab__MRJ(new_size__VUEH);
+                    next__H4IH=new_lab__URJ(new_size__FWFH);
                   };
-                  ((__POINTER *)next__H2HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__I2HH)[ 0]=next__H2HH;
+                  ((__POINTER *)next__H4IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__I4IH)[ 0]=next__H4IH;
                 } else {
-                  ((__POINTER *)result__J2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__J2HH=next__H2HH;
+                  ((__POINTER *)result__J4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__J4IH=next__H4IH;
                 };
               };
-              ptr__W0JD=result__J2HH;
+              ptr__40JD=result__J4IH;
             } else {
-              t__ZUEH=((__UINTEGER_32 )typ_id__10JD);
-              a__YUEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__Q2HH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0JD + a__YUEH) & (__UINTEGER_32)(~ a__YUEH));
-              ptr_table__N2HH=((__POINTER )(&(table_type[(t__ZUEH)])));
-              lab_type__P2HH=(__UINTEGER_32)(t__ZUEH |  1);
-              next__M2HH=((__POINTER )(NULL));
-              result__O2HH=((__POINTER *)ptr_table__N2HH)[ 0];
-              if ((result__O2HH == (void *)NULL)) {
-                result__O2HH=new_lab__MRJ(lab_type__P2HH);
-                next__M2HH=(void *)((unsigned long)result__O2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2HH)));
-                ((__POINTER *)next__M2HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__N2HH)[ 0]=next__M2HH;
+              t__JWFH=((__UINTEGER_32 )typ_id__D1JD);
+              a__IWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__Q4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__A1JD + a__IWFH) & (__UINTEGER_32)(~ a__IWFH));
+              ptr_table__N4IH=((__POINTER )(&(table_type[(t__JWFH)])));
+              lab_type__P4IH=(__UINTEGER_32)(t__JWFH |  1);
+              next__M4IH=((__POINTER )(NULL));
+              result__O4IH=((__POINTER *)ptr_table__N4IH)[ 0];
+              if ((result__O4IH == (void *)NULL)) {
+                result__O4IH=new_lab__URJ(lab_type__P4IH);
+                next__M4IH=(void *)((unsigned long)result__O4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q4IH)));
+                ((__POINTER *)next__M4IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__N4IH)[ 0]=next__M4IH;
               } else {
-                next__M2HH=((__POINTER *)result__O2HH)[ 0];
-                if ((next__M2HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q2HH <<  1)) <=  4096)) {
-                    next__M2HH=(void *)((unsigned long)result__O2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2HH)));
+                next__M4IH=((__POINTER *)result__O4IH)[ 0];
+                if ((next__M4IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O4IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Q4IH <<  1)) <=  4096)) {
+                    next__M4IH=(void *)((unsigned long)result__O4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q4IH)));
                   } else {
-                    next__M2HH=new_lab__MRJ(lab_type__P2HH);
+                    next__M4IH=new_lab__URJ(lab_type__P4IH);
                   };
-                  ((__POINTER *)next__M2HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__N2HH)[ 0]=next__M2HH;
+                  ((__POINTER *)next__M4IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__N4IH)[ 0]=next__M4IH;
                 } else {
-                  ((__POINTER *)result__O2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__O2HH=next__M2HH;
+                  ((__POINTER *)result__O4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__O4IH=next__M4IH;
                 };
               };
-              ptr__W0JD=result__O2HH;
+              ptr__40JD=result__O4IH;
             };
-            result__V0JD=((__ITM_WRITE_CODE *)ptr__W0JD);
-            *(result__V0JD) = *(ITM_WRITE_CODE__);
+            result__30JD=((__ITM_WRITE_CODE *)ptr__40JD);
+            *(result__30JD) = *(ITM_WRITE_CODE__);
           };
-          ((__ITM_WRITE_CODE *)result__V0JD)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__PHJ;
-          result__B5I=result__V0JD;
+          ((__ITM_WRITE_CODE *)result__30JD)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ=__tmp__XHJ;
+          result__J5I=result__30JD;
         };
-        if ((affect__D5I == '?')) {
-          switch (((struct ___OBJ *)result__B5I)->__id) {
+        if ((affect__L5I == '?')) {
+          switch (((struct ___OBJ *)result__J5I)->__id) {
           case __ITM_LIST__: {
-            __tmp__YHJ=((__ITM_LIST *)result__B5I)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__YHJ=((__ITM_LDOTS *)result__B5I)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__YHJ=((__ITM_PROTOTYPE *)result__B5I)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__YHJ=((__ITM_LIST_IDF *)result__B5I)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__YHJ=((__ITM_WRITE_VALUE *)result__B5I)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__YHJ=((__ITM_WRITE_CAST *)result__B5I)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ__: {
-            __tmp__YHJ=((__ITM_READ *)result__B5I)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__YHJ=((__ITM_WRITE_CODE *)result__B5I)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__YHJ=((__ITM_OPERATOR *)result__B5I)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__YHJ=((__ITM_READ_ARG1 *)result__B5I)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__YHJ=((__ITM_READ_ARG2 *)result__B5I)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__YHJ=position__FD5B(result__B5I);
+            __tmp__AIJ=position__ND5B(result__J5I);
           } break;
           case __ITM_OLD__: {
-            __tmp__YHJ=((__ITM_OLD *)result__B5I)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__YHJ=((__ITM_EXTERNAL_TYPE *)result__B5I)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__YHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__B5I)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__YHJ=((__ITM_EXTERNAL *)result__B5I)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__YHJ=((__ITM_READ_ARGS *)result__B5I)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__YHJ=((__ITM_REAL *)result__B5I)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__YHJ=((__ITM_NUMBER *)result__B5I)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__YHJ=((__ITM_CHARACTER *)result__B5I)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__YHJ=((__ITM_STRING *)result__B5I)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+            __tmp__AIJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__YHJ=position__FJHC(result__B5I);
+            __tmp__AIJ=position__NJHC(result__J5I);
           } break;
           };
-          result__KOJD=NULL;
-          ptr__LOJD=((__POINTER )(NULL));
-          typ_id__QOJD= 0;
-          sz__NOJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
-          if ((sz__NOJD ==  0)) {
-            result__KOJD=ITM_WRITE_CAST__;
-          } else {
-            typ_id__QOJD=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NOJD);
-            if ((typ_id__QOJD == (__INTEGER)(-  1))) {
-              a__VDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__WDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOJD + a__VDFH) & (__UINTEGER_32)(~ a__VDFH));
-              ptr_table__S2HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__R2HH=((__POINTER )(NULL));
-              result__T2HH=((__POINTER *)ptr_table__S2HH)[ 0];
-              if ((result__T2HH == (void *)NULL)) {
-                result__T2HH=new_lab__MRJ(new_size__WDFH);
-                next__R2HH=(void *)((unsigned long)result__T2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDFH)));
-                ((__POINTER *)next__R2HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__S2HH)[ 0]=next__R2HH;
+          result__SOJD=NULL;
+          ptr__TOJD=((__POINTER )(NULL));
+          typ_id__YOJD= 0;
+          sz__VOJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__VOJD ==  0)) {
+            result__SOJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__YOJD=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__VOJD);
+            if ((typ_id__YOJD == (__INTEGER)(-  1))) {
+              a__FFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__GFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOJD + a__FFGH) & (__UINTEGER_32)(~ a__FFGH));
+              ptr_table__S4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__R4IH=((__POINTER )(NULL));
+              result__T4IH=((__POINTER *)ptr_table__S4IH)[ 0];
+              if ((result__T4IH == (void *)NULL)) {
+                result__T4IH=new_lab__URJ(new_size__GFGH);
+                next__R4IH=(void *)((unsigned long)result__T4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFGH)));
+                ((__POINTER *)next__R4IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__S4IH)[ 0]=next__R4IH;
               } else {
-                next__R2HH=((__POINTER *)result__T2HH)[ 0];
-                if ((next__R2HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WDFH <<  1)) <=  4096)) {
-                    next__R2HH=(void *)((unsigned long)result__T2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDFH)));
+                next__R4IH=((__POINTER *)result__T4IH)[ 0];
+                if ((next__R4IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T4IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GFGH <<  1)) <=  4096)) {
+                    next__R4IH=(void *)((unsigned long)result__T4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFGH)));
                   } else {
-                    next__R2HH=new_lab__MRJ(new_size__WDFH);
+                    next__R4IH=new_lab__URJ(new_size__GFGH);
                   };
-                  ((__POINTER *)next__R2HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__S2HH)[ 0]=next__R2HH;
+                  ((__POINTER *)next__R4IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__S4IH)[ 0]=next__R4IH;
                 } else {
-                  ((__POINTER *)result__T2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__T2HH=next__R2HH;
+                  ((__POINTER *)result__T4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__T4IH=next__R4IH;
                 };
               };
-              ptr__LOJD=result__T2HH;
+              ptr__TOJD=result__T4IH;
             } else {
-              t__0DFH=((__UINTEGER_32 )typ_id__QOJD);
-              a__ZDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__02HH=(__UINTEGER_32)((__UINTEGER_32)(sz__NOJD + a__ZDFH) & (__UINTEGER_32)(~ a__ZDFH));
-              ptr_table__X2HH=((__POINTER )(&(table_type[(t__0DFH)])));
-              lab_type__Z2HH=(__UINTEGER_32)(t__0DFH |  1);
-              next__W2HH=((__POINTER )(NULL));
-              result__Y2HH=((__POINTER *)ptr_table__X2HH)[ 0];
-              if ((result__Y2HH == (void *)NULL)) {
-                result__Y2HH=new_lab__MRJ(lab_type__Z2HH);
-                next__W2HH=(void *)((unsigned long)result__Y2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02HH)));
-                ((__POINTER *)next__W2HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__X2HH)[ 0]=next__W2HH;
+              t__KFGH=((__UINTEGER_32 )typ_id__YOJD);
+              a__JFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__04IH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOJD + a__JFGH) & (__UINTEGER_32)(~ a__JFGH));
+              ptr_table__X4IH=((__POINTER )(&(table_type[(t__KFGH)])));
+              lab_type__Z4IH=(__UINTEGER_32)(t__KFGH |  1);
+              next__W4IH=((__POINTER )(NULL));
+              result__Y4IH=((__POINTER *)ptr_table__X4IH)[ 0];
+              if ((result__Y4IH == (void *)NULL)) {
+                result__Y4IH=new_lab__URJ(lab_type__Z4IH);
+                next__W4IH=(void *)((unsigned long)result__Y4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__04IH)));
+                ((__POINTER *)next__W4IH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__X4IH)[ 0]=next__W4IH;
               } else {
-                next__W2HH=((__POINTER *)result__Y2HH)[ 0];
-                if ((next__W2HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y2HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__02HH <<  1)) <=  4096)) {
-                    next__W2HH=(void *)((unsigned long)result__Y2HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02HH)));
+                next__W4IH=((__POINTER *)result__Y4IH)[ 0];
+                if ((next__W4IH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y4IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__04IH <<  1)) <=  4096)) {
+                    next__W4IH=(void *)((unsigned long)result__Y4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__04IH)));
                   } else {
-                    next__W2HH=new_lab__MRJ(lab_type__Z2HH);
+                    next__W4IH=new_lab__URJ(lab_type__Z4IH);
                   };
-                  ((__POINTER *)next__W2HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__X2HH)[ 0]=next__W2HH;
+                  ((__POINTER *)next__W4IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__X4IH)[ 0]=next__W4IH;
                 } else {
-                  ((__POINTER *)result__Y2HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W2HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Y2HH=next__W2HH;
+                  ((__POINTER *)result__Y4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__Y4IH=next__W4IH;
                 };
               };
-              ptr__LOJD=result__Y2HH;
-            };
-            result__KOJD=((__ITM_WRITE_CAST *)ptr__LOJD);
-            *(result__KOJD) = *(ITM_WRITE_CAST__);
-          };
-          ((__ITM_WRITE_CAST *)result__KOJD)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ=__tmp__YHJ;
-          result__B5I=result__KOJD;
-        };
-      };
-    };
-  };
-  if (((void *)result__B5I == (void *)NULL)) {
-    restore_context__TDL();
-    result__BFL=NULL;
-    expr__CFL=NULL;
-    itm_op__FFL=NULL;
-    last_msg__GFL= 0;
-    first_msg__HFL= 0;
-    result__13H=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
-      result__13H=create_with_capacity__SVI( 16);
-    } else {
-      Self__1N4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      result__13H=((void **)Self__1N4->parent_arrayed_collection__A4H.storage__WAU)[Self__1N4->parent_arrayed_collection__A4H.upper__IWT];
-      Self__RO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      Self__RO4->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__RO4->parent_arrayed_collection__A4H.upper__IWT -  1);
-    };
-    l_expr__DFL=result__13H;
-    while (read_operator__HNM()) {
-      p__E3HH=current_position__JXF();
-      n__F3HH=last_string__I0C;
-      result__12HH=NULL;
-      ptr__22HH=((__POINTER )(NULL));
-      typ_id__32HH= 0;
-      sz__42HH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-      if ((sz__42HH ==  0)) {
-        result__12HH=ITM_OPERATOR__;
-      } else {
-        typ_id__32HH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__42HH);
-        if ((typ_id__32HH == (__INTEGER)(-  1))) {
-          a__52HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__A3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__42HH + a__52HH) & (__UINTEGER_32)(~ a__52HH));
-          ptr_table__H3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A3HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__G3HH=((__POINTER )(NULL));
-          result__I3HH=((__POINTER *)ptr_table__H3HH)[ 0];
-          if ((result__I3HH == (void *)NULL)) {
-            result__I3HH=new_lab__MRJ(new_size__A3HH);
-            next__G3HH=(void *)((unsigned long)result__I3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3HH)));
-            ((__POINTER *)next__G3HH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__H3HH)[ 0]=next__G3HH;
-          } else {
-            next__G3HH=((__POINTER *)result__I3HH)[ 0];
-            if ((next__G3HH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__A3HH <<  1)) <=  4096)) {
-                next__G3HH=(void *)((unsigned long)result__I3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A3HH)));
+              ptr__TOJD=result__Y4IH;
+            };
+            result__SOJD=((__ITM_WRITE_CAST *)ptr__TOJD);
+            *(result__SOJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__SOJD)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ=__tmp__AIJ;
+          result__J5I=result__SOJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__J5I == (void *)NULL)) {
+    restore_context__1DL();
+    result__JFL=NULL;
+    expr__KFL=NULL;
+    itm_op__NFL=NULL;
+    last_msg__OFL= 0;
+    first_msg__PFL= 0;
+    result__D4H=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H)->parent_arrayed_collection__I4H.upper__QWT <  0)) {
+      result__D4H=create_with_capacity__0VI( 16);
+    } else {
+      Self__DO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      result__D4H=((void **)Self__DO4->parent_arrayed_collection__I4H.storage__4AU)[Self__DO4->parent_arrayed_collection__I4H.upper__QWT];
+      Self__ZO4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      Self__ZO4->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__ZO4->parent_arrayed_collection__I4H.upper__QWT -  1);
+    };
+    l_expr__LFL=result__D4H;
+    while (read_operator__PNM()) {
+      p__E5IH=current_position__RXF();
+      n__F5IH=last_string__Q0C;
+      result__14IH=NULL;
+      ptr__24IH=((__POINTER )(NULL));
+      typ_id__34IH= 0;
+      sz__44IH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__44IH ==  0)) {
+        result__14IH=ITM_OPERATOR__;
+      } else {
+        typ_id__34IH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__44IH);
+        if ((typ_id__34IH == (__INTEGER)(-  1))) {
+          a__54IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__A5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__44IH + a__54IH) & (__UINTEGER_32)(~ a__54IH));
+          ptr_table__H5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A5IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__G5IH=((__POINTER )(NULL));
+          result__I5IH=((__POINTER *)ptr_table__H5IH)[ 0];
+          if ((result__I5IH == (void *)NULL)) {
+            result__I5IH=new_lab__URJ(new_size__A5IH);
+            next__G5IH=(void *)((unsigned long)result__I5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5IH)));
+            ((__POINTER *)next__G5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__H5IH)[ 0]=next__G5IH;
+          } else {
+            next__G5IH=((__POINTER *)result__I5IH)[ 0];
+            if ((next__G5IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I5IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__A5IH <<  1)) <=  4096)) {
+                next__G5IH=(void *)((unsigned long)result__I5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5IH)));
               } else {
-                next__G3HH=new_lab__MRJ(new_size__A3HH);
+                next__G5IH=new_lab__URJ(new_size__A5IH);
               };
-              ((__POINTER *)next__G3HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__H3HH)[ 0]=next__G3HH;
+              ((__POINTER *)next__G5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H5IH)[ 0]=next__G5IH;
             } else {
-              ((__POINTER *)result__I3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__I3HH=next__G3HH;
-            };
-          };
-          ptr__22HH=result__I3HH;
-        } else {
-          t__B3HH=((__UINTEGER_32 )typ_id__32HH);
-          a__C3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__P3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__42HH + a__C3HH) & (__UINTEGER_32)(~ a__C3HH));
-          ptr_table__M3HH=((__POINTER )(&(table_type[(t__B3HH)])));
-          lab_type__O3HH=(__UINTEGER_32)(t__B3HH |  1);
-          next__L3HH=((__POINTER )(NULL));
-          result__N3HH=((__POINTER *)ptr_table__M3HH)[ 0];
-          if ((result__N3HH == (void *)NULL)) {
-            result__N3HH=new_lab__MRJ(lab_type__O3HH);
-            next__L3HH=(void *)((unsigned long)result__N3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3HH)));
-            ((__POINTER *)next__L3HH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__M3HH)[ 0]=next__L3HH;
-          } else {
-            next__L3HH=((__POINTER *)result__N3HH)[ 0];
-            if ((next__L3HH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__P3HH <<  1)) <=  4096)) {
-                next__L3HH=(void *)((unsigned long)result__N3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3HH)));
+              ((__POINTER *)result__I5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__I5IH=next__G5IH;
+            };
+          };
+          ptr__24IH=result__I5IH;
+        } else {
+          t__B5IH=((__UINTEGER_32 )typ_id__34IH);
+          a__C5IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__44IH + a__C5IH) & (__UINTEGER_32)(~ a__C5IH));
+          ptr_table__M5IH=((__POINTER )(&(table_type[(t__B5IH)])));
+          lab_type__O5IH=(__UINTEGER_32)(t__B5IH |  1);
+          next__L5IH=((__POINTER )(NULL));
+          result__N5IH=((__POINTER *)ptr_table__M5IH)[ 0];
+          if ((result__N5IH == (void *)NULL)) {
+            result__N5IH=new_lab__URJ(lab_type__O5IH);
+            next__L5IH=(void *)((unsigned long)result__N5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5IH)));
+            ((__POINTER *)next__L5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__M5IH)[ 0]=next__L5IH;
+          } else {
+            next__L5IH=((__POINTER *)result__N5IH)[ 0];
+            if ((next__L5IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N5IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__P5IH <<  1)) <=  4096)) {
+                next__L5IH=(void *)((unsigned long)result__N5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5IH)));
               } else {
-                next__L3HH=new_lab__MRJ(lab_type__O3HH);
+                next__L5IH=new_lab__URJ(lab_type__O5IH);
               };
-              ((__POINTER *)next__L3HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__M3HH)[ 0]=next__L3HH;
+              ((__POINTER *)next__L5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__M5IH)[ 0]=next__L5IH;
             } else {
-              ((__POINTER *)result__N3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__N3HH=next__L3HH;
+              ((__POINTER *)result__N5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__N5IH=next__L5IH;
             };
           };
-          ptr__22HH=result__N3HH;
+          ptr__24IH=result__N5IH;
         };
-        result__12HH=((__ITM_OPERATOR *)ptr__22HH);
-        *(result__12HH) = *(ITM_OPERATOR__);
+        result__14IH=((__ITM_OPERATOR *)ptr__24IH);
+        *(result__14IH) = *(ITM_OPERATOR__);
       };
-      Self__D3HH=((__ITM_OPERATOR *)result__12HH);
-      Self__D3HH->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ=p__E3HH;
-      Self__D3HH->name__PIL=n__F3HH;
-      expr__CFL=result__12HH;
-      add_last__U5U(l_expr__DFL,result__12HH);
+      Self__D5IH=((__ITM_OPERATOR *)result__14IH);
+      Self__D5IH->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ=p__E5IH;
+      Self__D5IH->name__XIL=n__F5IH;
+      expr__KFL=result__14IH;
+      add_last__25U(l_expr__LFL,result__14IH);
     };
-    expr__CFL=read_expr_message__0VL(Self__54I);
-    if (((void *)expr__CFL == (void *)NULL)) {
-      if ((! (((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL <  0))) {
-        pos__XUWG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_240));
-        put_position__UOG(pos__XUWG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+    expr__KFL=read_expr_message__CWL(Self__H5I);
+    if (((void *)expr__KFL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.upper__EIL <  0))) {
+        pos__ZRXG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_238));
+        put_position__2OG(pos__ZRXG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      free__YVI(result__13H);
+      free__AWI(result__D4H);
     } else {
-      first_msg__HFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1);
+      first_msg__PFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.upper__EIL +  1);
       do {
-        last_msg__GFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.upper__2HL +  1);
-        add_last__U5U(l_expr__DFL,expr__CFL);
-        if (read_operator__HNM()) {
+        last_msg__OFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.upper__EIL +  1);
+        add_last__25U(l_expr__LFL,expr__KFL);
+        if (read_operator__PNM()) {
           do {
-            p__PHP=current_position__JXF();
-            n__QHP=last_string__I0C;
-            result__TSP=NULL;
-            ptr__USP=((__POINTER )(NULL));
-            typ_id__ZSP= 0;
-            sz__WSP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
-            if ((sz__WSP ==  0)) {
-              result__TSP=ITM_OPERATOR__;
+            p__XHP=current_position__RXF();
+            n__YHP=last_string__Q0C;
+            result__1SP=NULL;
+            ptr__2SP=((__POINTER )(NULL));
+            typ_id__BTP= 0;
+            sz__4SP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__4SP ==  0)) {
+              result__1SP=ITM_OPERATOR__;
             } else {
-              typ_id__ZSP=-1;
-              clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WSP);
-              if ((typ_id__ZSP == (__INTEGER)(-  1))) {
-                a__FEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__GEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSP + a__FEFH) & (__UINTEGER_32)(~ a__FEFH));
-                ptr_table__R3HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                next__Q3HH=((__POINTER )(NULL));
-                result__S3HH=((__POINTER *)ptr_table__R3HH)[ 0];
-                if ((result__S3HH == (void *)NULL)) {
-                  result__S3HH=new_lab__MRJ(new_size__GEFH);
-                  next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEFH)));
-                  ((__POINTER *)next__Q3HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
+              typ_id__BTP=-1;
+              clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__4SP);
+              if ((typ_id__BTP == (__INTEGER)(-  1))) {
+                a__VFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__WFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SP + a__VFGH) & (__UINTEGER_32)(~ a__VFGH));
+                ptr_table__R5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__Q5IH=((__POINTER )(NULL));
+                result__S5IH=((__POINTER *)ptr_table__R5IH)[ 0];
+                if ((result__S5IH == (void *)NULL)) {
+                  result__S5IH=new_lab__URJ(new_size__WFGH);
+                  next__Q5IH=(void *)((unsigned long)result__S5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFGH)));
+                  ((__POINTER *)next__Q5IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
                 } else {
-                  next__Q3HH=((__POINTER *)result__S3HH)[ 0];
-                  if ((next__Q3HH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GEFH <<  1)) <=  4096)) {
-                      next__Q3HH=(void *)((unsigned long)result__S3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEFH)));
+                  next__Q5IH=((__POINTER *)result__S5IH)[ 0];
+                  if ((next__Q5IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S5IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WFGH <<  1)) <=  4096)) {
+                      next__Q5IH=(void *)((unsigned long)result__S5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFGH)));
                     } else {
-                      next__Q3HH=new_lab__MRJ(new_size__GEFH);
+                      next__Q5IH=new_lab__URJ(new_size__WFGH);
                     };
-                    ((__POINTER *)next__Q3HH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__R3HH)[ 0]=next__Q3HH;
+                    ((__POINTER *)next__Q5IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
                   } else {
-                    ((__POINTER *)result__S3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__S3HH=next__Q3HH;
+                    ((__POINTER *)result__S5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__S5IH=next__Q5IH;
                   };
                 };
-                ptr__USP=result__S3HH;
+                ptr__2SP=result__S5IH;
               } else {
-                t__KEFH=((__UINTEGER_32 )typ_id__ZSP);
-                a__JEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                new_size__Z3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSP + a__JEFH) & (__UINTEGER_32)(~ a__JEFH));
-                ptr_table__W3HH=((__POINTER )(&(table_type[(t__KEFH)])));
-                lab_type__Y3HH=(__UINTEGER_32)(t__KEFH |  1);
-                next__V3HH=((__POINTER )(NULL));
-                result__X3HH=((__POINTER *)ptr_table__W3HH)[ 0];
-                if ((result__X3HH == (void *)NULL)) {
-                  result__X3HH=new_lab__MRJ(lab_type__Y3HH);
-                  next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3HH)));
-                  ((__POINTER *)next__V3HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
+                t__0FGH=((__UINTEGER_32 )typ_id__BTP);
+                a__ZFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__Z5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__4SP + a__ZFGH) & (__UINTEGER_32)(~ a__ZFGH));
+                ptr_table__W5IH=((__POINTER )(&(table_type[(t__0FGH)])));
+                lab_type__Y5IH=(__UINTEGER_32)(t__0FGH |  1);
+                next__V5IH=((__POINTER )(NULL));
+                result__X5IH=((__POINTER *)ptr_table__W5IH)[ 0];
+                if ((result__X5IH == (void *)NULL)) {
+                  result__X5IH=new_lab__URJ(lab_type__Y5IH);
+                  next__V5IH=(void *)((unsigned long)result__X5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5IH)));
+                  ((__POINTER *)next__V5IH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
                 } else {
-                  next__V3HH=((__POINTER *)result__X3HH)[ 0];
-                  if ((next__V3HH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X3HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Z3HH <<  1)) <=  4096)) {
-                      next__V3HH=(void *)((unsigned long)result__X3HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3HH)));
+                  next__V5IH=((__POINTER *)result__X5IH)[ 0];
+                  if ((next__V5IH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X5IH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Z5IH <<  1)) <=  4096)) {
+                      next__V5IH=(void *)((unsigned long)result__X5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5IH)));
                     } else {
-                      next__V3HH=new_lab__MRJ(lab_type__Y3HH);
+                      next__V5IH=new_lab__URJ(lab_type__Y5IH);
                     };
-                    ((__POINTER *)next__V3HH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__W3HH)[ 0]=next__V3HH;
+                    ((__POINTER *)next__V5IH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
                   } else {
-                    ((__POINTER *)result__X3HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__X3HH=next__V3HH;
+                    ((__POINTER *)result__X5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__X5IH=next__V5IH;
                   };
                 };
-                ptr__USP=result__X3HH;
+                ptr__2SP=result__X5IH;
               };
-              result__TSP=((__ITM_OPERATOR *)ptr__USP);
-              *(result__TSP) = *(ITM_OPERATOR__);
-            };
-            Self__XNV=((__ITM_OPERATOR *)result__TSP);
-            Self__XNV->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ=p__PHP;
-            Self__XNV->name__PIL=n__QHP;
-            expr__CFL=result__TSP;
-            add_last__U5U(l_expr__DFL,result__TSP);
-          } while (read_operator__HNM());
-          expr__CFL=read_expr_message__0VL(Self__54I);
-        } else {
-          expr__CFL=NULL;
-        };
-      } while (((void *)expr__CFL != (void *)NULL));
-      while ((last_msg__GFL < ((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.upper__2HL)) {
-        __tmp__IIL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(last_msg__GFL +  1)];
-        if (__tmp__IIL==NULL) {
-          __tmp__JIL=NULL;
-        } else {
-          switch (((struct ___OBJ *)__tmp__IIL)->__id) {
+              result__1SP=((__ITM_OPERATOR *)ptr__2SP);
+              *(result__1SP) = *(ITM_OPERATOR__);
+            };
+            Self__5NV=((__ITM_OPERATOR *)result__1SP);
+            Self__5NV->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ=p__XHP;
+            Self__5NV->name__XIL=n__YHP;
+            expr__KFL=result__1SP;
+            add_last__25U(l_expr__LFL,result__1SP);
+          } while (read_operator__PNM());
+          expr__KFL=read_expr_message__CWL(Self__H5I);
+        } else {
+          expr__KFL=NULL;
+        };
+      } while (((void *)expr__KFL != (void *)NULL));
+      while ((last_msg__OFL < ((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.upper__EIL)) {
+        __tmp__QIL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.storage__NYT)[(__INTEGER)(last_msg__OFL +  1)];
+        if (__tmp__QIL==NULL) {
+          __tmp__RIL=NULL;
+        } else {
+          switch (((struct ___OBJ *)__tmp__QIL)->__id) {
           case __ITM_LIST__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__JIL=((void *)__tmp__IIL);
+            __tmp__RIL=((void *)__tmp__QIL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__JIL=NULL;
+            __tmp__RIL=NULL;
           } break;
           }
         };
-        itm_op__FFL=__tmp__JIL;
-        __tmp__MIL=((__ITM_OPERATOR *)__tmp__JIL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
-        operator__name__3DO((&__string_82),((__ITM_OPERATOR *)__tmp__JIL)->name__PIL);
-        result__03HH=NULL;
-        ptr__13HH=((__POINTER )(NULL));
-        typ_id__23HH= 0;
-        sz__33HH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__33HH ==  0)) {
-          result__03HH=ITM_READ_ARG1__;
-        } else {
-          typ_id__23HH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__33HH);
-          if ((typ_id__23HH == (__INTEGER)(-  1))) {
-            a__43HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__53HH=(__UINTEGER_32)((__UINTEGER_32)(sz__33HH + a__43HH) & (__UINTEGER_32)(~ a__43HH));
-            ptr_table__E4HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__53HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__D4HH=((__POINTER )(NULL));
-            result__F4HH=((__POINTER *)ptr_table__E4HH)[ 0];
-            if ((result__F4HH == (void *)NULL)) {
-              result__F4HH=new_lab__MRJ(new_size__53HH);
-              next__D4HH=(void *)((unsigned long)result__F4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53HH)));
-              ((__POINTER *)next__D4HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__E4HH)[ 0]=next__D4HH;
+        itm_op__NFL=__tmp__RIL;
+        __tmp__UIL=((__ITM_OPERATOR *)__tmp__RIL)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+        operator__name__FEO((&__string_82),((__ITM_OPERATOR *)__tmp__RIL)->name__XIL);
+        result__05IH=NULL;
+        ptr__15IH=((__POINTER )(NULL));
+        typ_id__25IH= 0;
+        sz__35IH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__35IH ==  0)) {
+          result__05IH=ITM_READ_ARG1__;
+        } else {
+          typ_id__25IH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__35IH);
+          if ((typ_id__25IH == (__INTEGER)(-  1))) {
+            a__45IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__55IH=(__UINTEGER_32)((__UINTEGER_32)(sz__35IH + a__45IH) & (__UINTEGER_32)(~ a__45IH));
+            ptr_table__EAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__55IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__DAJH=((__POINTER )(NULL));
+            result__FAJH=((__POINTER *)ptr_table__EAJH)[ 0];
+            if ((result__FAJH == (void *)NULL)) {
+              result__FAJH=new_lab__URJ(new_size__55IH);
+              next__DAJH=(void *)((unsigned long)result__FAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55IH)));
+              ((__POINTER *)next__DAJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EAJH)[ 0]=next__DAJH;
             } else {
-              next__D4HH=((__POINTER *)result__F4HH)[ 0];
-              if ((next__D4HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__53HH <<  1)) <=  4096)) {
-                  next__D4HH=(void *)((unsigned long)result__F4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53HH)));
+              next__DAJH=((__POINTER *)result__FAJH)[ 0];
+              if ((next__DAJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FAJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__55IH <<  1)) <=  4096)) {
+                  next__DAJH=(void *)((unsigned long)result__FAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55IH)));
                 } else {
-                  next__D4HH=new_lab__MRJ(new_size__53HH);
+                  next__DAJH=new_lab__URJ(new_size__55IH);
                 };
-                ((__POINTER *)next__D4HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__E4HH)[ 0]=next__D4HH;
+                ((__POINTER *)next__DAJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EAJH)[ 0]=next__DAJH;
               } else {
-                ((__POINTER *)result__F4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__F4HH=next__D4HH;
+                ((__POINTER *)result__FAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__FAJH=next__DAJH;
               };
             };
-            ptr__13HH=result__F4HH;
-          } else {
-            t__A4HH=((__UINTEGER_32 )typ_id__23HH);
-            a__B4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__M4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__33HH + a__B4HH) & (__UINTEGER_32)(~ a__B4HH));
-            ptr_table__J4HH=((__POINTER )(&(table_type[(t__A4HH)])));
-            lab_type__L4HH=(__UINTEGER_32)(t__A4HH |  1);
-            next__I4HH=((__POINTER )(NULL));
-            result__K4HH=((__POINTER *)ptr_table__J4HH)[ 0];
-            if ((result__K4HH == (void *)NULL)) {
-              result__K4HH=new_lab__MRJ(lab_type__L4HH);
-              next__I4HH=(void *)((unsigned long)result__K4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M4HH)));
-              ((__POINTER *)next__I4HH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__J4HH)[ 0]=next__I4HH;
+            ptr__15IH=result__FAJH;
+          } else {
+            t__AAJH=((__UINTEGER_32 )typ_id__25IH);
+            a__BAJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__MAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__35IH + a__BAJH) & (__UINTEGER_32)(~ a__BAJH));
+            ptr_table__JAJH=((__POINTER )(&(table_type[(t__AAJH)])));
+            lab_type__LAJH=(__UINTEGER_32)(t__AAJH |  1);
+            next__IAJH=((__POINTER )(NULL));
+            result__KAJH=((__POINTER *)ptr_table__JAJH)[ 0];
+            if ((result__KAJH == (void *)NULL)) {
+              result__KAJH=new_lab__URJ(lab_type__LAJH);
+              next__IAJH=(void *)((unsigned long)result__KAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAJH)));
+              ((__POINTER *)next__IAJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JAJH)[ 0]=next__IAJH;
             } else {
-              next__I4HH=((__POINTER *)result__K4HH)[ 0];
-              if ((next__I4HH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K4HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__M4HH <<  1)) <=  4096)) {
-                  next__I4HH=(void *)((unsigned long)result__K4HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M4HH)));
+              next__IAJH=((__POINTER *)result__KAJH)[ 0];
+              if ((next__IAJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KAJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MAJH <<  1)) <=  4096)) {
+                  next__IAJH=(void *)((unsigned long)result__KAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAJH)));
                 } else {
-                  next__I4HH=new_lab__MRJ(lab_type__L4HH);
+                  next__IAJH=new_lab__URJ(lab_type__LAJH);
                 };
-                ((__POINTER *)next__I4HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__J4HH)[ 0]=next__I4HH;
+                ((__POINTER *)next__IAJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JAJH)[ 0]=next__IAJH;
               } else {
-                ((__POINTER *)result__K4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__K4HH=next__I4HH;
+                ((__POINTER *)result__KAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KAJH=next__IAJH;
               };
             };
-            ptr__13HH=result__K4HH;
-          };
-          result__03HH=((__ITM_READ_ARG1 *)ptr__13HH);
-          *(result__03HH) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__03HH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__MIL;
-        expr__CFL=result__03HH;
-        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[last_msg__GFL]=result__03HH;
-        Self__N4HH=((__FAST_ARRAYoITM_CODEo *)l_expr__DFL);
-        index__R4HH=(__INTEGER)(last_msg__GFL +  1);
-        __tmp__O4HH=Self__N4HH->parent_arrayed_collection__RTF.storage__FYT;
-        __tmp__P4HH=Self__N4HH->parent_arrayed_collection__RTF.upper__2HL;
-        Self__Q4HH=((void **)__tmp__O4HH);
-        i__S4HH=index__R4HH;
-        while ((i__S4HH != __tmp__P4HH)) {
-          Self__Q4HH[i__S4HH]=Self__Q4HH[(__INTEGER)(i__S4HH +  1)];
-          i__S4HH=(__INTEGER)(i__S4HH +  1);
-        };
-        Self__N4HH->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__N4HH->parent_arrayed_collection__RTF.upper__2HL -  1);
-      };
-      if (((__INTEGER)(last_msg__GFL - first_msg__HFL) <  3)) {
-        while ((first_msg__HFL !=  0)) {
-          __tmp__PJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(first_msg__HFL -  1)];
-          if (__tmp__PJL==NULL) {
-            __tmp__QJL=NULL;
-          } else {
-            switch (((struct ___OBJ *)__tmp__PJL)->__id) {
+            ptr__15IH=result__KAJH;
+          };
+          result__05IH=((__ITM_READ_ARG1 *)ptr__15IH);
+          *(result__05IH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__05IH)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__UIL;
+        expr__KFL=result__05IH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.storage__NYT)[last_msg__OFL]=result__05IH;
+        Self__NAJH=((__FAST_ARRAYoITM_CODEo *)l_expr__LFL);
+        index__RAJH=(__INTEGER)(last_msg__OFL +  1);
+        __tmp__OAJH=Self__NAJH->parent_arrayed_collection__ZTF.storage__NYT;
+        __tmp__PAJH=Self__NAJH->parent_arrayed_collection__ZTF.upper__EIL;
+        Self__QAJH=((void **)__tmp__OAJH);
+        i__SAJH=index__RAJH;
+        while ((i__SAJH != __tmp__PAJH)) {
+          Self__QAJH[i__SAJH]=Self__QAJH[(__INTEGER)(i__SAJH +  1)];
+          i__SAJH=(__INTEGER)(i__SAJH +  1);
+        };
+        Self__NAJH->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(Self__NAJH->parent_arrayed_collection__ZTF.upper__EIL -  1);
+      };
+      if (((__INTEGER)(last_msg__OFL - first_msg__PFL) <  3)) {
+        while ((first_msg__PFL !=  0)) {
+          __tmp__XJL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.storage__NYT)[(__INTEGER)(first_msg__PFL -  1)];
+          if (__tmp__XJL==NULL) {
+            __tmp__YJL=NULL;
+          } else {
+            switch (((struct ___OBJ *)__tmp__XJL)->__id) {
             case __ITM_LIST__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__QJL=((void *)__tmp__PJL);
+              __tmp__YJL=((void *)__tmp__XJL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__QJL=NULL;
+              __tmp__YJL=NULL;
             } break;
             }
           };
-          itm_op__FFL=__tmp__QJL;
-          __tmp__SJL=((__ITM_OPERATOR *)__tmp__QJL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
-          operator__name__3DO((&__string_83),((__ITM_OPERATOR *)__tmp__QJL)->name__PIL);
-          result__U4HH=NULL;
-          ptr__V4HH=((__POINTER )(NULL));
-          typ_id__W4HH= 0;
-          sz__X4HH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-          if ((sz__X4HH ==  0)) {
-            result__U4HH=ITM_READ_ARG1__;
-          } else {
-            typ_id__W4HH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__X4HH);
-            if ((typ_id__W4HH == (__INTEGER)(-  1))) {
-              a__Y4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__Z4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__X4HH + a__Y4HH) & (__UINTEGER_32)(~ a__Y4HH));
-              ptr_table__44HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z4HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__34HH=((__POINTER )(NULL));
-              result__54HH=((__POINTER *)ptr_table__44HH)[ 0];
-              if ((result__54HH == (void *)NULL)) {
-                result__54HH=new_lab__MRJ(new_size__Z4HH);
-                next__34HH=(void *)((unsigned long)result__54HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4HH)));
-                ((__POINTER *)next__34HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__44HH)[ 0]=next__34HH;
+          itm_op__NFL=__tmp__YJL;
+          __tmp__0JL=((__ITM_OPERATOR *)__tmp__YJL)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+          operator__name__FEO((&__string_83),((__ITM_OPERATOR *)__tmp__YJL)->name__XIL);
+          result__UAJH=NULL;
+          ptr__VAJH=((__POINTER )(NULL));
+          typ_id__WAJH= 0;
+          sz__XAJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__XAJH ==  0)) {
+            result__UAJH=ITM_READ_ARG1__;
+          } else {
+            typ_id__WAJH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__XAJH);
+            if ((typ_id__WAJH == (__INTEGER)(-  1))) {
+              a__YAJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XAJH + a__YAJH) & (__UINTEGER_32)(~ a__YAJH));
+              ptr_table__4AJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZAJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__3AJH=((__POINTER )(NULL));
+              result__5AJH=((__POINTER *)ptr_table__4AJH)[ 0];
+              if ((result__5AJH == (void *)NULL)) {
+                result__5AJH=new_lab__URJ(new_size__ZAJH);
+                next__3AJH=(void *)((unsigned long)result__5AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZAJH)));
+                ((__POINTER *)next__3AJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4AJH)[ 0]=next__3AJH;
               } else {
-                next__34HH=((__POINTER *)result__54HH)[ 0];
-                if ((next__34HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__54HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Z4HH <<  1)) <=  4096)) {
-                    next__34HH=(void *)((unsigned long)result__54HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4HH)));
+                next__3AJH=((__POINTER *)result__5AJH)[ 0];
+                if ((next__3AJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5AJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ZAJH <<  1)) <=  4096)) {
+                    next__3AJH=(void *)((unsigned long)result__5AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZAJH)));
                   } else {
-                    next__34HH=new_lab__MRJ(new_size__Z4HH);
+                    next__3AJH=new_lab__URJ(new_size__ZAJH);
                   };
-                  ((__POINTER *)next__34HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__44HH)[ 0]=next__34HH;
+                  ((__POINTER *)next__3AJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__4AJH)[ 0]=next__3AJH;
                 } else {
-                  ((__POINTER *)result__54HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__54HH=next__34HH;
+                  ((__POINTER *)result__5AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__5AJH=next__3AJH;
                 };
               };
-              ptr__V4HH=result__54HH;
+              ptr__VAJH=result__5AJH;
             } else {
-              t__04HH=((__UINTEGER_32 )typ_id__W4HH);
-              a__14HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__G5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__X4HH + a__14HH) & (__UINTEGER_32)(~ a__14HH));
-              ptr_table__D5HH=((__POINTER )(&(table_type[(t__04HH)])));
-              lab_type__F5HH=(__UINTEGER_32)(t__04HH |  1);
-              next__C5HH=((__POINTER )(NULL));
-              result__E5HH=((__POINTER *)ptr_table__D5HH)[ 0];
-              if ((result__E5HH == (void *)NULL)) {
-                result__E5HH=new_lab__MRJ(lab_type__F5HH);
-                next__C5HH=(void *)((unsigned long)result__E5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5HH)));
-                ((__POINTER *)next__C5HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__D5HH)[ 0]=next__C5HH;
+              t__0AJH=((__UINTEGER_32 )typ_id__WAJH);
+              a__1AJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__GBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XAJH + a__1AJH) & (__UINTEGER_32)(~ a__1AJH));
+              ptr_table__DBJH=((__POINTER )(&(table_type[(t__0AJH)])));
+              lab_type__FBJH=(__UINTEGER_32)(t__0AJH |  1);
+              next__CBJH=((__POINTER )(NULL));
+              result__EBJH=((__POINTER *)ptr_table__DBJH)[ 0];
+              if ((result__EBJH == (void *)NULL)) {
+                result__EBJH=new_lab__URJ(lab_type__FBJH);
+                next__CBJH=(void *)((unsigned long)result__EBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBJH)));
+                ((__POINTER *)next__CBJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DBJH)[ 0]=next__CBJH;
               } else {
-                next__C5HH=((__POINTER *)result__E5HH)[ 0];
-                if ((next__C5HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__G5HH <<  1)) <=  4096)) {
-                    next__C5HH=(void *)((unsigned long)result__E5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5HH)));
+                next__CBJH=((__POINTER *)result__EBJH)[ 0];
+                if ((next__CBJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EBJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GBJH <<  1)) <=  4096)) {
+                    next__CBJH=(void *)((unsigned long)result__EBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GBJH)));
                   } else {
-                    next__C5HH=new_lab__MRJ(lab_type__F5HH);
+                    next__CBJH=new_lab__URJ(lab_type__FBJH);
                   };
-                  ((__POINTER *)next__C5HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__D5HH)[ 0]=next__C5HH;
+                  ((__POINTER *)next__CBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DBJH)[ 0]=next__CBJH;
                 } else {
-                  ((__POINTER *)result__E5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__E5HH=next__C5HH;
+                  ((__POINTER *)result__EBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__EBJH=next__CBJH;
                 };
               };
-              ptr__V4HH=result__E5HH;
+              ptr__VAJH=result__EBJH;
             };
-            result__U4HH=((__ITM_READ_ARG1 *)ptr__V4HH);
-            *(result__U4HH) = *(ITM_READ_ARG1__);
+            result__UAJH=((__ITM_READ_ARG1 *)ptr__VAJH);
+            *(result__UAJH) = *(ITM_READ_ARG1__);
           };
-          ((__ITM_READ_ARG1 *)result__U4HH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__SJL;
-          expr__CFL=result__U4HH;
-          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__DFL)->parent_arrayed_collection__RTF.storage__FYT)[first_msg__HFL]=result__U4HH;
-          first_msg__HFL=(__INTEGER)(first_msg__HFL -  1);
-          Self__HE1C=((__FAST_ARRAYoITM_CODEo *)l_expr__DFL);
-          __tmp__QE1C=Self__HE1C->parent_arrayed_collection__RTF.storage__FYT;
-          __tmp__RE1C=Self__HE1C->parent_arrayed_collection__RTF.upper__2HL;
-          Self__SHCD=((void **)__tmp__QE1C);
-          i__DICD=first_msg__HFL;
-          while ((i__DICD != __tmp__RE1C)) {
-            Self__SHCD[i__DICD]=Self__SHCD[(__INTEGER)(i__DICD +  1)];
-            i__DICD=(__INTEGER)(i__DICD +  1);
+          ((__ITM_READ_ARG1 *)result__UAJH)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__0JL;
+          expr__KFL=result__UAJH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__LFL)->parent_arrayed_collection__ZTF.storage__NYT)[first_msg__PFL]=result__UAJH;
+          first_msg__PFL=(__INTEGER)(first_msg__PFL -  1);
+          Self__PE1C=((__FAST_ARRAYoITM_CODEo *)l_expr__LFL);
+          __tmp__YE1C=Self__PE1C->parent_arrayed_collection__ZTF.storage__NYT;
+          __tmp__ZE1C=Self__PE1C->parent_arrayed_collection__ZTF.upper__EIL;
+          Self__0HCD=((void **)__tmp__YE1C);
+          i__LICD=first_msg__PFL;
+          while ((i__LICD != __tmp__ZE1C)) {
+            Self__0HCD[i__LICD]=Self__0HCD[(__INTEGER)(i__LICD +  1)];
+            i__LICD=(__INTEGER)(i__LICD +  1);
           };
-          Self__HE1C->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__HE1C->parent_arrayed_collection__RTF.upper__2HL -  1);
+          Self__PE1C->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(Self__PE1C->parent_arrayed_collection__ZTF.upper__EIL -  1);
         };
       };
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  1)) {
-        result__BFL=((void **)((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.storage__FYT)[ 0];
-        free__YVI(result__13H);
-        __tmp__IKL=TRUE__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.upper__EIL +  1) ==  1)) {
+        result__JFL=((void **)((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.storage__NYT)[ 0];
+        free__AWI(result__D4H);
+        __tmp__QKL=TRUE__;
       } else {
-        __tmp__IKL=FALSE__;
+        __tmp__QKL=FALSE__;
       };
-      if ((! __tmp__IKL)) {
-        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  3)) {
-          __tmp__VKL=((void **)((__FAST_ARRAYoITM_CODEo *)result__13H)->parent_arrayed_collection__RTF.storage__FYT)[ 1];
-          if (__tmp__VKL==NULL) {
-            __tmp__WKL=NULL;
+      if ((! __tmp__QKL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.upper__EIL +  1) ==  3)) {
+          __tmp__3KL=((void **)((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.storage__NYT)[ 1];
+          if (__tmp__3KL==NULL) {
+            __tmp__4KL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__VKL)->__id) {
+            switch (((struct ___OBJ *)__tmp__3KL)->__id) {
             case __ITM_LIST__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__WKL=((void *)__tmp__VKL);
+              __tmp__4KL=((void *)__tmp__3KL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__WKL=NULL;
+              __tmp__4KL=NULL;
             } break;
             }
           };
-          itm_op__FFL=__tmp__WKL;
-          __tmp__ZKL=((__ITM_OPERATOR *)__tmp__WKL)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
-          operator__name__3DO((&__string_81),((__ITM_OPERATOR *)__tmp__WKL)->name__PIL);
-          result__HXO=NULL;
-          ptr__IXO=((__POINTER )(NULL));
-          typ_id__NXO= 0;
-          sz__KXO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-          if ((sz__KXO ==  0)) {
-            result__HXO=ITM_READ_ARG2__;
-          } else {
-            typ_id__NXO=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__KXO);
-            if ((typ_id__NXO == (__INTEGER)(-  1))) {
-              a__1EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__2EFH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXO + a__1EFH) & (__UINTEGER_32)(~ a__1EFH));
-              ptr_table__I5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2EFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__H5HH=((__POINTER )(NULL));
-              result__J5HH=((__POINTER *)ptr_table__I5HH)[ 0];
-              if ((result__J5HH == (void *)NULL)) {
-                result__J5HH=new_lab__MRJ(new_size__2EFH);
-                next__H5HH=(void *)((unsigned long)result__J5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
-                ((__POINTER *)next__H5HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__I5HH)[ 0]=next__H5HH;
+          itm_op__NFL=__tmp__4KL;
+          __tmp__BLL=((__ITM_OPERATOR *)__tmp__4KL)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+          operator__name__FEO((&__string_81),((__ITM_OPERATOR *)__tmp__4KL)->name__XIL);
+          result__PXO=NULL;
+          ptr__QXO=((__POINTER )(NULL));
+          typ_id__VXO= 0;
+          sz__SXO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__SXO ==  0)) {
+            result__PXO=ITM_READ_ARG2__;
+          } else {
+            typ_id__VXO=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SXO);
+            if ((typ_id__VXO == (__INTEGER)(-  1))) {
+              a__LGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__MGGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SXO + a__LGGH) & (__UINTEGER_32)(~ a__LGGH));
+              ptr_table__IBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MGGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__HBJH=((__POINTER )(NULL));
+              result__JBJH=((__POINTER *)ptr_table__IBJH)[ 0];
+              if ((result__JBJH == (void *)NULL)) {
+                result__JBJH=new_lab__URJ(new_size__MGGH);
+                next__HBJH=(void *)((unsigned long)result__JBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGGH)));
+                ((__POINTER *)next__HBJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IBJH)[ 0]=next__HBJH;
               } else {
-                next__H5HH=((__POINTER *)result__J5HH)[ 0];
-                if ((next__H5HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2EFH <<  1)) <=  4096)) {
-                    next__H5HH=(void *)((unsigned long)result__J5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
+                next__HBJH=((__POINTER *)result__JBJH)[ 0];
+                if ((next__HBJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JBJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MGGH <<  1)) <=  4096)) {
+                    next__HBJH=(void *)((unsigned long)result__JBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGGH)));
                   } else {
-                    next__H5HH=new_lab__MRJ(new_size__2EFH);
+                    next__HBJH=new_lab__URJ(new_size__MGGH);
                   };
-                  ((__POINTER *)next__H5HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__I5HH)[ 0]=next__H5HH;
+                  ((__POINTER *)next__HBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IBJH)[ 0]=next__HBJH;
                 } else {
-                  ((__POINTER *)result__J5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__J5HH=next__H5HH;
+                  ((__POINTER *)result__JBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__JBJH=next__HBJH;
                 };
               };
-              ptr__IXO=result__J5HH;
+              ptr__QXO=result__JBJH;
             } else {
-              t__AFFH=((__UINTEGER_32 )typ_id__NXO);
-              a__5EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__Q5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__KXO + a__5EFH) & (__UINTEGER_32)(~ a__5EFH));
-              ptr_table__N5HH=((__POINTER )(&(table_type[(t__AFFH)])));
-              lab_type__P5HH=(__UINTEGER_32)(t__AFFH |  1);
-              next__M5HH=((__POINTER )(NULL));
-              result__O5HH=((__POINTER *)ptr_table__N5HH)[ 0];
-              if ((result__O5HH == (void *)NULL)) {
-                result__O5HH=new_lab__MRJ(lab_type__P5HH);
-                next__M5HH=(void *)((unsigned long)result__O5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5HH)));
-                ((__POINTER *)next__M5HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__N5HH)[ 0]=next__M5HH;
+              t__QGGH=((__UINTEGER_32 )typ_id__VXO);
+              a__PGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__QBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SXO + a__PGGH) & (__UINTEGER_32)(~ a__PGGH));
+              ptr_table__NBJH=((__POINTER )(&(table_type[(t__QGGH)])));
+              lab_type__PBJH=(__UINTEGER_32)(t__QGGH |  1);
+              next__MBJH=((__POINTER )(NULL));
+              result__OBJH=((__POINTER *)ptr_table__NBJH)[ 0];
+              if ((result__OBJH == (void *)NULL)) {
+                result__OBJH=new_lab__URJ(lab_type__PBJH);
+                next__MBJH=(void *)((unsigned long)result__OBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBJH)));
+                ((__POINTER *)next__MBJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
               } else {
-                next__M5HH=((__POINTER *)result__O5HH)[ 0];
-                if ((next__M5HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__O5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q5HH <<  1)) <=  4096)) {
-                    next__M5HH=(void *)((unsigned long)result__O5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5HH)));
+                next__MBJH=((__POINTER *)result__OBJH)[ 0];
+                if ((next__MBJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OBJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QBJH <<  1)) <=  4096)) {
+                    next__MBJH=(void *)((unsigned long)result__OBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBJH)));
                   } else {
-                    next__M5HH=new_lab__MRJ(lab_type__P5HH);
+                    next__MBJH=new_lab__URJ(lab_type__PBJH);
                   };
-                  ((__POINTER *)next__M5HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__N5HH)[ 0]=next__M5HH;
+                  ((__POINTER *)next__MBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
                 } else {
-                  ((__POINTER *)result__O5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__O5HH=next__M5HH;
+                  ((__POINTER *)result__OBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__OBJH=next__MBJH;
                 };
               };
-              ptr__IXO=result__O5HH;
-            };
-            result__HXO=((__ITM_READ_ARG2 *)ptr__IXO);
-            *(result__HXO) = *(ITM_READ_ARG2__);
-          };
-          ((__ITM_READ_ARG2 *)result__HXO)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__ZKL;
-          result__BFL=result__HXO;
-          free__YVI(result__13H);
-        } else {
-          l_expr__DFL=copy__Q5H(result__13H);
-          result__0YO=NULL;
-          ptr__1YO=((__POINTER )(NULL));
-          typ_id__AZO= 0;
-          sz__3YO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
-          if ((sz__3YO ==  0)) {
-            result__0YO=ITM_EXPRESSION__;
-          } else {
-            typ_id__AZO=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3YO);
-            if ((typ_id__AZO == (__INTEGER)(-  1))) {
-              a__UWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__VWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YO + a__UWEH) & (__UINTEGER_32)(~ a__UWEH));
-              ptr_table__S5HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VWEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__R5HH=((__POINTER )(NULL));
-              result__T5HH=((__POINTER *)ptr_table__S5HH)[ 0];
-              if ((result__T5HH == (void *)NULL)) {
-                result__T5HH=new_lab__MRJ(new_size__VWEH);
-                next__R5HH=(void *)((unsigned long)result__T5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWEH)));
-                ((__POINTER *)next__R5HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__S5HH)[ 0]=next__R5HH;
+              ptr__QXO=result__OBJH;
+            };
+            result__PXO=((__ITM_READ_ARG2 *)ptr__QXO);
+            *(result__PXO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__PXO)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__BLL;
+          result__JFL=result__PXO;
+          free__AWI(result__D4H);
+        } else {
+          l_expr__LFL=copy__Y5H(result__D4H);
+          result__CZO=NULL;
+          ptr__DZO=((__POINTER )(NULL));
+          typ_id__IZO= 0;
+          sz__FZO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__FZO ==  0)) {
+            result__CZO=ITM_EXPRESSION__;
+          } else {
+            typ_id__IZO=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__FZO);
+            if ((typ_id__IZO == (__INTEGER)(-  1))) {
+              a__EYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__FYFH=(__UINTEGER_32)((__UINTEGER_32)(sz__FZO + a__EYFH) & (__UINTEGER_32)(~ a__EYFH));
+              ptr_table__SBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__RBJH=((__POINTER )(NULL));
+              result__TBJH=((__POINTER *)ptr_table__SBJH)[ 0];
+              if ((result__TBJH == (void *)NULL)) {
+                result__TBJH=new_lab__URJ(new_size__FYFH);
+                next__RBJH=(void *)((unsigned long)result__TBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYFH)));
+                ((__POINTER *)next__RBJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
               } else {
-                next__R5HH=((__POINTER *)result__T5HH)[ 0];
-                if ((next__R5HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VWEH <<  1)) <=  4096)) {
-                    next__R5HH=(void *)((unsigned long)result__T5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWEH)));
+                next__RBJH=((__POINTER *)result__TBJH)[ 0];
+                if ((next__RBJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TBJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FYFH <<  1)) <=  4096)) {
+                    next__RBJH=(void *)((unsigned long)result__TBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FYFH)));
                   } else {
-                    next__R5HH=new_lab__MRJ(new_size__VWEH);
+                    next__RBJH=new_lab__URJ(new_size__FYFH);
                   };
-                  ((__POINTER *)next__R5HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__S5HH)[ 0]=next__R5HH;
+                  ((__POINTER *)next__RBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
                 } else {
-                  ((__POINTER *)result__T5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__T5HH=next__R5HH;
+                  ((__POINTER *)result__TBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TBJH=next__RBJH;
                 };
               };
-              ptr__1YO=result__T5HH;
+              ptr__DZO=result__TBJH;
             } else {
-              t__ZWEH=((__UINTEGER_32 )typ_id__AZO);
-              a__YWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__05HH=(__UINTEGER_32)((__UINTEGER_32)(sz__3YO + a__YWEH) & (__UINTEGER_32)(~ a__YWEH));
-              ptr_table__X5HH=((__POINTER )(&(table_type[(t__ZWEH)])));
-              lab_type__Z5HH=(__UINTEGER_32)(t__ZWEH |  1);
-              next__W5HH=((__POINTER )(NULL));
-              result__Y5HH=((__POINTER *)ptr_table__X5HH)[ 0];
-              if ((result__Y5HH == (void *)NULL)) {
-                result__Y5HH=new_lab__MRJ(lab_type__Z5HH);
-                next__W5HH=(void *)((unsigned long)result__Y5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05HH)));
-                ((__POINTER *)next__W5HH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__X5HH)[ 0]=next__W5HH;
+              t__JYFH=((__UINTEGER_32 )typ_id__IZO);
+              a__IYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0BJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FZO + a__IYFH) & (__UINTEGER_32)(~ a__IYFH));
+              ptr_table__XBJH=((__POINTER )(&(table_type[(t__JYFH)])));
+              lab_type__ZBJH=(__UINTEGER_32)(t__JYFH |  1);
+              next__WBJH=((__POINTER )(NULL));
+              result__YBJH=((__POINTER *)ptr_table__XBJH)[ 0];
+              if ((result__YBJH == (void *)NULL)) {
+                result__YBJH=new_lab__URJ(lab_type__ZBJH);
+                next__WBJH=(void *)((unsigned long)result__YBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BJH)));
+                ((__POINTER *)next__WBJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
               } else {
-                next__W5HH=((__POINTER *)result__Y5HH)[ 0];
-                if ((next__W5HH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__Y5HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__05HH <<  1)) <=  4096)) {
-                    next__W5HH=(void *)((unsigned long)result__Y5HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__05HH)));
+                next__WBJH=((__POINTER *)result__YBJH)[ 0];
+                if ((next__WBJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YBJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0BJH <<  1)) <=  4096)) {
+                    next__WBJH=(void *)((unsigned long)result__YBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0BJH)));
                   } else {
-                    next__W5HH=new_lab__MRJ(lab_type__Z5HH);
+                    next__WBJH=new_lab__URJ(lab_type__ZBJH);
                   };
-                  ((__POINTER *)next__W5HH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__X5HH)[ 0]=next__W5HH;
+                  ((__POINTER *)next__WBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
                 } else {
-                  ((__POINTER *)result__Y5HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W5HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Y5HH=next__W5HH;
+                  ((__POINTER *)result__YBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__YBJH=next__WBJH;
                 };
               };
-              ptr__1YO=result__Y5HH;
+              ptr__DZO=result__YBJH;
             };
-            result__0YO=((__ITM_EXPRESSION *)ptr__1YO);
-            *(result__0YO) = *(ITM_EXPRESSION__);
+            result__CZO=((__ITM_EXPRESSION *)ptr__DZO);
+            *(result__CZO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__0YO)->value_list__1JV=l_expr__DFL;
-          result__BFL=result__0YO;
+          ((__ITM_EXPRESSION *)result__CZO)->value_list__DKV=l_expr__LFL;
+          result__JFL=result__CZO;
         };
       };
     };
-    result__B5I=result__BFL;
+    result__J5I=result__JFL;
   };
-  return(result__B5I);
+  return(result__J5I);
 }
 
-static void set_value__type__ZFHC(__ITM_SLOT *Self__0FHC,void *e__1FHC,void *p__2FHC)
+static void set_value__type__BGHC(__ITM_SLOT *Self__CGHC,void *e__DGHC,void *p__EGHC)
 // ({ITM_SLOT},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_OPERATORxITM_READ_ARG1xITM_READ_ARG2xITM_EXPRESSIONxITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_RESULT},{NULLxPROTOTYPE}) VoidRecursive, No inlinable.
 {
-  void *n__3BBD;
-  void *sec__4BBD;
-  __POSITION __tmp__KCBD,__tmp__SCBD,__tmp__GDBD,__tmp__PDBD;
-  __ITM_ARG *result__CPGH,*Self__KPGH;
-  __POINTER ptr__DPGH,ptr_table__25HH,next__15HH,result__35HH;
-  __POINTER ptr_table__BAIH,next__AAIH,result__CAIH,ptr__MSAC;
-  __POINTER ptr_table__GAIH,next__FAIH,result__HAIH,ptr_table__LAIH;
-  __POINTER next__KAIH,result__MAIH,ptr__JUI,ptr_table__QAIH,next__PAIH;
-  __POINTER result__RAIH,ptr_table__VAIH,next__UAIH,result__WAIH;
-  __POINTER ptr__OFCD,ptr_table__0AIH,next__ZAIH,result__1AIH;
-  __POINTER ptr_table__5AIH,next__4AIH,result__ABIH;
-  __INTEGER typ_id__EPGH,typ_id__RSAC,typ_id__OUI,typ_id__TFCD;
-  __UINTEGER_32 sz__FPGH,a__GPGH,new_size__HPGH,t__IPGH,a__JPGH;
-  __UINTEGER_32 new_size__EAIH,lab_type__DAIH,sz__OSAC,a__5WEH;
-  __UINTEGER_32 new_size__AXEH,t__EXEH,a__DXEH,new_size__OAIH;
-  __UINTEGER_32 lab_type__NAIH,sz__LUI,a__1XEH,new_size__2XEH,t__AYEH;
-  __UINTEGER_32 a__5XEH,new_size__YAIH,lab_type__XAIH,sz__QFCD,a__DYEH;
-  __UINTEGER_32 new_size__EYEH,t__IYEH,a__HYEH,new_size__CBIH;
-  __UINTEGER_32 lab_type__BBIH;
-  __ITM_SLOT *result__LSAC,*Self__J2HC;
-  __ITM_PROTOTYPE *result__IUI;
-  __ITM_READ_ARG1 *result__NFCD;
-  void *larg__5BBD;
-  if ((Self__0FHC->affect__JAGC != '<')) {
-    copy__ZCS(string_tmp__VH,(&__string_241));
-    append__BOS(string_tmp__VH,Self__0FHC->parent_named__P5.name__LI);
-    n__3BBD=get__IWB(string_tmp__VH);
-    sec__4BBD=get_name__0UOB((&__string_27));
-    larg__5BBD=create_with_capacity__RL5B( 1);
-    switch (((struct ___OBJ *)e__1FHC)->__id) {
+  void *n__FCBD;
+  void *sec__GCBD;
+  __POSITION __tmp__SCBD,__tmp__0CBD,__tmp__ODBD,__tmp__XDBD;
+  __ITM_ARG *result__3QHH,*Self__FRHH;
+  __POINTER ptr__4QHH,ptr_table__2BJH,next__1BJH,result__3BJH;
+  __POINTER ptr_table__BCJH,next__ACJH,result__CCJH,ptr__USAC;
+  __POINTER ptr_table__GCJH,next__FCJH,result__HCJH,ptr_table__LCJH;
+  __POINTER next__KCJH,result__MCJH,ptr__RUI,ptr_table__QCJH,next__PCJH;
+  __POINTER result__RCJH,ptr_table__VCJH,next__UCJH,result__WCJH;
+  __POINTER ptr__WFCD,ptr_table__0CJH,next__ZCJH,result__1CJH;
+  __POINTER ptr_table__5CJH,next__4CJH,result__ADJH;
+  __INTEGER typ_id__5QHH,typ_id__ZSAC,typ_id__WUI,typ_id__1FCD;
+  __UINTEGER_32 sz__ARHH,a__BRHH,new_size__CRHH,t__DRHH,a__ERHH;
+  __UINTEGER_32 new_size__ECJH,lab_type__DCJH,sz__WSAC,a__PYFH;
+  __UINTEGER_32 new_size__QYFH,t__UYFH,a__TYFH,new_size__OCJH;
+  __UINTEGER_32 lab_type__NCJH,sz__TUI,a__LZFH,new_size__MZFH,t__QZFH;
+  __UINTEGER_32 a__PZFH,new_size__YCJH,lab_type__XCJH,sz__YFCD,a__TZFH;
+  __UINTEGER_32 new_size__UZFH,t__YZFH,a__XZFH,new_size__CDJH;
+  __UINTEGER_32 lab_type__BDJH;
+  __ITM_SLOT *result__TSAC,*Self__R2HC;
+  __ITM_PROTOTYPE *result__QUI;
+  __ITM_READ_ARG1 *result__VFCD;
+  void *larg__HCBD;
+  if ((Self__CGHC->affect__RAGC != '<')) {
+    copy__BDS(string_tmp__VH,(&__string_239));
+    append__JOS(string_tmp__VH,Self__CGHC->parent_named__V5.name__LI);
+    n__FCBD=get__QWB(string_tmp__VH);
+    sec__GCBD=get_name__CVOB((&__string_27));
+    larg__HCBD=create_with_capacity__ZL5B( 1);
+    switch (((struct ___OBJ *)e__DGHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__KCBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__KCBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__KCBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__KCBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__KCBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__KCBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__KCBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__KCBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__KCBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__KCBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__KCBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__KCBD=position__FD5B(e__1FHC);
+      __tmp__SCBD=position__ND5B(e__DGHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__KCBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__KCBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__KCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__KCBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__KCBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__KCBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__KCBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__KCBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__KCBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__SCBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__KCBD=position__FJHC(e__1FHC);
+      __tmp__SCBD=position__NJHC(e__DGHC);
     } break;
     };
-    result__CPGH=NULL;
-    ptr__DPGH=((__POINTER )(NULL));
-    typ_id__EPGH= 0;
-    sz__FPGH=((__UINTEGER_32 )sizeof(__ITM_ARG));
-    if ((sz__FPGH ==  0)) {
-      result__CPGH=ITM_ARG__;
-    } else {
-      typ_id__EPGH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FPGH);
-      if ((typ_id__EPGH == (__INTEGER)(-  1))) {
-        a__GPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__HPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPGH + a__GPGH) & (__UINTEGER_32)(~ a__GPGH));
-        ptr_table__25HH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__15HH=((__POINTER )(NULL));
-        result__35HH=((__POINTER *)ptr_table__25HH)[ 0];
-        if ((result__35HH == (void *)NULL)) {
-          result__35HH=new_lab__MRJ(new_size__HPGH);
-          next__15HH=(void *)((unsigned long)result__35HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
-          ((__POINTER *)next__15HH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__25HH)[ 0]=next__15HH;
-        } else {
-          next__15HH=((__POINTER *)result__35HH)[ 0];
-          if ((next__15HH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__35HH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HPGH <<  1)) <=  4096)) {
-              next__15HH=(void *)((unsigned long)result__35HH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HPGH)));
+    result__3QHH=NULL;
+    ptr__4QHH=((__POINTER )(NULL));
+    typ_id__5QHH= 0;
+    sz__ARHH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__ARHH ==  0)) {
+      result__3QHH=ITM_ARG__;
+    } else {
+      typ_id__5QHH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ARHH);
+      if ((typ_id__5QHH == (__INTEGER)(-  1))) {
+        a__BRHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CRHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ARHH + a__BRHH) & (__UINTEGER_32)(~ a__BRHH));
+        ptr_table__2BJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CRHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__1BJH=((__POINTER )(NULL));
+        result__3BJH=((__POINTER *)ptr_table__2BJH)[ 0];
+        if ((result__3BJH == (void *)NULL)) {
+          result__3BJH=new_lab__URJ(new_size__CRHH);
+          next__1BJH=(void *)((unsigned long)result__3BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRHH)));
+          ((__POINTER *)next__1BJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2BJH)[ 0]=next__1BJH;
+        } else {
+          next__1BJH=((__POINTER *)result__3BJH)[ 0];
+          if ((next__1BJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3BJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CRHH <<  1)) <=  4096)) {
+              next__1BJH=(void *)((unsigned long)result__3BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRHH)));
             } else {
-              next__15HH=new_lab__MRJ(new_size__HPGH);
-            };
-            ((__POINTER *)next__15HH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__25HH)[ 0]=next__15HH;
-          } else {
-            ((__POINTER *)result__35HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__15HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__35HH=next__15HH;
-          };
-        };
-        ptr__DPGH=result__35HH;
-      } else {
-        t__IPGH=((__UINTEGER_32 )typ_id__EPGH);
-        a__JPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__EAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPGH + a__JPGH) & (__UINTEGER_32)(~ a__JPGH));
-        ptr_table__BAIH=((__POINTER )(&(table_type[(t__IPGH)])));
-        lab_type__DAIH=(__UINTEGER_32)(t__IPGH |  1);
-        next__AAIH=((__POINTER )(NULL));
-        result__CAIH=((__POINTER *)ptr_table__BAIH)[ 0];
-        if ((result__CAIH == (void *)NULL)) {
-          result__CAIH=new_lab__MRJ(lab_type__DAIH);
-          next__AAIH=(void *)((unsigned long)result__CAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAIH)));
-          ((__POINTER *)next__AAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BAIH)[ 0]=next__AAIH;
-        } else {
-          next__AAIH=((__POINTER *)result__CAIH)[ 0];
-          if ((next__AAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EAIH <<  1)) <=  4096)) {
-              next__AAIH=(void *)((unsigned long)result__CAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EAIH)));
+              next__1BJH=new_lab__URJ(new_size__CRHH);
+            };
+            ((__POINTER *)next__1BJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2BJH)[ 0]=next__1BJH;
+          } else {
+            ((__POINTER *)result__3BJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1BJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3BJH=next__1BJH;
+          };
+        };
+        ptr__4QHH=result__3BJH;
+      } else {
+        t__DRHH=((__UINTEGER_32 )typ_id__5QHH);
+        a__ERHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ECJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ARHH + a__ERHH) & (__UINTEGER_32)(~ a__ERHH));
+        ptr_table__BCJH=((__POINTER )(&(table_type[(t__DRHH)])));
+        lab_type__DCJH=(__UINTEGER_32)(t__DRHH |  1);
+        next__ACJH=((__POINTER )(NULL));
+        result__CCJH=((__POINTER *)ptr_table__BCJH)[ 0];
+        if ((result__CCJH == (void *)NULL)) {
+          result__CCJH=new_lab__URJ(lab_type__DCJH);
+          next__ACJH=(void *)((unsigned long)result__CCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECJH)));
+          ((__POINTER *)next__ACJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BCJH)[ 0]=next__ACJH;
+        } else {
+          next__ACJH=((__POINTER *)result__CCJH)[ 0];
+          if ((next__ACJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CCJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__ECJH <<  1)) <=  4096)) {
+              next__ACJH=(void *)((unsigned long)result__CCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECJH)));
             } else {
-              next__AAIH=new_lab__MRJ(lab_type__DAIH);
+              next__ACJH=new_lab__URJ(lab_type__DCJH);
             };
-            ((__POINTER *)next__AAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BAIH)[ 0]=next__AAIH;
+            ((__POINTER *)next__ACJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BCJH)[ 0]=next__ACJH;
           } else {
-            ((__POINTER *)result__CAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CAIH=next__AAIH;
+            ((__POINTER *)result__CCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CCJH=next__ACJH;
           };
         };
-        ptr__DPGH=result__CAIH;
+        ptr__4QHH=result__CCJH;
       };
-      result__CPGH=((__ITM_ARG *)ptr__DPGH);
-      *(result__CPGH) = *(ITM_ARG__);
+      result__3QHH=((__ITM_ARG *)ptr__4QHH);
+      *(result__3QHH) = *(ITM_ARG__);
     };
-    Self__KPGH=((__ITM_ARG *)result__CPGH);
-    Self__KPGH->parent_itm_argument__ZHHB.parent_itm_code__S4M.position__NDJ=__tmp__KCBD;
-    Self__KPGH->name__10HC=(&__string_58);
-    Self__KPGH->type__20HC=type_self__HUN;
-    add_last__05GC(larg__5BBD,result__CPGH);
-    switch (((struct ___OBJ *)e__1FHC)->__id) {
+    Self__FRHH=((__ITM_ARG *)result__3QHH);
+    Self__FRHH->parent_itm_argument__BIHB.parent_itm_code__04M.position__VDJ=__tmp__SCBD;
+    Self__FRHH->name__D1HC=(&__string_58);
+    Self__FRHH->type__E1HC=type_self__PUN;
+    add_last__CAHC(larg__HCBD,result__3QHH);
+    switch (((struct ___OBJ *)e__DGHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__SCBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__SCBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__SCBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__SCBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__SCBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__SCBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__SCBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__SCBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__SCBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__SCBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__SCBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__SCBD=position__FD5B(e__1FHC);
+      __tmp__0CBD=position__ND5B(e__DGHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__SCBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__SCBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__SCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__SCBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__SCBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__SCBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__SCBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__SCBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__SCBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__0CBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__SCBD=position__FJHC(e__1FHC);
+      __tmp__0CBD=position__NJHC(e__DGHC);
     } break;
     };
-    result__LSAC=NULL;
-    ptr__MSAC=((__POINTER )(NULL));
-    typ_id__RSAC= 0;
-    sz__OSAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
-    if ((sz__OSAC ==  0)) {
-      result__LSAC=ITM_SLOT__;
-    } else {
-      typ_id__RSAC=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__OSAC);
-      if ((typ_id__RSAC == (__INTEGER)(-  1))) {
-        a__5WEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__AXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAC + a__5WEH) & (__UINTEGER_32)(~ a__5WEH));
-        ptr_table__GAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AXEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__FAIH=((__POINTER )(NULL));
-        result__HAIH=((__POINTER *)ptr_table__GAIH)[ 0];
-        if ((result__HAIH == (void *)NULL)) {
-          result__HAIH=new_lab__MRJ(new_size__AXEH);
-          next__FAIH=(void *)((unsigned long)result__HAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXEH)));
-          ((__POINTER *)next__FAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GAIH)[ 0]=next__FAIH;
-        } else {
-          next__FAIH=((__POINTER *)result__HAIH)[ 0];
-          if ((next__FAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__AXEH <<  1)) <=  4096)) {
-              next__FAIH=(void *)((unsigned long)result__HAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXEH)));
+    result__TSAC=NULL;
+    ptr__USAC=((__POINTER )(NULL));
+    typ_id__ZSAC= 0;
+    sz__WSAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__WSAC ==  0)) {
+      result__TSAC=ITM_SLOT__;
+    } else {
+      typ_id__ZSAC=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WSAC);
+      if ((typ_id__ZSAC == (__INTEGER)(-  1))) {
+        a__PYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QYFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSAC + a__PYFH) & (__UINTEGER_32)(~ a__PYFH));
+        ptr_table__GCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__FCJH=((__POINTER )(NULL));
+        result__HCJH=((__POINTER *)ptr_table__GCJH)[ 0];
+        if ((result__HCJH == (void *)NULL)) {
+          result__HCJH=new_lab__URJ(new_size__QYFH);
+          next__FCJH=(void *)((unsigned long)result__HCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QYFH)));
+          ((__POINTER *)next__FCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GCJH)[ 0]=next__FCJH;
+        } else {
+          next__FCJH=((__POINTER *)result__HCJH)[ 0];
+          if ((next__FCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HCJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__QYFH <<  1)) <=  4096)) {
+              next__FCJH=(void *)((unsigned long)result__HCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QYFH)));
             } else {
-              next__FAIH=new_lab__MRJ(new_size__AXEH);
-            };
-            ((__POINTER *)next__FAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GAIH)[ 0]=next__FAIH;
-          } else {
-            ((__POINTER *)result__HAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__HAIH=next__FAIH;
-          };
-        };
-        ptr__MSAC=result__HAIH;
-      } else {
-        t__EXEH=((__UINTEGER_32 )typ_id__RSAC);
-        a__DXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSAC + a__DXEH) & (__UINTEGER_32)(~ a__DXEH));
-        ptr_table__LAIH=((__POINTER )(&(table_type[(t__EXEH)])));
-        lab_type__NAIH=(__UINTEGER_32)(t__EXEH |  1);
-        next__KAIH=((__POINTER )(NULL));
-        result__MAIH=((__POINTER *)ptr_table__LAIH)[ 0];
-        if ((result__MAIH == (void *)NULL)) {
-          result__MAIH=new_lab__MRJ(lab_type__NAIH);
-          next__KAIH=(void *)((unsigned long)result__MAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAIH)));
-          ((__POINTER *)next__KAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LAIH)[ 0]=next__KAIH;
-        } else {
-          next__KAIH=((__POINTER *)result__MAIH)[ 0];
-          if ((next__KAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OAIH <<  1)) <=  4096)) {
-              next__KAIH=(void *)((unsigned long)result__MAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OAIH)));
+              next__FCJH=new_lab__URJ(new_size__QYFH);
+            };
+            ((__POINTER *)next__FCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GCJH)[ 0]=next__FCJH;
+          } else {
+            ((__POINTER *)result__HCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HCJH=next__FCJH;
+          };
+        };
+        ptr__USAC=result__HCJH;
+      } else {
+        t__UYFH=((__UINTEGER_32 )typ_id__ZSAC);
+        a__TYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WSAC + a__TYFH) & (__UINTEGER_32)(~ a__TYFH));
+        ptr_table__LCJH=((__POINTER )(&(table_type[(t__UYFH)])));
+        lab_type__NCJH=(__UINTEGER_32)(t__UYFH |  1);
+        next__KCJH=((__POINTER )(NULL));
+        result__MCJH=((__POINTER *)ptr_table__LCJH)[ 0];
+        if ((result__MCJH == (void *)NULL)) {
+          result__MCJH=new_lab__URJ(lab_type__NCJH);
+          next__KCJH=(void *)((unsigned long)result__MCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCJH)));
+          ((__POINTER *)next__KCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LCJH)[ 0]=next__KCJH;
+        } else {
+          next__KCJH=((__POINTER *)result__MCJH)[ 0];
+          if ((next__KCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MCJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OCJH <<  1)) <=  4096)) {
+              next__KCJH=(void *)((unsigned long)result__MCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCJH)));
             } else {
-              next__KAIH=new_lab__MRJ(lab_type__NAIH);
+              next__KCJH=new_lab__URJ(lab_type__NCJH);
             };
-            ((__POINTER *)next__KAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LAIH)[ 0]=next__KAIH;
+            ((__POINTER *)next__KCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LCJH)[ 0]=next__KCJH;
           } else {
-            ((__POINTER *)result__MAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MAIH=next__KAIH;
+            ((__POINTER *)result__MCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MCJH=next__KCJH;
           };
         };
-        ptr__MSAC=result__MAIH;
+        ptr__USAC=result__MCJH;
       };
-      result__LSAC=((__ITM_SLOT *)ptr__MSAC);
-      *(result__LSAC) = *(ITM_SLOT__);
+      result__TSAC=((__ITM_SLOT *)ptr__USAC);
+      *(result__TSAC) = *(ITM_SLOT__);
     };
-    Self__J2HC=((__ITM_SLOT *)result__LSAC);
-    Self__J2HC->parent_named__P5.name__LI=n__3BBD;
-    Self__J2HC->parent_named__P5.parent_itm_object__4.position__NDJ=__tmp__SCBD;
-    Self__J2HC->id_section__Y1C=sec__4BBD;
-    ((__ITM_SLOT *)result__LSAC)->affect__JAGC='<';
-    set_value__type__ZFHC(result__LSAC,e__1FHC,p__2FHC);
-    set_argument_list__VCHC(result__LSAC,larg__5BBD);
-    set_result_type__Q3FC(result__LSAC,Self__0FHC->result_type__04FC);
-    fast_put__to__BOGC(((__PROTOTYPE *)p__2FHC)->slot_list__2US,result__LSAC,result__LSAC->parent_named__P5.name__LI);
-    switch (((struct ___OBJ *)e__1FHC)->__id) {
+    Self__R2HC=((__ITM_SLOT *)result__TSAC);
+    Self__R2HC->parent_named__V5.name__LI=n__FCBD;
+    Self__R2HC->parent_named__V5.parent_itm_object__4.position__VDJ=__tmp__0CBD;
+    Self__R2HC->id_section__A2C=sec__GCBD;
+    ((__ITM_SLOT *)result__TSAC)->affect__RAGC='<';
+    set_value__type__BGHC(result__TSAC,e__DGHC,p__EGHC);
+    set_argument_list__3CHC(result__TSAC,larg__HCBD);
+    set_result_type__Y3FC(result__TSAC,Self__CGHC->result_type__C5FC);
+    fast_put__to__JOGC(((__PROTOTYPE *)p__EGHC)->slot_list__EVS,result__TSAC,result__TSAC->parent_named__V5.name__LI);
+    switch (((struct ___OBJ *)e__DGHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__GDBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__GDBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__GDBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__GDBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__GDBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__GDBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__GDBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__GDBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__GDBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__GDBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__GDBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__GDBD=position__FD5B(e__1FHC);
+      __tmp__ODBD=position__ND5B(e__DGHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__GDBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__GDBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__GDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__GDBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__GDBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__GDBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__GDBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__GDBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__GDBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__ODBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__GDBD=position__FJHC(e__1FHC);
+      __tmp__ODBD=position__NJHC(e__DGHC);
     } break;
     };
-    get__DTI(((__PROTOTYPE *)p__2FHC)->parent_named__5.name__LI);
-    result__IUI=NULL;
-    ptr__JUI=((__POINTER )(NULL));
-    typ_id__OUI= 0;
-    sz__LUI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-    if ((sz__LUI ==  0)) {
-      result__IUI=ITM_PROTOTYPE__;
-    } else {
-      typ_id__OUI=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__LUI);
-      if ((typ_id__OUI == (__INTEGER)(-  1))) {
-        a__1XEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2XEH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUI + a__1XEH) & (__UINTEGER_32)(~ a__1XEH));
-        ptr_table__QAIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2XEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__PAIH=((__POINTER )(NULL));
-        result__RAIH=((__POINTER *)ptr_table__QAIH)[ 0];
-        if ((result__RAIH == (void *)NULL)) {
-          result__RAIH=new_lab__MRJ(new_size__2XEH);
-          next__PAIH=(void *)((unsigned long)result__RAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XEH)));
-          ((__POINTER *)next__PAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QAIH)[ 0]=next__PAIH;
-        } else {
-          next__PAIH=((__POINTER *)result__RAIH)[ 0];
-          if ((next__PAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2XEH <<  1)) <=  4096)) {
-              next__PAIH=(void *)((unsigned long)result__RAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XEH)));
+    get__LTI(((__PROTOTYPE *)p__EGHC)->parent_named__5.name__LI);
+    result__QUI=NULL;
+    ptr__RUI=((__POINTER )(NULL));
+    typ_id__WUI= 0;
+    sz__TUI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__TUI ==  0)) {
+      result__QUI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__WUI=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__TUI);
+      if ((typ_id__WUI == (__INTEGER)(-  1))) {
+        a__LZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUI + a__LZFH) & (__UINTEGER_32)(~ a__LZFH));
+        ptr_table__QCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__PCJH=((__POINTER )(NULL));
+        result__RCJH=((__POINTER *)ptr_table__QCJH)[ 0];
+        if ((result__RCJH == (void *)NULL)) {
+          result__RCJH=new_lab__URJ(new_size__MZFH);
+          next__PCJH=(void *)((unsigned long)result__RCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZFH)));
+          ((__POINTER *)next__PCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QCJH)[ 0]=next__PCJH;
+        } else {
+          next__PCJH=((__POINTER *)result__RCJH)[ 0];
+          if ((next__PCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RCJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MZFH <<  1)) <=  4096)) {
+              next__PCJH=(void *)((unsigned long)result__RCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZFH)));
             } else {
-              next__PAIH=new_lab__MRJ(new_size__2XEH);
-            };
-            ((__POINTER *)next__PAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QAIH)[ 0]=next__PAIH;
-          } else {
-            ((__POINTER *)result__RAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__RAIH=next__PAIH;
-          };
-        };
-        ptr__JUI=result__RAIH;
-      } else {
-        t__AYEH=((__UINTEGER_32 )typ_id__OUI);
-        a__5XEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__YAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUI + a__5XEH) & (__UINTEGER_32)(~ a__5XEH));
-        ptr_table__VAIH=((__POINTER )(&(table_type[(t__AYEH)])));
-        lab_type__XAIH=(__UINTEGER_32)(t__AYEH |  1);
-        next__UAIH=((__POINTER )(NULL));
-        result__WAIH=((__POINTER *)ptr_table__VAIH)[ 0];
-        if ((result__WAIH == (void *)NULL)) {
-          result__WAIH=new_lab__MRJ(lab_type__XAIH);
-          next__UAIH=(void *)((unsigned long)result__WAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAIH)));
-          ((__POINTER *)next__UAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VAIH)[ 0]=next__UAIH;
-        } else {
-          next__UAIH=((__POINTER *)result__WAIH)[ 0];
-          if ((next__UAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WAIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YAIH <<  1)) <=  4096)) {
-              next__UAIH=(void *)((unsigned long)result__WAIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAIH)));
+              next__PCJH=new_lab__URJ(new_size__MZFH);
+            };
+            ((__POINTER *)next__PCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QCJH)[ 0]=next__PCJH;
+          } else {
+            ((__POINTER *)result__RCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RCJH=next__PCJH;
+          };
+        };
+        ptr__RUI=result__RCJH;
+      } else {
+        t__QZFH=((__UINTEGER_32 )typ_id__WUI);
+        a__PZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUI + a__PZFH) & (__UINTEGER_32)(~ a__PZFH));
+        ptr_table__VCJH=((__POINTER )(&(table_type[(t__QZFH)])));
+        lab_type__XCJH=(__UINTEGER_32)(t__QZFH |  1);
+        next__UCJH=((__POINTER )(NULL));
+        result__WCJH=((__POINTER *)ptr_table__VCJH)[ 0];
+        if ((result__WCJH == (void *)NULL)) {
+          result__WCJH=new_lab__URJ(lab_type__XCJH);
+          next__UCJH=(void *)((unsigned long)result__WCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YCJH)));
+          ((__POINTER *)next__UCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VCJH)[ 0]=next__UCJH;
+        } else {
+          next__UCJH=((__POINTER *)result__WCJH)[ 0];
+          if ((next__UCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WCJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YCJH <<  1)) <=  4096)) {
+              next__UCJH=(void *)((unsigned long)result__WCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YCJH)));
             } else {
-              next__UAIH=new_lab__MRJ(lab_type__XAIH);
+              next__UCJH=new_lab__URJ(lab_type__XCJH);
             };
-            ((__POINTER *)next__UAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VAIH)[ 0]=next__UAIH;
+            ((__POINTER *)next__UCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VCJH)[ 0]=next__UCJH;
           } else {
-            ((__POINTER *)result__WAIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WAIH=next__UAIH;
+            ((__POINTER *)result__WCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WCJH=next__UCJH;
           };
         };
-        ptr__JUI=result__WAIH;
+        ptr__RUI=result__WCJH;
       };
-      result__IUI=((__ITM_PROTOTYPE *)ptr__JUI);
-      *(result__IUI) = *(ITM_PROTOTYPE__);
+      result__QUI=((__ITM_PROTOTYPE *)ptr__RUI);
+      *(result__QUI) = *(ITM_PROTOTYPE__);
     };
-    ((__ITM_PROTOTYPE *)result__IUI)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__GDBD;
-    switch (((struct ___OBJ *)e__1FHC)->__id) {
+    ((__ITM_PROTOTYPE *)result__QUI)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__ODBD;
+    switch (((struct ___OBJ *)e__DGHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__PDBD=((__ITM_LIST *)e__1FHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__PDBD=((__ITM_LDOTS *)e__1FHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__PDBD=((__ITM_PROTOTYPE *)e__1FHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__PDBD=((__ITM_LIST_IDF *)e__1FHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__PDBD=((__ITM_WRITE_VALUE *)e__1FHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__PDBD=((__ITM_WRITE_CAST *)e__1FHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ__: {
-      __tmp__PDBD=((__ITM_READ *)e__1FHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__PDBD=((__ITM_WRITE_CODE *)e__1FHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__PDBD=((__ITM_OPERATOR *)e__1FHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__PDBD=((__ITM_READ_ARG1 *)e__1FHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__PDBD=((__ITM_READ_ARG2 *)e__1FHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__PDBD=position__FD5B(e__1FHC);
+      __tmp__XDBD=position__ND5B(e__DGHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__PDBD=((__ITM_OLD *)e__1FHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__PDBD=((__ITM_EXTERNAL_TYPE *)e__1FHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__PDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__1FHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__PDBD=((__ITM_EXTERNAL *)e__1FHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__PDBD=((__ITM_READ_ARGS *)e__1FHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__PDBD=((__ITM_REAL *)e__1FHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__PDBD=((__ITM_NUMBER *)e__1FHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__PDBD=((__ITM_CHARACTER *)e__1FHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__PDBD=((__ITM_STRING *)e__1FHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+      __tmp__XDBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__PDBD=position__FJHC(e__1FHC);
+      __tmp__XDBD=position__NJHC(e__DGHC);
     } break;
     };
-    result__NFCD=NULL;
-    ptr__OFCD=((__POINTER )(NULL));
-    typ_id__TFCD= 0;
-    sz__QFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-    if ((sz__QFCD ==  0)) {
-      result__NFCD=ITM_READ_ARG1__;
-    } else {
-      typ_id__TFCD=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QFCD);
-      if ((typ_id__TFCD == (__INTEGER)(-  1))) {
-        a__DYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__EYEH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFCD + a__DYEH) & (__UINTEGER_32)(~ a__DYEH));
-        ptr_table__0AIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EYEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ZAIH=((__POINTER )(NULL));
-        result__1AIH=((__POINTER *)ptr_table__0AIH)[ 0];
-        if ((result__1AIH == (void *)NULL)) {
-          result__1AIH=new_lab__MRJ(new_size__EYEH);
-          next__ZAIH=(void *)((unsigned long)result__1AIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EYEH)));
-          ((__POINTER *)next__ZAIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0AIH)[ 0]=next__ZAIH;
-        } else {
-          next__ZAIH=((__POINTER *)result__1AIH)[ 0];
-          if ((next__ZAIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1AIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__EYEH <<  1)) <=  4096)) {
-              next__ZAIH=(void *)((unsigned long)result__1AIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EYEH)));
+    result__VFCD=NULL;
+    ptr__WFCD=((__POINTER )(NULL));
+    typ_id__1FCD= 0;
+    sz__YFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__YFCD ==  0)) {
+      result__VFCD=ITM_READ_ARG1__;
+    } else {
+      typ_id__1FCD=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__YFCD);
+      if ((typ_id__1FCD == (__INTEGER)(-  1))) {
+        a__TZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__YFCD + a__TZFH) & (__UINTEGER_32)(~ a__TZFH));
+        ptr_table__0CJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ZCJH=((__POINTER )(NULL));
+        result__1CJH=((__POINTER *)ptr_table__0CJH)[ 0];
+        if ((result__1CJH == (void *)NULL)) {
+          result__1CJH=new_lab__URJ(new_size__UZFH);
+          next__ZCJH=(void *)((unsigned long)result__1CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZFH)));
+          ((__POINTER *)next__ZCJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0CJH)[ 0]=next__ZCJH;
+        } else {
+          next__ZCJH=((__POINTER *)result__1CJH)[ 0];
+          if ((next__ZCJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1CJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UZFH <<  1)) <=  4096)) {
+              next__ZCJH=(void *)((unsigned long)result__1CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UZFH)));
             } else {
-              next__ZAIH=new_lab__MRJ(new_size__EYEH);
-            };
-            ((__POINTER *)next__ZAIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0AIH)[ 0]=next__ZAIH;
-          } else {
-            ((__POINTER *)result__1AIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZAIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1AIH=next__ZAIH;
-          };
-        };
-        ptr__OFCD=result__1AIH;
-      } else {
-        t__IYEH=((__UINTEGER_32 )typ_id__TFCD);
-        a__HYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__CBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFCD + a__HYEH) & (__UINTEGER_32)(~ a__HYEH));
-        ptr_table__5AIH=((__POINTER )(&(table_type[(t__IYEH)])));
-        lab_type__BBIH=(__UINTEGER_32)(t__IYEH |  1);
-        next__4AIH=((__POINTER )(NULL));
-        result__ABIH=((__POINTER *)ptr_table__5AIH)[ 0];
-        if ((result__ABIH == (void *)NULL)) {
-          result__ABIH=new_lab__MRJ(lab_type__BBIH);
-          next__4AIH=(void *)((unsigned long)result__ABIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBIH)));
-          ((__POINTER *)next__4AIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5AIH)[ 0]=next__4AIH;
-        } else {
-          next__4AIH=((__POINTER *)result__ABIH)[ 0];
-          if ((next__4AIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ABIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CBIH <<  1)) <=  4096)) {
-              next__4AIH=(void *)((unsigned long)result__ABIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CBIH)));
+              next__ZCJH=new_lab__URJ(new_size__UZFH);
+            };
+            ((__POINTER *)next__ZCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0CJH)[ 0]=next__ZCJH;
+          } else {
+            ((__POINTER *)result__1CJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1CJH=next__ZCJH;
+          };
+        };
+        ptr__WFCD=result__1CJH;
+      } else {
+        t__YZFH=((__UINTEGER_32 )typ_id__1FCD);
+        a__XZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YFCD + a__XZFH) & (__UINTEGER_32)(~ a__XZFH));
+        ptr_table__5CJH=((__POINTER )(&(table_type[(t__YZFH)])));
+        lab_type__BDJH=(__UINTEGER_32)(t__YZFH |  1);
+        next__4CJH=((__POINTER )(NULL));
+        result__ADJH=((__POINTER *)ptr_table__5CJH)[ 0];
+        if ((result__ADJH == (void *)NULL)) {
+          result__ADJH=new_lab__URJ(lab_type__BDJH);
+          next__4CJH=(void *)((unsigned long)result__ADJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CDJH)));
+          ((__POINTER *)next__4CJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5CJH)[ 0]=next__4CJH;
+        } else {
+          next__4CJH=((__POINTER *)result__ADJH)[ 0];
+          if ((next__4CJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ADJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CDJH <<  1)) <=  4096)) {
+              next__4CJH=(void *)((unsigned long)result__ADJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CDJH)));
             } else {
-              next__4AIH=new_lab__MRJ(lab_type__BBIH);
+              next__4CJH=new_lab__URJ(lab_type__BDJH);
             };
-            ((__POINTER *)next__4AIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5AIH)[ 0]=next__4AIH;
+            ((__POINTER *)next__4CJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5CJH)[ 0]=next__4CJH;
           } else {
-            ((__POINTER *)result__ABIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4AIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ABIH=next__4AIH;
+            ((__POINTER *)result__ADJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ADJH=next__4CJH;
           };
         };
-        ptr__OFCD=result__ABIH;
+        ptr__WFCD=result__ADJH;
       };
-      result__NFCD=((__ITM_READ_ARG1 *)ptr__OFCD);
-      *(result__NFCD) = *(ITM_READ_ARG1__);
+      result__VFCD=((__ITM_READ_ARG1 *)ptr__WFCD);
+      *(result__VFCD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__NFCD)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=__tmp__PDBD;
+    ((__ITM_READ_ARG1 *)result__VFCD)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__XDBD;
   };
 }
 
-static __POSITION position__FD5B(__ITM_EXPRESSION *Self__GD5B)
+static __POSITION position__ND5B(__ITM_EXPRESSION *Self__OD5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  void *__tmp__JD5B;
-  __POSITION __tmp__KD5B;
-  __tmp__JD5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__GD5B->value_list__1JV)->parent_arrayed_collection__RTF.storage__FYT)[ 0];
-  switch (((struct ___OBJ *)__tmp__JD5B)->__id) {
+  void *__tmp__RD5B;
+  __POSITION __tmp__SD5B;
+  __tmp__RD5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__OD5B->value_list__DKV)->parent_arrayed_collection__ZTF.storage__NYT)[ 0];
+  switch (((struct ___OBJ *)__tmp__RD5B)->__id) {
   case __ITM_LIST__: {
-    __tmp__KD5B=((__ITM_LIST *)__tmp__JD5B)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_LIST *)__tmp__RD5B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__KD5B=((__ITM_LDOTS *)__tmp__JD5B)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_LDOTS *)__tmp__RD5B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__KD5B=((__ITM_PROTOTYPE *)__tmp__JD5B)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_PROTOTYPE *)__tmp__RD5B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__KD5B=((__ITM_LIST_IDF *)__tmp__JD5B)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_LIST_IDF *)__tmp__RD5B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__KD5B=((__ITM_WRITE_VALUE *)__tmp__JD5B)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_WRITE_VALUE *)__tmp__RD5B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__KD5B=((__ITM_WRITE_CAST *)__tmp__JD5B)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_WRITE_CAST *)__tmp__RD5B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__KD5B=((__ITM_READ *)__tmp__JD5B)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_READ *)__tmp__RD5B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__KD5B=((__ITM_WRITE_CODE *)__tmp__JD5B)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_WRITE_CODE *)__tmp__RD5B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__KD5B=((__ITM_OPERATOR *)__tmp__JD5B)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_OPERATOR *)__tmp__RD5B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__KD5B=((__ITM_READ_ARG1 *)__tmp__JD5B)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_READ_ARG1 *)__tmp__RD5B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__KD5B=((__ITM_READ_ARG2 *)__tmp__JD5B)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_READ_ARG2 *)__tmp__RD5B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__KD5B=position__FD5B(__tmp__JD5B);
+    __tmp__SD5B=position__ND5B(__tmp__RD5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__KD5B=((__ITM_OLD *)__tmp__JD5B)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_OLD *)__tmp__RD5B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__KD5B=((__ITM_EXTERNAL_TYPE *)__tmp__JD5B)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_EXTERNAL_TYPE *)__tmp__RD5B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__KD5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__JD5B)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__RD5B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__KD5B=((__ITM_EXTERNAL *)__tmp__JD5B)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_EXTERNAL *)__tmp__RD5B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__KD5B=((__ITM_READ_ARGS *)__tmp__JD5B)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_READ_ARGS *)__tmp__RD5B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__KD5B=((__ITM_REAL *)__tmp__JD5B)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_REAL *)__tmp__RD5B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__KD5B=((__ITM_NUMBER *)__tmp__JD5B)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_NUMBER *)__tmp__RD5B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__KD5B=((__ITM_CHARACTER *)__tmp__JD5B)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_CHARACTER *)__tmp__RD5B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__KD5B=((__ITM_STRING *)__tmp__JD5B)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__SD5B=((__ITM_STRING *)__tmp__RD5B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__KD5B=position__FJHC(__tmp__JD5B);
+    __tmp__SD5B=position__NJHC(__tmp__RD5B);
   } break;
   };
-  return(__tmp__KD5B);
+  return(__tmp__SD5B);
 }
 
-static __POSITION position__FJHC(__ITM_RESULT *Self__GJHC)
+static __POSITION position__NJHC(__ITM_RESULT *Self__OJHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__IJHC;
-  __POSITION __tmp__JJHC;
-  __tmp__IJHC=Self__GJHC->value__MLFC;
-  switch (((struct ___OBJ *)__tmp__IJHC)->__id) {
+  void *__tmp__QJHC;
+  __POSITION __tmp__RJHC;
+  __tmp__QJHC=Self__OJHC->value__ULFC;
+  switch (((struct ___OBJ *)__tmp__QJHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__JJHC=((__ITM_LIST *)__tmp__IJHC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_LIST *)__tmp__QJHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__JJHC=((__ITM_LDOTS *)__tmp__IJHC)->parent_itm_constant__QUF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_LDOTS *)__tmp__QJHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__JJHC=((__ITM_PROTOTYPE *)__tmp__IJHC)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_PROTOTYPE *)__tmp__QJHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__JJHC=((__ITM_LIST_IDF *)__tmp__IJHC)->parent_itm_code__WCJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_LIST_IDF *)__tmp__QJHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__JJHC=((__ITM_WRITE_VALUE *)__tmp__IJHC)->parent_itm_write__MDJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_WRITE_VALUE *)__tmp__QJHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__JJHC=((__ITM_WRITE_CAST *)__tmp__IJHC)->parent_itm_write__DEJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_WRITE_CAST *)__tmp__QJHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ__: {
-    __tmp__JJHC=((__ITM_READ *)__tmp__IJHC)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_READ *)__tmp__QJHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__JJHC=((__ITM_WRITE_CODE *)__tmp__IJHC)->parent_itm_write__OHJ.parent_itm_code__LDJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_WRITE_CODE *)__tmp__QJHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__JJHC=((__ITM_OPERATOR *)__tmp__IJHC)->parent_itm_code__EFL.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_OPERATOR *)__tmp__QJHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__JJHC=((__ITM_READ_ARG1 *)__tmp__IJHC)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_READ_ARG1 *)__tmp__QJHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__JJHC=((__ITM_READ_ARG2 *)__tmp__IJHC)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_READ_ARG2 *)__tmp__QJHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__JJHC=position__FD5B(__tmp__IJHC);
+    __tmp__RJHC=position__ND5B(__tmp__QJHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__JJHC=((__ITM_OLD *)__tmp__IJHC)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_OLD *)__tmp__QJHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__JJHC=((__ITM_EXTERNAL_TYPE *)__tmp__IJHC)->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_EXTERNAL_TYPE *)__tmp__QJHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__JJHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__IJHC)->list__ANDC)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__QJHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__JJHC=((__ITM_EXTERNAL *)__tmp__IJHC)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_EXTERNAL *)__tmp__QJHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__JJHC=((__ITM_READ_ARGS *)__tmp__IJHC)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_READ_ARGS *)__tmp__QJHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__JJHC=((__ITM_REAL *)__tmp__IJHC)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_REAL *)__tmp__QJHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__JJHC=((__ITM_NUMBER *)__tmp__IJHC)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_NUMBER *)__tmp__QJHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__JJHC=((__ITM_CHARACTER *)__tmp__IJHC)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_CHARACTER *)__tmp__QJHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__JJHC=((__ITM_STRING *)__tmp__IJHC)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ;
+    __tmp__RJHC=((__ITM_STRING *)__tmp__QJHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__JJHC=position__FJHC(__tmp__IJHC);
+    __tmp__RJHC=position__NJHC(__tmp__QJHC);
   } break;
   };
-  return(__tmp__JJHC);
+  return(__tmp__RJHC);
 }
 
-static void fast_put__to__BOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__COGC,void *v__DOGC,void *k__EOGC)
+static void fast_put__to__JOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KOGC,void *v__LOGC,void *k__MOGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__PPGH,*Self__UPGH;
-  __INTEGER result__OPGH,__tmp__QPGH,Self__RPGH,idx__MOGC,idx__ZMID;
-  __INTEGER new_capacity__0MID,i__1MID,result__TPGH,__tmp__VPGH;
-  __INTEGER Self__WPGH,typ_id__IPID;
-  __POINTER ptr__DPID,ptr_table__EBIH,next__DBIH,result__FBIH;
-  __POINTER ptr_table__JBIH,next__IBIH,result__KBIH;
-  __UINTEGER_32 sz__FPID,a__TXEH,new_size__UXEH,t__YXEH,a__XXEH;
-  __UINTEGER_32 new_size__MBIH,lab_type__LBIH;
-  void *node__NOGC,*node1__3MID,*node2__4MID,*__tmp__1PGC;
-  void **old_buckets__2MID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__CPID;
-  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__EFTD;
-  Self__PPGH=((__STRING_CONSTANT *)k__EOGC);
-  result__OPGH= 0;
-  __tmp__QPGH=Self__PPGH->count__DD;
-  Self__RPGH= 1;
-  while ((Self__RPGH <= __tmp__QPGH)) {
-    result__OPGH=(__INTEGER)((__INTEGER)( 5 * result__OPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PPGH->storage__VQO)[(__INTEGER)(Self__RPGH -  1)])));
-    Self__RPGH=(__INTEGER)(Self__RPGH +  1);
-  };
-  if ((result__OPGH <  0)) {
-    result__OPGH=(__INTEGER)(~ result__OPGH);
-  };
-  idx__MOGC=(__INTEGER)(result__OPGH % Self__COGC->capacity__24BC);
-  node__NOGC=((void **)Self__COGC->buckets__DBGC)[idx__MOGC];
-  while ((! (((void *)node__NOGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->key__PBGC == (void *)k__EOGC)))) {
-    node__NOGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->next__0BGC;
-  };
-  if (((void *)node__NOGC == (void *)NULL)) {
-    if ((Self__COGC->capacity__24BC == Self__COGC->count__OPGC)) {
-      idx__ZMID= 0;
-      node1__3MID=NULL;
-      node2__4MID=NULL;
-      old_buckets__2MID=Self__COGC->buckets__DBGC;
-      new_capacity__0MID=prime_number_ceiling__X41((__INTEGER)(Self__COGC->capacity__24BC +  1));
-      Self__COGC->buckets__DBGC=create__3QSC(new_capacity__0MID);
-      i__1MID=(__INTEGER)(Self__COGC->capacity__24BC -  1);
-      Self__COGC->capacity__24BC=new_capacity__0MID;
-      while ((i__1MID >=  0)) {
-        node1__3MID=((void **)old_buckets__2MID)[i__1MID];
-        while (((void *)node1__3MID != (void *)NULL)) {
-          node2__4MID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->next__0BGC;
-          Self__UPGH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->key__PBGC);
-          result__TPGH= 0;
-          __tmp__VPGH=Self__UPGH->count__DD;
-          Self__WPGH= 1;
-          while ((Self__WPGH <= __tmp__VPGH)) {
-            result__TPGH=(__INTEGER)((__INTEGER)( 5 * result__TPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UPGH->storage__VQO)[(__INTEGER)(Self__WPGH -  1)])));
-            Self__WPGH=(__INTEGER)(Self__WPGH +  1);
-          };
-          if ((result__TPGH <  0)) {
-            result__TPGH=(__INTEGER)(~ result__TPGH);
-          };
-          idx__ZMID=(__INTEGER)(result__TPGH % Self__COGC->capacity__24BC);
-          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__3MID)->next__0BGC=((void **)Self__COGC->buckets__DBGC)[idx__ZMID];
-          ((void **)Self__COGC->buckets__DBGC)[idx__ZMID]=node1__3MID;
-          node1__3MID=node2__4MID;
-        };
-        i__1MID=(__INTEGER)(i__1MID -  1);
-      };
-      idx__MOGC=(__INTEGER)(result__OPGH % new_capacity__0MID);
-    };
-    __tmp__1PGC=((void **)Self__COGC->buckets__DBGC)[idx__MOGC];
-    result__CPID=NULL;
-    ptr__DPID=((__POINTER )(NULL));
-    typ_id__IPID= 0;
-    sz__FPID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
-    if ((sz__FPID ==  0)) {
-      result__CPID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-    } else {
-      typ_id__IPID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FPID);
-      if ((typ_id__IPID == (__INTEGER)(-  1))) {
-        a__TXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPID + a__TXEH) & (__UINTEGER_32)(~ a__TXEH));
-        ptr_table__EBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UXEH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__DBIH=((__POINTER )(NULL));
-        result__FBIH=((__POINTER *)ptr_table__EBIH)[ 0];
-        if ((result__FBIH == (void *)NULL)) {
-          result__FBIH=new_lab__MRJ(new_size__UXEH);
-          next__DBIH=(void *)((unsigned long)result__FBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UXEH)));
-          ((__POINTER *)next__DBIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EBIH)[ 0]=next__DBIH;
-        } else {
-          next__DBIH=((__POINTER *)result__FBIH)[ 0];
-          if ((next__DBIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UXEH <<  1)) <=  4096)) {
-              next__DBIH=(void *)((unsigned long)result__FBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UXEH)));
+  __STRING_CONSTANT *Self__KRHH,*Self__PRHH;
+  __INTEGER result__JRHH,__tmp__LRHH,Self__MRHH,idx__UOGC,idx__BNID;
+  __INTEGER new_capacity__CNID,i__DNID,result__ORHH,__tmp__QRHH;
+  __INTEGER Self__RRHH,typ_id__QPID;
+  __POINTER ptr__LPID,ptr_table__EDJH,next__DDJH,result__FDJH;
+  __POINTER ptr_table__JDJH,next__IDJH,result__KDJH;
+  __UINTEGER_32 sz__NPID,a__DZFH,new_size__EZFH,t__IZFH,a__HZFH;
+  __UINTEGER_32 new_size__MDJH,lab_type__LDJH;
+  void *node__VOGC,*node1__FNID,*node2__GNID,*__tmp__DQGC;
+  void **old_buckets__ENID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__KPID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__MFTD;
+  Self__KRHH=((__STRING_CONSTANT *)k__MOGC);
+  result__JRHH= 0;
+  __tmp__LRHH=Self__KRHH->count__DD;
+  Self__MRHH= 1;
+  while ((Self__MRHH <= __tmp__LRHH)) {
+    result__JRHH=(__INTEGER)((__INTEGER)( 5 * result__JRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KRHH->storage__3QO)[(__INTEGER)(Self__MRHH -  1)])));
+    Self__MRHH=(__INTEGER)(Self__MRHH +  1);
+  };
+  if ((result__JRHH <  0)) {
+    result__JRHH=(__INTEGER)(~ result__JRHH);
+  };
+  idx__UOGC=(__INTEGER)(result__JRHH % Self__KOGC->capacity__E5BC);
+  node__VOGC=((void **)Self__KOGC->buckets__LBGC)[idx__UOGC];
+  while ((! (((void *)node__VOGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VOGC)->key__XBGC == (void *)k__MOGC)))) {
+    node__VOGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VOGC)->next__CCGC;
+  };
+  if (((void *)node__VOGC == (void *)NULL)) {
+    if ((Self__KOGC->capacity__E5BC == Self__KOGC->count__WPGC)) {
+      idx__BNID= 0;
+      node1__FNID=NULL;
+      node2__GNID=NULL;
+      old_buckets__ENID=Self__KOGC->buckets__LBGC;
+      new_capacity__CNID=prime_number_ceiling__541((__INTEGER)(Self__KOGC->capacity__E5BC +  1));
+      Self__KOGC->buckets__LBGC=create__FRSC(new_capacity__CNID);
+      i__DNID=(__INTEGER)(Self__KOGC->capacity__E5BC -  1);
+      Self__KOGC->capacity__E5BC=new_capacity__CNID;
+      while ((i__DNID >=  0)) {
+        node1__FNID=((void **)old_buckets__ENID)[i__DNID];
+        while (((void *)node1__FNID != (void *)NULL)) {
+          node2__GNID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__FNID)->next__CCGC;
+          Self__PRHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__FNID)->key__XBGC);
+          result__ORHH= 0;
+          __tmp__QRHH=Self__PRHH->count__DD;
+          Self__RRHH= 1;
+          while ((Self__RRHH <= __tmp__QRHH)) {
+            result__ORHH=(__INTEGER)((__INTEGER)( 5 * result__ORHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PRHH->storage__3QO)[(__INTEGER)(Self__RRHH -  1)])));
+            Self__RRHH=(__INTEGER)(Self__RRHH +  1);
+          };
+          if ((result__ORHH <  0)) {
+            result__ORHH=(__INTEGER)(~ result__ORHH);
+          };
+          idx__BNID=(__INTEGER)(result__ORHH % Self__KOGC->capacity__E5BC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__FNID)->next__CCGC=((void **)Self__KOGC->buckets__LBGC)[idx__BNID];
+          ((void **)Self__KOGC->buckets__LBGC)[idx__BNID]=node1__FNID;
+          node1__FNID=node2__GNID;
+        };
+        i__DNID=(__INTEGER)(i__DNID -  1);
+      };
+      idx__UOGC=(__INTEGER)(result__JRHH % new_capacity__CNID);
+    };
+    __tmp__DQGC=((void **)Self__KOGC->buckets__LBGC)[idx__UOGC];
+    result__KPID=NULL;
+    ptr__LPID=((__POINTER )(NULL));
+    typ_id__QPID= 0;
+    sz__NPID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__NPID ==  0)) {
+      result__KPID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__QPID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__NPID);
+      if ((typ_id__QPID == (__INTEGER)(-  1))) {
+        a__DZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NPID + a__DZFH) & (__UINTEGER_32)(~ a__DZFH));
+        ptr_table__EDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DDJH=((__POINTER )(NULL));
+        result__FDJH=((__POINTER *)ptr_table__EDJH)[ 0];
+        if ((result__FDJH == (void *)NULL)) {
+          result__FDJH=new_lab__URJ(new_size__EZFH);
+          next__DDJH=(void *)((unsigned long)result__FDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EZFH)));
+          ((__POINTER *)next__DDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EDJH)[ 0]=next__DDJH;
+        } else {
+          next__DDJH=((__POINTER *)result__FDJH)[ 0];
+          if ((next__DDJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FDJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__EZFH <<  1)) <=  4096)) {
+              next__DDJH=(void *)((unsigned long)result__FDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EZFH)));
             } else {
-              next__DBIH=new_lab__MRJ(new_size__UXEH);
-            };
-            ((__POINTER *)next__DBIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EBIH)[ 0]=next__DBIH;
-          } else {
-            ((__POINTER *)result__FBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FBIH=next__DBIH;
-          };
-        };
-        ptr__DPID=result__FBIH;
-      } else {
-        t__YXEH=((__UINTEGER_32 )typ_id__IPID);
-        a__XXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPID + a__XXEH) & (__UINTEGER_32)(~ a__XXEH));
-        ptr_table__JBIH=((__POINTER )(&(table_type[(t__YXEH)])));
-        lab_type__LBIH=(__UINTEGER_32)(t__YXEH |  1);
-        next__IBIH=((__POINTER )(NULL));
-        result__KBIH=((__POINTER *)ptr_table__JBIH)[ 0];
-        if ((result__KBIH == (void *)NULL)) {
-          result__KBIH=new_lab__MRJ(lab_type__LBIH);
-          next__IBIH=(void *)((unsigned long)result__KBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBIH)));
-          ((__POINTER *)next__IBIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JBIH)[ 0]=next__IBIH;
-        } else {
-          next__IBIH=((__POINTER *)result__KBIH)[ 0];
-          if ((next__IBIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MBIH <<  1)) <=  4096)) {
-              next__IBIH=(void *)((unsigned long)result__KBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MBIH)));
+              next__DDJH=new_lab__URJ(new_size__EZFH);
+            };
+            ((__POINTER *)next__DDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EDJH)[ 0]=next__DDJH;
+          } else {
+            ((__POINTER *)result__FDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FDJH=next__DDJH;
+          };
+        };
+        ptr__LPID=result__FDJH;
+      } else {
+        t__IZFH=((__UINTEGER_32 )typ_id__QPID);
+        a__HZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NPID + a__HZFH) & (__UINTEGER_32)(~ a__HZFH));
+        ptr_table__JDJH=((__POINTER )(&(table_type[(t__IZFH)])));
+        lab_type__LDJH=(__UINTEGER_32)(t__IZFH |  1);
+        next__IDJH=((__POINTER )(NULL));
+        result__KDJH=((__POINTER *)ptr_table__JDJH)[ 0];
+        if ((result__KDJH == (void *)NULL)) {
+          result__KDJH=new_lab__URJ(lab_type__LDJH);
+          next__IDJH=(void *)((unsigned long)result__KDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDJH)));
+          ((__POINTER *)next__IDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JDJH)[ 0]=next__IDJH;
+        } else {
+          next__IDJH=((__POINTER *)result__KDJH)[ 0];
+          if ((next__IDJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KDJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MDJH <<  1)) <=  4096)) {
+              next__IDJH=(void *)((unsigned long)result__KDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MDJH)));
             } else {
-              next__IBIH=new_lab__MRJ(lab_type__LBIH);
+              next__IDJH=new_lab__URJ(lab_type__LDJH);
             };
-            ((__POINTER *)next__IBIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JBIH)[ 0]=next__IBIH;
+            ((__POINTER *)next__IDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JDJH)[ 0]=next__IDJH;
           } else {
-            ((__POINTER *)result__KBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KBIH=next__IBIH;
+            ((__POINTER *)result__KDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KDJH=next__IDJH;
           };
         };
-        ptr__DPID=result__KBIH;
+        ptr__LPID=result__KDJH;
       };
-      result__CPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__DPID);
-      *(result__CPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__KPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__LPID);
+      *(result__KPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    Self__EFTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__CPID);
-    Self__EFTD->item__CCGC=v__DOGC;
-    Self__EFTD->key__PBGC=k__EOGC;
-    Self__EFTD->next__0BGC=__tmp__1PGC;
-    node__NOGC=result__CPID;
-    ((void **)Self__COGC->buckets__DBGC)[idx__MOGC]=result__CPID;
-    Self__COGC->count__OPGC=(__INTEGER)(Self__COGC->count__OPGC +  1);
+    Self__MFTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__KPID);
+    Self__MFTD->item__KCGC=v__LOGC;
+    Self__MFTD->key__XBGC=k__MOGC;
+    Self__MFTD->next__CCGC=__tmp__DQGC;
+    node__VOGC=result__KPID;
+    ((void **)Self__KOGC->buckets__LBGC)[idx__UOGC]=result__KPID;
+    Self__KOGC->count__WPGC=(__INTEGER)(Self__KOGC->count__WPGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__NOGC)->item__CCGC=v__DOGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VOGC)->item__KCGC=v__LOGC;
   };
 }
 
-static void* fast_reference_at__QAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__RAGC,void *k__SAGC)
+static void* fast_reference_at__YAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZAGC,void *k__0AGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__3AGC;
-  __STRING_CONSTANT *Self__ZPGH;
-  __INTEGER result__YPGH,__tmp__0PGH,Self__1PGH;
-  void *node__2AGC;
-  result__3AGC=NULL;
-  Self__ZPGH=((__STRING_CONSTANT *)k__SAGC);
-  result__YPGH= 0;
-  __tmp__0PGH=Self__ZPGH->count__DD;
-  Self__1PGH= 1;
-  while ((Self__1PGH <= __tmp__0PGH)) {
-    result__YPGH=(__INTEGER)((__INTEGER)( 5 * result__YPGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZPGH->storage__VQO)[(__INTEGER)(Self__1PGH -  1)])));
-    Self__1PGH=(__INTEGER)(Self__1PGH +  1);
-  };
-  if ((result__YPGH <  0)) {
-    result__YPGH=(__INTEGER)(~ result__YPGH);
-  };
-  node__2AGC=((void **)Self__RAGC->buckets__DBGC)[(__INTEGER)(result__YPGH % Self__RAGC->capacity__24BC)];
-  while ((! (((void *)node__2AGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->key__PBGC == (void *)k__SAGC)))) {
-    node__2AGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->next__0BGC;
-  };
-  if (((void *)node__2AGC != (void *)NULL)) {
-    result__3AGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__2AGC)->item__CCGC;
-  };
-  return(result__3AGC);
+  void *result__FBGC;
+  __STRING_CONSTANT *Self__URHH;
+  __INTEGER result__TRHH,__tmp__VRHH,Self__WRHH;
+  void *node__EBGC;
+  result__FBGC=NULL;
+  Self__URHH=((__STRING_CONSTANT *)k__0AGC);
+  result__TRHH= 0;
+  __tmp__VRHH=Self__URHH->count__DD;
+  Self__WRHH= 1;
+  while ((Self__WRHH <= __tmp__VRHH)) {
+    result__TRHH=(__INTEGER)((__INTEGER)( 5 * result__TRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__URHH->storage__3QO)[(__INTEGER)(Self__WRHH -  1)])));
+    Self__WRHH=(__INTEGER)(Self__WRHH +  1);
+  };
+  if ((result__TRHH <  0)) {
+    result__TRHH=(__INTEGER)(~ result__TRHH);
+  };
+  node__EBGC=((void **)Self__ZAGC->buckets__LBGC)[(__INTEGER)(result__TRHH % Self__ZAGC->capacity__E5BC)];
+  while ((! (((void *)node__EBGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EBGC)->key__XBGC == (void *)k__0AGC)))) {
+    node__EBGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EBGC)->next__CCGC;
+  };
+  if (((void *)node__EBGC != (void *)NULL)) {
+    result__FBGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EBGC)->item__KCGC;
+  };
+  return(result__FBGC);
 }
 
-static void* fast_reference_at__GB5D(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HB5D,void *k__IB5D)
-// ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
+static void* fast_reference_at__EHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FHNE,void *k__GHNE)
+// ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__3PGH,__tmp__5PGH,Self__AQGH;
-  void *result__SB5D;
-  void *node__RB5D;
-  result__SB5D=NULL;
-  result__3PGH= 0;
-  __tmp__5PGH=((__STRING_CONSTANT *)k__IB5D)->count__DD;
-  Self__AQGH= 1;
-  while ((Self__AQGH <= __tmp__5PGH)) {
-    result__3PGH=(__INTEGER)((__INTEGER)( 5 * result__3PGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__IB5D)->storage__VQO)[(__INTEGER)(Self__AQGH -  1)])));
-    Self__AQGH=(__INTEGER)(Self__AQGH +  1);
-  };
-  if ((result__3PGH <  0)) {
-    result__3PGH=(__INTEGER)(~ result__3PGH);
-  };
-  node__RB5D=((void **)Self__HB5D->buckets__5CT)[(__INTEGER)(result__3PGH % Self__HB5D->capacity__0CT)];
-  while ((! (((void *)node__RB5D == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RB5D)->key__LDT == (void *)k__IB5D)))) {
-    node__RB5D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RB5D)->next__WDT;
-  };
-  if (((void *)node__RB5D != (void *)NULL)) {
-    result__SB5D=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RB5D)->item__HY3;
-  };
-  return(result__SB5D);
+  __STRING_CONSTANT *Self__ZRHH;
+  __INTEGER result__YRHH,__tmp__0RHH,Self__1RHH;
+  void *result__QHNE;
+  void *node__PHNE;
+  result__QHNE=NULL;
+  Self__ZRHH=((__STRING_CONSTANT *)k__GHNE);
+  result__YRHH= 0;
+  __tmp__0RHH=Self__ZRHH->count__DD;
+  Self__1RHH= 1;
+  while ((Self__1RHH <= __tmp__0RHH)) {
+    result__YRHH=(__INTEGER)((__INTEGER)( 5 * result__YRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZRHH->storage__3QO)[(__INTEGER)(Self__1RHH -  1)])));
+    Self__1RHH=(__INTEGER)(Self__1RHH +  1);
+  };
+  if ((result__YRHH <  0)) {
+    result__YRHH=(__INTEGER)(~ result__YRHH);
+  };
+  node__PHNE=((void **)Self__FHNE->buckets__HDT)[(__INTEGER)(result__YRHH % Self__FHNE->capacity__CDT)];
+  while ((! (((void *)node__PHNE == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PHNE)->key__TDT == (void *)k__GHNE)))) {
+    node__PHNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PHNE)->next__4DT;
+  };
+  if (((void *)node__PHNE != (void *)NULL)) {
+    result__QHNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PHNE)->item__PY3;
+  };
+  return(result__QHNE);
 }
 
-static void append_in__OGPD(__ITM_TYPE_BLOCK *Self__PGPD,void *buffer__QGPD)
+static void append_in__WGPD(__ITM_TYPE_BLOCK *Self__XGPD,void *buffer__YGPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *typ_mul__RGPD,*__tmp__DHPD;
-  void *__tmp__YGPD,*__tmp__CHPD,*__tmp__JHPD;
-  __ITM_TYPE_STYLE *Self__QYEH,*Self__SYEH;
-  typ_mul__RGPD=NULL;
-  add_last__ZLT(buffer__QGPD,'{');
-  if (((void *)Self__PGPD->type_argument__WMN != (void *)NULL)) {
-    __tmp__YGPD=Self__PGPD->type_argument__WMN;
-    switch (((struct ___OBJ *)__tmp__YGPD)->__id) {
+  void *typ_mul__ZGPD,*__tmp__LHPD;
+  void *__tmp__AHPD,*__tmp__KHPD,*__tmp__RHPD;
+  __ITM_TYPE_STYLE *Self__A0FH,*Self__C0FH;
+  typ_mul__ZGPD=NULL;
+  add_last__BMT(buffer__YGPD,'{');
+  if (((void *)Self__XGPD->type_argument__4MN != (void *)NULL)) {
+    __tmp__AHPD=Self__XGPD->type_argument__4MN;
+    switch (((struct ___OBJ *)__tmp__AHPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__BOS(buffer__QGPD,((__ITM_TYPE_PARAMETER *)__tmp__YGPD)->parent_itm_type__3DE.name__KYP);
+      append__JOS(buffer__YGPD,((__ITM_TYPE_PARAMETER *)__tmp__AHPD)->parent_itm_type__FEE.name__SYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__BOS(buffer__QGPD,((__ITM_TYPE_SIMPLE *)__tmp__YGPD)->name__KYP);
+      append__JOS(buffer__YGPD,((__ITM_TYPE_SIMPLE *)__tmp__AHPD)->name__SYP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__SIBC(__tmp__YGPD,buffer__QGPD);
+      append_in__0IBC(__tmp__AHPD,buffer__YGPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__OGPD(__tmp__YGPD,buffer__QGPD);
+      append_in__WGPD(__tmp__AHPD,buffer__YGPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__SHPD(__tmp__YGPD,buffer__QGPD);
+      append_in__0HPD(__tmp__AHPD,buffer__YGPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__QYEH=((__ITM_TYPE_STYLE *)__tmp__YGPD);
-      if (((void *)Self__QYEH->style__TYP != (void *)NULL)) {
-        append__BOS(buffer__QGPD,Self__QYEH->style__TYP);
-        add_last__ZLT(buffer__QGPD,' ');
+      Self__A0FH=((__ITM_TYPE_STYLE *)__tmp__AHPD);
+      if (((void *)Self__A0FH->style__1YP != (void *)NULL)) {
+        append__JOS(buffer__YGPD,Self__A0FH->style__1YP);
+        add_last__BMT(buffer__YGPD,' ');
       };
-      append__BOS(buffer__QGPD,Self__QYEH->parent_itm_type_simple__BSN.name__KYP);
+      append__JOS(buffer__YGPD,Self__A0FH->parent_itm_type_simple__JSN.name__SYP);
     } break;
     };
-    add_last__ZLT(buffer__QGPD,';');
-    add_last__ZLT(buffer__QGPD,' ');
+    add_last__BMT(buffer__YGPD,';');
+    add_last__BMT(buffer__YGPD,' ');
   };
-  if (((void *)Self__PGPD->type_result__ANN != (void *)NULL)) {
-    __tmp__CHPD=Self__PGPD->type_result__ANN;
-    if (__tmp__CHPD==NULL) {
-      __tmp__DHPD=NULL;
+  if (((void *)Self__XGPD->type_result__INN != (void *)NULL)) {
+    __tmp__KHPD=Self__XGPD->type_result__INN;
+    if (__tmp__KHPD==NULL) {
+      __tmp__LHPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__CHPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__KHPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__DHPD=NULL;
+        __tmp__LHPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__DHPD=NULL;
+        __tmp__LHPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__DHPD=((void *)__tmp__CHPD);
+        __tmp__LHPD=((void *)__tmp__KHPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__DHPD=NULL;
+        __tmp__LHPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__DHPD=NULL;
+        __tmp__LHPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__DHPD=NULL;
+        __tmp__LHPD=NULL;
       } break;
       }
     };
-    typ_mul__RGPD=__tmp__DHPD;
-    if (((void *)__tmp__DHPD == (void *)NULL)) {
-      __tmp__JHPD=Self__PGPD->type_result__ANN;
-      switch (((struct ___OBJ *)__tmp__JHPD)->__id) {
+    typ_mul__ZGPD=__tmp__LHPD;
+    if (((void *)__tmp__LHPD == (void *)NULL)) {
+      __tmp__RHPD=Self__XGPD->type_result__INN;
+      switch (((struct ___OBJ *)__tmp__RHPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__BOS(buffer__QGPD,((__ITM_TYPE_PARAMETER *)__tmp__JHPD)->parent_itm_type__3DE.name__KYP);
+        append__JOS(buffer__YGPD,((__ITM_TYPE_PARAMETER *)__tmp__RHPD)->parent_itm_type__FEE.name__SYP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__BOS(buffer__QGPD,((__ITM_TYPE_SIMPLE *)__tmp__JHPD)->name__KYP);
+        append__JOS(buffer__YGPD,((__ITM_TYPE_SIMPLE *)__tmp__RHPD)->name__SYP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__SIBC(__tmp__JHPD,buffer__QGPD);
+        append_in__0IBC(__tmp__RHPD,buffer__YGPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__OGPD(__tmp__JHPD,buffer__QGPD);
+        append_in__WGPD(__tmp__RHPD,buffer__YGPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__SHPD(__tmp__JHPD,buffer__QGPD);
+        append_in__0HPD(__tmp__RHPD,buffer__YGPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__SYEH=((__ITM_TYPE_STYLE *)__tmp__JHPD);
-        if (((void *)Self__SYEH->style__TYP != (void *)NULL)) {
-          append__BOS(buffer__QGPD,Self__SYEH->style__TYP);
-          add_last__ZLT(buffer__QGPD,' ');
+        Self__C0FH=((__ITM_TYPE_STYLE *)__tmp__RHPD);
+        if (((void *)Self__C0FH->style__1YP != (void *)NULL)) {
+          append__JOS(buffer__YGPD,Self__C0FH->style__1YP);
+          add_last__BMT(buffer__YGPD,' ');
         };
-        append__BOS(buffer__QGPD,Self__SYEH->parent_itm_type_simple__BSN.name__KYP);
+        append__JOS(buffer__YGPD,Self__C0FH->parent_itm_type_simple__JSN.name__SYP);
       } break;
       };
     } else {
-      display_raw__TLIC(__tmp__DHPD,buffer__QGPD);
+      display_raw__1LIC(__tmp__LHPD,buffer__YGPD);
     };
   };
-  add_last__ZLT(buffer__QGPD,'}');
+  add_last__BMT(buffer__YGPD,'}');
 }
 
-static void append_in__SHPD(__ITM_TYPE_GENERIC *Self__THPD,void *buffer__UHPD)
+static void append_in__0HPD(__ITM_TYPE_GENERIC *Self__1HPD,void *buffer__2HPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__FIPD,Self__2XUD;
-  void *__tmp__MIPD,*__tmp__PIPD;
-  __ITM_TYPE_STYLE *Self__XYEH,*Self__RIPD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__ZCRB;
-  if (((void *)Self__THPD->parent_itm_type_style__CSN.style__TYP != (void *)NULL)) {
-    append__BOS(buffer__UHPD,Self__THPD->parent_itm_type_style__CSN.style__TYP);
-    add_last__ZLT(buffer__UHPD,' ');
-  };
-  append__BOS(buffer__UHPD,Self__THPD->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP);
-  add_last__ZLT(buffer__UHPD,'(');
-  __tmp__FIPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
-  Self__2XUD= 0;
-  while ((Self__2XUD <= __tmp__FIPD)) {
-    __tmp__MIPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__2XUD];
-    switch (((struct ___OBJ *)__tmp__MIPD)->__id) {
+  __INTEGER __tmp__NIPD,Self__EYUD;
+  void *__tmp__UIPD,*__tmp__XIPD;
+  __ITM_TYPE_STYLE *Self__H0FH,*Self__ZIPD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__BDRB;
+  if (((void *)Self__1HPD->parent_itm_type_style__KSN.style__1YP != (void *)NULL)) {
+    append__JOS(buffer__2HPD,Self__1HPD->parent_itm_type_style__KSN.style__1YP);
+    add_last__BMT(buffer__2HPD,' ');
+  };
+  append__JOS(buffer__2HPD,Self__1HPD->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP);
+  add_last__BMT(buffer__2HPD,'(');
+  __tmp__NIPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__1HPD->list_type__FZP)->parent_arrayed_collection__BYC.upper__SIV -  1);
+  Self__EYUD= 0;
+  while ((Self__EYUD <= __tmp__NIPD)) {
+    __tmp__UIPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__1HPD->list_type__FZP)->parent_arrayed_collection__BYC.storage__ZMV)[Self__EYUD];
+    switch (((struct ___OBJ *)__tmp__UIPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__BOS(buffer__UHPD,((__ITM_TYPE_PARAMETER *)__tmp__MIPD)->parent_itm_type__3DE.name__KYP);
+      append__JOS(buffer__2HPD,((__ITM_TYPE_PARAMETER *)__tmp__UIPD)->parent_itm_type__FEE.name__SYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__BOS(buffer__UHPD,((__ITM_TYPE_SIMPLE *)__tmp__MIPD)->name__KYP);
+      append__JOS(buffer__2HPD,((__ITM_TYPE_SIMPLE *)__tmp__UIPD)->name__SYP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__OGPD(__tmp__MIPD,buffer__UHPD);
+      append_in__WGPD(__tmp__UIPD,buffer__2HPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__SHPD(__tmp__MIPD,buffer__UHPD);
+      append_in__0HPD(__tmp__UIPD,buffer__2HPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__XYEH=((__ITM_TYPE_STYLE *)__tmp__MIPD);
-      if (((void *)Self__XYEH->style__TYP != (void *)NULL)) {
-        append__BOS(buffer__UHPD,Self__XYEH->style__TYP);
-        add_last__ZLT(buffer__UHPD,' ');
+      Self__H0FH=((__ITM_TYPE_STYLE *)__tmp__UIPD);
+      if (((void *)Self__H0FH->style__1YP != (void *)NULL)) {
+        append__JOS(buffer__2HPD,Self__H0FH->style__1YP);
+        add_last__BMT(buffer__2HPD,' ');
       };
-      append__BOS(buffer__UHPD,Self__XYEH->parent_itm_type_simple__BSN.name__KYP);
+      append__JOS(buffer__2HPD,Self__H0FH->parent_itm_type_simple__JSN.name__SYP);
     } break;
     };
-    add_last__ZLT(buffer__UHPD,',');
-    Self__2XUD=(__INTEGER)(Self__2XUD +  1);
+    add_last__BMT(buffer__2HPD,',');
+    Self__EYUD=(__INTEGER)(Self__EYUD +  1);
   };
-  Self__ZCRB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__THPD->list_type__3YP);
-  __tmp__PIPD=((void **)Self__ZCRB->parent_arrayed_collection__ZXC.storage__RMV)[Self__ZCRB->parent_arrayed_collection__ZXC.upper__KIV];
-  switch (((struct ___OBJ *)__tmp__PIPD)->__id) {
+  Self__BDRB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__1HPD->list_type__FZP);
+  __tmp__XIPD=((void **)Self__BDRB->parent_arrayed_collection__BYC.storage__ZMV)[Self__BDRB->parent_arrayed_collection__BYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__XIPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__BOS(buffer__UHPD,((__ITM_TYPE_PARAMETER *)__tmp__PIPD)->parent_itm_type__3DE.name__KYP);
+    append__JOS(buffer__2HPD,((__ITM_TYPE_PARAMETER *)__tmp__XIPD)->parent_itm_type__FEE.name__SYP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__BOS(buffer__UHPD,((__ITM_TYPE_SIMPLE *)__tmp__PIPD)->name__KYP);
+    append__JOS(buffer__2HPD,((__ITM_TYPE_SIMPLE *)__tmp__XIPD)->name__SYP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__OGPD(__tmp__PIPD,buffer__UHPD);
+    append_in__WGPD(__tmp__XIPD,buffer__2HPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__SHPD(__tmp__PIPD,buffer__UHPD);
+    append_in__0HPD(__tmp__XIPD,buffer__2HPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__RIPD=((__ITM_TYPE_STYLE *)__tmp__PIPD);
-    if (((void *)Self__RIPD->style__TYP != (void *)NULL)) {
-      append__BOS(buffer__UHPD,Self__RIPD->style__TYP);
-      add_last__ZLT(buffer__UHPD,' ');
+    Self__ZIPD=((__ITM_TYPE_STYLE *)__tmp__XIPD);
+    if (((void *)Self__ZIPD->style__1YP != (void *)NULL)) {
+      append__JOS(buffer__2HPD,Self__ZIPD->style__1YP);
+      add_last__BMT(buffer__2HPD,' ');
     };
-    append__BOS(buffer__UHPD,Self__RIPD->parent_itm_type_simple__BSN.name__KYP);
+    append__JOS(buffer__2HPD,Self__ZIPD->parent_itm_type_simple__JSN.name__SYP);
   } break;
   };
-  add_last__ZLT(buffer__UHPD,')');
+  add_last__BMT(buffer__2HPD,')');
 }
 
-static void put__to__like__U25F(void *tok__W25F,void *buf__X25F,void *key__Y25F)
+static void put__to__like__IUAG(void *tok__KUAG,void *buf__LUAG,void *key__MUAG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__E35F,Self__PEFG;
-  void *lst__Z25F;
-  lst__Z25F=fast_reference_at__GB5D(short_dico__QD,key__Y25F);
-  if (((void *)lst__Z25F != (void *)NULL)) {
-    __tmp__E35F=((__LINKED_LISToSTRING_CONSTANTo *)lst__Z25F)->parent_linked_collection__LD.upper__5CD;
-    Self__PEFG= 1;
-    while ((Self__PEFG <= __tmp__E35F)) {
-      if (((void *)item__Y0ND(lst__Z25F,Self__PEFG) == (void *)NULL)) {
-        append__BOS(buf__X25F,tok__W25F);
-      } else {
-        append__BOS(buf__X25F,item__Y0ND(lst__Z25F,Self__PEFG));
+  __INTEGER __tmp__3UAG,Self__3YGG;
+  void *lst__NUAG;
+  lst__NUAG=NULL;
+  if (((void *)key__MUAG != (void *)NULL)) {
+    lst__NUAG=fast_reference_at__EHNE(short_dico__QD,key__MUAG);
+    if (((void *)lst__NUAG != (void *)NULL)) {
+      __tmp__3UAG=((__LINKED_LISToSTRING_CONSTANTo *)lst__NUAG)->parent_linked_collection__LD.upper__HDD;
+      Self__3YGG= 1;
+      while ((Self__3YGG <= __tmp__3UAG)) {
+        if (((void *)item__A1ND(lst__NUAG,Self__3YGG) == (void *)NULL)) {
+          append__JOS(buf__LUAG,tok__KUAG);
+        } else {
+          append__JOS(buf__LUAG,item__A1ND(lst__NUAG,Self__3YGG));
+        };
+        Self__3YGG=(__INTEGER)(Self__3YGG +  1);
       };
-      Self__PEFG=(__INTEGER)(Self__PEFG +  1);
     };
   };
 }
 
-static void shorter_in__VZ5F(__ITM_ARG *Self__WZ5F,void *buf__XZ5F)
+static void shorter_in__JRAG(__ITM_ARG *Self__KRAG,void *buf__LRAG)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__L05F;
-  __ITM_TYPE_STYLE *Self__1YEH;
-  if (((void *)Self__WZ5F->name__10HC == (void *)(&__string_58))) {
-    put__to__like__PBFG(Self__WZ5F->name__10HC,buf__XZ5F,(&__string_119));
+  void *__tmp__5RAG;
+  __ITM_TYPE_STYLE *Self__L0FH;
+  if (((void *)Self__KRAG->name__D1HC == (void *)(&__string_58))) {
+    put__to__like__H1FG(Self__KRAG->name__D1HC,buf__LRAG,(&__string_119));
   } else {
-    put__to__like__PBFG(Self__WZ5F->name__10HC,buf__XZ5F,(&__string_134));
+    put__to__like__H1FG(Self__KRAG->name__D1HC,buf__LRAG,(&__string_134));
   };
-  add_last__ZLT(buf__XZ5F,':');
-  __tmp__L05F=Self__WZ5F->type__20HC;
-  switch (((struct ___OBJ *)__tmp__L05F)->__id) {
+  add_last__BMT(buf__LRAG,':');
+  __tmp__5RAG=Self__KRAG->type__E1HC;
+  switch (((struct ___OBJ *)__tmp__5RAG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__S3BG(__tmp__L05F,buf__XZ5F);
+    shorter_in__RVCG(__tmp__5RAG,buf__LRAG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__D4BG(__tmp__L05F,buf__XZ5F);
+    shorter_in__CWCG(__tmp__5RAG,buf__LRAG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__U4BG(__tmp__L05F,buf__XZ5F);
+    shorter_in__TWCG(__tmp__5RAG,buf__LRAG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__25BG(__tmp__L05F,buf__XZ5F);
+    shorter_in__1XCG(__tmp__5RAG,buf__LRAG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__1YEH=((__ITM_TYPE_STYLE *)__tmp__L05F);
-    if (((void *)Self__1YEH->style__TYP != (void *)NULL)) {
-      put__to__like__MGEG(Self__1YEH->style__TYP,buf__XZ5F,(&__string_119));
-      add_last__ZLT(buf__XZ5F,' ');
+    Self__L0FH=((__ITM_TYPE_STYLE *)__tmp__5RAG);
+    if (((void *)Self__L0FH->style__1YP != (void *)NULL)) {
+      put__to__like__35EG(Self__L0FH->style__1YP,buf__LRAG,(&__string_119));
+      add_last__BMT(buf__LRAG,' ');
     };
-    put__to__like__MGEG(Self__1YEH->parent_itm_type_simple__BSN.name__KYP,buf__XZ5F,(&__string_125));
+    put__to__like__35EG(Self__L0FH->parent_itm_type_simple__JSN.name__SYP,buf__LRAG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__M05F(__ITM_ARGS *Self__N05F,void *buf__O05F)
+static void shorter_in__ASAG(__ITM_ARGS *Self__BSAG,void *buf__CSAG)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__V05F,Self__TBCG;
-  void *__tmp__U15F,*__tmp__215F;
-  __ITM_TYPE_STYLE *Self__PZEH,*Self__TZEH;
-  __FAST_ARRAYoSTRING_CONSTANTo *Self__O5FH;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__RZEH;
-  add_last__ZLT(buf__O05F,'(');
-  __tmp__V05F=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__N05F->name__LBPF)->parent_arrayed_collection__H5I.upper__15OD -  1);
-  Self__TBCG= 0;
-  while ((Self__TBCG <= __tmp__V05F)) {
-    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__N05F->name__LBPF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__TBCG] == (void *)(&__string_58))) {
-      put__to__like__FCCG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__N05F->name__LBPF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__TBCG],buf__O05F,(&__string_119));
-    } else {
-      put__to__like__FCCG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__N05F->name__LBPF)->parent_arrayed_collection__H5I.storage__RCPD)[Self__TBCG],buf__O05F,(&__string_134));
-    };
-    add_last__ZLT(buf__O05F,':');
-    __tmp__U15F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__N05F->type__MBPF)->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__TBCG];
-    switch (((struct ___OBJ *)__tmp__U15F)->__id) {
+  __INTEGER __tmp__JSAG,Self__SZCG;
+  void *__tmp__ITAG,*__tmp__QTAG;
+  __ITM_TYPE_STYLE *Self__50FH,*Self__D1FH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__BBHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__B1FH;
+  add_last__BMT(buf__CSAG,'(');
+  __tmp__JSAG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BSAG->name__PNPF)->parent_arrayed_collection__P5I.upper__DAPD -  1);
+  Self__SZCG= 0;
+  while ((Self__SZCG <= __tmp__JSAG)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BSAG->name__PNPF)->parent_arrayed_collection__P5I.storage__ZCPD)[Self__SZCG] == (void *)(&__string_58))) {
+      put__to__like__E0CG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BSAG->name__PNPF)->parent_arrayed_collection__P5I.storage__ZCPD)[Self__SZCG],buf__CSAG,(&__string_119));
+    } else {
+      put__to__like__E0CG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BSAG->name__PNPF)->parent_arrayed_collection__P5I.storage__ZCPD)[Self__SZCG],buf__CSAG,(&__string_134));
+    };
+    add_last__BMT(buf__CSAG,':');
+    __tmp__ITAG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__BSAG->type__QNPF)->list_type__IKP)->parent_arrayed_collection__BYC.storage__ZMV)[Self__SZCG];
+    switch (((struct ___OBJ *)__tmp__ITAG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__U15F,buf__O05F);
+      shorter_in__RVCG(__tmp__ITAG,buf__CSAG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__U15F,buf__O05F);
+      shorter_in__CWCG(__tmp__ITAG,buf__CSAG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__U15F,buf__O05F);
+      shorter_in__TWCG(__tmp__ITAG,buf__CSAG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__U15F,buf__O05F);
+      shorter_in__1XCG(__tmp__ITAG,buf__CSAG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__PZEH=((__ITM_TYPE_STYLE *)__tmp__U15F);
-      if (((void *)Self__PZEH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__PZEH->style__TYP,buf__O05F,(&__string_119));
-        add_last__ZLT(buf__O05F,' ');
+      Self__50FH=((__ITM_TYPE_STYLE *)__tmp__ITAG);
+      if (((void *)Self__50FH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__50FH->style__1YP,buf__CSAG,(&__string_119));
+        add_last__BMT(buf__CSAG,' ');
       };
-      put__to__like__MGEG(Self__PZEH->parent_itm_type_simple__BSN.name__KYP,buf__O05F,(&__string_125));
+      put__to__like__35EG(Self__50FH->parent_itm_type_simple__JSN.name__SYP,buf__CSAG,(&__string_125));
     } break;
     };
-    add_last__ZLT(buf__O05F,',');
-    Self__TBCG=(__INTEGER)(Self__TBCG +  1);
+    add_last__BMT(buf__CSAG,',');
+    Self__SZCG=(__INTEGER)(Self__SZCG +  1);
   };
-  Self__O5FH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__N05F->name__LBPF);
-  put__to__like__FCCG(((void **)Self__O5FH->parent_arrayed_collection__H5I.storage__RCPD)[Self__O5FH->parent_arrayed_collection__H5I.upper__15OD],buf__O05F,(&__string_134));
-  add_last__ZLT(buf__O05F,':');
-  Self__RZEH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__N05F->type__MBPF)->list_type__AKP);
-  __tmp__215F=((void **)Self__RZEH->parent_arrayed_collection__ZXC.storage__RMV)[Self__RZEH->parent_arrayed_collection__ZXC.upper__KIV];
-  switch (((struct ___OBJ *)__tmp__215F)->__id) {
+  Self__BBHH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BSAG->name__PNPF);
+  put__to__like__E0CG(((void **)Self__BBHH->parent_arrayed_collection__P5I.storage__ZCPD)[Self__BBHH->parent_arrayed_collection__P5I.upper__DAPD],buf__CSAG,(&__string_134));
+  add_last__BMT(buf__CSAG,':');
+  Self__B1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__BSAG->type__QNPF)->list_type__IKP);
+  __tmp__QTAG=((void **)Self__B1FH->parent_arrayed_collection__BYC.storage__ZMV)[Self__B1FH->parent_arrayed_collection__BYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__QTAG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__S3BG(__tmp__215F,buf__O05F);
+    shorter_in__RVCG(__tmp__QTAG,buf__CSAG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__D4BG(__tmp__215F,buf__O05F);
+    shorter_in__CWCG(__tmp__QTAG,buf__CSAG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__U4BG(__tmp__215F,buf__O05F);
+    shorter_in__TWCG(__tmp__QTAG,buf__CSAG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__25BG(__tmp__215F,buf__O05F);
+    shorter_in__1XCG(__tmp__QTAG,buf__CSAG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__TZEH=((__ITM_TYPE_STYLE *)__tmp__215F);
-    if (((void *)Self__TZEH->style__TYP != (void *)NULL)) {
-      put__to__like__MGEG(Self__TZEH->style__TYP,buf__O05F,(&__string_119));
-      add_last__ZLT(buf__O05F,' ');
+    Self__D1FH=((__ITM_TYPE_STYLE *)__tmp__QTAG);
+    if (((void *)Self__D1FH->style__1YP != (void *)NULL)) {
+      put__to__like__35EG(Self__D1FH->style__1YP,buf__CSAG,(&__string_119));
+      add_last__BMT(buf__CSAG,' ');
     };
-    put__to__like__MGEG(Self__TZEH->parent_itm_type_simple__BSN.name__KYP,buf__O05F,(&__string_125));
+    put__to__like__35EG(Self__D1FH->parent_itm_type_simple__JSN.name__SYP,buf__CSAG,(&__string_125));
   } break;
   };
-  add_last__ZLT(buf__O05F,')');
+  add_last__BMT(buf__CSAG,')');
 }
 
-static void shorter_in__S3BG(__ITM_TYPE_PARAMETER *Self__T3BG,void *buf__U3BG)
+static void shorter_in__RVCG(__ITM_TYPE_PARAMETER *Self__SVCG,void *buf__TVCG)
 // ({ITM_TYPE_PARAMETER},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__24DG;
-  __INTEGER __tmp__K5DG,Self__C4FG;
-  void *lst__54DG;
-  tok__24DG=Self__T3BG->parent_itm_type__3DE.name__KYP;
-  lst__54DG=fast_reference_at__GB5D(short_dico__QD,(&__string_126));
-  if (((void *)lst__54DG != (void *)NULL)) {
-    __tmp__K5DG=((__LINKED_LISToSTRING_CONSTANTo *)lst__54DG)->parent_linked_collection__LD.upper__5CD;
-    Self__C4FG= 1;
-    while ((Self__C4FG <= __tmp__K5DG)) {
-      if (((void *)item__Y0ND(lst__54DG,Self__C4FG) == (void *)NULL)) {
-        append__BOS(buf__U3BG,tok__24DG);
-      } else {
-        append__BOS(buf__U3BG,item__Y0ND(lst__54DG,Self__C4FG));
+  void *tok__RXEG;
+  __INTEGER __tmp__EYEG,Self__1IHG;
+  void *lst__UXEG;
+  tok__RXEG=Self__SVCG->parent_itm_type__FEE.name__SYP;
+  lst__UXEG=NULL;
+  if (((void *)(&__string_126) != (void *)NULL)) {
+    lst__UXEG=fast_reference_at__EHNE(short_dico__QD,(&__string_126));
+    if (((void *)lst__UXEG != (void *)NULL)) {
+      __tmp__EYEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__UXEG)->parent_linked_collection__LD.upper__HDD;
+      Self__1IHG= 1;
+      while ((Self__1IHG <= __tmp__EYEG)) {
+        if (((void *)item__A1ND(lst__UXEG,Self__1IHG) == (void *)NULL)) {
+          append__JOS(buf__TVCG,tok__RXEG);
+        } else {
+          append__JOS(buf__TVCG,item__A1ND(lst__UXEG,Self__1IHG));
+        };
+        Self__1IHG=(__INTEGER)(Self__1IHG +  1);
       };
-      Self__C4FG=(__INTEGER)(Self__C4FG +  1);
     };
   };
 }
 
-static void shorter_in__D4BG(__ITM_TYPE_SIMPLE *Self__E4BG,void *buf__F4BG)
+static void shorter_in__CWCG(__ITM_TYPE_SIMPLE *Self__DWCG,void *buf__EWCG)
 // ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__PAEG;
-  __INTEGER __tmp__3AEG,Self__T4FG;
-  void *lst__SAEG;
-  tok__PAEG=Self__E4BG->name__KYP;
-  lst__SAEG=fast_reference_at__GB5D(short_dico__QD,(&__string_125));
-  if (((void *)lst__SAEG != (void *)NULL)) {
-    __tmp__3AEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__SAEG)->parent_linked_collection__LD.upper__5CD;
-    Self__T4FG= 1;
-    while ((Self__T4FG <= __tmp__3AEG)) {
-      if (((void *)item__Y0ND(lst__SAEG,Self__T4FG) == (void *)NULL)) {
-        append__BOS(buf__F4BG,tok__PAEG);
-      } else {
-        append__BOS(buf__F4BG,item__Y0ND(lst__SAEG,Self__T4FG));
+  void *tok__LZEG;
+  __INTEGER __tmp__4ZEG,Self__MJHG;
+  void *lst__OZEG;
+  tok__LZEG=Self__DWCG->name__SYP;
+  lst__OZEG=NULL;
+  if (((void *)(&__string_125) != (void *)NULL)) {
+    lst__OZEG=fast_reference_at__EHNE(short_dico__QD,(&__string_125));
+    if (((void *)lst__OZEG != (void *)NULL)) {
+      __tmp__4ZEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__OZEG)->parent_linked_collection__LD.upper__HDD;
+      Self__MJHG= 1;
+      while ((Self__MJHG <= __tmp__4ZEG)) {
+        if (((void *)item__A1ND(lst__OZEG,Self__MJHG) == (void *)NULL)) {
+          append__JOS(buf__EWCG,tok__LZEG);
+        } else {
+          append__JOS(buf__EWCG,item__A1ND(lst__OZEG,Self__MJHG));
+        };
+        Self__MJHG=(__INTEGER)(Self__MJHG +  1);
       };
-      Self__T4FG=(__INTEGER)(Self__T4FG +  1);
     };
   };
 }
 
-static void shorter_raw_in__JIEG(__ITM_TYPE_MULTI *Self__KIEG,void *buf__LIEG)
+static void shorter_raw_in__BCFG(__ITM_TYPE_MULTI *Self__CCFG,void *buf__DCFG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__SIEG,Self__AFFG;
-  void *__tmp__ZIEG,*__tmp__2IEG;
-  __ITM_TYPE_STYLE *Self__YZEH,*Self__2ZEH;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__0ZEH;
-  __tmp__SIEG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__KIEG->list_type__AKP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
-  Self__AFFG= 0;
-  while ((Self__AFFG <= __tmp__SIEG)) {
-    __tmp__ZIEG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__KIEG->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__AFFG];
-    switch (((struct ___OBJ *)__tmp__ZIEG)->__id) {
+  __INTEGER __tmp__KCFG,Self__W4FG;
+  void *__tmp__RCFG,*__tmp__UCFG;
+  __ITM_TYPE_STYLE *Self__I1FH,*Self__M1FH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__K1FH;
+  __tmp__KCFG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__CCFG->list_type__IKP)->parent_arrayed_collection__BYC.upper__SIV -  1);
+  Self__W4FG= 0;
+  while ((Self__W4FG <= __tmp__KCFG)) {
+    __tmp__RCFG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__CCFG->list_type__IKP)->parent_arrayed_collection__BYC.storage__ZMV)[Self__W4FG];
+    switch (((struct ___OBJ *)__tmp__RCFG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__ZIEG,buf__LIEG);
+      shorter_in__RVCG(__tmp__RCFG,buf__DCFG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__ZIEG,buf__LIEG);
+      shorter_in__CWCG(__tmp__RCFG,buf__DCFG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__ZIEG,buf__LIEG);
+      shorter_in__TWCG(__tmp__RCFG,buf__DCFG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__ZIEG,buf__LIEG);
+      shorter_in__1XCG(__tmp__RCFG,buf__DCFG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__YZEH=((__ITM_TYPE_STYLE *)__tmp__ZIEG);
-      if (((void *)Self__YZEH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__YZEH->style__TYP,buf__LIEG,(&__string_119));
-        add_last__ZLT(buf__LIEG,' ');
+      Self__I1FH=((__ITM_TYPE_STYLE *)__tmp__RCFG);
+      if (((void *)Self__I1FH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__I1FH->style__1YP,buf__DCFG,(&__string_119));
+        add_last__BMT(buf__DCFG,' ');
       };
-      put__to__like__MGEG(Self__YZEH->parent_itm_type_simple__BSN.name__KYP,buf__LIEG,(&__string_125));
+      put__to__like__35EG(Self__I1FH->parent_itm_type_simple__JSN.name__SYP,buf__DCFG,(&__string_125));
     } break;
     };
-    add_last__ZLT(buf__LIEG,',');
-    Self__AFFG=(__INTEGER)(Self__AFFG +  1);
+    add_last__BMT(buf__DCFG,',');
+    Self__W4FG=(__INTEGER)(Self__W4FG +  1);
   };
-  Self__0ZEH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__KIEG->list_type__AKP);
-  __tmp__2IEG=((void **)Self__0ZEH->parent_arrayed_collection__ZXC.storage__RMV)[Self__0ZEH->parent_arrayed_collection__ZXC.upper__KIV];
-  switch (((struct ___OBJ *)__tmp__2IEG)->__id) {
+  Self__K1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__CCFG->list_type__IKP);
+  __tmp__UCFG=((void **)Self__K1FH->parent_arrayed_collection__BYC.storage__ZMV)[Self__K1FH->parent_arrayed_collection__BYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__UCFG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__S3BG(__tmp__2IEG,buf__LIEG);
+    shorter_in__RVCG(__tmp__UCFG,buf__DCFG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__D4BG(__tmp__2IEG,buf__LIEG);
+    shorter_in__CWCG(__tmp__UCFG,buf__DCFG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__U4BG(__tmp__2IEG,buf__LIEG);
+    shorter_in__TWCG(__tmp__UCFG,buf__DCFG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__25BG(__tmp__2IEG,buf__LIEG);
+    shorter_in__1XCG(__tmp__UCFG,buf__DCFG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__2ZEH=((__ITM_TYPE_STYLE *)__tmp__2IEG);
-    if (((void *)Self__2ZEH->style__TYP != (void *)NULL)) {
-      put__to__like__MGEG(Self__2ZEH->style__TYP,buf__LIEG,(&__string_119));
-      add_last__ZLT(buf__LIEG,' ');
+    Self__M1FH=((__ITM_TYPE_STYLE *)__tmp__UCFG);
+    if (((void *)Self__M1FH->style__1YP != (void *)NULL)) {
+      put__to__like__35EG(Self__M1FH->style__1YP,buf__DCFG,(&__string_119));
+      add_last__BMT(buf__DCFG,' ');
     };
-    put__to__like__MGEG(Self__2ZEH->parent_itm_type_simple__BSN.name__KYP,buf__LIEG,(&__string_125));
+    put__to__like__35EG(Self__M1FH->parent_itm_type_simple__JSN.name__SYP,buf__DCFG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__U4BG(__ITM_TYPE_BLOCK *Self__V4BG,void *buf__W4BG)
+static void shorter_in__TWCG(__ITM_TYPE_BLOCK *Self__UWCG,void *buf__VWCG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  void *typ_mul__X4BG,*__tmp__L5BG;
-  void *__tmp__A5BG,*__tmp__K5BG,*__tmp__R5BG;
-  __ITM_TYPE_MULTI *Self__E2WG,*Self__G2WG;
-  __ITM_TYPE_STYLE *Self__4ZEH,*Self__A0EH;
-  typ_mul__X4BG=NULL;
-  put__to__like__YBEG((&__string_298),buf__W4BG);
-  if (((void *)Self__V4BG->type_argument__WMN != (void *)NULL)) {
-    __tmp__A5BG=Self__V4BG->type_argument__WMN;
-    switch (((struct ___OBJ *)__tmp__A5BG)->__id) {
+  void *typ_mul__WWCG,*__tmp__KXCG;
+  void *__tmp__5WCG,*__tmp__JXCG,*__tmp__QXCG;
+  __ITM_TYPE_MULTI *Self__MZXG,*Self__OZXG;
+  __ITM_TYPE_STYLE *Self__O1FH,*Self__Q1FH;
+  typ_mul__WWCG=NULL;
+  put__to__like__10EG((&__string_297),buf__VWCG);
+  if (((void *)Self__UWCG->type_argument__4MN != (void *)NULL)) {
+    __tmp__5WCG=Self__UWCG->type_argument__4MN;
+    switch (((struct ___OBJ *)__tmp__5WCG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__A5BG,buf__W4BG);
+      shorter_in__RVCG(__tmp__5WCG,buf__VWCG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__A5BG,buf__W4BG);
+      shorter_in__CWCG(__tmp__5WCG,buf__VWCG);
     } break;
     case __ITM_TYPE_MULTI__: {
-      Self__E2WG=((__ITM_TYPE_MULTI *)__tmp__A5BG);
-      add_last__ZLT(buf__W4BG,'(');
-      shorter_raw_in__JIEG(Self__E2WG,buf__W4BG);
-      add_last__ZLT(buf__W4BG,')');
+      Self__MZXG=((__ITM_TYPE_MULTI *)__tmp__5WCG);
+      add_last__BMT(buf__VWCG,'(');
+      shorter_raw_in__BCFG(Self__MZXG,buf__VWCG);
+      add_last__BMT(buf__VWCG,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__A5BG,buf__W4BG);
+      shorter_in__TWCG(__tmp__5WCG,buf__VWCG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__A5BG,buf__W4BG);
+      shorter_in__1XCG(__tmp__5WCG,buf__VWCG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__4ZEH=((__ITM_TYPE_STYLE *)__tmp__A5BG);
-      if (((void *)Self__4ZEH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__4ZEH->style__TYP,buf__W4BG,(&__string_119));
-        add_last__ZLT(buf__W4BG,' ');
+      Self__O1FH=((__ITM_TYPE_STYLE *)__tmp__5WCG);
+      if (((void *)Self__O1FH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__O1FH->style__1YP,buf__VWCG,(&__string_119));
+        add_last__BMT(buf__VWCG,' ');
       };
-      put__to__like__MGEG(Self__4ZEH->parent_itm_type_simple__BSN.name__KYP,buf__W4BG,(&__string_125));
+      put__to__like__35EG(Self__O1FH->parent_itm_type_simple__JSN.name__SYP,buf__VWCG,(&__string_125));
     } break;
     };
-    add_last__ZLT(buf__W4BG,';');
-    add_last__ZLT(buf__W4BG,' ');
+    add_last__BMT(buf__VWCG,';');
+    add_last__BMT(buf__VWCG,' ');
   };
-  if (((void *)Self__V4BG->type_result__ANN != (void *)NULL)) {
-    __tmp__K5BG=Self__V4BG->type_result__ANN;
-    if (__tmp__K5BG==NULL) {
-      __tmp__L5BG=NULL;
+  if (((void *)Self__UWCG->type_result__INN != (void *)NULL)) {
+    __tmp__JXCG=Self__UWCG->type_result__INN;
+    if (__tmp__JXCG==NULL) {
+      __tmp__KXCG=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__K5BG)->__id) {
+      switch (((struct ___OBJ *)__tmp__JXCG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__L5BG=NULL;
+        __tmp__KXCG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__L5BG=NULL;
+        __tmp__KXCG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__L5BG=((void *)__tmp__K5BG);
+        __tmp__KXCG=((void *)__tmp__JXCG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__L5BG=NULL;
+        __tmp__KXCG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__L5BG=NULL;
+        __tmp__KXCG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__L5BG=NULL;
+        __tmp__KXCG=NULL;
       } break;
       }
     };
-    typ_mul__X4BG=__tmp__L5BG;
-    if (((void *)__tmp__L5BG == (void *)NULL)) {
-      __tmp__R5BG=Self__V4BG->type_result__ANN;
-      switch (((struct ___OBJ *)__tmp__R5BG)->__id) {
+    typ_mul__WWCG=__tmp__KXCG;
+    if (((void *)__tmp__KXCG == (void *)NULL)) {
+      __tmp__QXCG=Self__UWCG->type_result__INN;
+      switch (((struct ___OBJ *)__tmp__QXCG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        shorter_in__S3BG(__tmp__R5BG,buf__W4BG);
+        shorter_in__RVCG(__tmp__QXCG,buf__VWCG);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        shorter_in__D4BG(__tmp__R5BG,buf__W4BG);
+        shorter_in__CWCG(__tmp__QXCG,buf__VWCG);
       } break;
       case __ITM_TYPE_MULTI__: {
-        Self__G2WG=((__ITM_TYPE_MULTI *)__tmp__R5BG);
-        add_last__ZLT(buf__W4BG,'(');
-        shorter_raw_in__JIEG(Self__G2WG,buf__W4BG);
-        add_last__ZLT(buf__W4BG,')');
+        Self__OZXG=((__ITM_TYPE_MULTI *)__tmp__QXCG);
+        add_last__BMT(buf__VWCG,'(');
+        shorter_raw_in__BCFG(Self__OZXG,buf__VWCG);
+        add_last__BMT(buf__VWCG,')');
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__U4BG(__tmp__R5BG,buf__W4BG);
+        shorter_in__TWCG(__tmp__QXCG,buf__VWCG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__25BG(__tmp__R5BG,buf__W4BG);
+        shorter_in__1XCG(__tmp__QXCG,buf__VWCG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        Self__A0EH=((__ITM_TYPE_STYLE *)__tmp__R5BG);
-        if (((void *)Self__A0EH->style__TYP != (void *)NULL)) {
-          put__to__like__MGEG(Self__A0EH->style__TYP,buf__W4BG,(&__string_119));
-          add_last__ZLT(buf__W4BG,' ');
+        Self__Q1FH=((__ITM_TYPE_STYLE *)__tmp__QXCG);
+        if (((void *)Self__Q1FH->style__1YP != (void *)NULL)) {
+          put__to__like__35EG(Self__Q1FH->style__1YP,buf__VWCG,(&__string_119));
+          add_last__BMT(buf__VWCG,' ');
         };
-        put__to__like__MGEG(Self__A0EH->parent_itm_type_simple__BSN.name__KYP,buf__W4BG,(&__string_125));
+        put__to__like__35EG(Self__Q1FH->parent_itm_type_simple__JSN.name__SYP,buf__VWCG,(&__string_125));
       } break;
       };
     } else {
-      shorter_raw_in__JIEG(__tmp__L5BG,buf__W4BG);
+      shorter_raw_in__BCFG(__tmp__KXCG,buf__VWCG);
     };
   };
-  put__to__like__YBEG((&__string_299),buf__W4BG);
+  put__to__like__10EG((&__string_298),buf__VWCG);
 }
 
-static void shorter_in__25BG(__ITM_TYPE_GENERIC *Self__35BG,void *buf__45BG)
+static void shorter_in__1XCG(__ITM_TYPE_GENERIC *Self__2XCG,void *buf__3XCG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__TACG,Self__PFEG;
-  void *__tmp__0ACG,*__tmp__3ACG;
-  __ITM_TYPE_STYLE *Self__F0EH,*Self__5ACG;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__H0EH;
-  if (((void *)Self__35BG->parent_itm_type_style__CSN.style__TYP != (void *)NULL)) {
-    put__to__like__EEEG(Self__35BG->parent_itm_type_style__CSN.style__TYP,buf__45BG,(&__string_119));
-    add_last__ZLT(buf__45BG,' ');
-  };
-  put__to__like__EEEG(Self__35BG->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP,buf__45BG,(&__string_125));
-  add_last__ZLT(buf__45BG,'(');
-  __tmp__TACG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__35BG->list_type__3YP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
-  Self__PFEG= 0;
-  while ((Self__PFEG <= __tmp__TACG)) {
-    __tmp__0ACG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__35BG->list_type__3YP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__PFEG];
-    switch (((struct ___OBJ *)__tmp__0ACG)->__id) {
+  __INTEGER __tmp__SYCG,Self__A5EG;
+  void *__tmp__ZYCG,*__tmp__2YCG;
+  __ITM_TYPE_STYLE *Self__V1FH,*Self__4YCG;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__X1FH;
+  if (((void *)Self__2XCG->parent_itm_type_style__KSN.style__1YP != (void *)NULL)) {
+    put__to__like__O3EG(Self__2XCG->parent_itm_type_style__KSN.style__1YP,buf__3XCG,(&__string_119));
+    add_last__BMT(buf__3XCG,' ');
+  };
+  put__to__like__O3EG(Self__2XCG->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP,buf__3XCG,(&__string_125));
+  add_last__BMT(buf__3XCG,'(');
+  __tmp__SYCG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2XCG->list_type__FZP)->parent_arrayed_collection__BYC.upper__SIV -  1);
+  Self__A5EG= 0;
+  while ((Self__A5EG <= __tmp__SYCG)) {
+    __tmp__ZYCG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2XCG->list_type__FZP)->parent_arrayed_collection__BYC.storage__ZMV)[Self__A5EG];
+    switch (((struct ___OBJ *)__tmp__ZYCG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__S3BG(__tmp__0ACG,buf__45BG);
+      shorter_in__RVCG(__tmp__ZYCG,buf__3XCG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__D4BG(__tmp__0ACG,buf__45BG);
+      shorter_in__CWCG(__tmp__ZYCG,buf__3XCG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__U4BG(__tmp__0ACG,buf__45BG);
+      shorter_in__TWCG(__tmp__ZYCG,buf__3XCG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__25BG(__tmp__0ACG,buf__45BG);
+      shorter_in__1XCG(__tmp__ZYCG,buf__3XCG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__F0EH=((__ITM_TYPE_STYLE *)__tmp__0ACG);
-      if (((void *)Self__F0EH->style__TYP != (void *)NULL)) {
-        put__to__like__MGEG(Self__F0EH->style__TYP,buf__45BG,(&__string_119));
-        add_last__ZLT(buf__45BG,' ');
+      Self__V1FH=((__ITM_TYPE_STYLE *)__tmp__ZYCG);
+      if (((void *)Self__V1FH->style__1YP != (void *)NULL)) {
+        put__to__like__35EG(Self__V1FH->style__1YP,buf__3XCG,(&__string_119));
+        add_last__BMT(buf__3XCG,' ');
       };
-      put__to__like__MGEG(Self__F0EH->parent_itm_type_simple__BSN.name__KYP,buf__45BG,(&__string_125));
+      put__to__like__35EG(Self__V1FH->parent_itm_type_simple__JSN.name__SYP,buf__3XCG,(&__string_125));
     } break;
     };
-    add_last__ZLT(buf__45BG,',');
-    Self__PFEG=(__INTEGER)(Self__PFEG +  1);
+    add_last__BMT(buf__3XCG,',');
+    Self__A5EG=(__INTEGER)(Self__A5EG +  1);
   };
-  Self__H0EH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__35BG->list_type__3YP);
-  __tmp__3ACG=((void **)Self__H0EH->parent_arrayed_collection__ZXC.storage__RMV)[Self__H0EH->parent_arrayed_collection__ZXC.upper__KIV];
-  switch (((struct ___OBJ *)__tmp__3ACG)->__id) {
+  Self__X1FH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2XCG->list_type__FZP);
+  __tmp__2YCG=((void **)Self__X1FH->parent_arrayed_collection__BYC.storage__ZMV)[Self__X1FH->parent_arrayed_collection__BYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__2YCG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__S3BG(__tmp__3ACG,buf__45BG);
+    shorter_in__RVCG(__tmp__2YCG,buf__3XCG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__D4BG(__tmp__3ACG,buf__45BG);
+    shorter_in__CWCG(__tmp__2YCG,buf__3XCG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__U4BG(__tmp__3ACG,buf__45BG);
+    shorter_in__TWCG(__tmp__2YCG,buf__3XCG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__25BG(__tmp__3ACG,buf__45BG);
+    shorter_in__1XCG(__tmp__2YCG,buf__3XCG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__5ACG=((__ITM_TYPE_STYLE *)__tmp__3ACG);
-    if (((void *)Self__5ACG->style__TYP != (void *)NULL)) {
-      put__to__like__MGEG(Self__5ACG->style__TYP,buf__45BG,(&__string_119));
-      add_last__ZLT(buf__45BG,' ');
+    Self__4YCG=((__ITM_TYPE_STYLE *)__tmp__2YCG);
+    if (((void *)Self__4YCG->style__1YP != (void *)NULL)) {
+      put__to__like__35EG(Self__4YCG->style__1YP,buf__3XCG,(&__string_119));
+      add_last__BMT(buf__3XCG,' ');
     };
-    put__to__like__MGEG(Self__5ACG->parent_itm_type_simple__BSN.name__KYP,buf__45BG,(&__string_125));
+    put__to__like__35EG(Self__4YCG->parent_itm_type_simple__JSN.name__SYP,buf__3XCG,(&__string_125));
   } break;
   };
-  add_last__ZLT(buf__45BG,')');
+  add_last__BMT(buf__3XCG,')');
 }
 
-static void put__to__like__MGEG(void *tok__OGEG,void *buf__PGEG,void *key__QGEG)
+static void put__to__like__35EG(void *tok__55EG,void *buf__AAFG,void *key__BAFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__2GEG,Self__IAGG;
-  void *lst__RGEG;
-  lst__RGEG=fast_reference_at__GB5D(short_dico__QD,key__QGEG);
-  if (((void *)lst__RGEG != (void *)NULL)) {
-    __tmp__2GEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__RGEG)->parent_linked_collection__LD.upper__5CD;
-    Self__IAGG= 1;
-    while ((Self__IAGG <= __tmp__2GEG)) {
-      if (((void *)item__Y0ND(lst__RGEG,Self__IAGG) == (void *)NULL)) {
-        append__BOS(buf__PGEG,tok__OGEG);
-      } else {
-        append__BOS(buf__PGEG,item__Y0ND(lst__RGEG,Self__IAGG));
+  __INTEGER __tmp__SAFG,Self__5KHG;
+  void *lst__CAFG;
+  lst__CAFG=NULL;
+  if (((void *)key__BAFG != (void *)NULL)) {
+    lst__CAFG=fast_reference_at__EHNE(short_dico__QD,key__BAFG);
+    if (((void *)lst__CAFG != (void *)NULL)) {
+      __tmp__SAFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__CAFG)->parent_linked_collection__LD.upper__HDD;
+      Self__5KHG= 1;
+      while ((Self__5KHG <= __tmp__SAFG)) {
+        if (((void *)item__A1ND(lst__CAFG,Self__5KHG) == (void *)NULL)) {
+          append__JOS(buf__AAFG,tok__55EG);
+        } else {
+          append__JOS(buf__AAFG,item__A1ND(lst__CAFG,Self__5KHG));
+        };
+        Self__5KHG=(__INTEGER)(Self__5KHG +  1);
       };
-      Self__IAGG=(__INTEGER)(Self__IAGG +  1);
     };
   };
 }
 
-static void put__to__like__DECG(void *tok__FECG,void *buf__GECG,void *key__HECG)
+static void put__to__like__J2CG(void *tok__L2CG,void *buf__M2CG,void *key__N2CG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__TECG,Self__GSFG;
-  void *lst__IECG;
-  lst__IECG=fast_reference_at__GB5D(short_dico__QD,key__HECG);
-  if (((void *)lst__IECG != (void *)NULL)) {
-    __tmp__TECG=((__LINKED_LISToSTRING_CONSTANTo *)lst__IECG)->parent_linked_collection__LD.upper__5CD;
-    Self__GSFG= 1;
-    while ((Self__GSFG <= __tmp__TECG)) {
-      if (((void *)item__Y0ND(lst__IECG,Self__GSFG) == (void *)NULL)) {
-        append__BOS(buf__GECG,tok__FECG);
-      } else {
-        append__BOS(buf__GECG,item__Y0ND(lst__IECG,Self__GSFG));
+  __INTEGER __tmp__42CG,Self__GGHG;
+  void *lst__O2CG;
+  lst__O2CG=NULL;
+  if (((void *)key__N2CG != (void *)NULL)) {
+    lst__O2CG=fast_reference_at__EHNE(short_dico__QD,key__N2CG);
+    if (((void *)lst__O2CG != (void *)NULL)) {
+      __tmp__42CG=((__LINKED_LISToSTRING_CONSTANTo *)lst__O2CG)->parent_linked_collection__LD.upper__HDD;
+      Self__GGHG= 1;
+      while ((Self__GGHG <= __tmp__42CG)) {
+        if (((void *)item__A1ND(lst__O2CG,Self__GGHG) == (void *)NULL)) {
+          append__JOS(buf__M2CG,tok__L2CG);
+        } else {
+          append__JOS(buf__M2CG,item__A1ND(lst__O2CG,Self__GGHG));
+        };
+        Self__GGHG=(__INTEGER)(Self__GGHG +  1);
       };
-      Self__GSFG=(__INTEGER)(Self__GSFG +  1);
     };
   };
 }
 
-static void set_path__ONT(__DIRECTORY_UNIX *Self__PNT,void *n__QNT)
+static void set_path__WNT(__DIRECTORY_UNIX *Self__XNT,void *n__YNT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__CQGH,*Self__FVCH,*Self__IVCH,*result__KQGH;
-  __STRING_CONSTANT *Self__ADRG;
-  __POINTER ptr__DQGH,ptr_table__OBIH,next__NBIH,result__PBIH;
-  __POINTER ptr_table__TBIH,next__SBIH,result__UBIH,ptr__LQGH;
-  __POINTER ptr_table__YBIH,next__XBIH,result__ZBIH,ptr_table__3BIH;
-  __POINTER next__2BIH,result__4BIH,ptr__JW4G;
-  __INTEGER typ_id__EQGH,c__HVCH,Self__A1EH,idx__R5FH,idx__RNT;
-  __INTEGER typ_id__MQGH,__tmp__HOT;
-  __UINTEGER_32 sz__FQGH,a__GQGH,new_size__HQGH,t__IQGH,a__JQGH;
-  __UINTEGER_32 new_size__WBIH,lab_type__VBIH,sz__NQGH,a__OQGH;
-  __UINTEGER_32 new_size__PQGH,t__QQGH,a__RQGH,new_size__ACIH;
-  __UINTEGER_32 lab_type__5BIH;
-  void *__tmp__5NT;
-  __CHARACTER *Self__B1EH,*model__C1EH,*Self__T5FH,*__tmp__DOT;
-  result__CQGH=NULL;
-  ptr__DQGH=((__POINTER )(NULL));
-  typ_id__EQGH= 0;
-  sz__FQGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__FQGH ==  0)) {
-    result__CQGH=STRING_CONSTANT__;
+  __STRING_CONSTANT *result__3RHH,*Self__BVDH,*Self__EVDH,*result__FSHH;
+  __STRING_CONSTANT *Self__H5RG;
+  __POINTER ptr__4RHH,ptr_table__ODJH,next__NDJH,result__PDJH;
+  __POINTER ptr_table__TDJH,next__SDJH,result__UDJH,ptr__GSHH;
+  __POINTER ptr_table__YDJH,next__XDJH,result__ZDJH,ptr_table__3DJH;
+  __POINTER next__2DJH,result__4DJH,ptr__3V5G;
+  __INTEGER typ_id__5RHH,c__DVDH,Self__Q2FH,idx__EBHH,idx__ZNT;
+  __INTEGER typ_id__HSHH,__tmp__POT;
+  __UINTEGER_32 sz__ASHH,a__BSHH,new_size__CSHH,t__DSHH,a__ESHH;
+  __UINTEGER_32 new_size__WDJH,lab_type__VDJH,sz__ISHH,a__JSHH;
+  __UINTEGER_32 new_size__KSHH,t__LSHH,a__MSHH,new_size__AEJH;
+  __UINTEGER_32 lab_type__5DJH;
+  void *__tmp__HOT;
+  __CHARACTER *Self__R2FH,*model__S2FH,*Self__GBHH,*__tmp__LOT;
+  result__3RHH=NULL;
+  ptr__4RHH=((__POINTER )(NULL));
+  typ_id__5RHH= 0;
+  sz__ASHH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__ASHH ==  0)) {
+    result__3RHH=STRING_CONSTANT__;
   } else {
-    typ_id__EQGH=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FQGH);
-    if ((typ_id__EQGH == (__INTEGER)(-  1))) {
-      a__GQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__HQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FQGH + a__GQGH) & (__UINTEGER_32)(~ a__GQGH));
-      ptr_table__OBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__NBIH=((__POINTER )(NULL));
-      result__PBIH=((__POINTER *)ptr_table__OBIH)[ 0];
-      if ((result__PBIH == (void *)NULL)) {
-        result__PBIH=new_lab__MRJ(new_size__HQGH);
-        next__NBIH=(void *)((unsigned long)result__PBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQGH)));
-        ((__POINTER *)next__NBIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__OBIH)[ 0]=next__NBIH;
-      } else {
-        next__NBIH=((__POINTER *)result__PBIH)[ 0];
-        if ((next__NBIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HQGH <<  1)) <=  4096)) {
-            next__NBIH=(void *)((unsigned long)result__PBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HQGH)));
-          } else {
-            next__NBIH=new_lab__MRJ(new_size__HQGH);
-          };
-          ((__POINTER *)next__NBIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OBIH)[ 0]=next__NBIH;
-        } else {
-          ((__POINTER *)result__PBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PBIH=next__NBIH;
-        };
-      };
-      ptr__DQGH=result__PBIH;
-    } else {
-      t__IQGH=((__UINTEGER_32 )typ_id__EQGH);
-      a__JQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__WBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FQGH + a__JQGH) & (__UINTEGER_32)(~ a__JQGH));
-      ptr_table__TBIH=((__POINTER )(&(table_type[(t__IQGH)])));
-      lab_type__VBIH=(__UINTEGER_32)(t__IQGH |  1);
-      next__SBIH=((__POINTER )(NULL));
-      result__UBIH=((__POINTER *)ptr_table__TBIH)[ 0];
-      if ((result__UBIH == (void *)NULL)) {
-        result__UBIH=new_lab__MRJ(lab_type__VBIH);
-        next__SBIH=(void *)((unsigned long)result__UBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBIH)));
-        ((__POINTER *)next__SBIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__TBIH)[ 0]=next__SBIH;
-      } else {
-        next__SBIH=((__POINTER *)result__UBIH)[ 0];
-        if ((next__SBIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WBIH <<  1)) <=  4096)) {
-            next__SBIH=(void *)((unsigned long)result__UBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBIH)));
-          } else {
-            next__SBIH=new_lab__MRJ(lab_type__VBIH);
-          };
-          ((__POINTER *)next__SBIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TBIH)[ 0]=next__SBIH;
-        } else {
-          ((__POINTER *)result__UBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UBIH=next__SBIH;
-        };
-      };
-      ptr__DQGH=result__UBIH;
-    };
-    result__CQGH=((__STRING_CONSTANT *)ptr__DQGH);
-    *(result__CQGH) = *(STRING_CONSTANT__);
-  };
-  Self__FVCH=((__STRING_CONSTANT *)result__CQGH);
-  c__HVCH=((__STRING *)n__QNT)->count__WFC;
-  if ((c__HVCH !=  0)) {
-    Self__FVCH->storage__VQO=create__BMEB((__INTEGER)(c__HVCH +  1));
-    Self__B1EH=((__CHARACTER *)Self__FVCH->storage__VQO);
-    model__C1EH=((__STRING *)n__QNT)->storage__BCS;
-    Self__A1EH=(__INTEGER)(c__HVCH -  1);
-    while ((Self__A1EH >=  0)) {
-      Self__B1EH[Self__A1EH]=((__CHARACTER *)model__C1EH)[Self__A1EH];
-      Self__A1EH=(__INTEGER)(Self__A1EH -  1);
-    };
-    ((__CHARACTER *)Self__FVCH->storage__VQO)[c__HVCH]='\0';
-    Self__FVCH->count__DD=c__HVCH;
-  };
-  Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD=result__CQGH;
-  Self__IVCH=((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD);
-  Self__T5FH=((__CHARACTER *)Self__IVCH->storage__VQO);
-  idx__R5FH=(__INTEGER)(Self__IVCH->count__DD -  1);
-  while ((! ((idx__R5FH <  0) || ('/' == Self__T5FH[idx__R5FH])))) {
-    idx__R5FH=(__INTEGER)(idx__R5FH -  1);
-  };
-  idx__RNT=(__INTEGER)( 1 + idx__R5FH);
-  if (((void *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT == (void *)NULL)) {
-    result__KQGH=NULL;
-    ptr__LQGH=((__POINTER )(NULL));
-    typ_id__MQGH= 0;
-    sz__NQGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__NQGH ==  0)) {
-      result__KQGH=STRING_CONSTANT__;
-    } else {
-      typ_id__MQGH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NQGH);
-      if ((typ_id__MQGH == (__INTEGER)(-  1))) {
-        a__OQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__PQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NQGH + a__OQGH) & (__UINTEGER_32)(~ a__OQGH));
-        ptr_table__YBIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__XBIH=((__POINTER )(NULL));
-        result__ZBIH=((__POINTER *)ptr_table__YBIH)[ 0];
-        if ((result__ZBIH == (void *)NULL)) {
-          result__ZBIH=new_lab__MRJ(new_size__PQGH);
-          next__XBIH=(void *)((unsigned long)result__ZBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQGH)));
-          ((__POINTER *)next__XBIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__YBIH)[ 0]=next__XBIH;
-        } else {
-          next__XBIH=((__POINTER *)result__ZBIH)[ 0];
-          if ((next__XBIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZBIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PQGH <<  1)) <=  4096)) {
-              next__XBIH=(void *)((unsigned long)result__ZBIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQGH)));
+    typ_id__5RHH=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ASHH);
+    if ((typ_id__5RHH == (__INTEGER)(-  1))) {
+      a__BSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ASHH + a__BSHH) & (__UINTEGER_32)(~ a__BSHH));
+      ptr_table__ODJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CSHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NDJH=((__POINTER )(NULL));
+      result__PDJH=((__POINTER *)ptr_table__ODJH)[ 0];
+      if ((result__PDJH == (void *)NULL)) {
+        result__PDJH=new_lab__URJ(new_size__CSHH);
+        next__NDJH=(void *)((unsigned long)result__PDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSHH)));
+        ((__POINTER *)next__NDJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ODJH)[ 0]=next__NDJH;
+      } else {
+        next__NDJH=((__POINTER *)result__PDJH)[ 0];
+        if ((next__NDJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PDJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CSHH <<  1)) <=  4096)) {
+            next__NDJH=(void *)((unsigned long)result__PDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSHH)));
+          } else {
+            next__NDJH=new_lab__URJ(new_size__CSHH);
+          };
+          ((__POINTER *)next__NDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ODJH)[ 0]=next__NDJH;
+        } else {
+          ((__POINTER *)result__PDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PDJH=next__NDJH;
+        };
+      };
+      ptr__4RHH=result__PDJH;
+    } else {
+      t__DSHH=((__UINTEGER_32 )typ_id__5RHH);
+      a__ESHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ASHH + a__ESHH) & (__UINTEGER_32)(~ a__ESHH));
+      ptr_table__TDJH=((__POINTER )(&(table_type[(t__DSHH)])));
+      lab_type__VDJH=(__UINTEGER_32)(t__DSHH |  1);
+      next__SDJH=((__POINTER )(NULL));
+      result__UDJH=((__POINTER *)ptr_table__TDJH)[ 0];
+      if ((result__UDJH == (void *)NULL)) {
+        result__UDJH=new_lab__URJ(lab_type__VDJH);
+        next__SDJH=(void *)((unsigned long)result__UDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDJH)));
+        ((__POINTER *)next__SDJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TDJH)[ 0]=next__SDJH;
+      } else {
+        next__SDJH=((__POINTER *)result__UDJH)[ 0];
+        if ((next__SDJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UDJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WDJH <<  1)) <=  4096)) {
+            next__SDJH=(void *)((unsigned long)result__UDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDJH)));
+          } else {
+            next__SDJH=new_lab__URJ(lab_type__VDJH);
+          };
+          ((__POINTER *)next__SDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TDJH)[ 0]=next__SDJH;
+        } else {
+          ((__POINTER *)result__UDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UDJH=next__SDJH;
+        };
+      };
+      ptr__4RHH=result__UDJH;
+    };
+    result__3RHH=((__STRING_CONSTANT *)ptr__4RHH);
+    *(result__3RHH) = *(STRING_CONSTANT__);
+  };
+  Self__BVDH=((__STRING_CONSTANT *)result__3RHH);
+  c__DVDH=((__STRING *)n__YNT)->count__4FC;
+  if ((c__DVDH !=  0)) {
+    Self__BVDH->storage__3QO=create__JMEB((__INTEGER)(c__DVDH +  1));
+    Self__R2FH=((__CHARACTER *)Self__BVDH->storage__3QO);
+    model__S2FH=((__STRING *)n__YNT)->storage__JCS;
+    Self__Q2FH=(__INTEGER)(c__DVDH -  1);
+    while ((Self__Q2FH >=  0)) {
+      Self__R2FH[Self__Q2FH]=((__CHARACTER *)model__S2FH)[Self__Q2FH];
+      Self__Q2FH=(__INTEGER)(Self__Q2FH -  1);
+    };
+    ((__CHARACTER *)Self__BVDH->storage__3QO)[c__DVDH]='\0';
+    Self__BVDH->count__DD=c__DVDH;
+  };
+  Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.path__BD=result__3RHH;
+  Self__EVDH=((__STRING_CONSTANT *)Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.path__BD);
+  Self__GBHH=((__CHARACTER *)Self__EVDH->storage__3QO);
+  idx__EBHH=(__INTEGER)(Self__EVDH->count__DD -  1);
+  while ((! ((idx__EBHH <  0) || ('/' == Self__GBHH[idx__EBHH])))) {
+    idx__EBHH=(__INTEGER)(idx__EBHH -  1);
+  };
+  idx__ZNT=(__INTEGER)( 1 + idx__EBHH);
+  if (((void *)Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.name__3NT == (void *)NULL)) {
+    result__FSHH=NULL;
+    ptr__GSHH=((__POINTER )(NULL));
+    typ_id__HSHH= 0;
+    sz__ISHH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__ISHH ==  0)) {
+      result__FSHH=STRING_CONSTANT__;
+    } else {
+      typ_id__HSHH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ISHH);
+      if ((typ_id__HSHH == (__INTEGER)(-  1))) {
+        a__JSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ISHH + a__JSHH) & (__UINTEGER_32)(~ a__JSHH));
+        ptr_table__YDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KSHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__XDJH=((__POINTER )(NULL));
+        result__ZDJH=((__POINTER *)ptr_table__YDJH)[ 0];
+        if ((result__ZDJH == (void *)NULL)) {
+          result__ZDJH=new_lab__URJ(new_size__KSHH);
+          next__XDJH=(void *)((unsigned long)result__ZDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KSHH)));
+          ((__POINTER *)next__XDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YDJH)[ 0]=next__XDJH;
+        } else {
+          next__XDJH=((__POINTER *)result__ZDJH)[ 0];
+          if ((next__XDJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZDJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KSHH <<  1)) <=  4096)) {
+              next__XDJH=(void *)((unsigned long)result__ZDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KSHH)));
             } else {
-              next__XBIH=new_lab__MRJ(new_size__PQGH);
-            };
-            ((__POINTER *)next__XBIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YBIH)[ 0]=next__XBIH;
-          } else {
-            ((__POINTER *)result__ZBIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XBIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZBIH=next__XBIH;
-          };
-        };
-        ptr__LQGH=result__ZBIH;
-      } else {
-        t__QQGH=((__UINTEGER_32 )typ_id__MQGH);
-        a__RQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__ACIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NQGH + a__RQGH) & (__UINTEGER_32)(~ a__RQGH));
-        ptr_table__3BIH=((__POINTER )(&(table_type[(t__QQGH)])));
-        lab_type__5BIH=(__UINTEGER_32)(t__QQGH |  1);
-        next__2BIH=((__POINTER )(NULL));
-        result__4BIH=((__POINTER *)ptr_table__3BIH)[ 0];
-        if ((result__4BIH == (void *)NULL)) {
-          result__4BIH=new_lab__MRJ(lab_type__5BIH);
-          next__2BIH=(void *)((unsigned long)result__4BIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACIH)));
-          ((__POINTER *)next__2BIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3BIH)[ 0]=next__2BIH;
-        } else {
-          next__2BIH=((__POINTER *)result__4BIH)[ 0];
-          if ((next__2BIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4BIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ACIH <<  1)) <=  4096)) {
-              next__2BIH=(void *)((unsigned long)result__4BIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACIH)));
+              next__XDJH=new_lab__URJ(new_size__KSHH);
+            };
+            ((__POINTER *)next__XDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YDJH)[ 0]=next__XDJH;
+          } else {
+            ((__POINTER *)result__ZDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZDJH=next__XDJH;
+          };
+        };
+        ptr__GSHH=result__ZDJH;
+      } else {
+        t__LSHH=((__UINTEGER_32 )typ_id__HSHH);
+        a__MSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__AEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ISHH + a__MSHH) & (__UINTEGER_32)(~ a__MSHH));
+        ptr_table__3DJH=((__POINTER )(&(table_type[(t__LSHH)])));
+        lab_type__5DJH=(__UINTEGER_32)(t__LSHH |  1);
+        next__2DJH=((__POINTER )(NULL));
+        result__4DJH=((__POINTER *)ptr_table__3DJH)[ 0];
+        if ((result__4DJH == (void *)NULL)) {
+          result__4DJH=new_lab__URJ(lab_type__5DJH);
+          next__2DJH=(void *)((unsigned long)result__4DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEJH)));
+          ((__POINTER *)next__2DJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3DJH)[ 0]=next__2DJH;
+        } else {
+          next__2DJH=((__POINTER *)result__4DJH)[ 0];
+          if ((next__2DJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4DJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AEJH <<  1)) <=  4096)) {
+              next__2DJH=(void *)((unsigned long)result__4DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEJH)));
             } else {
-              next__2BIH=new_lab__MRJ(lab_type__5BIH);
+              next__2DJH=new_lab__URJ(lab_type__5DJH);
             };
-            ((__POINTER *)next__2BIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3BIH)[ 0]=next__2BIH;
+            ((__POINTER *)next__2DJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3DJH)[ 0]=next__2DJH;
           } else {
-            ((__POINTER *)result__4BIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2BIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__4BIH=next__2BIH;
+            ((__POINTER *)result__4DJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4DJH=next__2DJH;
           };
         };
-        ptr__LQGH=result__4BIH;
+        ptr__GSHH=result__4DJH;
       };
-      result__KQGH=((__STRING_CONSTANT *)ptr__LQGH);
-      *(result__KQGH) = *(STRING_CONSTANT__);
+      result__FSHH=((__STRING_CONSTANT *)ptr__GSHH);
+      *(result__FSHH) = *(STRING_CONSTANT__);
     };
-    Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT=result__KQGH;
+    Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.name__3NT=result__FSHH;
   };
-  __tmp__5NT=Self__PNT->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
-  ptr__JW4G=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD)->storage__VQO));
-  ptr__JW4G=(void *)((unsigned long)ptr__JW4G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__RNT)));
-  __tmp__DOT=((__CHARACTER *)ptr__JW4G);
-  __tmp__HOT=(__INTEGER)(((__STRING_CONSTANT *)Self__PNT->parent_entry_unix__ZED.parent_entry__YED.path__BD)->count__DD - idx__RNT);
-  Self__ADRG=((__STRING_CONSTANT *)__tmp__5NT);
-  Self__ADRG->storage__VQO=__tmp__DOT;
-  Self__ADRG->count__DD=__tmp__HOT;
+  __tmp__HOT=Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.name__3NT;
+  ptr__3V5G=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.path__BD)->storage__3QO));
+  ptr__3V5G=(void *)((unsigned long)ptr__3V5G - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__ZNT)));
+  __tmp__LOT=((__CHARACTER *)ptr__3V5G);
+  __tmp__POT=(__INTEGER)(((__STRING_CONSTANT *)Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.path__BD)->count__DD - idx__ZNT);
+  Self__H5RG=((__STRING_CONSTANT *)__tmp__HOT);
+  Self__H5RG->storage__3QO=__tmp__LOT;
+  Self__H5RG->count__DD=__tmp__POT;
 }
 
-static void set_path__JOT(__FILE_UNIX *Self__KOT,void *n__LOT)
+static void set_path__ROT(__FILE_UNIX *Self__SOT,void *n__TOT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *result__SQGH,*Self__NVCH,*Self__QVCH,*result__0QGH;
-  __STRING_CONSTANT *Self__FDRG;
-  __POINTER ptr__TQGH,ptr_table__CCIH,next__BCIH,result__DCIH;
-  __POINTER ptr_table__HCIH,next__GCIH,result__ICIH,ptr__1QGH;
-  __POINTER ptr_table__MCIH,next__LCIH,result__NCIH,ptr_table__RCIH;
-  __POINTER next__QCIH,result__SCIH,ptr__NOY;
-  __INTEGER typ_id__UQGH,c__PVCH,Self__L1EH,idx__W5FH,idx__MOT;
-  __INTEGER typ_id__2QGH,__tmp__BPT;
-  __UINTEGER_32 sz__VQGH,a__WQGH,new_size__XQGH,t__YQGH,a__ZQGH;
-  __UINTEGER_32 new_size__KCIH,lab_type__JCIH,sz__3QGH,a__4QGH;
-  __UINTEGER_32 new_size__5QGH,t__ARGH,a__BRGH,new_size__UCIH;
-  __UINTEGER_32 lab_type__TCIH;
-  void *__tmp__ZOT;
-  __CHARACTER *Self__M1EH,*model__N1EH,*Self__Y5FH,*__tmp__3OT;
-  result__SQGH=NULL;
-  ptr__TQGH=((__POINTER )(NULL));
-  typ_id__UQGH= 0;
-  sz__VQGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-  if ((sz__VQGH ==  0)) {
-    result__SQGH=STRING_CONSTANT__;
+  __STRING_CONSTANT *result__NSHH,*Self__JVDH,*Self__MVDH,*result__VSHH;
+  __STRING_CONSTANT *Self__M5RG;
+  __POINTER ptr__OSHH,ptr_table__CEJH,next__BEJH,result__DEJH;
+  __POINTER ptr_table__HEJH,next__GEJH,result__IEJH,ptr__WSHH;
+  __POINTER ptr_table__MEJH,next__LEJH,result__NEJH,ptr_table__REJH;
+  __POINTER next__QEJH,result__SEJH,ptr__VOY;
+  __INTEGER typ_id__PSHH,c__LVDH,Self__12FH,idx__JBHH,idx__UOT;
+  __INTEGER typ_id__XSHH,__tmp__JPT;
+  __UINTEGER_32 sz__QSHH,a__RSHH,new_size__SSHH,t__TSHH,a__USHH;
+  __UINTEGER_32 new_size__KEJH,lab_type__JEJH,sz__YSHH,a__ZSHH;
+  __UINTEGER_32 new_size__0SHH,t__1SHH,a__2SHH,new_size__UEJH;
+  __UINTEGER_32 lab_type__TEJH;
+  void *__tmp__BPT;
+  __CHARACTER *Self__22FH,*model__32FH,*Self__LBHH,*__tmp__FPT;
+  result__NSHH=NULL;
+  ptr__OSHH=((__POINTER )(NULL));
+  typ_id__PSHH= 0;
+  sz__QSHH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__QSHH ==  0)) {
+    result__NSHH=STRING_CONSTANT__;
   } else {
-    typ_id__UQGH=-1;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__VQGH);
-    if ((typ_id__UQGH == (__INTEGER)(-  1))) {
-      a__WQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VQGH + a__WQGH) & (__UINTEGER_32)(~ a__WQGH));
-      ptr_table__CCIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__BCIH=((__POINTER )(NULL));
-      result__DCIH=((__POINTER *)ptr_table__CCIH)[ 0];
-      if ((result__DCIH == (void *)NULL)) {
-        result__DCIH=new_lab__MRJ(new_size__XQGH);
-        next__BCIH=(void *)((unsigned long)result__DCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQGH)));
-        ((__POINTER *)next__BCIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__CCIH)[ 0]=next__BCIH;
-      } else {
-        next__BCIH=((__POINTER *)result__DCIH)[ 0];
-        if ((next__BCIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XQGH <<  1)) <=  4096)) {
-            next__BCIH=(void *)((unsigned long)result__DCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQGH)));
-          } else {
-            next__BCIH=new_lab__MRJ(new_size__XQGH);
-          };
-          ((__POINTER *)next__BCIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CCIH)[ 0]=next__BCIH;
-        } else {
-          ((__POINTER *)result__DCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__DCIH=next__BCIH;
-        };
-      };
-      ptr__TQGH=result__DCIH;
-    } else {
-      t__YQGH=((__UINTEGER_32 )typ_id__UQGH);
-      a__ZQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__KCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VQGH + a__ZQGH) & (__UINTEGER_32)(~ a__ZQGH));
-      ptr_table__HCIH=((__POINTER )(&(table_type[(t__YQGH)])));
-      lab_type__JCIH=(__UINTEGER_32)(t__YQGH |  1);
-      next__GCIH=((__POINTER )(NULL));
-      result__ICIH=((__POINTER *)ptr_table__HCIH)[ 0];
-      if ((result__ICIH == (void *)NULL)) {
-        result__ICIH=new_lab__MRJ(lab_type__JCIH);
-        next__GCIH=(void *)((unsigned long)result__ICIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCIH)));
-        ((__POINTER *)next__GCIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__HCIH)[ 0]=next__GCIH;
-      } else {
-        next__GCIH=((__POINTER *)result__ICIH)[ 0];
-        if ((next__GCIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ICIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KCIH <<  1)) <=  4096)) {
-            next__GCIH=(void *)((unsigned long)result__ICIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KCIH)));
-          } else {
-            next__GCIH=new_lab__MRJ(lab_type__JCIH);
-          };
-          ((__POINTER *)next__GCIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HCIH)[ 0]=next__GCIH;
-        } else {
-          ((__POINTER *)result__ICIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ICIH=next__GCIH;
-        };
-      };
-      ptr__TQGH=result__ICIH;
-    };
-    result__SQGH=((__STRING_CONSTANT *)ptr__TQGH);
-    *(result__SQGH) = *(STRING_CONSTANT__);
-  };
-  Self__NVCH=((__STRING_CONSTANT *)result__SQGH);
-  c__PVCH=((__STRING *)n__LOT)->count__WFC;
-  if ((c__PVCH !=  0)) {
-    Self__NVCH->storage__VQO=create__BMEB((__INTEGER)(c__PVCH +  1));
-    Self__M1EH=((__CHARACTER *)Self__NVCH->storage__VQO);
-    model__N1EH=((__STRING *)n__LOT)->storage__BCS;
-    Self__L1EH=(__INTEGER)(c__PVCH -  1);
-    while ((Self__L1EH >=  0)) {
-      Self__M1EH[Self__L1EH]=((__CHARACTER *)model__N1EH)[Self__L1EH];
-      Self__L1EH=(__INTEGER)(Self__L1EH -  1);
-    };
-    ((__CHARACTER *)Self__NVCH->storage__VQO)[c__PVCH]='\0';
-    Self__NVCH->count__DD=c__PVCH;
-  };
-  Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD=result__SQGH;
-  Self__QVCH=((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD);
-  Self__Y5FH=((__CHARACTER *)Self__QVCH->storage__VQO);
-  idx__W5FH=(__INTEGER)(Self__QVCH->count__DD -  1);
-  while ((! ((idx__W5FH <  0) || ('/' == Self__Y5FH[idx__W5FH])))) {
-    idx__W5FH=(__INTEGER)(idx__W5FH -  1);
-  };
-  idx__MOT=(__INTEGER)( 1 + idx__W5FH);
-  if (((void *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT == (void *)NULL)) {
-    result__0QGH=NULL;
-    ptr__1QGH=((__POINTER )(NULL));
-    typ_id__2QGH= 0;
-    sz__3QGH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
-    if ((sz__3QGH ==  0)) {
-      result__0QGH=STRING_CONSTANT__;
-    } else {
-      typ_id__2QGH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__3QGH);
-      if ((typ_id__2QGH == (__INTEGER)(-  1))) {
-        a__4QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5QGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QGH + a__4QGH) & (__UINTEGER_32)(~ a__4QGH));
-        ptr_table__MCIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5QGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__LCIH=((__POINTER )(NULL));
-        result__NCIH=((__POINTER *)ptr_table__MCIH)[ 0];
-        if ((result__NCIH == (void *)NULL)) {
-          result__NCIH=new_lab__MRJ(new_size__5QGH);
-          next__LCIH=(void *)((unsigned long)result__NCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QGH)));
-          ((__POINTER *)next__LCIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__MCIH)[ 0]=next__LCIH;
-        } else {
-          next__LCIH=((__POINTER *)result__NCIH)[ 0];
-          if ((next__LCIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5QGH <<  1)) <=  4096)) {
-              next__LCIH=(void *)((unsigned long)result__NCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5QGH)));
+    typ_id__PSHH=-1;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QSHH);
+    if ((typ_id__PSHH == (__INTEGER)(-  1))) {
+      a__RSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SSHH=(__UINTEGER_32)((__UINTEGER_32)(sz__QSHH + a__RSHH) & (__UINTEGER_32)(~ a__RSHH));
+      ptr_table__CEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SSHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BEJH=((__POINTER )(NULL));
+      result__DEJH=((__POINTER *)ptr_table__CEJH)[ 0];
+      if ((result__DEJH == (void *)NULL)) {
+        result__DEJH=new_lab__URJ(new_size__SSHH);
+        next__BEJH=(void *)((unsigned long)result__DEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSHH)));
+        ((__POINTER *)next__BEJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CEJH)[ 0]=next__BEJH;
+      } else {
+        next__BEJH=((__POINTER *)result__DEJH)[ 0];
+        if ((next__BEJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DEJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SSHH <<  1)) <=  4096)) {
+            next__BEJH=(void *)((unsigned long)result__DEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSHH)));
+          } else {
+            next__BEJH=new_lab__URJ(new_size__SSHH);
+          };
+          ((__POINTER *)next__BEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CEJH)[ 0]=next__BEJH;
+        } else {
+          ((__POINTER *)result__DEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DEJH=next__BEJH;
+        };
+      };
+      ptr__OSHH=result__DEJH;
+    } else {
+      t__TSHH=((__UINTEGER_32 )typ_id__PSHH);
+      a__USHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QSHH + a__USHH) & (__UINTEGER_32)(~ a__USHH));
+      ptr_table__HEJH=((__POINTER )(&(table_type[(t__TSHH)])));
+      lab_type__JEJH=(__UINTEGER_32)(t__TSHH |  1);
+      next__GEJH=((__POINTER )(NULL));
+      result__IEJH=((__POINTER *)ptr_table__HEJH)[ 0];
+      if ((result__IEJH == (void *)NULL)) {
+        result__IEJH=new_lab__URJ(lab_type__JEJH);
+        next__GEJH=(void *)((unsigned long)result__IEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEJH)));
+        ((__POINTER *)next__GEJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HEJH)[ 0]=next__GEJH;
+      } else {
+        next__GEJH=((__POINTER *)result__IEJH)[ 0];
+        if ((next__GEJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IEJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KEJH <<  1)) <=  4096)) {
+            next__GEJH=(void *)((unsigned long)result__IEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KEJH)));
+          } else {
+            next__GEJH=new_lab__URJ(lab_type__JEJH);
+          };
+          ((__POINTER *)next__GEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HEJH)[ 0]=next__GEJH;
+        } else {
+          ((__POINTER *)result__IEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IEJH=next__GEJH;
+        };
+      };
+      ptr__OSHH=result__IEJH;
+    };
+    result__NSHH=((__STRING_CONSTANT *)ptr__OSHH);
+    *(result__NSHH) = *(STRING_CONSTANT__);
+  };
+  Self__JVDH=((__STRING_CONSTANT *)result__NSHH);
+  c__LVDH=((__STRING *)n__TOT)->count__4FC;
+  if ((c__LVDH !=  0)) {
+    Self__JVDH->storage__3QO=create__JMEB((__INTEGER)(c__LVDH +  1));
+    Self__22FH=((__CHARACTER *)Self__JVDH->storage__3QO);
+    model__32FH=((__STRING *)n__TOT)->storage__JCS;
+    Self__12FH=(__INTEGER)(c__LVDH -  1);
+    while ((Self__12FH >=  0)) {
+      Self__22FH[Self__12FH]=((__CHARACTER *)model__32FH)[Self__12FH];
+      Self__12FH=(__INTEGER)(Self__12FH -  1);
+    };
+    ((__CHARACTER *)Self__JVDH->storage__3QO)[c__LVDH]='\0';
+    Self__JVDH->count__DD=c__LVDH;
+  };
+  Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.path__BD=result__NSHH;
+  Self__MVDH=((__STRING_CONSTANT *)Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.path__BD);
+  Self__LBHH=((__CHARACTER *)Self__MVDH->storage__3QO);
+  idx__JBHH=(__INTEGER)(Self__MVDH->count__DD -  1);
+  while ((! ((idx__JBHH <  0) || ('/' == Self__LBHH[idx__JBHH])))) {
+    idx__JBHH=(__INTEGER)(idx__JBHH -  1);
+  };
+  idx__UOT=(__INTEGER)( 1 + idx__JBHH);
+  if (((void *)Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.name__3NT == (void *)NULL)) {
+    result__VSHH=NULL;
+    ptr__WSHH=((__POINTER )(NULL));
+    typ_id__XSHH= 0;
+    sz__YSHH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__YSHH ==  0)) {
+      result__VSHH=STRING_CONSTANT__;
+    } else {
+      typ_id__XSHH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__YSHH);
+      if ((typ_id__XSHH == (__INTEGER)(-  1))) {
+        a__ZSHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0SHH=(__UINTEGER_32)((__UINTEGER_32)(sz__YSHH + a__ZSHH) & (__UINTEGER_32)(~ a__ZSHH));
+        ptr_table__MEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0SHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__LEJH=((__POINTER )(NULL));
+        result__NEJH=((__POINTER *)ptr_table__MEJH)[ 0];
+        if ((result__NEJH == (void *)NULL)) {
+          result__NEJH=new_lab__URJ(new_size__0SHH);
+          next__LEJH=(void *)((unsigned long)result__NEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0SHH)));
+          ((__POINTER *)next__LEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MEJH)[ 0]=next__LEJH;
+        } else {
+          next__LEJH=((__POINTER *)result__NEJH)[ 0];
+          if ((next__LEJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NEJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0SHH <<  1)) <=  4096)) {
+              next__LEJH=(void *)((unsigned long)result__NEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0SHH)));
             } else {
-              next__LCIH=new_lab__MRJ(new_size__5QGH);
-            };
-            ((__POINTER *)next__LCIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MCIH)[ 0]=next__LCIH;
-          } else {
-            ((__POINTER *)result__NCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NCIH=next__LCIH;
-          };
-        };
-        ptr__1QGH=result__NCIH;
-      } else {
-        t__ARGH=((__UINTEGER_32 )typ_id__2QGH);
-        a__BRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3QGH + a__BRGH) & (__UINTEGER_32)(~ a__BRGH));
-        ptr_table__RCIH=((__POINTER )(&(table_type[(t__ARGH)])));
-        lab_type__TCIH=(__UINTEGER_32)(t__ARGH |  1);
-        next__QCIH=((__POINTER )(NULL));
-        result__SCIH=((__POINTER *)ptr_table__RCIH)[ 0];
-        if ((result__SCIH == (void *)NULL)) {
-          result__SCIH=new_lab__MRJ(lab_type__TCIH);
-          next__QCIH=(void *)((unsigned long)result__SCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCIH)));
-          ((__POINTER *)next__QCIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RCIH)[ 0]=next__QCIH;
-        } else {
-          next__QCIH=((__POINTER *)result__SCIH)[ 0];
-          if ((next__QCIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SCIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UCIH <<  1)) <=  4096)) {
-              next__QCIH=(void *)((unsigned long)result__SCIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCIH)));
+              next__LEJH=new_lab__URJ(new_size__0SHH);
+            };
+            ((__POINTER *)next__LEJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MEJH)[ 0]=next__LEJH;
+          } else {
+            ((__POINTER *)result__NEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NEJH=next__LEJH;
+          };
+        };
+        ptr__WSHH=result__NEJH;
+      } else {
+        t__1SHH=((__UINTEGER_32 )typ_id__XSHH);
+        a__2SHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YSHH + a__2SHH) & (__UINTEGER_32)(~ a__2SHH));
+        ptr_table__REJH=((__POINTER )(&(table_type[(t__1SHH)])));
+        lab_type__TEJH=(__UINTEGER_32)(t__1SHH |  1);
+        next__QEJH=((__POINTER )(NULL));
+        result__SEJH=((__POINTER *)ptr_table__REJH)[ 0];
+        if ((result__SEJH == (void *)NULL)) {
+          result__SEJH=new_lab__URJ(lab_type__TEJH);
+          next__QEJH=(void *)((unsigned long)result__SEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEJH)));
+          ((__POINTER *)next__QEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__REJH)[ 0]=next__QEJH;
+        } else {
+          next__QEJH=((__POINTER *)result__SEJH)[ 0];
+          if ((next__QEJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SEJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UEJH <<  1)) <=  4096)) {
+              next__QEJH=(void *)((unsigned long)result__SEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEJH)));
             } else {
-              next__QCIH=new_lab__MRJ(lab_type__TCIH);
+              next__QEJH=new_lab__URJ(lab_type__TEJH);
             };
-            ((__POINTER *)next__QCIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RCIH)[ 0]=next__QCIH;
+            ((__POINTER *)next__QEJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__REJH)[ 0]=next__QEJH;
           } else {
-            ((__POINTER *)result__SCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SCIH=next__QCIH;
+            ((__POINTER *)result__SEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SEJH=next__QEJH;
           };
         };
-        ptr__1QGH=result__SCIH;
+        ptr__WSHH=result__SEJH;
       };
-      result__0QGH=((__STRING_CONSTANT *)ptr__1QGH);
-      *(result__0QGH) = *(STRING_CONSTANT__);
+      result__VSHH=((__STRING_CONSTANT *)ptr__WSHH);
+      *(result__VSHH) = *(STRING_CONSTANT__);
     };
-    Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT=result__0QGH;
+    Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.name__3NT=result__VSHH;
   };
-  __tmp__ZOT=Self__KOT->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
-  ptr__NOY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO));
-  ptr__NOY=(void *)((unsigned long)ptr__NOY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__MOT)));
-  __tmp__3OT=((__CHARACTER *)ptr__NOY);
-  __tmp__BPT=(__INTEGER)(((__STRING_CONSTANT *)Self__KOT->parent_entry_unix__2CF.parent_entry__YED.path__BD)->count__DD - idx__MOT);
-  Self__FDRG=((__STRING_CONSTANT *)__tmp__ZOT);
-  Self__FDRG->storage__VQO=__tmp__3OT;
-  Self__FDRG->count__DD=__tmp__BPT;
+  __tmp__BPT=Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.name__3NT;
+  ptr__VOY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->storage__3QO));
+  ptr__VOY=(void *)((unsigned long)ptr__VOY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__UOT)));
+  __tmp__FPT=((__CHARACTER *)ptr__VOY);
+  __tmp__JPT=(__INTEGER)(((__STRING_CONSTANT *)Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->count__DD - idx__UOT);
+  Self__M5RG=((__STRING_CONSTANT *)__tmp__BPT);
+  Self__M5RG->storage__3QO=__tmp__FPT;
+  Self__M5RG->count__DD=__tmp__JPT;
 }
 
-static void insert_string__to__0XU(__STRING *Self__1XU,void *s__2XU,__INTEGER i__3XU)
+static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER j__4XU,__tmp__RYU,dest__35FH,src_capacity__BAGH,i2__25FH;
-  __INTEGER i1__45FH;
-  __CHARACTER *__tmp__BZU,*__tmp__CZU,*Self__55FH,*src__AAGH;
-  j__4XU=Self__1XU->count__WFC;
-  if (((struct ___OBJ *)s__2XU)->__id==__STRING_CONSTANT__) {
-    __tmp__RYU=((__STRING_CONSTANT *)s__2XU)->count__DD;
+  __INTEGER j__GYU,__tmp__ZYU,dest__QBHH,src_capacity__UBHH,i2__PBHH;
+  __INTEGER i1__RBHH;
+  __CHARACTER *__tmp__JZU,*__tmp__KZU,*Self__SBHH,*src__TBHH;
+  j__GYU=Self__DYU->count__4FC;
+  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
+    __tmp__ZYU=((__STRING_CONSTANT *)s__EYU)->count__DD;
   } else {
-    __tmp__RYU=((__STRING *)s__2XU)->count__WFC;
+    __tmp__ZYU=((__STRING *)s__EYU)->count__4FC;
   };
-  resize__YXZ(Self__1XU,(__INTEGER)(j__4XU + __tmp__RYU));
-  if ((i__3XU <= j__4XU)) {
-    move__to__by__BWCC(Self__1XU->storage__BCS,(__INTEGER)(i__3XU -  1),(__INTEGER)(j__4XU -  1),__tmp__RYU);
+  resize__AYZ(Self__DYU,(__INTEGER)(j__GYU + __tmp__ZYU));
+  if ((i__FYU <= j__GYU)) {
+    move__to__by__JWCC(Self__DYU->storage__JCS,(__INTEGER)(i__FYU -  1),(__INTEGER)(j__GYU -  1),__tmp__ZYU);
   };
-  __tmp__BZU=Self__1XU->storage__BCS;
-  if (((struct ___OBJ *)s__2XU)->__id==__STRING_CONSTANT__) {
-    __tmp__CZU=((__STRING_CONSTANT *)s__2XU)->storage__VQO;
+  __tmp__JZU=Self__DYU->storage__JCS;
+  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
+    __tmp__KZU=((__STRING_CONSTANT *)s__EYU)->storage__3QO;
   } else {
-    __tmp__CZU=((__STRING *)s__2XU)->storage__BCS;
-  };
-  Self__55FH=((__CHARACTER *)__tmp__BZU);
-  src__AAGH=__tmp__CZU;
-  dest__35FH=(__INTEGER)(i__3XU -  1);
-  src_capacity__BAGH=__tmp__RYU;
-  i2__25FH= 0;
-  i1__45FH=dest__35FH;
-  while ((i2__25FH != src_capacity__BAGH)) {
-    Self__55FH[i1__45FH]=((__CHARACTER *)src__AAGH)[i2__25FH];
-    i2__25FH=(__INTEGER)(i2__25FH +  1);
-    i1__45FH=(__INTEGER)(i1__45FH +  1);
+    __tmp__KZU=((__STRING *)s__EYU)->storage__JCS;
+  };
+  Self__SBHH=((__CHARACTER *)__tmp__JZU);
+  src__TBHH=__tmp__KZU;
+  dest__QBHH=(__INTEGER)(i__FYU -  1);
+  src_capacity__UBHH=__tmp__ZYU;
+  i2__PBHH= 0;
+  i1__RBHH=dest__QBHH;
+  while ((i2__PBHH != src_capacity__UBHH)) {
+    Self__SBHH[i1__RBHH]=((__CHARACTER *)src__TBHH)[i2__PBHH];
+    i2__PBHH=(__INTEGER)(i2__PBHH +  1);
+    i1__RBHH=(__INTEGER)(i1__RBHH +  1);
   };
 }
 
-static void read_escape_character__WAKF()
+static void read_escape_character__YLKF()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER val__ZAKF;
-  __STRING *Self__V1EH;
-  __POSITION pos__4EXG,pos__LFXG,pos__YFXG,pos__0FXG;
-  __CHARACTER result__MZ4G,result__RZ4G,result__1Z4G,result__A04G;
-  __CHARACTER result__F04G,result__O04G,result__X04G,result__204G;
-  __CHARACTER result__B14G,result__G14G,result__L14G,result__Q14G;
-  __CHARACTER result__V14G,result__014G,result__514G,result__E24G;
-  __CHARACTER result__J24G,result__O24G,result__X24G,result__224G;
-  __CHARACTER result__E34G,result__J34G;
-  __BOOLEAN __tmp__SBKF,__tmp__GCKF,__tmp__ZCKF,__tmp__OFKF,__tmp__PFKF;
-  __BOOLEAN __tmp__QFKF,__tmp__RFKF,__tmp__SFKF,__tmp__TFKF,__tmp__UFKF;
-  __BOOLEAN __tmp__VFKF,__tmp__WFKF,__tmp__XFKF,__tmp__CGKF;
-  val__ZAKF= 0;
-  result__MZ4G='\0';
-  if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-    result__MZ4G=((__CHARACTER )(( 0)));
+  __INTEGER val__1LKF;
+  __STRING *Self__F3FH;
+  __POSITION pos__NCYG,pos__0CYG,pos__HDYG,pos__JDYG;
+  __CHARACTER result__BZ5G,result__GZ5G,result__QZ5G,result__VZ5G;
+  __CHARACTER result__0Z5G,result__D05G,result__M05G,result__R05G;
+  __CHARACTER result__W05G,result__105G,result__A15G,result__F15G;
+  __CHARACTER result__K15G,result__P15G,result__U15G,result__Z15G;
+  __CHARACTER result__415G,result__D25G,result__I25G,result__N25G;
+  __CHARACTER result__V25G,result__025G;
+  __BOOLEAN __tmp__UMKF,__tmp__INKF,__tmp__1NKF,__tmp__QQKF,__tmp__RQKF;
+  __BOOLEAN __tmp__SQKF,__tmp__TQKF,__tmp__UQKF,__tmp__VQKF,__tmp__WQKF;
+  __BOOLEAN __tmp__XQKF,__tmp__YQKF,__tmp__ZQKF,__tmp__ERKF;
+  val__1LKF= 0;
+  result__BZ5G='\0';
+  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+    result__BZ5G=((__CHARACTER )(( 0)));
   } else {
-    result__MZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+    result__BZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
   };
-  if ((((((((result__MZ4G == ' ') || (result__MZ4G == '\t')) || (result__MZ4G == '\n')) || (result__MZ4G == '\r')) || (result__MZ4G == '\0')) || (result__MZ4G == '\f')) || (result__MZ4G == '\v'))) {
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    until_do__SLMF:
+  if ((((((((result__BZ5G == ' ') || (result__BZ5G == '\t')) || (result__BZ5G == '\n')) || (result__BZ5G == '\r')) || (result__BZ5G == '\0')) || (result__BZ5G == '\f')) || (result__BZ5G == '\v'))) {
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    until_do__KXMF:
     {
-      result__RZ4G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__RZ4G=((__CHARACTER )(( 0)));
+      result__GZ5G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__GZ5G=((__CHARACTER )(( 0)));
       } else {
-        result__RZ4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__GZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__RZ4G == ((__CHARACTER )(( 0))))) {
-        __tmp__SBKF=TRUE__;
+      if ((result__GZ5G == ((__CHARACTER )(( 0))))) {
+        __tmp__UMKF=TRUE__;
       } else {
-        result__1Z4G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__1Z4G=((__CHARACTER )(( 0)));
+        result__QZ5G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__QZ5G=((__CHARACTER )(( 0)));
         } else {
-          result__1Z4G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__QZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__SBKF=(! (((((((result__1Z4G == ' ') || (result__1Z4G == '\t')) || (result__1Z4G == '\n')) || (result__1Z4G == '\r')) || (result__1Z4G == '\0')) || (result__1Z4G == '\f')) || (result__1Z4G == '\v')));
+        __tmp__UMKF=(! (((((((result__QZ5G == ' ') || (result__QZ5G == '\t')) || (result__QZ5G == '\n')) || (result__QZ5G == '\r')) || (result__QZ5G == '\0')) || (result__QZ5G == '\f')) || (result__QZ5G == '\v')));
       };
-      if ((! __tmp__SBKF)) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto until_do__SLMF;
+      if ((! __tmp__UMKF)) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto until_do__KXMF;
       };
     };
-    result__A04G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__A04G=((__CHARACTER )(( 0)));
+    result__VZ5G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__VZ5G=((__CHARACTER )(( 0)));
     } else {
-      result__A04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__VZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__A04G == '\\')) {
-      Self__V1EH=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__V1EH->count__WFC)) {
-        Self__V1EH->count__WFC= 0;
+    if ((result__VZ5G == '\\')) {
+      Self__F3FH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__F3FH->count__4FC)) {
+        Self__F3FH->count__4FC= 0;
       } else {
-        Self__V1EH->count__WFC=(__INTEGER)(Self__V1EH->count__WFC -  1);
+        Self__F3FH->count__4FC=(__INTEGER)(Self__F3FH->count__4FC -  1);
       };
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      __tmp__GCKF=TRUE__;
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      __tmp__INKF=TRUE__;
     } else {
-      __tmp__GCKF=FALSE__;
+      __tmp__INKF=FALSE__;
     };
-    if ((! __tmp__GCKF)) {
-      result__F04G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__F04G=((__CHARACTER )(( 0)));
+    if ((! __tmp__INKF)) {
+      result__0Z5G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__0Z5G=((__CHARACTER )(( 0)));
       } else {
-        result__F04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__0Z5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__F04G != ((__CHARACTER )(( 0))))) {
-        pos__4EXG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_300));
-        put_position__UOG(pos__4EXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((result__0Z5G != ((__CHARACTER )(( 0))))) {
+        pos__NCYG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_299));
+        put_position__2OG(pos__NCYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__ZCKF=TRUE__;
+    __tmp__1NKF=TRUE__;
   } else {
-    __tmp__ZCKF=FALSE__;
+    __tmp__1NKF=FALSE__;
   };
-  if ((! __tmp__ZCKF)) {
-    result__O04G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__O04G=((__CHARACTER )(( 0)));
+  if ((! __tmp__1NKF)) {
+    result__D05G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__D05G=((__CHARACTER )(( 0)));
     } else {
-      result__O04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__D05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__O04G != ((__CHARACTER )(( 0))))) {
-      result__X04G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__X04G=((__CHARACTER )(( 0)));
+    if ((result__D05G != ((__CHARACTER )(( 0))))) {
+      result__M05G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__M05G=((__CHARACTER )(( 0)));
       } else {
-        result__X04G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__M05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__X04G == 'a')) {
-        __tmp__OFKF=TRUE__;
+      if ((result__M05G == 'a')) {
+        __tmp__QQKF=TRUE__;
       } else {
-        result__204G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__204G=((__CHARACTER )(( 0)));
+        result__R05G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__R05G=((__CHARACTER )(( 0)));
         } else {
-          result__204G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__R05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__OFKF=(result__204G == 'b');
+        __tmp__QQKF=(result__R05G == 'b');
       };
-      if (__tmp__OFKF) {
-        __tmp__PFKF=TRUE__;
+      if (__tmp__QQKF) {
+        __tmp__RQKF=TRUE__;
       } else {
-        result__B14G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__B14G=((__CHARACTER )(( 0)));
+        result__W05G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__W05G=((__CHARACTER )(( 0)));
         } else {
-          result__B14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__W05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__PFKF=(result__B14G == 'f');
+        __tmp__RQKF=(result__W05G == 'f');
       };
-      if (__tmp__PFKF) {
-        __tmp__QFKF=TRUE__;
+      if (__tmp__RQKF) {
+        __tmp__SQKF=TRUE__;
       } else {
-        result__G14G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__G14G=((__CHARACTER )(( 0)));
+        result__105G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__105G=((__CHARACTER )(( 0)));
         } else {
-          result__G14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__105G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__QFKF=(result__G14G == 'n');
+        __tmp__SQKF=(result__105G == 'n');
       };
-      if (__tmp__QFKF) {
-        __tmp__RFKF=TRUE__;
+      if (__tmp__SQKF) {
+        __tmp__TQKF=TRUE__;
       } else {
-        result__L14G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__L14G=((__CHARACTER )(( 0)));
+        result__A15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__A15G=((__CHARACTER )(( 0)));
         } else {
-          result__L14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__A15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__RFKF=(result__L14G == 'r');
+        __tmp__TQKF=(result__A15G == 'r');
       };
-      if (__tmp__RFKF) {
-        __tmp__SFKF=TRUE__;
+      if (__tmp__TQKF) {
+        __tmp__UQKF=TRUE__;
       } else {
-        result__Q14G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__Q14G=((__CHARACTER )(( 0)));
+        result__F15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__F15G=((__CHARACTER )(( 0)));
         } else {
-          result__Q14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__F15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__SFKF=(result__Q14G == 't');
+        __tmp__UQKF=(result__F15G == 't');
       };
-      if (__tmp__SFKF) {
-        __tmp__TFKF=TRUE__;
+      if (__tmp__UQKF) {
+        __tmp__VQKF=TRUE__;
       } else {
-        result__V14G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__V14G=((__CHARACTER )(( 0)));
+        result__K15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__K15G=((__CHARACTER )(( 0)));
         } else {
-          result__V14G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__K15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__TFKF=(result__V14G == 'v');
+        __tmp__VQKF=(result__K15G == 'v');
       };
-      if (__tmp__TFKF) {
-        __tmp__UFKF=TRUE__;
+      if (__tmp__VQKF) {
+        __tmp__WQKF=TRUE__;
       } else {
-        result__014G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__014G=((__CHARACTER )(( 0)));
+        result__P15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__P15G=((__CHARACTER )(( 0)));
         } else {
-          result__014G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__P15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__UFKF=(result__014G == '\\');
+        __tmp__WQKF=(result__P15G == '\\');
       };
-      if (__tmp__UFKF) {
-        __tmp__VFKF=TRUE__;
+      if (__tmp__WQKF) {
+        __tmp__XQKF=TRUE__;
       } else {
-        result__514G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__514G=((__CHARACTER )(( 0)));
+        result__U15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__U15G=((__CHARACTER )(( 0)));
         } else {
-          result__514G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__U15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__VFKF=(result__514G == '?');
+        __tmp__XQKF=(result__U15G == '?');
       };
-      if (__tmp__VFKF) {
-        __tmp__WFKF=TRUE__;
+      if (__tmp__XQKF) {
+        __tmp__YQKF=TRUE__;
       } else {
-        result__E24G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__E24G=((__CHARACTER )(( 0)));
+        result__Z15G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__Z15G=((__CHARACTER )(( 0)));
         } else {
-          result__E24G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__Z15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__WFKF=(result__E24G == '\'');
+        __tmp__YQKF=(result__Z15G == '\'');
       };
-      if (__tmp__WFKF) {
-        __tmp__XFKF=TRUE__;
+      if (__tmp__YQKF) {
+        __tmp__ZQKF=TRUE__;
       } else {
-        result__J24G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__J24G=((__CHARACTER )(( 0)));
+        result__415G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__415G=((__CHARACTER )(( 0)));
         } else {
-          result__J24G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__415G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__XFKF=(result__J24G == '\"');
+        __tmp__ZQKF=(result__415G == '\"');
       };
-      if (__tmp__XFKF) {
-        result__O24G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__O24G=((__CHARACTER )(( 0)));
+      if (__tmp__ZQKF) {
+        result__D25G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__D25G=((__CHARACTER )(( 0)));
         } else {
-          result__O24G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__D25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__O24G);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        __tmp__CGKF=TRUE__;
+        add_last__BMT(string_tmp__VH,result__D25G);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        __tmp__ERKF=TRUE__;
       } else {
-        __tmp__CGKF=FALSE__;
+        __tmp__ERKF=FALSE__;
       };
-      if ((! __tmp__CGKF)) {
-        result__X24G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__X24G=((__CHARACTER )(( 0)));
+      if ((! __tmp__ERKF)) {
+        result__I25G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__I25G=((__CHARACTER )(( 0)));
         } else {
-          result__X24G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__I25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if (((((__INTEGER_8 )result__X24G) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__X24G) <= ((__INTEGER_8 )'9')))) {
-          result__224G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__224G=((__CHARACTER )(( 0)));
+        if (((((__INTEGER_8 )result__I25G) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__I25G) <= ((__INTEGER_8 )'9')))) {
+          result__N25G='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__N25G=((__CHARACTER )(( 0)));
           } else {
-            result__224G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__N25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((((result__224G == '0') && (position__SBC < ((__STRING *)source__PBC)->count__WFC)) && (! is_hexadecimal_digit__CSJE(((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)((__INTEGER)(position__SBC +  1) -  1)])))) {
-            result__E34G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__E34G=((__CHARACTER )(( 0)));
+          if ((((result__N25G == '0') && (position__0BC < ((__STRING *)source__XBC)->count__4FC)) && (! is_hexadecimal_digit__0NJE(((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)((__INTEGER)(position__0BC +  1) -  1)])))) {
+            result__V25G='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__V25G=((__CHARACTER )(( 0)));
             } else {
-              result__E34G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-            };
-            add_last__ZLT(string_tmp__VH,result__E34G);
-            position__SBC=(__INTEGER)(position__SBC +  1);
-          } else {
-            copy__ZCS(string_tmp2__BAJ,string_tmp__VH);
-            read_integer__A2P();
-            copy__ZCS(string_tmp__VH,string_tmp2__BAJ);
-            if ((last_integer__ZRO >  255)) {
-              pos__LFXG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_301));
-              put_position__UOG(pos__LFXG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+              result__V25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            };
+            add_last__BMT(string_tmp__VH,result__V25G);
+            position__0BC=(__INTEGER)(position__0BC +  1);
+          } else {
+            copy__BDS(string_tmp2__JAJ,string_tmp__VH);
+            read_integer__I2P();
+            copy__BDS(string_tmp__VH,string_tmp2__JAJ);
+            if ((last_integer__BSO >  255)) {
+              pos__0CYG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_300));
+              put_position__2OG(pos__0CYG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            val__ZAKF=((__INTEGER )last_integer__ZRO);
-            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__ZAKF >>  6)) + ((__INTEGER_8 )'0'))))));
-            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__ZAKF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
-            add_last__ZLT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__ZAKF &  7)) + ((__INTEGER_8 )'0'))))));
-            result__J34G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__J34G=((__CHARACTER )(( 0)));
+            val__1LKF=((__INTEGER )last_integer__BSO);
+            add_last__BMT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__1LKF >>  6)) + ((__INTEGER_8 )'0'))))));
+            add_last__BMT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__1LKF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
+            add_last__BMT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__1LKF &  7)) + ((__INTEGER_8 )'0'))))));
+            result__025G='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__025G=((__CHARACTER )(( 0)));
             } else {
-              result__J34G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__025G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__J34G == '\\')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
+            if ((result__025G == '\\')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
             } else {
-              pos__YFXG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_302));
-              put_position__UOG(pos__YFXG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+              pos__HDYG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_301));
+              put_position__2OG(pos__HDYG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          pos__0FXG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_300));
-          put_position__UOG(pos__0FXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          pos__JDYG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_299));
+          put_position__2OG(pos__JDYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
@@ -26855,10044 +27079,10056 @@ static void read_escape_character__WAKF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__SZJ()
+static __BOOLEAN read_cap_identifier__0ZJ()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__VZJ,idx__WZJ;
-  __POSITION pos__NHXG;
-  __BOOLEAN result__XZJ,__tmp__F0J,result__L44G,__tmp__Z1J,result__I54G;
-  __BOOLEAN result__TZCH,__tmp__V1J,__tmp__W1J,result__4ZCH,__tmp__J2J;
-  __CHARACTER result__Q44G,result__044G,result__544G,result__N54G;
-  __CHARACTER result__S54G,result__X54G,result__254G;
-  posold__VZJ= 0;
-  idx__WZJ= 0;
-  result__XZJ=FALSE__;
-  if ((! read_space__3RD())) {
-    __tmp__F0J=TRUE__;
+  __INTEGER posold__3ZJ,idx__4ZJ;
+  __POSITION pos__2EYG;
+  __BOOLEAN result__5ZJ,__tmp__N0J,result__DZDH,__tmp__B2J,result__SZDH;
+  __BOOLEAN result__ZZDH,__tmp__31J,__tmp__41J,result__F0DH,__tmp__R2J;
+  __CHARACTER result__235G,result__G45G,result__L45G,result__U45G;
+  __CHARACTER result__Z45G,result__445G,result__D55G;
+  posold__3ZJ= 0;
+  idx__4ZJ= 0;
+  result__5ZJ=FALSE__;
+  if ((! read_space__FSD())) {
+    __tmp__N0J=TRUE__;
   } else {
-    result__Q44G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__Q44G=((__CHARACTER )(( 0)));
+    result__235G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__235G=((__CHARACTER )(( 0)));
     } else {
-      result__Q44G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__235G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    result__L44G=FALSE__;
-    if ((((__INTEGER_8 )result__Q44G) >= ((__INTEGER_8 )'A'))) {
-      result__L44G=(((__INTEGER_8 )result__Q44G) <= ((__INTEGER_8 )'Z'));
+    result__DZDH=FALSE__;
+    if ((((__INTEGER_8 )result__235G) >= ((__INTEGER_8 )'A'))) {
+      result__DZDH=(((__INTEGER_8 )result__235G) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__F0J=(! result__L44G);
+    __tmp__N0J=(! result__DZDH);
   };
-  if (__tmp__F0J) {
-    result__XZJ=FALSE__;
+  if (__tmp__N0J) {
+    result__5ZJ=FALSE__;
   } else {
-    posold__VZJ=position__SBC;
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    result__044G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__044G=((__CHARACTER )(( 0)));
-    } else {
-      result__044G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-    };
-    add_last__ZLT(string_tmp__VH,result__044G);
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    is_parameter_type__IKE=TRUE__;
-    until_do__1HZE:
+    posold__3ZJ=position__0BC;
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    result__G45G='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__G45G=((__CHARACTER )(( 0)));
+    } else {
+      result__G45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    };
+    add_last__BMT(string_tmp__VH,result__G45G);
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    is_parameter_type__QKE=TRUE__;
+    until_do__4HZE:
     {
-      result__544G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__544G=((__CHARACTER )(( 0)));
+      result__L45G='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__L45G=((__CHARACTER )(( 0)));
       } else {
-        result__544G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__L45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__544G == ((__CHARACTER )(( 0))))) {
-        __tmp__Z1J=TRUE__;
+      if ((result__L45G == ((__CHARACTER )(( 0))))) {
+        __tmp__B2J=TRUE__;
       } else {
-        result__N54G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__N54G=((__CHARACTER )(( 0)));
+        result__U45G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__U45G=((__CHARACTER )(( 0)));
         } else {
-          result__N54G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__U45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        result__I54G=FALSE__;
-        if ((((__INTEGER_8 )result__N54G) >= ((__INTEGER_8 )'A'))) {
-          result__I54G=(((__INTEGER_8 )result__N54G) <= ((__INTEGER_8 )'Z'));
+        result__SZDH=FALSE__;
+        if ((((__INTEGER_8 )result__U45G) >= ((__INTEGER_8 )'A'))) {
+          result__SZDH=(((__INTEGER_8 )result__U45G) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__I54G)) {
-          result__S54G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__S54G=((__CHARACTER )(( 0)));
+        if ((! result__SZDH)) {
+          result__Z45G='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__Z45G=((__CHARACTER )(( 0)));
           } else {
-            result__S54G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__Z45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          result__TZCH=FALSE__;
-          if ((((__INTEGER_8 )result__S54G) >= ((__INTEGER_8 )'0'))) {
-            result__TZCH=(((__INTEGER_8 )result__S54G) <= ((__INTEGER_8 )'9'));
+          result__ZZDH=FALSE__;
+          if ((((__INTEGER_8 )result__Z45G) >= ((__INTEGER_8 )'0'))) {
+            result__ZZDH=(((__INTEGER_8 )result__Z45G) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__V1J=(! result__TZCH);
+          __tmp__31J=(! result__ZZDH);
         } else {
-          __tmp__V1J=FALSE__;
+          __tmp__31J=FALSE__;
         };
-        if (__tmp__V1J) {
-          result__X54G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__X54G=((__CHARACTER )(( 0)));
+        if (__tmp__31J) {
+          result__445G='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__445G=((__CHARACTER )(( 0)));
           } else {
-            result__X54G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__445G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__W1J=(result__X54G != '_');
+          __tmp__41J=(result__445G != '_');
         } else {
-          __tmp__W1J=FALSE__;
+          __tmp__41J=FALSE__;
         };
-        __tmp__Z1J=__tmp__W1J;
+        __tmp__B2J=__tmp__41J;
       };
-      if ((! __tmp__Z1J)) {
-        result__254G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__254G=((__CHARACTER )(( 0)));
+      if ((! __tmp__B2J)) {
+        result__D55G='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__D55G=((__CHARACTER )(( 0)));
         } else {
-          result__254G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__D55G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if (is_parameter_type__IKE) {
-          result__4ZCH=FALSE__;
-          if ((((__INTEGER_8 )result__254G) >= ((__INTEGER_8 )'0'))) {
-            result__4ZCH=(((__INTEGER_8 )result__254G) <= ((__INTEGER_8 )'9'));
+        if (is_parameter_type__QKE) {
+          result__F0DH=FALSE__;
+          if ((((__INTEGER_8 )result__D55G) >= ((__INTEGER_8 )'0'))) {
+            result__F0DH=(((__INTEGER_8 )result__D55G) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__J2J=result__4ZCH;
+          __tmp__R2J=result__F0DH;
         } else {
-          __tmp__J2J=FALSE__;
+          __tmp__R2J=FALSE__;
         };
-        is_parameter_type__IKE=__tmp__J2J;
-        add_last__ZLT(string_tmp__VH,result__254G);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto until_do__1HZE;
+        is_parameter_type__QKE=__tmp__R2J;
+        add_last__BMT(string_tmp__VH,result__D55G);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto until_do__4HZE;
       };
     };
-    idx__WZJ=first_substring_index__JIZE(string_tmp__VH);
-    if ((idx__WZJ !=  0)) {
-      position__SBC=(__INTEGER)(posold__VZJ + idx__WZJ);
-      pos__NHXG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_207));
-      put_position__UOG(pos__NHXG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    idx__4ZJ=first_substring_index__MIZE(string_tmp__VH);
+    if ((idx__4ZJ !=  0)) {
+      position__0BC=(__INTEGER)(posold__3ZJ + idx__4ZJ);
+      pos__2EYG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_205));
+      put_position__2OG(pos__2EYG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__I0C=get__IWB(string_tmp__VH);
-    result__XZJ=TRUE__;
+    last_string__Q0C=get__QWB(string_tmp__VH);
+    result__5ZJ=TRUE__;
   };
-  return(result__XZJ);
+  return(result__5ZJ);
 }
 
-static void add_last__SBBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__TBBC,void *element__UBBC)
+static void add_last__0BBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__1BBC,void *element__2BBC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__VBBC,__tmp__4CBC,__tmp__I0SD,Self__SQXE;
-  __BOOLEAN __tmp__FCBC;
-  void **__tmp__3CBC,**new__UZSD;
-  new_capacity__VBBC= 0;
-  if (((__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1) <= (__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC -  1))) {
-    Self__TBBC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1);
-    __tmp__FCBC=TRUE__;
+  __INTEGER new_capacity__3BBC,__tmp__GDBC,__tmp__Q0SD,Self__VQXE;
+  __BOOLEAN __tmp__NCBC;
+  void **__tmp__FDBC,**new__2ZSD;
+  new_capacity__3BBC= 0;
+  if (((__INTEGER)(Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC +  1) <= (__INTEGER)(Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC -  1))) {
+    Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC=(__INTEGER)(Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC +  1);
+    __tmp__NCBC=TRUE__;
   } else {
-    __tmp__FCBC=FALSE__;
-  };
-  if ((! __tmp__FCBC)) {
-    if ((Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC ==  0)) {
-      Self__TBBC->parent_arrayed_collection__TME.storage__UCBC=create__VY1C( 2);
-      Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC= 2;
-      Self__TBBC->parent_arrayed_collection__TME.upper__WBBC= 0;
-    } else {
-      new_capacity__VBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC <<  1);
-      __tmp__3CBC=Self__TBBC->parent_arrayed_collection__TME.storage__UCBC;
-      __tmp__4CBC=Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC;
-      new__UZSD=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__3CBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__4CBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VBBC * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__I0SD=(__INTEGER)(new_capacity__VBBC -  1);
-      Self__SQXE=__tmp__4CBC;
-      while ((Self__SQXE <= __tmp__I0SD)) {
-        new__UZSD[Self__SQXE]=NULL;
-        Self__SQXE=(__INTEGER)(Self__SQXE +  1);
-      };
-      Self__TBBC->parent_arrayed_collection__TME.storage__UCBC=new__UZSD;
-      Self__TBBC->parent_arrayed_collection__TME.capacity__YBBC=new_capacity__VBBC;
-      Self__TBBC->parent_arrayed_collection__TME.upper__WBBC=(__INTEGER)(Self__TBBC->parent_arrayed_collection__TME.upper__WBBC +  1);
-    };
-  };
-  ((void **)Self__TBBC->parent_arrayed_collection__TME.storage__UCBC)[Self__TBBC->parent_arrayed_collection__TME.upper__WBBC]=element__UBBC;
+    __tmp__NCBC=FALSE__;
+  };
+  if ((! __tmp__NCBC)) {
+    if ((Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC ==  0)) {
+      Self__1BBC->parent_arrayed_collection__1ME.storage__2CBC=create__3Y1C( 2);
+      Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC= 2;
+      Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC= 0;
+    } else {
+      new_capacity__3BBC=(__INTEGER)(Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC <<  1);
+      __tmp__FDBC=Self__1BBC->parent_arrayed_collection__1ME.storage__2CBC;
+      __tmp__GDBC=Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC;
+      new__2ZSD=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__FDBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__GDBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3BBC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__Q0SD=(__INTEGER)(new_capacity__3BBC -  1);
+      Self__VQXE=__tmp__GDBC;
+      while ((Self__VQXE <= __tmp__Q0SD)) {
+        new__2ZSD[Self__VQXE]=NULL;
+        Self__VQXE=(__INTEGER)(Self__VQXE +  1);
+      };
+      Self__1BBC->parent_arrayed_collection__1ME.storage__2CBC=new__2ZSD;
+      Self__1BBC->parent_arrayed_collection__1ME.capacity__ACBC=new_capacity__3BBC;
+      Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC=(__INTEGER)(Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC +  1);
+    };
+  };
+  ((void **)Self__1BBC->parent_arrayed_collection__1ME.storage__2CBC)[Self__1BBC->parent_arrayed_collection__1ME.upper__4BBC]=element__2BBC;
 }
 
-static __BOOLEAN read_external__ATO()
+static __BOOLEAN read_external__ITO()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER pos_old__ETO;
-  __BOOLEAN result__DTO,__tmp__PTO;
-  __CHARACTER result__RB5G,result__1B5G,result__EC5G,result__JC5G;
-  __CHARACTER result__OC5G,result__TC5G,result__YC5G,result__BD5G;
-  result__DTO=FALSE__;
-  pos_old__ETO= 0;
-  if ((! read_space__3RD())) {
-    __tmp__PTO=TRUE__;
+  __INTEGER pos_old__MTO;
+  __BOOLEAN result__LTO,__tmp__XTO;
+  __CHARACTER result__YAAH,result__CBAH,result__LBAH,result__QBAH;
+  __CHARACTER result__VBAH,result__0BAH,result__5BAH,result__ICAH;
+  result__LTO=FALSE__;
+  pos_old__MTO= 0;
+  if ((! read_space__FSD())) {
+    __tmp__XTO=TRUE__;
   } else {
-    result__RB5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__RB5G=((__CHARACTER )(( 0)));
+    result__YAAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__YAAH=((__CHARACTER )(( 0)));
     } else {
-      result__RB5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__YAAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    __tmp__PTO=(result__RB5G != '`');
+    __tmp__XTO=(result__YAAH != '`');
   };
-  if (__tmp__PTO) {
-    result__DTO=FALSE__;
+  if (__tmp__XTO) {
+    result__LTO=FALSE__;
   } else {
-    pos_old__ETO=position__SBC;
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    until_do__0HRC:
+    pos_old__MTO=position__0BC;
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    until_do__CIRC:
     {
-      result__1B5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__1B5G=((__CHARACTER )(( 0)));
+      result__CBAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__CBAH=((__CHARACTER )(( 0)));
       } else {
-        result__1B5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__CBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      result__EC5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__EC5G=((__CHARACTER )(( 0)));
+      result__LBAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__LBAH=((__CHARACTER )(( 0)));
       } else {
-        result__EC5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__LBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((! ((result__1B5G == ((__CHARACTER )(( 0)))) | (result__EC5G == '`')))) {
-        result__JC5G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__JC5G=((__CHARACTER )(( 0)));
+      if ((! ((result__CBAH == ((__CHARACTER )(( 0)))) | (result__LBAH == '`')))) {
+        result__QBAH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__QBAH=((__CHARACTER )(( 0)));
         } else {
-          result__JC5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__QBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__JC5G);
-        result__OC5G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__OC5G=((__CHARACTER )(( 0)));
+        add_last__BMT(string_tmp__VH,result__QBAH);
+        result__VBAH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__VBAH=((__CHARACTER )(( 0)));
         } else {
-          result__OC5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__VBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__OC5G == '\\')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__TC5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__TC5G=((__CHARACTER )(( 0)));
+        if ((result__VBAH == '\\')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__0BAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__0BAH=((__CHARACTER )(( 0)));
           } else {
-            result__TC5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__0BAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__TC5G);
-          result__YC5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__YC5G=((__CHARACTER )(( 0)));
+          add_last__BMT(string_tmp__VH,result__0BAH);
+          result__5BAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__5BAH=((__CHARACTER )(( 0)));
           } else {
-            result__YC5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__5BAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__YC5G != ((__CHARACTER )(( 0))))) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
+          if ((result__5BAH != ((__CHARACTER )(( 0))))) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
           };
         } else {
-          position__SBC=(__INTEGER)(position__SBC +  1);
+          position__0BC=(__INTEGER)(position__0BC +  1);
         };
-        goto until_do__0HRC;
+        goto until_do__CIRC;
       };
     };
-    result__BD5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__BD5G=((__CHARACTER )(( 0)));
+    result__ICAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__ICAH=((__CHARACTER )(( 0)));
     } else {
-      result__BD5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__ICAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__BD5G != ((__CHARACTER )(( 0))))) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      last_string__I0C=get__IWB(string_tmp__VH);
-      result__DTO=TRUE__;
-      short__token__to__LBD((&__string_65),pos_old__ETO,position__SBC);
+    if ((result__ICAH != ((__CHARACTER )(( 0))))) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      last_string__Q0C=get__QWB(string_tmp__VH);
+      result__LTO=TRUE__;
+      short__token__to__TBD((&__string_65),pos_old__MTO,position__0BC);
     } else {
-      result__DTO=FALSE__;
+      result__LTO=FALSE__;
     };
   };
-  return(result__DTO);
+  return(result__LTO);
 }
 
-static void* read_expr_primary__I4M(__PARSER *Self__J4M)
+static void* read_expr_primary__Q4M(__PARSER *Self__R4M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__L4M;
-  void *type__M4M;
-  void *group_sav__R4M,*lst__JKHB;
-  __POSITION p__5CIH,pos__XJXG,p__3LAB,p__KRGH,p__LEIH,pos__ZJXG,p__Z0H;
-  __POSITION pos__1JXG,pos__DKXG,__tmp__VFN,__tmp__3FN,pos__RKXG;
-  __POSITION pos__TKXG,pos__VKXG,pos__XKXG;
-  __ITM_READ *result__XCIH,*result__YYGB;
-  __POINTER ptr__YCIH,ptr_table__BDIH,next__ADIH,result__CDIH;
-  __POINTER ptr_table__GDIH,next__FDIH,result__HDIH,ptr__ZYGB;
-  __POINTER ptr_table__NDIH,next__MDIH,result__ODIH,ptr_table__SDIH;
-  __POINTER next__RDIH,result__TDIH,ptr__DRGH,ptr_table__XDIH;
-  __POINTER next__WDIH,result__YDIH,ptr_table__2DIH,next__1DIH;
-  __POINTER result__3DIH,ptr__EEIH,ptr_table__NEIH,next__MEIH;
-  __POINTER result__OEIH,ptr_table__SEIH,next__REIH,result__TEIH;
-  __POINTER ptr__XPI,ptr_table__3EIH,next__2EIH,result__4EIH;
-  __POINTER ptr_table__CFIH,next__BFIH,result__DFIH,ptr__BIMB;
-  __POINTER ptr_table__KFIH,next__JFIH,result__LFIH,ptr_table__PFIH;
-  __POINTER next__OFIH,result__QFIH,ptr__0VTB,ptr_table__0FIH;
-  __POINTER next__ZFIH,result__1FIH,ptr_table__5FIH,next__4FIH;
-  __POINTER result__AGIH,ptr__OXTB,ptr_table__HGIH,next__GGIH;
-  __POINTER result__IGIH,ptr_table__MGIH,next__LGIH,result__NGIH;
-  __INTEGER typ_id__ZCIH,typ_id__4YGB,typ_id__ERGH,typ_id__FEIH;
-  __INTEGER typ_id__2PI,typ_id__GIMB,typ_id__5VTB,typ_id__TXTB;
-  __UINTEGER_32 sz__0CIH,a__1CIH,new_size__2CIH,t__3CIH,a__4CIH;
-  __UINTEGER_32 new_size__JDIH,lab_type__IDIH,sz__1YGB,a__3DFH;
-  __UINTEGER_32 new_size__4DFH,t__CEFH,a__BEFH,new_size__VDIH;
-  __UINTEGER_32 lab_type__UDIH,sz__FRGH,a__GRGH,new_size__HRGH,t__IRGH;
-  __UINTEGER_32 a__JRGH,new_size__5DIH,lab_type__4DIH,sz__GEIH,a__HEIH;
-  __UINTEGER_32 new_size__IEIH,t__JEIH,a__KEIH,new_size__VEIH;
-  __UINTEGER_32 lab_type__UEIH,sz__ZPI,a__FCFH,new_size__GCFH,t__KCFH;
-  __UINTEGER_32 a__JCFH,new_size__FFIH,lab_type__EFIH,sz__DIMB,a__51EH;
-  __UINTEGER_32 new_size__A2EH,t__E2EH,a__D2EH,new_size__SFIH;
-  __UINTEGER_32 lab_type__RFIH,sz__2VTB,a__H2EH,new_size__I2EH,t__M2EH;
-  __UINTEGER_32 a__L2EH,new_size__CGIH,lab_type__BGIH,sz__QXTB,a__P2EH;
-  __UINTEGER_32 new_size__Q2EH,t__U2EH,a__T2EH,new_size__PGIH;
-  __UINTEGER_32 lab_type__OGIH;
-  __ITM_PROTOTYPE *result__CRGH;
-  __ITM_LIST *result__DEIH,*result__WPI;
-  __ITM_BLOCK *result__AIMB;
-  __ITM_EXTERNAL *result__ZVTB;
-  __ITM_EXTERNAL_TYPE *result__NXTB,*Self__5ZEC;
-  __BOOLEAN result__WCIH,__tmp__B5M,__tmp__EBN,result__LDIH;
-  __BOOLEAN result__J1CH,__tmp__TBN,result__B0N,__tmp__BCN,__tmp__4CN;
-  __BOOLEAN result__AEIH,result__WEIH,__tmp__BFN,result__ZEIH;
-  __BOOLEAN result__GFIH,result__TFIH,result__WFIH,result__DGIH;
-  __BOOLEAN result__QGIH,result__TGIH,result__WGIH,__tmp__XHN;
-  __CHARACTER result__KD5G,result__PD5G,result__UD5G,result__BEIH;
-  __CHARACTER result__XEIH,result__0EIH,result__HFIH,result__UFIH;
-  __CHARACTER result__XFIH,result__EGIH,result__RGIH,result__UGIH;
-  __CHARACTER result__XGIH;
-  result__L4M=NULL;
-  type__M4M=NULL;
-  group_sav__R4M=NULL;
-  result__WCIH=read_word__QPF((&__string_58));
-  if (is_shorter__5Y) {
-    if (result__WCIH) {
+  void *result__T4M;
+  void *type__U4M;
+  void *group_sav__Z4M,*lst__RKHB;
+  __POSITION p__5EJH,pos__GHYG,p__FMAB,p__FTHH,p__LGJH,pos__IHYG,p__B1H;
+  __POSITION pos__KHYG,pos__SHYG,__tmp__3FN,__tmp__FGN,pos__AIYG;
+  __POSITION pos__CIYG,pos__EIYG,pos__GIYG;
+  __ITM_READ *result__XEJH,*result__AZGB;
+  __POINTER ptr__YEJH,ptr_table__BFJH,next__AFJH,result__CFJH;
+  __POINTER ptr_table__GFJH,next__FFJH,result__HFJH,ptr__BZGB;
+  __POINTER ptr_table__NFJH,next__MFJH,result__OFJH,ptr_table__SFJH;
+  __POINTER next__RFJH,result__TFJH,ptr__4SHH,ptr_table__XFJH;
+  __POINTER next__WFJH,result__YFJH,ptr_table__2FJH,next__1FJH;
+  __POINTER result__3FJH,ptr__EGJH,ptr_table__NGJH,next__MGJH;
+  __POINTER result__OGJH,ptr_table__SGJH,next__RGJH,result__TGJH;
+  __POINTER ptr__5PI,ptr_table__3GJH,next__2GJH,result__4GJH;
+  __POINTER ptr_table__CHJH,next__BHJH,result__DHJH,ptr__JIMB;
+  __POINTER ptr_table__KHJH,next__JHJH,result__LHJH,ptr_table__PHJH;
+  __POINTER next__OHJH,result__QHJH,ptr__CWTB,ptr_table__0HJH;
+  __POINTER next__ZHJH,result__1HJH,ptr_table__5HJH,next__4HJH;
+  __POINTER result__AIJH,ptr__WXTB,ptr_table__HIJH,next__GIJH;
+  __POINTER result__IIJH,ptr_table__MIJH,next__LIJH,result__NIJH;
+  __INTEGER typ_id__ZEJH,typ_id__GZGB,typ_id__5SHH,typ_id__FGJH;
+  __INTEGER typ_id__EQI,typ_id__OIMB,typ_id__HWTB,typ_id__1XTB;
+  __UINTEGER_32 sz__0EJH,a__1EJH,new_size__2EJH,t__3EJH,a__4EJH;
+  __UINTEGER_32 new_size__JFJH,lab_type__IFJH,sz__DZGB,a__NFGH;
+  __UINTEGER_32 new_size__OFGH,t__SFGH,a__RFGH,new_size__VFJH;
+  __UINTEGER_32 lab_type__UFJH,sz__ATHH,a__BTHH,new_size__CTHH,t__DTHH;
+  __UINTEGER_32 a__ETHH,new_size__5FJH,lab_type__4FJH,sz__GGJH,a__HGJH;
+  __UINTEGER_32 new_size__IGJH,t__JGJH,a__KGJH,new_size__VGJH;
+  __UINTEGER_32 lab_type__UGJH,sz__BQI,a__VDGH,new_size__WDGH,t__0DGH;
+  __UINTEGER_32 a__ZDGH,new_size__FHJH,lab_type__EHJH,sz__LIMB,a__P3FH;
+  __UINTEGER_32 new_size__Q3FH,t__U3FH,a__T3FH,new_size__SHJH;
+  __UINTEGER_32 lab_type__RHJH,sz__EWTB,a__X3FH,new_size__Y3FH,t__23FH;
+  __UINTEGER_32 a__13FH,new_size__CIJH,lab_type__BIJH,sz__YXTB,a__53FH;
+  __UINTEGER_32 new_size__A4FH,t__E4FH,a__D4FH,new_size__PIJH;
+  __UINTEGER_32 lab_type__OIJH;
+  __ITM_PROTOTYPE *result__3SHH;
+  __ITM_LIST *result__DGJH,*result__4PI;
+  __ITM_BLOCK *result__IIMB;
+  __ITM_EXTERNAL *result__BWTB;
+  __ITM_EXTERNAL_TYPE *result__VXTB,*Self__H0EC;
+  __BOOLEAN result__WEJH,__tmp__J5M,__tmp__MBN,result__LFJH;
+  __BOOLEAN result__R1DH,__tmp__1BN,result__J0N,__tmp__JCN,__tmp__GDN;
+  __BOOLEAN result__AGJH,result__WGJH,__tmp__JFN,result__ZGJH;
+  __BOOLEAN result__GHJH,result__THJH,result__WHJH,result__DIJH;
+  __BOOLEAN result__QIJH,result__TIJH,result__WIJH,__tmp__5HN;
+  __CHARACTER result__RCAH,result__WCAH,result__1CAH,result__BGJH;
+  __CHARACTER result__XGJH,result__0GJH,result__HHJH,result__UHJH;
+  __CHARACTER result__XHJH,result__EIJH,result__RIJH,result__UIJH;
+  __CHARACTER result__XIJH;
+  result__T4M=NULL;
+  type__U4M=NULL;
+  group_sav__Z4M=NULL;
+  result__WEJH=read_word__YPF((&__string_58));
+  if (is_shorter__FZ) {
+    if (result__WEJH) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
-        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-      } else {
-        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-      };
-    };
-  };
-  if (result__WCIH) {
-    p__5CIH=current_position__JXF();
-    result__XCIH=NULL;
-    ptr__YCIH=((__POINTER )(NULL));
-    typ_id__ZCIH= 0;
-    sz__0CIH=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__0CIH ==  0)) {
-      result__XCIH=ITM_READ__;
-    } else {
-      typ_id__ZCIH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0CIH);
-      if ((typ_id__ZCIH == (__INTEGER)(-  1))) {
-        a__1CIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__2CIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CIH + a__1CIH) & (__UINTEGER_32)(~ a__1CIH));
-        ptr_table__BDIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2CIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ADIH=((__POINTER )(NULL));
-        result__CDIH=((__POINTER *)ptr_table__BDIH)[ 0];
-        if ((result__CDIH == (void *)NULL)) {
-          result__CDIH=new_lab__MRJ(new_size__2CIH);
-          next__ADIH=(void *)((unsigned long)result__CDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2CIH)));
-          ((__POINTER *)next__ADIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__BDIH)[ 0]=next__ADIH;
-        } else {
-          next__ADIH=((__POINTER *)result__CDIH)[ 0];
-          if ((next__ADIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2CIH <<  1)) <=  4096)) {
-              next__ADIH=(void *)((unsigned long)result__CDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2CIH)));
+        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+      } else {
+        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+      };
+    };
+  };
+  if (result__WEJH) {
+    p__5EJH=current_position__RXF();
+    result__XEJH=NULL;
+    ptr__YEJH=((__POINTER )(NULL));
+    typ_id__ZEJH= 0;
+    sz__0EJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__0EJH ==  0)) {
+      result__XEJH=ITM_READ__;
+    } else {
+      typ_id__ZEJH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__0EJH);
+      if ((typ_id__ZEJH == (__INTEGER)(-  1))) {
+        a__1EJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2EJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0EJH + a__1EJH) & (__UINTEGER_32)(~ a__1EJH));
+        ptr_table__BFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2EJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__AFJH=((__POINTER )(NULL));
+        result__CFJH=((__POINTER *)ptr_table__BFJH)[ 0];
+        if ((result__CFJH == (void *)NULL)) {
+          result__CFJH=new_lab__URJ(new_size__2EJH);
+          next__AFJH=(void *)((unsigned long)result__CFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EJH)));
+          ((__POINTER *)next__AFJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BFJH)[ 0]=next__AFJH;
+        } else {
+          next__AFJH=((__POINTER *)result__CFJH)[ 0];
+          if ((next__AFJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CFJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2EJH <<  1)) <=  4096)) {
+              next__AFJH=(void *)((unsigned long)result__CFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EJH)));
             } else {
-              next__ADIH=new_lab__MRJ(new_size__2CIH);
-            };
-            ((__POINTER *)next__ADIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BDIH)[ 0]=next__ADIH;
-          } else {
-            ((__POINTER *)result__CDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ADIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CDIH=next__ADIH;
-          };
-        };
-        ptr__YCIH=result__CDIH;
-      } else {
-        t__3CIH=((__UINTEGER_32 )typ_id__ZCIH);
-        a__4CIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__JDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CIH + a__4CIH) & (__UINTEGER_32)(~ a__4CIH));
-        ptr_table__GDIH=((__POINTER )(&(table_type[(t__3CIH)])));
-        lab_type__IDIH=(__UINTEGER_32)(t__3CIH |  1);
-        next__FDIH=((__POINTER )(NULL));
-        result__HDIH=((__POINTER *)ptr_table__GDIH)[ 0];
-        if ((result__HDIH == (void *)NULL)) {
-          result__HDIH=new_lab__MRJ(lab_type__IDIH);
-          next__FDIH=(void *)((unsigned long)result__HDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDIH)));
-          ((__POINTER *)next__FDIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GDIH)[ 0]=next__FDIH;
-        } else {
-          next__FDIH=((__POINTER *)result__HDIH)[ 0];
-          if ((next__FDIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__JDIH <<  1)) <=  4096)) {
-              next__FDIH=(void *)((unsigned long)result__HDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDIH)));
+              next__AFJH=new_lab__URJ(new_size__2EJH);
+            };
+            ((__POINTER *)next__AFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BFJH)[ 0]=next__AFJH;
+          } else {
+            ((__POINTER *)result__CFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CFJH=next__AFJH;
+          };
+        };
+        ptr__YEJH=result__CFJH;
+      } else {
+        t__3EJH=((__UINTEGER_32 )typ_id__ZEJH);
+        a__4EJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0EJH + a__4EJH) & (__UINTEGER_32)(~ a__4EJH));
+        ptr_table__GFJH=((__POINTER )(&(table_type[(t__3EJH)])));
+        lab_type__IFJH=(__UINTEGER_32)(t__3EJH |  1);
+        next__FFJH=((__POINTER )(NULL));
+        result__HFJH=((__POINTER *)ptr_table__GFJH)[ 0];
+        if ((result__HFJH == (void *)NULL)) {
+          result__HFJH=new_lab__URJ(lab_type__IFJH);
+          next__FFJH=(void *)((unsigned long)result__HFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFJH)));
+          ((__POINTER *)next__FFJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GFJH)[ 0]=next__FFJH;
+        } else {
+          next__FFJH=((__POINTER *)result__HFJH)[ 0];
+          if ((next__FFJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HFJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__JFJH <<  1)) <=  4096)) {
+              next__FFJH=(void *)((unsigned long)result__HFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFJH)));
             } else {
-              next__FDIH=new_lab__MRJ(lab_type__IDIH);
+              next__FFJH=new_lab__URJ(lab_type__IFJH);
             };
-            ((__POINTER *)next__FDIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GDIH)[ 0]=next__FDIH;
+            ((__POINTER *)next__FFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GFJH)[ 0]=next__FFJH;
           } else {
-            ((__POINTER *)result__HDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__HDIH=next__FDIH;
+            ((__POINTER *)result__HFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HFJH=next__FFJH;
           };
         };
-        ptr__YCIH=result__HDIH;
+        ptr__YEJH=result__HFJH;
       };
-      result__XCIH=((__ITM_READ *)ptr__YCIH);
-      *(result__XCIH) = *(ITM_READ__);
+      result__XEJH=((__ITM_READ *)ptr__YEJH);
+      *(result__XEJH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__XCIH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__5CIH;
-    result__L4M=result__XCIH;
-    __tmp__B5M=TRUE__;
+    ((__ITM_READ *)result__XEJH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__5EJH;
+    result__T4M=result__XEJH;
+    __tmp__J5M=TRUE__;
   } else {
-    __tmp__B5M=FALSE__;
+    __tmp__J5M=FALSE__;
   };
-  if (__tmp__B5M) {
-    __tmp__EBN=TRUE__;
+  if (__tmp__J5M) {
+    __tmp__MBN=TRUE__;
   } else {
-    result__LDIH=read_word__QPF((&__string_11));
-    if (is_shorter__5Y) {
-      if (result__LDIH) {
+    result__LFJH=read_word__YPF((&__string_11));
+    if (is_shorter__FZ) {
+      if (result__LFJH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
-          short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         } else {
-          short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
         };
       };
     };
-    if (result__LDIH) {
-      result__KD5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__KD5G=((__CHARACTER )(( 0)));
+    if (result__LFJH) {
+      result__RCAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__RCAH=((__CHARACTER )(( 0)));
       } else {
-        result__KD5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__RCAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__KD5G == '_')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        copy__ZCS(string_tmp__VH,(&__string_11));
-        add_last__ZLT(string_tmp__VH,'_');
-        while_do__EWQB:
+      if ((result__RCAH == '_')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        copy__BDS(string_tmp__VH,(&__string_11));
+        add_last__BMT(string_tmp__VH,'_');
+        while_do__MWQB:
         {
-          result__PD5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__PD5G=((__CHARACTER )(( 0)));
+          result__WCAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__WCAH=((__CHARACTER )(( 0)));
           } else {
-            result__PD5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__WCAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          result__J1CH=FALSE__;
-          if ((((__INTEGER_8 )result__PD5G) >= ((__INTEGER_8 )'0'))) {
-            result__J1CH=(((__INTEGER_8 )result__PD5G) <= ((__INTEGER_8 )'9'));
+          result__R1DH=FALSE__;
+          if ((((__INTEGER_8 )result__WCAH) >= ((__INTEGER_8 )'0'))) {
+            result__R1DH=(((__INTEGER_8 )result__WCAH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__J1CH) {
-            result__UD5G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__UD5G=((__CHARACTER )(( 0)));
+          if (result__R1DH) {
+            result__1CAH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__1CAH=((__CHARACTER )(( 0)));
             } else {
-              result__UD5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__1CAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            add_last__ZLT(string_tmp__VH,result__UD5G);
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            goto while_do__EWQB;
+            add_last__BMT(string_tmp__VH,result__1CAH);
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            goto while_do__MWQB;
           };
         };
-        if ((((__STRING *)string_tmp__VH)->count__WFC ==  0)) {
-          pos__XJXG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_303));
-          put_position__UOG(pos__XJXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((((__STRING *)string_tmp__VH)->count__4FC ==  0)) {
+          pos__GHYG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_302));
+          put_position__2OG(pos__GHYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        get__IWB(string_tmp__VH);
-      };
-      p__3LAB=current_position__JXF();
-      result__YYGB=NULL;
-      ptr__ZYGB=((__POINTER )(NULL));
-      typ_id__4YGB= 0;
-      sz__1YGB=((__UINTEGER_32 )sizeof(__ITM_READ));
-      if ((sz__1YGB ==  0)) {
-        result__YYGB=ITM_READ__;
-      } else {
-        typ_id__4YGB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1YGB);
-        if ((typ_id__4YGB == (__INTEGER)(-  1))) {
-          a__3DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__4DFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1YGB + a__3DFH) & (__UINTEGER_32)(~ a__3DFH));
-          ptr_table__NDIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4DFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__MDIH=((__POINTER )(NULL));
-          result__ODIH=((__POINTER *)ptr_table__NDIH)[ 0];
-          if ((result__ODIH == (void *)NULL)) {
-            result__ODIH=new_lab__MRJ(new_size__4DFH);
-            next__MDIH=(void *)((unsigned long)result__ODIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DFH)));
-            ((__POINTER *)next__MDIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NDIH)[ 0]=next__MDIH;
-          } else {
-            next__MDIH=((__POINTER *)result__ODIH)[ 0];
-            if ((next__MDIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ODIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4DFH <<  1)) <=  4096)) {
-                next__MDIH=(void *)((unsigned long)result__ODIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DFH)));
+        get__QWB(string_tmp__VH);
+      };
+      p__FMAB=current_position__RXF();
+      result__AZGB=NULL;
+      ptr__BZGB=((__POINTER )(NULL));
+      typ_id__GZGB= 0;
+      sz__DZGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__DZGB ==  0)) {
+        result__AZGB=ITM_READ__;
+      } else {
+        typ_id__GZGB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__DZGB);
+        if ((typ_id__GZGB == (__INTEGER)(-  1))) {
+          a__NFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DZGB + a__NFGH) & (__UINTEGER_32)(~ a__NFGH));
+          ptr_table__NFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__MFJH=((__POINTER )(NULL));
+          result__OFJH=((__POINTER *)ptr_table__NFJH)[ 0];
+          if ((result__OFJH == (void *)NULL)) {
+            result__OFJH=new_lab__URJ(new_size__OFGH);
+            next__MFJH=(void *)((unsigned long)result__OFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFGH)));
+            ((__POINTER *)next__MFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NFJH)[ 0]=next__MFJH;
+          } else {
+            next__MFJH=((__POINTER *)result__OFJH)[ 0];
+            if ((next__MFJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OFJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OFGH <<  1)) <=  4096)) {
+                next__MFJH=(void *)((unsigned long)result__OFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFGH)));
               } else {
-                next__MDIH=new_lab__MRJ(new_size__4DFH);
+                next__MFJH=new_lab__URJ(new_size__OFGH);
               };
-              ((__POINTER *)next__MDIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NDIH)[ 0]=next__MDIH;
+              ((__POINTER *)next__MFJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NFJH)[ 0]=next__MFJH;
             } else {
-              ((__POINTER *)result__ODIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ODIH=next__MDIH;
-            };
-          };
-          ptr__ZYGB=result__ODIH;
-        } else {
-          t__CEFH=((__UINTEGER_32 )typ_id__4YGB);
-          a__BEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1YGB + a__BEFH) & (__UINTEGER_32)(~ a__BEFH));
-          ptr_table__SDIH=((__POINTER )(&(table_type[(t__CEFH)])));
-          lab_type__UDIH=(__UINTEGER_32)(t__CEFH |  1);
-          next__RDIH=((__POINTER )(NULL));
-          result__TDIH=((__POINTER *)ptr_table__SDIH)[ 0];
-          if ((result__TDIH == (void *)NULL)) {
-            result__TDIH=new_lab__MRJ(lab_type__UDIH);
-            next__RDIH=(void *)((unsigned long)result__TDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDIH)));
-            ((__POINTER *)next__RDIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SDIH)[ 0]=next__RDIH;
-          } else {
-            next__RDIH=((__POINTER *)result__TDIH)[ 0];
-            if ((next__RDIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VDIH <<  1)) <=  4096)) {
-                next__RDIH=(void *)((unsigned long)result__TDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDIH)));
+              ((__POINTER *)result__OFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OFJH=next__MFJH;
+            };
+          };
+          ptr__BZGB=result__OFJH;
+        } else {
+          t__SFGH=((__UINTEGER_32 )typ_id__GZGB);
+          a__RFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DZGB + a__RFGH) & (__UINTEGER_32)(~ a__RFGH));
+          ptr_table__SFJH=((__POINTER )(&(table_type[(t__SFGH)])));
+          lab_type__UFJH=(__UINTEGER_32)(t__SFGH |  1);
+          next__RFJH=((__POINTER )(NULL));
+          result__TFJH=((__POINTER *)ptr_table__SFJH)[ 0];
+          if ((result__TFJH == (void *)NULL)) {
+            result__TFJH=new_lab__URJ(lab_type__UFJH);
+            next__RFJH=(void *)((unsigned long)result__TFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFJH)));
+            ((__POINTER *)next__RFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SFJH)[ 0]=next__RFJH;
+          } else {
+            next__RFJH=((__POINTER *)result__TFJH)[ 0];
+            if ((next__RFJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TFJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VFJH <<  1)) <=  4096)) {
+                next__RFJH=(void *)((unsigned long)result__TFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VFJH)));
               } else {
-                next__RDIH=new_lab__MRJ(lab_type__UDIH);
+                next__RFJH=new_lab__URJ(lab_type__UFJH);
               };
-              ((__POINTER *)next__RDIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SDIH)[ 0]=next__RDIH;
+              ((__POINTER *)next__RFJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SFJH)[ 0]=next__RFJH;
             } else {
-              ((__POINTER *)result__TDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TDIH=next__RDIH;
+              ((__POINTER *)result__TFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TFJH=next__RFJH;
             };
           };
-          ptr__ZYGB=result__TDIH;
+          ptr__BZGB=result__TFJH;
         };
-        result__YYGB=((__ITM_READ *)ptr__ZYGB);
-        *(result__YYGB) = *(ITM_READ__);
+        result__AZGB=((__ITM_READ *)ptr__BZGB);
+        *(result__AZGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__YYGB)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__3LAB;
-      result__L4M=result__YYGB;
+      ((__ITM_READ *)result__AZGB)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__FMAB;
+      result__T4M=result__AZGB;
     };
-    __tmp__EBN=result__LDIH;
+    __tmp__MBN=result__LFJH;
   };
-  if (__tmp__EBN) {
-    __tmp__TBN=TRUE__;
+  if (__tmp__MBN) {
+    __tmp__1BN=TRUE__;
   } else {
-    type__M4M=read_prototype__HON(Self__J4M,NULL);
-    result__B0N=((void *)type__M4M != (void *)NULL);
-    if (result__B0N) {
-      p__KRGH=current_position__JXF();
-      result__CRGH=NULL;
-      ptr__DRGH=((__POINTER )(NULL));
-      typ_id__ERGH= 0;
-      sz__FRGH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
-      if ((sz__FRGH ==  0)) {
-        result__CRGH=ITM_PROTOTYPE__;
-      } else {
-        typ_id__ERGH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FRGH);
-        if ((typ_id__ERGH == (__INTEGER)(-  1))) {
-          a__GRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__HRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FRGH + a__GRGH) & (__UINTEGER_32)(~ a__GRGH));
-          ptr_table__XDIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__WDIH=((__POINTER )(NULL));
-          result__YDIH=((__POINTER *)ptr_table__XDIH)[ 0];
-          if ((result__YDIH == (void *)NULL)) {
-            result__YDIH=new_lab__MRJ(new_size__HRGH);
-            next__WDIH=(void *)((unsigned long)result__YDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRGH)));
-            ((__POINTER *)next__WDIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XDIH)[ 0]=next__WDIH;
-          } else {
-            next__WDIH=((__POINTER *)result__YDIH)[ 0];
-            if ((next__WDIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YDIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HRGH <<  1)) <=  4096)) {
-                next__WDIH=(void *)((unsigned long)result__YDIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HRGH)));
+    type__U4M=read_prototype__PON(Self__R4M,NULL);
+    result__J0N=((void *)type__U4M != (void *)NULL);
+    if (result__J0N) {
+      p__FTHH=current_position__RXF();
+      result__3SHH=NULL;
+      ptr__4SHH=((__POINTER )(NULL));
+      typ_id__5SHH= 0;
+      sz__ATHH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__ATHH ==  0)) {
+        result__3SHH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__5SHH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__ATHH);
+        if ((typ_id__5SHH == (__INTEGER)(-  1))) {
+          a__BTHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CTHH=(__UINTEGER_32)((__UINTEGER_32)(sz__ATHH + a__BTHH) & (__UINTEGER_32)(~ a__BTHH));
+          ptr_table__XFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CTHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__WFJH=((__POINTER )(NULL));
+          result__YFJH=((__POINTER *)ptr_table__XFJH)[ 0];
+          if ((result__YFJH == (void *)NULL)) {
+            result__YFJH=new_lab__URJ(new_size__CTHH);
+            next__WFJH=(void *)((unsigned long)result__YFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTHH)));
+            ((__POINTER *)next__WFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XFJH)[ 0]=next__WFJH;
+          } else {
+            next__WFJH=((__POINTER *)result__YFJH)[ 0];
+            if ((next__WFJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YFJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CTHH <<  1)) <=  4096)) {
+                next__WFJH=(void *)((unsigned long)result__YFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTHH)));
               } else {
-                next__WDIH=new_lab__MRJ(new_size__HRGH);
+                next__WFJH=new_lab__URJ(new_size__CTHH);
               };
-              ((__POINTER *)next__WDIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XDIH)[ 0]=next__WDIH;
+              ((__POINTER *)next__WFJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XFJH)[ 0]=next__WFJH;
             } else {
-              ((__POINTER *)result__YDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__YDIH=next__WDIH;
-            };
-          };
-          ptr__DRGH=result__YDIH;
-        } else {
-          t__IRGH=((__UINTEGER_32 )typ_id__ERGH);
-          a__JRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__5DIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FRGH + a__JRGH) & (__UINTEGER_32)(~ a__JRGH));
-          ptr_table__2DIH=((__POINTER )(&(table_type[(t__IRGH)])));
-          lab_type__4DIH=(__UINTEGER_32)(t__IRGH |  1);
-          next__1DIH=((__POINTER )(NULL));
-          result__3DIH=((__POINTER *)ptr_table__2DIH)[ 0];
-          if ((result__3DIH == (void *)NULL)) {
-            result__3DIH=new_lab__MRJ(lab_type__4DIH);
-            next__1DIH=(void *)((unsigned long)result__3DIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5DIH)));
-            ((__POINTER *)next__1DIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2DIH)[ 0]=next__1DIH;
-          } else {
-            next__1DIH=((__POINTER *)result__3DIH)[ 0];
-            if ((next__1DIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3DIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5DIH <<  1)) <=  4096)) {
-                next__1DIH=(void *)((unsigned long)result__3DIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5DIH)));
+              ((__POINTER *)result__YFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YFJH=next__WFJH;
+            };
+          };
+          ptr__4SHH=result__YFJH;
+        } else {
+          t__DTHH=((__UINTEGER_32 )typ_id__5SHH);
+          a__ETHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__5FJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ATHH + a__ETHH) & (__UINTEGER_32)(~ a__ETHH));
+          ptr_table__2FJH=((__POINTER )(&(table_type[(t__DTHH)])));
+          lab_type__4FJH=(__UINTEGER_32)(t__DTHH |  1);
+          next__1FJH=((__POINTER )(NULL));
+          result__3FJH=((__POINTER *)ptr_table__2FJH)[ 0];
+          if ((result__3FJH == (void *)NULL)) {
+            result__3FJH=new_lab__URJ(lab_type__4FJH);
+            next__1FJH=(void *)((unsigned long)result__3FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FJH)));
+            ((__POINTER *)next__1FJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2FJH)[ 0]=next__1FJH;
+          } else {
+            next__1FJH=((__POINTER *)result__3FJH)[ 0];
+            if ((next__1FJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3FJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5FJH <<  1)) <=  4096)) {
+                next__1FJH=(void *)((unsigned long)result__3FJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FJH)));
               } else {
-                next__1DIH=new_lab__MRJ(lab_type__4DIH);
+                next__1FJH=new_lab__URJ(lab_type__4FJH);
               };
-              ((__POINTER *)next__1DIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2DIH)[ 0]=next__1DIH;
+              ((__POINTER *)next__1FJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2FJH)[ 0]=next__1FJH;
             } else {
-              ((__POINTER *)result__3DIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1DIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__3DIH=next__1DIH;
+              ((__POINTER *)result__3FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3FJH=next__1FJH;
             };
           };
-          ptr__DRGH=result__3DIH;
+          ptr__4SHH=result__3FJH;
         };
-        result__CRGH=((__ITM_PROTOTYPE *)ptr__DRGH);
-        *(result__CRGH) = *(ITM_PROTOTYPE__);
+        result__3SHH=((__ITM_PROTOTYPE *)ptr__4SHH);
+        *(result__3SHH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__CRGH)->parent_itm_constant__2VF.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=p__KRGH;
-      result__L4M=result__CRGH;
+      ((__ITM_PROTOTYPE *)result__3SHH)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=p__FTHH;
+      result__T4M=result__3SHH;
     };
-    __tmp__TBN=result__B0N;
+    __tmp__1BN=result__J0N;
   };
-  if (__tmp__TBN) {
-    __tmp__BCN=TRUE__;
+  if (__tmp__1BN) {
+    __tmp__JCN=TRUE__;
   } else {
-    result__L4M=read_constant__1QO();
-    __tmp__BCN=((void *)result__L4M != (void *)NULL);
+    result__T4M=read_constant__DRO();
+    __tmp__JCN=((void *)result__T4M != (void *)NULL);
   };
-  if (__tmp__BCN) {
-    __tmp__4CN=TRUE__;
+  if (__tmp__JCN) {
+    __tmp__GDN=TRUE__;
   } else {
-    result__AEIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__AEIH=FALSE__;
-    } else {
-      result__BEIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__BEIH=((__CHARACTER )(( 0)));
-      } else {
-        result__BEIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-      };
-      if ((result__BEIH == '(')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__AEIH=TRUE__;
-      };
-    };
-    if (result__AEIH) {
-      group_sav__R4M=last_group__1TF;
-      p__LEIH=current_position__JXF();
-      result__DEIH=NULL;
-      ptr__EEIH=((__POINTER )(NULL));
-      typ_id__FEIH= 0;
-      sz__GEIH=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__GEIH ==  0)) {
-        result__DEIH=ITM_LIST__;
-      } else {
-        typ_id__FEIH=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__GEIH);
-        if ((typ_id__FEIH == (__INTEGER)(-  1))) {
-          a__HEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GEIH + a__HEIH) & (__UINTEGER_32)(~ a__HEIH));
-          ptr_table__NEIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IEIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__MEIH=((__POINTER )(NULL));
-          result__OEIH=((__POINTER *)ptr_table__NEIH)[ 0];
-          if ((result__OEIH == (void *)NULL)) {
-            result__OEIH=new_lab__MRJ(new_size__IEIH);
-            next__MEIH=(void *)((unsigned long)result__OEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IEIH)));
-            ((__POINTER *)next__MEIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NEIH)[ 0]=next__MEIH;
-          } else {
-            next__MEIH=((__POINTER *)result__OEIH)[ 0];
-            if ((next__MEIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IEIH <<  1)) <=  4096)) {
-                next__MEIH=(void *)((unsigned long)result__OEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IEIH)));
+    result__AGJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__AGJH=FALSE__;
+    } else {
+      result__BGJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__BGJH=((__CHARACTER )(( 0)));
+      } else {
+        result__BGJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      };
+      if ((result__BGJH == '(')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__AGJH=TRUE__;
+      };
+    };
+    if (result__AGJH) {
+      group_sav__Z4M=last_group__DUF;
+      p__LGJH=current_position__RXF();
+      result__DGJH=NULL;
+      ptr__EGJH=((__POINTER )(NULL));
+      typ_id__FGJH= 0;
+      sz__GGJH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__GGJH ==  0)) {
+        result__DGJH=ITM_LIST__;
+      } else {
+        typ_id__FGJH=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__GGJH);
+        if ((typ_id__FGJH == (__INTEGER)(-  1))) {
+          a__HGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__IGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGJH + a__HGJH) & (__UINTEGER_32)(~ a__HGJH));
+          ptr_table__NGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IGJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__MGJH=((__POINTER )(NULL));
+          result__OGJH=((__POINTER *)ptr_table__NGJH)[ 0];
+          if ((result__OGJH == (void *)NULL)) {
+            result__OGJH=new_lab__URJ(new_size__IGJH);
+            next__MGJH=(void *)((unsigned long)result__OGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGJH)));
+            ((__POINTER *)next__MGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NGJH)[ 0]=next__MGJH;
+          } else {
+            next__MGJH=((__POINTER *)result__OGJH)[ 0];
+            if ((next__MGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OGJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IGJH <<  1)) <=  4096)) {
+                next__MGJH=(void *)((unsigned long)result__OGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IGJH)));
               } else {
-                next__MEIH=new_lab__MRJ(new_size__IEIH);
+                next__MGJH=new_lab__URJ(new_size__IGJH);
               };
-              ((__POINTER *)next__MEIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NEIH)[ 0]=next__MEIH;
+              ((__POINTER *)next__MGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NGJH)[ 0]=next__MGJH;
             } else {
-              ((__POINTER *)result__OEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__OEIH=next__MEIH;
-            };
-          };
-          ptr__EEIH=result__OEIH;
-        } else {
-          t__JEIH=((__UINTEGER_32 )typ_id__FEIH);
-          a__KEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GEIH + a__KEIH) & (__UINTEGER_32)(~ a__KEIH));
-          ptr_table__SEIH=((__POINTER )(&(table_type[(t__JEIH)])));
-          lab_type__UEIH=(__UINTEGER_32)(t__JEIH |  1);
-          next__REIH=((__POINTER )(NULL));
-          result__TEIH=((__POINTER *)ptr_table__SEIH)[ 0];
-          if ((result__TEIH == (void *)NULL)) {
-            result__TEIH=new_lab__MRJ(lab_type__UEIH);
-            next__REIH=(void *)((unsigned long)result__TEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEIH)));
-            ((__POINTER *)next__REIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SEIH)[ 0]=next__REIH;
-          } else {
-            next__REIH=((__POINTER *)result__TEIH)[ 0];
-            if ((next__REIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TEIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VEIH <<  1)) <=  4096)) {
-                next__REIH=(void *)((unsigned long)result__TEIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEIH)));
+              ((__POINTER *)result__OGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OGJH=next__MGJH;
+            };
+          };
+          ptr__EGJH=result__OGJH;
+        } else {
+          t__JGJH=((__UINTEGER_32 )typ_id__FGJH);
+          a__KGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGJH + a__KGJH) & (__UINTEGER_32)(~ a__KGJH));
+          ptr_table__SGJH=((__POINTER )(&(table_type[(t__JGJH)])));
+          lab_type__UGJH=(__UINTEGER_32)(t__JGJH |  1);
+          next__RGJH=((__POINTER )(NULL));
+          result__TGJH=((__POINTER *)ptr_table__SGJH)[ 0];
+          if ((result__TGJH == (void *)NULL)) {
+            result__TGJH=new_lab__URJ(lab_type__UGJH);
+            next__RGJH=(void *)((unsigned long)result__TGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGJH)));
+            ((__POINTER *)next__RGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SGJH)[ 0]=next__RGJH;
+          } else {
+            next__RGJH=((__POINTER *)result__TGJH)[ 0];
+            if ((next__RGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TGJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VGJH <<  1)) <=  4096)) {
+                next__RGJH=(void *)((unsigned long)result__TGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VGJH)));
               } else {
-                next__REIH=new_lab__MRJ(lab_type__UEIH);
+                next__RGJH=new_lab__URJ(lab_type__UGJH);
               };
-              ((__POINTER *)next__REIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SEIH)[ 0]=next__REIH;
+              ((__POINTER *)next__RGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SGJH)[ 0]=next__RGJH;
             } else {
-              ((__POINTER *)result__TEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__REIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TEIH=next__REIH;
+              ((__POINTER *)result__TGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TGJH=next__RGJH;
             };
           };
-          ptr__EEIH=result__TEIH;
+          ptr__EGJH=result__TGJH;
         };
-        result__DEIH=((__ITM_LIST *)ptr__EEIH);
-        *(result__DEIH) = *(ITM_LIST__);
+        result__DGJH=((__ITM_LIST *)ptr__EGJH);
+        *(result__DGJH) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__DEIH)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__LEIH;
-      last_group__1TF=result__DEIH;
-      result__L4M=result__DEIH;
-      read_group__JBHB(Self__J4M);
-      result__WEIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__WEIH=FALSE__;
+      ((__ITM_LIST *)result__DGJH)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ=p__LGJH;
+      last_group__DUF=result__DGJH;
+      result__T4M=result__DGJH;
+      read_group__RBHB(Self__R4M);
+      result__WGJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__WGJH=FALSE__;
       } else {
-        result__XEIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__XEIH=((__CHARACTER )(( 0)));
+        result__XGJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__XGJH=((__CHARACTER )(( 0)));
         } else {
-          result__XEIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__XGJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__XEIH == ')')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__WEIH=TRUE__;
+        if ((result__XGJH == ')')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__WGJH=TRUE__;
         };
       };
-      if ((! result__WEIH)) {
-        pos__ZJXG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_261));
-        put_position__UOG(pos__ZJXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! result__WGJH)) {
+        pos__IHYG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_260));
+        put_position__2OG(pos__IHYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__1TF=group_sav__R4M;
+      last_group__DUF=group_sav__Z4M;
     };
-    __tmp__4CN=result__AEIH;
+    __tmp__GDN=result__AGJH;
   };
-  if (__tmp__4CN) {
-    __tmp__BFN=TRUE__;
+  if (__tmp__GDN) {
+    __tmp__JFN=TRUE__;
   } else {
-    result__ZEIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__ZEIH=FALSE__;
-    } else {
-      result__0EIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__0EIH=((__CHARACTER )(( 0)));
-      } else {
-        result__0EIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-      };
-      if ((result__0EIH == '{')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__ZEIH=TRUE__;
-      };
-    };
-    if (result__ZEIH) {
-      short__token__to__LBD((&__string_133),(__INTEGER)(position__SBC -  1),position__SBC);
-      group_sav__R4M=last_group__1TF;
-      p__Z0H=current_position__JXF();
-      result__WPI=NULL;
-      ptr__XPI=((__POINTER )(NULL));
-      typ_id__2PI= 0;
-      sz__ZPI=((__UINTEGER_32 )sizeof(__ITM_LIST));
-      if ((sz__ZPI ==  0)) {
-        result__WPI=ITM_LIST__;
-      } else {
-        typ_id__2PI=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__ZPI);
-        if ((typ_id__2PI == (__INTEGER)(-  1))) {
-          a__FCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__GCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPI + a__FCFH) & (__UINTEGER_32)(~ a__FCFH));
-          ptr_table__3EIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__2EIH=((__POINTER )(NULL));
-          result__4EIH=((__POINTER *)ptr_table__3EIH)[ 0];
-          if ((result__4EIH == (void *)NULL)) {
-            result__4EIH=new_lab__MRJ(new_size__GCFH);
-            next__2EIH=(void *)((unsigned long)result__4EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GCFH)));
-            ((__POINTER *)next__2EIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3EIH)[ 0]=next__2EIH;
-          } else {
-            next__2EIH=((__POINTER *)result__4EIH)[ 0];
-            if ((next__2EIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4EIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GCFH <<  1)) <=  4096)) {
-                next__2EIH=(void *)((unsigned long)result__4EIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GCFH)));
+    result__ZGJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__ZGJH=FALSE__;
+    } else {
+      result__0GJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__0GJH=((__CHARACTER )(( 0)));
+      } else {
+        result__0GJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      };
+      if ((result__0GJH == '{')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__ZGJH=TRUE__;
+      };
+    };
+    if (result__ZGJH) {
+      short__token__to__TBD((&__string_133),(__INTEGER)(position__0BC -  1),position__0BC);
+      group_sav__Z4M=last_group__DUF;
+      p__B1H=current_position__RXF();
+      result__4PI=NULL;
+      ptr__5PI=((__POINTER )(NULL));
+      typ_id__EQI= 0;
+      sz__BQI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__BQI ==  0)) {
+        result__4PI=ITM_LIST__;
+      } else {
+        typ_id__EQI=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__BQI);
+        if ((typ_id__EQI == (__INTEGER)(-  1))) {
+          a__VDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BQI + a__VDGH) & (__UINTEGER_32)(~ a__VDGH));
+          ptr_table__3GJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__2GJH=((__POINTER )(NULL));
+          result__4GJH=((__POINTER *)ptr_table__3GJH)[ 0];
+          if ((result__4GJH == (void *)NULL)) {
+            result__4GJH=new_lab__URJ(new_size__WDGH);
+            next__2GJH=(void *)((unsigned long)result__4GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDGH)));
+            ((__POINTER *)next__2GJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
+          } else {
+            next__2GJH=((__POINTER *)result__4GJH)[ 0];
+            if ((next__2GJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4GJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WDGH <<  1)) <=  4096)) {
+                next__2GJH=(void *)((unsigned long)result__4GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDGH)));
               } else {
-                next__2EIH=new_lab__MRJ(new_size__GCFH);
+                next__2GJH=new_lab__URJ(new_size__WDGH);
               };
-              ((__POINTER *)next__2EIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3EIH)[ 0]=next__2EIH;
+              ((__POINTER *)next__2GJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
             } else {
-              ((__POINTER *)result__4EIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2EIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4EIH=next__2EIH;
-            };
-          };
-          ptr__XPI=result__4EIH;
-        } else {
-          t__KCFH=((__UINTEGER_32 )typ_id__2PI);
-          a__JCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__FFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZPI + a__JCFH) & (__UINTEGER_32)(~ a__JCFH));
-          ptr_table__CFIH=((__POINTER )(&(table_type[(t__KCFH)])));
-          lab_type__EFIH=(__UINTEGER_32)(t__KCFH |  1);
-          next__BFIH=((__POINTER )(NULL));
-          result__DFIH=((__POINTER *)ptr_table__CFIH)[ 0];
-          if ((result__DFIH == (void *)NULL)) {
-            result__DFIH=new_lab__MRJ(lab_type__EFIH);
-            next__BFIH=(void *)((unsigned long)result__DFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFIH)));
-            ((__POINTER *)next__BFIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CFIH)[ 0]=next__BFIH;
-          } else {
-            next__BFIH=((__POINTER *)result__DFIH)[ 0];
-            if ((next__BFIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FFIH <<  1)) <=  4096)) {
-                next__BFIH=(void *)((unsigned long)result__DFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFIH)));
+              ((__POINTER *)result__4GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4GJH=next__2GJH;
+            };
+          };
+          ptr__5PI=result__4GJH;
+        } else {
+          t__0DGH=((__UINTEGER_32 )typ_id__EQI);
+          a__ZDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BQI + a__ZDGH) & (__UINTEGER_32)(~ a__ZDGH));
+          ptr_table__CHJH=((__POINTER )(&(table_type[(t__0DGH)])));
+          lab_type__EHJH=(__UINTEGER_32)(t__0DGH |  1);
+          next__BHJH=((__POINTER )(NULL));
+          result__DHJH=((__POINTER *)ptr_table__CHJH)[ 0];
+          if ((result__DHJH == (void *)NULL)) {
+            result__DHJH=new_lab__URJ(lab_type__EHJH);
+            next__BHJH=(void *)((unsigned long)result__DHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHJH)));
+            ((__POINTER *)next__BHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CHJH)[ 0]=next__BHJH;
+          } else {
+            next__BHJH=((__POINTER *)result__DHJH)[ 0];
+            if ((next__BHJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DHJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FHJH <<  1)) <=  4096)) {
+                next__BHJH=(void *)((unsigned long)result__DHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHJH)));
               } else {
-                next__BFIH=new_lab__MRJ(lab_type__EFIH);
+                next__BHJH=new_lab__URJ(lab_type__EHJH);
               };
-              ((__POINTER *)next__BFIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CFIH)[ 0]=next__BFIH;
+              ((__POINTER *)next__BHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CHJH)[ 0]=next__BHJH;
             } else {
-              ((__POINTER *)result__DFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DFIH=next__BFIH;
+              ((__POINTER *)result__DHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DHJH=next__BHJH;
             };
           };
-          ptr__XPI=result__DFIH;
+          ptr__5PI=result__DHJH;
         };
-        result__WPI=((__ITM_LIST *)ptr__XPI);
-        *(result__WPI) = *(ITM_LIST__);
+        result__4PI=((__ITM_LIST *)ptr__5PI);
+        *(result__4PI) = *(ITM_LIST__);
       };
-      ((__ITM_LIST *)result__WPI)->parent_itm_code__K5E.parent_itm_object__XDE.position__NDJ=p__Z0H;
-      last_group__1TF=result__WPI;
-      old_position__DRI=position__SBC;
-      old_pos_cur__FRI=pos_cur__VBC;
-      old_pos_line__HRI=pos_line__WBC;
-      old_pos_col__JRI=pos_col__XBC;
-      old_short_derive__LRI=short_derive__BCC;
-      if (((void *)read_loc_arg__with_self__IEHB(Self__J4M,TRUE__,FALSE__) != (void *)NULL)) {
-        result__GFIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__GFIH=FALSE__;
+      ((__ITM_LIST *)result__4PI)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ=p__B1H;
+      last_group__DUF=result__4PI;
+      old_position__LRI=position__0BC;
+      old_pos_cur__NRI=pos_cur__3BC;
+      old_pos_line__PRI=pos_line__4BC;
+      old_pos_col__RRI=pos_col__5BC;
+      old_short_derive__TRI=short_derive__JCC;
+      if (((void *)read_loc_arg__with_self__QEHB(Self__R4M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__GHJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__GHJH=FALSE__;
         } else {
-          result__HFIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__HFIH=((__CHARACTER )(( 0)));
+          result__HHJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__HHJH=((__CHARACTER )(( 0)));
           } else {
-            result__HFIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__HHJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__HFIH == ';')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__GFIH=TRUE__;
+          if ((result__HHJH == ';')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__GHJH=TRUE__;
           };
         };
-        if ((! result__GFIH)) {
-          pos__1JXG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_242));
-          put_position__UOG(pos__1JXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__GHJH)) {
+          pos__KHYG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_240));
+          put_position__2OG(pos__KHYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        restore_context__TDL();
-      };
-      lst__JKHB=last_group__1TF;
-      result__AIMB=NULL;
-      ptr__BIMB=((__POINTER )(NULL));
-      typ_id__GIMB= 0;
-      sz__DIMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
-      if ((sz__DIMB ==  0)) {
-        result__AIMB=ITM_BLOCK__;
-      } else {
-        typ_id__GIMB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__DIMB);
-        if ((typ_id__GIMB == (__INTEGER)(-  1))) {
-          a__51EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__A2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMB + a__51EH) & (__UINTEGER_32)(~ a__51EH));
-          ptr_table__KFIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__JFIH=((__POINTER )(NULL));
-          result__LFIH=((__POINTER *)ptr_table__KFIH)[ 0];
-          if ((result__LFIH == (void *)NULL)) {
-            result__LFIH=new_lab__MRJ(new_size__A2EH);
-            next__JFIH=(void *)((unsigned long)result__LFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2EH)));
-            ((__POINTER *)next__JFIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KFIH)[ 0]=next__JFIH;
-          } else {
-            next__JFIH=((__POINTER *)result__LFIH)[ 0];
-            if ((next__JFIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__A2EH <<  1)) <=  4096)) {
-                next__JFIH=(void *)((unsigned long)result__LFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2EH)));
+        restore_context__1DL();
+      };
+      lst__RKHB=last_group__DUF;
+      result__IIMB=NULL;
+      ptr__JIMB=((__POINTER )(NULL));
+      typ_id__OIMB= 0;
+      sz__LIMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__LIMB ==  0)) {
+        result__IIMB=ITM_BLOCK__;
+      } else {
+        typ_id__OIMB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__LIMB);
+        if ((typ_id__OIMB == (__INTEGER)(-  1))) {
+          a__P3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Q3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIMB + a__P3FH) & (__UINTEGER_32)(~ a__P3FH));
+          ptr_table__KHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__JHJH=((__POINTER )(NULL));
+          result__LHJH=((__POINTER *)ptr_table__KHJH)[ 0];
+          if ((result__LHJH == (void *)NULL)) {
+            result__LHJH=new_lab__URJ(new_size__Q3FH);
+            next__JHJH=(void *)((unsigned long)result__LHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q3FH)));
+            ((__POINTER *)next__JHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KHJH)[ 0]=next__JHJH;
+          } else {
+            next__JHJH=((__POINTER *)result__LHJH)[ 0];
+            if ((next__JHJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LHJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Q3FH <<  1)) <=  4096)) {
+                next__JHJH=(void *)((unsigned long)result__LHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q3FH)));
               } else {
-                next__JFIH=new_lab__MRJ(new_size__A2EH);
+                next__JHJH=new_lab__URJ(new_size__Q3FH);
               };
-              ((__POINTER *)next__JFIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KFIH)[ 0]=next__JFIH;
+              ((__POINTER *)next__JHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KHJH)[ 0]=next__JHJH;
             } else {
-              ((__POINTER *)result__LFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__LFIH=next__JFIH;
-            };
-          };
-          ptr__BIMB=result__LFIH;
-        } else {
-          t__E2EH=((__UINTEGER_32 )typ_id__GIMB);
-          a__D2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__SFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMB + a__D2EH) & (__UINTEGER_32)(~ a__D2EH));
-          ptr_table__PFIH=((__POINTER )(&(table_type[(t__E2EH)])));
-          lab_type__RFIH=(__UINTEGER_32)(t__E2EH |  1);
-          next__OFIH=((__POINTER )(NULL));
-          result__QFIH=((__POINTER *)ptr_table__PFIH)[ 0];
-          if ((result__QFIH == (void *)NULL)) {
-            result__QFIH=new_lab__MRJ(lab_type__RFIH);
-            next__OFIH=(void *)((unsigned long)result__QFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFIH)));
-            ((__POINTER *)next__OFIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PFIH)[ 0]=next__OFIH;
-          } else {
-            next__OFIH=((__POINTER *)result__QFIH)[ 0];
-            if ((next__OFIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QFIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SFIH <<  1)) <=  4096)) {
-                next__OFIH=(void *)((unsigned long)result__QFIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFIH)));
+              ((__POINTER *)result__LHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LHJH=next__JHJH;
+            };
+          };
+          ptr__JIMB=result__LHJH;
+        } else {
+          t__U3FH=((__UINTEGER_32 )typ_id__OIMB);
+          a__T3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__SHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIMB + a__T3FH) & (__UINTEGER_32)(~ a__T3FH));
+          ptr_table__PHJH=((__POINTER )(&(table_type[(t__U3FH)])));
+          lab_type__RHJH=(__UINTEGER_32)(t__U3FH |  1);
+          next__OHJH=((__POINTER )(NULL));
+          result__QHJH=((__POINTER *)ptr_table__PHJH)[ 0];
+          if ((result__QHJH == (void *)NULL)) {
+            result__QHJH=new_lab__URJ(lab_type__RHJH);
+            next__OHJH=(void *)((unsigned long)result__QHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SHJH)));
+            ((__POINTER *)next__OHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PHJH)[ 0]=next__OHJH;
+          } else {
+            next__OHJH=((__POINTER *)result__QHJH)[ 0];
+            if ((next__OHJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QHJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SHJH <<  1)) <=  4096)) {
+                next__OHJH=(void *)((unsigned long)result__QHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SHJH)));
               } else {
-                next__OFIH=new_lab__MRJ(lab_type__RFIH);
+                next__OHJH=new_lab__URJ(lab_type__RHJH);
               };
-              ((__POINTER *)next__OFIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PFIH)[ 0]=next__OFIH;
+              ((__POINTER *)next__OHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PHJH)[ 0]=next__OHJH;
             } else {
-              ((__POINTER *)result__QFIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QFIH=next__OFIH;
+              ((__POINTER *)result__QHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QHJH=next__OHJH;
             };
           };
-          ptr__BIMB=result__QFIH;
+          ptr__JIMB=result__QHJH;
         };
-        result__AIMB=((__ITM_BLOCK *)ptr__BIMB);
-        *(result__AIMB) = *(ITM_BLOCK__);
+        result__IIMB=((__ITM_BLOCK *)ptr__JIMB);
+        *(result__IIMB) = *(ITM_BLOCK__);
       };
-      ((__ITM_BLOCK *)result__AIMB)->list__ANDC=lst__JKHB;
-      result__L4M=result__AIMB;
-      read_group__JBHB(Self__J4M);
-      result__TFIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__TFIH=FALSE__;
+      ((__ITM_BLOCK *)result__IIMB)->list__INDC=lst__RKHB;
+      result__T4M=result__IIMB;
+      read_group__RBHB(Self__R4M);
+      result__THJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__THJH=FALSE__;
       } else {
-        result__UFIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__UFIH=((__CHARACTER )(( 0)));
+        result__UHJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__UHJH=((__CHARACTER )(( 0)));
         } else {
-          result__UFIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__UHJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__UFIH == '}')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__TFIH=TRUE__;
+        if ((result__UHJH == '}')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__THJH=TRUE__;
         };
       };
-      if ((! result__TFIH)) {
-        pos__DKXG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_293));
-        put_position__UOG(pos__DKXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! result__THJH)) {
+        pos__SHYG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_292));
+        put_position__2OG(pos__SHYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      short__token__to__LBD((&__string_133),(__INTEGER)(position__SBC -  1),position__SBC);
-      last_group__1TF=group_sav__R4M;
-    };
-    __tmp__BFN=result__ZEIH;
-  };
-  if ((! __tmp__BFN)) {
-    if (read_external__ATO()) {
-      result__WFIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__WFIH=FALSE__;
-      } else {
-        result__XFIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__XFIH=((__CHARACTER )(( 0)));
-        } else {
-          result__XFIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-        };
-        if ((result__XFIH == ':')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__WFIH=TRUE__;
-        };
-      };
-      if ((! result__WFIH)) {
-        __tmp__VFN=current_position__JXF();
-        result__ZVTB=NULL;
-        ptr__0VTB=((__POINTER )(NULL));
-        typ_id__5VTB= 0;
-        sz__2VTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
-        if ((sz__2VTB ==  0)) {
-          result__ZVTB=ITM_EXTERNAL__;
-        } else {
-          typ_id__5VTB=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2VTB);
-          if ((typ_id__5VTB == (__INTEGER)(-  1))) {
-            a__H2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__I2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__2VTB + a__H2EH) & (__UINTEGER_32)(~ a__H2EH));
-            ptr_table__0FIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__ZFIH=((__POINTER )(NULL));
-            result__1FIH=((__POINTER *)ptr_table__0FIH)[ 0];
-            if ((result__1FIH == (void *)NULL)) {
-              result__1FIH=new_lab__MRJ(new_size__I2EH);
-              next__ZFIH=(void *)((unsigned long)result__1FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2EH)));
-              ((__POINTER *)next__ZFIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0FIH)[ 0]=next__ZFIH;
+      short__token__to__TBD((&__string_133),(__INTEGER)(position__0BC -  1),position__0BC);
+      last_group__DUF=group_sav__Z4M;
+    };
+    __tmp__JFN=result__ZGJH;
+  };
+  if ((! __tmp__JFN)) {
+    if (read_external__ITO()) {
+      result__WHJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__WHJH=FALSE__;
+      } else {
+        result__XHJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__XHJH=((__CHARACTER )(( 0)));
+        } else {
+          result__XHJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        };
+        if ((result__XHJH == ':')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__WHJH=TRUE__;
+        };
+      };
+      if ((! result__WHJH)) {
+        __tmp__3FN=current_position__RXF();
+        result__BWTB=NULL;
+        ptr__CWTB=((__POINTER )(NULL));
+        typ_id__HWTB= 0;
+        sz__EWTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__EWTB ==  0)) {
+          result__BWTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__HWTB=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__EWTB);
+          if ((typ_id__HWTB == (__INTEGER)(-  1))) {
+            a__X3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__Y3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__EWTB + a__X3FH) & (__UINTEGER_32)(~ a__X3FH));
+            ptr_table__0HJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ZHJH=((__POINTER )(NULL));
+            result__1HJH=((__POINTER *)ptr_table__0HJH)[ 0];
+            if ((result__1HJH == (void *)NULL)) {
+              result__1HJH=new_lab__URJ(new_size__Y3FH);
+              next__ZHJH=(void *)((unsigned long)result__1HJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y3FH)));
+              ((__POINTER *)next__ZHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0HJH)[ 0]=next__ZHJH;
             } else {
-              next__ZFIH=((__POINTER *)result__1FIH)[ 0];
-              if ((next__ZFIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1FIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__I2EH <<  1)) <=  4096)) {
-                  next__ZFIH=(void *)((unsigned long)result__1FIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2EH)));
+              next__ZHJH=((__POINTER *)result__1HJH)[ 0];
+              if ((next__ZHJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1HJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__Y3FH <<  1)) <=  4096)) {
+                  next__ZHJH=(void *)((unsigned long)result__1HJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y3FH)));
                 } else {
-                  next__ZFIH=new_lab__MRJ(new_size__I2EH);
+                  next__ZHJH=new_lab__URJ(new_size__Y3FH);
                 };
-                ((__POINTER *)next__ZFIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0FIH)[ 0]=next__ZFIH;
+                ((__POINTER *)next__ZHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0HJH)[ 0]=next__ZHJH;
               } else {
-                ((__POINTER *)result__1FIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1FIH=next__ZFIH;
+                ((__POINTER *)result__1HJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1HJH=next__ZHJH;
               };
             };
-            ptr__0VTB=result__1FIH;
-          } else {
-            t__M2EH=((__UINTEGER_32 )typ_id__5VTB);
-            a__L2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__CGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2VTB + a__L2EH) & (__UINTEGER_32)(~ a__L2EH));
-            ptr_table__5FIH=((__POINTER )(&(table_type[(t__M2EH)])));
-            lab_type__BGIH=(__UINTEGER_32)(t__M2EH |  1);
-            next__4FIH=((__POINTER )(NULL));
-            result__AGIH=((__POINTER *)ptr_table__5FIH)[ 0];
-            if ((result__AGIH == (void *)NULL)) {
-              result__AGIH=new_lab__MRJ(lab_type__BGIH);
-              next__4FIH=(void *)((unsigned long)result__AGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGIH)));
-              ((__POINTER *)next__4FIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5FIH)[ 0]=next__4FIH;
+            ptr__CWTB=result__1HJH;
+          } else {
+            t__23FH=((__UINTEGER_32 )typ_id__HWTB);
+            a__13FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__CIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__EWTB + a__13FH) & (__UINTEGER_32)(~ a__13FH));
+            ptr_table__5HJH=((__POINTER )(&(table_type[(t__23FH)])));
+            lab_type__BIJH=(__UINTEGER_32)(t__23FH |  1);
+            next__4HJH=((__POINTER )(NULL));
+            result__AIJH=((__POINTER *)ptr_table__5HJH)[ 0];
+            if ((result__AIJH == (void *)NULL)) {
+              result__AIJH=new_lab__URJ(lab_type__BIJH);
+              next__4HJH=(void *)((unsigned long)result__AIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIJH)));
+              ((__POINTER *)next__4HJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5HJH)[ 0]=next__4HJH;
             } else {
-              next__4FIH=((__POINTER *)result__AGIH)[ 0];
-              if ((next__4FIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AGIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CGIH <<  1)) <=  4096)) {
-                  next__4FIH=(void *)((unsigned long)result__AGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CGIH)));
+              next__4HJH=((__POINTER *)result__AIJH)[ 0];
+              if ((next__4HJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AIJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CIJH <<  1)) <=  4096)) {
+                  next__4HJH=(void *)((unsigned long)result__AIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CIJH)));
                 } else {
-                  next__4FIH=new_lab__MRJ(lab_type__BGIH);
+                  next__4HJH=new_lab__URJ(lab_type__BIJH);
                 };
-                ((__POINTER *)next__4FIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5FIH)[ 0]=next__4FIH;
+                ((__POINTER *)next__4HJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5HJH)[ 0]=next__4HJH;
               } else {
-                ((__POINTER *)result__AGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__AGIH=next__4FIH;
+                ((__POINTER *)result__AIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4HJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__AIJH=next__4HJH;
               };
             };
-            ptr__0VTB=result__AGIH;
-          };
-          result__ZVTB=((__ITM_EXTERNAL *)ptr__0VTB);
-          *(result__ZVTB) = *(ITM_EXTERNAL__);
-        };
-        ((__ITM_EXTERNAL *)result__ZVTB)->parent_itm_extern__UFN.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ=__tmp__VFN;
-        result__L4M=result__ZVTB;
-      } else {
-        __tmp__3FN=current_position__JXF();
-        result__DGIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__DGIH=FALSE__;
-        } else {
-          result__EGIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__EGIH=((__CHARACTER )(( 0)));
-          } else {
-            result__EGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-          };
-          if ((result__EGIH == '(')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__DGIH=TRUE__;
-          };
-        };
-        result__NXTB=NULL;
-        ptr__OXTB=((__POINTER )(NULL));
-        typ_id__TXTB= 0;
-        sz__QXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
-        if ((sz__QXTB ==  0)) {
-          result__NXTB=ITM_EXTERNAL_TYPE__;
-        } else {
-          typ_id__TXTB=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QXTB);
-          if ((typ_id__TXTB == (__INTEGER)(-  1))) {
-            a__P2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__Q2EH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXTB + a__P2EH) & (__UINTEGER_32)(~ a__P2EH));
-            ptr_table__HGIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q2EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__GGIH=((__POINTER )(NULL));
-            result__IGIH=((__POINTER *)ptr_table__HGIH)[ 0];
-            if ((result__IGIH == (void *)NULL)) {
-              result__IGIH=new_lab__MRJ(new_size__Q2EH);
-              next__GGIH=(void *)((unsigned long)result__IGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2EH)));
-              ((__POINTER *)next__GGIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HGIH)[ 0]=next__GGIH;
+            ptr__CWTB=result__AIJH;
+          };
+          result__BWTB=((__ITM_EXTERNAL *)ptr__CWTB);
+          *(result__BWTB) = *(ITM_EXTERNAL__);
+        };
+        ((__ITM_EXTERNAL *)result__BWTB)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ=__tmp__3FN;
+        result__T4M=result__BWTB;
+      } else {
+        __tmp__FGN=current_position__RXF();
+        result__DIJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__DIJH=FALSE__;
+        } else {
+          result__EIJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__EIJH=((__CHARACTER )(( 0)));
+          } else {
+            result__EIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          };
+          if ((result__EIJH == '(')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__DIJH=TRUE__;
+          };
+        };
+        result__VXTB=NULL;
+        ptr__WXTB=((__POINTER )(NULL));
+        typ_id__1XTB= 0;
+        sz__YXTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__YXTB ==  0)) {
+          result__VXTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__1XTB=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__YXTB);
+          if ((typ_id__1XTB == (__INTEGER)(-  1))) {
+            a__53FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__A4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__YXTB + a__53FH) & (__UINTEGER_32)(~ a__53FH));
+            ptr_table__HIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__GIJH=((__POINTER )(NULL));
+            result__IIJH=((__POINTER *)ptr_table__HIJH)[ 0];
+            if ((result__IIJH == (void *)NULL)) {
+              result__IIJH=new_lab__URJ(new_size__A4FH);
+              next__GIJH=(void *)((unsigned long)result__IIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A4FH)));
+              ((__POINTER *)next__GIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HIJH)[ 0]=next__GIJH;
             } else {
-              next__GGIH=((__POINTER *)result__IGIH)[ 0];
-              if ((next__GGIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IGIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__Q2EH <<  1)) <=  4096)) {
-                  next__GGIH=(void *)((unsigned long)result__IGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2EH)));
+              next__GIJH=((__POINTER *)result__IIJH)[ 0];
+              if ((next__GIJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IIJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__A4FH <<  1)) <=  4096)) {
+                  next__GIJH=(void *)((unsigned long)result__IIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A4FH)));
                 } else {
-                  next__GGIH=new_lab__MRJ(new_size__Q2EH);
+                  next__GIJH=new_lab__URJ(new_size__A4FH);
                 };
-                ((__POINTER *)next__GGIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HGIH)[ 0]=next__GGIH;
+                ((__POINTER *)next__GIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HIJH)[ 0]=next__GIJH;
               } else {
-                ((__POINTER *)result__IGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IGIH=next__GGIH;
+                ((__POINTER *)result__IIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__IIJH=next__GIJH;
               };
             };
-            ptr__OXTB=result__IGIH;
-          } else {
-            t__U2EH=((__UINTEGER_32 )typ_id__TXTB);
-            a__T2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__PGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QXTB + a__T2EH) & (__UINTEGER_32)(~ a__T2EH));
-            ptr_table__MGIH=((__POINTER )(&(table_type[(t__U2EH)])));
-            lab_type__OGIH=(__UINTEGER_32)(t__U2EH |  1);
-            next__LGIH=((__POINTER )(NULL));
-            result__NGIH=((__POINTER *)ptr_table__MGIH)[ 0];
-            if ((result__NGIH == (void *)NULL)) {
-              result__NGIH=new_lab__MRJ(lab_type__OGIH);
-              next__LGIH=(void *)((unsigned long)result__NGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PGIH)));
-              ((__POINTER *)next__LGIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MGIH)[ 0]=next__LGIH;
+            ptr__WXTB=result__IIJH;
+          } else {
+            t__E4FH=((__UINTEGER_32 )typ_id__1XTB);
+            a__D4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__PIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YXTB + a__D4FH) & (__UINTEGER_32)(~ a__D4FH));
+            ptr_table__MIJH=((__POINTER )(&(table_type[(t__E4FH)])));
+            lab_type__OIJH=(__UINTEGER_32)(t__E4FH |  1);
+            next__LIJH=((__POINTER )(NULL));
+            result__NIJH=((__POINTER *)ptr_table__MIJH)[ 0];
+            if ((result__NIJH == (void *)NULL)) {
+              result__NIJH=new_lab__URJ(lab_type__OIJH);
+              next__LIJH=(void *)((unsigned long)result__NIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PIJH)));
+              ((__POINTER *)next__LIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MIJH)[ 0]=next__LIJH;
             } else {
-              next__LGIH=((__POINTER *)result__NGIH)[ 0];
-              if ((next__LGIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NGIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PGIH <<  1)) <=  4096)) {
-                  next__LGIH=(void *)((unsigned long)result__NGIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PGIH)));
+              next__LIJH=((__POINTER *)result__NIJH)[ 0];
+              if ((next__LIJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NIJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__PIJH <<  1)) <=  4096)) {
+                  next__LIJH=(void *)((unsigned long)result__NIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PIJH)));
                 } else {
-                  next__LGIH=new_lab__MRJ(lab_type__OGIH);
+                  next__LIJH=new_lab__URJ(lab_type__OIJH);
                 };
-                ((__POINTER *)next__LGIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MGIH)[ 0]=next__LGIH;
+                ((__POINTER *)next__LIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MIJH)[ 0]=next__LIJH;
               } else {
-                ((__POINTER *)result__NGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NGIH=next__LGIH;
+                ((__POINTER *)result__NIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NIJH=next__LIJH;
               };
             };
-            ptr__OXTB=result__NGIH;
-          };
-          result__NXTB=((__ITM_EXTERNAL_TYPE *)ptr__OXTB);
-          *(result__NXTB) = *(ITM_EXTERNAL_TYPE__);
-        };
-        Self__5ZEC=((__ITM_EXTERNAL_TYPE *)result__NXTB);
-        Self__5ZEC->parent_itm_extern__P4M.parent_itm_code__O4M.parent_itm_object__XDE.position__NDJ=__tmp__3FN;
-        Self__5ZEC->is_persistant__MHN=result__DGIH;
-        type__M4M=read_type__DCM(Self__J4M,FALSE__);
-        if (((void *)type__M4M == (void *)NULL)) {
-          pos__RKXG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_278));
-          put_position__UOG(pos__RKXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+            ptr__WXTB=result__NIJH;
+          };
+          result__VXTB=((__ITM_EXTERNAL_TYPE *)ptr__WXTB);
+          *(result__VXTB) = *(ITM_EXTERNAL_TYPE__);
+        };
+        Self__H0EC=((__ITM_EXTERNAL_TYPE *)result__VXTB);
+        Self__H0EC->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ=__tmp__FGN;
+        Self__H0EC->is_persistant__UHN=result__DIJH;
+        type__U4M=read_type__LCM(Self__R4M,FALSE__);
+        if (((void *)type__U4M == (void *)NULL)) {
+          pos__AIYG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_277));
+          put_position__2OG(pos__AIYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__QGIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__QGIH=FALSE__;
+        result__QIJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__QIJH=FALSE__;
         } else {
-          result__RGIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__RGIH=((__CHARACTER )(( 0)));
+          result__RIJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__RIJH=((__CHARACTER )(( 0)));
           } else {
-            result__RGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__RIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__RGIH == '{')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__QGIH=TRUE__;
+          if ((result__RIJH == '{')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__QIJH=TRUE__;
           };
         };
-        if (result__QGIH) {
-          if (((void *)read_type_list__IMO(Self__J4M,FALSE__) == (void *)NULL)) {
-            pos__TKXG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_304));
-            put_position__UOG(pos__TKXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        if (result__QIJH) {
+          if (((void *)read_type_list__QMO(Self__R4M,FALSE__) == (void *)NULL)) {
+            pos__CIYG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_303));
+            put_position__2OG(pos__CIYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          result__TGIH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__TGIH=FALSE__;
+          result__TIJH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__TIJH=FALSE__;
           } else {
-            result__UGIH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__UGIH=((__CHARACTER )(( 0)));
+            result__UIJH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__UIJH=((__CHARACTER )(( 0)));
             } else {
-              result__UGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__UIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__UGIH == '}')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__TGIH=TRUE__;
+            if ((result__UIJH == '}')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__TIJH=TRUE__;
             };
           };
-          if ((! result__TGIH)) {
-            pos__VKXG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_293));
-            put_position__UOG(pos__VKXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__TIJH)) {
+            pos__EIYG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_292));
+            put_position__2OG(pos__EIYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__NXTB->is_persistant__MHN) {
-          result__WGIH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__WGIH=FALSE__;
+        if (result__VXTB->is_persistant__UHN) {
+          result__WIJH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__WIJH=FALSE__;
           } else {
-            result__XGIH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__XGIH=((__CHARACTER )(( 0)));
+            result__XIJH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__XIJH=((__CHARACTER )(( 0)));
             } else {
-              result__XGIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__XIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__XGIH == ')')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__WGIH=TRUE__;
+            if ((result__XIJH == ')')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__WIJH=TRUE__;
             };
           };
-          __tmp__XHN=(! result__WGIH);
+          __tmp__5HN=(! result__WIJH);
         } else {
-          __tmp__XHN=FALSE__;
+          __tmp__5HN=FALSE__;
         };
-        if (__tmp__XHN) {
-          pos__XKXG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_261));
-          put_position__UOG(pos__XKXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (__tmp__5HN) {
+          pos__GIYG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_260));
+          put_position__2OG(pos__GIYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__L4M=result__NXTB;
+        result__T4M=result__VXTB;
       };
     };
   };
-  return(result__L4M);
+  return(result__T4M);
 }
 
-static __BOOLEAN read_integer__A2P()
+static __BOOLEAN read_integer__I2P()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER_64 result__EUJE,__tmp__WUJE,result__TTPE,result__ZDRE;
-  __INTEGER pos_old__E2P,__tmp__PUJE,Self__YKOE,result__TBSE,j__ESPE;
-  __INTEGER __tmp__4TPE,Self__YNQE,i__DCRE,__tmp__EERE,Self__PGSE;
-  __INTEGER state__GFRE,value__HFRE,i__FFRE,state__BNRE,result__ENRE;
-  __INTEGER i__ANRE;
-  __STRING *Self__CUJE,*Self__T2CH,*Self__V2EH,*Self__BSPE,*Self__RTPE;
-  __STRING *Self__BCRE,*Self__XDRE,*Self__DFRE,*Self__4MRE;
-  __POSITION pos__FMXG,pos__ZMXG,pos__INXG;
-  __BOOLEAN result__D2P,result__U1CH,__tmp__P2P,__tmp__J3P,__tmp__KCSE;
-  __BOOLEAN result__DSPE,__tmp__2SPE,result__1LTE,__tmp__R5P;
-  __BOOLEAN result__ECRE,negative__IFRE,result__JFRE,__tmp__XGRE;
-  __BOOLEAN result__WOOG,__tmp__DHRE,result__DPOG,result__TEDH;
-  __BOOLEAN __tmp__XHRE,__tmp__WIRE,result__RGFF,result__WEDH;
-  __BOOLEAN __tmp__KLRE,result__DHFF,result__ZEDH,__tmp__XKRE;
-  __BOOLEAN negative__DNRE,__tmp__QORE,result__FQOG,__tmp__DPRE;
-  __BOOLEAN __tmp__YPRE,result__RIFF,__tmp__5QRE,result__DJFF;
-  __BOOLEAN result__P3CH;
-  __CHARACTER result__ZD5G,result__DE5G,result__IE5G,result__NE5G;
-  __CHARACTER result__SE5G,result__XE5G,result__2E5G,Self__RBSE;
-  __CHARACTER result__5F5G,Self__ZLTE,result__0G5G,Self__BFFF;
-  __CHARACTER result__EH5G,cc__KFRE,cc__CNRE;
-  result__D2P=FALSE__;
-  pos_old__E2P= 0;
-  if (read_space__3RD()) {
-    result__ZD5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__ZD5G=((__CHARACTER )(( 0)));
-    } else {
-      result__ZD5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-    };
-    result__U1CH=FALSE__;
-    if ((((__INTEGER_8 )result__ZD5G) >= ((__INTEGER_8 )'0'))) {
-      result__U1CH=(((__INTEGER_8 )result__ZD5G) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__P2P=result__U1CH;
+  __INTEGER_64 result__2PJE,__tmp__OQJE,result__JRPE,result__RDRE;
+  __INTEGER pos_old__M2P,__tmp__HQJE,Self__1GOE,result__DBSE,j__0PPE;
+  __INTEGER __tmp__URPE,Self__JNQE,i__1BRE,__tmp__2DRE,Self__5FSE;
+  __INTEGER state__4ERE,value__5ERE,i__3ERE,state__ZMRE,result__2MRE;
+  __INTEGER i__YMRE;
+  __STRING *Self__0PJE,*Self__32DH,*Self__F4FH,*Self__XPPE,*Self__HRPE;
+  __STRING *Self__ZBRE,*Self__PDRE,*Self__1ERE,*Self__WMRE;
+  __POSITION pos__UJYG,pos__IKYG,pos__XKYG;
+  __BOOLEAN result__L2P,result__31DH,__tmp__X2P,__tmp__R3P,__tmp__0BSE;
+  __BOOLEAN result__ZPPE,__tmp__SQPE,result__4LTE,__tmp__Z5P;
+  __BOOLEAN result__2BRE,negative__AFRE,result__BFRE,__tmp__PGRE;
+  __BOOLEAN result__5KPG,__tmp__1GRE,result__MLPG,result__FFEH;
+  __BOOLEAN __tmp__PHRE,__tmp__OIRE,result__TRFF,result__JFEH;
+  __BOOLEAN __tmp__CLRE,result__FSFF,result__NFEH,__tmp__PKRE;
+  __BOOLEAN negative__1MRE,__tmp__IORE,result__OMPG,__tmp__1ORE;
+  __BOOLEAN __tmp__QPRE,result__TTFF,__tmp__XQRE,result__FUFF;
+  __BOOLEAN result__Z3DH;
+  __CHARACTER result__ADAH,result__KDAH,result__PDAH,result__UDAH;
+  __CHARACTER result__ZDAH,result__4DAH,result__DEAH,Self__BBSE;
+  __CHARACTER result__GFAH,Self__2LTE,result__BGAH,Self__DQFF;
+  __CHARACTER result__LGAH,cc__CFRE,cc__0MRE;
+  result__L2P=FALSE__;
+  pos_old__M2P= 0;
+  if (read_space__FSD()) {
+    result__ADAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__ADAH=((__CHARACTER )(( 0)));
+    } else {
+      result__ADAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    };
+    result__31DH=FALSE__;
+    if ((((__INTEGER_8 )result__ADAH) >= ((__INTEGER_8 )'0'))) {
+      result__31DH=(((__INTEGER_8 )result__ADAH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__X2P=result__31DH;
   } else {
-    __tmp__P2P=FALSE__;
+    __tmp__X2P=FALSE__;
   };
-  if (__tmp__P2P) {
-    result__D2P=TRUE__;
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    result__DE5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__DE5G=((__CHARACTER )(( 0)));
+  if (__tmp__X2P) {
+    result__L2P=TRUE__;
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    result__KDAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__KDAH=((__CHARACTER )(( 0)));
     } else {
-      result__DE5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__KDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    add_last__ZLT(string_tmp__VH,result__DE5G);
-    pos_old__E2P=position__SBC;
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    while_do__UB0D:
+    add_last__BMT(string_tmp__VH,result__KDAH);
+    pos_old__M2P=position__0BC;
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    while_do__PB0D:
     {
-      result__IE5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__IE5G=((__CHARACTER )(( 0)));
+      result__PDAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__PDAH=((__CHARACTER )(( 0)));
       } else {
-        result__IE5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__PDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if (is_hexadecimal_digit__CSJE(result__IE5G)) {
-        __tmp__J3P=TRUE__;
+      if (is_hexadecimal_digit__0NJE(result__PDAH)) {
+        __tmp__R3P=TRUE__;
       } else {
-        result__NE5G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__NE5G=((__CHARACTER )(( 0)));
+        result__UDAH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__UDAH=((__CHARACTER )(( 0)));
         } else {
-          result__NE5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__UDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__J3P=(result__NE5G == '_');
+        __tmp__R3P=(result__UDAH == '_');
       };
-      if (__tmp__J3P) {
-        result__SE5G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__SE5G=((__CHARACTER )(( 0)));
+      if (__tmp__R3P) {
+        result__ZDAH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__ZDAH=((__CHARACTER )(( 0)));
         } else {
-          result__SE5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__ZDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__SE5G != '_')) {
-          result__XE5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__XE5G=((__CHARACTER )(( 0)));
+        if ((result__ZDAH != '_')) {
+          result__4DAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__4DAH=((__CHARACTER )(( 0)));
           } else {
-            result__XE5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__4DAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__XE5G);
+          add_last__BMT(string_tmp__VH,result__4DAH);
         };
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto while_do__UB0D;
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto while_do__PB0D;
       };
     };
-    result__2E5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__2E5G=((__CHARACTER )(( 0)));
+    result__DEAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__DEAH=((__CHARACTER )(( 0)));
     } else {
-      result__2E5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__DEAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__2E5G == 'h')) {
-      Self__CUJE=((__STRING *)string_tmp__VH);
-      result__EUJE= 0;
-      __tmp__PUJE=Self__CUJE->count__WFC;
-      Self__YKOE= 1;
-      while ((Self__YKOE <= __tmp__PUJE)) {
-        __tmp__WUJE=(__INTEGER_64)(result__EUJE <<  4);
-        Self__RBSE=((__CHARACTER *)Self__CUJE->storage__BCS)[(__INTEGER)(Self__YKOE -  1)];
-        result__TBSE= 0;
-        if ((((__INTEGER_8 )Self__RBSE) < ((__INTEGER_8 )'A'))) {
-          result__TBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__RBSE) -  48));
-          __tmp__KCSE=TRUE__;
+    if ((result__DEAH == 'h')) {
+      Self__0PJE=((__STRING *)string_tmp__VH);
+      result__2PJE= 0;
+      __tmp__HQJE=Self__0PJE->count__4FC;
+      Self__1GOE= 1;
+      while ((Self__1GOE <= __tmp__HQJE)) {
+        __tmp__OQJE=(__INTEGER_64)(result__2PJE <<  4);
+        Self__BBSE=((__CHARACTER *)Self__0PJE->storage__JCS)[(__INTEGER)(Self__1GOE -  1)];
+        result__DBSE= 0;
+        if ((((__INTEGER_8 )Self__BBSE) < ((__INTEGER_8 )'A'))) {
+          result__DBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__BBSE) -  48));
+          __tmp__0BSE=TRUE__;
         } else {
-          __tmp__KCSE=FALSE__;
+          __tmp__0BSE=FALSE__;
         };
-        if ((! __tmp__KCSE)) {
-          if ((((__INTEGER_8 )Self__RBSE) < ((__INTEGER_8 )'a'))) {
-            result__TBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__RBSE) -  55));
+        if ((! __tmp__0BSE)) {
+          if ((((__INTEGER_8 )Self__BBSE) < ((__INTEGER_8 )'a'))) {
+            result__DBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__BBSE) -  55));
           } else {
-            result__TBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__RBSE) -  87));
+            result__DBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__BBSE) -  87));
           };
         };
-        result__EUJE=(__INTEGER_64)(__tmp__WUJE | ((__INTEGER_64 )result__TBSE));
-        Self__YKOE=(__INTEGER)(Self__YKOE +  1);
+        result__2PJE=(__INTEGER_64)(__tmp__OQJE | ((__INTEGER_64 )result__DBSE));
+        Self__1GOE=(__INTEGER)(Self__1GOE +  1);
       };
-      last_integer__ZRO=result__EUJE;
-      position__SBC=(__INTEGER)(position__SBC +  1);
+      last_integer__BSO=result__2PJE;
+      position__0BC=(__INTEGER)(position__0BC +  1);
     } else {
-      Self__T2CH=((__STRING *)string_tmp__VH);
-      if ((((__INTEGER_8 )((__CHARACTER *)Self__T2CH->storage__BCS)[(__INTEGER)(Self__T2CH->count__WFC -  1)]) > ((__INTEGER_8 )'9'))) {
-        Self__V2EH=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__V2EH->count__WFC)) {
-          Self__V2EH->count__WFC= 0;
+      Self__32DH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__32DH->storage__JCS)[(__INTEGER)(Self__32DH->count__4FC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__F4FH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__F4FH->count__4FC)) {
+          Self__F4FH->count__4FC= 0;
         } else {
-          Self__V2EH->count__WFC=(__INTEGER)(Self__V2EH->count__WFC -  1);
+          Self__F4FH->count__4FC=(__INTEGER)(Self__F4FH->count__4FC -  1);
         };
-        position__SBC=(__INTEGER)(position__SBC -  1);
+        position__0BC=(__INTEGER)(position__0BC -  1);
       };
-      result__5F5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__5F5G=((__CHARACTER )(( 0)));
+      result__GFAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__GFAH=((__CHARACTER )(( 0)));
       } else {
-        result__5F5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__GFAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__5F5G == 'o')) {
-        Self__BSPE=((__STRING *)string_tmp__VH);
-        result__DSPE=FALSE__;
-        j__ESPE= 0;
-        if ((Self__BSPE->count__WFC !=  0)) {
-          j__ESPE= 1;
-          until_do__4DSE:
+      if ((result__GFAH == 'o')) {
+        Self__XPPE=((__STRING *)string_tmp__VH);
+        result__ZPPE=FALSE__;
+        j__0PPE= 0;
+        if ((Self__XPPE->count__4FC !=  0)) {
+          j__0PPE= 1;
+          until_do__ODSE:
           {
-            if ((j__ESPE > Self__BSPE->count__WFC)) {
-              __tmp__2SPE=TRUE__;
+            if ((j__0PPE > Self__XPPE->count__4FC)) {
+              __tmp__SQPE=TRUE__;
             } else {
-              Self__ZLTE=((__CHARACTER *)Self__BSPE->storage__BCS)[(__INTEGER)(j__ESPE -  1)];
-              result__1LTE=FALSE__;
-              if ((((__INTEGER_8 )Self__ZLTE) >= ((__INTEGER_8 )'0'))) {
-                result__1LTE=(((__INTEGER_8 )Self__ZLTE) <= ((__INTEGER_8 )'7'));
+              Self__2LTE=((__CHARACTER *)Self__XPPE->storage__JCS)[(__INTEGER)(j__0PPE -  1)];
+              result__4LTE=FALSE__;
+              if ((((__INTEGER_8 )Self__2LTE) >= ((__INTEGER_8 )'0'))) {
+                result__4LTE=(((__INTEGER_8 )Self__2LTE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__2SPE=(! result__1LTE);
+              __tmp__SQPE=(! result__4LTE);
             };
-            if ((! __tmp__2SPE)) {
-              j__ESPE=(__INTEGER)(j__ESPE +  1);
-              goto until_do__4DSE;
+            if ((! __tmp__SQPE)) {
+              j__0PPE=(__INTEGER)(j__0PPE +  1);
+              goto until_do__ODSE;
             };
           };
-          result__DSPE=(j__ESPE > Self__BSPE->count__WFC);
+          result__ZPPE=(j__0PPE > Self__XPPE->count__4FC);
         };
-        if ((! result__DSPE)) {
-          pos__FMXG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_305));
-          put_position__UOG(pos__FMXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__ZPPE)) {
+          pos__UJYG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_304));
+          put_position__2OG(pos__UJYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        Self__RTPE=((__STRING *)string_tmp__VH);
-        result__TTPE= 0;
-        __tmp__4TPE=Self__RTPE->count__WFC;
-        Self__YNQE= 1;
-        while ((Self__YNQE <= __tmp__4TPE)) {
-          result__TTPE=(__INTEGER_64)((__INTEGER_64)(result__TTPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__RTPE->storage__BCS)[(__INTEGER)(Self__YNQE -  1)]) -  48))));
-          Self__YNQE=(__INTEGER)(Self__YNQE +  1);
-        };
-        last_integer__ZRO=result__TTPE;
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        __tmp__R5P=TRUE__;
-      } else {
-        __tmp__R5P=FALSE__;
-      };
-      if ((! __tmp__R5P)) {
-        result__0G5G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__0G5G=((__CHARACTER )(( 0)));
-        } else {
-          result__0G5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-        };
-        if ((result__0G5G == 'b')) {
-          Self__BCRE=((__STRING *)string_tmp__VH);
-          i__DCRE=Self__BCRE->count__WFC;
-          result__ECRE=TRUE__;
-          while ((! ((! result__ECRE) || (i__DCRE ==  0)))) {
-            Self__BFFF=((__CHARACTER *)Self__BCRE->storage__BCS)[(__INTEGER)(i__DCRE -  1)];
-            result__ECRE=((Self__BFFF == '0') || (Self__BFFF == '1'));
-            i__DCRE=(__INTEGER)(i__DCRE -  1);
-          };
-          if ((! result__ECRE)) {
-            pos__ZMXG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_306));
-            put_position__UOG(pos__ZMXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        Self__HRPE=((__STRING *)string_tmp__VH);
+        result__JRPE= 0;
+        __tmp__URPE=Self__HRPE->count__4FC;
+        Self__JNQE= 1;
+        while ((Self__JNQE <= __tmp__URPE)) {
+          result__JRPE=(__INTEGER_64)((__INTEGER_64)(result__JRPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__HRPE->storage__JCS)[(__INTEGER)(Self__JNQE -  1)]) -  48))));
+          Self__JNQE=(__INTEGER)(Self__JNQE +  1);
+        };
+        last_integer__BSO=result__JRPE;
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        __tmp__Z5P=TRUE__;
+      } else {
+        __tmp__Z5P=FALSE__;
+      };
+      if ((! __tmp__Z5P)) {
+        result__BGAH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__BGAH=((__CHARACTER )(( 0)));
+        } else {
+          result__BGAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        };
+        if ((result__BGAH == 'b')) {
+          Self__ZBRE=((__STRING *)string_tmp__VH);
+          i__1BRE=Self__ZBRE->count__4FC;
+          result__2BRE=TRUE__;
+          while ((! ((! result__2BRE) || (i__1BRE ==  0)))) {
+            Self__DQFF=((__CHARACTER *)Self__ZBRE->storage__JCS)[(__INTEGER)(i__1BRE -  1)];
+            result__2BRE=((Self__DQFF == '0') || (Self__DQFF == '1'));
+            i__1BRE=(__INTEGER)(i__1BRE -  1);
+          };
+          if ((! result__2BRE)) {
+            pos__IKYG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_305));
+            put_position__2OG(pos__IKYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          Self__XDRE=((__STRING *)string_tmp__VH);
-          result__ZDRE= 0;
-          __tmp__EERE=Self__XDRE->count__WFC;
-          Self__PGSE= 1;
-          while ((Self__PGSE <= __tmp__EERE)) {
-            result__ZDRE=(__INTEGER_64)(result__ZDRE <<  1);
-            if ((((__CHARACTER *)Self__XDRE->storage__BCS)[(__INTEGER)(Self__PGSE -  1)] == '1')) {
-              result__ZDRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__ZDRE) &  -2));
-            };
-            Self__PGSE=(__INTEGER)(Self__PGSE +  1);
-          };
-          last_integer__ZRO=result__ZDRE;
-          position__SBC=(__INTEGER)(position__SBC +  1);
-        } else {
-          result__EH5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__EH5G=((__CHARACTER )(( 0)));
-          } else {
-            result__EH5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-          };
-          if ((result__EH5G == 'd')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-          };
-          Self__DFRE=((__STRING *)string_tmp__VH);
-          state__GFRE= 0;
-          value__HFRE= 0;
-          negative__IFRE=FALSE__;
-          result__JFRE=FALSE__;
-          cc__KFRE='\0';
-          i__FFRE= 1;
-          while ((! ((state__GFRE ==  4) || (i__FFRE > Self__DFRE->count__WFC)))) {
-            cc__KFRE=((__CHARACTER *)Self__DFRE->storage__BCS)[(__INTEGER)(i__FFRE -  1)];
-            if ((state__GFRE ==  0)) {
-              if ((((((((cc__KFRE == ' ') || (cc__KFRE == '\t')) || (cc__KFRE == '\n')) || (cc__KFRE == '\r')) || (cc__KFRE == '\0')) || (cc__KFRE == '\f')) || (cc__KFRE == '\v'))) {
-                __tmp__XGRE=TRUE__;
+          Self__PDRE=((__STRING *)string_tmp__VH);
+          result__RDRE= 0;
+          __tmp__2DRE=Self__PDRE->count__4FC;
+          Self__5FSE= 1;
+          while ((Self__5FSE <= __tmp__2DRE)) {
+            result__RDRE=(__INTEGER_64)(result__RDRE <<  1);
+            if ((((__CHARACTER *)Self__PDRE->storage__JCS)[(__INTEGER)(Self__5FSE -  1)] == '1')) {
+              result__RDRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__RDRE) &  -2));
+            };
+            Self__5FSE=(__INTEGER)(Self__5FSE +  1);
+          };
+          last_integer__BSO=result__RDRE;
+          position__0BC=(__INTEGER)(position__0BC +  1);
+        } else {
+          result__LGAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__LGAH=((__CHARACTER )(( 0)));
+          } else {
+            result__LGAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          };
+          if ((result__LGAH == 'd')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+          };
+          Self__1ERE=((__STRING *)string_tmp__VH);
+          state__4ERE= 0;
+          value__5ERE= 0;
+          negative__AFRE=FALSE__;
+          result__BFRE=FALSE__;
+          cc__CFRE='\0';
+          i__3ERE= 1;
+          while ((! ((state__4ERE ==  4) || (i__3ERE > Self__1ERE->count__4FC)))) {
+            cc__CFRE=((__CHARACTER *)Self__1ERE->storage__JCS)[(__INTEGER)(i__3ERE -  1)];
+            if ((state__4ERE ==  0)) {
+              if ((((((((cc__CFRE == ' ') || (cc__CFRE == '\t')) || (cc__CFRE == '\n')) || (cc__CFRE == '\r')) || (cc__CFRE == '\0')) || (cc__CFRE == '\f')) || (cc__CFRE == '\v'))) {
+                __tmp__PGRE=TRUE__;
               } else {
-                result__WOOG=(cc__KFRE == '+');
-                if (result__WOOG) {
-                  state__GFRE= 1;
+                result__5KPG=(cc__CFRE == '+');
+                if (result__5KPG) {
+                  state__4ERE= 1;
                 };
-                __tmp__XGRE=result__WOOG;
+                __tmp__PGRE=result__5KPG;
               };
-              if (__tmp__XGRE) {
-                __tmp__DHRE=TRUE__;
+              if (__tmp__PGRE) {
+                __tmp__1GRE=TRUE__;
               } else {
-                result__DPOG=(cc__KFRE == '-');
-                if (result__DPOG) {
-                  negative__IFRE=TRUE__;
-                  state__GFRE= 1;
+                result__MLPG=(cc__CFRE == '-');
+                if (result__MLPG) {
+                  negative__AFRE=TRUE__;
+                  state__4ERE= 1;
                 };
-                __tmp__DHRE=result__DPOG;
+                __tmp__1GRE=result__MLPG;
               };
-              if ((! __tmp__DHRE)) {
-                result__TEDH=FALSE__;
-                if ((((__INTEGER_8 )cc__KFRE) >= ((__INTEGER_8 )'0'))) {
-                  result__TEDH=(((__INTEGER_8 )cc__KFRE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__1GRE)) {
+                result__FFEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CFRE) >= ((__INTEGER_8 )'0'))) {
+                  result__FFEH=(((__INTEGER_8 )cc__CFRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__TEDH) {
-                  value__HFRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KFRE)) -  48);
-                  state__GFRE= 2;
+                if (result__FFEH) {
+                  value__5ERE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48);
+                  state__4ERE= 2;
                 } else {
-                  state__GFRE= 4;
+                  state__4ERE= 4;
                 };
               };
-              __tmp__XHRE=TRUE__;
+              __tmp__PHRE=TRUE__;
             } else {
-              __tmp__XHRE=FALSE__;
+              __tmp__PHRE=FALSE__;
             };
-            if (__tmp__XHRE) {
-              __tmp__WIRE=TRUE__;
+            if (__tmp__PHRE) {
+              __tmp__OIRE=TRUE__;
             } else {
-              result__RGFF=(state__GFRE ==  1);
-              if (result__RGFF) {
-                result__WEDH=FALSE__;
-                if ((((__INTEGER_8 )cc__KFRE) >= ((__INTEGER_8 )'0'))) {
-                  result__WEDH=(((__INTEGER_8 )cc__KFRE) <= ((__INTEGER_8 )'9'));
+              result__TRFF=(state__4ERE ==  1);
+              if (result__TRFF) {
+                result__JFEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CFRE) >= ((__INTEGER_8 )'0'))) {
+                  result__JFEH=(((__INTEGER_8 )cc__CFRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__WEDH) {
-                  value__HFRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KFRE)) -  48);
-                  if (negative__IFRE) {
-                    value__HFRE=(__INTEGER)(- value__HFRE);
+                if (result__JFEH) {
+                  value__5ERE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48);
+                  if (negative__AFRE) {
+                    value__5ERE=(__INTEGER)(- value__5ERE);
                   };
-                  state__GFRE= 2;
+                  state__4ERE= 2;
                 } else {
-                  state__GFRE= 4;
+                  state__4ERE= 4;
                 };
               };
-              __tmp__WIRE=result__RGFF;
+              __tmp__OIRE=result__TRFF;
             };
-            if (__tmp__WIRE) {
-              __tmp__KLRE=TRUE__;
+            if (__tmp__OIRE) {
+              __tmp__CLRE=TRUE__;
             } else {
-              result__DHFF=(state__GFRE ==  2);
-              if (result__DHFF) {
-                result__ZEDH=FALSE__;
-                if ((((__INTEGER_8 )cc__KFRE) >= ((__INTEGER_8 )'0'))) {
-                  result__ZEDH=(((__INTEGER_8 )cc__KFRE) <= ((__INTEGER_8 )'9'));
+              result__FSFF=(state__4ERE ==  2);
+              if (result__FSFF) {
+                result__NFEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CFRE) >= ((__INTEGER_8 )'0'))) {
+                  result__NFEH=(((__INTEGER_8 )cc__CFRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__ZEDH) {
-                  if (negative__IFRE) {
-                    value__HFRE=(__INTEGER)((__INTEGER)( 10 * value__HFRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KFRE)) -  48));
+                if (result__NFEH) {
+                  if (negative__AFRE) {
+                    value__5ERE=(__INTEGER)((__INTEGER)( 10 * value__5ERE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48));
                   } else {
-                    value__HFRE=(__INTEGER)((__INTEGER)( 10 * value__HFRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__KFRE)) -  48));
+                    value__5ERE=(__INTEGER)((__INTEGER)( 10 * value__5ERE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48));
                   };
-                  if (((negative__IFRE && (value__HFRE >  0)) || ((! negative__IFRE) && (value__HFRE <  0)))) {
-                    state__GFRE= 4;
+                  if (((negative__AFRE && (value__5ERE >  0)) || ((! negative__AFRE) && (value__5ERE <  0)))) {
+                    state__4ERE= 4;
                   };
-                  __tmp__XKRE=TRUE__;
+                  __tmp__PKRE=TRUE__;
                 } else {
-                  __tmp__XKRE=FALSE__;
+                  __tmp__PKRE=FALSE__;
                 };
-                if ((! __tmp__XKRE)) {
-                  if ((((((((cc__KFRE == ' ') || (cc__KFRE == '\t')) || (cc__KFRE == '\n')) || (cc__KFRE == '\r')) || (cc__KFRE == '\0')) || (cc__KFRE == '\f')) || (cc__KFRE == '\v'))) {
-                    state__GFRE= 3;
+                if ((! __tmp__PKRE)) {
+                  if ((((((((cc__CFRE == ' ') || (cc__CFRE == '\t')) || (cc__CFRE == '\n')) || (cc__CFRE == '\r')) || (cc__CFRE == '\0')) || (cc__CFRE == '\f')) || (cc__CFRE == '\v'))) {
+                    state__4ERE= 3;
                   } else {
-                    state__GFRE= 4;
+                    state__4ERE= 4;
                   };
                 };
               };
-              __tmp__KLRE=result__DHFF;
+              __tmp__CLRE=result__FSFF;
             };
-            if ((! __tmp__KLRE)) {
-              if ((state__GFRE ==  3)) {
-                if ((! (((((((cc__KFRE == ' ') || (cc__KFRE == '\t')) || (cc__KFRE == '\n')) || (cc__KFRE == '\r')) || (cc__KFRE == '\0')) || (cc__KFRE == '\f')) || (cc__KFRE == '\v')))) {
-                  state__GFRE= 4;
+            if ((! __tmp__CLRE)) {
+              if ((state__4ERE ==  3)) {
+                if ((! (((((((cc__CFRE == ' ') || (cc__CFRE == '\t')) || (cc__CFRE == '\n')) || (cc__CFRE == '\r')) || (cc__CFRE == '\0')) || (cc__CFRE == '\f')) || (cc__CFRE == '\v')))) {
+                  state__4ERE= 4;
                 };
               };
             };
-            i__FFRE=(__INTEGER)(i__FFRE +  1);
+            i__3ERE=(__INTEGER)(i__3ERE +  1);
           };
-          if (((state__GFRE !=  0) && (state__GFRE !=  4))) {
-            result__JFRE=TRUE__;
+          if (((state__4ERE !=  0) && (state__4ERE !=  4))) {
+            result__BFRE=TRUE__;
           };
-          if ((! result__JFRE)) {
-            pos__INXG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_307));
-            put_position__UOG(pos__INXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__BFRE)) {
+            pos__XKYG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_306));
+            put_position__2OG(pos__XKYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          Self__4MRE=((__STRING *)string_tmp__VH);
-          state__BNRE= 0;
-          cc__CNRE='\0';
-          negative__DNRE=FALSE__;
-          result__ENRE= 0;
-          i__ANRE= 1;
-          while ((i__ANRE <= Self__4MRE->count__WFC)) {
-            cc__CNRE=((__CHARACTER *)Self__4MRE->storage__BCS)[(__INTEGER)(i__ANRE -  1)];
-            if ((state__BNRE ==  0)) {
-              if ((((((((cc__CNRE == ' ') || (cc__CNRE == '\t')) || (cc__CNRE == '\n')) || (cc__CNRE == '\r')) || (cc__CNRE == '\0')) || (cc__CNRE == '\f')) || (cc__CNRE == '\v'))) {
-                __tmp__QORE=TRUE__;
+          Self__WMRE=((__STRING *)string_tmp__VH);
+          state__ZMRE= 0;
+          cc__0MRE='\0';
+          negative__1MRE=FALSE__;
+          result__2MRE= 0;
+          i__YMRE= 1;
+          while ((i__YMRE <= Self__WMRE->count__4FC)) {
+            cc__0MRE=((__CHARACTER *)Self__WMRE->storage__JCS)[(__INTEGER)(i__YMRE -  1)];
+            if ((state__ZMRE ==  0)) {
+              if ((((((((cc__0MRE == ' ') || (cc__0MRE == '\t')) || (cc__0MRE == '\n')) || (cc__0MRE == '\r')) || (cc__0MRE == '\0')) || (cc__0MRE == '\f')) || (cc__0MRE == '\v'))) {
+                __tmp__IORE=TRUE__;
               } else {
-                result__FQOG=(cc__CNRE == '+');
-                if (result__FQOG) {
-                  state__BNRE= 1;
+                result__OMPG=(cc__0MRE == '+');
+                if (result__OMPG) {
+                  state__ZMRE= 1;
                 };
-                __tmp__QORE=result__FQOG;
+                __tmp__IORE=result__OMPG;
               };
-              if ((! __tmp__QORE)) {
-                if ((cc__CNRE == '-')) {
-                  negative__DNRE=TRUE__;
-                  state__BNRE= 1;
+              if ((! __tmp__IORE)) {
+                if ((cc__0MRE == '-')) {
+                  negative__1MRE=TRUE__;
+                  state__ZMRE= 1;
                 } else {
-                  result__ENRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CNRE)) -  48);
-                  state__BNRE= 2;
+                  result__2MRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48);
+                  state__ZMRE= 2;
                 };
               };
-              __tmp__DPRE=TRUE__;
+              __tmp__1ORE=TRUE__;
             } else {
-              __tmp__DPRE=FALSE__;
+              __tmp__1ORE=FALSE__;
             };
-            if (__tmp__DPRE) {
-              __tmp__YPRE=TRUE__;
+            if (__tmp__1ORE) {
+              __tmp__QPRE=TRUE__;
             } else {
-              result__RIFF=(state__BNRE ==  1);
-              if (result__RIFF) {
-                result__ENRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CNRE)) -  48);
-                if (negative__DNRE) {
-                  result__ENRE=(__INTEGER)(- result__ENRE);
+              result__TTFF=(state__ZMRE ==  1);
+              if (result__TTFF) {
+                result__2MRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48);
+                if (negative__1MRE) {
+                  result__2MRE=(__INTEGER)(- result__2MRE);
                 };
-                state__BNRE= 2;
+                state__ZMRE= 2;
               };
-              __tmp__YPRE=result__RIFF;
+              __tmp__QPRE=result__TTFF;
             };
-            if (__tmp__YPRE) {
-              __tmp__5QRE=TRUE__;
+            if (__tmp__QPRE) {
+              __tmp__XQRE=TRUE__;
             } else {
-              result__DJFF=(state__BNRE ==  2);
-              if (result__DJFF) {
-                result__P3CH=FALSE__;
-                if ((((__INTEGER_8 )cc__CNRE) >= ((__INTEGER_8 )'0'))) {
-                  result__P3CH=(((__INTEGER_8 )cc__CNRE) <= ((__INTEGER_8 )'9'));
+              result__FUFF=(state__ZMRE ==  2);
+              if (result__FUFF) {
+                result__Z3DH=FALSE__;
+                if ((((__INTEGER_8 )cc__0MRE) >= ((__INTEGER_8 )'0'))) {
+                  result__Z3DH=(((__INTEGER_8 )cc__0MRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__P3CH) {
-                  if (negative__DNRE) {
-                    result__ENRE=(__INTEGER)((__INTEGER)( 10 * result__ENRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CNRE)) -  48));
+                if (result__Z3DH) {
+                  if (negative__1MRE) {
+                    result__2MRE=(__INTEGER)((__INTEGER)( 10 * result__2MRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48));
                   } else {
-                    result__ENRE=(__INTEGER)((__INTEGER)( 10 * result__ENRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CNRE)) -  48));
+                    result__2MRE=(__INTEGER)((__INTEGER)( 10 * result__2MRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48));
                   };
                 } else {
-                  state__BNRE= 3;
+                  state__ZMRE= 3;
                 };
               };
-              __tmp__5QRE=result__DJFF;
+              __tmp__XQRE=result__FUFF;
             };
-            if ((! __tmp__5QRE)) {
-              if ((state__BNRE ==  3)) {
-                i__ANRE=Self__4MRE->count__WFC;
+            if ((! __tmp__XQRE)) {
+              if ((state__ZMRE ==  3)) {
+                i__YMRE=Self__WMRE->count__4FC;
               };
             };
-            i__ANRE=(__INTEGER)(i__ANRE +  1);
+            i__YMRE=(__INTEGER)(i__YMRE +  1);
           };
-          last_integer__ZRO=((__INTEGER_64 )result__ENRE);
+          last_integer__BSO=((__INTEGER_64 )result__2MRE);
         };
       };
     };
   };
-  if (result__D2P) {
-    short__token__to__LBD((&__string_121),pos_old__E2P,position__SBC);
+  if (result__L2P) {
+    short__token__to__TBD((&__string_121),pos_old__M2P,position__0BC);
   };
-  return(result__D2P);
+  return(result__L2P);
 }
 
-static void* readlip_expr__JTPB()
+static void* readlip_expr__RTPB()
 // () With resultRecursive, No inlinable.
 {
-  void *result__MTPB,*val__NTPB,*result__ILYC,*val__QLYC;
-  void *nam__OTPB;
-  __POSITION pos__TNXG,p__XN3B,pos__1NXG,pos__3NXG,pos__5NXG,pos__BOXG;
-  __POSITION pos__DOXG,pos__FOXG,p__0LID,p__VYHE,pos__TOXG;
-  __LIP_AFFECT *result__UY4B,*Self__JIHC;
-  __POINTER ptr__VY4B,ptr_table__0GIH,next__ZGIH,result__1GIH;
-  __POINTER ptr_table__5GIH,next__4GIH,result__AHIH,ptr__QRKD;
-  __POINTER ptr_table__ZHIH,next__YHIH,result__0HIH,ptr_table__4HIH;
-  __POINTER next__3HIH,result__5HIH,ptr__YFNE,ptr_table__DIIH;
-  __POINTER next__CIIH,result__EIIH,ptr_table__IIIH,next__HIIH;
-  __POINTER result__JIIH;
-  __INTEGER typ_id__0Y4B,typ_id__VRKD,typ_id__3FNE;
-  __UINTEGER_32 sz__XY4B,a__Z2EH,new_size__02EH,t__42EH,a__32EH;
-  __UINTEGER_32 new_size__CHIH,lab_type__BHIH,sz__SRKD,a__B3EH;
-  __UINTEGER_32 new_size__C3EH,t__G3EH,a__F3EH,new_size__BIIH;
-  __UINTEGER_32 lab_type__AIIH,sz__0FNE,a__J3EH,new_size__K3EH,t__O3EH;
-  __UINTEGER_32 a__N3EH,new_size__LIIH,lab_type__KIIH;
-  __LIP_IF *result__PRKD,*Self__PQTD;
-  __LIP_PRINT *result__XFNE,*Self__4BWE;
-  __BOOLEAN result__DHIH,__tmp__CVPB,result__GHIH,result__JHIH;
-  __BOOLEAN result__MHIH,result__PHIH,result__SHIH,result__VHIH;
-  __BOOLEAN __tmp__CPYC;
-  __CHARACTER result__EHIH,result__HHIH,result__KHIH,result__NHIH;
-  __CHARACTER result__QHIH,result__THIH,result__WHIH;
-  void *the__OLYC,*els__PLYC,*result__LRGH,*result__AKID;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__MRGH,*Self__NRGH,*Self__CJ5D;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__YJ5D;
-  result__MTPB=NULL;
-  val__NTPB=NULL;
-  nam__OTPB=NULL;
-  old_position__DRI=position__SBC;
-  old_pos_cur__FRI=pos_cur__VBC;
-  old_pos_line__HRI=pos_line__WBC;
-  old_pos_col__JRI=pos_col__XBC;
-  old_short_derive__LRI=short_derive__BCC;
-  if (read_identifier__LAL()) {
-    nam__OTPB=last_string__I0C;
-    if (read_symbol__DXJ((&__string_12))) {
-      val__NTPB=readlip_expr_operator__MOZB(PARSER__);
-      if (((void *)val__NTPB == (void *)NULL)) {
-        pos__TNXG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_240));
-        put_position__UOG(pos__TNXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+  void *result__UTPB,*val__VTPB,*result__QLYC,*val__YLYC;
+  void *nam__WTPB;
+  __POSITION pos__CLYG,p__5N3B,pos__KLYG,pos__MLYG,pos__OLYG,pos__QLYG;
+  __POSITION pos__SLYG,pos__ULYG,p__CMID,p__SWHE,pos__CMYG;
+  __LIP_AFFECT *result__2Y4B,*Self__RIHC;
+  __POINTER ptr__3Y4B,ptr_table__0IJH,next__ZIJH,result__1IJH;
+  __POINTER ptr_table__5IJH,next__4IJH,result__AJJH,ptr__YRKD;
+  __POINTER ptr_table__ZJJH,next__YJJH,result__0JJH,ptr_table__4JJH;
+  __POINTER next__3JJH,result__5JJH,ptr__QBNE,ptr_table__DKJH;
+  __POINTER next__CKJH,result__EKJH,ptr_table__IKJH,next__HKJH;
+  __POINTER result__JKJH;
+  __INTEGER typ_id__CZ4B,typ_id__3RKD,typ_id__VBNE;
+  __UINTEGER_32 sz__5Y4B,a__J4FH,new_size__K4FH,t__O4FH,a__N4FH;
+  __UINTEGER_32 new_size__CJJH,lab_type__BJJH,sz__0RKD,a__R4FH;
+  __UINTEGER_32 new_size__S4FH,t__W4FH,a__V4FH,new_size__BKJH;
+  __UINTEGER_32 lab_type__AKJH,sz__SBNE,a__Z4FH,new_size__04FH,t__44FH;
+  __UINTEGER_32 a__34FH,new_size__LKJH,lab_type__KKJH;
+  __LIP_IF *result__XRKD,*Self__XQTD;
+  __LIP_PRINT *result__PBNE,*Self__BCWE;
+  __BOOLEAN result__DJJH,__tmp__KVPB,result__GJJH,result__JJJH;
+  __BOOLEAN result__MJJH,result__PJJH,result__SJJH,result__VJJH;
+  __BOOLEAN __tmp__KPYC;
+  __CHARACTER result__EJJH,result__HJJH,result__KJJH,result__NJJH;
+  __CHARACTER result__QJJH,result__TJJH,result__WJJH;
+  void *the__WLYC,*els__XLYC,*result__GTHH,*result__IKID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__HTHH,*Self__ITHH,*Self__5G5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__VH5D;
+  result__UTPB=NULL;
+  val__VTPB=NULL;
+  nam__WTPB=NULL;
+  old_position__LRI=position__0BC;
+  old_pos_cur__NRI=pos_cur__3BC;
+  old_pos_line__PRI=pos_line__4BC;
+  old_pos_col__RRI=pos_col__5BC;
+  old_short_derive__TRI=short_derive__JCC;
+  if (read_identifier__TAL()) {
+    nam__WTPB=last_string__Q0C;
+    if (read_symbol__LXJ((&__string_12))) {
+      val__VTPB=readlip_expr_operator__UOZB(PARSER__);
+      if (((void *)val__VTPB == (void *)NULL)) {
+        pos__CLYG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_238));
+        put_position__2OG(pos__CLYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      p__XN3B=current_position__JXF();
-      result__UY4B=NULL;
-      ptr__VY4B=((__POINTER )(NULL));
-      typ_id__0Y4B= 0;
-      sz__XY4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
-      if ((sz__XY4B ==  0)) {
-        result__UY4B=LIP_AFFECT__;
-      } else {
-        typ_id__0Y4B=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XY4B);
-        if ((typ_id__0Y4B == (__INTEGER)(-  1))) {
-          a__Z2EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__02EH=(__UINTEGER_32)((__UINTEGER_32)(sz__XY4B + a__Z2EH) & (__UINTEGER_32)(~ a__Z2EH));
-          ptr_table__0GIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__02EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__ZGIH=((__POINTER )(NULL));
-          result__1GIH=((__POINTER *)ptr_table__0GIH)[ 0];
-          if ((result__1GIH == (void *)NULL)) {
-            result__1GIH=new_lab__MRJ(new_size__02EH);
-            next__ZGIH=(void *)((unsigned long)result__1GIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02EH)));
-            ((__POINTER *)next__ZGIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0GIH)[ 0]=next__ZGIH;
-          } else {
-            next__ZGIH=((__POINTER *)result__1GIH)[ 0];
-            if ((next__ZGIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1GIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__02EH <<  1)) <=  4096)) {
-                next__ZGIH=(void *)((unsigned long)result__1GIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__02EH)));
+      p__5N3B=current_position__RXF();
+      result__2Y4B=NULL;
+      ptr__3Y4B=((__POINTER )(NULL));
+      typ_id__CZ4B= 0;
+      sz__5Y4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__5Y4B ==  0)) {
+        result__2Y4B=LIP_AFFECT__;
+      } else {
+        typ_id__CZ4B=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5Y4B);
+        if ((typ_id__CZ4B == (__INTEGER)(-  1))) {
+          a__J4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__K4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__5Y4B + a__J4FH) & (__UINTEGER_32)(~ a__J4FH));
+          ptr_table__0IJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ZIJH=((__POINTER )(NULL));
+          result__1IJH=((__POINTER *)ptr_table__0IJH)[ 0];
+          if ((result__1IJH == (void *)NULL)) {
+            result__1IJH=new_lab__URJ(new_size__K4FH);
+            next__ZIJH=(void *)((unsigned long)result__1IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K4FH)));
+            ((__POINTER *)next__ZIJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0IJH)[ 0]=next__ZIJH;
+          } else {
+            next__ZIJH=((__POINTER *)result__1IJH)[ 0];
+            if ((next__ZIJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1IJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__K4FH <<  1)) <=  4096)) {
+                next__ZIJH=(void *)((unsigned long)result__1IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K4FH)));
               } else {
-                next__ZGIH=new_lab__MRJ(new_size__02EH);
+                next__ZIJH=new_lab__URJ(new_size__K4FH);
               };
-              ((__POINTER *)next__ZGIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0GIH)[ 0]=next__ZGIH;
+              ((__POINTER *)next__ZIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0IJH)[ 0]=next__ZIJH;
             } else {
-              ((__POINTER *)result__1GIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__1GIH=next__ZGIH;
-            };
-          };
-          ptr__VY4B=result__1GIH;
-        } else {
-          t__42EH=((__UINTEGER_32 )typ_id__0Y4B);
-          a__32EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__CHIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XY4B + a__32EH) & (__UINTEGER_32)(~ a__32EH));
-          ptr_table__5GIH=((__POINTER )(&(table_type[(t__42EH)])));
-          lab_type__BHIH=(__UINTEGER_32)(t__42EH |  1);
-          next__4GIH=((__POINTER )(NULL));
-          result__AHIH=((__POINTER *)ptr_table__5GIH)[ 0];
-          if ((result__AHIH == (void *)NULL)) {
-            result__AHIH=new_lab__MRJ(lab_type__BHIH);
-            next__4GIH=(void *)((unsigned long)result__AHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHIH)));
-            ((__POINTER *)next__4GIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5GIH)[ 0]=next__4GIH;
-          } else {
-            next__4GIH=((__POINTER *)result__AHIH)[ 0];
-            if ((next__4GIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AHIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CHIH <<  1)) <=  4096)) {
-                next__4GIH=(void *)((unsigned long)result__AHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CHIH)));
+              ((__POINTER *)result__1IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1IJH=next__ZIJH;
+            };
+          };
+          ptr__3Y4B=result__1IJH;
+        } else {
+          t__O4FH=((__UINTEGER_32 )typ_id__CZ4B);
+          a__N4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5Y4B + a__N4FH) & (__UINTEGER_32)(~ a__N4FH));
+          ptr_table__5IJH=((__POINTER )(&(table_type[(t__O4FH)])));
+          lab_type__BJJH=(__UINTEGER_32)(t__O4FH |  1);
+          next__4IJH=((__POINTER )(NULL));
+          result__AJJH=((__POINTER *)ptr_table__5IJH)[ 0];
+          if ((result__AJJH == (void *)NULL)) {
+            result__AJJH=new_lab__URJ(lab_type__BJJH);
+            next__4IJH=(void *)((unsigned long)result__AJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJJH)));
+            ((__POINTER *)next__4IJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5IJH)[ 0]=next__4IJH;
+          } else {
+            next__4IJH=((__POINTER *)result__AJJH)[ 0];
+            if ((next__4IJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AJJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CJJH <<  1)) <=  4096)) {
+                next__4IJH=(void *)((unsigned long)result__AJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CJJH)));
               } else {
-                next__4GIH=new_lab__MRJ(lab_type__BHIH);
+                next__4IJH=new_lab__URJ(lab_type__BJJH);
               };
-              ((__POINTER *)next__4GIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5GIH)[ 0]=next__4GIH;
+              ((__POINTER *)next__4IJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5IJH)[ 0]=next__4IJH;
             } else {
-              ((__POINTER *)result__AHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4GIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AHIH=next__4GIH;
+              ((__POINTER *)result__AJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__AJJH=next__4IJH;
             };
           };
-          ptr__VY4B=result__AHIH;
+          ptr__3Y4B=result__AJJH;
         };
-        result__UY4B=((__LIP_AFFECT *)ptr__VY4B);
-        *(result__UY4B) = *(LIP_AFFECT__);
+        result__2Y4B=((__LIP_AFFECT *)ptr__3Y4B);
+        *(result__2Y4B) = *(LIP_AFFECT__);
       };
-      Self__JIHC=((__LIP_AFFECT *)result__UY4B);
-      Self__JIHC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ=p__XN3B;
-      Self__JIHC->name__WGFC=nam__OTPB;
-      Self__JIHC->value__IHFC=val__NTPB;
-      result__MTPB=result__UY4B;
+      Self__RIHC=((__LIP_AFFECT *)result__2Y4B);
+      Self__RIHC->parent_lip_code__RUPB.parent_itm_object__HEE.position__VDJ=p__5N3B;
+      Self__RIHC->name__4GFC=nam__WTPB;
+      Self__RIHC->value__QHFC=val__VTPB;
+      result__UTPB=result__2Y4B;
     } else {
-      restore_context__TDL();
+      restore_context__1DL();
     };
   };
-  if (((void *)result__MTPB == (void *)NULL)) {
-    result__MTPB=readlip_expr_operator__MOZB(PARSER__);
-    if (((void *)result__MTPB != (void *)NULL)) {
-      result__DHIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__DHIH=FALSE__;
+  if (((void *)result__UTPB == (void *)NULL)) {
+    result__UTPB=readlip_expr_operator__UOZB(PARSER__);
+    if (((void *)result__UTPB != (void *)NULL)) {
+      result__DJJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__DJJH=FALSE__;
       } else {
-        result__EHIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__EHIH=((__CHARACTER )(( 0)));
+        result__EJJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__EJJH=((__CHARACTER )(( 0)));
         } else {
-          result__EHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__EJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__EHIH == '.')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__DHIH=TRUE__;
+        if ((result__EJJH == '.')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__DJJH=TRUE__;
         };
       };
-      __tmp__CVPB=result__DHIH;
+      __tmp__KVPB=result__DJJH;
     } else {
-      __tmp__CVPB=FALSE__;
+      __tmp__KVPB=FALSE__;
     };
-    if (__tmp__CVPB) {
-      result__ILYC=NULL;
-      the__OLYC=NULL;
-      els__PLYC=NULL;
-      val__QLYC=NULL;
-      if (read_word__QPF((&__string_89))) {
-        result__LRGH=NULL;
-        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID)->parent_arrayed_collection__FKID.upper__POTD <  0)) {
-          result__LRGH=create_with_capacity__2QKD( 16);
+    if (__tmp__KVPB) {
+      result__QLYC=NULL;
+      the__WLYC=NULL;
+      els__XLYC=NULL;
+      val__YLYC=NULL;
+      if (read_word__YPF((&__string_89))) {
+        result__GTHH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID)->parent_arrayed_collection__NKID.upper__XOTD <  0)) {
+          result__GTHH=create_with_capacity__ERKD( 16);
         } else {
-          Self__MRGH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
-          result__LRGH=((void **)Self__MRGH->parent_arrayed_collection__FKID.storage__MBUD)[Self__MRGH->parent_arrayed_collection__FKID.upper__POTD];
-          Self__NRGH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
-          Self__NRGH->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__NRGH->parent_arrayed_collection__FKID.upper__POTD -  1);
+          Self__HTHH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID);
+          result__GTHH=((void **)Self__HTHH->parent_arrayed_collection__NKID.storage__UBUD)[Self__HTHH->parent_arrayed_collection__NKID.upper__XOTD];
+          Self__ITHH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID);
+          Self__ITHH->parent_arrayed_collection__NKID.upper__XOTD=(__INTEGER)(Self__ITHH->parent_arrayed_collection__NKID.upper__XOTD -  1);
         };
-        the__OLYC=result__LRGH;
-        result__GHIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__GHIH=FALSE__;
+        the__WLYC=result__GTHH;
+        result__GJJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__GJJH=FALSE__;
         } else {
-          result__HHIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__HHIH=((__CHARACTER )(( 0)));
+          result__HJJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__HJJH=((__CHARACTER )(( 0)));
           } else {
-            result__HHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__HJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__HHIH == '{')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__GHIH=TRUE__;
+          if ((result__HJJH == '{')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__GJJH=TRUE__;
           };
         };
-        if ((! result__GHIH)) {
-          pos__1NXG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_272));
-          put_position__UOG(pos__1NXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__GJJH)) {
+          pos__KLYG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_271));
+          put_position__2OG(pos__KLYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__1KID:
+        while_do__DLID:
         {
-          val__QLYC=readlip_expr__JTPB();
-          if (((void *)val__QLYC != (void *)NULL)) {
-            add_last__JJUD(the__OLYC,val__QLYC);
-            result__JHIH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__JHIH=FALSE__;
+          val__YLYC=readlip_expr__RTPB();
+          if (((void *)val__YLYC != (void *)NULL)) {
+            add_last__RJUD(the__WLYC,val__YLYC);
+            result__JJJH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__JJJH=FALSE__;
             } else {
-              result__KHIH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__KHIH=((__CHARACTER )(( 0)));
+              result__KJJH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__KJJH=((__CHARACTER )(( 0)));
               } else {
-                result__KHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__KJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__KHIH == ';')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__JHIH=TRUE__;
+              if ((result__KJJH == ';')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__JJJH=TRUE__;
               };
             };
-            if ((! result__JHIH)) {
-              pos__3NXG=current_position__JXF();
-              put_error__text__KNG( 2,(&__string_163));
-              put_position__UOG(pos__3NXG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+            if ((! result__JJJH)) {
+              pos__MLYG=current_position__RXF();
+              put_error__text__SNG( 2,(&__string_165));
+              put_position__2OG(pos__MLYG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__1KID;
+            goto while_do__DLID;
           };
         };
-        result__MHIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__MHIH=FALSE__;
+        result__MJJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__MJJH=FALSE__;
         } else {
-          result__NHIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__NHIH=((__CHARACTER )(( 0)));
+          result__NJJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__NJJH=((__CHARACTER )(( 0)));
           } else {
-            result__NHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__NJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__NHIH == '}')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__MHIH=TRUE__;
+          if ((result__NJJH == '}')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__MJJH=TRUE__;
           };
         };
-        if ((! result__MHIH)) {
-          pos__5NXG=current_position__JXF();
-          put_error__text__KNG( 2,(&__string_272));
-          put_position__UOG(pos__5NXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if ((! result__MJJH)) {
+          pos__OLYG=current_position__RXF();
+          put_error__text__SNG( 2,(&__string_271));
+          put_position__2OG(pos__OLYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        the__OLYC=copy__ILID(result__LRGH);
-        if (read_word__QPF((&__string_90))) {
-          result__AKID=NULL;
-          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID)->parent_arrayed_collection__FKID.upper__POTD <  0)) {
-            result__AKID=create_with_capacity__2QKD( 16);
+        the__WLYC=copy__QLID(result__GTHH);
+        if (read_word__YPF((&__string_90))) {
+          result__IKID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID)->parent_arrayed_collection__NKID.upper__XOTD <  0)) {
+            result__IKID=create_with_capacity__ERKD( 16);
           } else {
-            Self__CJ5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
-            result__AKID=((void **)Self__CJ5D->parent_arrayed_collection__FKID.storage__MBUD)[Self__CJ5D->parent_arrayed_collection__FKID.upper__POTD];
-            Self__YJ5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
-            Self__YJ5D->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__YJ5D->parent_arrayed_collection__FKID.upper__POTD -  1);
+            Self__5G5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID);
+            result__IKID=((void **)Self__5G5D->parent_arrayed_collection__NKID.storage__UBUD)[Self__5G5D->parent_arrayed_collection__NKID.upper__XOTD];
+            Self__VH5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID);
+            Self__VH5D->parent_arrayed_collection__NKID.upper__XOTD=(__INTEGER)(Self__VH5D->parent_arrayed_collection__NKID.upper__XOTD -  1);
           };
-          els__PLYC=result__AKID;
-          result__PHIH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__PHIH=FALSE__;
+          els__XLYC=result__IKID;
+          result__PJJH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__PJJH=FALSE__;
           } else {
-            result__QHIH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__QHIH=((__CHARACTER )(( 0)));
+            result__QJJH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__QJJH=((__CHARACTER )(( 0)));
             } else {
-              result__QHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__QJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__QHIH == '{')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__PHIH=TRUE__;
+            if ((result__QJJH == '{')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__PJJH=TRUE__;
             };
           };
-          if ((! result__PHIH)) {
-            pos__BOXG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_272));
-            put_position__UOG(pos__BOXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__PJJH)) {
+            pos__QLYG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_271));
+            put_position__2OG(pos__QLYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__42LD:
+          while_do__G3LD:
           {
-            val__QLYC=readlip_expr__JTPB();
-            if (((void *)val__QLYC != (void *)NULL)) {
-              add_last__JJUD(els__PLYC,val__QLYC);
-              result__SHIH=FALSE__;
-              if ((! read_space__3RD())) {
-                result__SHIH=FALSE__;
+            val__YLYC=readlip_expr__RTPB();
+            if (((void *)val__YLYC != (void *)NULL)) {
+              add_last__RJUD(els__XLYC,val__YLYC);
+              result__SJJH=FALSE__;
+              if ((! read_space__FSD())) {
+                result__SJJH=FALSE__;
               } else {
-                result__THIH='\0';
-                if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                  result__THIH=((__CHARACTER )(( 0)));
+                result__TJJH='\0';
+                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                  result__TJJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__THIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                  result__TJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
                 };
-                if ((result__THIH == ';')) {
-                  position__SBC=(__INTEGER)(position__SBC +  1);
-                  result__SHIH=TRUE__;
+                if ((result__TJJH == ';')) {
+                  position__0BC=(__INTEGER)(position__0BC +  1);
+                  result__SJJH=TRUE__;
                 };
               };
-              if ((! result__SHIH)) {
-                pos__DOXG=current_position__JXF();
-                put_error__text__KNG( 2,(&__string_163));
-                put_position__UOG(pos__DOXG);
-                put_string__U1F(msg_err__PNG);
-                if ((type_error__ONG !=  2)) {
+              if ((! result__SJJH)) {
+                pos__SLYG=current_position__RXF();
+                put_error__text__SNG( 2,(&__string_165));
+                put_position__2OG(pos__SLYG);
+                put_string__21F(msg_err__XNG);
+                if ((type_error__WNG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__42LD;
+              goto while_do__G3LD;
             };
           };
-          result__VHIH=FALSE__;
-          if ((! read_space__3RD())) {
-            result__VHIH=FALSE__;
+          result__VJJH=FALSE__;
+          if ((! read_space__FSD())) {
+            result__VJJH=FALSE__;
           } else {
-            result__WHIH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__WHIH=((__CHARACTER )(( 0)));
+            result__WJJH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__WJJH=((__CHARACTER )(( 0)));
             } else {
-              result__WHIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__WJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            if ((result__WHIH == '}')) {
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              result__VHIH=TRUE__;
+            if ((result__WJJH == '}')) {
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              result__VJJH=TRUE__;
             };
           };
-          if ((! result__VHIH)) {
-            pos__FOXG=current_position__JXF();
-            put_error__text__KNG( 2,(&__string_272));
-            put_position__UOG(pos__FOXG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+          if ((! result__VJJH)) {
+            pos__ULYG=current_position__RXF();
+            put_error__text__SNG( 2,(&__string_271));
+            put_position__2OG(pos__ULYG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          els__PLYC=copy__ILID(result__AKID);
-        };
-        p__0LID=current_position__JXF();
-        result__PRKD=NULL;
-        ptr__QRKD=((__POINTER )(NULL));
-        typ_id__VRKD= 0;
-        sz__SRKD=((__UINTEGER_32 )sizeof(__LIP_IF));
-        if ((sz__SRKD ==  0)) {
-          result__PRKD=LIP_IF__;
-        } else {
-          typ_id__VRKD=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SRKD);
-          if ((typ_id__VRKD == (__INTEGER)(-  1))) {
-            a__B3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__C3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRKD + a__B3EH) & (__UINTEGER_32)(~ a__B3EH));
-            ptr_table__ZHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__YHIH=((__POINTER )(NULL));
-            result__0HIH=((__POINTER *)ptr_table__ZHIH)[ 0];
-            if ((result__0HIH == (void *)NULL)) {
-              result__0HIH=new_lab__MRJ(new_size__C3EH);
-              next__YHIH=(void *)((unsigned long)result__0HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C3EH)));
-              ((__POINTER *)next__YHIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZHIH)[ 0]=next__YHIH;
+          els__XLYC=copy__QLID(result__IKID);
+        };
+        p__CMID=current_position__RXF();
+        result__XRKD=NULL;
+        ptr__YRKD=((__POINTER )(NULL));
+        typ_id__3RKD= 0;
+        sz__0RKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__0RKD ==  0)) {
+          result__XRKD=LIP_IF__;
+        } else {
+          typ_id__3RKD=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__0RKD);
+          if ((typ_id__3RKD == (__INTEGER)(-  1))) {
+            a__R4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__S4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__0RKD + a__R4FH) & (__UINTEGER_32)(~ a__R4FH));
+            ptr_table__ZJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YJJH=((__POINTER )(NULL));
+            result__0JJH=((__POINTER *)ptr_table__ZJJH)[ 0];
+            if ((result__0JJH == (void *)NULL)) {
+              result__0JJH=new_lab__URJ(new_size__S4FH);
+              next__YJJH=(void *)((unsigned long)result__0JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4FH)));
+              ((__POINTER *)next__YJJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZJJH)[ 0]=next__YJJH;
             } else {
-              next__YHIH=((__POINTER *)result__0HIH)[ 0];
-              if ((next__YHIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0HIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__C3EH <<  1)) <=  4096)) {
-                  next__YHIH=(void *)((unsigned long)result__0HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C3EH)));
+              next__YJJH=((__POINTER *)result__0JJH)[ 0];
+              if ((next__YJJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0JJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__S4FH <<  1)) <=  4096)) {
+                  next__YJJH=(void *)((unsigned long)result__0JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S4FH)));
                 } else {
-                  next__YHIH=new_lab__MRJ(new_size__C3EH);
+                  next__YJJH=new_lab__URJ(new_size__S4FH);
                 };
-                ((__POINTER *)next__YHIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZHIH)[ 0]=next__YHIH;
+                ((__POINTER *)next__YJJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZJJH)[ 0]=next__YJJH;
               } else {
-                ((__POINTER *)result__0HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__0HIH=next__YHIH;
+                ((__POINTER *)result__0JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0JJH=next__YJJH;
               };
             };
-            ptr__QRKD=result__0HIH;
-          } else {
-            t__G3EH=((__UINTEGER_32 )typ_id__VRKD);
-            a__F3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__BIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRKD + a__F3EH) & (__UINTEGER_32)(~ a__F3EH));
-            ptr_table__4HIH=((__POINTER )(&(table_type[(t__G3EH)])));
-            lab_type__AIIH=(__UINTEGER_32)(t__G3EH |  1);
-            next__3HIH=((__POINTER )(NULL));
-            result__5HIH=((__POINTER *)ptr_table__4HIH)[ 0];
-            if ((result__5HIH == (void *)NULL)) {
-              result__5HIH=new_lab__MRJ(lab_type__AIIH);
-              next__3HIH=(void *)((unsigned long)result__5HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIIH)));
-              ((__POINTER *)next__3HIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4HIH)[ 0]=next__3HIH;
+            ptr__YRKD=result__0JJH;
+          } else {
+            t__W4FH=((__UINTEGER_32 )typ_id__3RKD);
+            a__V4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0RKD + a__V4FH) & (__UINTEGER_32)(~ a__V4FH));
+            ptr_table__4JJH=((__POINTER )(&(table_type[(t__W4FH)])));
+            lab_type__AKJH=(__UINTEGER_32)(t__W4FH |  1);
+            next__3JJH=((__POINTER )(NULL));
+            result__5JJH=((__POINTER *)ptr_table__4JJH)[ 0];
+            if ((result__5JJH == (void *)NULL)) {
+              result__5JJH=new_lab__URJ(lab_type__AKJH);
+              next__3JJH=(void *)((unsigned long)result__5JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKJH)));
+              ((__POINTER *)next__3JJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4JJH)[ 0]=next__3JJH;
             } else {
-              next__3HIH=((__POINTER *)result__5HIH)[ 0];
-              if ((next__3HIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5HIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BIIH <<  1)) <=  4096)) {
-                  next__3HIH=(void *)((unsigned long)result__5HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIIH)));
+              next__3JJH=((__POINTER *)result__5JJH)[ 0];
+              if ((next__3JJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5JJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BKJH <<  1)) <=  4096)) {
+                  next__3JJH=(void *)((unsigned long)result__5JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKJH)));
                 } else {
-                  next__3HIH=new_lab__MRJ(lab_type__AIIH);
+                  next__3JJH=new_lab__URJ(lab_type__AKJH);
                 };
-                ((__POINTER *)next__3HIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4HIH)[ 0]=next__3HIH;
+                ((__POINTER *)next__3JJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4JJH)[ 0]=next__3JJH;
               } else {
-                ((__POINTER *)result__5HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3HIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5HIH=next__3HIH;
+                ((__POINTER *)result__5JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5JJH=next__3JJH;
               };
             };
-            ptr__QRKD=result__5HIH;
-          };
-          result__PRKD=((__LIP_IF *)ptr__QRKD);
-          *(result__PRKD) = *(LIP_IF__);
-        };
-        Self__PQTD=((__LIP_IF *)result__PRKD);
-        Self__PQTD->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ=p__0LID;
-        Self__PQTD->condition__ADQD=result__MTPB;
-        Self__PQTD->then__WDQD=the__OLYC;
-        Self__PQTD->else__NEQD=els__PLYC;
-        result__ILYC=result__PRKD;
-        __tmp__CPYC=TRUE__;
-      } else {
-        __tmp__CPYC=FALSE__;
-      };
-      if ((! __tmp__CPYC)) {
-        if (read_word__QPF((&__string_91))) {
-          p__VYHE=current_position__JXF();
-          result__XFNE=NULL;
-          ptr__YFNE=((__POINTER )(NULL));
-          typ_id__3FNE= 0;
-          sz__0FNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
-          if ((sz__0FNE ==  0)) {
-            result__XFNE=LIP_PRINT__;
-          } else {
-            typ_id__3FNE=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__0FNE);
-            if ((typ_id__3FNE == (__INTEGER)(-  1))) {
-              a__J3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__K3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FNE + a__J3EH) & (__UINTEGER_32)(~ a__J3EH));
-              ptr_table__DIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__K3EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__CIIH=((__POINTER )(NULL));
-              result__EIIH=((__POINTER *)ptr_table__DIIH)[ 0];
-              if ((result__EIIH == (void *)NULL)) {
-                result__EIIH=new_lab__MRJ(new_size__K3EH);
-                next__CIIH=(void *)((unsigned long)result__EIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3EH)));
-                ((__POINTER *)next__CIIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DIIH)[ 0]=next__CIIH;
+            ptr__YRKD=result__5JJH;
+          };
+          result__XRKD=((__LIP_IF *)ptr__YRKD);
+          *(result__XRKD) = *(LIP_IF__);
+        };
+        Self__XQTD=((__LIP_IF *)result__XRKD);
+        Self__XQTD->parent_lip_code__GPYC.parent_itm_object__HEE.position__VDJ=p__CMID;
+        Self__XQTD->condition__IDQD=result__UTPB;
+        Self__XQTD->then__4DQD=the__WLYC;
+        Self__XQTD->else__VEQD=els__XLYC;
+        result__QLYC=result__XRKD;
+        __tmp__KPYC=TRUE__;
+      } else {
+        __tmp__KPYC=FALSE__;
+      };
+      if ((! __tmp__KPYC)) {
+        if (read_word__YPF((&__string_91))) {
+          p__SWHE=current_position__RXF();
+          result__PBNE=NULL;
+          ptr__QBNE=((__POINTER )(NULL));
+          typ_id__VBNE= 0;
+          sz__SBNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__SBNE ==  0)) {
+            result__PBNE=LIP_PRINT__;
+          } else {
+            typ_id__VBNE=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SBNE);
+            if ((typ_id__VBNE == (__INTEGER)(-  1))) {
+              a__Z4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__04FH=(__UINTEGER_32)((__UINTEGER_32)(sz__SBNE + a__Z4FH) & (__UINTEGER_32)(~ a__Z4FH));
+              ptr_table__DKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__04FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__CKJH=((__POINTER )(NULL));
+              result__EKJH=((__POINTER *)ptr_table__DKJH)[ 0];
+              if ((result__EKJH == (void *)NULL)) {
+                result__EKJH=new_lab__URJ(new_size__04FH);
+                next__CKJH=(void *)((unsigned long)result__EKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__04FH)));
+                ((__POINTER *)next__CKJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DKJH)[ 0]=next__CKJH;
               } else {
-                next__CIIH=((__POINTER *)result__EIIH)[ 0];
-                if ((next__CIIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EIIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__K3EH <<  1)) <=  4096)) {
-                    next__CIIH=(void *)((unsigned long)result__EIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K3EH)));
+                next__CKJH=((__POINTER *)result__EKJH)[ 0];
+                if ((next__CKJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EKJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__04FH <<  1)) <=  4096)) {
+                    next__CKJH=(void *)((unsigned long)result__EKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__04FH)));
                   } else {
-                    next__CIIH=new_lab__MRJ(new_size__K3EH);
+                    next__CKJH=new_lab__URJ(new_size__04FH);
                   };
-                  ((__POINTER *)next__CIIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DIIH)[ 0]=next__CIIH;
+                  ((__POINTER *)next__CKJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DKJH)[ 0]=next__CKJH;
                 } else {
-                  ((__POINTER *)result__EIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__EIIH=next__CIIH;
+                  ((__POINTER *)result__EKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__EKJH=next__CKJH;
                 };
               };
-              ptr__YFNE=result__EIIH;
+              ptr__QBNE=result__EKJH;
             } else {
-              t__O3EH=((__UINTEGER_32 )typ_id__3FNE);
-              a__N3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__LIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0FNE + a__N3EH) & (__UINTEGER_32)(~ a__N3EH));
-              ptr_table__IIIH=((__POINTER )(&(table_type[(t__O3EH)])));
-              lab_type__KIIH=(__UINTEGER_32)(t__O3EH |  1);
-              next__HIIH=((__POINTER )(NULL));
-              result__JIIH=((__POINTER *)ptr_table__IIIH)[ 0];
-              if ((result__JIIH == (void *)NULL)) {
-                result__JIIH=new_lab__MRJ(lab_type__KIIH);
-                next__HIIH=(void *)((unsigned long)result__JIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIIH)));
-                ((__POINTER *)next__HIIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IIIH)[ 0]=next__HIIH;
+              t__44FH=((__UINTEGER_32 )typ_id__VBNE);
+              a__34FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__LKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SBNE + a__34FH) & (__UINTEGER_32)(~ a__34FH));
+              ptr_table__IKJH=((__POINTER )(&(table_type[(t__44FH)])));
+              lab_type__KKJH=(__UINTEGER_32)(t__44FH |  1);
+              next__HKJH=((__POINTER )(NULL));
+              result__JKJH=((__POINTER *)ptr_table__IKJH)[ 0];
+              if ((result__JKJH == (void *)NULL)) {
+                result__JKJH=new_lab__URJ(lab_type__KKJH);
+                next__HKJH=(void *)((unsigned long)result__JKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKJH)));
+                ((__POINTER *)next__HKJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IKJH)[ 0]=next__HKJH;
               } else {
-                next__HIIH=((__POINTER *)result__JIIH)[ 0];
-                if ((next__HIIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JIIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LIIH <<  1)) <=  4096)) {
-                    next__HIIH=(void *)((unsigned long)result__JIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIIH)));
+                next__HKJH=((__POINTER *)result__JKJH)[ 0];
+                if ((next__HKJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JKJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LKJH <<  1)) <=  4096)) {
+                    next__HKJH=(void *)((unsigned long)result__JKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LKJH)));
                   } else {
-                    next__HIIH=new_lab__MRJ(lab_type__KIIH);
+                    next__HKJH=new_lab__URJ(lab_type__KKJH);
                   };
-                  ((__POINTER *)next__HIIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__IIIH)[ 0]=next__HIIH;
+                  ((__POINTER *)next__HKJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__IKJH)[ 0]=next__HKJH;
                 } else {
-                  ((__POINTER *)result__JIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__JIIH=next__HIIH;
+                  ((__POINTER *)result__JKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__JKJH=next__HKJH;
                 };
               };
-              ptr__YFNE=result__JIIH;
+              ptr__QBNE=result__JKJH;
             };
-            result__XFNE=((__LIP_PRINT *)ptr__YFNE);
-            *(result__XFNE) = *(LIP_PRINT__);
+            result__PBNE=((__LIP_PRINT *)ptr__QBNE);
+            *(result__PBNE) = *(LIP_PRINT__);
           };
-          Self__4BWE=((__LIP_PRINT *)result__XFNE);
-          Self__4BWE->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ=p__VYHE;
-          Self__4BWE->message__KEUE=result__MTPB;
-          result__ILYC=result__XFNE;
+          Self__BCWE=((__LIP_PRINT *)result__PBNE);
+          Self__BCWE->parent_lip_code__YPYC.parent_itm_object__HEE.position__VDJ=p__SWHE;
+          Self__BCWE->message__NEUE=result__UTPB;
+          result__QLYC=result__PBNE;
         };
       };
-      result__MTPB=result__ILYC;
-      if (((void *)result__ILYC == (void *)NULL)) {
-        pos__TOXG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_275));
-        put_position__UOG(pos__TOXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      result__UTPB=result__QLYC;
+      if (((void *)result__QLYC == (void *)NULL)) {
+        pos__CMYG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_274));
+        put_position__2OG(pos__CMYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__MTPB);
+  return(result__UTPB);
 }
 
-static void run__QGFC(__LIP_AFFECT *Self__RGFC)
+static void run__YGFC(__LIP_AFFECT *Self__ZGFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __POSITION pos__NQ0G,pos__TI5C;
-  void *__tmp__JHFC;
-  void *__tmp__KHFC,*__tmp__NIIH,*__tmp__OIIH;
-  __LIP_INTEGER *Self__PIIH;
-  __LIP_STRING *Self__QIIH;
-  if (((void *)fast_reference_at__OURD(list_data__OONC,Self__RGFC->name__WGFC) == (void *)NULL)) {
-    copy__ZCS(string_tmp__VH,(&__string_308));
-    append__BOS(string_tmp__VH,Self__RGFC->name__WGFC);
-    append__BOS(string_tmp__VH,(&__string_309));
-    pos__NQ0G=Self__RGFC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,string_tmp__VH);
-    put_position__UOG(pos__NQ0G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  __POSITION pos__YN1G,pos__1I5C;
+  void *__tmp__RHFC;
+  void *__tmp__SHFC,*__tmp__NKJH,*__tmp__OKJH;
+  __LIP_INTEGER *Self__PKJH;
+  __LIP_STRING *Self__QKJH;
+  if (((void *)fast_reference_at__WURD(list_data__WONC,Self__ZGFC->name__4GFC) == (void *)NULL)) {
+    copy__BDS(string_tmp__VH,(&__string_307));
+    append__JOS(string_tmp__VH,Self__ZGFC->name__4GFC);
+    append__JOS(string_tmp__VH,(&__string_308));
+    pos__YN1G=Self__ZGFC->parent_lip_code__RUPB.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,string_tmp__VH);
+    put_position__2OG(pos__YN1G);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__JHFC=Self__RGFC->value__IHFC;
-  switch (((struct ___OBJ *)__tmp__JHFC)->__id) {
+  __tmp__RHFC=Self__ZGFC->value__QHFC;
+  switch (((struct ___OBJ *)__tmp__RHFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__KHFC=run_expr__GZQD(__tmp__JHFC);
+    __tmp__SHFC=run_expr__OZQD(__tmp__RHFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__KHFC=run_expr__F2QD(__tmp__JHFC);
+    __tmp__SHFC=run_expr__N2QD(__tmp__RHFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__KHFC=run_expr__FGUE(__tmp__JHFC);
+    __tmp__SHFC=run_expr__IGUE(__tmp__RHFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__NIIH=((__LIP_VALUE *)__tmp__JHFC)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__NIIH)->__id) {
+    __tmp__NKJH=((__LIP_VALUE *)__tmp__RHFC)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__NKJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__OIIH=((__LIP_BOOLEAN *)__tmp__NIIH);
+      __tmp__OKJH=((__LIP_BOOLEAN *)__tmp__NKJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__PIIH=((__LIP_INTEGER *)__tmp__NIIH);
-      __tmp__OIIH=get__0JSE(Self__PIIH,Self__PIIH->value__0B3F);
+      Self__PKJH=((__LIP_INTEGER *)__tmp__NKJH);
+      __tmp__OKJH=get__KJSE(Self__PKJH,Self__PKJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__QIIH=((__LIP_STRING *)__tmp__NIIH);
-      __tmp__OIIH=get__RBFF(Self__QIIH,Self__QIIH->value__TBUE);
+      Self__QKJH=((__LIP_STRING *)__tmp__NKJH);
+      __tmp__OKJH=get__TMFF(Self__QKJH,Self__QKJH->value__WBUE);
     } break;
     };
-    __tmp__KHFC=__tmp__OIIH;
+    __tmp__SHFC=__tmp__OKJH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  pos__TI5C=Self__RGFC->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
-  put_error__text__KNG( 1,(&__string_278));
-  put_position__UOG(pos__TI5C);
-  put_string__U1F(msg_err__PNG);
-  if ((type_error__ONG !=  2)) {
+  pos__1I5C=Self__ZGFC->parent_lip_code__RUPB.parent_itm_object__HEE.position__VDJ;
+  put_error__text__SNG( 1,(&__string_277));
+  put_position__2OG(pos__1I5C);
+  put_string__21F(msg_err__XNG);
+  if ((type_error__WNG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__KHFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__SHFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__SW2F(__tmp__KHFC);
+    free__VN3F(__tmp__SHFC);
   } break;
   case __LIP_STRING__: {
-    free__EVGG(__tmp__KHFC);
+    free__4RHG(__tmp__SHFC);
   } break;
   };
 }
 
-static void run__T5TE(__LIP_CALL *Self__U5TE)
+static void run__W5TE(__LIP_CALL *Self__X5TE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  void *val__X5TE,*__tmp__DAUE,*__tmp__SIIH,*__tmp__TIIH;
-  void *str__Y5TE,*__tmp__IBUE,*__tmp__QCUE;
-  void *path__Z5TE,*n__Q2JF;
-  void *__tmp__CAUE;
-  __LIP_INTEGER *Self__UIIH;
-  __LIP_STRING *Self__VIIH;
-  __POSITION pos__X1JF,pos__QQ0G,pos__TQ0G,pos__WQ0G,pos__ZQ0G;
-  __STRING_CONSTANT *Self__P3EH;
-  __STRING *Self__Q3EH,*Self__S3EH;
-  void *result__T2JF;
-  __INTEGER j__S2JF;
-  __BOOLEAN is_rec__05TE,__tmp__0AUE,__tmp__CCUE,result__1CXE;
-  __BOOLEAN __tmp__Q3JF;
-  val__X5TE=NULL;
-  str__Y5TE=NULL;
-  path__Z5TE=NULL;
-  is_rec__05TE=FALSE__;
-  if (((void *)Self__U5TE->argument__15TE != (void *)NULL)) {
-    __tmp__CAUE=Self__U5TE->argument__15TE;
-    switch (((struct ___OBJ *)__tmp__CAUE)->__id) {
+  void *val__05TE,*__tmp__GAUE,*__tmp__SKJH,*__tmp__TKJH;
+  void *str__15TE,*__tmp__LBUE,*__tmp__TCUE;
+  void *path__25TE,*n__SHKF;
+  void *__tmp__FAUE;
+  __LIP_INTEGER *Self__UKJH;
+  __LIP_STRING *Self__VKJH;
+  __POSITION pos__ZGKF,pos__1N1G,pos__4N1G,pos__BO1G,pos__EO1G;
+  __STRING_CONSTANT *Self__54FH;
+  __STRING *Self__A5FH,*Self__C5FH;
+  void *result__VHKF;
+  __INTEGER j__UHKF;
+  __BOOLEAN is_rec__35TE,__tmp__3AUE,__tmp__FCUE,result__4CXE;
+  __BOOLEAN __tmp__SIKF;
+  val__05TE=NULL;
+  str__15TE=NULL;
+  path__25TE=NULL;
+  is_rec__35TE=FALSE__;
+  if (((void *)Self__X5TE->argument__45TE != (void *)NULL)) {
+    __tmp__FAUE=Self__X5TE->argument__45TE;
+    switch (((struct ___OBJ *)__tmp__FAUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__DAUE=run_expr__GZQD(__tmp__CAUE);
+      __tmp__GAUE=run_expr__OZQD(__tmp__FAUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__DAUE=run_expr__F2QD(__tmp__CAUE);
+      __tmp__GAUE=run_expr__N2QD(__tmp__FAUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__DAUE=run_expr__FGUE(__tmp__CAUE);
+      __tmp__GAUE=run_expr__IGUE(__tmp__FAUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__SIIH=((__LIP_VALUE *)__tmp__CAUE)->value__FKUE;
-      switch (((struct ___OBJ *)__tmp__SIIH)->__id) {
+      __tmp__SKJH=((__LIP_VALUE *)__tmp__FAUE)->value__IKUE;
+      switch (((struct ___OBJ *)__tmp__SKJH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__TIIH=((__LIP_BOOLEAN *)__tmp__SIIH);
+        __tmp__TKJH=((__LIP_BOOLEAN *)__tmp__SKJH);
       } break;
       case __LIP_INTEGER__: {
-        Self__UIIH=((__LIP_INTEGER *)__tmp__SIIH);
-        __tmp__TIIH=get__0JSE(Self__UIIH,Self__UIIH->value__0B3F);
+        Self__UKJH=((__LIP_INTEGER *)__tmp__SKJH);
+        __tmp__TKJH=get__KJSE(Self__UKJH,Self__UKJH->value__3Y3F);
       } break;
       case __LIP_STRING__: {
-        Self__VIIH=((__LIP_STRING *)__tmp__SIIH);
-        __tmp__TIIH=get__RBFF(Self__VIIH,Self__VIIH->value__TBUE);
+        Self__VKJH=((__LIP_STRING *)__tmp__SKJH);
+        __tmp__TKJH=get__TMFF(Self__VKJH,Self__VKJH->value__WBUE);
       } break;
       };
-      __tmp__DAUE=__tmp__TIIH;
+      __tmp__GAUE=__tmp__TKJH;
     } break;
     };
-    val__X5TE=__tmp__DAUE;
+    val__05TE=__tmp__GAUE;
   };
-  if (((void *)Self__U5TE->name__GAUE == (void *)(&__string_92))) {
-    if (((void *)val__X5TE != (void *)NULL)) {
-      pos__X1JF=Self__U5TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-      put_error__text__KNG( 2,(&__string_310));
-      put_position__UOG(pos__X1JF);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if (((void *)Self__X5TE->name__JAUE == (void *)(&__string_92))) {
+    if (((void *)val__05TE != (void *)NULL)) {
+      pos__ZGKF=Self__X5TE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+      put_error__text__SNG( 2,(&__string_309));
+      put_position__2OG(pos__ZGKF);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__0AUE=TRUE__;
+    __tmp__3AUE=TRUE__;
   } else {
-    __tmp__0AUE=FALSE__;
+    __tmp__3AUE=FALSE__;
   };
-  if (__tmp__0AUE) {
-    __tmp__CCUE=TRUE__;
+  if (__tmp__3AUE) {
+    __tmp__FCUE=TRUE__;
   } else {
-    result__1CXE=((void *)Self__U5TE->name__GAUE == (void *)(&__string_94));
-    if (result__1CXE) {
-      if (val__X5TE==NULL) {
-        __tmp__IBUE=NULL;
+    result__4CXE=((void *)Self__X5TE->name__JAUE == (void *)(&__string_94));
+    if (result__4CXE) {
+      if (val__05TE==NULL) {
+        __tmp__LBUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__X5TE)->__id) {
+        switch (((struct ___OBJ *)val__05TE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IBUE=NULL;
+          __tmp__LBUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IBUE=NULL;
+          __tmp__LBUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__IBUE=((void *)val__X5TE);
+          __tmp__LBUE=((void *)val__05TE);
         } break;
         }
       };
-      str__Y5TE=__tmp__IBUE;
-      if (((void *)__tmp__IBUE == (void *)NULL)) {
-        pos__QQ0G=Self__U5TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 1,(&__string_311));
-        put_position__UOG(pos__QQ0G);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      str__15TE=__tmp__LBUE;
+      if (((void *)__tmp__LBUE == (void *)NULL)) {
+        pos__1N1G=Self__X5TE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 1,(&__string_310));
+        put_position__2OG(pos__1N1G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      path__Z5TE=((__LIP_STRING *)__tmp__IBUE)->value__TBUE;
-      Self__P3EH=((__STRING_CONSTANT *)path__Z5TE);
-      if ((((__CHARACTER *)Self__P3EH->storage__VQO)[(__INTEGER)(Self__P3EH->count__DD -  1)] == '*')) {
-        copy__ZCS(string_tmp__VH,path__Z5TE);
-        Self__Q3EH=((__STRING *)string_tmp__VH);
-        if (( 1 > Self__Q3EH->count__WFC)) {
-          Self__Q3EH->count__WFC= 0;
+      path__25TE=((__LIP_STRING *)__tmp__LBUE)->value__WBUE;
+      Self__54FH=((__STRING_CONSTANT *)path__25TE);
+      if ((((__CHARACTER *)Self__54FH->storage__3QO)[(__INTEGER)(Self__54FH->count__DD -  1)] == '*')) {
+        copy__BDS(string_tmp__VH,path__25TE);
+        Self__A5FH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__A5FH->count__4FC)) {
+          Self__A5FH->count__4FC= 0;
         } else {
-          Self__Q3EH->count__WFC=(__INTEGER)(Self__Q3EH->count__WFC -  1);
+          Self__A5FH->count__4FC=(__INTEGER)(Self__A5FH->count__4FC -  1);
         };
-        path__Z5TE=get__IWB(string_tmp__VH);
-        is_rec__05TE=TRUE__;
+        path__25TE=get__QWB(string_tmp__VH);
+        is_rec__35TE=TRUE__;
       };
-      load_directory__is_recursive__5BWF(Self__U5TE,path__Z5TE,is_rec__05TE);
+      load_directory__is_recursive__DOWF(Self__X5TE,path__25TE,is_rec__35TE);
     };
-    __tmp__CCUE=result__1CXE;
+    __tmp__FCUE=result__4CXE;
   };
-  if ((! __tmp__CCUE)) {
-    if (((void *)Self__U5TE->name__GAUE == (void *)(&__string_93))) {
-      if (val__X5TE==NULL) {
-        __tmp__QCUE=NULL;
+  if ((! __tmp__FCUE)) {
+    if (((void *)Self__X5TE->name__JAUE == (void *)(&__string_93))) {
+      if (val__05TE==NULL) {
+        __tmp__TCUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__X5TE)->__id) {
+        switch (((struct ___OBJ *)val__05TE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__QCUE=NULL;
+          __tmp__TCUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__QCUE=NULL;
+          __tmp__TCUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__QCUE=((void *)val__X5TE);
+          __tmp__TCUE=((void *)val__05TE);
         } break;
         }
       };
-      str__Y5TE=__tmp__QCUE;
-      if (((void *)__tmp__QCUE == (void *)NULL)) {
-        pos__TQ0G=Self__U5TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 1,(&__string_311));
-        put_position__UOG(pos__TQ0G);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      str__15TE=__tmp__TCUE;
+      if (((void *)__tmp__TCUE == (void *)NULL)) {
+        pos__4N1G=Self__X5TE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 1,(&__string_310));
+        put_position__2OG(pos__4N1G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      ((__STRING *)string_tmp__VH)->count__WFC= 0;
-      append_in__C2GG(__tmp__QCUE,string_tmp__VH);
-      Self__S3EH=((__STRING *)string_tmp__VH);
-      if ((Self__S3EH->capacity__YBS > Self__S3EH->count__WFC)) {
-        ((__CHARACTER *)Self__S3EH->storage__BCS)[Self__S3EH->count__WFC]='\0';
+      ((__STRING *)string_tmp__VH)->count__4FC= 0;
+      append_in__2YHG(__tmp__TCUE,string_tmp__VH);
+      Self__C5FH=((__STRING *)string_tmp__VH);
+      if ((Self__C5FH->capacity__ACS > Self__C5FH->count__4FC)) {
+        ((__CHARACTER *)Self__C5FH->storage__JCS)[Self__C5FH->count__4FC]='\0';
       } else {
-        add_last__ZLT(Self__S3EH,'\0');
-        Self__S3EH->count__WFC=(__INTEGER)(Self__S3EH->count__WFC -  1);
+        add_last__BMT(Self__C5FH,'\0');
+        Self__C5FH->count__4FC=(__INTEGER)(Self__C5FH->count__4FC -  1);
       };
-      system(((char*)((Self__S3EH->storage__BCS))));
+      system(((char*)((Self__C5FH->storage__JCS))));
     } else {
-      n__Q2JF=Self__U5TE->name__GAUE;
-      result__T2JF=NULL;
-      j__S2JF= 0;
-      while_do__CELF:
+      n__SHKF=Self__X5TE->name__JAUE;
+      result__VHKF=NULL;
+      j__UHKF= 0;
+      while_do__OPLF:
       {
-        if ((j__S2JF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__Z2JF)->parent_arrayed_collection__Y2JF.upper__C3JF)) {
+        if ((j__UHKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__1HKF)->parent_arrayed_collection__0HKF.upper__EIKF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__Q3JF=((void *)NULL != (void *)n__Q2JF);
+          __tmp__SIKF=((void *)NULL != (void *)n__SHKF);
         } else {
-          __tmp__Q3JF=FALSE__;
+          __tmp__SIKF=FALSE__;
         };
-        if (__tmp__Q3JF) {
-          j__S2JF=(__INTEGER)(j__S2JF +  1);
-          goto while_do__CELF;
+        if (__tmp__SIKF) {
+          j__UHKF=(__INTEGER)(j__UHKF +  1);
+          goto while_do__OPLF;
         };
       };
-      if ((j__S2JF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__Z2JF)->parent_arrayed_collection__Y2JF.upper__C3JF)) {
-        result__T2JF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__Z2JF)->parent_arrayed_collection__Y2JF.storage__HCPF)[j__S2JF];
+      if ((j__UHKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__1HKF)->parent_arrayed_collection__0HKF.upper__EIKF)) {
+        result__VHKF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__1HKF)->parent_arrayed_collection__0HKF.storage__LOPF)[j__UHKF];
       };
-      if (((void *)result__T2JF == (void *)NULL)) {
-        copy__ZCS(string_tmp__VH,(&__string_308));
-        append__BOS(string_tmp__VH,Self__U5TE->name__GAUE);
-        append__BOS(string_tmp__VH,(&__string_309));
-        pos__WQ0G=Self__U5TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 1,string_tmp__VH);
-        put_position__UOG(pos__WQ0G);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if (((void *)result__VHKF == (void *)NULL)) {
+        copy__BDS(string_tmp__VH,(&__string_307));
+        append__JOS(string_tmp__VH,Self__X5TE->name__JAUE);
+        append__JOS(string_tmp__VH,(&__string_308));
+        pos__BO1G=Self__X5TE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 1,string_tmp__VH);
+        put_position__2OG(pos__BO1G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      pos__ZQ0G=Self__U5TE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-      put_error__text__KNG( 1,(&__string_312));
-      put_position__UOG(pos__ZQ0G);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+      pos__EO1G=Self__X5TE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+      put_error__text__SNG( 1,(&__string_311));
+      put_position__2OG(pos__EO1G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__X5TE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__X5TE)->__id) {
+  if (((void *)val__05TE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__05TE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__SW2F(val__X5TE);
+      free__VN3F(val__05TE);
     } break;
     case __LIP_STRING__: {
-      free__EVGG(val__X5TE);
+      free__4RHG(val__05TE);
     } break;
     };
   };
 }
 
-static void run__2CQD(__LIP_IF *Self__3CQD)
+static void run__EDQD(__LIP_IF *Self__FDQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  void *__tmp__BDQD,*__tmp__FEQD,*__tmp__BFQD;
-  __POSITION __tmp__TH5G,pos__3Q0G,pos__BR0G,pos__ER0G,__tmp__5OXG;
-  __POSITION __tmp__BPXG,__tmp__HR0G,__tmp__IPXG,__tmp__KPXG;
-  __POSITION __tmp__0EUE;
-  void *__tmp__CDQD,*__tmp__XIIH,*__tmp__YIIH;
-  __LIP_INTEGER *Self__ZIIH;
-  __LIP_STRING *Self__0IIH;
-  void *__tmp__EDQD,*val__5CQD;
-  __INTEGER __tmp__4DQD,Self__FQ5F,__tmp__0EQD,Self__TNDF;
-  __BOOLEAN __tmp__IEQD;
-  __tmp__BDQD=Self__3CQD->condition__ADQD;
-  switch (((struct ___OBJ *)__tmp__BDQD)->__id) {
+  void *__tmp__JDQD,*__tmp__NEQD,*__tmp__JFQD;
+  __POSITION __tmp__0GAH,pos__IO1G,pos__MO1G,pos__PO1G,__tmp__OMYG;
+  __POSITION __tmp__QMYG,__tmp__SO1G,__tmp__XMYG,__tmp__ZMYG;
+  __POSITION __tmp__3EUE;
+  void *__tmp__KDQD,*__tmp__XKJH,*__tmp__YKJH;
+  __LIP_INTEGER *Self__ZKJH;
+  __LIP_STRING *Self__0KJH;
+  void *__tmp__MDQD,*val__HDQD;
+  __INTEGER __tmp__GEQD,Self__ZHAG,__tmp__CFQD,Self__5XDF;
+  __BOOLEAN __tmp__QEQD;
+  __tmp__JDQD=Self__FDQD->condition__IDQD;
+  switch (((struct ___OBJ *)__tmp__JDQD)->__id) {
   case __LIP_AFFECT__: {
-    __tmp__TH5G=((__LIP_AFFECT *)__tmp__BDQD)->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(__tmp__TH5G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    __tmp__0GAH=((__LIP_AFFECT *)__tmp__JDQD)->parent_lip_code__RUPB.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(__tmp__0GAH);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__CDQD=NULL;
+    __tmp__KDQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__CDQD=run_expr__GZQD(__tmp__BDQD);
+    __tmp__KDQD=run_expr__OZQD(__tmp__JDQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__CDQD=run_expr__F2QD(__tmp__BDQD);
+    __tmp__KDQD=run_expr__N2QD(__tmp__JDQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__CDQD=run_expr__FGUE(__tmp__BDQD);
+    __tmp__KDQD=run_expr__IGUE(__tmp__JDQD);
   } break;
   case __LIP_IF__: {
-    pos__3Q0G=((__LIP_IF *)__tmp__BDQD)->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(pos__3Q0G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    pos__IO1G=((__LIP_IF *)__tmp__JDQD)->parent_lip_code__GPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(pos__IO1G);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__CDQD=NULL;
+    __tmp__KDQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__BR0G=((__LIP_PRINT *)__tmp__BDQD)->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(pos__BR0G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    pos__MO1G=((__LIP_PRINT *)__tmp__JDQD)->parent_lip_code__YPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(pos__MO1G);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__CDQD=NULL;
+    __tmp__KDQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__XIIH=((__LIP_VALUE *)__tmp__BDQD)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__XIIH)->__id) {
+    __tmp__XKJH=((__LIP_VALUE *)__tmp__JDQD)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__XKJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__YIIH=((__LIP_BOOLEAN *)__tmp__XIIH);
+      __tmp__YKJH=((__LIP_BOOLEAN *)__tmp__XKJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__ZIIH=((__LIP_INTEGER *)__tmp__XIIH);
-      __tmp__YIIH=get__0JSE(Self__ZIIH,Self__ZIIH->value__0B3F);
+      Self__ZKJH=((__LIP_INTEGER *)__tmp__XKJH);
+      __tmp__YKJH=get__KJSE(Self__ZKJH,Self__ZKJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__0IIH=((__LIP_STRING *)__tmp__XIIH);
-      __tmp__YIIH=get__RBFF(Self__0IIH,Self__0IIH->value__TBUE);
+      Self__0KJH=((__LIP_STRING *)__tmp__XKJH);
+      __tmp__YKJH=get__TMFF(Self__0KJH,Self__0KJH->value__WBUE);
     } break;
     };
-    __tmp__CDQD=__tmp__YIIH;
+    __tmp__KDQD=__tmp__YKJH;
   } break;
   };
-  if (__tmp__CDQD==NULL) {
-    __tmp__EDQD=NULL;
+  if (__tmp__KDQD==NULL) {
+    __tmp__MDQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__CDQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__KDQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__EDQD=((void *)__tmp__CDQD);
+      __tmp__MDQD=((void *)__tmp__KDQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__EDQD=NULL;
+      __tmp__MDQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__EDQD=NULL;
+      __tmp__MDQD=NULL;
     } break;
     }
   };
-  val__5CQD=__tmp__EDQD;
-  if (((void *)__tmp__EDQD == (void *)NULL)) {
-    pos__ER0G=Self__3CQD->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_314));
-    put_position__UOG(pos__ER0G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  val__HDQD=__tmp__MDQD;
+  if (((void *)__tmp__MDQD == (void *)NULL)) {
+    pos__PO1G=Self__FDQD->parent_lip_code__GPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_313));
+    put_position__2OG(pos__PO1G);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  if (((__LIP_BOOLEAN *)__tmp__EDQD)->value__PDQD) {
-    __tmp__4DQD=((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->then__WDQD)->parent_arrayed_collection__NLYC.upper__2DQD;
-    Self__FQ5F= 0;
-    while ((Self__FQ5F <= __tmp__4DQD)) {
-      __tmp__FEQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->then__WDQD)->parent_arrayed_collection__NLYC.storage__GQTD)[Self__FQ5F];
-      switch (((struct ___OBJ *)__tmp__FEQD)->__id) {
+  if (((__LIP_BOOLEAN *)__tmp__MDQD)->value__XDQD) {
+    __tmp__GEQD=((__FAST_ARRAYoLIP_CODEo *)Self__FDQD->then__4DQD)->parent_arrayed_collection__VLYC.upper__EEQD;
+    Self__ZHAG= 0;
+    while ((Self__ZHAG <= __tmp__GEQD)) {
+      __tmp__NEQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__FDQD->then__4DQD)->parent_arrayed_collection__VLYC.storage__OQTD)[Self__ZHAG];
+      switch (((struct ___OBJ *)__tmp__NEQD)->__id) {
       case __LIP_AFFECT__: {
-        run__QGFC(__tmp__FEQD);
+        run__YGFC(__tmp__NEQD);
       } break;
       case __LIP_BINARY__: {
-        __tmp__5OXG=((__LIP_BINARY *)__tmp__FEQD)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 2,(&__string_273));
-        put_position__UOG(__tmp__5OXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        __tmp__OMYG=((__LIP_BINARY *)__tmp__NEQD)->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 2,(&__string_272));
+        put_position__2OG(__tmp__OMYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __tmp__BPXG=((__LIP_UNARY *)__tmp__FEQD)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 2,(&__string_273));
-        put_position__UOG(__tmp__BPXG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        __tmp__QMYG=((__LIP_UNARY *)__tmp__NEQD)->parent_lip_code__T14B.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 2,(&__string_272));
+        put_position__2OG(__tmp__QMYG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__T5TE(__tmp__FEQD);
+        run__W5TE(__tmp__NEQD);
       } break;
       case __LIP_IF__: {
-        run__2CQD(__tmp__FEQD);
+        run__EDQD(__tmp__NEQD);
       } break;
       case __LIP_PRINT__: {
-        run__HEUE(__tmp__FEQD);
+        run__KEUE(__tmp__NEQD);
       } break;
       case __LIP_VALUE__: {
-        __tmp__HR0G=((__LIP_VALUE *)__tmp__FEQD)->parent_lip_code__2HFE.parent_itm_object__5DE.position__NDJ;
-        put_error__text__KNG( 2,(&__string_273));
-        put_position__UOG(__tmp__HR0G);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        __tmp__SO1G=((__LIP_VALUE *)__tmp__NEQD)->parent_lip_code__ZFFE.parent_itm_object__HEE.position__VDJ;
+        put_error__text__SNG( 2,(&__string_272));
+        put_position__2OG(__tmp__SO1G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__FQ5F=(__INTEGER)(Self__FQ5F +  1);
+      Self__ZHAG=(__INTEGER)(Self__ZHAG +  1);
     };
-    __tmp__IEQD=TRUE__;
+    __tmp__QEQD=TRUE__;
   } else {
-    __tmp__IEQD=FALSE__;
-  };
-  if ((! __tmp__IEQD)) {
-    if (((void *)Self__3CQD->else__NEQD != (void *)NULL)) {
-      __tmp__0EQD=((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->else__NEQD)->parent_arrayed_collection__NLYC.upper__2DQD;
-      Self__TNDF= 0;
-      while ((Self__TNDF <= __tmp__0EQD)) {
-        __tmp__BFQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__3CQD->else__NEQD)->parent_arrayed_collection__NLYC.storage__GQTD)[Self__TNDF];
-        switch (((struct ___OBJ *)__tmp__BFQD)->__id) {
+    __tmp__QEQD=FALSE__;
+  };
+  if ((! __tmp__QEQD)) {
+    if (((void *)Self__FDQD->else__VEQD != (void *)NULL)) {
+      __tmp__CFQD=((__FAST_ARRAYoLIP_CODEo *)Self__FDQD->else__VEQD)->parent_arrayed_collection__VLYC.upper__EEQD;
+      Self__5XDF= 0;
+      while ((Self__5XDF <= __tmp__CFQD)) {
+        __tmp__JFQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__FDQD->else__VEQD)->parent_arrayed_collection__VLYC.storage__OQTD)[Self__5XDF];
+        switch (((struct ___OBJ *)__tmp__JFQD)->__id) {
         case __LIP_AFFECT__: {
-          run__QGFC(__tmp__BFQD);
+          run__YGFC(__tmp__JFQD);
         } break;
         case __LIP_BINARY__: {
-          __tmp__IPXG=((__LIP_BINARY *)__tmp__BFQD)->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
-          put_error__text__KNG( 2,(&__string_273));
-          put_position__UOG(__tmp__IPXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          __tmp__XMYG=((__LIP_BINARY *)__tmp__JFQD)->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ;
+          put_error__text__SNG( 2,(&__string_272));
+          put_position__2OG(__tmp__XMYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __tmp__KPXG=((__LIP_UNARY *)__tmp__BFQD)->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
-          put_error__text__KNG( 2,(&__string_273));
-          put_position__UOG(__tmp__KPXG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          __tmp__ZMYG=((__LIP_UNARY *)__tmp__JFQD)->parent_lip_code__T14B.parent_itm_object__HEE.position__VDJ;
+          put_error__text__SNG( 2,(&__string_272));
+          put_position__2OG(__tmp__ZMYG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__T5TE(__tmp__BFQD);
+          run__W5TE(__tmp__JFQD);
         } break;
         case __LIP_IF__: {
-          run__2CQD(__tmp__BFQD);
+          run__EDQD(__tmp__JFQD);
         } break;
         case __LIP_PRINT__: {
-          run__HEUE(__tmp__BFQD);
+          run__KEUE(__tmp__JFQD);
         } break;
         case __LIP_VALUE__: {
-          __tmp__0EUE=((__LIP_VALUE *)__tmp__BFQD)->parent_lip_code__2HFE.parent_itm_object__5DE.position__NDJ;
-          put_error__text__KNG( 2,(&__string_273));
-          put_position__UOG(__tmp__0EUE);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          __tmp__3EUE=((__LIP_VALUE *)__tmp__JFQD)->parent_lip_code__ZFFE.parent_itm_object__HEE.position__VDJ;
+          put_error__text__SNG( 2,(&__string_272));
+          put_position__2OG(__tmp__3EUE);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__TNDF=(__INTEGER)(Self__TNDF +  1);
+        Self__5XDF=(__INTEGER)(Self__5XDF +  1);
       };
     };
   };
 }
 
-static void run__HEUE(__LIP_PRINT *Self__IEUE)
+static void run__KEUE(__LIP_PRINT *Self__LEUE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  void *__tmp__LEUE;
-  __POSITION __tmp__TNVE,pos__U0DE,pos__JR0G,pos__DOXE;
-  void *__tmp__MEUE,*__tmp__2IIH,*__tmp__3IIH;
-  __LIP_INTEGER *Self__4IIH;
-  __LIP_STRING *Self__5IIH,*Self__Z1GG;
-  __INTEGER Self__TO4F;
-  __BOOLEAN __tmp__0O4F;
-  __tmp__LEUE=Self__IEUE->message__KEUE;
-  switch (((struct ___OBJ *)__tmp__LEUE)->__id) {
+  void *__tmp__OEUE;
+  __POSITION __tmp__WNVE,pos__RYDE,pos__UO1G,pos__GOXE;
+  void *__tmp__PEUE,*__tmp__2KJH,*__tmp__3KJH;
+  __LIP_INTEGER *Self__4KJH;
+  __LIP_STRING *Self__5KJH,*Self__TYHG;
+  __INTEGER Self__HG5F;
+  __BOOLEAN __tmp__OG5F;
+  __tmp__OEUE=Self__LEUE->message__NEUE;
+  switch (((struct ___OBJ *)__tmp__OEUE)->__id) {
   case __LIP_AFFECT__: {
-    __tmp__TNVE=((__LIP_AFFECT *)__tmp__LEUE)->parent_lip_code__JUPB.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(__tmp__TNVE);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    __tmp__WNVE=((__LIP_AFFECT *)__tmp__OEUE)->parent_lip_code__RUPB.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(__tmp__WNVE);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__MEUE=NULL;
+    __tmp__PEUE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__MEUE=run_expr__GZQD(__tmp__LEUE);
+    __tmp__PEUE=run_expr__OZQD(__tmp__OEUE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__MEUE=run_expr__F2QD(__tmp__LEUE);
+    __tmp__PEUE=run_expr__N2QD(__tmp__OEUE);
   } break;
   case __LIP_CALL__: {
-    __tmp__MEUE=run_expr__FGUE(__tmp__LEUE);
+    __tmp__PEUE=run_expr__IGUE(__tmp__OEUE);
   } break;
   case __LIP_IF__: {
-    pos__U0DE=((__LIP_IF *)__tmp__LEUE)->parent_lip_code__4OYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(pos__U0DE);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    pos__RYDE=((__LIP_IF *)__tmp__OEUE)->parent_lip_code__GPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(pos__RYDE);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__MEUE=NULL;
+    __tmp__PEUE=NULL;
   } break;
   case __LIP_PRINT__: {
-    pos__JR0G=((__LIP_PRINT *)__tmp__LEUE)->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_313));
-    put_position__UOG(pos__JR0G);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    pos__UO1G=((__LIP_PRINT *)__tmp__OEUE)->parent_lip_code__YPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_312));
+    put_position__2OG(pos__UO1G);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
-    __tmp__MEUE=NULL;
+    __tmp__PEUE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__2IIH=((__LIP_VALUE *)__tmp__LEUE)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__2IIH)->__id) {
+    __tmp__2KJH=((__LIP_VALUE *)__tmp__OEUE)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__2KJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__3IIH=((__LIP_BOOLEAN *)__tmp__2IIH);
+      __tmp__3KJH=((__LIP_BOOLEAN *)__tmp__2KJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__4IIH=((__LIP_INTEGER *)__tmp__2IIH);
-      __tmp__3IIH=get__0JSE(Self__4IIH,Self__4IIH->value__0B3F);
+      Self__4KJH=((__LIP_INTEGER *)__tmp__2KJH);
+      __tmp__3KJH=get__KJSE(Self__4KJH,Self__4KJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__5IIH=((__LIP_STRING *)__tmp__2IIH);
-      __tmp__3IIH=get__RBFF(Self__5IIH,Self__5IIH->value__TBUE);
+      Self__5KJH=((__LIP_STRING *)__tmp__2KJH);
+      __tmp__3KJH=get__TMFF(Self__5KJH,Self__5KJH->value__WBUE);
     } break;
     };
-    __tmp__MEUE=__tmp__3IIH;
+    __tmp__PEUE=__tmp__3KJH;
   } break;
   };
-  if (((void *)__tmp__MEUE == (void *)NULL)) {
-    pos__DOXE=Self__IEUE->parent_lip_code__QPYC.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_278));
-    put_position__UOG(pos__DOXE);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if (((void *)__tmp__PEUE == (void *)NULL)) {
+    pos__GOXE=Self__LEUE->parent_lip_code__YPYC.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_277));
+    put_position__2OG(pos__GOXE);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__MEUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__PEUE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__MEUE)->value__PDQD) {
-      print__WHD((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__PEUE)->value__XDQD) {
+      print__4HD((&__string_42));
     } else {
-      print__WHD((&__string_43));
+      print__4HD((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__TO4F=((__LIP_INTEGER *)__tmp__MEUE)->value__0B3F;
-    if ((Self__TO4F ==  0)) {
+    Self__HG5F=((__LIP_INTEGER *)__tmp__PEUE)->value__3Y3F;
+    if ((Self__HG5F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__0O4F=TRUE__;
+      __tmp__OG5F=TRUE__;
     } else {
-      __tmp__0O4F=FALSE__;
+      __tmp__OG5F=FALSE__;
     };
-    if ((! __tmp__0O4F)) {
-      if ((Self__TO4F <  0)) {
+    if ((! __tmp__OG5F)) {
+      if ((Self__HG5F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__Z4JG((__INTEGER)(- Self__TO4F));
+        print_positif__C1KG((__INTEGER)(- Self__HG5F));
       } else {
-        print_positif__Z4JG(Self__TO4F);
+        print_positif__C1KG(Self__HG5F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__Z1GG=((__LIP_STRING *)__tmp__MEUE);
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    append_in__C2GG(Self__Z1GG,string_tmp__VH);
-    put_string__YHF(((__STRING *)string_tmp__VH));
+    Self__TYHG=((__LIP_STRING *)__tmp__PEUE);
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    append_in__2YHG(Self__TYHG,string_tmp__VH);
+    put_string__AIF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__MEUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__PEUE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__SW2F(__tmp__MEUE);
+    free__VN3F(__tmp__PEUE);
   } break;
   case __LIP_STRING__: {
-    free__EVGG(__tmp__MEUE);
+    free__4RHG(__tmp__PEUE);
   } break;
   };
 }
 
-static void add_last__0NV(__FAST_ARRAYoITM_TYPE_MONOo *Self__1NV,void *element__2NV)
+static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__3NV,__tmp__CPV,__tmp__VGEC,Self__MJVD;
-  __BOOLEAN __tmp__MOV;
-  void **__tmp__BPV,**new__BGEC;
-  new_capacity__3NV= 0;
-  if (((__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1) <= (__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV -  1))) {
-    Self__1NV->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1);
-    __tmp__MOV=TRUE__;
+  __INTEGER new_capacity__FOV,__tmp__KPV,__tmp__3GEC,Self__UJVD;
+  __BOOLEAN __tmp__UOV;
+  void **__tmp__JPV,**new__JGEC;
+  new_capacity__FOV= 0;
+  if (((__INTEGER)(Self__DOV->parent_arrayed_collection__BYC.upper__SIV +  1) <= (__INTEGER)(Self__DOV->parent_arrayed_collection__BYC.capacity__HOV -  1))) {
+    Self__DOV->parent_arrayed_collection__BYC.upper__SIV=(__INTEGER)(Self__DOV->parent_arrayed_collection__BYC.upper__SIV +  1);
+    __tmp__UOV=TRUE__;
   } else {
-    __tmp__MOV=FALSE__;
-  };
-  if ((! __tmp__MOV)) {
-    if ((Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV ==  0)) {
-      Self__1NV->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB( 2);
-      Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV= 2;
-      Self__1NV->parent_arrayed_collection__ZXC.upper__KIV= 0;
-    } else {
-      new_capacity__3NV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV <<  1);
-      __tmp__BPV=Self__1NV->parent_arrayed_collection__ZXC.storage__RMV;
-      __tmp__CPV=Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV;
-      new__BGEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__BPV)),((__UINTEGER_32 )(__INTEGER)(__tmp__CPV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__3NV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__VGEC=(__INTEGER)(new_capacity__3NV -  1);
-      Self__MJVD=__tmp__CPV;
-      while ((Self__MJVD <= __tmp__VGEC)) {
-        new__BGEC[Self__MJVD]=NULL;
-        Self__MJVD=(__INTEGER)(Self__MJVD +  1);
-      };
-      Self__1NV->parent_arrayed_collection__ZXC.storage__RMV=new__BGEC;
-      Self__1NV->parent_arrayed_collection__ZXC.capacity__5NV=new_capacity__3NV;
-      Self__1NV->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(Self__1NV->parent_arrayed_collection__ZXC.upper__KIV +  1);
-    };
-  };
-  ((void **)Self__1NV->parent_arrayed_collection__ZXC.storage__RMV)[Self__1NV->parent_arrayed_collection__ZXC.upper__KIV]=element__2NV;
+    __tmp__UOV=FALSE__;
+  };
+  if ((! __tmp__UOV)) {
+    if ((Self__DOV->parent_arrayed_collection__BYC.capacity__HOV ==  0)) {
+      Self__DOV->parent_arrayed_collection__BYC.storage__ZMV=create__1BRB( 2);
+      Self__DOV->parent_arrayed_collection__BYC.capacity__HOV= 2;
+      Self__DOV->parent_arrayed_collection__BYC.upper__SIV= 0;
+    } else {
+      new_capacity__FOV=(__INTEGER)(Self__DOV->parent_arrayed_collection__BYC.capacity__HOV <<  1);
+      __tmp__JPV=Self__DOV->parent_arrayed_collection__BYC.storage__ZMV;
+      __tmp__KPV=Self__DOV->parent_arrayed_collection__BYC.capacity__HOV;
+      new__JGEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__JPV)),((__UINTEGER_32 )(__INTEGER)(__tmp__KPV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FOV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__3GEC=(__INTEGER)(new_capacity__FOV -  1);
+      Self__UJVD=__tmp__KPV;
+      while ((Self__UJVD <= __tmp__3GEC)) {
+        new__JGEC[Self__UJVD]=NULL;
+        Self__UJVD=(__INTEGER)(Self__UJVD +  1);
+      };
+      Self__DOV->parent_arrayed_collection__BYC.storage__ZMV=new__JGEC;
+      Self__DOV->parent_arrayed_collection__BYC.capacity__HOV=new_capacity__FOV;
+      Self__DOV->parent_arrayed_collection__BYC.upper__SIV=(__INTEGER)(Self__DOV->parent_arrayed_collection__BYC.upper__SIV +  1);
+    };
+  };
+  ((void **)Self__DOV->parent_arrayed_collection__BYC.storage__ZMV)[Self__DOV->parent_arrayed_collection__BYC.upper__SIV]=element__EOV;
 }
 
-static void* alias__GVP(void *tmp__IVP)
+static void* alias__OVP(void *tmp__QVP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__U4PD,i__0A2E,new_capacity__5FW,other_upper__4FW;
-  __INTEGER Self__LNKC,h__AHW,idx__BHW,idx__ZURB,new_capacity__0URB;
-  __INTEGER i__YURB,typ_id__BMNB;
-  __POINTER ptr__2LNB,ptr_table__FJIH,next__EJIH,result__GJIH;
-  __POINTER ptr_table__KJIH,next__JJIH,result__LJIH;
-  __UINTEGER_32 sz__4LNB,a__D5EH,new_size__E5EH,t__I5EH,a__H5EH;
-  __UINTEGER_32 new_size__NJIH,lab_type__MJIH;
-  void *result__KVP,*result__P5V,*e__ZGW,*e__BJIH,*e__0M1;
-  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__14V,*Self__YGW;
-  void *node__O5V,*node__CJIH,*node__DN1,*node__CHW,*node1__2URB;
-  void *node2__3URB,*__tmp__SIW;
-  __BOOLEAN __tmp__HAW,result__S3PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__P3PD,*o__T3PD,*__tmp__53PD;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__2FW;
-  void **__tmp__P4PD,**__tmp__R4PD,**Self__GA2E,**__tmp__SGW,**__tmp__UGW;
-  void **Self__Y3CC;
-  void **old_buckets__1URB;
-  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__1LNB,*Self__TSDC;
-  result__KVP=NULL;
-  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV <  0)) {
-    result__KVP=empty_list__RVP;
+  __INTEGER __tmp__24PD,i__3A2E,new_capacity__HGW,other_upper__GGW;
+  __INTEGER Self__TNKC,h__IHW,idx__JHW,idx__BVRB,new_capacity__CVRB;
+  __INTEGER i__AVRB,typ_id__JMNB;
+  __POINTER ptr__EMNB,ptr_table__FLJH,next__ELJH,result__GLJH;
+  __POINTER ptr_table__KLJH,next__JLJH,result__LLJH;
+  __UINTEGER_32 sz__GMNB,a__TAGH,new_size__UAGH,t__YAGH,a__XAGH;
+  __UINTEGER_32 new_size__NLJH,lab_type__MLJH;
+  void *result__SVP,*result__X5V,*e__BHW,*e__BLJH,*e__CN1;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__D5V,*Self__AHW;
+  void *node__W5V,*node__CLJH,*node__LN1,*node__KHW,*node1__EVRB;
+  void *node2__FVRB,*__tmp__0IW;
+  __BOOLEAN __tmp__PAW,result__03PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__X3PD,*o__13PD,*__tmp__H4PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__EGW;
+  void **__tmp__X4PD,**__tmp__Z4PD,**Self__JA2E,**__tmp__0GW,**__tmp__2GW;
+  void **Self__A4CC;
+  void **old_buckets__DVRB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__DMNB,*Self__1SDC;
+  result__SVP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__QVP)->parent_arrayed_collection__BYC.upper__SIV <  0)) {
+    result__SVP=empty_list__ZVP;
   } else {
-    Self__14V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__2VP);
-    result__P5V=NULL;
-    node__O5V=((void **)Self__14V->buckets__W5V)[(__INTEGER)(hash_code__P50(tmp__IVP) % Self__14V->capacity__R5V)];
-    until_do__XA1:
+    Self__D5V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__EWP);
+    result__X5V=NULL;
+    node__W5V=((void **)Self__D5V->buckets__45V)[(__INTEGER)(hash_code__X50(tmp__QVP) % Self__D5V->capacity__Z5V)];
+    until_do__5A1:
     {
-      if (((void *)node__O5V == (void *)NULL)) {
-        __tmp__HAW=TRUE__;
-      } else {
-        Self__P3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->item__CAW);
-        result__S3PD=FALSE__;
-        o__T3PD=NULL;
-        if (((void *)Self__P3PD == (void *)tmp__IVP)) {
-          result__S3PD=TRUE__;
-        } else {
-          if (tmp__IVP==NULL) {
-            __tmp__53PD=NULL;
-          } else {
-            __tmp__53PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP);
-          };
-          o__T3PD=__tmp__53PD;
-          if ((((void *)__tmp__53PD != (void *)NULL) && (Self__P3PD->parent_arrayed_collection__ZXC.upper__KIV == __tmp__53PD->parent_arrayed_collection__ZXC.upper__KIV))) {
-            __tmp__P4PD=Self__P3PD->parent_arrayed_collection__ZXC.storage__RMV;
-            __tmp__R4PD=__tmp__53PD->parent_arrayed_collection__ZXC.storage__RMV;
-            __tmp__U4PD=(__INTEGER)(Self__P3PD->parent_arrayed_collection__ZXC.upper__KIV +  1);
-            Self__GA2E=((void **)__tmp__P4PD);
-            i__0A2E=(__INTEGER)(__tmp__U4PD -  1);
-            while (((i__0A2E >=  0) && ((void *)Self__GA2E[i__0A2E] == (void *)((void **)__tmp__R4PD)[i__0A2E]))) {
-              i__0A2E=(__INTEGER)(i__0A2E -  1);
-            };
-            result__S3PD=(i__0A2E <  0);
-          };
-        };
-        __tmp__HAW=result__S3PD;
-      };
-      if ((! __tmp__HAW)) {
-        node__O5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->next__OAW;
-        goto until_do__XA1;
-      };
-    };
-    if (((void *)node__O5V != (void *)NULL)) {
-      result__P5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__O5V)->item__CAW;
-    };
-    result__KVP=result__P5V;
-    if (((void *)result__P5V == (void *)NULL)) {
-      result__KVP=create_with_capacity__IFR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV +  1));
-      Self__2FW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__KVP);
-      new_capacity__5FW= 0;
-      other_upper__4FW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.upper__KIV;
-      if ((other_upper__4FW >=  0)) {
-        new_capacity__5FW=(__INTEGER)(other_upper__4FW +  1);
-        if ((Self__2FW->parent_arrayed_collection__ZXC.capacity__5NV < new_capacity__5FW)) {
-          Self__2FW->parent_arrayed_collection__ZXC.storage__RMV=create__TBRB(new_capacity__5FW);
-          Self__2FW->parent_arrayed_collection__ZXC.capacity__5NV=new_capacity__5FW;
-        };
-        __tmp__SGW=Self__2FW->parent_arrayed_collection__ZXC.storage__RMV;
-        __tmp__UGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__IVP)->parent_arrayed_collection__ZXC.storage__RMV;
-        Self__Y3CC=((void **)__tmp__SGW);
-        Self__LNKC=other_upper__4FW;
-        while ((Self__LNKC >=  0)) {
-          Self__Y3CC[Self__LNKC]=((void **)__tmp__UGW)[Self__LNKC];
-          Self__LNKC=(__INTEGER)(Self__LNKC -  1);
-        };
-      };
-      Self__2FW->parent_arrayed_collection__ZXC.upper__KIV=other_upper__4FW;
-      Self__YGW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__2VP);
-      e__ZGW=result__KVP;
-      e__BJIH=result__KVP;
-      node__CJIH=((void **)Self__YGW->buckets__W5V)[(__INTEGER)(hash_code__P50(result__KVP) % Self__YGW->capacity__R5V)];
-      while ((! (((void *)node__CJIH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CJIH)->item__CAW == (void *)e__BJIH)))) {
-        node__CJIH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CJIH)->next__OAW;
-      };
-      e__0M1=result__KVP;
-      node__DN1=((void **)Self__YGW->buckets__W5V)[(__INTEGER)(hash_code__P50(result__KVP) % Self__YGW->capacity__R5V)];
-      while ((! (((void *)node__DN1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__DN1)->item__CAW == (void *)e__0M1)))) {
-        node__DN1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__DN1)->next__OAW;
-      };
-      h__AHW=hash_code__P50(result__KVP);
-      idx__BHW=(__INTEGER)(h__AHW % Self__YGW->capacity__R5V);
-      node__CHW=((void **)Self__YGW->buckets__W5V)[idx__BHW];
-      while ((! (((void *)node__CHW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CHW)->item__CAW == (void *)e__ZGW)))) {
-        node__CHW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CHW)->next__OAW;
-      };
-      if (((void *)node__CHW == (void *)NULL)) {
-        if ((Self__YGW->capacity__R5V == Self__YGW->count__FIW)) {
-          idx__ZURB= 0;
-          node1__2URB=NULL;
-          node2__3URB=NULL;
-          new_capacity__0URB=prime_number_ceiling__X41((__INTEGER)(Self__YGW->capacity__R5V +  1));
-          old_buckets__1URB=Self__YGW->buckets__W5V;
-          Self__YGW->buckets__W5V=create__1ZBB(new_capacity__0URB);
-          i__YURB=(__INTEGER)(Self__YGW->capacity__R5V -  1);
-          Self__YGW->capacity__R5V=new_capacity__0URB;
-          while ((i__YURB >=  0)) {
-            node1__2URB=((void **)old_buckets__1URB)[i__YURB];
-            while (((void *)node1__2URB != (void *)NULL)) {
-              node2__3URB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->next__OAW;
-              idx__ZURB=(__INTEGER)(hash_code__P50(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->item__CAW) % Self__YGW->capacity__R5V);
-              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__2URB)->next__OAW=((void **)Self__YGW->buckets__W5V)[idx__ZURB];
-              ((void **)Self__YGW->buckets__W5V)[idx__ZURB]=node1__2URB;
-              node1__2URB=node2__3URB;
-            };
-            i__YURB=(__INTEGER)(i__YURB -  1);
-          };
-          idx__BHW=(__INTEGER)(h__AHW % Self__YGW->capacity__R5V);
-        };
-        __tmp__SIW=((void **)Self__YGW->buckets__W5V)[idx__BHW];
-        result__1LNB=NULL;
-        ptr__2LNB=((__POINTER )(NULL));
-        typ_id__BMNB= 0;
-        sz__4LNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
-        if ((sz__4LNB ==  0)) {
-          result__1LNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-        } else {
-          typ_id__BMNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__4LNB);
-          if ((typ_id__BMNB == (__INTEGER)(-  1))) {
-            a__D5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__E5EH=(__UINTEGER_32)((__UINTEGER_32)(sz__4LNB + a__D5EH) & (__UINTEGER_32)(~ a__D5EH));
-            ptr_table__FJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E5EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__EJIH=((__POINTER )(NULL));
-            result__GJIH=((__POINTER *)ptr_table__FJIH)[ 0];
-            if ((result__GJIH == (void *)NULL)) {
-              result__GJIH=new_lab__MRJ(new_size__E5EH);
-              next__EJIH=(void *)((unsigned long)result__GJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5EH)));
-              ((__POINTER *)next__EJIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FJIH)[ 0]=next__EJIH;
+      if (((void *)node__W5V == (void *)NULL)) {
+        __tmp__PAW=TRUE__;
+      } else {
+        Self__X3PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->item__KAW);
+        result__03PD=FALSE__;
+        o__13PD=NULL;
+        if (((void *)Self__X3PD == (void *)tmp__QVP)) {
+          result__03PD=TRUE__;
+        } else {
+          if (tmp__QVP==NULL) {
+            __tmp__H4PD=NULL;
+          } else {
+            __tmp__H4PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__QVP);
+          };
+          o__13PD=__tmp__H4PD;
+          if ((((void *)__tmp__H4PD != (void *)NULL) && (Self__X3PD->parent_arrayed_collection__BYC.upper__SIV == __tmp__H4PD->parent_arrayed_collection__BYC.upper__SIV))) {
+            __tmp__X4PD=Self__X3PD->parent_arrayed_collection__BYC.storage__ZMV;
+            __tmp__Z4PD=__tmp__H4PD->parent_arrayed_collection__BYC.storage__ZMV;
+            __tmp__24PD=(__INTEGER)(Self__X3PD->parent_arrayed_collection__BYC.upper__SIV +  1);
+            Self__JA2E=((void **)__tmp__X4PD);
+            i__3A2E=(__INTEGER)(__tmp__24PD -  1);
+            while (((i__3A2E >=  0) && ((void *)Self__JA2E[i__3A2E] == (void *)((void **)__tmp__Z4PD)[i__3A2E]))) {
+              i__3A2E=(__INTEGER)(i__3A2E -  1);
+            };
+            result__03PD=(i__3A2E <  0);
+          };
+        };
+        __tmp__PAW=result__03PD;
+      };
+      if ((! __tmp__PAW)) {
+        node__W5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->next__WAW;
+        goto until_do__5A1;
+      };
+    };
+    if (((void *)node__W5V != (void *)NULL)) {
+      result__X5V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__W5V)->item__KAW;
+    };
+    result__SVP=result__X5V;
+    if (((void *)result__X5V == (void *)NULL)) {
+      result__SVP=create_with_capacity__QFR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__QVP)->parent_arrayed_collection__BYC.upper__SIV +  1));
+      Self__EGW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__SVP);
+      new_capacity__HGW= 0;
+      other_upper__GGW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__QVP)->parent_arrayed_collection__BYC.upper__SIV;
+      if ((other_upper__GGW >=  0)) {
+        new_capacity__HGW=(__INTEGER)(other_upper__GGW +  1);
+        if ((Self__EGW->parent_arrayed_collection__BYC.capacity__HOV < new_capacity__HGW)) {
+          Self__EGW->parent_arrayed_collection__BYC.storage__ZMV=create__1BRB(new_capacity__HGW);
+          Self__EGW->parent_arrayed_collection__BYC.capacity__HOV=new_capacity__HGW;
+        };
+        __tmp__0GW=Self__EGW->parent_arrayed_collection__BYC.storage__ZMV;
+        __tmp__2GW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__QVP)->parent_arrayed_collection__BYC.storage__ZMV;
+        Self__A4CC=((void **)__tmp__0GW);
+        Self__TNKC=other_upper__GGW;
+        while ((Self__TNKC >=  0)) {
+          Self__A4CC[Self__TNKC]=((void **)__tmp__2GW)[Self__TNKC];
+          Self__TNKC=(__INTEGER)(Self__TNKC -  1);
+        };
+      };
+      Self__EGW->parent_arrayed_collection__BYC.upper__SIV=other_upper__GGW;
+      Self__AHW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__EWP);
+      e__BHW=result__SVP;
+      e__BLJH=result__SVP;
+      node__CLJH=((void **)Self__AHW->buckets__45V)[(__INTEGER)(hash_code__X50(result__SVP) % Self__AHW->capacity__Z5V)];
+      while ((! (((void *)node__CLJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CLJH)->item__KAW == (void *)e__BLJH)))) {
+        node__CLJH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__CLJH)->next__WAW;
+      };
+      e__CN1=result__SVP;
+      node__LN1=((void **)Self__AHW->buckets__45V)[(__INTEGER)(hash_code__X50(result__SVP) % Self__AHW->capacity__Z5V)];
+      while ((! (((void *)node__LN1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__LN1)->item__KAW == (void *)e__CN1)))) {
+        node__LN1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__LN1)->next__WAW;
+      };
+      h__IHW=hash_code__X50(result__SVP);
+      idx__JHW=(__INTEGER)(h__IHW % Self__AHW->capacity__Z5V);
+      node__KHW=((void **)Self__AHW->buckets__45V)[idx__JHW];
+      while ((! (((void *)node__KHW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__KHW)->item__KAW == (void *)e__BHW)))) {
+        node__KHW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__KHW)->next__WAW;
+      };
+      if (((void *)node__KHW == (void *)NULL)) {
+        if ((Self__AHW->capacity__Z5V == Self__AHW->count__NIW)) {
+          idx__BVRB= 0;
+          node1__EVRB=NULL;
+          node2__FVRB=NULL;
+          new_capacity__CVRB=prime_number_ceiling__541((__INTEGER)(Self__AHW->capacity__Z5V +  1));
+          old_buckets__DVRB=Self__AHW->buckets__45V;
+          Self__AHW->buckets__45V=create__D0BB(new_capacity__CVRB);
+          i__AVRB=(__INTEGER)(Self__AHW->capacity__Z5V -  1);
+          Self__AHW->capacity__Z5V=new_capacity__CVRB;
+          while ((i__AVRB >=  0)) {
+            node1__EVRB=((void **)old_buckets__DVRB)[i__AVRB];
+            while (((void *)node1__EVRB != (void *)NULL)) {
+              node2__FVRB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__EVRB)->next__WAW;
+              idx__BVRB=(__INTEGER)(hash_code__X50(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__EVRB)->item__KAW) % Self__AHW->capacity__Z5V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__EVRB)->next__WAW=((void **)Self__AHW->buckets__45V)[idx__BVRB];
+              ((void **)Self__AHW->buckets__45V)[idx__BVRB]=node1__EVRB;
+              node1__EVRB=node2__FVRB;
+            };
+            i__AVRB=(__INTEGER)(i__AVRB -  1);
+          };
+          idx__JHW=(__INTEGER)(h__IHW % Self__AHW->capacity__Z5V);
+        };
+        __tmp__0IW=((void **)Self__AHW->buckets__45V)[idx__JHW];
+        result__DMNB=NULL;
+        ptr__EMNB=((__POINTER )(NULL));
+        typ_id__JMNB= 0;
+        sz__GMNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__GMNB ==  0)) {
+          result__DMNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__JMNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__GMNB);
+          if ((typ_id__JMNB == (__INTEGER)(-  1))) {
+            a__TAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__UAGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GMNB + a__TAGH) & (__UINTEGER_32)(~ a__TAGH));
+            ptr_table__FLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UAGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ELJH=((__POINTER )(NULL));
+            result__GLJH=((__POINTER *)ptr_table__FLJH)[ 0];
+            if ((result__GLJH == (void *)NULL)) {
+              result__GLJH=new_lab__URJ(new_size__UAGH);
+              next__ELJH=(void *)((unsigned long)result__GLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UAGH)));
+              ((__POINTER *)next__ELJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FLJH)[ 0]=next__ELJH;
             } else {
-              next__EJIH=((__POINTER *)result__GJIH)[ 0];
-              if ((next__EJIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__E5EH <<  1)) <=  4096)) {
-                  next__EJIH=(void *)((unsigned long)result__GJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5EH)));
+              next__ELJH=((__POINTER *)result__GLJH)[ 0];
+              if ((next__ELJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GLJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UAGH <<  1)) <=  4096)) {
+                  next__ELJH=(void *)((unsigned long)result__GLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UAGH)));
                 } else {
-                  next__EJIH=new_lab__MRJ(new_size__E5EH);
+                  next__ELJH=new_lab__URJ(new_size__UAGH);
                 };
-                ((__POINTER *)next__EJIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__FJIH)[ 0]=next__EJIH;
+                ((__POINTER *)next__ELJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FLJH)[ 0]=next__ELJH;
               } else {
-                ((__POINTER *)result__GJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__GJIH=next__EJIH;
+                ((__POINTER *)result__GLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ELJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GLJH=next__ELJH;
               };
             };
-            ptr__2LNB=result__GJIH;
-          } else {
-            t__I5EH=((__UINTEGER_32 )typ_id__BMNB);
-            a__H5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__NJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4LNB + a__H5EH) & (__UINTEGER_32)(~ a__H5EH));
-            ptr_table__KJIH=((__POINTER )(&(table_type[(t__I5EH)])));
-            lab_type__MJIH=(__UINTEGER_32)(t__I5EH |  1);
-            next__JJIH=((__POINTER )(NULL));
-            result__LJIH=((__POINTER *)ptr_table__KJIH)[ 0];
-            if ((result__LJIH == (void *)NULL)) {
-              result__LJIH=new_lab__MRJ(lab_type__MJIH);
-              next__JJIH=(void *)((unsigned long)result__LJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJIH)));
-              ((__POINTER *)next__JJIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KJIH)[ 0]=next__JJIH;
+            ptr__EMNB=result__GLJH;
+          } else {
+            t__YAGH=((__UINTEGER_32 )typ_id__JMNB);
+            a__XAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GMNB + a__XAGH) & (__UINTEGER_32)(~ a__XAGH));
+            ptr_table__KLJH=((__POINTER )(&(table_type[(t__YAGH)])));
+            lab_type__MLJH=(__UINTEGER_32)(t__YAGH |  1);
+            next__JLJH=((__POINTER )(NULL));
+            result__LLJH=((__POINTER *)ptr_table__KLJH)[ 0];
+            if ((result__LLJH == (void *)NULL)) {
+              result__LLJH=new_lab__URJ(lab_type__MLJH);
+              next__JLJH=(void *)((unsigned long)result__LLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLJH)));
+              ((__POINTER *)next__JLJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KLJH)[ 0]=next__JLJH;
             } else {
-              next__JJIH=((__POINTER *)result__LJIH)[ 0];
-              if ((next__JJIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NJIH <<  1)) <=  4096)) {
-                  next__JJIH=(void *)((unsigned long)result__LJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJIH)));
+              next__JLJH=((__POINTER *)result__LLJH)[ 0];
+              if ((next__JLJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LLJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__NLJH <<  1)) <=  4096)) {
+                  next__JLJH=(void *)((unsigned long)result__LLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLJH)));
                 } else {
-                  next__JJIH=new_lab__MRJ(lab_type__MJIH);
+                  next__JLJH=new_lab__URJ(lab_type__MLJH);
                 };
-                ((__POINTER *)next__JJIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KJIH)[ 0]=next__JJIH;
+                ((__POINTER *)next__JLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KLJH)[ 0]=next__JLJH;
               } else {
-                ((__POINTER *)result__LJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LJIH=next__JJIH;
+                ((__POINTER *)result__LLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LLJH=next__JLJH;
               };
             };
-            ptr__2LNB=result__LJIH;
+            ptr__EMNB=result__LLJH;
           };
-          result__1LNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__2LNB);
-          *(result__1LNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__DMNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__EMNB);
+          *(result__DMNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        Self__TSDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__1LNB);
-        Self__TSDC->item__CAW=result__KVP;
-        Self__TSDC->next__OAW=__tmp__SIW;
-        node__CHW=result__1LNB;
-        ((void **)Self__YGW->buckets__W5V)[idx__BHW]=result__1LNB;
-        Self__YGW->count__FIW=(__INTEGER)(Self__YGW->count__FIW +  1);
+        Self__1SDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__DMNB);
+        Self__1SDC->item__KAW=result__SVP;
+        Self__1SDC->next__WAW=__tmp__0IW;
+        node__KHW=result__DMNB;
+        ((void **)Self__AHW->buckets__45V)[idx__JHW]=result__DMNB;
+        Self__AHW->count__NIW=(__INTEGER)(Self__AHW->count__NIW +  1);
       };
     };
   };
-  free__2MQ(tmp__IVP);
-  return(result__KVP);
+  free__ENQ(tmp__QVP);
+  return(result__SVP);
 }
 
-static void add__CMHB(__HASHED_SEToSTRING_CONSTANTo *Self__DMHB,void *e__EMHB)
+static void add__KMHB(__HASHED_SEToSTRING_CONSTANTo *Self__LMHB,void *e__MMHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__PRGH,*Self__URGH;
-  __INTEGER result__ORGH,__tmp__QRGH,Self__RRGH,idx__MMHB,idx__FQ0B;
-  __INTEGER new_capacity__GQ0B,i__EQ0B,result__TRGH,__tmp__VRGH;
-  __INTEGER Self__WRGH,typ_id__W3WB;
-  __POINTER ptr__R3WB,ptr_table__PJIH,next__OJIH,result__QJIH;
-  __POINTER ptr_table__UJIH,next__TJIH,result__VJIH;
-  __UINTEGER_32 sz__T3WB,a__35EH,new_size__45EH,t__CAFH,a__BAFH;
-  __UINTEGER_32 new_size__XJIH,lab_type__WJIH;
-  void *node__NMHB,*node1__IQ0B,*node2__JQ0B,*__tmp__2NHB;
-  void **old_buckets__HQ0B;
-  __HASHED_SET_NODEoSTRING_CONSTANTo *result__Q3WB,*Self__SLFC;
-  has__TLMB(Self__DMHB,e__EMHB);
-  has__TLMB(Self__DMHB,e__EMHB);
-  Self__PRGH=((__STRING_CONSTANT *)e__EMHB);
-  result__ORGH= 0;
-  __tmp__QRGH=Self__PRGH->count__DD;
-  Self__RRGH= 1;
-  while ((Self__RRGH <= __tmp__QRGH)) {
-    result__ORGH=(__INTEGER)((__INTEGER)( 5 * result__ORGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PRGH->storage__VQO)[(__INTEGER)(Self__RRGH -  1)])));
-    Self__RRGH=(__INTEGER)(Self__RRGH +  1);
-  };
-  if ((result__ORGH <  0)) {
-    result__ORGH=(__INTEGER)(~ result__ORGH);
-  };
-  idx__MMHB=(__INTEGER)(result__ORGH % Self__DMHB->capacity__KIT);
-  node__NMHB=((void **)Self__DMHB->buckets__PEV)[idx__MMHB];
-  while ((! (((void *)node__NMHB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__NMHB)->item__1EV,e__EMHB)))) {
-    node__NMHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__NMHB)->next__GFV;
-  };
-  if (((void *)node__NMHB == (void *)NULL)) {
-    if ((Self__DMHB->capacity__KIT == Self__DMHB->count__YHY)) {
-      idx__FQ0B= 0;
-      node1__IQ0B=NULL;
-      node2__JQ0B=NULL;
-      new_capacity__GQ0B=prime_number_ceiling__X41((__INTEGER)(Self__DMHB->capacity__KIT +  1));
-      old_buckets__HQ0B=Self__DMHB->buckets__PEV;
-      Self__DMHB->buckets__PEV=create__T23(new_capacity__GQ0B);
-      i__EQ0B=(__INTEGER)(Self__DMHB->capacity__KIT -  1);
-      Self__DMHB->capacity__KIT=new_capacity__GQ0B;
-      while ((i__EQ0B >=  0)) {
-        node1__IQ0B=((void **)old_buckets__HQ0B)[i__EQ0B];
-        while (((void *)node1__IQ0B != (void *)NULL)) {
-          node2__JQ0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->next__GFV;
-          Self__URGH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->item__1EV);
-          result__TRGH= 0;
-          __tmp__VRGH=Self__URGH->count__DD;
-          Self__WRGH= 1;
-          while ((Self__WRGH <= __tmp__VRGH)) {
-            result__TRGH=(__INTEGER)((__INTEGER)( 5 * result__TRGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__URGH->storage__VQO)[(__INTEGER)(Self__WRGH -  1)])));
-            Self__WRGH=(__INTEGER)(Self__WRGH +  1);
-          };
-          if ((result__TRGH <  0)) {
-            result__TRGH=(__INTEGER)(~ result__TRGH);
-          };
-          idx__FQ0B=(__INTEGER)(result__TRGH % Self__DMHB->capacity__KIT);
-          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__IQ0B)->next__GFV=((void **)Self__DMHB->buckets__PEV)[idx__FQ0B];
-          ((void **)Self__DMHB->buckets__PEV)[idx__FQ0B]=node1__IQ0B;
-          node1__IQ0B=node2__JQ0B;
-        };
-        i__EQ0B=(__INTEGER)(i__EQ0B -  1);
-      };
-      idx__MMHB=(__INTEGER)(result__ORGH % new_capacity__GQ0B);
-    };
-    __tmp__2NHB=((void **)Self__DMHB->buckets__PEV)[idx__MMHB];
-    result__Q3WB=NULL;
-    ptr__R3WB=((__POINTER )(NULL));
-    typ_id__W3WB= 0;
-    sz__T3WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
-    if ((sz__T3WB ==  0)) {
-      result__Q3WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
-    } else {
-      typ_id__W3WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__T3WB);
-      if ((typ_id__W3WB == (__INTEGER)(-  1))) {
-        a__35EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__45EH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3WB + a__35EH) & (__UINTEGER_32)(~ a__35EH));
-        ptr_table__PJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__45EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__OJIH=((__POINTER )(NULL));
-        result__QJIH=((__POINTER *)ptr_table__PJIH)[ 0];
-        if ((result__QJIH == (void *)NULL)) {
-          result__QJIH=new_lab__MRJ(new_size__45EH);
-          next__OJIH=(void *)((unsigned long)result__QJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45EH)));
-          ((__POINTER *)next__OJIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PJIH)[ 0]=next__OJIH;
-        } else {
-          next__OJIH=((__POINTER *)result__QJIH)[ 0];
-          if ((next__OJIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__45EH <<  1)) <=  4096)) {
-              next__OJIH=(void *)((unsigned long)result__QJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__45EH)));
+  __STRING_CONSTANT *Self__KTHH,*Self__PTHH;
+  __INTEGER result__JTHH,__tmp__LTHH,Self__MTHH,idx__UMHB,idx__NQ0B;
+  __INTEGER new_capacity__OQ0B,i__MQ0B,result__OTHH,__tmp__QTHH;
+  __INTEGER Self__RTHH,typ_id__43WB;
+  __POINTER ptr__Z3WB,ptr_table__PLJH,next__OLJH,result__QLJH;
+  __POINTER ptr_table__ULJH,next__TLJH,result__VLJH;
+  __UINTEGER_32 sz__13WB,a__NBGH,new_size__OBGH,t__SBGH,a__RBGH;
+  __UINTEGER_32 new_size__XLJH,lab_type__WLJH;
+  void *node__VMHB,*node1__QQ0B,*node2__RQ0B,*__tmp__EOHB;
+  void **old_buckets__PQ0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__Y3WB,*Self__0LFC;
+  has__1LMB(Self__LMHB,e__MMHB);
+  has__1LMB(Self__LMHB,e__MMHB);
+  Self__KTHH=((__STRING_CONSTANT *)e__MMHB);
+  result__JTHH= 0;
+  __tmp__LTHH=Self__KTHH->count__DD;
+  Self__MTHH= 1;
+  while ((Self__MTHH <= __tmp__LTHH)) {
+    result__JTHH=(__INTEGER)((__INTEGER)( 5 * result__JTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__KTHH->storage__3QO)[(__INTEGER)(Self__MTHH -  1)])));
+    Self__MTHH=(__INTEGER)(Self__MTHH +  1);
+  };
+  if ((result__JTHH <  0)) {
+    result__JTHH=(__INTEGER)(~ result__JTHH);
+  };
+  idx__UMHB=(__INTEGER)(result__JTHH % Self__LMHB->capacity__SIT);
+  node__VMHB=((void **)Self__LMHB->buckets__XEV)[idx__UMHB];
+  while ((! (((void *)node__VMHB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__VMHB)->item__DFV,e__MMHB)))) {
+    node__VMHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__VMHB)->next__OFV;
+  };
+  if (((void *)node__VMHB == (void *)NULL)) {
+    if ((Self__LMHB->capacity__SIT == Self__LMHB->count__AIY)) {
+      idx__NQ0B= 0;
+      node1__QQ0B=NULL;
+      node2__RQ0B=NULL;
+      new_capacity__OQ0B=prime_number_ceiling__541((__INTEGER)(Self__LMHB->capacity__SIT +  1));
+      old_buckets__PQ0B=Self__LMHB->buckets__XEV;
+      Self__LMHB->buckets__XEV=create__123(new_capacity__OQ0B);
+      i__MQ0B=(__INTEGER)(Self__LMHB->capacity__SIT -  1);
+      Self__LMHB->capacity__SIT=new_capacity__OQ0B;
+      while ((i__MQ0B >=  0)) {
+        node1__QQ0B=((void **)old_buckets__PQ0B)[i__MQ0B];
+        while (((void *)node1__QQ0B != (void *)NULL)) {
+          node2__RQ0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__QQ0B)->next__OFV;
+          Self__PTHH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__QQ0B)->item__DFV);
+          result__OTHH= 0;
+          __tmp__QTHH=Self__PTHH->count__DD;
+          Self__RTHH= 1;
+          while ((Self__RTHH <= __tmp__QTHH)) {
+            result__OTHH=(__INTEGER)((__INTEGER)( 5 * result__OTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__PTHH->storage__3QO)[(__INTEGER)(Self__RTHH -  1)])));
+            Self__RTHH=(__INTEGER)(Self__RTHH +  1);
+          };
+          if ((result__OTHH <  0)) {
+            result__OTHH=(__INTEGER)(~ result__OTHH);
+          };
+          idx__NQ0B=(__INTEGER)(result__OTHH % Self__LMHB->capacity__SIT);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__QQ0B)->next__OFV=((void **)Self__LMHB->buckets__XEV)[idx__NQ0B];
+          ((void **)Self__LMHB->buckets__XEV)[idx__NQ0B]=node1__QQ0B;
+          node1__QQ0B=node2__RQ0B;
+        };
+        i__MQ0B=(__INTEGER)(i__MQ0B -  1);
+      };
+      idx__UMHB=(__INTEGER)(result__JTHH % new_capacity__OQ0B);
+    };
+    __tmp__EOHB=((void **)Self__LMHB->buckets__XEV)[idx__UMHB];
+    result__Y3WB=NULL;
+    ptr__Z3WB=((__POINTER )(NULL));
+    typ_id__43WB= 0;
+    sz__13WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__13WB ==  0)) {
+      result__Y3WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__43WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__13WB);
+      if ((typ_id__43WB == (__INTEGER)(-  1))) {
+        a__NBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__13WB + a__NBGH) & (__UINTEGER_32)(~ a__NBGH));
+        ptr_table__PLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__OLJH=((__POINTER )(NULL));
+        result__QLJH=((__POINTER *)ptr_table__PLJH)[ 0];
+        if ((result__QLJH == (void *)NULL)) {
+          result__QLJH=new_lab__URJ(new_size__OBGH);
+          next__OLJH=(void *)((unsigned long)result__QLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBGH)));
+          ((__POINTER *)next__OLJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PLJH)[ 0]=next__OLJH;
+        } else {
+          next__OLJH=((__POINTER *)result__QLJH)[ 0];
+          if ((next__OLJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QLJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OBGH <<  1)) <=  4096)) {
+              next__OLJH=(void *)((unsigned long)result__QLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OBGH)));
             } else {
-              next__OJIH=new_lab__MRJ(new_size__45EH);
-            };
-            ((__POINTER *)next__OJIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PJIH)[ 0]=next__OJIH;
-          } else {
-            ((__POINTER *)result__QJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QJIH=next__OJIH;
-          };
-        };
-        ptr__R3WB=result__QJIH;
-      } else {
-        t__CAFH=((__UINTEGER_32 )typ_id__W3WB);
-        a__BAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__XJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3WB + a__BAFH) & (__UINTEGER_32)(~ a__BAFH));
-        ptr_table__UJIH=((__POINTER )(&(table_type[(t__CAFH)])));
-        lab_type__WJIH=(__UINTEGER_32)(t__CAFH |  1);
-        next__TJIH=((__POINTER )(NULL));
-        result__VJIH=((__POINTER *)ptr_table__UJIH)[ 0];
-        if ((result__VJIH == (void *)NULL)) {
-          result__VJIH=new_lab__MRJ(lab_type__WJIH);
-          next__TJIH=(void *)((unsigned long)result__VJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJIH)));
-          ((__POINTER *)next__TJIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UJIH)[ 0]=next__TJIH;
-        } else {
-          next__TJIH=((__POINTER *)result__VJIH)[ 0];
-          if ((next__TJIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VJIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XJIH <<  1)) <=  4096)) {
-              next__TJIH=(void *)((unsigned long)result__VJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XJIH)));
+              next__OLJH=new_lab__URJ(new_size__OBGH);
+            };
+            ((__POINTER *)next__OLJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PLJH)[ 0]=next__OLJH;
+          } else {
+            ((__POINTER *)result__QLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QLJH=next__OLJH;
+          };
+        };
+        ptr__Z3WB=result__QLJH;
+      } else {
+        t__SBGH=((__UINTEGER_32 )typ_id__43WB);
+        a__RBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__13WB + a__RBGH) & (__UINTEGER_32)(~ a__RBGH));
+        ptr_table__ULJH=((__POINTER )(&(table_type[(t__SBGH)])));
+        lab_type__WLJH=(__UINTEGER_32)(t__SBGH |  1);
+        next__TLJH=((__POINTER )(NULL));
+        result__VLJH=((__POINTER *)ptr_table__ULJH)[ 0];
+        if ((result__VLJH == (void *)NULL)) {
+          result__VLJH=new_lab__URJ(lab_type__WLJH);
+          next__TLJH=(void *)((unsigned long)result__VLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLJH)));
+          ((__POINTER *)next__TLJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ULJH)[ 0]=next__TLJH;
+        } else {
+          next__TLJH=((__POINTER *)result__VLJH)[ 0];
+          if ((next__TLJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VLJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XLJH <<  1)) <=  4096)) {
+              next__TLJH=(void *)((unsigned long)result__VLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XLJH)));
             } else {
-              next__TJIH=new_lab__MRJ(lab_type__WJIH);
+              next__TLJH=new_lab__URJ(lab_type__WLJH);
             };
-            ((__POINTER *)next__TJIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UJIH)[ 0]=next__TJIH;
+            ((__POINTER *)next__TLJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ULJH)[ 0]=next__TLJH;
           } else {
-            ((__POINTER *)result__VJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VJIH=next__TJIH;
+            ((__POINTER *)result__VLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VLJH=next__TLJH;
           };
         };
-        ptr__R3WB=result__VJIH;
+        ptr__Z3WB=result__VLJH;
       };
-      result__Q3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__R3WB);
-      *(result__Q3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__Y3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__Z3WB);
+      *(result__Y3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    Self__SLFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__Q3WB);
-    Self__SLFC->item__1EV=e__EMHB;
-    Self__SLFC->next__GFV=__tmp__2NHB;
-    node__NMHB=result__Q3WB;
-    ((void **)Self__DMHB->buckets__PEV)[idx__MMHB]=result__Q3WB;
-    Self__DMHB->count__YHY=(__INTEGER)(Self__DMHB->count__YHY +  1);
+    Self__0LFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__Y3WB);
+    Self__0LFC->item__DFV=e__MMHB;
+    Self__0LFC->next__OFV=__tmp__EOHB;
+    node__VMHB=result__Y3WB;
+    ((void **)Self__LMHB->buckets__XEV)[idx__UMHB]=result__Y3WB;
+    Self__LMHB->count__AIY=(__INTEGER)(Self__LMHB->count__AIY +  1);
   };
 }
 
-static void add_last__RBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__SBPD,void *element__TBPD)
+static void add_last__ZBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__0BPD,void *element__1BPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__UBPD,__tmp__1CPD,__tmp__2FWE,Self__1VPF;
-  __BOOLEAN __tmp__DCPD;
-  void **__tmp__0CPD,**new__IFWE;
-  new_capacity__UBPD= 0;
-  if (((__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1) <= (__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD -  1))) {
-    Self__SBPD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1);
-    __tmp__DCPD=TRUE__;
+  __INTEGER new_capacity__2BPD,__tmp__DDPD,__tmp__RFWE,Self__5BQF;
+  __BOOLEAN __tmp__LCPD;
+  void **__tmp__CDPD,**new__3EWE;
+  new_capacity__2BPD= 0;
+  if (((__INTEGER)(Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD +  1) <= (__INTEGER)(Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD -  1))) {
+    Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD=(__INTEGER)(Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD +  1);
+    __tmp__LCPD=TRUE__;
   } else {
-    __tmp__DCPD=FALSE__;
-  };
-  if ((! __tmp__DCPD)) {
-    if ((Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD ==  0)) {
-      Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD=create__RLHE( 2);
-      Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD= 2;
-      Self__SBPD->parent_arrayed_collection__H5I.upper__15OD= 0;
-    } else {
-      new_capacity__UBPD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD <<  1);
-      __tmp__0CPD=Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD;
-      __tmp__1CPD=Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD;
-      new__IFWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__0CPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__1CPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UBPD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__2FWE=(__INTEGER)(new_capacity__UBPD -  1);
-      Self__1VPF=__tmp__1CPD;
-      while ((Self__1VPF <= __tmp__2FWE)) {
-        new__IFWE[Self__1VPF]=NULL;
-        Self__1VPF=(__INTEGER)(Self__1VPF +  1);
-      };
-      Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD=new__IFWE;
-      Self__SBPD->parent_arrayed_collection__H5I.capacity__WBPD=new_capacity__UBPD;
-      Self__SBPD->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(Self__SBPD->parent_arrayed_collection__H5I.upper__15OD +  1);
-    };
-  };
-  ((void **)Self__SBPD->parent_arrayed_collection__H5I.storage__RCPD)[Self__SBPD->parent_arrayed_collection__H5I.upper__15OD]=element__TBPD;
+    __tmp__LCPD=FALSE__;
+  };
+  if ((! __tmp__LCPD)) {
+    if ((Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD ==  0)) {
+      Self__0BPD->parent_arrayed_collection__P5I.storage__ZCPD=create__OJHE( 2);
+      Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD= 2;
+      Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD= 0;
+    } else {
+      new_capacity__2BPD=(__INTEGER)(Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD <<  1);
+      __tmp__CDPD=Self__0BPD->parent_arrayed_collection__P5I.storage__ZCPD;
+      __tmp__DDPD=Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD;
+      new__3EWE=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__CDPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__DDPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__2BPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__RFWE=(__INTEGER)(new_capacity__2BPD -  1);
+      Self__5BQF=__tmp__DDPD;
+      while ((Self__5BQF <= __tmp__RFWE)) {
+        new__3EWE[Self__5BQF]=NULL;
+        Self__5BQF=(__INTEGER)(Self__5BQF +  1);
+      };
+      Self__0BPD->parent_arrayed_collection__P5I.storage__ZCPD=new__3EWE;
+      Self__0BPD->parent_arrayed_collection__P5I.capacity__4BPD=new_capacity__2BPD;
+      Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD=(__INTEGER)(Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD +  1);
+    };
+  };
+  ((void **)Self__0BPD->parent_arrayed_collection__P5I.storage__ZCPD)[Self__0BPD->parent_arrayed_collection__P5I.upper__DAPD]=element__1BPD;
 }
 
-static void free__0S5(void *tmp__2S5)
+static void free__CT5(void *tmp__ET5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__UGGB,__tmp__YHGB,__tmp__JHGC,Self__V4VD;
-  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__SGGB;
-  __BOOLEAN __tmp__CHGB;
-  void **__tmp__XHGB,**new__VGGC;
-  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__2S5)->parent_arrayed_collection__H5I.upper__15OD=(__INTEGER)(-  1);
-  Self__SGGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__K5K);
-  new_capacity__UGGB= 0;
-  if (((__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1) <= (__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU -  1))) {
-    Self__SGGB->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1);
-    __tmp__CHGB=TRUE__;
+  __INTEGER new_capacity__2GGB,__tmp__AIGB,__tmp__RHGC,Self__34VD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__0GGB;
+  __BOOLEAN __tmp__KHGB;
+  void **__tmp__5HGB,**new__3GGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__ET5)->parent_arrayed_collection__P5I.upper__DAPD=(__INTEGER)(-  1);
+  Self__0GGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__S5K);
+  new_capacity__2GGB= 0;
+  if (((__INTEGER)(Self__0GGB->parent_arrayed_collection__R5K.upper__CTU +  1) <= (__INTEGER)(Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU -  1))) {
+    Self__0GGB->parent_arrayed_collection__R5K.upper__CTU=(__INTEGER)(Self__0GGB->parent_arrayed_collection__R5K.upper__CTU +  1);
+    __tmp__KHGB=TRUE__;
   } else {
-    __tmp__CHGB=FALSE__;
-  };
-  if ((! __tmp__CHGB)) {
-    if ((Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU ==  0)) {
-      Self__SGGB->parent_arrayed_collection__J5K.storage__KVU=create__53ZB( 2);
-      Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU= 2;
-      Self__SGGB->parent_arrayed_collection__J5K.upper__0SU= 0;
-    } else {
-      new_capacity__UGGB=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU <<  1);
-      __tmp__XHGB=Self__SGGB->parent_arrayed_collection__J5K.storage__KVU;
-      __tmp__YHGB=Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU;
-      new__VGGC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__XHGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__YHGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UGGB * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__JHGC=(__INTEGER)(new_capacity__UGGB -  1);
-      Self__V4VD=__tmp__YHGB;
-      while ((Self__V4VD <= __tmp__JHGC)) {
-        new__VGGC[Self__V4VD]=NULL;
-        Self__V4VD=(__INTEGER)(Self__V4VD +  1);
-      };
-      Self__SGGB->parent_arrayed_collection__J5K.storage__KVU=new__VGGC;
-      Self__SGGB->parent_arrayed_collection__J5K.capacity__5UU=new_capacity__UGGB;
-      Self__SGGB->parent_arrayed_collection__J5K.upper__0SU=(__INTEGER)(Self__SGGB->parent_arrayed_collection__J5K.upper__0SU +  1);
-    };
-  };
-  ((void **)Self__SGGB->parent_arrayed_collection__J5K.storage__KVU)[Self__SGGB->parent_arrayed_collection__J5K.upper__0SU]=tmp__2S5;
+    __tmp__KHGB=FALSE__;
+  };
+  if ((! __tmp__KHGB)) {
+    if ((Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU ==  0)) {
+      Self__0GGB->parent_arrayed_collection__R5K.storage__SVU=create__H4ZB( 2);
+      Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU= 2;
+      Self__0GGB->parent_arrayed_collection__R5K.upper__CTU= 0;
+    } else {
+      new_capacity__2GGB=(__INTEGER)(Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU <<  1);
+      __tmp__5HGB=Self__0GGB->parent_arrayed_collection__R5K.storage__SVU;
+      __tmp__AIGB=Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU;
+      new__3GGC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__5HGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__AIGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__2GGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__RHGC=(__INTEGER)(new_capacity__2GGB -  1);
+      Self__34VD=__tmp__AIGB;
+      while ((Self__34VD <= __tmp__RHGC)) {
+        new__3GGC[Self__34VD]=NULL;
+        Self__34VD=(__INTEGER)(Self__34VD +  1);
+      };
+      Self__0GGB->parent_arrayed_collection__R5K.storage__SVU=new__3GGC;
+      Self__0GGB->parent_arrayed_collection__R5K.capacity__HVU=new_capacity__2GGB;
+      Self__0GGB->parent_arrayed_collection__R5K.upper__CTU=(__INTEGER)(Self__0GGB->parent_arrayed_collection__R5K.upper__CTU +  1);
+    };
+  };
+  ((void **)Self__0GGB->parent_arrayed_collection__R5K.storage__SVU)[Self__0GGB->parent_arrayed_collection__R5K.upper__CTU]=tmp__ET5;
 }
 
-static void free__2MQ(void *tmp__4MQ)
+static void free__ENQ(void *tmp__GNQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__4YV,__tmp__F0V,__tmp__FKEC,Self__KNVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__2YV;
-  __BOOLEAN __tmp__NZV;
-  void **__tmp__E0V,**new__RJEC;
-  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__4MQ)->parent_arrayed_collection__ZXC.upper__KIV=(__INTEGER)(-  1);
-  Self__2YV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-  new_capacity__4YV= 0;
-  if (((__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1) <= (__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.capacity__AZV -  1))) {
-    Self__2YV->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1);
-    __tmp__NZV=TRUE__;
+  __INTEGER new_capacity__GZV,__tmp__N0V,__tmp__NKEC,Self__SNVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__EZV;
+  __BOOLEAN __tmp__VZV;
+  void **__tmp__M0V,**new__ZJEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__GNQ)->parent_arrayed_collection__BYC.upper__SIV=(__INTEGER)(-  1);
+  Self__EZV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+  new_capacity__GZV= 0;
+  if (((__INTEGER)(Self__EZV->parent_arrayed_collection__RUP.upper__NVV +  1) <= (__INTEGER)(Self__EZV->parent_arrayed_collection__RUP.capacity__IZV -  1))) {
+    Self__EZV->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(Self__EZV->parent_arrayed_collection__RUP.upper__NVV +  1);
+    __tmp__VZV=TRUE__;
   } else {
-    __tmp__NZV=FALSE__;
-  };
-  if ((! __tmp__NZV)) {
-    if ((Self__2YV->parent_arrayed_collection__JUP.capacity__AZV ==  0)) {
-      Self__2YV->parent_arrayed_collection__JUP.storage__1ZV=create__MJRB( 2);
-      Self__2YV->parent_arrayed_collection__JUP.capacity__AZV= 2;
-      Self__2YV->parent_arrayed_collection__JUP.upper__FVV= 0;
-    } else {
-      new_capacity__4YV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.capacity__AZV <<  1);
-      __tmp__E0V=Self__2YV->parent_arrayed_collection__JUP.storage__1ZV;
-      __tmp__F0V=Self__2YV->parent_arrayed_collection__JUP.capacity__AZV;
-      new__RJEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__E0V)),((__UINTEGER_32 )(__INTEGER)(__tmp__F0V * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4YV * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__FKEC=(__INTEGER)(new_capacity__4YV -  1);
-      Self__KNVD=__tmp__F0V;
-      while ((Self__KNVD <= __tmp__FKEC)) {
-        new__RJEC[Self__KNVD]=NULL;
-        Self__KNVD=(__INTEGER)(Self__KNVD +  1);
-      };
-      Self__2YV->parent_arrayed_collection__JUP.storage__1ZV=new__RJEC;
-      Self__2YV->parent_arrayed_collection__JUP.capacity__AZV=new_capacity__4YV;
-      Self__2YV->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__2YV->parent_arrayed_collection__JUP.upper__FVV +  1);
-    };
-  };
-  ((void **)Self__2YV->parent_arrayed_collection__JUP.storage__1ZV)[Self__2YV->parent_arrayed_collection__JUP.upper__FVV]=tmp__4MQ;
+    __tmp__VZV=FALSE__;
+  };
+  if ((! __tmp__VZV)) {
+    if ((Self__EZV->parent_arrayed_collection__RUP.capacity__IZV ==  0)) {
+      Self__EZV->parent_arrayed_collection__RUP.storage__D0V=create__UJRB( 2);
+      Self__EZV->parent_arrayed_collection__RUP.capacity__IZV= 2;
+      Self__EZV->parent_arrayed_collection__RUP.upper__NVV= 0;
+    } else {
+      new_capacity__GZV=(__INTEGER)(Self__EZV->parent_arrayed_collection__RUP.capacity__IZV <<  1);
+      __tmp__M0V=Self__EZV->parent_arrayed_collection__RUP.storage__D0V;
+      __tmp__N0V=Self__EZV->parent_arrayed_collection__RUP.capacity__IZV;
+      new__ZJEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__M0V)),((__UINTEGER_32 )(__INTEGER)(__tmp__N0V * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__GZV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__NKEC=(__INTEGER)(new_capacity__GZV -  1);
+      Self__SNVD=__tmp__N0V;
+      while ((Self__SNVD <= __tmp__NKEC)) {
+        new__ZJEC[Self__SNVD]=NULL;
+        Self__SNVD=(__INTEGER)(Self__SNVD +  1);
+      };
+      Self__EZV->parent_arrayed_collection__RUP.storage__D0V=new__ZJEC;
+      Self__EZV->parent_arrayed_collection__RUP.capacity__IZV=new_capacity__GZV;
+      Self__EZV->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(Self__EZV->parent_arrayed_collection__RUP.upper__NVV +  1);
+    };
+  };
+  ((void **)Self__EZV->parent_arrayed_collection__RUP.storage__D0V)[Self__EZV->parent_arrayed_collection__RUP.upper__NVV]=tmp__GNQ;
 }
 
-static __INTEGER hash_code__BTQF(__FAST_ARRAYoSTRING_CONSTANTo *Self__CTQF)
+static __INTEGER hash_code__F5QF(__FAST_ARRAYoSTRING_CONSTANTo *Self__G5QF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER result__ETQF,result__YRGH,__tmp__0RGH,Self__1RGH;
-  __INTEGER result__3RGH,__tmp__5RGH,Self__ASGH;
-  __STRING_CONSTANT *Self__ZRGH,*Self__4RGH;
-  __BOOLEAN __tmp__VTQF;
-  result__ETQF= 0;
-  if ((! (Self__CTQF->parent_arrayed_collection__H5I.upper__15OD <  0))) {
-    if (((void *)((void **)Self__CTQF->parent_arrayed_collection__H5I.storage__RCPD)[Self__CTQF->parent_arrayed_collection__H5I.upper__15OD] != (void *)NULL)) {
-      Self__ZRGH=((__STRING_CONSTANT *)((void **)Self__CTQF->parent_arrayed_collection__H5I.storage__RCPD)[Self__CTQF->parent_arrayed_collection__H5I.upper__15OD]);
-      result__YRGH= 0;
-      __tmp__0RGH=Self__ZRGH->count__DD;
-      Self__1RGH= 1;
-      while ((Self__1RGH <= __tmp__0RGH)) {
-        result__YRGH=(__INTEGER)((__INTEGER)( 5 * result__YRGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZRGH->storage__VQO)[(__INTEGER)(Self__1RGH -  1)])));
-        Self__1RGH=(__INTEGER)(Self__1RGH +  1);
-      };
-      if ((result__YRGH <  0)) {
-        result__YRGH=(__INTEGER)(~ result__YRGH);
-      };
-      result__ETQF=result__YRGH;
-      __tmp__VTQF=TRUE__;
-    } else {
-      __tmp__VTQF=FALSE__;
-    };
-    if ((! __tmp__VTQF)) {
-      if (((void *)((void **)Self__CTQF->parent_arrayed_collection__H5I.storage__RCPD)[ 0] != (void *)NULL)) {
-        Self__4RGH=((__STRING_CONSTANT *)((void **)Self__CTQF->parent_arrayed_collection__H5I.storage__RCPD)[ 0]);
-        result__3RGH= 0;
-        __tmp__5RGH=Self__4RGH->count__DD;
-        Self__ASGH= 1;
-        while ((Self__ASGH <= __tmp__5RGH)) {
-          result__3RGH=(__INTEGER)((__INTEGER)( 5 * result__3RGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4RGH->storage__VQO)[(__INTEGER)(Self__ASGH -  1)])));
-          Self__ASGH=(__INTEGER)(Self__ASGH +  1);
-        };
-        if ((result__3RGH <  0)) {
-          result__3RGH=(__INTEGER)(~ result__3RGH);
-        };
-        result__ETQF=result__3RGH;
-      };
-    };
-  };
-  return(result__ETQF);
+  __INTEGER result__I5QF,result__TTHH,__tmp__VTHH,Self__WTHH;
+  __INTEGER result__YTHH,__tmp__0THH,Self__1THH;
+  __STRING_CONSTANT *Self__UTHH,*Self__ZTHH;
+  __BOOLEAN __tmp__Z5QF;
+  result__I5QF= 0;
+  if ((! (Self__G5QF->parent_arrayed_collection__P5I.upper__DAPD <  0))) {
+    if (((void *)((void **)Self__G5QF->parent_arrayed_collection__P5I.storage__ZCPD)[Self__G5QF->parent_arrayed_collection__P5I.upper__DAPD] != (void *)NULL)) {
+      Self__UTHH=((__STRING_CONSTANT *)((void **)Self__G5QF->parent_arrayed_collection__P5I.storage__ZCPD)[Self__G5QF->parent_arrayed_collection__P5I.upper__DAPD]);
+      result__TTHH= 0;
+      __tmp__VTHH=Self__UTHH->count__DD;
+      Self__WTHH= 1;
+      while ((Self__WTHH <= __tmp__VTHH)) {
+        result__TTHH=(__INTEGER)((__INTEGER)( 5 * result__TTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UTHH->storage__3QO)[(__INTEGER)(Self__WTHH -  1)])));
+        Self__WTHH=(__INTEGER)(Self__WTHH +  1);
+      };
+      if ((result__TTHH <  0)) {
+        result__TTHH=(__INTEGER)(~ result__TTHH);
+      };
+      result__I5QF=result__TTHH;
+      __tmp__Z5QF=TRUE__;
+    } else {
+      __tmp__Z5QF=FALSE__;
+    };
+    if ((! __tmp__Z5QF)) {
+      if (((void *)((void **)Self__G5QF->parent_arrayed_collection__P5I.storage__ZCPD)[ 0] != (void *)NULL)) {
+        Self__ZTHH=((__STRING_CONSTANT *)((void **)Self__G5QF->parent_arrayed_collection__P5I.storage__ZCPD)[ 0]);
+        result__YTHH= 0;
+        __tmp__0THH=Self__ZTHH->count__DD;
+        Self__1THH= 1;
+        while ((Self__1THH <= __tmp__0THH)) {
+          result__YTHH=(__INTEGER)((__INTEGER)( 5 * result__YTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZTHH->storage__3QO)[(__INTEGER)(Self__1THH -  1)])));
+          Self__1THH=(__INTEGER)(Self__1THH +  1);
+        };
+        if ((result__YTHH <  0)) {
+          result__YTHH=(__INTEGER)(~ result__YTHH);
+        };
+        result__I5QF=result__YTHH;
+      };
+    };
+  };
+  return(result__I5QF);
 }
 
-static void copy__22RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__32RD,void *other__42RD)
+static void copy__E3RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__F3RD,void *other__G3RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__A3RD,other_upper__52RD,Self__Q1XE;
-  void **__tmp__T3RD,**__tmp__V3RD,**Self__H2VE;
-  new_capacity__A3RD= 0;
-  other_upper__52RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__42RD)->parent_arrayed_collection__H5I.upper__15OD;
-  if ((other_upper__52RD >=  0)) {
-    new_capacity__A3RD=(__INTEGER)(other_upper__52RD +  1);
-    if ((Self__32RD->parent_arrayed_collection__H5I.capacity__WBPD < new_capacity__A3RD)) {
-      Self__32RD->parent_arrayed_collection__H5I.storage__RCPD=create__RLHE(new_capacity__A3RD);
-      Self__32RD->parent_arrayed_collection__H5I.capacity__WBPD=new_capacity__A3RD;
-    };
-    __tmp__T3RD=Self__32RD->parent_arrayed_collection__H5I.storage__RCPD;
-    __tmp__V3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__42RD)->parent_arrayed_collection__H5I.storage__RCPD;
-    Self__H2VE=((void **)__tmp__T3RD);
-    Self__Q1XE=other_upper__52RD;
-    while ((Self__Q1XE >=  0)) {
-      Self__H2VE[Self__Q1XE]=((void **)__tmp__V3RD)[Self__Q1XE];
-      Self__Q1XE=(__INTEGER)(Self__Q1XE -  1);
-    };
-  };
-  Self__32RD->parent_arrayed_collection__H5I.upper__15OD=other_upper__52RD;
+  __INTEGER new_capacity__I3RD,other_upper__H3RD,Self__T1XE;
+  void **__tmp__13RD,**__tmp__33RD,**Self__K2VE;
+  new_capacity__I3RD= 0;
+  other_upper__H3RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__G3RD)->parent_arrayed_collection__P5I.upper__DAPD;
+  if ((other_upper__H3RD >=  0)) {
+    new_capacity__I3RD=(__INTEGER)(other_upper__H3RD +  1);
+    if ((Self__F3RD->parent_arrayed_collection__P5I.capacity__4BPD < new_capacity__I3RD)) {
+      Self__F3RD->parent_arrayed_collection__P5I.storage__ZCPD=create__OJHE(new_capacity__I3RD);
+      Self__F3RD->parent_arrayed_collection__P5I.capacity__4BPD=new_capacity__I3RD;
+    };
+    __tmp__13RD=Self__F3RD->parent_arrayed_collection__P5I.storage__ZCPD;
+    __tmp__33RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__G3RD)->parent_arrayed_collection__P5I.storage__ZCPD;
+    Self__K2VE=((void **)__tmp__13RD);
+    Self__T1XE=other_upper__H3RD;
+    while ((Self__T1XE >=  0)) {
+      Self__K2VE[Self__T1XE]=((void **)__tmp__33RD)[Self__T1XE];
+      Self__T1XE=(__INTEGER)(Self__T1XE -  1);
+    };
+  };
+  Self__F3RD->parent_arrayed_collection__P5I.upper__DAPD=other_upper__H3RD;
 }
 
-static __BOOLEAN read_operator__HNM()
+static __BOOLEAN read_operator__PNM()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER old_pos__LNM,__tmp__ZQO,i__T4O;
-  __POSITION pos__W1XG;
-  __BOOLEAN result__KNM,__tmp__GOM;
-  __CHARACTER result__OS5G,result__XS5G,ch__TQO,result__2S5G;
-  __CHARACTER *__tmp__WQO,*Self__H4O;
-  result__KNM=FALSE__;
-  read_space__3RD();
-  old_pos__LNM=position__SBC;
-  ((__STRING *)string_tmp__VH)->count__WFC= 0;
-  until_do__1YM:
+  __INTEGER old_pos__TNM,__tmp__BRO,i__14O;
+  __POSITION pos__FZYG;
+  __BOOLEAN result__SNM,__tmp__OOM;
+  __CHARACTER result__VRAH,result__4RAH,ch__1QO,result__DSAH;
+  __CHARACTER *__tmp__4QO,*Self__P4O;
+  result__SNM=FALSE__;
+  read_space__FSD();
+  old_pos__TNM=position__0BC;
+  ((__STRING *)string_tmp__VH)->count__4FC= 0;
+  until_do__DZM:
   {
-    result__OS5G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__OS5G=((__CHARACTER )(( 0)));
+    result__VRAH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__VRAH=((__CHARACTER )(( 0)));
     } else {
-      result__OS5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__VRAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__OS5G == ((__CHARACTER )(( 0))))) {
-      __tmp__GOM=TRUE__;
+    if ((result__VRAH == ((__CHARACTER )(( 0))))) {
+      __tmp__OOM=TRUE__;
     } else {
-      result__XS5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__XS5G=((__CHARACTER )(( 0)));
+      result__4RAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__4RAH=((__CHARACTER )(( 0)));
       } else {
-        result__XS5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__4RAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      ch__TQO=result__XS5G;
-      __tmp__WQO=((__STRING_CONSTANT *)(&__string_315))->storage__VQO;
-      __tmp__ZQO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_315))->count__DD -  1);
-      Self__H4O=((__CHARACTER *)__tmp__WQO);
-      i__T4O=__tmp__ZQO;
-      while ((! ((i__T4O <  0) || (ch__TQO == Self__H4O[i__T4O])))) {
-        i__T4O=(__INTEGER)(i__T4O -  1);
+      ch__1QO=result__4RAH;
+      __tmp__4QO=((__STRING_CONSTANT *)(&__string_314))->storage__3QO;
+      __tmp__BRO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_314))->count__DD -  1);
+      Self__P4O=((__CHARACTER *)__tmp__4QO);
+      i__14O=__tmp__BRO;
+      while ((! ((i__14O <  0) || (ch__1QO == Self__P4O[i__14O])))) {
+        i__14O=(__INTEGER)(i__14O -  1);
       };
-      __tmp__GOM=(i__T4O <  0);
+      __tmp__OOM=(i__14O <  0);
     };
-    if ((! __tmp__GOM)) {
-      result__2S5G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__2S5G=((__CHARACTER )(( 0)));
+    if ((! __tmp__OOM)) {
+      result__DSAH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__DSAH=((__CHARACTER )(( 0)));
       } else {
-        result__2S5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__DSAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      add_last__ZLT(string_tmp__VH,result__2S5G);
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      goto until_do__1YM;
+      add_last__BMT(string_tmp__VH,result__DSAH);
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      goto until_do__DZM;
     };
   };
-  if ((((__STRING *)string_tmp__VH)->count__WFC !=  0)) {
-    last_string__I0C=get__IWB(string_tmp__VH);
-    if (((((void *)last_string__I0C == (void *)(&__string_12)) || ((void *)last_string__I0C == (void *)(&__string_14))) || ((void *)last_string__I0C == (void *)(&__string_13)))) {
-      pos__W1XG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_285));
-      put_position__UOG(pos__W1XG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if ((((__STRING *)string_tmp__VH)->count__4FC !=  0)) {
+    last_string__Q0C=get__QWB(string_tmp__VH);
+    if (((((void *)last_string__Q0C == (void *)(&__string_12)) || ((void *)last_string__Q0C == (void *)(&__string_14))) || ((void *)last_string__Q0C == (void *)(&__string_13)))) {
+      pos__FZYG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_284));
+      put_position__2OG(pos__FZYG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__LBD((&__string_124),old_pos__LNM,position__SBC);
-    result__KNM=TRUE__;
+    short__token__to__TBD((&__string_124),old_pos__TNM,position__0BC);
+    result__SNM=TRUE__;
   };
-  return(result__KNM);
+  return(result__SNM);
 }
 
-static void* operator__name__3DO(void *typ__5DO,void *op__AEO)
+static void* operator__name__FEO(void *typ__HEO,void *op__IEO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER __tmp__HEO,Self__OWO;
-  __CHARACTER c__CEO;
-  __BOOLEAN __tmp__VEO,__tmp__CFO,result__DQHB,__tmp__PFO,result__VQHB;
-  __BOOLEAN __tmp__2FO,result__HRHB,__tmp__JGO,result__ZRHB,__tmp__WGO;
-  __BOOLEAN result__LSHB,__tmp__DHO,result__3SHB,__tmp__QHO;
-  __BOOLEAN result__PTHB,__tmp__3HO,result__BUHB,__tmp__KIO;
-  __BOOLEAN result__TUHB,__tmp__XIO,result__FVHB,__tmp__EJO;
-  __BOOLEAN result__XVHB,__tmp__RJO,result__JWHB,__tmp__4JO;
-  __BOOLEAN result__1WHB,__tmp__LKO,result__NXHB,__tmp__YKO;
-  __BOOLEAN result__5XHB,__tmp__FLO,result__RYHB;
-  c__CEO='\0';
-  copy__ZCS(string_tmp__VH,typ__5DO);
-  __tmp__HEO=((__STRING_CONSTANT *)op__AEO)->count__DD;
-  Self__OWO= 1;
-  while ((Self__OWO <= __tmp__HEO)) {
-    c__CEO=((__CHARACTER *)((__STRING_CONSTANT *)op__AEO)->storage__VQO)[(__INTEGER)(Self__OWO -  1)];
-    if ((c__CEO == '+')) {
-      append__BOS(string_tmp__VH,(&__string_188));
-      __tmp__VEO=TRUE__;
+  __INTEGER __tmp__PEO,Self__WWO;
+  __CHARACTER c__KEO;
+  __BOOLEAN __tmp__3EO,__tmp__KFO,result__LQHB,__tmp__XFO,result__3QHB;
+  __BOOLEAN __tmp__EGO,result__PRHB,__tmp__RGO,result__BSHB,__tmp__4GO;
+  __BOOLEAN result__TSHB,__tmp__LHO,result__FTHB,__tmp__YHO;
+  __BOOLEAN result__XTHB,__tmp__FIO,result__JUHB,__tmp__SIO;
+  __BOOLEAN result__1UHB,__tmp__5IO,result__NVHB,__tmp__MJO;
+  __BOOLEAN result__5VHB,__tmp__ZJO,result__RWHB,__tmp__GKO;
+  __BOOLEAN result__DXHB,__tmp__TKO,result__VXHB,__tmp__ALO;
+  __BOOLEAN result__HYHB,__tmp__NLO,result__ZYHB;
+  c__KEO='\0';
+  copy__BDS(string_tmp__VH,typ__HEO);
+  __tmp__PEO=((__STRING_CONSTANT *)op__IEO)->count__DD;
+  Self__WWO= 1;
+  while ((Self__WWO <= __tmp__PEO)) {
+    c__KEO=((__CHARACTER *)((__STRING_CONSTANT *)op__IEO)->storage__3QO)[(__INTEGER)(Self__WWO -  1)];
+    if ((c__KEO == '+')) {
+      append__JOS(string_tmp__VH,(&__string_186));
+      __tmp__3EO=TRUE__;
     } else {
-      __tmp__VEO=FALSE__;
+      __tmp__3EO=FALSE__;
     };
-    if (__tmp__VEO) {
-      __tmp__CFO=TRUE__;
+    if (__tmp__3EO) {
+      __tmp__KFO=TRUE__;
     } else {
-      result__DQHB=(c__CEO == '-');
-      if (result__DQHB) {
-        append__BOS(string_tmp__VH,(&__string_189));
+      result__LQHB=(c__KEO == '-');
+      if (result__LQHB) {
+        append__JOS(string_tmp__VH,(&__string_187));
       };
-      __tmp__CFO=result__DQHB;
+      __tmp__KFO=result__LQHB;
     };
-    if (__tmp__CFO) {
-      __tmp__PFO=TRUE__;
+    if (__tmp__KFO) {
+      __tmp__XFO=TRUE__;
     } else {
-      result__VQHB=(c__CEO == '~');
-      if (result__VQHB) {
-        append__BOS(string_tmp__VH,(&__string_190));
+      result__3QHB=(c__KEO == '~');
+      if (result__3QHB) {
+        append__JOS(string_tmp__VH,(&__string_188));
       };
-      __tmp__PFO=result__VQHB;
+      __tmp__XFO=result__3QHB;
     };
-    if (__tmp__PFO) {
-      __tmp__2FO=TRUE__;
+    if (__tmp__XFO) {
+      __tmp__EGO=TRUE__;
     } else {
-      result__HRHB=(c__CEO == '!');
-      if (result__HRHB) {
-        append__BOS(string_tmp__VH,(&__string_191));
+      result__PRHB=(c__KEO == '!');
+      if (result__PRHB) {
+        append__JOS(string_tmp__VH,(&__string_189));
       };
-      __tmp__2FO=result__HRHB;
+      __tmp__EGO=result__PRHB;
     };
-    if (__tmp__2FO) {
-      __tmp__JGO=TRUE__;
+    if (__tmp__EGO) {
+      __tmp__RGO=TRUE__;
     } else {
-      result__ZRHB=(c__CEO == '/');
-      if (result__ZRHB) {
-        append__BOS(string_tmp__VH,(&__string_192));
+      result__BSHB=(c__KEO == '/');
+      if (result__BSHB) {
+        append__JOS(string_tmp__VH,(&__string_190));
       };
-      __tmp__JGO=result__ZRHB;
+      __tmp__RGO=result__BSHB;
     };
-    if (__tmp__JGO) {
-      __tmp__WGO=TRUE__;
+    if (__tmp__RGO) {
+      __tmp__4GO=TRUE__;
     } else {
-      result__LSHB=(c__CEO == '*');
-      if (result__LSHB) {
-        append__BOS(string_tmp__VH,(&__string_193));
+      result__TSHB=(c__KEO == '*');
+      if (result__TSHB) {
+        append__JOS(string_tmp__VH,(&__string_191));
       };
-      __tmp__WGO=result__LSHB;
+      __tmp__4GO=result__TSHB;
     };
-    if (__tmp__WGO) {
-      __tmp__DHO=TRUE__;
+    if (__tmp__4GO) {
+      __tmp__LHO=TRUE__;
     } else {
-      result__3SHB=(c__CEO == '^');
-      if (result__3SHB) {
-        append__BOS(string_tmp__VH,(&__string_194));
+      result__FTHB=(c__KEO == '^');
+      if (result__FTHB) {
+        append__JOS(string_tmp__VH,(&__string_192));
       };
-      __tmp__DHO=result__3SHB;
+      __tmp__LHO=result__FTHB;
     };
-    if (__tmp__DHO) {
-      __tmp__QHO=TRUE__;
+    if (__tmp__LHO) {
+      __tmp__YHO=TRUE__;
     } else {
-      result__PTHB=(c__CEO == '%');
-      if (result__PTHB) {
-        append__BOS(string_tmp__VH,(&__string_195));
+      result__XTHB=(c__KEO == '%');
+      if (result__XTHB) {
+        append__JOS(string_tmp__VH,(&__string_193));
       };
-      __tmp__QHO=result__PTHB;
+      __tmp__YHO=result__XTHB;
     };
-    if (__tmp__QHO) {
-      __tmp__3HO=TRUE__;
+    if (__tmp__YHO) {
+      __tmp__FIO=TRUE__;
     } else {
-      result__BUHB=(c__CEO == '>');
-      if (result__BUHB) {
-        append__BOS(string_tmp__VH,(&__string_196));
+      result__JUHB=(c__KEO == '>');
+      if (result__JUHB) {
+        append__JOS(string_tmp__VH,(&__string_194));
       };
-      __tmp__3HO=result__BUHB;
+      __tmp__FIO=result__JUHB;
     };
-    if (__tmp__3HO) {
-      __tmp__KIO=TRUE__;
+    if (__tmp__FIO) {
+      __tmp__SIO=TRUE__;
     } else {
-      result__TUHB=(c__CEO == '<');
-      if (result__TUHB) {
-        append__BOS(string_tmp__VH,(&__string_197));
+      result__1UHB=(c__KEO == '<');
+      if (result__1UHB) {
+        append__JOS(string_tmp__VH,(&__string_195));
       };
-      __tmp__KIO=result__TUHB;
+      __tmp__SIO=result__1UHB;
     };
-    if (__tmp__KIO) {
-      __tmp__XIO=TRUE__;
+    if (__tmp__SIO) {
+      __tmp__5IO=TRUE__;
     } else {
-      result__FVHB=(c__CEO == '=');
-      if (result__FVHB) {
-        append__BOS(string_tmp__VH,(&__string_198));
+      result__NVHB=(c__KEO == '=');
+      if (result__NVHB) {
+        append__JOS(string_tmp__VH,(&__string_196));
       };
-      __tmp__XIO=result__FVHB;
+      __tmp__5IO=result__NVHB;
     };
-    if (__tmp__XIO) {
-      __tmp__EJO=TRUE__;
+    if (__tmp__5IO) {
+      __tmp__MJO=TRUE__;
     } else {
-      result__XVHB=(c__CEO == '\\');
-      if (result__XVHB) {
-        append__BOS(string_tmp__VH,(&__string_199));
+      result__5VHB=(c__KEO == '\\');
+      if (result__5VHB) {
+        append__JOS(string_tmp__VH,(&__string_197));
       };
-      __tmp__EJO=result__XVHB;
+      __tmp__MJO=result__5VHB;
     };
-    if (__tmp__EJO) {
-      __tmp__RJO=TRUE__;
+    if (__tmp__MJO) {
+      __tmp__ZJO=TRUE__;
     } else {
-      result__JWHB=(c__CEO == '|');
-      if (result__JWHB) {
-        append__BOS(string_tmp__VH,(&__string_200));
+      result__RWHB=(c__KEO == '|');
+      if (result__RWHB) {
+        append__JOS(string_tmp__VH,(&__string_198));
       };
-      __tmp__RJO=result__JWHB;
+      __tmp__ZJO=result__RWHB;
     };
-    if (__tmp__RJO) {
-      __tmp__4JO=TRUE__;
+    if (__tmp__ZJO) {
+      __tmp__GKO=TRUE__;
     } else {
-      result__1WHB=(c__CEO == '&');
-      if (result__1WHB) {
-        append__BOS(string_tmp__VH,(&__string_201));
+      result__DXHB=(c__KEO == '&');
+      if (result__DXHB) {
+        append__JOS(string_tmp__VH,(&__string_199));
       };
-      __tmp__4JO=result__1WHB;
+      __tmp__GKO=result__DXHB;
     };
-    if (__tmp__4JO) {
-      __tmp__LKO=TRUE__;
+    if (__tmp__GKO) {
+      __tmp__TKO=TRUE__;
     } else {
-      result__NXHB=(c__CEO == '$');
-      if (result__NXHB) {
-        append__BOS(string_tmp__VH,(&__string_202));
+      result__VXHB=(c__KEO == '$');
+      if (result__VXHB) {
+        append__JOS(string_tmp__VH,(&__string_200));
       };
-      __tmp__LKO=result__NXHB;
+      __tmp__TKO=result__VXHB;
     };
-    if (__tmp__LKO) {
-      __tmp__YKO=TRUE__;
+    if (__tmp__TKO) {
+      __tmp__ALO=TRUE__;
     } else {
-      result__5XHB=(c__CEO == '#');
-      if (result__5XHB) {
-        append__BOS(string_tmp__VH,(&__string_203));
+      result__HYHB=(c__KEO == '#');
+      if (result__HYHB) {
+        append__JOS(string_tmp__VH,(&__string_201));
       };
-      __tmp__YKO=result__5XHB;
+      __tmp__ALO=result__HYHB;
     };
-    if (__tmp__YKO) {
-      __tmp__FLO=TRUE__;
+    if (__tmp__ALO) {
+      __tmp__NLO=TRUE__;
     } else {
-      result__RYHB=(c__CEO == '@');
-      if (result__RYHB) {
-        append__BOS(string_tmp__VH,(&__string_204));
+      result__ZYHB=(c__KEO == '@');
+      if (result__ZYHB) {
+        append__JOS(string_tmp__VH,(&__string_202));
       };
-      __tmp__FLO=result__RYHB;
+      __tmp__NLO=result__ZYHB;
     };
-    if ((! __tmp__FLO)) {
-      if ((c__CEO == '?')) {
-        append__BOS(string_tmp__VH,(&__string_205));
+    if ((! __tmp__NLO)) {
+      if ((c__KEO == '?')) {
+        append__JOS(string_tmp__VH,(&__string_203));
       };
     };
-    Self__OWO=(__INTEGER)(Self__OWO +  1);
+    Self__WWO=(__INTEGER)(Self__WWO +  1);
   };
-  return(get__IWB(string_tmp__VH));
+  return(get__QWB(string_tmp__VH));
 }
 
-static void append_in__SIBC(__ITM_TYPE_MULTI *Self__TIBC,void *buffer__UIBC)
+static void append_in__0IBC(__ITM_TYPE_MULTI *Self__1IBC,void *buffer__2IBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__ZLT(buffer__UIBC,'(');
-  display_raw__TLIC(Self__TIBC,buffer__UIBC);
-  add_last__ZLT(buffer__UIBC,')');
+  add_last__BMT(buffer__2IBC,'(');
+  display_raw__1LIC(Self__1IBC,buffer__2IBC);
+  add_last__BMT(buffer__2IBC,')');
 }
 
-static void* read_prototype__HON(__PARSER *Self__ION,void *styl__JON)
+static void* read_prototype__PON(__PARSER *Self__QON,void *styl__RON)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *nam__LON,*n__MXP,*n__2NR;
-  void *result__NON,*result__OUQ;
-  __INTEGER old_pos__PON,old_derive__QON,sav_derive__RON;
-  __INTEGER pos_before__SON,idx__RXP,typ_id__0OIB,new_capacity__HGBB;
-  __INTEGER __tmp__LHBB,__tmp__EPFC,Self__5ZVD,typ_id__ESGH,idx__AOR;
-  __INTEGER typ_id__FAJB,new_capacity__OECB,__tmp__SFCB,__tmp__ATFC;
-  __INTEGER Self__41VD;
-  __POSITION pos__12XG,pos__32XG,pos__52XG,pos__B3XG,pos__A5XG;
-  __POSITION __tmp__CTN,__tmp__EUN;
-  __ITM_TYPE_GENERIC *result__QXP,*__tmp__ZZP,*result__UOIB,*Self__D2CC;
-  void *__tmp__YZP;
-  __POINTER ptr__VOIB,ptr_table__CKIH,next__BKIH,result__DKIH;
-  __POINTER ptr_table__HKIH,next__GKIH,result__IKIH,ptr__DSGH;
-  __POINTER ptr_table__PKIH,next__OKIH,result__QKIH,ptr_table__UKIH;
-  __POINTER next__TKIH,result__VKIH,ptr__AAJB,ptr_table__ZKIH;
-  __POINTER next__YKIH,result__0KIH,ptr_table__4KIH,next__3KIH;
-  __POINTER result__5KIH;
-  __UINTEGER_32 sz__XOIB,a__JBFH,new_size__KBFH,t__OBFH,a__NBFH;
-  __UINTEGER_32 new_size__KKIH,lab_type__JKIH,sz__FSGH,a__GSGH;
-  __UINTEGER_32 new_size__HSGH,t__ISGH,a__JSGH,new_size__XKIH;
-  __UINTEGER_32 lab_type__WKIH,sz__CAJB,a__XBFH,new_size__YBFH,t__2BFH;
-  __UINTEGER_32 a__1BFH,new_size__BLIH,lab_type__ALIH;
-  void *result__L5CH;
-  __ITM_TYPE_PARAMETER *result__CSGH,*Self__KSGH;
-  __ITM_TYPE_STYLE *result__5NR,*__tmp__1PR,*result__55IB,*Self__V5CC;
-  void *__tmp__0PR;
-  void *genericity__MON,*result__MAGH,*lt__OXP;
-  __BOOLEAN continue__TON,result__YJIH,result__1JIH,__tmp__AVQ;
-  __BOOLEAN result__4JIH,__tmp__VGBB,result__LKIH,__tmp__JTN;
-  __BOOLEAN __tmp__2ECB;
-  __CHARACTER result__ZJIH,result__2JIH,result__5JIH,result__MKIH;
-  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__NAGH,*Self__OAGH;
-  __FAST_ARRAYoITM_TYPE_GENERICo *Self__FGBB;
-  void **__tmp__KHBB,**new__QOFC;
-  __FAST_ARRAYoITM_TYPE_STYLEo *Self__MECB;
-  void **__tmp__RFCB,**new__MSFC;
-  nam__LON=NULL;
-  genericity__MON=NULL;
-  result__NON=NULL;
-  old_pos__PON= 0;
-  old_derive__QON= 0;
-  sav_derive__RON= 0;
-  pos_before__SON= 0;
-  continue__TON=FALSE__;
-  if (read_cap_identifier__SZJ()) {
-    old_pos__PON=position__SBC;
-    old_derive__QON=short_derive__BCC;
-    copy__ZCS(string_tmp2__BAJ,last_string__I0C);
+  void *nam__TON,*n__UXP,*n__EOR;
+  void *result__VON,*result__WUQ;
+  __INTEGER old_pos__XON,old_derive__YON,sav_derive__ZON;
+  __INTEGER pos_before__0ON,idx__ZXP,typ_id__CPIB,new_capacity__PGBB;
+  __INTEGER __tmp__THBB,__tmp__MPFC,Self__H0VD,typ_id__5THH,idx__IOR;
+  __INTEGER typ_id__NAJB,new_capacity__WECB,__tmp__0FCB,__tmp__ITFC;
+  __INTEGER Self__G2VD;
+  __POSITION pos__K0YG,pos__M0YG,pos__O0YG,pos__Q0YG,pos__P2YG;
+  __POSITION __tmp__KTN,__tmp__MUN;
+  __ITM_TYPE_GENERIC *result__YXP,*__tmp__B0P,*result__2OIB,*Self__L2CC;
+  void *__tmp__A0P;
+  __POINTER ptr__3OIB,ptr_table__CMJH,next__BMJH,result__DMJH;
+  __POINTER ptr_table__HMJH,next__GMJH,result__IMJH,ptr__4THH;
+  __POINTER ptr_table__PMJH,next__OMJH,result__QMJH,ptr_table__UMJH;
+  __POINTER next__TMJH,result__VMJH,ptr__IAJB,ptr_table__ZMJH;
+  __POINTER next__YMJH,result__0MJH,ptr_table__4MJH,next__3MJH;
+  __POINTER result__5MJH;
+  __UINTEGER_32 sz__5OIB,a__ZCGH,new_size__0CGH,t__4CGH,a__3CGH;
+  __UINTEGER_32 new_size__KMJH,lab_type__JMJH,sz__AUHH,a__BUHH;
+  __UINTEGER_32 new_size__CUHH,t__DUHH,a__EUHH,new_size__XMJH;
+  __UINTEGER_32 lab_type__WMJH,sz__KAJB,a__HDGH,new_size__IDGH,t__MDGH;
+  __UINTEGER_32 a__LDGH,new_size__BNJH,lab_type__ANJH;
+  void *result__W5DH;
+  __ITM_TYPE_PARAMETER *result__3THH,*Self__FUHH;
+  __ITM_TYPE_STYLE *result__HOR,*__tmp__DQR,*result__HAJB,*Self__35CC;
+  void *__tmp__CQR;
+  void *genericity__UON,*result__5BHH,*lt__WXP;
+  __BOOLEAN continue__1ON,result__YLJH,result__1LJH,__tmp__IVQ;
+  __BOOLEAN result__4LJH,__tmp__3GBB,result__LMJH,__tmp__RTN;
+  __BOOLEAN __tmp__EFCB;
+  __CHARACTER result__ZLJH,result__2LJH,result__5LJH,result__MMJH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__ACHH,*Self__BCHH;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__NGBB;
+  void **__tmp__SHBB,**new__YOFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__UECB;
+  void **__tmp__ZFCB,**new__USFC;
+  nam__TON=NULL;
+  genericity__UON=NULL;
+  result__VON=NULL;
+  old_pos__XON= 0;
+  old_derive__YON= 0;
+  sav_derive__ZON= 0;
+  pos_before__0ON= 0;
+  continue__1ON=FALSE__;
+  if (read_cap_identifier__0ZJ()) {
+    old_pos__XON=position__0BC;
+    old_derive__YON=short_derive__JCC;
+    copy__BDS(string_tmp2__JAJ,last_string__Q0C);
     do {
-      continue__TON=read_word__QPF((&__string_7));
-      if (continue__TON) {
-        if ((! read_cap_identifier__SZJ())) {
-          pos__12XG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_316));
-          put_position__UOG(pos__12XG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      continue__1ON=read_word__YPF((&__string_7));
+      if (continue__1ON) {
+        if ((! read_cap_identifier__0ZJ())) {
+          pos__K0YG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_315));
+          put_position__2OG(pos__K0YG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        append__BOS(string_tmp2__BAJ,(&__string_7));
-        append__BOS(string_tmp2__BAJ,last_string__I0C);
+        append__JOS(string_tmp2__JAJ,(&__string_7));
+        append__JOS(string_tmp2__JAJ,last_string__Q0C);
       } else {
-        pos_before__SON=position__SBC;
-        result__YJIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__YJIH=FALSE__;
+        pos_before__0ON=position__0BC;
+        result__YLJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__YLJH=FALSE__;
         } else {
-          result__ZJIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__ZJIH=((__CHARACTER )(( 0)));
+          result__ZLJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__ZLJH=((__CHARACTER )(( 0)));
           } else {
-            result__ZJIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__ZLJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__ZJIH == '.')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__YJIH=TRUE__;
+          if ((result__ZLJH == '.')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__YLJH=TRUE__;
           };
         };
-        if ((result__YJIH && read_cap_identifier__SZJ())) {
-          continue__TON=TRUE__;
-          add_last__ZLT(string_tmp2__BAJ,'.');
-          append__BOS(string_tmp2__BAJ,last_string__I0C);
+        if ((result__YLJH && read_cap_identifier__0ZJ())) {
+          continue__1ON=TRUE__;
+          add_last__BMT(string_tmp2__JAJ,'.');
+          append__JOS(string_tmp2__JAJ,last_string__Q0C);
         } else {
-          position__SBC=pos_before__SON;
+          position__0BC=pos_before__0ON;
         };
       };
-    } while (continue__TON);
-    nam__LON=get__IWB(string_tmp2__BAJ);
-    result__1JIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__1JIH=FALSE__;
+    } while (continue__1ON);
+    nam__TON=get__QWB(string_tmp2__JAJ);
+    result__1LJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__1LJH=FALSE__;
     } else {
-      result__2JIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__2JIH=((__CHARACTER )(( 0)));
+      result__2LJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__2LJH=((__CHARACTER )(( 0)));
       } else {
-        result__2JIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__2LJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__2JIH == '(')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__1JIH=TRUE__;
+      if ((result__2LJH == '(')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__1LJH=TRUE__;
       };
     };
-    if (result__1JIH) {
-      result__MAGH=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP)->parent_arrayed_collection__JUP.upper__FVV <  0)) {
-        result__MAGH=create_with_capacity__IFR( 16);
+    if (result__1LJH) {
+      result__5BHH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP)->parent_arrayed_collection__RUP.upper__NVV <  0)) {
+        result__5BHH=create_with_capacity__QFR( 16);
       } else {
-        Self__NAGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-        result__MAGH=((void **)Self__NAGH->parent_arrayed_collection__JUP.storage__1ZV)[Self__NAGH->parent_arrayed_collection__JUP.upper__FVV];
-        Self__OAGH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__KUP);
-        Self__OAGH->parent_arrayed_collection__JUP.upper__FVV=(__INTEGER)(Self__OAGH->parent_arrayed_collection__JUP.upper__FVV -  1);
+        Self__ACHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+        result__5BHH=((void **)Self__ACHH->parent_arrayed_collection__RUP.storage__D0V)[Self__ACHH->parent_arrayed_collection__RUP.upper__NVV];
+        Self__BCHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__SUP);
+        Self__BCHH->parent_arrayed_collection__RUP.upper__NVV=(__INTEGER)(Self__BCHH->parent_arrayed_collection__RUP.upper__NVV -  1);
       };
-      genericity__MON=result__MAGH;
+      genericity__UON=result__5BHH;
       do {
-        result__OUQ=read_type__DCM(Self__ION,FALSE__);
-        if (((void *)result__OUQ == (void *)NULL)) {
-          if (((void *)read_constant__1QO() != (void *)NULL)) {
-            pos__32XG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_317));
-            put_position__UOG(pos__32XG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        result__WUQ=read_type__LCM(Self__QON,FALSE__);
+        if (((void *)result__WUQ == (void *)NULL)) {
+          if (((void *)read_constant__DRO() != (void *)NULL)) {
+            pos__M0YG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_316));
+            put_position__2OG(pos__M0YG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
-            __tmp__AVQ=TRUE__;
+            __tmp__IVQ=TRUE__;
           } else {
-            __tmp__AVQ=FALSE__;
+            __tmp__IVQ=FALSE__;
           };
-          if ((! __tmp__AVQ)) {
-            if (read_identifier__LAL()) {
-              pos__52XG=current_position__JXF();
-              put_error__text__KNG( 0,(&__string_318));
-              put_position__UOG(pos__52XG);
-              put_string__U1F(msg_err__PNG);
-              if ((type_error__ONG !=  2)) {
+          if ((! __tmp__IVQ)) {
+            if (read_identifier__TAL()) {
+              pos__O0YG=current_position__RXF();
+              put_error__text__SNG( 0,(&__string_317));
+              put_position__2OG(pos__O0YG);
+              put_string__21F(msg_err__XNG);
+              if ((type_error__WNG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        if (((void *)result__OUQ == (void *)NULL)) {
-          pos__B3XG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_258));
-          put_position__UOG(pos__B3XG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((void *)result__WUQ == (void *)NULL)) {
+          pos__Q0YG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_257));
+          put_position__2OG(pos__Q0YG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__0NV(genericity__MON,result__OUQ);
-        result__4JIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__4JIH=FALSE__;
-        } else {
-          result__5JIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__5JIH=((__CHARACTER )(( 0)));
-          } else {
-            result__5JIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-          };
-          if ((result__5JIH == ',')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__4JIH=TRUE__;
-          };
-        };
-      } while (result__4JIH);
-      genericity__MON=alias__GVP(result__MAGH);
-      n__MXP=nam__LON;
-      lt__OXP=genericity__MON;
-      result__QXP=NULL;
-      idx__RXP= 0;
-      while (((idx__RXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.upper__AYP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP != (void *)n__MXP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->parent_itm_type_style__CSN.style__TYP != (void *)styl__JON)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP])->list_type__3YP != (void *)lt__OXP)))) {
-        idx__RXP=(__INTEGER)(idx__RXP +  1);
-      };
-      if ((idx__RXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.upper__AYP)) {
-        __tmp__YZP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP)->parent_arrayed_collection__WXP.storage__4BW)[idx__RXP];
-        if (__tmp__YZP==NULL) {
-          __tmp__ZZP=NULL;
-        } else {
-          __tmp__ZZP=((__ITM_TYPE_GENERIC *)__tmp__YZP);
-        };
-        result__QXP=__tmp__ZZP;
-      } else {
-        result__UOIB=NULL;
-        ptr__VOIB=((__POINTER )(NULL));
-        typ_id__0OIB= 0;
-        sz__XOIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
-        if ((sz__XOIB ==  0)) {
-          result__UOIB=ITM_TYPE_GENERIC__;
-        } else {
-          typ_id__0OIB=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__XOIB);
-          if ((typ_id__0OIB == (__INTEGER)(-  1))) {
-            a__JBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__KBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIB + a__JBFH) & (__UINTEGER_32)(~ a__JBFH));
-            ptr_table__CKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__BKIH=((__POINTER )(NULL));
-            result__DKIH=((__POINTER *)ptr_table__CKIH)[ 0];
-            if ((result__DKIH == (void *)NULL)) {
-              result__DKIH=new_lab__MRJ(new_size__KBFH);
-              next__BKIH=(void *)((unsigned long)result__DKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBFH)));
-              ((__POINTER *)next__BKIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CKIH)[ 0]=next__BKIH;
+        add_last__COV(genericity__UON,result__WUQ);
+        result__4LJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__4LJH=FALSE__;
+        } else {
+          result__5LJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__5LJH=((__CHARACTER )(( 0)));
+          } else {
+            result__5LJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          };
+          if ((result__5LJH == ',')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__4LJH=TRUE__;
+          };
+        };
+      } while (result__4LJH);
+      genericity__UON=alias__OVP(result__5BHH);
+      n__UXP=nam__TON;
+      lt__WXP=genericity__UON;
+      result__YXP=NULL;
+      idx__ZXP= 0;
+      while (((idx__ZXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.upper__IYP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.storage__GCW)[idx__ZXP])->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP != (void *)n__UXP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.storage__GCW)[idx__ZXP])->parent_itm_type_style__KSN.style__1YP != (void *)styl__RON)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.storage__GCW)[idx__ZXP])->list_type__FZP != (void *)lt__WXP)))) {
+        idx__ZXP=(__INTEGER)(idx__ZXP +  1);
+      };
+      if ((idx__ZXP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.upper__IYP)) {
+        __tmp__A0P=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP)->parent_arrayed_collection__4XP.storage__GCW)[idx__ZXP];
+        if (__tmp__A0P==NULL) {
+          __tmp__B0P=NULL;
+        } else {
+          __tmp__B0P=((__ITM_TYPE_GENERIC *)__tmp__A0P);
+        };
+        result__YXP=__tmp__B0P;
+      } else {
+        result__2OIB=NULL;
+        ptr__3OIB=((__POINTER )(NULL));
+        typ_id__CPIB= 0;
+        sz__5OIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__5OIB ==  0)) {
+          result__2OIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__CPIB=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5OIB);
+          if ((typ_id__CPIB == (__INTEGER)(-  1))) {
+            a__ZCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0CGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5OIB + a__ZCGH) & (__UINTEGER_32)(~ a__ZCGH));
+            ptr_table__CMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0CGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__BMJH=((__POINTER )(NULL));
+            result__DMJH=((__POINTER *)ptr_table__CMJH)[ 0];
+            if ((result__DMJH == (void *)NULL)) {
+              result__DMJH=new_lab__URJ(new_size__0CGH);
+              next__BMJH=(void *)((unsigned long)result__DMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CGH)));
+              ((__POINTER *)next__BMJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
             } else {
-              next__BKIH=((__POINTER *)result__DKIH)[ 0];
-              if ((next__BKIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KBFH <<  1)) <=  4096)) {
-                  next__BKIH=(void *)((unsigned long)result__DKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBFH)));
+              next__BMJH=((__POINTER *)result__DMJH)[ 0];
+              if ((next__BMJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__0CGH <<  1)) <=  4096)) {
+                  next__BMJH=(void *)((unsigned long)result__DMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0CGH)));
                 } else {
-                  next__BKIH=new_lab__MRJ(new_size__KBFH);
+                  next__BMJH=new_lab__URJ(new_size__0CGH);
                 };
-                ((__POINTER *)next__BKIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CKIH)[ 0]=next__BKIH;
+                ((__POINTER *)next__BMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
               } else {
-                ((__POINTER *)result__DKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DKIH=next__BKIH;
+                ((__POINTER *)result__DMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DMJH=next__BMJH;
               };
             };
-            ptr__VOIB=result__DKIH;
-          } else {
-            t__OBFH=((__UINTEGER_32 )typ_id__0OIB);
-            a__NBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__KKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOIB + a__NBFH) & (__UINTEGER_32)(~ a__NBFH));
-            ptr_table__HKIH=((__POINTER )(&(table_type[(t__OBFH)])));
-            lab_type__JKIH=(__UINTEGER_32)(t__OBFH |  1);
-            next__GKIH=((__POINTER )(NULL));
-            result__IKIH=((__POINTER *)ptr_table__HKIH)[ 0];
-            if ((result__IKIH == (void *)NULL)) {
-              result__IKIH=new_lab__MRJ(lab_type__JKIH);
-              next__GKIH=(void *)((unsigned long)result__IKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKIH)));
-              ((__POINTER *)next__GKIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HKIH)[ 0]=next__GKIH;
+            ptr__3OIB=result__DMJH;
+          } else {
+            t__4CGH=((__UINTEGER_32 )typ_id__CPIB);
+            a__3CGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__KMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5OIB + a__3CGH) & (__UINTEGER_32)(~ a__3CGH));
+            ptr_table__HMJH=((__POINTER )(&(table_type[(t__4CGH)])));
+            lab_type__JMJH=(__UINTEGER_32)(t__4CGH |  1);
+            next__GMJH=((__POINTER )(NULL));
+            result__IMJH=((__POINTER *)ptr_table__HMJH)[ 0];
+            if ((result__IMJH == (void *)NULL)) {
+              result__IMJH=new_lab__URJ(lab_type__JMJH);
+              next__GMJH=(void *)((unsigned long)result__IMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KMJH)));
+              ((__POINTER *)next__GMJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HMJH)[ 0]=next__GMJH;
             } else {
-              next__GKIH=((__POINTER *)result__IKIH)[ 0];
-              if ((next__GKIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KKIH <<  1)) <=  4096)) {
-                  next__GKIH=(void *)((unsigned long)result__IKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KKIH)));
+              next__GMJH=((__POINTER *)result__IMJH)[ 0];
+              if ((next__GMJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IMJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KMJH <<  1)) <=  4096)) {
+                  next__GMJH=(void *)((unsigned long)result__IMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KMJH)));
                 } else {
-                  next__GKIH=new_lab__MRJ(lab_type__JKIH);
+                  next__GMJH=new_lab__URJ(lab_type__JMJH);
                 };
-                ((__POINTER *)next__GKIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HKIH)[ 0]=next__GKIH;
+                ((__POINTER *)next__GMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HMJH)[ 0]=next__GMJH;
               } else {
-                ((__POINTER *)result__IKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IKIH=next__GKIH;
+                ((__POINTER *)result__IMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__IMJH=next__GMJH;
               };
             };
-            ptr__VOIB=result__IKIH;
-          };
-          result__UOIB=((__ITM_TYPE_GENERIC *)ptr__VOIB);
-          *(result__UOIB) = *(ITM_TYPE_GENERIC__);
-        };
-        Self__D2CC=((__ITM_TYPE_GENERIC *)result__UOIB);
-        Self__D2CC->parent_itm_type_style__CSN.parent_itm_type_simple__BSN.name__KYP=nam__LON;
-        Self__D2CC->parent_itm_type_style__CSN.style__TYP=styl__JON;
-        Self__D2CC->list_type__3YP=genericity__MON;
-        result__QXP=result__UOIB;
-        Self__FGBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__XXP);
-        new_capacity__HGBB= 0;
-        if (((__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1) <= (__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW -  1))) {
-          Self__FGBB->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1);
-          __tmp__VGBB=TRUE__;
-        } else {
-          __tmp__VGBB=FALSE__;
-        };
-        if ((! __tmp__VGBB)) {
-          if ((Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW ==  0)) {
-            Self__FGBB->parent_arrayed_collection__WXP.storage__4BW=create__PSXB( 2);
-            Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW= 2;
-            Self__FGBB->parent_arrayed_collection__WXP.upper__AYP= 0;
-          } else {
-            new_capacity__HGBB=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW <<  1);
-            __tmp__KHBB=Self__FGBB->parent_arrayed_collection__WXP.storage__4BW;
-            __tmp__LHBB=Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW;
-            new__QOFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__KHBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__LHBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__HGBB * ((__INTEGER )(sizeof(void *)))))));
-            __tmp__EPFC=(__INTEGER)(new_capacity__HGBB -  1);
-            Self__5ZVD=__tmp__LHBB;
-            while ((Self__5ZVD <= __tmp__EPFC)) {
-              new__QOFC[Self__5ZVD]=NULL;
-              Self__5ZVD=(__INTEGER)(Self__5ZVD +  1);
-            };
-            Self__FGBB->parent_arrayed_collection__WXP.storage__4BW=new__QOFC;
-            Self__FGBB->parent_arrayed_collection__WXP.capacity__TBW=new_capacity__HGBB;
-            Self__FGBB->parent_arrayed_collection__WXP.upper__AYP=(__INTEGER)(Self__FGBB->parent_arrayed_collection__WXP.upper__AYP +  1);
-          };
-        };
-        ((void **)Self__FGBB->parent_arrayed_collection__WXP.storage__4BW)[Self__FGBB->parent_arrayed_collection__WXP.upper__AYP]=result__UOIB;
-      };
-      result__NON=result__QXP;
-      result__LKIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__LKIH=FALSE__;
-      } else {
-        result__MKIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__MKIH=((__CHARACTER )(( 0)));
-        } else {
-          result__MKIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-        };
-        if ((result__MKIH == ')')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__LKIH=TRUE__;
-        };
-      };
-      if ((! result__LKIH)) {
-        pos__A5XG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_261));
-        put_position__UOG(pos__A5XG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+            ptr__3OIB=result__IMJH;
+          };
+          result__2OIB=((__ITM_TYPE_GENERIC *)ptr__3OIB);
+          *(result__2OIB) = *(ITM_TYPE_GENERIC__);
+        };
+        Self__L2CC=((__ITM_TYPE_GENERIC *)result__2OIB);
+        Self__L2CC->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP=nam__TON;
+        Self__L2CC->parent_itm_type_style__KSN.style__1YP=styl__RON;
+        Self__L2CC->list_type__FZP=genericity__UON;
+        result__YXP=result__2OIB;
+        Self__NGBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__5XP);
+        new_capacity__PGBB= 0;
+        if (((__INTEGER)(Self__NGBB->parent_arrayed_collection__4XP.upper__IYP +  1) <= (__INTEGER)(Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW -  1))) {
+          Self__NGBB->parent_arrayed_collection__4XP.upper__IYP=(__INTEGER)(Self__NGBB->parent_arrayed_collection__4XP.upper__IYP +  1);
+          __tmp__3GBB=TRUE__;
+        } else {
+          __tmp__3GBB=FALSE__;
+        };
+        if ((! __tmp__3GBB)) {
+          if ((Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW ==  0)) {
+            Self__NGBB->parent_arrayed_collection__4XP.storage__GCW=create__XSXB( 2);
+            Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW= 2;
+            Self__NGBB->parent_arrayed_collection__4XP.upper__IYP= 0;
+          } else {
+            new_capacity__PGBB=(__INTEGER)(Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW <<  1);
+            __tmp__SHBB=Self__NGBB->parent_arrayed_collection__4XP.storage__GCW;
+            __tmp__THBB=Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW;
+            new__YOFC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__SHBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__THBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__PGBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__MPFC=(__INTEGER)(new_capacity__PGBB -  1);
+            Self__H0VD=__tmp__THBB;
+            while ((Self__H0VD <= __tmp__MPFC)) {
+              new__YOFC[Self__H0VD]=NULL;
+              Self__H0VD=(__INTEGER)(Self__H0VD +  1);
+            };
+            Self__NGBB->parent_arrayed_collection__4XP.storage__GCW=new__YOFC;
+            Self__NGBB->parent_arrayed_collection__4XP.capacity__1BW=new_capacity__PGBB;
+            Self__NGBB->parent_arrayed_collection__4XP.upper__IYP=(__INTEGER)(Self__NGBB->parent_arrayed_collection__4XP.upper__IYP +  1);
+          };
+        };
+        ((void **)Self__NGBB->parent_arrayed_collection__4XP.storage__GCW)[Self__NGBB->parent_arrayed_collection__4XP.upper__IYP]=result__2OIB;
+      };
+      result__VON=result__YXP;
+      result__LMJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__LMJH=FALSE__;
+      } else {
+        result__MMJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__MMJH=((__CHARACTER )(( 0)));
+        } else {
+          result__MMJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        };
+        if ((result__MMJH == ')')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__LMJH=TRUE__;
+        };
+      };
+      if ((! result__LMJH)) {
+        pos__P2YG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_260));
+        put_position__2OG(pos__P2YG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      if (is_parameter_type__IKE) {
-        if (((void *)styl__JON != (void *)NULL)) {
-          copy__ZCS(string_tmp__VH,(&__string_319));
-          append__BOS(string_tmp__VH,styl__JON);
-          append__BOS(string_tmp__VH,(&__string_320));
-          __tmp__CTN=current_position__JXF();
-          put_error__text__KNG( 2,string_tmp__VH);
-          put_position__UOG(__tmp__CTN);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (is_parameter_type__QKE) {
+        if (((void *)styl__RON != (void *)NULL)) {
+          copy__BDS(string_tmp__VH,(&__string_318));
+          append__JOS(string_tmp__VH,styl__RON);
+          append__JOS(string_tmp__VH,(&__string_319));
+          __tmp__KTN=current_position__RXF();
+          put_error__text__SNG( 2,string_tmp__VH);
+          put_position__2OG(__tmp__KTN);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__L5CH=fast_reference_at__Y1T(dico__STI,nam__LON);
-        if (((void *)result__L5CH == (void *)NULL)) {
-          result__CSGH=NULL;
-          ptr__DSGH=((__POINTER )(NULL));
-          typ_id__ESGH= 0;
-          sz__FSGH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
-          if ((sz__FSGH ==  0)) {
-            result__CSGH=ITM_TYPE_PARAMETER__;
-          } else {
-            typ_id__ESGH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__FSGH);
-            if ((typ_id__ESGH == (__INTEGER)(-  1))) {
-              a__GSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__HSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FSGH + a__GSGH) & (__UINTEGER_32)(~ a__GSGH));
-              ptr_table__PKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__OKIH=((__POINTER )(NULL));
-              result__QKIH=((__POINTER *)ptr_table__PKIH)[ 0];
-              if ((result__QKIH == (void *)NULL)) {
-                result__QKIH=new_lab__MRJ(new_size__HSGH);
-                next__OKIH=(void *)((unsigned long)result__QKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSGH)));
-                ((__POINTER *)next__OKIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PKIH)[ 0]=next__OKIH;
+        result__W5DH=fast_reference_at__A2T(dico__0TI,nam__TON);
+        if (((void *)result__W5DH == (void *)NULL)) {
+          result__3THH=NULL;
+          ptr__4THH=((__POINTER )(NULL));
+          typ_id__5THH= 0;
+          sz__AUHH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__AUHH ==  0)) {
+            result__3THH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__5THH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__AUHH);
+            if ((typ_id__5THH == (__INTEGER)(-  1))) {
+              a__BUHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CUHH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUHH + a__BUHH) & (__UINTEGER_32)(~ a__BUHH));
+              ptr_table__PMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CUHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__OMJH=((__POINTER )(NULL));
+              result__QMJH=((__POINTER *)ptr_table__PMJH)[ 0];
+              if ((result__QMJH == (void *)NULL)) {
+                result__QMJH=new_lab__URJ(new_size__CUHH);
+                next__OMJH=(void *)((unsigned long)result__QMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CUHH)));
+                ((__POINTER *)next__OMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PMJH)[ 0]=next__OMJH;
               } else {
-                next__OKIH=((__POINTER *)result__QKIH)[ 0];
-                if ((next__OKIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__HSGH <<  1)) <=  4096)) {
-                    next__OKIH=(void *)((unsigned long)result__QKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HSGH)));
+                next__OMJH=((__POINTER *)result__QMJH)[ 0];
+                if ((next__OMJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QMJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CUHH <<  1)) <=  4096)) {
+                    next__OMJH=(void *)((unsigned long)result__QMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CUHH)));
                   } else {
-                    next__OKIH=new_lab__MRJ(new_size__HSGH);
+                    next__OMJH=new_lab__URJ(new_size__CUHH);
                   };
-                  ((__POINTER *)next__OKIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PKIH)[ 0]=next__OKIH;
+                  ((__POINTER *)next__OMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PMJH)[ 0]=next__OMJH;
                 } else {
-                  ((__POINTER *)result__QKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QKIH=next__OKIH;
+                  ((__POINTER *)result__QMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QMJH=next__OMJH;
                 };
               };
-              ptr__DSGH=result__QKIH;
+              ptr__4THH=result__QMJH;
             } else {
-              t__ISGH=((__UINTEGER_32 )typ_id__ESGH);
-              a__JSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__XKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FSGH + a__JSGH) & (__UINTEGER_32)(~ a__JSGH));
-              ptr_table__UKIH=((__POINTER )(&(table_type[(t__ISGH)])));
-              lab_type__WKIH=(__UINTEGER_32)(t__ISGH |  1);
-              next__TKIH=((__POINTER )(NULL));
-              result__VKIH=((__POINTER *)ptr_table__UKIH)[ 0];
-              if ((result__VKIH == (void *)NULL)) {
-                result__VKIH=new_lab__MRJ(lab_type__WKIH);
-                next__TKIH=(void *)((unsigned long)result__VKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKIH)));
-                ((__POINTER *)next__TKIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__UKIH)[ 0]=next__TKIH;
+              t__DUHH=((__UINTEGER_32 )typ_id__5THH);
+              a__EUHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__XMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__AUHH + a__EUHH) & (__UINTEGER_32)(~ a__EUHH));
+              ptr_table__UMJH=((__POINTER )(&(table_type[(t__DUHH)])));
+              lab_type__WMJH=(__UINTEGER_32)(t__DUHH |  1);
+              next__TMJH=((__POINTER )(NULL));
+              result__VMJH=((__POINTER *)ptr_table__UMJH)[ 0];
+              if ((result__VMJH == (void *)NULL)) {
+                result__VMJH=new_lab__URJ(lab_type__WMJH);
+                next__TMJH=(void *)((unsigned long)result__VMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMJH)));
+                ((__POINTER *)next__TMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__UMJH)[ 0]=next__TMJH;
               } else {
-                next__TKIH=((__POINTER *)result__VKIH)[ 0];
-                if ((next__TKIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VKIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XKIH <<  1)) <=  4096)) {
-                    next__TKIH=(void *)((unsigned long)result__VKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKIH)));
+                next__TMJH=((__POINTER *)result__VMJH)[ 0];
+                if ((next__TMJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VMJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XMJH <<  1)) <=  4096)) {
+                    next__TMJH=(void *)((unsigned long)result__VMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMJH)));
                   } else {
-                    next__TKIH=new_lab__MRJ(lab_type__WKIH);
+                    next__TMJH=new_lab__URJ(lab_type__WMJH);
                   };
-                  ((__POINTER *)next__TKIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UKIH)[ 0]=next__TKIH;
+                  ((__POINTER *)next__TMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__UMJH)[ 0]=next__TMJH;
                 } else {
-                  ((__POINTER *)result__VKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__VKIH=next__TKIH;
+                  ((__POINTER *)result__VMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__VMJH=next__TMJH;
                 };
               };
-              ptr__DSGH=result__VKIH;
-            };
-            result__CSGH=((__ITM_TYPE_PARAMETER *)ptr__DSGH);
-            *(result__CSGH) = *(ITM_TYPE_PARAMETER__);
-          };
-          Self__KSGH=((__ITM_TYPE_PARAMETER *)result__CSGH);
-          Self__KSGH->parent_itm_type__3DE.name__KYP=nam__LON;
-          fast_put__to__TOZ(dico__STI,Self__KSGH,nam__LON);
-          result__L5CH=result__CSGH;
-        };
-        result__NON=result__L5CH;
-        __tmp__JTN=TRUE__;
-      } else {
-        __tmp__JTN=FALSE__;
-      };
-      if ((! __tmp__JTN)) {
-        if (((void *)styl__JON == (void *)NULL)) {
-          result__NON=get__DTI(nam__LON);
-        } else {
-          if (((void *)nam__LON == (void *)(&__string_1))) {
-            copy__ZCS(string_tmp__VH,(&__string_319));
-            append__BOS(string_tmp__VH,styl__JON);
-            append__BOS(string_tmp__VH,(&__string_321));
-            __tmp__EUN=current_position__JXF();
-            put_error__text__KNG( 2,string_tmp__VH);
-            put_position__UOG(__tmp__EUN);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+              ptr__4THH=result__VMJH;
+            };
+            result__3THH=((__ITM_TYPE_PARAMETER *)ptr__4THH);
+            *(result__3THH) = *(ITM_TYPE_PARAMETER__);
+          };
+          Self__FUHH=((__ITM_TYPE_PARAMETER *)result__3THH);
+          Self__FUHH->parent_itm_type__FEE.name__SYP=nam__TON;
+          fast_put__to__1OZ(dico__0TI,Self__FUHH,nam__TON);
+          result__W5DH=result__3THH;
+        };
+        result__VON=result__W5DH;
+        __tmp__RTN=TRUE__;
+      } else {
+        __tmp__RTN=FALSE__;
+      };
+      if ((! __tmp__RTN)) {
+        if (((void *)styl__RON == (void *)NULL)) {
+          result__VON=get__LTI(nam__TON);
+        } else {
+          if (((void *)nam__TON == (void *)(&__string_1))) {
+            copy__BDS(string_tmp__VH,(&__string_318));
+            append__JOS(string_tmp__VH,styl__RON);
+            append__JOS(string_tmp__VH,(&__string_320));
+            __tmp__MUN=current_position__RXF();
+            put_error__text__SNG( 2,string_tmp__VH);
+            put_position__2OG(__tmp__MUN);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
-            result__NON=type_self__HUN;
+            result__VON=type_self__PUN;
           } else {
-            n__2NR=nam__LON;
-            result__5NR=NULL;
-            idx__AOR= 0;
-            while (((idx__AOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.upper__POR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR])->parent_itm_type_simple__BSN.name__KYP != (void *)n__2NR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR])->style__TYP != (void *)styl__JON)))) {
-              idx__AOR=(__INTEGER)(idx__AOR +  1);
+            n__EOR=nam__TON;
+            result__HOR=NULL;
+            idx__IOR= 0;
+            while (((idx__IOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR)->parent_arrayed_collection__NOR.upper__XOR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR)->parent_arrayed_collection__NOR.storage__OMW)[idx__IOR])->parent_itm_type_simple__JSN.name__SYP != (void *)n__EOR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR)->parent_arrayed_collection__NOR.storage__OMW)[idx__IOR])->style__1YP != (void *)styl__RON)))) {
+              idx__IOR=(__INTEGER)(idx__IOR +  1);
             };
-            if ((idx__AOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.upper__POR)) {
-              __tmp__0PR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR)->parent_arrayed_collection__FOR.storage__GMW)[idx__AOR];
-              if (__tmp__0PR==NULL) {
-                __tmp__1PR=NULL;
+            if ((idx__IOR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR)->parent_arrayed_collection__NOR.upper__XOR)) {
+              __tmp__CQR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR)->parent_arrayed_collection__NOR.storage__OMW)[idx__IOR];
+              if (__tmp__CQR==NULL) {
+                __tmp__DQR=NULL;
               } else {
-                __tmp__1PR=((__ITM_TYPE_STYLE *)__tmp__0PR);
+                __tmp__DQR=((__ITM_TYPE_STYLE *)__tmp__CQR);
               };
-              result__5NR=__tmp__1PR;
+              result__HOR=__tmp__DQR;
             } else {
-              result__55IB=NULL;
-              ptr__AAJB=((__POINTER )(NULL));
-              typ_id__FAJB= 0;
-              sz__CAJB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
-              if ((sz__CAJB ==  0)) {
-                result__55IB=ITM_TYPE_STYLE__;
+              result__HAJB=NULL;
+              ptr__IAJB=((__POINTER )(NULL));
+              typ_id__NAJB= 0;
+              sz__KAJB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__KAJB ==  0)) {
+                result__HAJB=ITM_TYPE_STYLE__;
               } else {
-                typ_id__FAJB=-1;
-                clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__CAJB);
-                if ((typ_id__FAJB == (__INTEGER)(-  1))) {
-                  a__XBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__YBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__CAJB + a__XBFH) & (__UINTEGER_32)(~ a__XBFH));
-                  ptr_table__ZKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-                  next__YKIH=((__POINTER )(NULL));
-                  result__0KIH=((__POINTER *)ptr_table__ZKIH)[ 0];
-                  if ((result__0KIH == (void *)NULL)) {
-                    result__0KIH=new_lab__MRJ(new_size__YBFH);
-                    next__YKIH=(void *)((unsigned long)result__0KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YBFH)));
-                    ((__POINTER *)next__YKIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__ZKIH)[ 0]=next__YKIH;
+                typ_id__NAJB=-1;
+                clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__KAJB);
+                if ((typ_id__NAJB == (__INTEGER)(-  1))) {
+                  a__HDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__IDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__KAJB + a__HDGH) & (__UINTEGER_32)(~ a__HDGH));
+                  ptr_table__ZMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__YMJH=((__POINTER )(NULL));
+                  result__0MJH=((__POINTER *)ptr_table__ZMJH)[ 0];
+                  if ((result__0MJH == (void *)NULL)) {
+                    result__0MJH=new_lab__URJ(new_size__IDGH);
+                    next__YMJH=(void *)((unsigned long)result__0MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDGH)));
+                    ((__POINTER *)next__YMJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ZMJH)[ 0]=next__YMJH;
                   } else {
-                    next__YKIH=((__POINTER *)result__0KIH)[ 0];
-                    if ((next__YKIH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0KIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YBFH <<  1)) <=  4096)) {
-                        next__YKIH=(void *)((unsigned long)result__0KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YBFH)));
+                    next__YMJH=((__POINTER *)result__0MJH)[ 0];
+                    if ((next__YMJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0MJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IDGH <<  1)) <=  4096)) {
+                        next__YMJH=(void *)((unsigned long)result__0MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IDGH)));
                       } else {
-                        next__YKIH=new_lab__MRJ(new_size__YBFH);
+                        next__YMJH=new_lab__URJ(new_size__IDGH);
                       };
-                      ((__POINTER *)next__YKIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ZKIH)[ 0]=next__YKIH;
+                      ((__POINTER *)next__YMJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ZMJH)[ 0]=next__YMJH;
                     } else {
-                      ((__POINTER *)result__0KIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__0KIH=next__YKIH;
+                      ((__POINTER *)result__0MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__0MJH=next__YMJH;
                     };
                   };
-                  ptr__AAJB=result__0KIH;
+                  ptr__IAJB=result__0MJH;
                 } else {
-                  t__2BFH=((__UINTEGER_32 )typ_id__FAJB);
-                  a__1BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-                  new_size__BLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CAJB + a__1BFH) & (__UINTEGER_32)(~ a__1BFH));
-                  ptr_table__4KIH=((__POINTER )(&(table_type[(t__2BFH)])));
-                  lab_type__ALIH=(__UINTEGER_32)(t__2BFH |  1);
-                  next__3KIH=((__POINTER )(NULL));
-                  result__5KIH=((__POINTER *)ptr_table__4KIH)[ 0];
-                  if ((result__5KIH == (void *)NULL)) {
-                    result__5KIH=new_lab__MRJ(lab_type__ALIH);
-                    next__3KIH=(void *)((unsigned long)result__5KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLIH)));
-                    ((__POINTER *)next__3KIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__4KIH)[ 0]=next__3KIH;
+                  t__MDGH=((__UINTEGER_32 )typ_id__NAJB);
+                  a__LDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__BNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__KAJB + a__LDGH) & (__UINTEGER_32)(~ a__LDGH));
+                  ptr_table__4MJH=((__POINTER )(&(table_type[(t__MDGH)])));
+                  lab_type__ANJH=(__UINTEGER_32)(t__MDGH |  1);
+                  next__3MJH=((__POINTER )(NULL));
+                  result__5MJH=((__POINTER *)ptr_table__4MJH)[ 0];
+                  if ((result__5MJH == (void *)NULL)) {
+                    result__5MJH=new_lab__URJ(lab_type__ANJH);
+                    next__3MJH=(void *)((unsigned long)result__5MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNJH)));
+                    ((__POINTER *)next__3MJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__4MJH)[ 0]=next__3MJH;
                   } else {
-                    next__3KIH=((__POINTER *)result__5KIH)[ 0];
-                    if ((next__3KIH == (void *)NULL)) {
-                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5KIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BLIH <<  1)) <=  4096)) {
-                        next__3KIH=(void *)((unsigned long)result__5KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLIH)));
+                    next__3MJH=((__POINTER *)result__5MJH)[ 0];
+                    if ((next__3MJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5MJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BNJH <<  1)) <=  4096)) {
+                        next__3MJH=(void *)((unsigned long)result__5MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNJH)));
                       } else {
-                        next__3KIH=new_lab__MRJ(lab_type__ALIH);
+                        next__3MJH=new_lab__URJ(lab_type__ANJH);
                       };
-                      ((__POINTER *)next__3KIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__4KIH)[ 0]=next__3KIH;
+                      ((__POINTER *)next__3MJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__4MJH)[ 0]=next__3MJH;
                     } else {
-                      ((__POINTER *)result__5KIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3KIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__5KIH=next__3KIH;
+                      ((__POINTER *)result__5MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__5MJH=next__3MJH;
                     };
                   };
-                  ptr__AAJB=result__5KIH;
+                  ptr__IAJB=result__5MJH;
                 };
-                result__55IB=((__ITM_TYPE_STYLE *)ptr__AAJB);
-                *(result__55IB) = *(ITM_TYPE_STYLE__);
+                result__HAJB=((__ITM_TYPE_STYLE *)ptr__IAJB);
+                *(result__HAJB) = *(ITM_TYPE_STYLE__);
               };
-              Self__V5CC=((__ITM_TYPE_STYLE *)result__55IB);
-              Self__V5CC->parent_itm_type_simple__BSN.name__KYP=nam__LON;
-              Self__V5CC->style__TYP=styl__JON;
-              result__5NR=result__55IB;
-              Self__MECB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__GOR);
-              new_capacity__OECB= 0;
-              if (((__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1) <= (__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.capacity__1LW -  1))) {
-                Self__MECB->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1);
-                __tmp__2ECB=TRUE__;
+              Self__35CC=((__ITM_TYPE_STYLE *)result__HAJB);
+              Self__35CC->parent_itm_type_simple__JSN.name__SYP=nam__TON;
+              Self__35CC->style__1YP=styl__RON;
+              result__HOR=result__HAJB;
+              Self__UECB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__OOR);
+              new_capacity__WECB= 0;
+              if (((__INTEGER)(Self__UECB->parent_arrayed_collection__NOR.upper__XOR +  1) <= (__INTEGER)(Self__UECB->parent_arrayed_collection__NOR.capacity__DMW -  1))) {
+                Self__UECB->parent_arrayed_collection__NOR.upper__XOR=(__INTEGER)(Self__UECB->parent_arrayed_collection__NOR.upper__XOR +  1);
+                __tmp__EFCB=TRUE__;
               } else {
-                __tmp__2ECB=FALSE__;
+                __tmp__EFCB=FALSE__;
               };
-              if ((! __tmp__2ECB)) {
-                if ((Self__MECB->parent_arrayed_collection__FOR.capacity__1LW ==  0)) {
-                  Self__MECB->parent_arrayed_collection__FOR.storage__GMW=create__1HYB( 2);
-                  Self__MECB->parent_arrayed_collection__FOR.capacity__1LW= 2;
-                  Self__MECB->parent_arrayed_collection__FOR.upper__POR= 0;
+              if ((! __tmp__EFCB)) {
+                if ((Self__UECB->parent_arrayed_collection__NOR.capacity__DMW ==  0)) {
+                  Self__UECB->parent_arrayed_collection__NOR.storage__OMW=create__DIYB( 2);
+                  Self__UECB->parent_arrayed_collection__NOR.capacity__DMW= 2;
+                  Self__UECB->parent_arrayed_collection__NOR.upper__XOR= 0;
                 } else {
-                  new_capacity__OECB=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.capacity__1LW <<  1);
-                  __tmp__RFCB=Self__MECB->parent_arrayed_collection__FOR.storage__GMW;
-                  __tmp__SFCB=Self__MECB->parent_arrayed_collection__FOR.capacity__1LW;
-                  new__MSFC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__RFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__SFCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OECB * ((__INTEGER )(sizeof(void *)))))));
-                  __tmp__ATFC=(__INTEGER)(new_capacity__OECB -  1);
-                  Self__41VD=__tmp__SFCB;
-                  while ((Self__41VD <= __tmp__ATFC)) {
-                    new__MSFC[Self__41VD]=NULL;
-                    Self__41VD=(__INTEGER)(Self__41VD +  1);
+                  new_capacity__WECB=(__INTEGER)(Self__UECB->parent_arrayed_collection__NOR.capacity__DMW <<  1);
+                  __tmp__ZFCB=Self__UECB->parent_arrayed_collection__NOR.storage__OMW;
+                  __tmp__0FCB=Self__UECB->parent_arrayed_collection__NOR.capacity__DMW;
+                  new__USFC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__ZFCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__0FCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WECB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__ITFC=(__INTEGER)(new_capacity__WECB -  1);
+                  Self__G2VD=__tmp__0FCB;
+                  while ((Self__G2VD <= __tmp__ITFC)) {
+                    new__USFC[Self__G2VD]=NULL;
+                    Self__G2VD=(__INTEGER)(Self__G2VD +  1);
                   };
-                  Self__MECB->parent_arrayed_collection__FOR.storage__GMW=new__MSFC;
-                  Self__MECB->parent_arrayed_collection__FOR.capacity__1LW=new_capacity__OECB;
-                  Self__MECB->parent_arrayed_collection__FOR.upper__POR=(__INTEGER)(Self__MECB->parent_arrayed_collection__FOR.upper__POR +  1);
+                  Self__UECB->parent_arrayed_collection__NOR.storage__OMW=new__USFC;
+                  Self__UECB->parent_arrayed_collection__NOR.capacity__DMW=new_capacity__WECB;
+                  Self__UECB->parent_arrayed_collection__NOR.upper__XOR=(__INTEGER)(Self__UECB->parent_arrayed_collection__NOR.upper__XOR +  1);
                 };
               };
-              ((void **)Self__MECB->parent_arrayed_collection__FOR.storage__GMW)[Self__MECB->parent_arrayed_collection__FOR.upper__POR]=result__55IB;
+              ((void **)Self__UECB->parent_arrayed_collection__NOR.storage__OMW)[Self__UECB->parent_arrayed_collection__NOR.upper__XOR]=result__HAJB;
             };
-            result__NON=result__5NR;
+            result__VON=result__HOR;
           };
         };
       };
     };
-    if (is_shorter__5Y) {
-      sav_derive__RON=short_derive__BCC;
-      short_derive__BCC=old_derive__QON;
-      if ((((void *)result__NON == (void *)type_self__HUN) || ((void *)result__NON == (void *)type_null__5UN))) {
-        short__token__to__LBD((&__string_126),(__INTEGER)(old_pos__PON - ((__STRING_CONSTANT *)nam__LON)->count__DD),old_pos__PON);
+    if (is_shorter__FZ) {
+      sav_derive__ZON=short_derive__JCC;
+      short_derive__JCC=old_derive__YON;
+      if ((((void *)result__VON == (void *)type_self__PUN) || ((void *)result__VON == (void *)type_null__HVN))) {
+        short__token__to__TBD((&__string_126),(__INTEGER)(old_pos__XON - ((__STRING_CONSTANT *)nam__TON)->count__DD),old_pos__XON);
       } else {
-        short__token__to__LBD((&__string_125),(__INTEGER)(old_pos__PON - ((__STRING_CONSTANT *)nam__LON)->count__DD),old_pos__PON);
+        short__token__to__TBD((&__string_125),(__INTEGER)(old_pos__XON - ((__STRING_CONSTANT *)nam__TON)->count__DD),old_pos__XON);
       };
-      short_derive__BCC=(__INTEGER)(sav_derive__RON + (__INTEGER)(short_derive__BCC - old_derive__QON));
+      short_derive__JCC=(__INTEGER)(sav_derive__ZON + (__INTEGER)(short_derive__JCC - old_derive__YON));
     };
   };
-  return(result__NON);
+  return(result__VON);
 }
 
-static void read_def_local__30H(__PARSER *Self__40H)
+static void read_def_local__F1H(__PARSER *Self__G1H)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__SYK,typ_id__XWN,Self__0FAB,limit_up__1FAB,__tmp__W2K;
-  __INTEGER Self__H3N,__tmp__TSGH,Self__USGH,__tmp__2APD,Self__QQUD;
-  __POSITION pos__MBYG,__tmp__4ZK,pos__UBYG,pos__BCYG,pos__ICYG;
-  void *__tmp__5ZK;
-  __ITM_LOCAL *result__RWN,*Self__0DV;
-  __POINTER ptr__SWN,ptr_table__DLIH,next__CLIH,result__ELIH;
-  __POINTER ptr_table__ILIH,next__HLIH,result__JLIH;
-  __UINTEGER_32 sz__UWN,a__NCFH,new_size__OCFH,t__SCFH,a__RCFH;
-  __UINTEGER_32 new_size__LLIH,lab_type__KLIH;
-  __CHARACTER styl__I1H,result__NLIH,result__QW5G,result__QLIH;
-  __CHARACTER result__TLIH;
-  void *result__MSGH,*local_list__G1H,*result__PSGH,*static_list__H1H;
-  void *result__RYK,*result__PRI;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__NSGH,*Self__OSGH;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__QSGH,*Self__RSGH,*Self__ER4;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__0R4;
-  __BOOLEAN mute__TYK,result__MLIH,__tmp__K0K,result__PLIH,result__SLIH;
-  __FAST_ARRAYoITM_LOCALo *Self__VSGH,*Self__RAPD;
-  void *other__SSGH,*other__SAPD;
-  old_position__DRI=position__SBC;
-  old_pos_cur__FRI=pos_cur__VBC;
-  old_pos_line__HRI=pos_line__WBC;
-  old_pos_col__JRI=pos_col__XBC;
-  old_short_derive__LRI=short_derive__BCC;
-  styl__I1H=read_style__XRF();
-  result__MSGH=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
-    result__MSGH=create_with_capacity__QJK( 16);
+  __INTEGER beg__0YK,typ_id__5WN,Self__CGAB,limit_up__DGAB,__tmp__42K;
+  __INTEGER Self__P3N,__tmp__OUHH,Self__PUHH,__tmp__EBPD,Self__YQUD;
+  __POSITION pos__14YG,__tmp__G0K,pos__D5YG,pos__Q5YG,pos__X5YG;
+  void *__tmp__H0K;
+  __ITM_LOCAL *result__ZWN,*Self__CEV;
+  __POINTER ptr__0WN,ptr_table__DNJH,next__CNJH,result__ENJH;
+  __POINTER ptr_table__INJH,next__HNJH,result__JNJH;
+  __UINTEGER_32 sz__2WN,a__3DGH,new_size__4DGH,t__CEGH,a__BEGH;
+  __UINTEGER_32 new_size__LNJH,lab_type__KNJH;
+  __CHARACTER styl__Q1H,result__NNJH,result__XVAH,result__QNJH;
+  __CHARACTER result__TNJH;
+  void *result__HUHH,*local_list__O1H,*result__KUHH,*static_list__P1H;
+  void *result__ZYK,*result__XRI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__IUHH,*Self__JUHH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__LUHH,*Self__MUHH,*Self__MR4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__CS4;
+  __BOOLEAN mute__1YK,result__MNJH,__tmp__S0K,result__PNJH,result__SNJH;
+  __FAST_ARRAYoITM_LOCALo *Self__QUHH,*Self__ZAPD;
+  void *other__NUHH,*other__0APD;
+  old_position__LRI=position__0BC;
+  old_pos_cur__NRI=pos_cur__3BC;
+  old_pos_line__PRI=pos_line__4BC;
+  old_pos_col__RRI=pos_col__5BC;
+  old_short_derive__TRI=short_derive__JCC;
+  styl__Q1H=read_style__5RF();
+  result__HUHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI)->parent_arrayed_collection__2RI.upper__R1T <  0)) {
+    result__HUHH=create_with_capacity__YJK( 16);
   } else {
-    Self__NSGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-    result__MSGH=((void **)Self__NSGH->parent_arrayed_collection__URI.storage__HJU)[Self__NSGH->parent_arrayed_collection__URI.upper__J1T];
-    Self__OSGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-    Self__OSGH->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__OSGH->parent_arrayed_collection__URI.upper__J1T -  1);
-  };
-  local_list__G1H=result__MSGH;
-  result__PSGH=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
-    result__PSGH=create_with_capacity__QJK( 16);
+    Self__IUHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+    result__HUHH=((void **)Self__IUHH->parent_arrayed_collection__2RI.storage__PJU)[Self__IUHH->parent_arrayed_collection__2RI.upper__R1T];
+    Self__JUHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+    Self__JUHH->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(Self__JUHH->parent_arrayed_collection__2RI.upper__R1T -  1);
+  };
+  local_list__O1H=result__HUHH;
+  result__KUHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI)->parent_arrayed_collection__2RI.upper__R1T <  0)) {
+    result__KUHH=create_with_capacity__YJK( 16);
   } else {
-    Self__QSGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-    result__PSGH=((void **)Self__QSGH->parent_arrayed_collection__URI.storage__HJU)[Self__QSGH->parent_arrayed_collection__URI.upper__J1T];
-    Self__RSGH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-    Self__RSGH->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__RSGH->parent_arrayed_collection__URI.upper__J1T -  1);
-  };
-  static_list__H1H=result__PSGH;
-  while ((styl__I1H != ' ')) {
-    result__RYK=NULL;
-    beg__SYK= 0;
-    mute__TYK=TRUE__;
-    if (read_identifier__LAL()) {
-      result__PRI=NULL;
-      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI)->parent_arrayed_collection__URI.upper__J1T <  0)) {
-        result__PRI=create_with_capacity__QJK( 16);
-      } else {
-        Self__ER4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-        result__PRI=((void **)Self__ER4->parent_arrayed_collection__URI.storage__HJU)[Self__ER4->parent_arrayed_collection__URI.upper__J1T];
-        Self__0R4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-        Self__0R4->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__0R4->parent_arrayed_collection__URI.upper__J1T -  1);
-      };
-      result__RYK=result__PRI;
-      beg__SYK= 0;
+    Self__LUHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+    result__KUHH=((void **)Self__LUHH->parent_arrayed_collection__2RI.storage__PJU)[Self__LUHH->parent_arrayed_collection__2RI.upper__R1T];
+    Self__MUHH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+    Self__MUHH->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(Self__MUHH->parent_arrayed_collection__2RI.upper__R1T -  1);
+  };
+  static_list__P1H=result__KUHH;
+  while ((styl__Q1H != ' ')) {
+    result__ZYK=NULL;
+    beg__0YK= 0;
+    mute__1YK=TRUE__;
+    if (read_identifier__TAL()) {
+      result__XRI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI)->parent_arrayed_collection__2RI.upper__R1T <  0)) {
+        result__XRI=create_with_capacity__YJK( 16);
+      } else {
+        Self__MR4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+        result__XRI=((void **)Self__MR4->parent_arrayed_collection__2RI.storage__PJU)[Self__MR4->parent_arrayed_collection__2RI.upper__R1T];
+        Self__CS4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+        Self__CS4->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(Self__CS4->parent_arrayed_collection__2RI.upper__R1T -  1);
+      };
+      result__ZYK=result__XRI;
+      beg__0YK= 0;
       do {
-        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K +  1) !=  0) && (! read_identifier__LAL())) && (! mute__TYK))) {
-          pos__MBYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_322));
-          put_position__UOG(pos__MBYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K +  1) !=  0) && (! read_identifier__TAL())) && (! mute__1YK))) {
+          pos__14YG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_321));
+          put_position__2OG(pos__14YG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        __tmp__4ZK=current_position__JXF();
-        __tmp__5ZK=last_string__I0C;
-        result__RWN=NULL;
-        ptr__SWN=((__POINTER )(NULL));
-        typ_id__XWN= 0;
-        sz__UWN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
-        if ((sz__UWN ==  0)) {
-          result__RWN=ITM_LOCAL__;
-        } else {
-          typ_id__XWN=__ITM_LOCAL__;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UWN);
-          if ((typ_id__XWN == (__INTEGER)(-  1))) {
-            a__NCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__OCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWN + a__NCFH) & (__UINTEGER_32)(~ a__NCFH));
-            ptr_table__DLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__CLIH=((__POINTER )(NULL));
-            result__ELIH=((__POINTER *)ptr_table__DLIH)[ 0];
-            if ((result__ELIH == (void *)NULL)) {
-              result__ELIH=new_lab__MRJ(new_size__OCFH);
-              next__CLIH=(void *)((unsigned long)result__ELIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCFH)));
-              ((__POINTER *)next__CLIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DLIH)[ 0]=next__CLIH;
+        __tmp__G0K=current_position__RXF();
+        __tmp__H0K=last_string__Q0C;
+        result__ZWN=NULL;
+        ptr__0WN=((__POINTER )(NULL));
+        typ_id__5WN= 0;
+        sz__2WN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__2WN ==  0)) {
+          result__ZWN=ITM_LOCAL__;
+        } else {
+          typ_id__5WN=__ITM_LOCAL__;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__2WN);
+          if ((typ_id__5WN == (__INTEGER)(-  1))) {
+            a__3DGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__4DGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2WN + a__3DGH) & (__UINTEGER_32)(~ a__3DGH));
+            ptr_table__DNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4DGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__CNJH=((__POINTER )(NULL));
+            result__ENJH=((__POINTER *)ptr_table__DNJH)[ 0];
+            if ((result__ENJH == (void *)NULL)) {
+              result__ENJH=new_lab__URJ(new_size__4DGH);
+              next__CNJH=(void *)((unsigned long)result__ENJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DGH)));
+              ((__POINTER *)next__CNJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DNJH)[ 0]=next__CNJH;
             } else {
-              next__CLIH=((__POINTER *)result__ELIH)[ 0];
-              if ((next__CLIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ELIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OCFH <<  1)) <=  4096)) {
-                  next__CLIH=(void *)((unsigned long)result__ELIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCFH)));
+              next__CNJH=((__POINTER *)result__ENJH)[ 0];
+              if ((next__CNJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ENJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4DGH <<  1)) <=  4096)) {
+                  next__CNJH=(void *)((unsigned long)result__ENJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4DGH)));
                 } else {
-                  next__CLIH=new_lab__MRJ(new_size__OCFH);
+                  next__CNJH=new_lab__URJ(new_size__4DGH);
                 };
-                ((__POINTER *)next__CLIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DLIH)[ 0]=next__CLIH;
+                ((__POINTER *)next__CNJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DNJH)[ 0]=next__CNJH;
               } else {
-                ((__POINTER *)result__ELIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ELIH=next__CLIH;
+                ((__POINTER *)result__ENJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ENJH=next__CNJH;
               };
             };
-            ptr__SWN=result__ELIH;
-          } else {
-            t__SCFH=((__UINTEGER_32 )typ_id__XWN);
-            a__RCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__LLIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UWN + a__RCFH) & (__UINTEGER_32)(~ a__RCFH));
-            ptr_table__ILIH=((__POINTER )(&(table_type[(t__SCFH)])));
-            lab_type__KLIH=(__UINTEGER_32)(t__SCFH |  1);
-            next__HLIH=((__POINTER )(NULL));
-            result__JLIH=((__POINTER *)ptr_table__ILIH)[ 0];
-            if ((result__JLIH == (void *)NULL)) {
-              result__JLIH=new_lab__MRJ(lab_type__KLIH);
-              next__HLIH=(void *)((unsigned long)result__JLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLIH)));
-              ((__POINTER *)next__HLIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ILIH)[ 0]=next__HLIH;
+            ptr__0WN=result__ENJH;
+          } else {
+            t__CEGH=((__UINTEGER_32 )typ_id__5WN);
+            a__BEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2WN + a__BEGH) & (__UINTEGER_32)(~ a__BEGH));
+            ptr_table__INJH=((__POINTER )(&(table_type[(t__CEGH)])));
+            lab_type__KNJH=(__UINTEGER_32)(t__CEGH |  1);
+            next__HNJH=((__POINTER )(NULL));
+            result__JNJH=((__POINTER *)ptr_table__INJH)[ 0];
+            if ((result__JNJH == (void *)NULL)) {
+              result__JNJH=new_lab__URJ(lab_type__KNJH);
+              next__HNJH=(void *)((unsigned long)result__JNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNJH)));
+              ((__POINTER *)next__HNJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__INJH)[ 0]=next__HNJH;
             } else {
-              next__HLIH=((__POINTER *)result__JLIH)[ 0];
-              if ((next__HLIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LLIH <<  1)) <=  4096)) {
-                  next__HLIH=(void *)((unsigned long)result__JLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLIH)));
+              next__HNJH=((__POINTER *)result__JNJH)[ 0];
+              if ((next__HNJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JNJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LNJH <<  1)) <=  4096)) {
+                  next__HNJH=(void *)((unsigned long)result__JNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNJH)));
                 } else {
-                  next__HLIH=new_lab__MRJ(lab_type__KLIH);
+                  next__HNJH=new_lab__URJ(lab_type__KNJH);
                 };
-                ((__POINTER *)next__HLIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ILIH)[ 0]=next__HLIH;
+                ((__POINTER *)next__HNJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__INJH)[ 0]=next__HNJH;
               } else {
-                ((__POINTER *)result__JLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JLIH=next__HLIH;
+                ((__POINTER *)result__JNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__JNJH=next__HNJH;
               };
             };
-            ptr__SWN=result__JLIH;
+            ptr__0WN=result__JNJH;
           };
-          result__RWN=((__ITM_LOCAL *)ptr__SWN);
-          *(result__RWN) = *(ITM_LOCAL__);
+          result__ZWN=((__ITM_LOCAL *)ptr__0WN);
+          *(result__ZWN) = *(ITM_LOCAL__);
         };
-        Self__0DV=((__ITM_LOCAL *)result__RWN);
-        Self__0DV->name__42K=__tmp__5ZK;
-        Self__0DV->parent_itm_object__50H.position__NDJ=__tmp__4ZK;
-        add_last__F2U(result__RYK,result__RWN);
-        result__MLIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__MLIH=FALSE__;
+        Self__CEV=((__ITM_LOCAL *)result__ZWN);
+        Self__CEV->name__G3K=__tmp__H0K;
+        Self__CEV->parent_itm_object__H1H.position__VDJ=__tmp__G0K;
+        add_last__N2U(result__ZYK,result__ZWN);
+        result__MNJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__MNJH=FALSE__;
         } else {
-          result__NLIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__NLIH=((__CHARACTER )(( 0)));
+          result__NNJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__NNJH=((__CHARACTER )(( 0)));
           } else {
-            result__NLIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__NNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__NLIH == ':')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__MLIH=TRUE__;
+          if ((result__NNJH == ':')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__MNJH=TRUE__;
           };
         };
-        if (result__MLIH) {
-          result__QW5G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__QW5G=((__CHARACTER )(( 0)));
+        if (result__MNJH) {
+          result__XVAH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__XVAH=((__CHARACTER )(( 0)));
           } else {
-            result__QW5G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__XVAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__K0K=(result__QW5G != '=');
+          __tmp__S0K=(result__XVAH != '=');
         } else {
-          __tmp__K0K=FALSE__;
+          __tmp__S0K=FALSE__;
         };
-        if (__tmp__K0K) {
-          mute__TYK=FALSE__;
-          if (((void *)read_type__DCM(Self__40H,TRUE__) == (void *)NULL)) {
-            pos__UBYG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_323));
-            put_position__UOG(pos__UBYG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+        if (__tmp__S0K) {
+          mute__1YK=FALSE__;
+          if (((void *)read_type__LCM(Self__G1H,TRUE__) == (void *)NULL)) {
+            pos__D5YG=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_322));
+            put_position__2OG(pos__D5YG);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
-          Self__0FAB=beg__SYK;
-          limit_up__1FAB=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
-          while ((Self__0FAB <= limit_up__1FAB)) {
-            Self__0FAB=(__INTEGER)(Self__0FAB +  1);
+          Self__CGAB=beg__0YK;
+          limit_up__DGAB=((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K;
+          while ((Self__CGAB <= limit_up__DGAB)) {
+            Self__CGAB=(__INTEGER)(Self__CGAB +  1);
           };
-          beg__SYK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K +  1);
+          beg__0YK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K +  1);
         };
-        result__PLIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__PLIH=FALSE__;
+        result__PNJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__PNJH=FALSE__;
         } else {
-          result__QLIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__QLIH=((__CHARACTER )(( 0)));
+          result__QNJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__QNJH=((__CHARACTER )(( 0)));
           } else {
-            result__QLIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__QNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__QLIH == ',')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__PLIH=TRUE__;
+          if ((result__QNJH == ',')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__PNJH=TRUE__;
           };
         };
-      } while (result__PLIH);
-      if ((beg__SYK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__PRI)->parent_arrayed_collection__E1H.upper__10K +  1))) {
-        if (mute__TYK) {
-          free__WJK(result__PRI);
-          result__RYK=NULL;
+      } while (result__PNJH);
+      if ((beg__0YK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__XRI)->parent_arrayed_collection__M1H.upper__D1K +  1))) {
+        if (mute__1YK) {
+          free__4JK(result__XRI);
+          result__ZYK=NULL;
         } else {
-          pos__BCYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_323));
-          put_position__UOG(pos__BCYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          pos__Q5YG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_322));
+          put_position__2OG(pos__Q5YG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__RYK=copy__53J(result__RYK);
-        if (is_shorter__5Y) {
-          __tmp__W2K=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
-          Self__H3N= 0;
-          while ((Self__H3N <= __tmp__W2K)) {
-            add__CMHB(short_local__JCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.storage__CLU)[Self__H3N])->name__42K);
-            Self__H3N=(__INTEGER)(Self__H3N +  1);
+        result__ZYK=copy__H4J(result__ZYK);
+        if (is_shorter__FZ) {
+          __tmp__42K=((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K;
+          Self__P3N= 0;
+          while ((Self__P3N <= __tmp__42K)) {
+            add__KMHB(short_local__RCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.storage__KLU)[Self__P3N])->name__G3K);
+            Self__P3N=(__INTEGER)(Self__P3N +  1);
           };
         };
       };
     };
-    if (((void *)result__RYK != (void *)NULL)) {
-      if ((styl__I1H == '+')) {
-        Self__VSGH=((__FAST_ARRAYoITM_LOCALo *)local_list__G1H);
-        other__SSGH=result__RYK;
-        __tmp__TSGH=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
-        Self__USGH= 0;
-        while ((Self__USGH <= __tmp__TSGH)) {
-          add_last__F2U(Self__VSGH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__SSGH)->parent_arrayed_collection__E1H.storage__CLU)[Self__USGH]);
-          Self__USGH=(__INTEGER)(Self__USGH +  1);
+    if (((void *)result__ZYK != (void *)NULL)) {
+      if ((styl__Q1H == '+')) {
+        Self__QUHH=((__FAST_ARRAYoITM_LOCALo *)local_list__O1H);
+        other__NUHH=result__ZYK;
+        __tmp__OUHH=((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K;
+        Self__PUHH= 0;
+        while ((Self__PUHH <= __tmp__OUHH)) {
+          add_last__N2U(Self__QUHH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__NUHH)->parent_arrayed_collection__M1H.storage__KLU)[Self__PUHH]);
+          Self__PUHH=(__INTEGER)(Self__PUHH +  1);
         };
       } else {
-        Self__RAPD=((__FAST_ARRAYoITM_LOCALo *)static_list__H1H);
-        other__SAPD=result__RYK;
-        __tmp__2APD=((__FAST_ARRAYoITM_LOCALo *)result__RYK)->parent_arrayed_collection__E1H.upper__10K;
-        Self__QQUD= 0;
-        while ((Self__QQUD <= __tmp__2APD)) {
-          add_last__F2U(Self__RAPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__SAPD)->parent_arrayed_collection__E1H.storage__CLU)[Self__QQUD]);
-          Self__QQUD=(__INTEGER)(Self__QQUD +  1);
+        Self__ZAPD=((__FAST_ARRAYoITM_LOCALo *)static_list__P1H);
+        other__0APD=result__ZYK;
+        __tmp__EBPD=((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K;
+        Self__YQUD= 0;
+        while ((Self__YQUD <= __tmp__EBPD)) {
+          add_last__N2U(Self__ZAPD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__0APD)->parent_arrayed_collection__M1H.storage__KLU)[Self__YQUD]);
+          Self__YQUD=(__INTEGER)(Self__YQUD +  1);
         };
       };
-      result__SLIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__SLIH=FALSE__;
+      result__SNJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__SNJH=FALSE__;
       } else {
-        result__TLIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__TLIH=((__CHARACTER )(( 0)));
+        result__TNJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__TNJH=((__CHARACTER )(( 0)));
         } else {
-          result__TLIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__TNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__TLIH == ';')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__SLIH=TRUE__;
+        if ((result__TNJH == ';')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__SNJH=TRUE__;
         };
       };
-      if ((! result__SLIH)) {
-        pos__ICYG=current_position__JXF();
-        put_error__text__KNG( 2,(&__string_242));
-        put_position__UOG(pos__ICYG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+      if ((! result__SNJH)) {
+        pos__X5YG=current_position__RXF();
+        put_error__text__SNG( 2,(&__string_240));
+        put_position__2OG(pos__X5YG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      old_position__DRI=position__SBC;
-      old_pos_cur__FRI=pos_cur__VBC;
-      old_pos_line__HRI=pos_line__WBC;
-      old_pos_col__JRI=pos_col__XBC;
-      old_short_derive__LRI=short_derive__BCC;
-      styl__I1H=read_style__XRF();
+      old_position__LRI=position__0BC;
+      old_pos_cur__NRI=pos_cur__3BC;
+      old_pos_line__PRI=pos_line__4BC;
+      old_pos_col__RRI=pos_col__5BC;
+      old_short_derive__TRI=short_derive__JCC;
+      styl__Q1H=read_style__5RF();
     } else {
-      restore_context__TDL();
-      styl__I1H=' ';
+      restore_context__1DL();
+      styl__Q1H=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__MSGH)->parent_arrayed_collection__E1H.upper__10K <  0)) {
-    free__WJK(result__MSGH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__HUHH)->parent_arrayed_collection__M1H.upper__D1K <  0)) {
+    free__4JK(result__HUHH);
   } else {
-    copy__53J(result__MSGH);
+    copy__H4J(result__HUHH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__PSGH)->parent_arrayed_collection__E1H.upper__10K <  0)) {
-    free__WJK(result__PSGH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__KUHH)->parent_arrayed_collection__M1H.upper__D1K <  0)) {
+    free__4JK(result__KUHH);
   } else {
-    copy__53J(result__PSGH);
+    copy__H4J(result__KUHH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__SVI(__INTEGER new_count__UVI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__0VI(__INTEGER new_count__2VI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__QKJ,ptr_table__WLIH,next__VLIH,result__XLIH;
-  __POINTER ptr_table__1LIH,next__0LIH,result__2LIH;
-  __INTEGER typ_id__VKJ;
-  __UINTEGER_32 sz__SKJ,a__WHFH,new_size__XHFH,t__1HFH,a__0HFH;
-  __UINTEGER_32 new_size__4LIH,lab_type__3LIH;
-  __FAST_ARRAYoITM_CODEo *result__PKJ,*Self__53T;
-  result__PKJ=NULL;
-  ptr__QKJ=((__POINTER )(NULL));
-  typ_id__VKJ= 0;
-  sz__SKJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
-  if ((sz__SKJ ==  0)) {
-    result__PKJ=FAST_ARRAYoITM_CODEo__;
+  __POINTER ptr__YKJ,ptr_table__WNJH,next__VNJH,result__XNJH;
+  __POINTER ptr_table__1NJH,next__0NJH,result__2NJH;
+  __INTEGER typ_id__3KJ;
+  __UINTEGER_32 sz__0KJ,a__GJGH,new_size__HJGH,t__LJGH,a__KJGH;
+  __UINTEGER_32 new_size__4NJH,lab_type__3NJH;
+  __FAST_ARRAYoITM_CODEo *result__XKJ,*Self__H4T;
+  result__XKJ=NULL;
+  ptr__YKJ=((__POINTER )(NULL));
+  typ_id__3KJ= 0;
+  sz__0KJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__0KJ ==  0)) {
+    result__XKJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    typ_id__VKJ=__FAST_ARRAYoITM_CODEo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__SKJ);
-    if ((typ_id__VKJ == (__INTEGER)(-  1))) {
-      a__WHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__XHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKJ + a__WHFH) & (__UINTEGER_32)(~ a__WHFH));
-      ptr_table__WLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__VLIH=((__POINTER )(NULL));
-      result__XLIH=((__POINTER *)ptr_table__WLIH)[ 0];
-      if ((result__XLIH == (void *)NULL)) {
-        result__XLIH=new_lab__MRJ(new_size__XHFH);
-        next__VLIH=(void *)((unsigned long)result__XLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XHFH)));
-        ((__POINTER *)next__VLIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__WLIH)[ 0]=next__VLIH;
-      } else {
-        next__VLIH=((__POINTER *)result__XLIH)[ 0];
-        if ((next__VLIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XLIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XHFH <<  1)) <=  4096)) {
-            next__VLIH=(void *)((unsigned long)result__XLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XHFH)));
-          } else {
-            next__VLIH=new_lab__MRJ(new_size__XHFH);
-          };
-          ((__POINTER *)next__VLIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WLIH)[ 0]=next__VLIH;
-        } else {
-          ((__POINTER *)result__XLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XLIH=next__VLIH;
-        };
-      };
-      ptr__QKJ=result__XLIH;
-    } else {
-      t__1HFH=((__UINTEGER_32 )typ_id__VKJ);
-      a__0HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__4LIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKJ + a__0HFH) & (__UINTEGER_32)(~ a__0HFH));
-      ptr_table__1LIH=((__POINTER )(&(table_type[(t__1HFH)])));
-      lab_type__3LIH=(__UINTEGER_32)(t__1HFH |  1);
-      next__0LIH=((__POINTER )(NULL));
-      result__2LIH=((__POINTER *)ptr_table__1LIH)[ 0];
-      if ((result__2LIH == (void *)NULL)) {
-        result__2LIH=new_lab__MRJ(lab_type__3LIH);
-        next__0LIH=(void *)((unsigned long)result__2LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LIH)));
-        ((__POINTER *)next__0LIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__1LIH)[ 0]=next__0LIH;
-      } else {
-        next__0LIH=((__POINTER *)result__2LIH)[ 0];
-        if ((next__0LIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2LIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4LIH <<  1)) <=  4096)) {
-            next__0LIH=(void *)((unsigned long)result__2LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LIH)));
-          } else {
-            next__0LIH=new_lab__MRJ(lab_type__3LIH);
-          };
-          ((__POINTER *)next__0LIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1LIH)[ 0]=next__0LIH;
-        } else {
-          ((__POINTER *)result__2LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0LIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2LIH=next__0LIH;
-        };
-      };
-      ptr__QKJ=result__2LIH;
-    };
-    result__PKJ=((__FAST_ARRAYoITM_CODEo *)ptr__QKJ);
-    *(result__PKJ) = *(FAST_ARRAYoITM_CODEo__);
-  };
-  Self__53T=((__FAST_ARRAYoITM_CODEo *)result__PKJ);
-  if ((Self__53T->parent_arrayed_collection__RTF.capacity__0XT < new_count__UVI)) {
-    Self__53T->parent_arrayed_collection__RTF.storage__FYT=create__HTQB(new_count__UVI);
-    Self__53T->parent_arrayed_collection__RTF.capacity__0XT=new_count__UVI;
-  };
-  Self__53T->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(-  1);
-  return(result__PKJ);
+    typ_id__3KJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__0KJ);
+    if ((typ_id__3KJ == (__INTEGER)(-  1))) {
+      a__GJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0KJ + a__GJGH) & (__UINTEGER_32)(~ a__GJGH));
+      ptr_table__WNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__VNJH=((__POINTER )(NULL));
+      result__XNJH=((__POINTER *)ptr_table__WNJH)[ 0];
+      if ((result__XNJH == (void *)NULL)) {
+        result__XNJH=new_lab__URJ(new_size__HJGH);
+        next__VNJH=(void *)((unsigned long)result__XNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJGH)));
+        ((__POINTER *)next__VNJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WNJH)[ 0]=next__VNJH;
+      } else {
+        next__VNJH=((__POINTER *)result__XNJH)[ 0];
+        if ((next__VNJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XNJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__HJGH <<  1)) <=  4096)) {
+            next__VNJH=(void *)((unsigned long)result__XNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HJGH)));
+          } else {
+            next__VNJH=new_lab__URJ(new_size__HJGH);
+          };
+          ((__POINTER *)next__VNJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WNJH)[ 0]=next__VNJH;
+        } else {
+          ((__POINTER *)result__XNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XNJH=next__VNJH;
+        };
+      };
+      ptr__YKJ=result__XNJH;
+    } else {
+      t__LJGH=((__UINTEGER_32 )typ_id__3KJ);
+      a__KJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4NJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0KJ + a__KJGH) & (__UINTEGER_32)(~ a__KJGH));
+      ptr_table__1NJH=((__POINTER )(&(table_type[(t__LJGH)])));
+      lab_type__3NJH=(__UINTEGER_32)(t__LJGH |  1);
+      next__0NJH=((__POINTER )(NULL));
+      result__2NJH=((__POINTER *)ptr_table__1NJH)[ 0];
+      if ((result__2NJH == (void *)NULL)) {
+        result__2NJH=new_lab__URJ(lab_type__3NJH);
+        next__0NJH=(void *)((unsigned long)result__2NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NJH)));
+        ((__POINTER *)next__0NJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1NJH)[ 0]=next__0NJH;
+      } else {
+        next__0NJH=((__POINTER *)result__2NJH)[ 0];
+        if ((next__0NJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2NJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4NJH <<  1)) <=  4096)) {
+            next__0NJH=(void *)((unsigned long)result__2NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NJH)));
+          } else {
+            next__0NJH=new_lab__URJ(lab_type__3NJH);
+          };
+          ((__POINTER *)next__0NJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1NJH)[ 0]=next__0NJH;
+        } else {
+          ((__POINTER *)result__2NJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0NJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2NJH=next__0NJH;
+        };
+      };
+      ptr__YKJ=result__2NJH;
+    };
+    result__XKJ=((__FAST_ARRAYoITM_CODEo *)ptr__YKJ);
+    *(result__XKJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__H4T=((__FAST_ARRAYoITM_CODEo *)result__XKJ);
+  if ((Self__H4T->parent_arrayed_collection__ZTF.capacity__CYT < new_count__2VI)) {
+    Self__H4T->parent_arrayed_collection__ZTF.storage__NYT=create__PTQB(new_count__2VI);
+    Self__H4T->parent_arrayed_collection__ZTF.capacity__CYT=new_count__2VI;
+  };
+  Self__H4T->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(-  1);
+  return(result__XKJ);
 }
 
-static void add_last__U5U(__FAST_ARRAYoITM_CODEo *Self__V5U,void *element__W5U)
+static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U)
 // ({FAST_ARRAYoITM_CODEo},{NULLxITM_LISTxITM_LDOTSxITM_PROTOTYPExITM_LIST_IDFxITM_WRITE_VALUExITM_WRITE_CASTxITM_READxITM_WRITE_CODExITM_OPERATORxITM_READ_ARG1xITM_READ_ARG2xITM_EXPRESSIONxITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRINGxITM_RESULT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__X5U,__tmp__1AV,__tmp__EEEC,Self__NHVD;
-  __BOOLEAN __tmp__FAV;
-  void **__tmp__0AV,**new__QDEC;
-  new_capacity__X5U= 0;
-  if (((__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1) <= (__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.capacity__0XT -  1))) {
-    Self__V5U->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1);
-    __tmp__FAV=TRUE__;
+  __INTEGER new_capacity__55U,__tmp__DBV,__tmp__MEEC,Self__VHVD;
+  __BOOLEAN __tmp__NAV;
+  void **__tmp__CBV,**new__YDEC;
+  new_capacity__55U= 0;
+  if (((__INTEGER)(Self__35U->parent_arrayed_collection__ZTF.upper__EIL +  1) <= (__INTEGER)(Self__35U->parent_arrayed_collection__ZTF.capacity__CYT -  1))) {
+    Self__35U->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(Self__35U->parent_arrayed_collection__ZTF.upper__EIL +  1);
+    __tmp__NAV=TRUE__;
   } else {
-    __tmp__FAV=FALSE__;
-  };
-  if ((! __tmp__FAV)) {
-    if ((Self__V5U->parent_arrayed_collection__RTF.capacity__0XT ==  0)) {
-      Self__V5U->parent_arrayed_collection__RTF.storage__FYT=create__HTQB( 2);
-      Self__V5U->parent_arrayed_collection__RTF.capacity__0XT= 2;
-      Self__V5U->parent_arrayed_collection__RTF.upper__2HL= 0;
-    } else {
-      new_capacity__X5U=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.capacity__0XT <<  1);
-      __tmp__0AV=Self__V5U->parent_arrayed_collection__RTF.storage__FYT;
-      __tmp__1AV=Self__V5U->parent_arrayed_collection__RTF.capacity__0XT;
-      new__QDEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__0AV)),((__UINTEGER_32 )(__INTEGER)(__tmp__1AV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__X5U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__EEEC=(__INTEGER)(new_capacity__X5U -  1);
-      Self__NHVD=__tmp__1AV;
-      while ((Self__NHVD <= __tmp__EEEC)) {
-        new__QDEC[Self__NHVD]=NULL;
-        Self__NHVD=(__INTEGER)(Self__NHVD +  1);
-      };
-      Self__V5U->parent_arrayed_collection__RTF.storage__FYT=new__QDEC;
-      Self__V5U->parent_arrayed_collection__RTF.capacity__0XT=new_capacity__X5U;
-      Self__V5U->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(Self__V5U->parent_arrayed_collection__RTF.upper__2HL +  1);
-    };
-  };
-  ((void **)Self__V5U->parent_arrayed_collection__RTF.storage__FYT)[Self__V5U->parent_arrayed_collection__RTF.upper__2HL]=element__W5U;
+    __tmp__NAV=FALSE__;
+  };
+  if ((! __tmp__NAV)) {
+    if ((Self__35U->parent_arrayed_collection__ZTF.capacity__CYT ==  0)) {
+      Self__35U->parent_arrayed_collection__ZTF.storage__NYT=create__PTQB( 2);
+      Self__35U->parent_arrayed_collection__ZTF.capacity__CYT= 2;
+      Self__35U->parent_arrayed_collection__ZTF.upper__EIL= 0;
+    } else {
+      new_capacity__55U=(__INTEGER)(Self__35U->parent_arrayed_collection__ZTF.capacity__CYT <<  1);
+      __tmp__CBV=Self__35U->parent_arrayed_collection__ZTF.storage__NYT;
+      __tmp__DBV=Self__35U->parent_arrayed_collection__ZTF.capacity__CYT;
+      new__YDEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__CBV)),((__UINTEGER_32 )(__INTEGER)(__tmp__DBV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__55U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__MEEC=(__INTEGER)(new_capacity__55U -  1);
+      Self__VHVD=__tmp__DBV;
+      while ((Self__VHVD <= __tmp__MEEC)) {
+        new__YDEC[Self__VHVD]=NULL;
+        Self__VHVD=(__INTEGER)(Self__VHVD +  1);
+      };
+      Self__35U->parent_arrayed_collection__ZTF.storage__NYT=new__YDEC;
+      Self__35U->parent_arrayed_collection__ZTF.capacity__CYT=new_capacity__55U;
+      Self__35U->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(Self__35U->parent_arrayed_collection__ZTF.upper__EIL +  1);
+    };
+  };
+  ((void **)Self__35U->parent_arrayed_collection__ZTF.storage__NYT)[Self__35U->parent_arrayed_collection__ZTF.upper__EIL]=element__45U;
 }
 
-static void* copy__Q5H(void *tmp__S5H)
+static void* copy__Y5H(void *tmp__05H)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__RXT,other_upper__QXT,Self__X3JC;
-  void *result__U5H;
-  __FAST_ARRAYoITM_CODEo *Self__OXT;
-  void **__tmp__IYT,**__tmp__KYT,**Self__ERCC;
-  result__U5H=create_with_capacity__SVI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.upper__2HL +  1));
-  Self__OXT=((__FAST_ARRAYoITM_CODEo *)result__U5H);
-  new_capacity__RXT= 0;
-  other_upper__QXT=((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.upper__2HL;
-  if ((other_upper__QXT >=  0)) {
-    new_capacity__RXT=(__INTEGER)(other_upper__QXT +  1);
-    if ((Self__OXT->parent_arrayed_collection__RTF.capacity__0XT < new_capacity__RXT)) {
-      Self__OXT->parent_arrayed_collection__RTF.storage__FYT=create__HTQB(new_capacity__RXT);
-      Self__OXT->parent_arrayed_collection__RTF.capacity__0XT=new_capacity__RXT;
-    };
-    __tmp__IYT=Self__OXT->parent_arrayed_collection__RTF.storage__FYT;
-    __tmp__KYT=((__FAST_ARRAYoITM_CODEo *)tmp__S5H)->parent_arrayed_collection__RTF.storage__FYT;
-    Self__ERCC=((void **)__tmp__IYT);
-    Self__X3JC=other_upper__QXT;
-    while ((Self__X3JC >=  0)) {
-      Self__ERCC[Self__X3JC]=((void **)__tmp__KYT)[Self__X3JC];
-      Self__X3JC=(__INTEGER)(Self__X3JC -  1);
-    };
-  };
-  Self__OXT->parent_arrayed_collection__RTF.upper__2HL=other_upper__QXT;
-  free__YVI(tmp__S5H);
-  return(result__U5H);
+  __INTEGER new_capacity__ZXT,other_upper__YXT,Self__53JC;
+  void *result__25H;
+  __FAST_ARRAYoITM_CODEo *Self__WXT;
+  void **__tmp__QYT,**__tmp__SYT,**Self__MRCC;
+  result__25H=create_with_capacity__0VI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__05H)->parent_arrayed_collection__ZTF.upper__EIL +  1));
+  Self__WXT=((__FAST_ARRAYoITM_CODEo *)result__25H);
+  new_capacity__ZXT= 0;
+  other_upper__YXT=((__FAST_ARRAYoITM_CODEo *)tmp__05H)->parent_arrayed_collection__ZTF.upper__EIL;
+  if ((other_upper__YXT >=  0)) {
+    new_capacity__ZXT=(__INTEGER)(other_upper__YXT +  1);
+    if ((Self__WXT->parent_arrayed_collection__ZTF.capacity__CYT < new_capacity__ZXT)) {
+      Self__WXT->parent_arrayed_collection__ZTF.storage__NYT=create__PTQB(new_capacity__ZXT);
+      Self__WXT->parent_arrayed_collection__ZTF.capacity__CYT=new_capacity__ZXT;
+    };
+    __tmp__QYT=Self__WXT->parent_arrayed_collection__ZTF.storage__NYT;
+    __tmp__SYT=((__FAST_ARRAYoITM_CODEo *)tmp__05H)->parent_arrayed_collection__ZTF.storage__NYT;
+    Self__MRCC=((void **)__tmp__QYT);
+    Self__53JC=other_upper__YXT;
+    while ((Self__53JC >=  0)) {
+      Self__MRCC[Self__53JC]=((void **)__tmp__SYT)[Self__53JC];
+      Self__53JC=(__INTEGER)(Self__53JC -  1);
+    };
+  };
+  Self__WXT->parent_arrayed_collection__ZTF.upper__EIL=other_upper__YXT;
+  free__AWI(tmp__05H);
+  return(result__25H);
 }
 
-static __BOOLEAN fast_has__3DV(__HASHED_SEToSTRING_CONSTANTo *Self__4DV,void *e__5DV)
+static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__YSGH;
-  __INTEGER result__XSGH,__tmp__ZSGH,Self__0SGH;
-  void *node__JEV;
-  Self__YSGH=((__STRING_CONSTANT *)e__5DV);
-  result__XSGH= 0;
-  __tmp__ZSGH=Self__YSGH->count__DD;
-  Self__0SGH= 1;
-  while ((Self__0SGH <= __tmp__ZSGH)) {
-    result__XSGH=(__INTEGER)((__INTEGER)( 5 * result__XSGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YSGH->storage__VQO)[(__INTEGER)(Self__0SGH -  1)])));
-    Self__0SGH=(__INTEGER)(Self__0SGH +  1);
-  };
-  if ((result__XSGH <  0)) {
-    result__XSGH=(__INTEGER)(~ result__XSGH);
-  };
-  node__JEV=((void **)Self__4DV->buckets__PEV)[(__INTEGER)(result__XSGH % Self__4DV->capacity__KIT)];
-  while ((! (((void *)node__JEV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__JEV)->item__1EV == (void *)e__5DV)))) {
-    node__JEV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__JEV)->next__GFV;
-  };
-  return(((void *)node__JEV != (void *)NULL));
+  __STRING_CONSTANT *Self__TUHH;
+  __INTEGER result__SUHH,__tmp__UUHH,Self__VUHH;
+  void *node__REV;
+  Self__TUHH=((__STRING_CONSTANT *)e__HEV);
+  result__SUHH= 0;
+  __tmp__UUHH=Self__TUHH->count__DD;
+  Self__VUHH= 1;
+  while ((Self__VUHH <= __tmp__UUHH)) {
+    result__SUHH=(__INTEGER)((__INTEGER)( 5 * result__SUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__TUHH->storage__3QO)[(__INTEGER)(Self__VUHH -  1)])));
+    Self__VUHH=(__INTEGER)(Self__VUHH +  1);
+  };
+  if ((result__SUHH <  0)) {
+    result__SUHH=(__INTEGER)(~ result__SUHH);
+  };
+  node__REV=((void **)Self__GEV->buckets__XEV)[(__INTEGER)(result__SUHH % Self__GEV->capacity__SIT)];
+  while ((! (((void *)node__REV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__REV)->item__DFV == (void *)e__HEV)))) {
+    node__REV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__REV)->next__OFV;
+  };
+  return(((void *)node__REV != (void *)NULL));
 }
 
-static void restore_context__TDL()
+static void restore_context__1DL()
 // () VoidNo recursive, No inlinable.
 {
-  __INTEGER beg__VDL,end__2SGH,len__4SGH,__tmp__5SGH,__tmp__BTGH;
-  __INTEGER Self__CTGH,__tmp__HEL,__tmp__KEL,Self__ZMM;
-  __STRING *Self__ATGH;
-  beg__VDL= 0;
-  if (is_shorter__5Y) {
-    ((__STRING *)token__GCD)->count__WFC= 0;
-    beg__VDL=(__INTEGER)(old_position__DRI + old_short_derive__LRI);
-    Self__ATGH=((__STRING *)output_code__SI);
-    end__2SGH=(__INTEGER)((__INTEGER)(position__SBC + short_derive__BCC) -  1);
-    len__4SGH=(__INTEGER)((__INTEGER)(end__2SGH - beg__VDL) +  1);
-    if ((len__4SGH >  0)) {
-      __tmp__5SGH=(__INTEGER)(end__2SGH +  1);
-      __tmp__BTGH=Self__ATGH->count__WFC;
-      Self__CTGH=__tmp__5SGH;
-      while ((Self__CTGH <= __tmp__BTGH)) {
-        ((__CHARACTER *)Self__ATGH->storage__BCS)[(__INTEGER)((__INTEGER)(Self__CTGH - len__4SGH) -  1)]=((__CHARACTER *)Self__ATGH->storage__BCS)[(__INTEGER)(Self__CTGH -  1)];
-        Self__CTGH=(__INTEGER)(Self__CTGH +  1);
-      };
-      Self__ATGH->count__WFC=(__INTEGER)(Self__ATGH->count__WFC - len__4SGH);
-    };
-    __tmp__HEL=old_position__DRI;
-    __tmp__KEL=(__INTEGER)(position__SBC -  1);
-    Self__ZMM=__tmp__HEL;
-    while ((Self__ZMM <= __tmp__KEL)) {
-      add_last__ZLT(token__GCD,((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(Self__ZMM -  1)]);
-      Self__ZMM=(__INTEGER)(Self__ZMM +  1);
-    };
-    insert_string__to__0XU(output_code__SI,token__GCD,beg__VDL);
-    short_derive__BCC=old_short_derive__LRI;
-  };
-  position__SBC=old_position__DRI;
-  pos_cur__VBC=old_pos_cur__FRI;
-  pos_line__WBC=old_pos_line__HRI;
-  pos_col__XBC=old_pos_col__JRI;
+  __INTEGER beg__3DL,end__XUHH,len__ZUHH,__tmp__0UHH,__tmp__2UHH;
+  __INTEGER Self__3UHH,__tmp__PEL,__tmp__SEL,Self__BNM;
+  __STRING *Self__1UHH;
+  beg__3DL= 0;
+  if (is_shorter__FZ) {
+    ((__STRING *)token__OCD)->count__4FC= 0;
+    beg__3DL=(__INTEGER)(old_position__LRI + old_short_derive__TRI);
+    Self__1UHH=((__STRING *)output_code__SI);
+    end__XUHH=(__INTEGER)((__INTEGER)(position__0BC + short_derive__JCC) -  1);
+    len__ZUHH=(__INTEGER)((__INTEGER)(end__XUHH - beg__3DL) +  1);
+    if ((len__ZUHH >  0)) {
+      __tmp__0UHH=(__INTEGER)(end__XUHH +  1);
+      __tmp__2UHH=Self__1UHH->count__4FC;
+      Self__3UHH=__tmp__0UHH;
+      while ((Self__3UHH <= __tmp__2UHH)) {
+        ((__CHARACTER *)Self__1UHH->storage__JCS)[(__INTEGER)((__INTEGER)(Self__3UHH - len__ZUHH) -  1)]=((__CHARACTER *)Self__1UHH->storage__JCS)[(__INTEGER)(Self__3UHH -  1)];
+        Self__3UHH=(__INTEGER)(Self__3UHH +  1);
+      };
+      Self__1UHH->count__4FC=(__INTEGER)(Self__1UHH->count__4FC - len__ZUHH);
+    };
+    __tmp__PEL=old_position__LRI;
+    __tmp__SEL=(__INTEGER)(position__0BC -  1);
+    Self__BNM=__tmp__PEL;
+    while ((Self__BNM <= __tmp__SEL)) {
+      add_last__BMT(token__OCD,((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(Self__BNM -  1)]);
+      Self__BNM=(__INTEGER)(Self__BNM +  1);
+    };
+    insert_string__to__CYU(output_code__SI,token__OCD,beg__3DL);
+    short_derive__JCC=old_short_derive__TRI;
+  };
+  position__0BC=old_position__LRI;
+  pos_cur__3BC=old_pos_cur__NRI;
+  pos_line__4BC=old_pos_line__PRI;
+  pos_col__5BC=old_pos_col__RRI;
 }
 
-static void* read_expr_message__0VL(__PARSER *Self__1VL)
+static void* read_expr_message__CWL(__PARSER *Self__DWL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__Y1L,*result__3VL;
-  __POSITION pos__YFYG,p__3AAB,pos__AGYG;
-  __ITM_OLD *result__RTGB;
-  __POINTER ptr__STGB,ptr_table__CMIH,next__BMIH,result__DMIH;
-  __POINTER ptr_table__HMIH,next__GMIH,result__IMIH;
-  __INTEGER typ_id__XTGB;
-  __UINTEGER_32 sz__UTGB,a__NEFH,new_size__OEFH,t__SEFH,a__REFH;
-  __UINTEGER_32 new_size__KMIH,lab_type__JMIH;
-  __BOOLEAN result__AMIH,result__LMIH;
-  __CHARACTER result__MMIH;
-  result__Y1L=NULL;
-  result__AMIH=read_word__QPF((&__string_8));
-  if (is_shorter__5Y) {
-    if (result__AMIH) {
+  void *result__A2L,*result__FWL;
+  __POSITION pos__HDZG,p__FBAB,pos__PDZG;
+  __ITM_OLD *result__ZTGB;
+  __POINTER ptr__0TGB,ptr_table__COJH,next__BOJH,result__DOJH;
+  __POINTER ptr_table__HOJH,next__GOJH,result__IOJH;
+  __INTEGER typ_id__5TGB;
+  __UINTEGER_32 sz__2TGB,a__3FGH,new_size__4FGH,t__CGGH,a__BGGH;
+  __UINTEGER_32 new_size__KOJH,lab_type__JOJH;
+  __BOOLEAN result__AOJH,result__LOJH;
+  __CHARACTER result__MOJH;
+  result__A2L=NULL;
+  result__AOJH=read_word__YPF((&__string_8));
+  if (is_shorter__FZ) {
+    if (result__AOJH) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
-        short__token__to__LBD((&__string_120),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       } else {
-        short__token__to__LBD((&__string_119),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
+        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
       };
     };
   };
-  if (result__AMIH) {
-    if (((void *)read_expr__44I(Self__1VL) == (void *)NULL)) {
-      pos__YFYG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_324));
-      put_position__UOG(pos__YFYG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if (result__AOJH) {
+    if (((void *)read_expr__G5I(Self__DWL) == (void *)NULL)) {
+      pos__HDZG=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_323));
+      put_position__2OG(pos__HDZG);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    p__3AAB=current_position__JXF();
-    result__RTGB=NULL;
-    ptr__STGB=((__POINTER )(NULL));
-    typ_id__XTGB= 0;
-    sz__UTGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
-    if ((sz__UTGB ==  0)) {
-      result__RTGB=ITM_OLD__;
-    } else {
-      typ_id__XTGB=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__UTGB);
-      if ((typ_id__XTGB == (__INTEGER)(-  1))) {
-        a__NEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__OEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTGB + a__NEFH) & (__UINTEGER_32)(~ a__NEFH));
-        ptr_table__CMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__BMIH=((__POINTER )(NULL));
-        result__DMIH=((__POINTER *)ptr_table__CMIH)[ 0];
-        if ((result__DMIH == (void *)NULL)) {
-          result__DMIH=new_lab__MRJ(new_size__OEFH);
-          next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OEFH)));
-          ((__POINTER *)next__BMIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__CMIH)[ 0]=next__BMIH;
-        } else {
-          next__BMIH=((__POINTER *)result__DMIH)[ 0];
-          if ((next__BMIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OEFH <<  1)) <=  4096)) {
-              next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OEFH)));
+    p__FBAB=current_position__RXF();
+    result__ZTGB=NULL;
+    ptr__0TGB=((__POINTER )(NULL));
+    typ_id__5TGB= 0;
+    sz__2TGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__2TGB ==  0)) {
+      result__ZTGB=ITM_OLD__;
+    } else {
+      typ_id__5TGB=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__2TGB);
+      if ((typ_id__5TGB == (__INTEGER)(-  1))) {
+        a__3FGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4FGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2TGB + a__3FGH) & (__UINTEGER_32)(~ a__3FGH));
+        ptr_table__COJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4FGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__BOJH=((__POINTER )(NULL));
+        result__DOJH=((__POINTER *)ptr_table__COJH)[ 0];
+        if ((result__DOJH == (void *)NULL)) {
+          result__DOJH=new_lab__URJ(new_size__4FGH);
+          next__BOJH=(void *)((unsigned long)result__DOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FGH)));
+          ((__POINTER *)next__BOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__COJH)[ 0]=next__BOJH;
+        } else {
+          next__BOJH=((__POINTER *)result__DOJH)[ 0];
+          if ((next__BOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DOJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4FGH <<  1)) <=  4096)) {
+              next__BOJH=(void *)((unsigned long)result__DOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FGH)));
             } else {
-              next__BMIH=new_lab__MRJ(new_size__OEFH);
-            };
-            ((__POINTER *)next__BMIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CMIH)[ 0]=next__BMIH;
-          } else {
-            ((__POINTER *)result__DMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DMIH=next__BMIH;
-          };
-        };
-        ptr__STGB=result__DMIH;
-      } else {
-        t__SEFH=((__UINTEGER_32 )typ_id__XTGB);
-        a__REFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__KMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTGB + a__REFH) & (__UINTEGER_32)(~ a__REFH));
-        ptr_table__HMIH=((__POINTER )(&(table_type[(t__SEFH)])));
-        lab_type__JMIH=(__UINTEGER_32)(t__SEFH |  1);
-        next__GMIH=((__POINTER )(NULL));
-        result__IMIH=((__POINTER *)ptr_table__HMIH)[ 0];
-        if ((result__IMIH == (void *)NULL)) {
-          result__IMIH=new_lab__MRJ(lab_type__JMIH);
-          next__GMIH=(void *)((unsigned long)result__IMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KMIH)));
-          ((__POINTER *)next__GMIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HMIH)[ 0]=next__GMIH;
-        } else {
-          next__GMIH=((__POINTER *)result__IMIH)[ 0];
-          if ((next__GMIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KMIH <<  1)) <=  4096)) {
-              next__GMIH=(void *)((unsigned long)result__IMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KMIH)));
+              next__BOJH=new_lab__URJ(new_size__4FGH);
+            };
+            ((__POINTER *)next__BOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__COJH)[ 0]=next__BOJH;
+          } else {
+            ((__POINTER *)result__DOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DOJH=next__BOJH;
+          };
+        };
+        ptr__0TGB=result__DOJH;
+      } else {
+        t__CGGH=((__UINTEGER_32 )typ_id__5TGB);
+        a__BGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2TGB + a__BGGH) & (__UINTEGER_32)(~ a__BGGH));
+        ptr_table__HOJH=((__POINTER )(&(table_type[(t__CGGH)])));
+        lab_type__JOJH=(__UINTEGER_32)(t__CGGH |  1);
+        next__GOJH=((__POINTER )(NULL));
+        result__IOJH=((__POINTER *)ptr_table__HOJH)[ 0];
+        if ((result__IOJH == (void *)NULL)) {
+          result__IOJH=new_lab__URJ(lab_type__JOJH);
+          next__GOJH=(void *)((unsigned long)result__IOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOJH)));
+          ((__POINTER *)next__GOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HOJH)[ 0]=next__GOJH;
+        } else {
+          next__GOJH=((__POINTER *)result__IOJH)[ 0];
+          if ((next__GOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IOJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KOJH <<  1)) <=  4096)) {
+              next__GOJH=(void *)((unsigned long)result__IOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOJH)));
             } else {
-              next__GMIH=new_lab__MRJ(lab_type__JMIH);
+              next__GOJH=new_lab__URJ(lab_type__JOJH);
             };
-            ((__POINTER *)next__GMIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HMIH)[ 0]=next__GMIH;
+            ((__POINTER *)next__GOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HOJH)[ 0]=next__GOJH;
           } else {
-            ((__POINTER *)result__IMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IMIH=next__GMIH;
+            ((__POINTER *)result__IOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IOJH=next__GOJH;
           };
         };
-        ptr__STGB=result__IMIH;
+        ptr__0TGB=result__IOJH;
       };
-      result__RTGB=((__ITM_OLD *)ptr__STGB);
-      *(result__RTGB) = *(ITM_OLD__);
+      result__ZTGB=((__ITM_OLD *)ptr__0TGB);
+      *(result__ZTGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__RTGB)->parent_itm_code__N2L.parent_itm_object__XDE.position__NDJ=p__3AAB;
-    result__Y1L=result__RTGB;
+    ((__ITM_OLD *)result__ZTGB)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ=p__FBAB;
+    result__A2L=result__ZTGB;
   } else {
-    result__Y1L=read_expr_primary__I4M(Self__1VL);
-    if (((void *)result__Y1L == (void *)NULL)) {
-      result__Y1L=read_send_msg__M4N(Self__1VL,NULL);
+    result__A2L=read_expr_primary__Q4M(Self__DWL);
+    if (((void *)result__A2L == (void *)NULL)) {
+      result__A2L=read_send_msg__U4N(Self__DWL,NULL);
     };
   };
-  result__3VL=result__Y1L;
-  if (((void *)result__Y1L != (void *)NULL)) {
-    while_do__IZM:
+  result__FWL=result__A2L;
+  if (((void *)result__A2L != (void *)NULL)) {
+    while_do__QZM:
     {
-      result__LMIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__LMIH=FALSE__;
+      result__LOJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__LOJH=FALSE__;
       } else {
-        result__MMIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__MMIH=((__CHARACTER )(( 0)));
+        result__MOJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__MOJH=((__CHARACTER )(( 0)));
         } else {
-          result__MMIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__MOJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__MMIH == '.')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__LMIH=TRUE__;
+        if ((result__MOJH == '.')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__LOJH=TRUE__;
         };
       };
-      if (result__LMIH) {
-        result__3VL=read_send_msg__M4N(Self__1VL,result__3VL);
-        if (((void *)result__3VL == (void *)NULL)) {
-          pos__AGYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_325));
-          put_position__UOG(pos__AGYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (result__LOJH) {
+        result__FWL=read_send_msg__U4N(Self__DWL,result__FWL);
+        if (((void *)result__FWL == (void *)NULL)) {
+          pos__PDZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_324));
+          put_position__2OG(pos__PDZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__IZM;
+        goto while_do__QZM;
       };
     };
   };
-  return(result__3VL);
+  return(result__FWL);
 }
 
-static void free__YVI(void *tmp__0VI)
+static void free__AWI(void *tmp__CWI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__Y5T,__tmp__ABU,__tmp__E4DC,Self__QBVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__W5T;
-  __BOOLEAN __tmp__HAU;
-  void **__tmp__5AU,**new__Q3DC;
-  ((__FAST_ARRAYoITM_CODEo *)tmp__0VI)->parent_arrayed_collection__RTF.upper__2HL=(__INTEGER)(-  1);
-  Self__W5T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-  new_capacity__Y5T= 0;
-  if (((__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1) <= (__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.capacity__05T -  1))) {
-    Self__W5T->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1);
-    __tmp__HAU=TRUE__;
+  __INTEGER new_capacity__AAU,__tmp__IBU,__tmp__M4DC,Self__YBVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__45T;
+  __BOOLEAN __tmp__PAU;
+  void **__tmp__HBU,**new__Y3DC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__CWI)->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(-  1);
+  Self__45T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+  new_capacity__AAU= 0;
+  if (((__INTEGER)(Self__45T->parent_arrayed_collection__I4H.upper__QWT +  1) <= (__INTEGER)(Self__45T->parent_arrayed_collection__I4H.capacity__CAU -  1))) {
+    Self__45T->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__45T->parent_arrayed_collection__I4H.upper__QWT +  1);
+    __tmp__PAU=TRUE__;
   } else {
-    __tmp__HAU=FALSE__;
-  };
-  if ((! __tmp__HAU)) {
-    if ((Self__W5T->parent_arrayed_collection__A4H.capacity__05T ==  0)) {
-      Self__W5T->parent_arrayed_collection__A4H.storage__WAU=create__U1PB( 2);
-      Self__W5T->parent_arrayed_collection__A4H.capacity__05T= 2;
-      Self__W5T->parent_arrayed_collection__A4H.upper__IWT= 0;
-    } else {
-      new_capacity__Y5T=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.capacity__05T <<  1);
-      __tmp__5AU=Self__W5T->parent_arrayed_collection__A4H.storage__WAU;
-      __tmp__ABU=Self__W5T->parent_arrayed_collection__A4H.capacity__05T;
-      new__Q3DC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__5AU)),((__UINTEGER_32 )(__INTEGER)(__tmp__ABU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Y5T * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__E4DC=(__INTEGER)(new_capacity__Y5T -  1);
-      Self__QBVD=__tmp__ABU;
-      while ((Self__QBVD <= __tmp__E4DC)) {
-        new__Q3DC[Self__QBVD]=NULL;
-        Self__QBVD=(__INTEGER)(Self__QBVD +  1);
-      };
-      Self__W5T->parent_arrayed_collection__A4H.storage__WAU=new__Q3DC;
-      Self__W5T->parent_arrayed_collection__A4H.capacity__05T=new_capacity__Y5T;
-      Self__W5T->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__W5T->parent_arrayed_collection__A4H.upper__IWT +  1);
-    };
-  };
-  ((void **)Self__W5T->parent_arrayed_collection__A4H.storage__WAU)[Self__W5T->parent_arrayed_collection__A4H.upper__IWT]=tmp__0VI;
+    __tmp__PAU=FALSE__;
+  };
+  if ((! __tmp__PAU)) {
+    if ((Self__45T->parent_arrayed_collection__I4H.capacity__CAU ==  0)) {
+      Self__45T->parent_arrayed_collection__I4H.storage__4AU=create__21PB( 2);
+      Self__45T->parent_arrayed_collection__I4H.capacity__CAU= 2;
+      Self__45T->parent_arrayed_collection__I4H.upper__QWT= 0;
+    } else {
+      new_capacity__AAU=(__INTEGER)(Self__45T->parent_arrayed_collection__I4H.capacity__CAU <<  1);
+      __tmp__HBU=Self__45T->parent_arrayed_collection__I4H.storage__4AU;
+      __tmp__IBU=Self__45T->parent_arrayed_collection__I4H.capacity__CAU;
+      new__Y3DC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__HBU)),((__UINTEGER_32 )(__INTEGER)(__tmp__IBU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AAU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__M4DC=(__INTEGER)(new_capacity__AAU -  1);
+      Self__YBVD=__tmp__IBU;
+      while ((Self__YBVD <= __tmp__M4DC)) {
+        new__Y3DC[Self__YBVD]=NULL;
+        Self__YBVD=(__INTEGER)(Self__YBVD +  1);
+      };
+      Self__45T->parent_arrayed_collection__I4H.storage__4AU=new__Y3DC;
+      Self__45T->parent_arrayed_collection__I4H.capacity__CAU=new_capacity__AAU;
+      Self__45T->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__45T->parent_arrayed_collection__I4H.upper__QWT +  1);
+    };
+  };
+  ((void **)Self__45T->parent_arrayed_collection__I4H.storage__4AU)[Self__45T->parent_arrayed_collection__I4H.upper__QWT]=tmp__CWI;
 }
 
-static void display_raw__TLIC(__ITM_TYPE_MULTI *Self__ULIC,void *buffer__VLIC)
+static void display_raw__1LIC(__ITM_TYPE_MULTI *Self__2LIC,void *buffer__3LIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __INTEGER __tmp__2LIC,Self__XKRC;
-  void *__tmp__DMIC,*__tmp__GMIC;
-  __ITM_TYPE_STYLE *Self__EADH,*Self__GADH;
-  __FAST_ARRAYoITM_TYPE_MONOo *Self__BFFH;
-  __tmp__2LIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP)->parent_arrayed_collection__ZXC.upper__KIV -  1);
-  Self__XKRC= 0;
-  while ((Self__XKRC <= __tmp__2LIC)) {
-    __tmp__DMIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP)->parent_arrayed_collection__ZXC.storage__RMV)[Self__XKRC];
-    switch (((struct ___OBJ *)__tmp__DMIC)->__id) {
+  __INTEGER __tmp__EMIC,Self__5KRC;
+  void *__tmp__LMIC,*__tmp__OMIC;
+  __ITM_TYPE_STYLE *Self__PAEH,*Self__RAEH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__RGGH;
+  __tmp__EMIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2LIC->list_type__IKP)->parent_arrayed_collection__BYC.upper__SIV -  1);
+  Self__5KRC= 0;
+  while ((Self__5KRC <= __tmp__EMIC)) {
+    __tmp__LMIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2LIC->list_type__IKP)->parent_arrayed_collection__BYC.storage__ZMV)[Self__5KRC];
+    switch (((struct ___OBJ *)__tmp__LMIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__BOS(buffer__VLIC,((__ITM_TYPE_PARAMETER *)__tmp__DMIC)->parent_itm_type__3DE.name__KYP);
+      append__JOS(buffer__3LIC,((__ITM_TYPE_PARAMETER *)__tmp__LMIC)->parent_itm_type__FEE.name__SYP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__BOS(buffer__VLIC,((__ITM_TYPE_SIMPLE *)__tmp__DMIC)->name__KYP);
+      append__JOS(buffer__3LIC,((__ITM_TYPE_SIMPLE *)__tmp__LMIC)->name__SYP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__OGPD(__tmp__DMIC,buffer__VLIC);
+      append_in__WGPD(__tmp__LMIC,buffer__3LIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__SHPD(__tmp__DMIC,buffer__VLIC);
+      append_in__0HPD(__tmp__LMIC,buffer__3LIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      Self__EADH=((__ITM_TYPE_STYLE *)__tmp__DMIC);
-      if (((void *)Self__EADH->style__TYP != (void *)NULL)) {
-        append__BOS(buffer__VLIC,Self__EADH->style__TYP);
-        add_last__ZLT(buffer__VLIC,' ');
+      Self__PAEH=((__ITM_TYPE_STYLE *)__tmp__LMIC);
+      if (((void *)Self__PAEH->style__1YP != (void *)NULL)) {
+        append__JOS(buffer__3LIC,Self__PAEH->style__1YP);
+        add_last__BMT(buffer__3LIC,' ');
       };
-      append__BOS(buffer__VLIC,Self__EADH->parent_itm_type_simple__BSN.name__KYP);
+      append__JOS(buffer__3LIC,Self__PAEH->parent_itm_type_simple__JSN.name__SYP);
     } break;
     };
-    add_last__ZLT(buffer__VLIC,',');
-    Self__XKRC=(__INTEGER)(Self__XKRC +  1);
+    add_last__BMT(buffer__3LIC,',');
+    Self__5KRC=(__INTEGER)(Self__5KRC +  1);
   };
-  Self__BFFH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ULIC->list_type__AKP);
-  __tmp__GMIC=((void **)Self__BFFH->parent_arrayed_collection__ZXC.storage__RMV)[Self__BFFH->parent_arrayed_collection__ZXC.upper__KIV];
-  switch (((struct ___OBJ *)__tmp__GMIC)->__id) {
+  Self__RGGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__2LIC->list_type__IKP);
+  __tmp__OMIC=((void **)Self__RGGH->parent_arrayed_collection__BYC.storage__ZMV)[Self__RGGH->parent_arrayed_collection__BYC.upper__SIV];
+  switch (((struct ___OBJ *)__tmp__OMIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__BOS(buffer__VLIC,((__ITM_TYPE_PARAMETER *)__tmp__GMIC)->parent_itm_type__3DE.name__KYP);
+    append__JOS(buffer__3LIC,((__ITM_TYPE_PARAMETER *)__tmp__OMIC)->parent_itm_type__FEE.name__SYP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__BOS(buffer__VLIC,((__ITM_TYPE_SIMPLE *)__tmp__GMIC)->name__KYP);
+    append__JOS(buffer__3LIC,((__ITM_TYPE_SIMPLE *)__tmp__OMIC)->name__SYP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__OGPD(__tmp__GMIC,buffer__VLIC);
+    append_in__WGPD(__tmp__OMIC,buffer__3LIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__SHPD(__tmp__GMIC,buffer__VLIC);
+    append_in__0HPD(__tmp__OMIC,buffer__3LIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    Self__GADH=((__ITM_TYPE_STYLE *)__tmp__GMIC);
-    if (((void *)Self__GADH->style__TYP != (void *)NULL)) {
-      append__BOS(buffer__VLIC,Self__GADH->style__TYP);
-      add_last__ZLT(buffer__VLIC,' ');
+    Self__RAEH=((__ITM_TYPE_STYLE *)__tmp__OMIC);
+    if (((void *)Self__RAEH->style__1YP != (void *)NULL)) {
+      append__JOS(buffer__3LIC,Self__RAEH->style__1YP);
+      add_last__BMT(buffer__3LIC,' ');
     };
-    append__BOS(buffer__VLIC,Self__GADH->parent_itm_type_simple__BSN.name__KYP);
+    append__JOS(buffer__3LIC,Self__RAEH->parent_itm_type_simple__JSN.name__SYP);
   } break;
   };
 }
 
-static void put__to__like__PBFG(void *tok__RBFG,void *buf__SBFG,void *key__TBFG)
+static void put__to__like__H1FG(void *tok__J1FG,void *buf__K1FG,void *key__L1FG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__5BFG,Self__ANGG;
-  void *lst__UBFG;
-  lst__UBFG=fast_reference_at__GB5D(short_dico__QD,key__TBFG);
-  if (((void *)lst__UBFG != (void *)NULL)) {
-    __tmp__5BFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__UBFG)->parent_linked_collection__LD.upper__5CD;
-    Self__ANGG= 1;
-    while ((Self__ANGG <= __tmp__5BFG)) {
-      if (((void *)item__Y0ND(lst__UBFG,Self__ANGG) == (void *)NULL)) {
-        append__BOS(buf__SBFG,tok__RBFG);
-      } else {
-        append__BOS(buf__SBFG,item__Y0ND(lst__UBFG,Self__ANGG));
+  __INTEGER __tmp__21FG,Self__SMHG;
+  void *lst__M1FG;
+  lst__M1FG=NULL;
+  if (((void *)key__L1FG != (void *)NULL)) {
+    lst__M1FG=fast_reference_at__EHNE(short_dico__QD,key__L1FG);
+    if (((void *)lst__M1FG != (void *)NULL)) {
+      __tmp__21FG=((__LINKED_LISToSTRING_CONSTANTo *)lst__M1FG)->parent_linked_collection__LD.upper__HDD;
+      Self__SMHG= 1;
+      while ((Self__SMHG <= __tmp__21FG)) {
+        if (((void *)item__A1ND(lst__M1FG,Self__SMHG) == (void *)NULL)) {
+          append__JOS(buf__K1FG,tok__J1FG);
+        } else {
+          append__JOS(buf__K1FG,item__A1ND(lst__M1FG,Self__SMHG));
+        };
+        Self__SMHG=(__INTEGER)(Self__SMHG +  1);
       };
-      Self__ANGG=(__INTEGER)(Self__ANGG +  1);
     };
   };
 }
 
-static void put__to__like__FCCG(void *tok__HCCG,void *buf__ICCG,void *key__JCCG)
+static void put__to__like__E0CG(void *tok__G0CG,void *buf__H0CG,void *key__I0CG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__VCCG,Self__DRFG;
-  void *lst__KCCG;
-  lst__KCCG=fast_reference_at__GB5D(short_dico__QD,key__JCCG);
-  if (((void *)lst__KCCG != (void *)NULL)) {
-    __tmp__VCCG=((__LINKED_LISToSTRING_CONSTANTo *)lst__KCCG)->parent_linked_collection__LD.upper__5CD;
-    Self__DRFG= 1;
-    while ((Self__DRFG <= __tmp__VCCG)) {
-      if (((void *)item__Y0ND(lst__KCCG,Self__DRFG) == (void *)NULL)) {
-        append__BOS(buf__ICCG,tok__HCCG);
-      } else {
-        append__BOS(buf__ICCG,item__Y0ND(lst__KCCG,Self__DRFG));
+  __INTEGER __tmp__Z0CG,Self__KFHG;
+  void *lst__J0CG;
+  lst__J0CG=NULL;
+  if (((void *)key__I0CG != (void *)NULL)) {
+    lst__J0CG=fast_reference_at__EHNE(short_dico__QD,key__I0CG);
+    if (((void *)lst__J0CG != (void *)NULL)) {
+      __tmp__Z0CG=((__LINKED_LISToSTRING_CONSTANTo *)lst__J0CG)->parent_linked_collection__LD.upper__HDD;
+      Self__KFHG= 1;
+      while ((Self__KFHG <= __tmp__Z0CG)) {
+        if (((void *)item__A1ND(lst__J0CG,Self__KFHG) == (void *)NULL)) {
+          append__JOS(buf__H0CG,tok__G0CG);
+        } else {
+          append__JOS(buf__H0CG,item__A1ND(lst__J0CG,Self__KFHG));
+        };
+        Self__KFHG=(__INTEGER)(Self__KFHG +  1);
       };
-      Self__DRFG=(__INTEGER)(Self__DRFG +  1);
     };
   };
 }
 
-static void put__to__like__YBEG(void *tok__0BEG,void *buf__1BEG)
+static void put__to__like__10EG(void *tok__30EG,void *buf__40EG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__ICEG,Self__E5FG;
-  void *lst__3BEG;
-  lst__3BEG=fast_reference_at__GB5D(short_dico__QD,(&__string_133));
-  if (((void *)lst__3BEG != (void *)NULL)) {
-    __tmp__ICEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__3BEG)->parent_linked_collection__LD.upper__5CD;
-    Self__E5FG= 1;
-    while ((Self__E5FG <= __tmp__ICEG)) {
-      if (((void *)item__Y0ND(lst__3BEG,Self__E5FG) == (void *)NULL)) {
-        append__BOS(buf__1BEG,tok__0BEG);
-      } else {
-        append__BOS(buf__1BEG,item__Y0ND(lst__3BEG,Self__E5FG));
+  __INTEGER __tmp__Q1EG,Self__3JHG;
+  void *lst__A1EG;
+  lst__A1EG=NULL;
+  if (((void *)(&__string_133) != (void *)NULL)) {
+    lst__A1EG=fast_reference_at__EHNE(short_dico__QD,(&__string_133));
+    if (((void *)lst__A1EG != (void *)NULL)) {
+      __tmp__Q1EG=((__LINKED_LISToSTRING_CONSTANTo *)lst__A1EG)->parent_linked_collection__LD.upper__HDD;
+      Self__3JHG= 1;
+      while ((Self__3JHG <= __tmp__Q1EG)) {
+        if (((void *)item__A1ND(lst__A1EG,Self__3JHG) == (void *)NULL)) {
+          append__JOS(buf__40EG,tok__30EG);
+        } else {
+          append__JOS(buf__40EG,item__A1ND(lst__A1EG,Self__3JHG));
+        };
+        Self__3JHG=(__INTEGER)(Self__3JHG +  1);
       };
-      Self__E5FG=(__INTEGER)(Self__E5FG +  1);
     };
   };
 }
 
-static void put__to__like__EEEG(void *tok__GEEG,void *buf__HEEG,void *key__IEEG)
+static void put__to__like__O3EG(void *tok__Q3EG,void *buf__R3EG,void *key__S3EG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__UEEG,Self__V5FG;
-  void *lst__JEEG;
-  lst__JEEG=fast_reference_at__GB5D(short_dico__QD,key__IEEG);
-  if (((void *)lst__JEEG != (void *)NULL)) {
-    __tmp__UEEG=((__LINKED_LISToSTRING_CONSTANTo *)lst__JEEG)->parent_linked_collection__LD.upper__5CD;
-    Self__V5FG= 1;
-    while ((Self__V5FG <= __tmp__UEEG)) {
-      if (((void *)item__Y0ND(lst__JEEG,Self__V5FG) == (void *)NULL)) {
-        append__BOS(buf__HEEG,tok__GEEG);
-      } else {
-        append__BOS(buf__HEEG,item__Y0ND(lst__JEEG,Self__V5FG));
+  __INTEGER __tmp__D4EG,Self__OKHG;
+  void *lst__T3EG;
+  lst__T3EG=NULL;
+  if (((void *)key__S3EG != (void *)NULL)) {
+    lst__T3EG=fast_reference_at__EHNE(short_dico__QD,key__S3EG);
+    if (((void *)lst__T3EG != (void *)NULL)) {
+      __tmp__D4EG=((__LINKED_LISToSTRING_CONSTANTo *)lst__T3EG)->parent_linked_collection__LD.upper__HDD;
+      Self__OKHG= 1;
+      while ((Self__OKHG <= __tmp__D4EG)) {
+        if (((void *)item__A1ND(lst__T3EG,Self__OKHG) == (void *)NULL)) {
+          append__JOS(buf__R3EG,tok__Q3EG);
+        } else {
+          append__JOS(buf__R3EG,item__A1ND(lst__T3EG,Self__OKHG));
+        };
+        Self__OKHG=(__INTEGER)(Self__OKHG +  1);
       };
-      Self__V5FG=(__INTEGER)(Self__V5FG +  1);
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__CSJE(__CHARACTER Self__DSJE)
+static __BOOLEAN is_hexadecimal_digit__0NJE(__CHARACTER Self__1NJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __BOOLEAN result__FSJE,result__KADH,__tmp__NSJE,__tmp__2SJE;
-  __BOOLEAN result__IIOE;
-  result__FSJE=FALSE__;
-  result__KADH=FALSE__;
-  if ((((__INTEGER_8 )Self__DSJE) >= ((__INTEGER_8 )'0'))) {
-    result__KADH=(((__INTEGER_8 )Self__DSJE) <= ((__INTEGER_8 )'9'));
-  };
-  if (result__KADH) {
-    result__FSJE=TRUE__;
-    __tmp__NSJE=TRUE__;
+  __BOOLEAN result__3NJE,result__VAEH,__tmp__FOJE,__tmp__UOJE;
+  __BOOLEAN result__LEOE;
+  result__3NJE=FALSE__;
+  result__VAEH=FALSE__;
+  if ((((__INTEGER_8 )Self__1NJE) >= ((__INTEGER_8 )'0'))) {
+    result__VAEH=(((__INTEGER_8 )Self__1NJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__VAEH) {
+    result__3NJE=TRUE__;
+    __tmp__FOJE=TRUE__;
   } else {
-    __tmp__NSJE=FALSE__;
+    __tmp__FOJE=FALSE__;
   };
-  if (__tmp__NSJE) {
-    __tmp__2SJE=TRUE__;
+  if (__tmp__FOJE) {
+    __tmp__UOJE=TRUE__;
   } else {
-    result__IIOE=(((__INTEGER_8 )Self__DSJE) >= ((__INTEGER_8 )'a'));
-    if (result__IIOE) {
-      result__FSJE=(((__INTEGER_8 )Self__DSJE) <= ((__INTEGER_8 )'f'));
+    result__LEOE=(((__INTEGER_8 )Self__1NJE) >= ((__INTEGER_8 )'a'));
+    if (result__LEOE) {
+      result__3NJE=(((__INTEGER_8 )Self__1NJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__2SJE=result__IIOE;
+    __tmp__UOJE=result__LEOE;
   };
-  if ((! __tmp__2SJE)) {
-    if ((((__INTEGER_8 )Self__DSJE) >= ((__INTEGER_8 )'A'))) {
-      result__FSJE=(((__INTEGER_8 )Self__DSJE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__UOJE)) {
+    if ((((__INTEGER_8 )Self__1NJE) >= ((__INTEGER_8 )'A'))) {
+      result__3NJE=(((__INTEGER_8 )Self__1NJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__FSJE);
+  return(result__3NJE);
 }
 
-static void* read_constant__1QO()
+static void* read_constant__DRO()
 // () With resultNo recursive, No inlinable.
 {
-  void *result__4QO;
-  __INTEGER pos_old__P5O,typ_id__4PQ,typ_id__WQMB,old_pos__ACQ;
-  __INTEGER count__BCQ,typ_id__KSMB,typ_id__4TMB;
-  __POSITION pos__4MYG,__tmp__GRO,__tmp__YRO,pos__4NYG,pos__AOYG;
-  __POSITION __tmp__KSO,__tmp__1SO;
-  __ITM_REAL *result__YPQ;
-  __POINTER ptr__ZPQ,ptr_table__PMIH,next__OMIH,result__QMIH;
-  __POINTER ptr_table__UMIH,next__TMIH,result__VMIH,ptr__RQMB;
-  __POINTER ptr_table__ZMIH,next__YMIH,result__0MIH,ptr_table__4MIH;
-  __POINTER next__3MIH,result__5MIH,ptr__FSMB,ptr_table__DNIH;
-  __POINTER next__CNIH,result__ENIH,ptr_table__INIH,next__HNIH;
-  __POINTER result__JNIH,ptr__ZTMB,ptr_table__NNIH,next__MNIH;
-  __POINTER result__ONIH,ptr_table__SNIH,next__RNIH,result__TNIH;
-  __UINTEGER_32 sz__1PQ,a__FFFH,new_size__GFFH,t__KFFH,a__JFFH;
-  __UINTEGER_32 new_size__XMIH,lab_type__WMIH,sz__TQMB,a__NFFH;
-  __UINTEGER_32 new_size__OFFH,t__SFFH,a__RFFH,new_size__BNIH;
-  __UINTEGER_32 lab_type__ANIH,sz__HSMB,a__VFFH,new_size__WFFH,t__0FFH;
-  __UINTEGER_32 a__ZFFH,new_size__LNIH,lab_type__KNIH,sz__1TMB,a__3FFH;
-  __UINTEGER_32 new_size__4FFH,t__CGFH,a__BGFH,new_size__VNIH;
-  __UINTEGER_32 lab_type__UNIH;
-  __ITM_NUMBER *result__QQMB;
-  __ITM_CHARACTER *result__ESMB;
-  __ITM_STRING *result__YTMB;
-  __BOOLEAN result__O5O,result__RADH,__tmp__05O,result__2ADH,__tmp__UAP;
-  __BOOLEAN result__TBDH,result__4BDH,__tmp__BDP,result__ZCDH;
-  __BOOLEAN result__EDDH,__tmp__LRO,__tmp__3RO,result__BGP,__tmp__OSO;
-  __BOOLEAN result__5BQ,__tmp__LCQ,__tmp__KDQ,__tmp__LDQ;
-  __CHARACTER result__X35G,result__B45G,result__G45G,result__L45G;
-  __CHARACTER result__Q45G,result__V45G,result__045G,result__545G;
-  __CHARACTER result__E55G,result__J55G,result__O55G,result__T55G;
-  __CHARACTER result__Y55G,result__355G,result__CAAH,result__HAAH;
-  __CHARACTER result__MAAH,result__RAAH,result__WAAH,result__1AAH;
-  __CHARACTER result__FBAH,result__OBAH,result__TBAH,result__YBAH;
-  __CHARACTER result__3BAH,result__CCAH;
-  result__4QO=NULL;
-  result__O5O=FALSE__;
-  pos_old__P5O= 0;
-  if (read_space__3RD()) {
-    result__X35G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__X35G=((__CHARACTER )(( 0)));
-    } else {
-      result__X35G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-    };
-    result__RADH=FALSE__;
-    if ((((__INTEGER_8 )result__X35G) >= ((__INTEGER_8 )'0'))) {
-      result__RADH=(((__INTEGER_8 )result__X35G) <= ((__INTEGER_8 )'9'));
-    };
-    __tmp__05O=result__RADH;
+  void *result__GRO;
+  __INTEGER pos_old__X5O,typ_id__GQQ,typ_id__4QMB,old_pos__ICQ;
+  __INTEGER count__JCQ,typ_id__SSMB,typ_id__GUMB;
+  __POSITION pos__NKZG,__tmp__ORO,__tmp__ASO,pos__NLZG,pos__PLZG;
+  __POSITION __tmp__SSO,__tmp__DTO;
+  __ITM_REAL *result__AQQ;
+  __POINTER ptr__BQQ,ptr_table__POJH,next__OOJH,result__QOJH;
+  __POINTER ptr_table__UOJH,next__TOJH,result__VOJH,ptr__ZQMB;
+  __POINTER ptr_table__ZOJH,next__YOJH,result__0OJH,ptr_table__4OJH;
+  __POINTER next__3OJH,result__5OJH,ptr__NSMB,ptr_table__DPJH;
+  __POINTER next__CPJH,result__EPJH,ptr_table__IPJH,next__HPJH;
+  __POINTER result__JPJH,ptr__BUMB,ptr_table__NPJH,next__MPJH;
+  __POINTER result__OPJH,ptr_table__SPJH,next__RPJH,result__TPJH;
+  __UINTEGER_32 sz__DQQ,a__VGGH,new_size__WGGH,t__0GGH,a__ZGGH;
+  __UINTEGER_32 new_size__XOJH,lab_type__WOJH,sz__1QMB,a__3GGH;
+  __UINTEGER_32 new_size__4GGH,t__CHGH,a__BHGH,new_size__BPJH;
+  __UINTEGER_32 lab_type__APJH,sz__PSMB,a__FHGH,new_size__GHGH,t__KHGH;
+  __UINTEGER_32 a__JHGH,new_size__LPJH,lab_type__KPJH,sz__DUMB,a__NHGH;
+  __UINTEGER_32 new_size__OHGH,t__SHGH,a__RHGH,new_size__VPJH;
+  __UINTEGER_32 lab_type__UPJH;
+  __ITM_NUMBER *result__YQMB;
+  __ITM_CHARACTER *result__MSMB;
+  __ITM_STRING *result__AUMB;
+  __BOOLEAN result__W5O,result__3AEH,__tmp__CAP,result__JBEH,__tmp__2AP;
+  __BOOLEAN result__BCEH,result__NCEH,__tmp__JDP,result__JDEH;
+  __BOOLEAN result__VDEH,__tmp__TRO,__tmp__FSO,result__JGP,__tmp__WSO;
+  __BOOLEAN result__HCQ,__tmp__TCQ,__tmp__SDQ,__tmp__TDQ;
+  __CHARACTER result__42AH,result__I3AH,result__N3AH,result__S3AH;
+  __CHARACTER result__X3AH,result__23AH,result__B4AH,result__G4AH;
+  __CHARACTER result__L4AH,result__Q4AH,result__V4AH,result__04AH;
+  __CHARACTER result__54AH,result__E5AH,result__J5AH,result__O5AH;
+  __CHARACTER result__T5AH,result__Y5AH,result__35AH,result__CABH;
+  __CHARACTER result__MABH,result__VABH,result__0ABH,result__5ABH;
+  __CHARACTER result__EBBH,result__JBBH;
+  result__GRO=NULL;
+  result__W5O=FALSE__;
+  pos_old__X5O= 0;
+  if (read_space__FSD()) {
+    result__42AH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__42AH=((__CHARACTER )(( 0)));
+    } else {
+      result__42AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    };
+    result__3AEH=FALSE__;
+    if ((((__INTEGER_8 )result__42AH) >= ((__INTEGER_8 )'0'))) {
+      result__3AEH=(((__INTEGER_8 )result__42AH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__CAP=result__3AEH;
   } else {
-    __tmp__05O=FALSE__;
+    __tmp__CAP=FALSE__;
   };
-  if (__tmp__05O) {
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    result__B45G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__B45G=((__CHARACTER )(( 0)));
+  if (__tmp__CAP) {
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    result__I3AH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__I3AH=((__CHARACTER )(( 0)));
     } else {
-      result__B45G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__I3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    add_last__ZLT(string_tmp__VH,result__B45G);
-    pos_old__P5O=position__SBC;
-    position__SBC=(__INTEGER)(position__SBC +  1);
-    while_do__RA0D:
+    add_last__BMT(string_tmp__VH,result__I3AH);
+    pos_old__X5O=position__0BC;
+    position__0BC=(__INTEGER)(position__0BC +  1);
+    while_do__MA0D:
     {
-      result__G45G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__G45G=((__CHARACTER )(( 0)));
+      result__N3AH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__N3AH=((__CHARACTER )(( 0)));
       } else {
-        result__G45G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__N3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      result__2ADH=FALSE__;
-      if ((((__INTEGER_8 )result__G45G) >= ((__INTEGER_8 )'0'))) {
-        result__2ADH=(((__INTEGER_8 )result__G45G) <= ((__INTEGER_8 )'9'));
+      result__JBEH=FALSE__;
+      if ((((__INTEGER_8 )result__N3AH) >= ((__INTEGER_8 )'0'))) {
+        result__JBEH=(((__INTEGER_8 )result__N3AH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__2ADH) {
-        __tmp__UAP=TRUE__;
+      if (result__JBEH) {
+        __tmp__2AP=TRUE__;
       } else {
-        result__L45G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__L45G=((__CHARACTER )(( 0)));
+        result__S3AH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__S3AH=((__CHARACTER )(( 0)));
         } else {
-          result__L45G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__S3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        __tmp__UAP=(result__L45G == '_');
+        __tmp__2AP=(result__S3AH == '_');
       };
-      if (__tmp__UAP) {
-        result__Q45G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__Q45G=((__CHARACTER )(( 0)));
+      if (__tmp__2AP) {
+        result__X3AH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__X3AH=((__CHARACTER )(( 0)));
         } else {
-          result__Q45G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__X3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__Q45G != '_')) {
-          result__V45G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__V45G=((__CHARACTER )(( 0)));
+        if ((result__X3AH != '_')) {
+          result__23AH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__23AH=((__CHARACTER )(( 0)));
           } else {
-            result__V45G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__23AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__V45G);
+          add_last__BMT(string_tmp__VH,result__23AH);
         };
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        goto while_do__RA0D;
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        goto while_do__MA0D;
       };
     };
-    result__045G='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__045G=((__CHARACTER )(( 0)));
+    result__B4AH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__B4AH=((__CHARACTER )(( 0)));
     } else {
-      result__045G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__B4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__045G == '.')) {
-      add_last__ZLT(string_tmp__VH,'.');
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__545G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__545G=((__CHARACTER )(( 0)));
+    if ((result__B4AH == '.')) {
+      add_last__BMT(string_tmp__VH,'.');
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__G4AH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__G4AH=((__CHARACTER )(( 0)));
       } else {
-        result__545G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__G4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      result__TBDH=FALSE__;
-      if ((((__INTEGER_8 )result__545G) >= ((__INTEGER_8 )'0'))) {
-        result__TBDH=(((__INTEGER_8 )result__545G) <= ((__INTEGER_8 )'9'));
+      result__BCEH=FALSE__;
+      if ((((__INTEGER_8 )result__G4AH) >= ((__INTEGER_8 )'0'))) {
+        result__BCEH=(((__INTEGER_8 )result__G4AH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__TBDH) {
-        result__O5O=TRUE__;
-        result__E55G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__E55G=((__CHARACTER )(( 0)));
+      if (result__BCEH) {
+        result__W5O=TRUE__;
+        result__L4AH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__L4AH=((__CHARACTER )(( 0)));
         } else {
-          result__E55G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__L4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        add_last__ZLT(string_tmp__VH,result__E55G);
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        while_do__4OPE:
+        add_last__BMT(string_tmp__VH,result__L4AH);
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        while_do__UMPE:
         {
-          result__J55G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__J55G=((__CHARACTER )(( 0)));
+          result__Q4AH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__Q4AH=((__CHARACTER )(( 0)));
           } else {
-            result__J55G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__Q4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          result__4BDH=FALSE__;
-          if ((((__INTEGER_8 )result__J55G) >= ((__INTEGER_8 )'0'))) {
-            result__4BDH=(((__INTEGER_8 )result__J55G) <= ((__INTEGER_8 )'9'));
+          result__NCEH=FALSE__;
+          if ((((__INTEGER_8 )result__Q4AH) >= ((__INTEGER_8 )'0'))) {
+            result__NCEH=(((__INTEGER_8 )result__Q4AH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__4BDH) {
-            result__O55G='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__O55G=((__CHARACTER )(( 0)));
+          if (result__NCEH) {
+            result__V4AH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__V4AH=((__CHARACTER )(( 0)));
             } else {
-              result__O55G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__V4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            add_last__ZLT(string_tmp__VH,result__O55G);
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            goto while_do__4OPE;
+            add_last__BMT(string_tmp__VH,result__V4AH);
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            goto while_do__UMPE;
           };
         };
       };
-      result__T55G='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__T55G=((__CHARACTER )(( 0)));
+      result__04AH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__04AH=((__CHARACTER )(( 0)));
       } else {
-        result__T55G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__04AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__T55G == 'E')) {
-        result__O5O=TRUE__;
-        add_last__ZLT(string_tmp__VH,'E');
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__Y55G='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__Y55G=((__CHARACTER )(( 0)));
+      if ((result__04AH == 'E')) {
+        result__W5O=TRUE__;
+        add_last__BMT(string_tmp__VH,'E');
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__54AH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__54AH=((__CHARACTER )(( 0)));
         } else {
-          result__Y55G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__54AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__Y55G == '+')) {
-          __tmp__BDP=TRUE__;
+        if ((result__54AH == '+')) {
+          __tmp__JDP=TRUE__;
         } else {
-          result__355G='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__355G=((__CHARACTER )(( 0)));
+          result__E5AH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__E5AH=((__CHARACTER )(( 0)));
           } else {
-            result__355G=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__E5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__BDP=(result__355G == '-');
+          __tmp__JDP=(result__E5AH == '-');
         };
-        if (__tmp__BDP) {
-          result__CAAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__CAAH=((__CHARACTER )(( 0)));
+        if (__tmp__JDP) {
+          result__J5AH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__J5AH=((__CHARACTER )(( 0)));
           } else {
-            result__CAAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__J5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__CAAH);
-          position__SBC=(__INTEGER)(position__SBC +  1);
+          add_last__BMT(string_tmp__VH,result__J5AH);
+          position__0BC=(__INTEGER)(position__0BC +  1);
         };
-        result__HAAH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__HAAH=((__CHARACTER )(( 0)));
+        result__O5AH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__O5AH=((__CHARACTER )(( 0)));
         } else {
-          result__HAAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__O5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        result__ZCDH=FALSE__;
-        if ((((__INTEGER_8 )result__HAAH) >= ((__INTEGER_8 )'0'))) {
-          result__ZCDH=(((__INTEGER_8 )result__HAAH) <= ((__INTEGER_8 )'9'));
+        result__JDEH=FALSE__;
+        if ((((__INTEGER_8 )result__O5AH) >= ((__INTEGER_8 )'0'))) {
+          result__JDEH=(((__INTEGER_8 )result__O5AH) <= ((__INTEGER_8 )'9'));
         };
-        if (result__ZCDH) {
-          result__MAAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__MAAH=((__CHARACTER )(( 0)));
+        if (result__JDEH) {
+          result__T5AH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__T5AH=((__CHARACTER )(( 0)));
           } else {
-            result__MAAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__T5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__MAAH);
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          while_do__RARE:
+          add_last__BMT(string_tmp__VH,result__T5AH);
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          while_do__JARE:
           {
-            result__RAAH='\0';
-            if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-              result__RAAH=((__CHARACTER )(( 0)));
+            result__Y5AH='\0';
+            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+              result__Y5AH=((__CHARACTER )(( 0)));
             } else {
-              result__RAAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+              result__Y5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
             };
-            result__EDDH=FALSE__;
-            if ((((__INTEGER_8 )result__RAAH) >= ((__INTEGER_8 )'0'))) {
-              result__EDDH=(((__INTEGER_8 )result__RAAH) <= ((__INTEGER_8 )'9'));
+            result__VDEH=FALSE__;
+            if ((((__INTEGER_8 )result__Y5AH) >= ((__INTEGER_8 )'0'))) {
+              result__VDEH=(((__INTEGER_8 )result__Y5AH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__EDDH) {
-              result__WAAH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__WAAH=((__CHARACTER )(( 0)));
+            if (result__VDEH) {
+              result__35AH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__35AH=((__CHARACTER )(( 0)));
               } else {
-                result__WAAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__35AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              add_last__ZLT(string_tmp__VH,result__WAAH);
-              position__SBC=(__INTEGER)(position__SBC +  1);
-              goto while_do__RARE;
+              add_last__BMT(string_tmp__VH,result__35AH);
+              position__0BC=(__INTEGER)(position__0BC +  1);
+              goto while_do__JARE;
             };
           };
         } else {
-          pos__4MYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_326));
-          put_position__UOG(pos__4MYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+          pos__NKZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_325));
+          put_position__2OG(pos__NKZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__O5O) {
-      get__IWB(string_tmp__VH);
+    if (result__W5O) {
+      get__QWB(string_tmp__VH);
     } else {
-      position__SBC=pos_old__P5O;
+      position__0BC=pos_old__X5O;
     };
   };
-  if (result__O5O) {
-    short__token__to__LBD((&__string_121),pos_old__P5O,position__SBC);
+  if (result__W5O) {
+    short__token__to__TBD((&__string_121),pos_old__X5O,position__0BC);
   };
-  if (result__O5O) {
-    __tmp__GRO=current_position__JXF();
-    result__YPQ=NULL;
-    ptr__ZPQ=((__POINTER )(NULL));
-    typ_id__4PQ= 0;
-    sz__1PQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
-    if ((sz__1PQ ==  0)) {
-      result__YPQ=ITM_REAL__;
+  if (result__W5O) {
+    __tmp__ORO=current_position__RXF();
+    result__AQQ=NULL;
+    ptr__BQQ=((__POINTER )(NULL));
+    typ_id__GQQ= 0;
+    sz__DQQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__DQQ ==  0)) {
+      result__AQQ=ITM_REAL__;
     } else {
-      typ_id__4PQ=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1PQ);
-      if ((typ_id__4PQ == (__INTEGER)(-  1))) {
-        a__FFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__GFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1PQ + a__FFFH) & (__UINTEGER_32)(~ a__FFFH));
-        ptr_table__PMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__OMIH=((__POINTER )(NULL));
-        result__QMIH=((__POINTER *)ptr_table__PMIH)[ 0];
-        if ((result__QMIH == (void *)NULL)) {
-          result__QMIH=new_lab__MRJ(new_size__GFFH);
-          next__OMIH=(void *)((unsigned long)result__QMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFFH)));
-          ((__POINTER *)next__OMIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PMIH)[ 0]=next__OMIH;
+      typ_id__GQQ=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__DQQ);
+      if ((typ_id__GQQ == (__INTEGER)(-  1))) {
+        a__VGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WGGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DQQ + a__VGGH) & (__UINTEGER_32)(~ a__VGGH));
+        ptr_table__POJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WGGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__OOJH=((__POINTER )(NULL));
+        result__QOJH=((__POINTER *)ptr_table__POJH)[ 0];
+        if ((result__QOJH == (void *)NULL)) {
+          result__QOJH=new_lab__URJ(new_size__WGGH);
+          next__OOJH=(void *)((unsigned long)result__QOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGGH)));
+          ((__POINTER *)next__OOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__POJH)[ 0]=next__OOJH;
         } else {
-          next__OMIH=((__POINTER *)result__QMIH)[ 0];
-          if ((next__OMIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GFFH <<  1)) <=  4096)) {
-              next__OMIH=(void *)((unsigned long)result__QMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFFH)));
+          next__OOJH=((__POINTER *)result__QOJH)[ 0];
+          if ((next__OOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QOJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__WGGH <<  1)) <=  4096)) {
+              next__OOJH=(void *)((unsigned long)result__QOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WGGH)));
             } else {
-              next__OMIH=new_lab__MRJ(new_size__GFFH);
-            };
-            ((__POINTER *)next__OMIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PMIH)[ 0]=next__OMIH;
-          } else {
-            ((__POINTER *)result__QMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QMIH=next__OMIH;
-          };
-        };
-        ptr__ZPQ=result__QMIH;
-      } else {
-        t__KFFH=((__UINTEGER_32 )typ_id__4PQ);
-        a__JFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__XMIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1PQ + a__JFFH) & (__UINTEGER_32)(~ a__JFFH));
-        ptr_table__UMIH=((__POINTER )(&(table_type[(t__KFFH)])));
-        lab_type__WMIH=(__UINTEGER_32)(t__KFFH |  1);
-        next__TMIH=((__POINTER )(NULL));
-        result__VMIH=((__POINTER *)ptr_table__UMIH)[ 0];
-        if ((result__VMIH == (void *)NULL)) {
-          result__VMIH=new_lab__MRJ(lab_type__WMIH);
-          next__TMIH=(void *)((unsigned long)result__VMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMIH)));
-          ((__POINTER *)next__TMIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UMIH)[ 0]=next__TMIH;
-        } else {
-          next__TMIH=((__POINTER *)result__VMIH)[ 0];
-          if ((next__TMIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VMIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__XMIH <<  1)) <=  4096)) {
-              next__TMIH=(void *)((unsigned long)result__VMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMIH)));
+              next__OOJH=new_lab__URJ(new_size__WGGH);
+            };
+            ((__POINTER *)next__OOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__POJH)[ 0]=next__OOJH;
+          } else {
+            ((__POINTER *)result__QOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QOJH=next__OOJH;
+          };
+        };
+        ptr__BQQ=result__QOJH;
+      } else {
+        t__0GGH=((__UINTEGER_32 )typ_id__GQQ);
+        a__ZGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DQQ + a__ZGGH) & (__UINTEGER_32)(~ a__ZGGH));
+        ptr_table__UOJH=((__POINTER )(&(table_type[(t__0GGH)])));
+        lab_type__WOJH=(__UINTEGER_32)(t__0GGH |  1);
+        next__TOJH=((__POINTER )(NULL));
+        result__VOJH=((__POINTER *)ptr_table__UOJH)[ 0];
+        if ((result__VOJH == (void *)NULL)) {
+          result__VOJH=new_lab__URJ(lab_type__WOJH);
+          next__TOJH=(void *)((unsigned long)result__VOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOJH)));
+          ((__POINTER *)next__TOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UOJH)[ 0]=next__TOJH;
+        } else {
+          next__TOJH=((__POINTER *)result__VOJH)[ 0];
+          if ((next__TOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VOJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__XOJH <<  1)) <=  4096)) {
+              next__TOJH=(void *)((unsigned long)result__VOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOJH)));
             } else {
-              next__TMIH=new_lab__MRJ(lab_type__WMIH);
+              next__TOJH=new_lab__URJ(lab_type__WOJH);
             };
-            ((__POINTER *)next__TMIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UMIH)[ 0]=next__TMIH;
+            ((__POINTER *)next__TOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UOJH)[ 0]=next__TOJH;
           } else {
-            ((__POINTER *)result__VMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VMIH=next__TMIH;
+            ((__POINTER *)result__VOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VOJH=next__TOJH;
           };
         };
-        ptr__ZPQ=result__VMIH;
+        ptr__BQQ=result__VOJH;
       };
-      result__YPQ=((__ITM_REAL *)ptr__ZPQ);
-      *(result__YPQ) = *(ITM_REAL__);
+      result__AQQ=((__ITM_REAL *)ptr__BQQ);
+      *(result__AQQ) = *(ITM_REAL__);
     };
-    ((__ITM_REAL *)result__YPQ)->parent_itm_constant__FRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__GRO;
-    result__4QO=result__YPQ;
-    __tmp__LRO=TRUE__;
+    ((__ITM_REAL *)result__AQQ)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__ORO;
+    result__GRO=result__AQQ;
+    __tmp__TRO=TRUE__;
   } else {
-    __tmp__LRO=FALSE__;
+    __tmp__TRO=FALSE__;
   };
-  if (__tmp__LRO) {
-    __tmp__3RO=TRUE__;
+  if (__tmp__TRO) {
+    __tmp__FSO=TRUE__;
   } else {
-    result__BGP=read_integer__A2P();
-    if (result__BGP) {
-      __tmp__YRO=current_position__JXF();
-      result__QQMB=NULL;
-      ptr__RQMB=((__POINTER )(NULL));
-      typ_id__WQMB= 0;
-      sz__TQMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
-      if ((sz__TQMB ==  0)) {
-        result__QQMB=ITM_NUMBER__;
-      } else {
-        typ_id__WQMB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__TQMB);
-        if ((typ_id__WQMB == (__INTEGER)(-  1))) {
-          a__NFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__OFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQMB + a__NFFH) & (__UINTEGER_32)(~ a__NFFH));
-          ptr_table__ZMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__YMIH=((__POINTER )(NULL));
-          result__0MIH=((__POINTER *)ptr_table__ZMIH)[ 0];
-          if ((result__0MIH == (void *)NULL)) {
-            result__0MIH=new_lab__MRJ(new_size__OFFH);
-            next__YMIH=(void *)((unsigned long)result__0MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFFH)));
-            ((__POINTER *)next__YMIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZMIH)[ 0]=next__YMIH;
-          } else {
-            next__YMIH=((__POINTER *)result__0MIH)[ 0];
-            if ((next__YMIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0MIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OFFH <<  1)) <=  4096)) {
-                next__YMIH=(void *)((unsigned long)result__0MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OFFH)));
+    result__JGP=read_integer__I2P();
+    if (result__JGP) {
+      __tmp__ASO=current_position__RXF();
+      result__YQMB=NULL;
+      ptr__ZQMB=((__POINTER )(NULL));
+      typ_id__4QMB= 0;
+      sz__1QMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__1QMB ==  0)) {
+        result__YQMB=ITM_NUMBER__;
+      } else {
+        typ_id__4QMB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__1QMB);
+        if ((typ_id__4QMB == (__INTEGER)(-  1))) {
+          a__3GGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4GGH=(__UINTEGER_32)((__UINTEGER_32)(sz__1QMB + a__3GGH) & (__UINTEGER_32)(~ a__3GGH));
+          ptr_table__ZOJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4GGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__YOJH=((__POINTER )(NULL));
+          result__0OJH=((__POINTER *)ptr_table__ZOJH)[ 0];
+          if ((result__0OJH == (void *)NULL)) {
+            result__0OJH=new_lab__URJ(new_size__4GGH);
+            next__YOJH=(void *)((unsigned long)result__0OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GGH)));
+            ((__POINTER *)next__YOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
+          } else {
+            next__YOJH=((__POINTER *)result__0OJH)[ 0];
+            if ((next__YOJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0OJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4GGH <<  1)) <=  4096)) {
+                next__YOJH=(void *)((unsigned long)result__0OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4GGH)));
               } else {
-                next__YMIH=new_lab__MRJ(new_size__OFFH);
+                next__YOJH=new_lab__URJ(new_size__4GGH);
               };
-              ((__POINTER *)next__YMIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZMIH)[ 0]=next__YMIH;
+              ((__POINTER *)next__YOJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
             } else {
-              ((__POINTER *)result__0MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__0MIH=next__YMIH;
-            };
-          };
-          ptr__RQMB=result__0MIH;
-        } else {
-          t__SFFH=((__UINTEGER_32 )typ_id__WQMB);
-          a__RFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__BNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TQMB + a__RFFH) & (__UINTEGER_32)(~ a__RFFH));
-          ptr_table__4MIH=((__POINTER )(&(table_type[(t__SFFH)])));
-          lab_type__ANIH=(__UINTEGER_32)(t__SFFH |  1);
-          next__3MIH=((__POINTER )(NULL));
-          result__5MIH=((__POINTER *)ptr_table__4MIH)[ 0];
-          if ((result__5MIH == (void *)NULL)) {
-            result__5MIH=new_lab__MRJ(lab_type__ANIH);
-            next__3MIH=(void *)((unsigned long)result__5MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNIH)));
-            ((__POINTER *)next__3MIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__4MIH)[ 0]=next__3MIH;
-          } else {
-            next__3MIH=((__POINTER *)result__5MIH)[ 0];
-            if ((next__3MIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5MIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BNIH <<  1)) <=  4096)) {
-                next__3MIH=(void *)((unsigned long)result__5MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNIH)));
+              ((__POINTER *)result__0OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0OJH=next__YOJH;
+            };
+          };
+          ptr__ZQMB=result__0OJH;
+        } else {
+          t__CHGH=((__UINTEGER_32 )typ_id__4QMB);
+          a__BHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1QMB + a__BHGH) & (__UINTEGER_32)(~ a__BHGH));
+          ptr_table__4OJH=((__POINTER )(&(table_type[(t__CHGH)])));
+          lab_type__APJH=(__UINTEGER_32)(t__CHGH |  1);
+          next__3OJH=((__POINTER )(NULL));
+          result__5OJH=((__POINTER *)ptr_table__4OJH)[ 0];
+          if ((result__5OJH == (void *)NULL)) {
+            result__5OJH=new_lab__URJ(lab_type__APJH);
+            next__3OJH=(void *)((unsigned long)result__5OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPJH)));
+            ((__POINTER *)next__3OJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4OJH)[ 0]=next__3OJH;
+          } else {
+            next__3OJH=((__POINTER *)result__5OJH)[ 0];
+            if ((next__3OJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5OJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BPJH <<  1)) <=  4096)) {
+                next__3OJH=(void *)((unsigned long)result__5OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPJH)));
               } else {
-                next__3MIH=new_lab__MRJ(lab_type__ANIH);
+                next__3OJH=new_lab__URJ(lab_type__APJH);
               };
-              ((__POINTER *)next__3MIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4MIH)[ 0]=next__3MIH;
+              ((__POINTER *)next__3OJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4OJH)[ 0]=next__3OJH;
             } else {
-              ((__POINTER *)result__5MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3MIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5MIH=next__3MIH;
+              ((__POINTER *)result__5OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5OJH=next__3OJH;
             };
           };
-          ptr__RQMB=result__5MIH;
+          ptr__ZQMB=result__5OJH;
         };
-        result__QQMB=((__ITM_NUMBER *)ptr__RQMB);
-        *(result__QQMB) = *(ITM_NUMBER__);
+        result__YQMB=((__ITM_NUMBER *)ptr__ZQMB);
+        *(result__YQMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__QQMB)->parent_itm_constant__XRO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__YRO;
-      result__4QO=result__QQMB;
+      ((__ITM_NUMBER *)result__YQMB)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__ASO;
+      result__GRO=result__YQMB;
     };
-    __tmp__3RO=result__BGP;
+    __tmp__FSO=result__JGP;
   };
-  if (__tmp__3RO) {
-    __tmp__OSO=TRUE__;
+  if (__tmp__FSO) {
+    __tmp__WSO=TRUE__;
   } else {
-    result__5BQ=FALSE__;
-    old_pos__ACQ= 0;
-    count__BCQ= 0;
-    if (read_space__3RD()) {
-      result__1AAH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__1AAH=((__CHARACTER )(( 0)));
+    result__HCQ=FALSE__;
+    old_pos__ICQ= 0;
+    count__JCQ= 0;
+    if (read_space__FSD()) {
+      result__CABH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__CABH=((__CHARACTER )(( 0)));
       } else {
-        result__1AAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__CABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      __tmp__LCQ=(result__1AAH == '\'');
+      __tmp__TCQ=(result__CABH == '\'');
     } else {
-      __tmp__LCQ=FALSE__;
+      __tmp__TCQ=FALSE__;
     };
-    if (__tmp__LCQ) {
-      old_pos__ACQ=position__SBC;
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      ((__STRING *)string_tmp__VH)->count__WFC= 0;
-      until_do__IJRC:
+    if (__tmp__TCQ) {
+      old_pos__ICQ=position__0BC;
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      ((__STRING *)string_tmp__VH)->count__4FC= 0;
+      until_do__QJRC:
       {
-        result__FBAH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__FBAH=((__CHARACTER )(( 0)));
+        result__MABH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__MABH=((__CHARACTER )(( 0)));
         } else {
-          result__FBAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__MABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__FBAH == ((__CHARACTER )(( 0))))) {
-          __tmp__KDQ=TRUE__;
+        if ((result__MABH == ((__CHARACTER )(( 0))))) {
+          __tmp__SDQ=TRUE__;
         } else {
-          result__OBAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__OBAH=((__CHARACTER )(( 0)));
+          result__VABH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__VABH=((__CHARACTER )(( 0)));
           } else {
-            result__OBAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__VABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__KDQ=(result__OBAH == '\n');
+          __tmp__SDQ=(result__VABH == '\n');
         };
-        if (__tmp__KDQ) {
-          __tmp__LDQ=TRUE__;
+        if (__tmp__SDQ) {
+          __tmp__TDQ=TRUE__;
         } else {
-          result__TBAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__TBAH=((__CHARACTER )(( 0)));
+          result__0ABH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__0ABH=((__CHARACTER )(( 0)));
           } else {
-            result__TBAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__0ABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          __tmp__LDQ=(result__TBAH == '\'');
+          __tmp__TDQ=(result__0ABH == '\'');
         };
-        if ((! __tmp__LDQ)) {
-          result__YBAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__YBAH=((__CHARACTER )(( 0)));
+        if ((! __tmp__TDQ)) {
+          result__5ABH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__5ABH=((__CHARACTER )(( 0)));
           } else {
-            result__YBAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__5ABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          add_last__ZLT(string_tmp__VH,result__YBAH);
-          result__3BAH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__3BAH=((__CHARACTER )(( 0)));
+          add_last__BMT(string_tmp__VH,result__5ABH);
+          result__EBBH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__EBBH=((__CHARACTER )(( 0)));
           } else {
-            result__3BAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__EBBH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__3BAH == '\\')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            read_escape_character__WAKF();
-            count__BCQ=(__INTEGER)(count__BCQ +  1);
+          if ((result__EBBH == '\\')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            read_escape_character__YLKF();
+            count__JCQ=(__INTEGER)(count__JCQ +  1);
           } else {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            count__BCQ=(__INTEGER)(count__BCQ +  1);
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            count__JCQ=(__INTEGER)(count__JCQ +  1);
           };
-          goto until_do__IJRC;
+          goto until_do__QJRC;
         };
       };
-      result__CCAH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__CCAH=((__CHARACTER )(( 0)));
+      result__JBBH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__JBBH=((__CHARACTER )(( 0)));
       } else {
-        result__CCAH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__JBBH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__CCAH == '\'')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        last_string__I0C=get__IWB(string_tmp__VH);
-        if ((count__BCQ !=  1)) {
-          position__SBC=begin_position__LBE;
-          pos__4NYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_327));
-          put_position__UOG(pos__4NYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if ((result__JBBH == '\'')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        last_string__Q0C=get__QWB(string_tmp__VH);
+        if ((count__JCQ !=  1)) {
+          position__0BC=begin_position__TBE;
+          pos__NLZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_326));
+          put_position__2OG(pos__NLZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__5BQ=TRUE__;
-        short__token__to__LBD((&__string_122),old_pos__ACQ,position__SBC);
+        result__HCQ=TRUE__;
+        short__token__to__TBD((&__string_122),old_pos__ICQ,position__0BC);
       } else {
-        position__SBC=begin_position__LBE;
-        pos__AOYG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_328));
-        put_position__UOG(pos__AOYG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+        position__0BC=begin_position__TBE;
+        pos__PLZG=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_327));
+        put_position__2OG(pos__PLZG);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
     };
-    if (result__5BQ) {
-      __tmp__KSO=current_position__JXF();
-      result__ESMB=NULL;
-      ptr__FSMB=((__POINTER )(NULL));
-      typ_id__KSMB= 0;
-      sz__HSMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
-      if ((sz__HSMB ==  0)) {
-        result__ESMB=ITM_CHARACTER__;
-      } else {
-        typ_id__KSMB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__HSMB);
-        if ((typ_id__KSMB == (__INTEGER)(-  1))) {
-          a__VFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__WFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSMB + a__VFFH) & (__UINTEGER_32)(~ a__VFFH));
-          ptr_table__DNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__CNIH=((__POINTER )(NULL));
-          result__ENIH=((__POINTER *)ptr_table__DNIH)[ 0];
-          if ((result__ENIH == (void *)NULL)) {
-            result__ENIH=new_lab__MRJ(new_size__WFFH);
-            next__CNIH=(void *)((unsigned long)result__ENIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFFH)));
-            ((__POINTER *)next__CNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DNIH)[ 0]=next__CNIH;
-          } else {
-            next__CNIH=((__POINTER *)result__ENIH)[ 0];
-            if ((next__CNIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ENIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__WFFH <<  1)) <=  4096)) {
-                next__CNIH=(void *)((unsigned long)result__ENIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFFH)));
+    if (result__HCQ) {
+      __tmp__SSO=current_position__RXF();
+      result__MSMB=NULL;
+      ptr__NSMB=((__POINTER )(NULL));
+      typ_id__SSMB= 0;
+      sz__PSMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__PSMB ==  0)) {
+        result__MSMB=ITM_CHARACTER__;
+      } else {
+        typ_id__SSMB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__PSMB);
+        if ((typ_id__SSMB == (__INTEGER)(-  1))) {
+          a__FHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSMB + a__FHGH) & (__UINTEGER_32)(~ a__FHGH));
+          ptr_table__DPJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__CPJH=((__POINTER )(NULL));
+          result__EPJH=((__POINTER *)ptr_table__DPJH)[ 0];
+          if ((result__EPJH == (void *)NULL)) {
+            result__EPJH=new_lab__URJ(new_size__GHGH);
+            next__CPJH=(void *)((unsigned long)result__EPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GHGH)));
+            ((__POINTER *)next__CPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DPJH)[ 0]=next__CPJH;
+          } else {
+            next__CPJH=((__POINTER *)result__EPJH)[ 0];
+            if ((next__CPJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EPJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__GHGH <<  1)) <=  4096)) {
+                next__CPJH=(void *)((unsigned long)result__EPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GHGH)));
               } else {
-                next__CNIH=new_lab__MRJ(new_size__WFFH);
+                next__CPJH=new_lab__URJ(new_size__GHGH);
               };
-              ((__POINTER *)next__CNIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DNIH)[ 0]=next__CNIH;
+              ((__POINTER *)next__CPJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DPJH)[ 0]=next__CPJH;
             } else {
-              ((__POINTER *)result__ENIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ENIH=next__CNIH;
-            };
-          };
-          ptr__FSMB=result__ENIH;
-        } else {
-          t__0FFH=((__UINTEGER_32 )typ_id__KSMB);
-          a__ZFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__LNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HSMB + a__ZFFH) & (__UINTEGER_32)(~ a__ZFFH));
-          ptr_table__INIH=((__POINTER )(&(table_type[(t__0FFH)])));
-          lab_type__KNIH=(__UINTEGER_32)(t__0FFH |  1);
-          next__HNIH=((__POINTER )(NULL));
-          result__JNIH=((__POINTER *)ptr_table__INIH)[ 0];
-          if ((result__JNIH == (void *)NULL)) {
-            result__JNIH=new_lab__MRJ(lab_type__KNIH);
-            next__HNIH=(void *)((unsigned long)result__JNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNIH)));
-            ((__POINTER *)next__HNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__INIH)[ 0]=next__HNIH;
-          } else {
-            next__HNIH=((__POINTER *)result__JNIH)[ 0];
-            if ((next__HNIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LNIH <<  1)) <=  4096)) {
-                next__HNIH=(void *)((unsigned long)result__JNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNIH)));
+              ((__POINTER *)result__EPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EPJH=next__CPJH;
+            };
+          };
+          ptr__NSMB=result__EPJH;
+        } else {
+          t__KHGH=((__UINTEGER_32 )typ_id__SSMB);
+          a__JHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSMB + a__JHGH) & (__UINTEGER_32)(~ a__JHGH));
+          ptr_table__IPJH=((__POINTER )(&(table_type[(t__KHGH)])));
+          lab_type__KPJH=(__UINTEGER_32)(t__KHGH |  1);
+          next__HPJH=((__POINTER )(NULL));
+          result__JPJH=((__POINTER *)ptr_table__IPJH)[ 0];
+          if ((result__JPJH == (void *)NULL)) {
+            result__JPJH=new_lab__URJ(lab_type__KPJH);
+            next__HPJH=(void *)((unsigned long)result__JPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPJH)));
+            ((__POINTER *)next__HPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IPJH)[ 0]=next__HPJH;
+          } else {
+            next__HPJH=((__POINTER *)result__JPJH)[ 0];
+            if ((next__HPJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JPJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LPJH <<  1)) <=  4096)) {
+                next__HPJH=(void *)((unsigned long)result__JPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPJH)));
               } else {
-                next__HNIH=new_lab__MRJ(lab_type__KNIH);
+                next__HPJH=new_lab__URJ(lab_type__KPJH);
               };
-              ((__POINTER *)next__HNIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__INIH)[ 0]=next__HNIH;
+              ((__POINTER *)next__HPJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IPJH)[ 0]=next__HPJH;
             } else {
-              ((__POINTER *)result__JNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__JNIH=next__HNIH;
-            };
-          };
-          ptr__FSMB=result__JNIH;
-        };
-        result__ESMB=((__ITM_CHARACTER *)ptr__FSMB);
-        *(result__ESMB) = *(ITM_CHARACTER__);
-      };
-      ((__ITM_CHARACTER *)result__ESMB)->parent_itm_constant__JSO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__KSO;
-      result__4QO=result__ESMB;
-    };
-    __tmp__OSO=result__5BQ;
-  };
-  if ((! __tmp__OSO)) {
-    if (read_string__LFQ()) {
-      __tmp__1SO=current_position__JXF();
-      result__YTMB=NULL;
-      ptr__ZTMB=((__POINTER )(NULL));
-      typ_id__4TMB= 0;
-      sz__1TMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
-      if ((sz__1TMB ==  0)) {
-        result__YTMB=ITM_STRING__;
-      } else {
-        typ_id__4TMB=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1TMB);
-        if ((typ_id__4TMB == (__INTEGER)(-  1))) {
-          a__3FFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__4FFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TMB + a__3FFH) & (__UINTEGER_32)(~ a__3FFH));
-          ptr_table__NNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4FFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__MNIH=((__POINTER )(NULL));
-          result__ONIH=((__POINTER *)ptr_table__NNIH)[ 0];
-          if ((result__ONIH == (void *)NULL)) {
-            result__ONIH=new_lab__MRJ(new_size__4FFH);
-            next__MNIH=(void *)((unsigned long)result__ONIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FFH)));
-            ((__POINTER *)next__MNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NNIH)[ 0]=next__MNIH;
-          } else {
-            next__MNIH=((__POINTER *)result__ONIH)[ 0];
-            if ((next__MNIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ONIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4FFH <<  1)) <=  4096)) {
-                next__MNIH=(void *)((unsigned long)result__ONIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FFH)));
+              ((__POINTER *)result__JPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JPJH=next__HPJH;
+            };
+          };
+          ptr__NSMB=result__JPJH;
+        };
+        result__MSMB=((__ITM_CHARACTER *)ptr__NSMB);
+        *(result__MSMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__MSMB)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__SSO;
+      result__GRO=result__MSMB;
+    };
+    __tmp__WSO=result__HCQ;
+  };
+  if ((! __tmp__WSO)) {
+    if (read_string__TFQ()) {
+      __tmp__DTO=current_position__RXF();
+      result__AUMB=NULL;
+      ptr__BUMB=((__POINTER )(NULL));
+      typ_id__GUMB= 0;
+      sz__DUMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__DUMB ==  0)) {
+        result__AUMB=ITM_STRING__;
+      } else {
+        typ_id__GUMB=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__DUMB);
+        if ((typ_id__GUMB == (__INTEGER)(-  1))) {
+          a__NHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DUMB + a__NHGH) & (__UINTEGER_32)(~ a__NHGH));
+          ptr_table__NPJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__MPJH=((__POINTER )(NULL));
+          result__OPJH=((__POINTER *)ptr_table__NPJH)[ 0];
+          if ((result__OPJH == (void *)NULL)) {
+            result__OPJH=new_lab__URJ(new_size__OHGH);
+            next__MPJH=(void *)((unsigned long)result__OPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHGH)));
+            ((__POINTER *)next__MPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NPJH)[ 0]=next__MPJH;
+          } else {
+            next__MPJH=((__POINTER *)result__OPJH)[ 0];
+            if ((next__MPJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OPJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OHGH <<  1)) <=  4096)) {
+                next__MPJH=(void *)((unsigned long)result__OPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OHGH)));
               } else {
-                next__MNIH=new_lab__MRJ(new_size__4FFH);
+                next__MPJH=new_lab__URJ(new_size__OHGH);
               };
-              ((__POINTER *)next__MNIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NNIH)[ 0]=next__MNIH;
+              ((__POINTER *)next__MPJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NPJH)[ 0]=next__MPJH;
             } else {
-              ((__POINTER *)result__ONIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ONIH=next__MNIH;
-            };
-          };
-          ptr__ZTMB=result__ONIH;
-        } else {
-          t__CGFH=((__UINTEGER_32 )typ_id__4TMB);
-          a__BGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TMB + a__BGFH) & (__UINTEGER_32)(~ a__BGFH));
-          ptr_table__SNIH=((__POINTER )(&(table_type[(t__CGFH)])));
-          lab_type__UNIH=(__UINTEGER_32)(t__CGFH |  1);
-          next__RNIH=((__POINTER )(NULL));
-          result__TNIH=((__POINTER *)ptr_table__SNIH)[ 0];
-          if ((result__TNIH == (void *)NULL)) {
-            result__TNIH=new_lab__MRJ(lab_type__UNIH);
-            next__RNIH=(void *)((unsigned long)result__TNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VNIH)));
-            ((__POINTER *)next__RNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SNIH)[ 0]=next__RNIH;
-          } else {
-            next__RNIH=((__POINTER *)result__TNIH)[ 0];
-            if ((next__RNIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TNIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VNIH <<  1)) <=  4096)) {
-                next__RNIH=(void *)((unsigned long)result__TNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VNIH)));
+              ((__POINTER *)result__OPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OPJH=next__MPJH;
+            };
+          };
+          ptr__BUMB=result__OPJH;
+        } else {
+          t__SHGH=((__UINTEGER_32 )typ_id__GUMB);
+          a__RHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DUMB + a__RHGH) & (__UINTEGER_32)(~ a__RHGH));
+          ptr_table__SPJH=((__POINTER )(&(table_type[(t__SHGH)])));
+          lab_type__UPJH=(__UINTEGER_32)(t__SHGH |  1);
+          next__RPJH=((__POINTER )(NULL));
+          result__TPJH=((__POINTER *)ptr_table__SPJH)[ 0];
+          if ((result__TPJH == (void *)NULL)) {
+            result__TPJH=new_lab__URJ(lab_type__UPJH);
+            next__RPJH=(void *)((unsigned long)result__TPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VPJH)));
+            ((__POINTER *)next__RPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SPJH)[ 0]=next__RPJH;
+          } else {
+            next__RPJH=((__POINTER *)result__TPJH)[ 0];
+            if ((next__RPJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TPJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VPJH <<  1)) <=  4096)) {
+                next__RPJH=(void *)((unsigned long)result__TPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VPJH)));
               } else {
-                next__RNIH=new_lab__MRJ(lab_type__UNIH);
+                next__RPJH=new_lab__URJ(lab_type__UPJH);
               };
-              ((__POINTER *)next__RNIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SNIH)[ 0]=next__RNIH;
+              ((__POINTER *)next__RPJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SPJH)[ 0]=next__RPJH;
             } else {
-              ((__POINTER *)result__TNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TNIH=next__RNIH;
+              ((__POINTER *)result__TPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TPJH=next__RPJH;
             };
           };
-          ptr__ZTMB=result__TNIH;
+          ptr__BUMB=result__TPJH;
         };
-        result__YTMB=((__ITM_STRING *)ptr__ZTMB);
-        *(result__YTMB) = *(ITM_STRING__);
+        result__AUMB=((__ITM_STRING *)ptr__BUMB);
+        *(result__AUMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__YTMB)->parent_itm_constant__0SO.parent_itm_code__1VF.parent_itm_object__XDE.position__NDJ=__tmp__1SO;
-      result__4QO=result__YTMB;
+      ((__ITM_STRING *)result__AUMB)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__DTO;
+      result__GRO=result__AUMB;
     };
   };
-  return(result__4QO);
+  return(result__GRO);
 }
 
-static void* read_group__JBHB(__PARSER *Self__KBHB)
+static void* read_group__RBHB(__PARSER *Self__SBHB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *e__MBHB;
-  __ITM_RESULT *result__2NIH,*result__GYWB;
-  __POINTER ptr__3NIH,ptr_table__GOIH,next__FOIH,result__HOIH;
-  __POINTER ptr_table__LOIH,next__KOIH,result__MOIH,ptr__HYWB;
-  __POINTER ptr_table__WOIH,next__VOIH,result__XOIH,ptr_table__1OIH;
-  __POINTER next__0OIH,result__2OIH;
-  __INTEGER typ_id__4NIH,typ_id__MYWB;
-  __UINTEGER_32 sz__5NIH,a__AOIH,new_size__BOIH,t__COIH,a__DOIH;
-  __UINTEGER_32 new_size__OOIH,lab_type__NOIH,sz__JYWB,a__MJFH;
-  __UINTEGER_32 new_size__NJFH,t__RJFH,a__QJFH,new_size__4OIH;
-  __UINTEGER_32 lab_type__3OIH;
-  __POSITION pos__OOYG;
-  void *result__FBGH,*result__NBHB;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__GBGH,*Self__HBGH;
-  __BOOLEAN result__WNIH,__tmp__2BHB,result__ZNIH,result__POIH;
-  __BOOLEAN __tmp__DDHB,result__SOIH;
-  __CHARACTER result__XNIH,result__0NIH,result__QOIH,result__TOIH;
-  read_def_local__30H(Self__KBHB);
-  result__FBGH=NULL;
-  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
-    result__FBGH=create_with_capacity__SVI( 16);
+  void *e__UBHB;
+  __ITM_RESULT *result__2PJH,*result__OYWB;
+  __POINTER ptr__3PJH,ptr_table__GQJH,next__FQJH,result__HQJH;
+  __POINTER ptr_table__LQJH,next__KQJH,result__MQJH,ptr__PYWB;
+  __POINTER ptr_table__WQJH,next__VQJH,result__XQJH,ptr_table__1QJH;
+  __POINTER next__0QJH,result__2QJH;
+  __INTEGER typ_id__4PJH,typ_id__UYWB;
+  __UINTEGER_32 sz__5PJH,a__AQJH,new_size__BQJH,t__CQJH,a__DQJH;
+  __UINTEGER_32 new_size__OQJH,lab_type__NQJH,sz__RYWB,a__2KGH;
+  __UINTEGER_32 new_size__3KGH,t__BLGH,a__ALGH,new_size__4QJH;
+  __UINTEGER_32 lab_type__3QJH;
+  __POSITION pos__3LZG;
+  void *result__YCHH,*result__VBHB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__ZCHH,*Self__0CHH;
+  __BOOLEAN result__WPJH,__tmp__ECHB,result__ZPJH,result__PQJH;
+  __BOOLEAN __tmp__LDHB,result__SQJH;
+  __CHARACTER result__XPJH,result__0PJH,result__QQJH,result__TQJH;
+  read_def_local__F1H(Self__SBHB);
+  result__YCHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H)->parent_arrayed_collection__I4H.upper__QWT <  0)) {
+    result__YCHH=create_with_capacity__0VI( 16);
   } else {
-    Self__GBGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-    result__FBGH=((void **)Self__GBGH->parent_arrayed_collection__A4H.storage__WAU)[Self__GBGH->parent_arrayed_collection__A4H.upper__IWT];
-    Self__HBGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-    Self__HBGH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__HBGH->parent_arrayed_collection__A4H.upper__IWT -  1);
-  };
-  result__NBHB=result__FBGH;
-  e__MBHB=read_expr__44I(Self__KBHB);
-  while_do__2GMB:
+    Self__ZCHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+    result__YCHH=((void **)Self__ZCHH->parent_arrayed_collection__I4H.storage__4AU)[Self__ZCHH->parent_arrayed_collection__I4H.upper__QWT];
+    Self__0CHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+    Self__0CHH->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__0CHH->parent_arrayed_collection__I4H.upper__QWT -  1);
+  };
+  result__VBHB=result__YCHH;
+  e__UBHB=read_expr__G5I(Self__SBHB);
+  while_do__EHMB:
   {
-    if (((void *)e__MBHB != (void *)NULL)) {
-      result__WNIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__WNIH=FALSE__;
+    if (((void *)e__UBHB != (void *)NULL)) {
+      result__WPJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__WPJH=FALSE__;
       } else {
-        result__XNIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__XNIH=((__CHARACTER )(( 0)));
+        result__XPJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__XPJH=((__CHARACTER )(( 0)));
         } else {
-          result__XNIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__XPJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__XNIH == ';')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__WNIH=TRUE__;
+        if ((result__XPJH == ';')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__WPJH=TRUE__;
         };
       };
-      __tmp__2BHB=result__WNIH;
+      __tmp__ECHB=result__WPJH;
     } else {
-      __tmp__2BHB=FALSE__;
+      __tmp__ECHB=FALSE__;
     };
-    if (__tmp__2BHB) {
-      add_last__U5U(result__NBHB,e__MBHB);
-      e__MBHB=read_expr__44I(Self__KBHB);
-      goto while_do__2GMB;
+    if (__tmp__ECHB) {
+      add_last__25U(result__VBHB,e__UBHB);
+      e__UBHB=read_expr__G5I(Self__SBHB);
+      goto while_do__EHMB;
     };
   };
-  if (((void *)e__MBHB != (void *)NULL)) {
-    result__ZNIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__ZNIH=FALSE__;
+  if (((void *)e__UBHB != (void *)NULL)) {
+    result__ZPJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__ZPJH=FALSE__;
     } else {
-      result__0NIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__0NIH=((__CHARACTER )(( 0)));
+      result__0PJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__0PJH=((__CHARACTER )(( 0)));
       } else {
-        result__0NIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__0PJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__0NIH == ',')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__ZNIH=TRUE__;
+      if ((result__0PJH == ',')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__ZPJH=TRUE__;
       };
     };
-    if (result__ZNIH) {
+    if (result__ZPJH) {
       do {
-        result__2NIH=NULL;
-        ptr__3NIH=((__POINTER )(NULL));
-        typ_id__4NIH= 0;
-        sz__5NIH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-        if ((sz__5NIH ==  0)) {
-          result__2NIH=ITM_RESULT__;
-        } else {
-          typ_id__4NIH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5NIH);
-          if ((typ_id__4NIH == (__INTEGER)(-  1))) {
-            a__AOIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__BOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NIH + a__AOIH) & (__UINTEGER_32)(~ a__AOIH));
-            ptr_table__GOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BOIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__FOIH=((__POINTER )(NULL));
-            result__HOIH=((__POINTER *)ptr_table__GOIH)[ 0];
-            if ((result__HOIH == (void *)NULL)) {
-              result__HOIH=new_lab__MRJ(new_size__BOIH);
-              next__FOIH=(void *)((unsigned long)result__HOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BOIH)));
-              ((__POINTER *)next__FOIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GOIH)[ 0]=next__FOIH;
+        result__2PJH=NULL;
+        ptr__3PJH=((__POINTER )(NULL));
+        typ_id__4PJH= 0;
+        sz__5PJH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__5PJH ==  0)) {
+          result__2PJH=ITM_RESULT__;
+        } else {
+          typ_id__4PJH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5PJH);
+          if ((typ_id__4PJH == (__INTEGER)(-  1))) {
+            a__AQJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PJH + a__AQJH) & (__UINTEGER_32)(~ a__AQJH));
+            ptr_table__GQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BQJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__FQJH=((__POINTER )(NULL));
+            result__HQJH=((__POINTER *)ptr_table__GQJH)[ 0];
+            if ((result__HQJH == (void *)NULL)) {
+              result__HQJH=new_lab__URJ(new_size__BQJH);
+              next__FQJH=(void *)((unsigned long)result__HQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BQJH)));
+              ((__POINTER *)next__FQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
             } else {
-              next__FOIH=((__POINTER *)result__HOIH)[ 0];
-              if ((next__FOIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HOIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BOIH <<  1)) <=  4096)) {
-                  next__FOIH=(void *)((unsigned long)result__HOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BOIH)));
+              next__FQJH=((__POINTER *)result__HQJH)[ 0];
+              if ((next__FQJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HQJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BQJH <<  1)) <=  4096)) {
+                  next__FQJH=(void *)((unsigned long)result__HQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BQJH)));
                 } else {
-                  next__FOIH=new_lab__MRJ(new_size__BOIH);
+                  next__FQJH=new_lab__URJ(new_size__BQJH);
                 };
-                ((__POINTER *)next__FOIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GOIH)[ 0]=next__FOIH;
+                ((__POINTER *)next__FQJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
               } else {
-                ((__POINTER *)result__HOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__HOIH=next__FOIH;
+                ((__POINTER *)result__HQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__HQJH=next__FQJH;
               };
             };
-            ptr__3NIH=result__HOIH;
-          } else {
-            t__COIH=((__UINTEGER_32 )typ_id__4NIH);
-            a__DOIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__OOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NIH + a__DOIH) & (__UINTEGER_32)(~ a__DOIH));
-            ptr_table__LOIH=((__POINTER )(&(table_type[(t__COIH)])));
-            lab_type__NOIH=(__UINTEGER_32)(t__COIH |  1);
-            next__KOIH=((__POINTER )(NULL));
-            result__MOIH=((__POINTER *)ptr_table__LOIH)[ 0];
-            if ((result__MOIH == (void *)NULL)) {
-              result__MOIH=new_lab__MRJ(lab_type__NOIH);
-              next__KOIH=(void *)((unsigned long)result__MOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOIH)));
-              ((__POINTER *)next__KOIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LOIH)[ 0]=next__KOIH;
+            ptr__3PJH=result__HQJH;
+          } else {
+            t__CQJH=((__UINTEGER_32 )typ_id__4PJH);
+            a__DQJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PJH + a__DQJH) & (__UINTEGER_32)(~ a__DQJH));
+            ptr_table__LQJH=((__POINTER )(&(table_type[(t__CQJH)])));
+            lab_type__NQJH=(__UINTEGER_32)(t__CQJH |  1);
+            next__KQJH=((__POINTER )(NULL));
+            result__MQJH=((__POINTER *)ptr_table__LQJH)[ 0];
+            if ((result__MQJH == (void *)NULL)) {
+              result__MQJH=new_lab__URJ(lab_type__NQJH);
+              next__KQJH=(void *)((unsigned long)result__MQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQJH)));
+              ((__POINTER *)next__KQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LQJH)[ 0]=next__KQJH;
             } else {
-              next__KOIH=((__POINTER *)result__MOIH)[ 0];
-              if ((next__KOIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MOIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OOIH <<  1)) <=  4096)) {
-                  next__KOIH=(void *)((unsigned long)result__MOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOIH)));
+              next__KQJH=((__POINTER *)result__MQJH)[ 0];
+              if ((next__KQJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MQJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OQJH <<  1)) <=  4096)) {
+                  next__KQJH=(void *)((unsigned long)result__MQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQJH)));
                 } else {
-                  next__KOIH=new_lab__MRJ(lab_type__NOIH);
+                  next__KQJH=new_lab__URJ(lab_type__NQJH);
                 };
-                ((__POINTER *)next__KOIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LOIH)[ 0]=next__KOIH;
+                ((__POINTER *)next__KQJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LQJH)[ 0]=next__KQJH;
               } else {
-                ((__POINTER *)result__MOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__MOIH=next__KOIH;
+                ((__POINTER *)result__MQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MQJH=next__KQJH;
               };
             };
-            ptr__3NIH=result__MOIH;
+            ptr__3PJH=result__MQJH;
           };
-          result__2NIH=((__ITM_RESULT *)ptr__3NIH);
-          *(result__2NIH) = *(ITM_RESULT__);
+          result__2PJH=((__ITM_RESULT *)ptr__3PJH);
+          *(result__2PJH) = *(ITM_RESULT__);
         };
-        ((__ITM_RESULT *)result__2NIH)->value__MLFC=e__MBHB;
-        add_last__U5U(result__NBHB,result__2NIH);
-        e__MBHB=read_expr__44I(Self__KBHB);
-        while_do__003B:
+        ((__ITM_RESULT *)result__2PJH)->value__ULFC=e__UBHB;
+        add_last__25U(result__VBHB,result__2PJH);
+        e__UBHB=read_expr__G5I(Self__SBHB);
+        while_do__C13B:
         {
-          if (((void *)e__MBHB != (void *)NULL)) {
-            result__POIH=FALSE__;
-            if ((! read_space__3RD())) {
-              result__POIH=FALSE__;
+          if (((void *)e__UBHB != (void *)NULL)) {
+            result__PQJH=FALSE__;
+            if ((! read_space__FSD())) {
+              result__PQJH=FALSE__;
             } else {
-              result__QOIH='\0';
-              if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-                result__QOIH=((__CHARACTER )(( 0)));
+              result__QQJH='\0';
+              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+                result__QQJH=((__CHARACTER )(( 0)));
               } else {
-                result__QOIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+                result__QQJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
               };
-              if ((result__QOIH == ';')) {
-                position__SBC=(__INTEGER)(position__SBC +  1);
-                result__POIH=TRUE__;
+              if ((result__QQJH == ';')) {
+                position__0BC=(__INTEGER)(position__0BC +  1);
+                result__PQJH=TRUE__;
               };
             };
-            __tmp__DDHB=result__POIH;
+            __tmp__LDHB=result__PQJH;
           } else {
-            __tmp__DDHB=FALSE__;
+            __tmp__LDHB=FALSE__;
           };
-          if (__tmp__DDHB) {
-            add_last__U5U(result__NBHB,e__MBHB);
-            e__MBHB=read_expr__44I(Self__KBHB);
-            goto while_do__003B;
+          if (__tmp__LDHB) {
+            add_last__25U(result__VBHB,e__UBHB);
+            e__UBHB=read_expr__G5I(Self__SBHB);
+            goto while_do__C13B;
           };
         };
-        if (((void *)e__MBHB == (void *)NULL)) {
-          pos__OOYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_329));
-          put_position__UOG(pos__OOYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+        if (((void *)e__UBHB == (void *)NULL)) {
+          pos__3LZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_328));
+          put_position__2OG(pos__3LZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        result__SOIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__SOIH=FALSE__;
-        } else {
-          result__TOIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__TOIH=((__CHARACTER )(( 0)));
-          } else {
-            result__TOIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
-          };
-          if ((result__TOIH == ',')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__SOIH=TRUE__;
-          };
-        };
-      } while (result__SOIH);
-    };
-    result__GYWB=NULL;
-    ptr__HYWB=((__POINTER )(NULL));
-    typ_id__MYWB= 0;
-    sz__JYWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
-    if ((sz__JYWB ==  0)) {
-      result__GYWB=ITM_RESULT__;
-    } else {
-      typ_id__MYWB=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__JYWB);
-      if ((typ_id__MYWB == (__INTEGER)(-  1))) {
-        a__MJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__NJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYWB + a__MJFH) & (__UINTEGER_32)(~ a__MJFH));
-        ptr_table__WOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__VOIH=((__POINTER )(NULL));
-        result__XOIH=((__POINTER *)ptr_table__WOIH)[ 0];
-        if ((result__XOIH == (void *)NULL)) {
-          result__XOIH=new_lab__MRJ(new_size__NJFH);
-          next__VOIH=(void *)((unsigned long)result__XOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJFH)));
-          ((__POINTER *)next__VOIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WOIH)[ 0]=next__VOIH;
-        } else {
-          next__VOIH=((__POINTER *)result__XOIH)[ 0];
-          if ((next__VOIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XOIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__NJFH <<  1)) <=  4096)) {
-              next__VOIH=(void *)((unsigned long)result__XOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NJFH)));
+        result__SQJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__SQJH=FALSE__;
+        } else {
+          result__TQJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__TQJH=((__CHARACTER )(( 0)));
+          } else {
+            result__TQJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          };
+          if ((result__TQJH == ',')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__SQJH=TRUE__;
+          };
+        };
+      } while (result__SQJH);
+    };
+    result__OYWB=NULL;
+    ptr__PYWB=((__POINTER )(NULL));
+    typ_id__UYWB= 0;
+    sz__RYWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__RYWB ==  0)) {
+      result__OYWB=ITM_RESULT__;
+    } else {
+      typ_id__UYWB=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__RYWB);
+      if ((typ_id__UYWB == (__INTEGER)(-  1))) {
+        a__2KGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3KGH=(__UINTEGER_32)((__UINTEGER_32)(sz__RYWB + a__2KGH) & (__UINTEGER_32)(~ a__2KGH));
+        ptr_table__WQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3KGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__VQJH=((__POINTER )(NULL));
+        result__XQJH=((__POINTER *)ptr_table__WQJH)[ 0];
+        if ((result__XQJH == (void *)NULL)) {
+          result__XQJH=new_lab__URJ(new_size__3KGH);
+          next__VQJH=(void *)((unsigned long)result__XQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KGH)));
+          ((__POINTER *)next__VQJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WQJH)[ 0]=next__VQJH;
+        } else {
+          next__VQJH=((__POINTER *)result__XQJH)[ 0];
+          if ((next__VQJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XQJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__3KGH <<  1)) <=  4096)) {
+              next__VQJH=(void *)((unsigned long)result__XQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KGH)));
             } else {
-              next__VOIH=new_lab__MRJ(new_size__NJFH);
-            };
-            ((__POINTER *)next__VOIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WOIH)[ 0]=next__VOIH;
-          } else {
-            ((__POINTER *)result__XOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XOIH=next__VOIH;
-          };
-        };
-        ptr__HYWB=result__XOIH;
-      } else {
-        t__RJFH=((__UINTEGER_32 )typ_id__MYWB);
-        a__QJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__4OIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JYWB + a__QJFH) & (__UINTEGER_32)(~ a__QJFH));
-        ptr_table__1OIH=((__POINTER )(&(table_type[(t__RJFH)])));
-        lab_type__3OIH=(__UINTEGER_32)(t__RJFH |  1);
-        next__0OIH=((__POINTER )(NULL));
-        result__2OIH=((__POINTER *)ptr_table__1OIH)[ 0];
-        if ((result__2OIH == (void *)NULL)) {
-          result__2OIH=new_lab__MRJ(lab_type__3OIH);
-          next__0OIH=(void *)((unsigned long)result__2OIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4OIH)));
-          ((__POINTER *)next__0OIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1OIH)[ 0]=next__0OIH;
-        } else {
-          next__0OIH=((__POINTER *)result__2OIH)[ 0];
-          if ((next__0OIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2OIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4OIH <<  1)) <=  4096)) {
-              next__0OIH=(void *)((unsigned long)result__2OIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4OIH)));
+              next__VQJH=new_lab__URJ(new_size__3KGH);
+            };
+            ((__POINTER *)next__VQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WQJH)[ 0]=next__VQJH;
+          } else {
+            ((__POINTER *)result__XQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XQJH=next__VQJH;
+          };
+        };
+        ptr__PYWB=result__XQJH;
+      } else {
+        t__BLGH=((__UINTEGER_32 )typ_id__UYWB);
+        a__ALGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4QJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RYWB + a__ALGH) & (__UINTEGER_32)(~ a__ALGH));
+        ptr_table__1QJH=((__POINTER )(&(table_type[(t__BLGH)])));
+        lab_type__3QJH=(__UINTEGER_32)(t__BLGH |  1);
+        next__0QJH=((__POINTER )(NULL));
+        result__2QJH=((__POINTER *)ptr_table__1QJH)[ 0];
+        if ((result__2QJH == (void *)NULL)) {
+          result__2QJH=new_lab__URJ(lab_type__3QJH);
+          next__0QJH=(void *)((unsigned long)result__2QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4QJH)));
+          ((__POINTER *)next__0QJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1QJH)[ 0]=next__0QJH;
+        } else {
+          next__0QJH=((__POINTER *)result__2QJH)[ 0];
+          if ((next__0QJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2QJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4QJH <<  1)) <=  4096)) {
+              next__0QJH=(void *)((unsigned long)result__2QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4QJH)));
             } else {
-              next__0OIH=new_lab__MRJ(lab_type__3OIH);
+              next__0QJH=new_lab__URJ(lab_type__3QJH);
             };
-            ((__POINTER *)next__0OIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1OIH)[ 0]=next__0OIH;
+            ((__POINTER *)next__0QJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1QJH)[ 0]=next__0QJH;
           } else {
-            ((__POINTER *)result__2OIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2OIH=next__0OIH;
+            ((__POINTER *)result__2QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0QJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2QJH=next__0QJH;
           };
         };
-        ptr__HYWB=result__2OIH;
+        ptr__PYWB=result__2QJH;
       };
-      result__GYWB=((__ITM_RESULT *)ptr__HYWB);
-      *(result__GYWB) = *(ITM_RESULT__);
+      result__OYWB=((__ITM_RESULT *)ptr__PYWB);
+      *(result__OYWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__GYWB)->value__MLFC=e__MBHB;
-    e__MBHB=result__GYWB;
-    add_last__U5U(result__FBGH,result__GYWB);
+    ((__ITM_RESULT *)result__OYWB)->value__ULFC=e__UBHB;
+    e__UBHB=result__OYWB;
+    add_last__25U(result__YCHH,result__OYWB);
   };
-  return(copy__Q5H(result__FBGH));
+  return(copy__Y5H(result__YCHH));
 }
 
-static void* readlip_expr_operator__MOZB(__PARSER *Self__NOZB)
+static void* readlip_expr_operator__UOZB(__PARSER *Self__VOZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *right__QOZB,*result__POZB;
-  __POSITION pos__EPYG,p__OPIH,p__FQIH;
-  __LIP_BINARY *result__FPIH,*Self__NPIH,*result__2PIH,*Self__EQIH;
-  __POINTER ptr__GPIH,ptr_table__TPIH,next__SPIH,result__UPIH;
-  __POINTER ptr_table__YPIH,next__XPIH,result__ZPIH,ptr__3PIH;
-  __POINTER ptr_table__KQIH,next__JQIH,result__LQIH,ptr_table__PQIH;
-  __POINTER next__OQIH,result__QQIH;
-  __INTEGER typ_id__HPIH,typ_id__4PIH;
-  __UINTEGER_32 sz__IPIH,a__JPIH,new_size__KPIH,t__LPIH,a__MPIH;
-  __UINTEGER_32 new_size__1PIH,lab_type__0PIH,sz__5PIH,a__AQIH;
-  __UINTEGER_32 new_size__BQIH,t__CQIH,a__DQIH,new_size__SQIH;
-  __UINTEGER_32 lab_type__RQIH;
-  __BOOLEAN result__5OIH,__tmp__FPZB,result__CPIH;
-  __CHARACTER result__APIH,result__DPIH;
-  right__QOZB=NULL;
-  result__POZB=readlip_expr_cmp__A11B(Self__NOZB);
-  if (((void *)result__POZB != (void *)NULL)) {
-    while_do__P24B:
+  void *right__YOZB,*result__XOZB;
+  __POSITION pos__TMZG,p__ORJH,p__FSJH;
+  __LIP_BINARY *result__FRJH,*Self__NRJH,*result__2RJH,*Self__ESJH;
+  __POINTER ptr__GRJH,ptr_table__TRJH,next__SRJH,result__URJH;
+  __POINTER ptr_table__YRJH,next__XRJH,result__ZRJH,ptr__3RJH;
+  __POINTER ptr_table__KSJH,next__JSJH,result__LSJH,ptr_table__PSJH;
+  __POINTER next__OSJH,result__QSJH;
+  __INTEGER typ_id__HRJH,typ_id__4RJH;
+  __UINTEGER_32 sz__IRJH,a__JRJH,new_size__KRJH,t__LRJH,a__MRJH;
+  __UINTEGER_32 new_size__1RJH,lab_type__0RJH,sz__5RJH,a__ASJH;
+  __UINTEGER_32 new_size__BSJH,t__CSJH,a__DSJH,new_size__SSJH;
+  __UINTEGER_32 lab_type__RSJH;
+  __BOOLEAN result__5QJH,__tmp__NPZB,result__CRJH;
+  __CHARACTER result__ARJH,result__DRJH;
+  right__YOZB=NULL;
+  result__XOZB=readlip_expr_cmp__I11B(Self__VOZB);
+  if (((void *)result__XOZB != (void *)NULL)) {
+    while_do__X24B:
     {
-      result__5OIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__5OIH=FALSE__;
+      result__5QJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__5QJH=FALSE__;
       } else {
-        result__APIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__APIH=((__CHARACTER )(( 0)));
+        result__ARJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__ARJH=((__CHARACTER )(( 0)));
         } else {
-          result__APIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__ARJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__APIH == '|')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__5OIH=TRUE__;
+        if ((result__ARJH == '|')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__5QJH=TRUE__;
         };
       };
-      if (result__5OIH) {
-        __tmp__FPZB=TRUE__;
+      if (result__5QJH) {
+        __tmp__NPZB=TRUE__;
       } else {
-        result__CPIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__CPIH=FALSE__;
+        result__CRJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__CRJH=FALSE__;
         } else {
-          result__DPIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__DPIH=((__CHARACTER )(( 0)));
+          result__DRJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__DRJH=((__CHARACTER )(( 0)));
           } else {
-            result__DPIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__DRJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__DPIH == '&')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__CPIH=TRUE__;
+          if ((result__DRJH == '&')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__CRJH=TRUE__;
           };
         };
-        __tmp__FPZB=result__CPIH;
+        __tmp__NPZB=result__CRJH;
       };
-      if (__tmp__FPZB) {
-        right__QOZB=readlip_expr_cmp__A11B(Self__NOZB);
-        if (((void *)right__QOZB == (void *)NULL)) {
-          pos__EPYG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_240));
-          put_position__UOG(pos__EPYG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (__tmp__NPZB) {
+        right__YOZB=readlip_expr_cmp__I11B(Self__VOZB);
+        if (((void *)right__YOZB == (void *)NULL)) {
+          pos__TMZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_238));
+          put_position__2OG(pos__TMZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (result__5OIH) {
-          p__OPIH=current_position__JXF();
-          result__FPIH=NULL;
-          ptr__GPIH=((__POINTER )(NULL));
-          typ_id__HPIH= 0;
-          sz__IPIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__IPIH ==  0)) {
-            result__FPIH=LIP_BINARY__;
-          } else {
-            typ_id__HPIH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__IPIH);
-            if ((typ_id__HPIH == (__INTEGER)(-  1))) {
-              a__JPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__KPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IPIH + a__JPIH) & (__UINTEGER_32)(~ a__JPIH));
-              ptr_table__TPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KPIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__SPIH=((__POINTER )(NULL));
-              result__UPIH=((__POINTER *)ptr_table__TPIH)[ 0];
-              if ((result__UPIH == (void *)NULL)) {
-                result__UPIH=new_lab__MRJ(new_size__KPIH);
-                next__SPIH=(void *)((unsigned long)result__UPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPIH)));
-                ((__POINTER *)next__SPIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__TPIH)[ 0]=next__SPIH;
+        if (result__5QJH) {
+          p__ORJH=current_position__RXF();
+          result__FRJH=NULL;
+          ptr__GRJH=((__POINTER )(NULL));
+          typ_id__HRJH= 0;
+          sz__IRJH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__IRJH ==  0)) {
+            result__FRJH=LIP_BINARY__;
+          } else {
+            typ_id__HRJH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__IRJH);
+            if ((typ_id__HRJH == (__INTEGER)(-  1))) {
+              a__JRJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KRJH=(__UINTEGER_32)((__UINTEGER_32)(sz__IRJH + a__JRJH) & (__UINTEGER_32)(~ a__JRJH));
+              ptr_table__TRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KRJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__SRJH=((__POINTER )(NULL));
+              result__URJH=((__POINTER *)ptr_table__TRJH)[ 0];
+              if ((result__URJH == (void *)NULL)) {
+                result__URJH=new_lab__URJ(new_size__KRJH);
+                next__SRJH=(void *)((unsigned long)result__URJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRJH)));
+                ((__POINTER *)next__SRJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TRJH)[ 0]=next__SRJH;
               } else {
-                next__SPIH=((__POINTER *)result__UPIH)[ 0];
-                if ((next__SPIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KPIH <<  1)) <=  4096)) {
-                    next__SPIH=(void *)((unsigned long)result__UPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPIH)));
+                next__SRJH=((__POINTER *)result__URJH)[ 0];
+                if ((next__SRJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__URJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KRJH <<  1)) <=  4096)) {
+                    next__SRJH=(void *)((unsigned long)result__URJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRJH)));
                   } else {
-                    next__SPIH=new_lab__MRJ(new_size__KPIH);
+                    next__SRJH=new_lab__URJ(new_size__KRJH);
                   };
-                  ((__POINTER *)next__SPIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TPIH)[ 0]=next__SPIH;
+                  ((__POINTER *)next__SRJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TRJH)[ 0]=next__SRJH;
                 } else {
-                  ((__POINTER *)result__UPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__UPIH=next__SPIH;
+                  ((__POINTER *)result__URJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__URJH=next__SRJH;
                 };
               };
-              ptr__GPIH=result__UPIH;
+              ptr__GRJH=result__URJH;
             } else {
-              t__LPIH=((__UINTEGER_32 )typ_id__HPIH);
-              a__MPIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__1PIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IPIH + a__MPIH) & (__UINTEGER_32)(~ a__MPIH));
-              ptr_table__YPIH=((__POINTER )(&(table_type[(t__LPIH)])));
-              lab_type__0PIH=(__UINTEGER_32)(t__LPIH |  1);
-              next__XPIH=((__POINTER )(NULL));
-              result__ZPIH=((__POINTER *)ptr_table__YPIH)[ 0];
-              if ((result__ZPIH == (void *)NULL)) {
-                result__ZPIH=new_lab__MRJ(lab_type__0PIH);
-                next__XPIH=(void *)((unsigned long)result__ZPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PIH)));
-                ((__POINTER *)next__XPIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YPIH)[ 0]=next__XPIH;
+              t__LRJH=((__UINTEGER_32 )typ_id__HRJH);
+              a__MRJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__1RJH=(__UINTEGER_32)((__UINTEGER_32)(sz__IRJH + a__MRJH) & (__UINTEGER_32)(~ a__MRJH));
+              ptr_table__YRJH=((__POINTER )(&(table_type[(t__LRJH)])));
+              lab_type__0RJH=(__UINTEGER_32)(t__LRJH |  1);
+              next__XRJH=((__POINTER )(NULL));
+              result__ZRJH=((__POINTER *)ptr_table__YRJH)[ 0];
+              if ((result__ZRJH == (void *)NULL)) {
+                result__ZRJH=new_lab__URJ(lab_type__0RJH);
+                next__XRJH=(void *)((unsigned long)result__ZRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RJH)));
+                ((__POINTER *)next__XRJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YRJH)[ 0]=next__XRJH;
               } else {
-                next__XPIH=((__POINTER *)result__ZPIH)[ 0];
-                if ((next__XPIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZPIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1PIH <<  1)) <=  4096)) {
-                    next__XPIH=(void *)((unsigned long)result__ZPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PIH)));
+                next__XRJH=((__POINTER *)result__ZRJH)[ 0];
+                if ((next__XRJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZRJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1RJH <<  1)) <=  4096)) {
+                    next__XRJH=(void *)((unsigned long)result__ZRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RJH)));
                   } else {
-                    next__XPIH=new_lab__MRJ(lab_type__0PIH);
+                    next__XRJH=new_lab__URJ(lab_type__0RJH);
                   };
-                  ((__POINTER *)next__XPIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__YPIH)[ 0]=next__XPIH;
+                  ((__POINTER *)next__XRJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__YRJH)[ 0]=next__XRJH;
                 } else {
-                  ((__POINTER *)result__ZPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ZPIH=next__XPIH;
+                  ((__POINTER *)result__ZRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__ZRJH=next__XRJH;
                 };
               };
-              ptr__GPIH=result__ZPIH;
-            };
-            result__FPIH=((__LIP_BINARY *)ptr__GPIH);
-            *(result__FPIH) = *(LIP_BINARY__);
-          };
-          Self__NPIH=((__LIP_BINARY *)result__FPIH);
-          Self__NPIH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__OPIH;
-          Self__NPIH->left__MZQD=result__POZB;
-          Self__NPIH->right__PZQD=right__QOZB;
-          Self__NPIH->operator__SZQD='|';
-          result__POZB=result__FPIH;
-        } else {
-          p__FQIH=current_position__JXF();
-          result__2PIH=NULL;
-          ptr__3PIH=((__POINTER )(NULL));
-          typ_id__4PIH= 0;
-          sz__5PIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__5PIH ==  0)) {
-            result__2PIH=LIP_BINARY__;
-          } else {
-            typ_id__4PIH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5PIH);
-            if ((typ_id__4PIH == (__INTEGER)(-  1))) {
-              a__AQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__BQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PIH + a__AQIH) & (__UINTEGER_32)(~ a__AQIH));
-              ptr_table__KQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BQIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__JQIH=((__POINTER )(NULL));
-              result__LQIH=((__POINTER *)ptr_table__KQIH)[ 0];
-              if ((result__LQIH == (void *)NULL)) {
-                result__LQIH=new_lab__MRJ(new_size__BQIH);
-                next__JQIH=(void *)((unsigned long)result__LQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BQIH)));
-                ((__POINTER *)next__JQIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KQIH)[ 0]=next__JQIH;
+              ptr__GRJH=result__ZRJH;
+            };
+            result__FRJH=((__LIP_BINARY *)ptr__GRJH);
+            *(result__FRJH) = *(LIP_BINARY__);
+          };
+          Self__NRJH=((__LIP_BINARY *)result__FRJH);
+          Self__NRJH->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ=p__ORJH;
+          Self__NRJH->left__UZQD=result__XOZB;
+          Self__NRJH->right__XZQD=right__YOZB;
+          Self__NRJH->operator__0ZQD='|';
+          result__XOZB=result__FRJH;
+        } else {
+          p__FSJH=current_position__RXF();
+          result__2RJH=NULL;
+          ptr__3RJH=((__POINTER )(NULL));
+          typ_id__4RJH= 0;
+          sz__5RJH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__5RJH ==  0)) {
+            result__2RJH=LIP_BINARY__;
+          } else {
+            typ_id__4RJH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5RJH);
+            if ((typ_id__4RJH == (__INTEGER)(-  1))) {
+              a__ASJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5RJH + a__ASJH) & (__UINTEGER_32)(~ a__ASJH));
+              ptr_table__KSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BSJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JSJH=((__POINTER )(NULL));
+              result__LSJH=((__POINTER *)ptr_table__KSJH)[ 0];
+              if ((result__LSJH == (void *)NULL)) {
+                result__LSJH=new_lab__URJ(new_size__BSJH);
+                next__JSJH=(void *)((unsigned long)result__LSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSJH)));
+                ((__POINTER *)next__JSJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KSJH)[ 0]=next__JSJH;
               } else {
-                next__JQIH=((__POINTER *)result__LQIH)[ 0];
-                if ((next__JQIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__BQIH <<  1)) <=  4096)) {
-                    next__JQIH=(void *)((unsigned long)result__LQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BQIH)));
+                next__JSJH=((__POINTER *)result__LSJH)[ 0];
+                if ((next__JSJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LSJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BSJH <<  1)) <=  4096)) {
+                    next__JSJH=(void *)((unsigned long)result__LSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSJH)));
                   } else {
-                    next__JQIH=new_lab__MRJ(new_size__BQIH);
+                    next__JSJH=new_lab__URJ(new_size__BSJH);
                   };
-                  ((__POINTER *)next__JQIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KQIH)[ 0]=next__JQIH;
+                  ((__POINTER *)next__JSJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KSJH)[ 0]=next__JSJH;
                 } else {
-                  ((__POINTER *)result__LQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LQIH=next__JQIH;
+                  ((__POINTER *)result__LSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LSJH=next__JSJH;
                 };
               };
-              ptr__3PIH=result__LQIH;
+              ptr__3RJH=result__LSJH;
             } else {
-              t__CQIH=((__UINTEGER_32 )typ_id__4PIH);
-              a__DQIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__SQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PIH + a__DQIH) & (__UINTEGER_32)(~ a__DQIH));
-              ptr_table__PQIH=((__POINTER )(&(table_type[(t__CQIH)])));
-              lab_type__RQIH=(__UINTEGER_32)(t__CQIH |  1);
-              next__OQIH=((__POINTER )(NULL));
-              result__QQIH=((__POINTER *)ptr_table__PQIH)[ 0];
-              if ((result__QQIH == (void *)NULL)) {
-                result__QQIH=new_lab__MRJ(lab_type__RQIH);
-                next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SQIH)));
-                ((__POINTER *)next__OQIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+              t__CSJH=((__UINTEGER_32 )typ_id__4RJH);
+              a__DSJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5RJH + a__DSJH) & (__UINTEGER_32)(~ a__DSJH));
+              ptr_table__PSJH=((__POINTER )(&(table_type[(t__CSJH)])));
+              lab_type__RSJH=(__UINTEGER_32)(t__CSJH |  1);
+              next__OSJH=((__POINTER )(NULL));
+              result__QSJH=((__POINTER *)ptr_table__PSJH)[ 0];
+              if ((result__QSJH == (void *)NULL)) {
+                result__QSJH=new_lab__URJ(lab_type__RSJH);
+                next__OSJH=(void *)((unsigned long)result__QSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSJH)));
+                ((__POINTER *)next__OSJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PSJH)[ 0]=next__OSJH;
               } else {
-                next__OQIH=((__POINTER *)result__QQIH)[ 0];
-                if ((next__OQIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SQIH <<  1)) <=  4096)) {
-                    next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SQIH)));
+                next__OSJH=((__POINTER *)result__QSJH)[ 0];
+                if ((next__OSJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QSJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SSJH <<  1)) <=  4096)) {
+                    next__OSJH=(void *)((unsigned long)result__QSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SSJH)));
                   } else {
-                    next__OQIH=new_lab__MRJ(lab_type__RQIH);
+                    next__OSJH=new_lab__URJ(lab_type__RSJH);
                   };
-                  ((__POINTER *)next__OQIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+                  ((__POINTER *)next__OSJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PSJH)[ 0]=next__OSJH;
                 } else {
-                  ((__POINTER *)result__QQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QQIH=next__OQIH;
+                  ((__POINTER *)result__QSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QSJH=next__OSJH;
                 };
               };
-              ptr__3PIH=result__QQIH;
+              ptr__3RJH=result__QSJH;
             };
-            result__2PIH=((__LIP_BINARY *)ptr__3PIH);
-            *(result__2PIH) = *(LIP_BINARY__);
+            result__2RJH=((__LIP_BINARY *)ptr__3RJH);
+            *(result__2RJH) = *(LIP_BINARY__);
           };
-          Self__EQIH=((__LIP_BINARY *)result__2PIH);
-          Self__EQIH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__FQIH;
-          Self__EQIH->left__MZQD=result__POZB;
-          Self__EQIH->right__PZQD=right__QOZB;
-          Self__EQIH->operator__SZQD='&';
-          result__POZB=result__2PIH;
+          Self__ESJH=((__LIP_BINARY *)result__2RJH);
+          Self__ESJH->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ=p__FSJH;
+          Self__ESJH->left__UZQD=result__XOZB;
+          Self__ESJH->right__XZQD=right__YOZB;
+          Self__ESJH->operator__0ZQD='&';
+          result__XOZB=result__2RJH;
         };
-        goto while_do__P24B;
+        goto while_do__X24B;
       };
     };
   };
-  return(result__POZB);
+  return(result__XOZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__2QKD(__INTEGER new_count__4QKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__ERKD(__INTEGER new_count__GRKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__S1LD,ptr_table__UQIH,next__TQIH,result__VQIH;
-  __POINTER ptr_table__ZQIH,next__YQIH,result__0QIH;
-  __INTEGER typ_id__X1LD;
-  __UINTEGER_32 sz__U1LD,a__2JFH,new_size__3JFH,t__BKFH,a__AKFH;
-  __UINTEGER_32 new_size__2QIH,lab_type__1QIH;
-  __FAST_ARRAYoLIP_CODEo *result__R1LD,*Self__V4TD;
-  result__R1LD=NULL;
-  ptr__S1LD=((__POINTER )(NULL));
-  typ_id__X1LD= 0;
-  sz__U1LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
-  if ((sz__U1LD ==  0)) {
-    result__R1LD=FAST_ARRAYoLIP_CODEo__;
+  __POINTER ptr__01LD,ptr_table__USJH,next__TSJH,result__VSJH;
+  __POINTER ptr_table__ZSJH,next__YSJH,result__0SJH;
+  __INTEGER typ_id__51LD;
+  __UINTEGER_32 sz__21LD,a__MLGH,new_size__NLGH,t__RLGH,a__QLGH;
+  __UINTEGER_32 new_size__2SJH,lab_type__1SJH;
+  __FAST_ARRAYoLIP_CODEo *result__Z1LD,*Self__34TD;
+  result__Z1LD=NULL;
+  ptr__01LD=((__POINTER )(NULL));
+  typ_id__51LD= 0;
+  sz__21LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__21LD ==  0)) {
+    result__Z1LD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    typ_id__X1LD=__FAST_ARRAYoLIP_CODEo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__U1LD);
-    if ((typ_id__X1LD == (__INTEGER)(-  1))) {
-      a__2JFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__3JFH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1LD + a__2JFH) & (__UINTEGER_32)(~ a__2JFH));
-      ptr_table__UQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3JFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__TQIH=((__POINTER )(NULL));
-      result__VQIH=((__POINTER *)ptr_table__UQIH)[ 0];
-      if ((result__VQIH == (void *)NULL)) {
-        result__VQIH=new_lab__MRJ(new_size__3JFH);
-        next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3JFH)));
-        ((__POINTER *)next__TQIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
-      } else {
-        next__TQIH=((__POINTER *)result__VQIH)[ 0];
-        if ((next__TQIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VQIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3JFH <<  1)) <=  4096)) {
-            next__TQIH=(void *)((unsigned long)result__VQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3JFH)));
-          } else {
-            next__TQIH=new_lab__MRJ(new_size__3JFH);
-          };
-          ((__POINTER *)next__TQIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
-        } else {
-          ((__POINTER *)result__VQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VQIH=next__TQIH;
-        };
-      };
-      ptr__S1LD=result__VQIH;
-    } else {
-      t__BKFH=((__UINTEGER_32 )typ_id__X1LD);
-      a__AKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2QIH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1LD + a__AKFH) & (__UINTEGER_32)(~ a__AKFH));
-      ptr_table__ZQIH=((__POINTER )(&(table_type[(t__BKFH)])));
-      lab_type__1QIH=(__UINTEGER_32)(t__BKFH |  1);
-      next__YQIH=((__POINTER )(NULL));
-      result__0QIH=((__POINTER *)ptr_table__ZQIH)[ 0];
-      if ((result__0QIH == (void *)NULL)) {
-        result__0QIH=new_lab__MRJ(lab_type__1QIH);
-        next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2QIH)));
-        ((__POINTER *)next__YQIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
-      } else {
-        next__YQIH=((__POINTER *)result__0QIH)[ 0];
-        if ((next__YQIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0QIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2QIH <<  1)) <=  4096)) {
-            next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2QIH)));
-          } else {
-            next__YQIH=new_lab__MRJ(lab_type__1QIH);
-          };
-          ((__POINTER *)next__YQIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
-        } else {
-          ((__POINTER *)result__0QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__0QIH=next__YQIH;
-        };
-      };
-      ptr__S1LD=result__0QIH;
-    };
-    result__R1LD=((__FAST_ARRAYoLIP_CODEo *)ptr__S1LD);
-    *(result__R1LD) = *(FAST_ARRAYoLIP_CODEo__);
-  };
-  Self__V4TD=((__FAST_ARRAYoLIP_CODEo *)result__R1LD);
-  if ((Self__V4TD->parent_arrayed_collection__NLYC.capacity__1PTD < new_count__4QKD)) {
-    Self__V4TD->parent_arrayed_collection__NLYC.storage__GQTD=create__WYIE(new_count__4QKD);
-    Self__V4TD->parent_arrayed_collection__NLYC.capacity__1PTD=new_count__4QKD;
-  };
-  Self__V4TD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(-  1);
-  return(result__R1LD);
+    typ_id__51LD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__21LD);
+    if ((typ_id__51LD == (__INTEGER)(-  1))) {
+      a__MLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__21LD + a__MLGH) & (__UINTEGER_32)(~ a__MLGH));
+      ptr_table__USJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TSJH=((__POINTER )(NULL));
+      result__VSJH=((__POINTER *)ptr_table__USJH)[ 0];
+      if ((result__VSJH == (void *)NULL)) {
+        result__VSJH=new_lab__URJ(new_size__NLGH);
+        next__TSJH=(void *)((unsigned long)result__VSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLGH)));
+        ((__POINTER *)next__TSJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__USJH)[ 0]=next__TSJH;
+      } else {
+        next__TSJH=((__POINTER *)result__VSJH)[ 0];
+        if ((next__TSJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VSJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__NLGH <<  1)) <=  4096)) {
+            next__TSJH=(void *)((unsigned long)result__VSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLGH)));
+          } else {
+            next__TSJH=new_lab__URJ(new_size__NLGH);
+          };
+          ((__POINTER *)next__TSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__USJH)[ 0]=next__TSJH;
+        } else {
+          ((__POINTER *)result__VSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VSJH=next__TSJH;
+        };
+      };
+      ptr__01LD=result__VSJH;
+    } else {
+      t__RLGH=((__UINTEGER_32 )typ_id__51LD);
+      a__QLGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2SJH=(__UINTEGER_32)((__UINTEGER_32)(sz__21LD + a__QLGH) & (__UINTEGER_32)(~ a__QLGH));
+      ptr_table__ZSJH=((__POINTER )(&(table_type[(t__RLGH)])));
+      lab_type__1SJH=(__UINTEGER_32)(t__RLGH |  1);
+      next__YSJH=((__POINTER )(NULL));
+      result__0SJH=((__POINTER *)ptr_table__ZSJH)[ 0];
+      if ((result__0SJH == (void *)NULL)) {
+        result__0SJH=new_lab__URJ(lab_type__1SJH);
+        next__YSJH=(void *)((unsigned long)result__0SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2SJH)));
+        ((__POINTER *)next__YSJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZSJH)[ 0]=next__YSJH;
+      } else {
+        next__YSJH=((__POINTER *)result__0SJH)[ 0];
+        if ((next__YSJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0SJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2SJH <<  1)) <=  4096)) {
+            next__YSJH=(void *)((unsigned long)result__0SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2SJH)));
+          } else {
+            next__YSJH=new_lab__URJ(lab_type__1SJH);
+          };
+          ((__POINTER *)next__YSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZSJH)[ 0]=next__YSJH;
+        } else {
+          ((__POINTER *)result__0SJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0SJH=next__YSJH;
+        };
+      };
+      ptr__01LD=result__0SJH;
+    };
+    result__Z1LD=((__FAST_ARRAYoLIP_CODEo *)ptr__01LD);
+    *(result__Z1LD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__34TD=((__FAST_ARRAYoLIP_CODEo *)result__Z1LD);
+  if ((Self__34TD->parent_arrayed_collection__VLYC.capacity__DQTD < new_count__GRKD)) {
+    Self__34TD->parent_arrayed_collection__VLYC.storage__OQTD=create__OUIE(new_count__GRKD);
+    Self__34TD->parent_arrayed_collection__VLYC.capacity__DQTD=new_count__GRKD;
+  };
+  Self__34TD->parent_arrayed_collection__VLYC.upper__EEQD=(__INTEGER)(-  1);
+  return(result__Z1LD);
 }
 
-static void add_last__JJUD(__FAST_ARRAYoLIP_CODEo *Self__KJUD,void *element__LJUD)
+static void add_last__RJUD(__FAST_ARRAYoLIP_CODEo *Self__SJUD,void *element__TJUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__MJUD,__tmp__QKUD,__tmp__ZJWE,Self__ZZPF;
-  __BOOLEAN __tmp__0JUD;
-  void **__tmp__PKUD,**new__FJWE;
-  new_capacity__MJUD= 0;
-  if (((__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1) <= (__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD -  1))) {
-    Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1);
-    __tmp__0JUD=TRUE__;
+  __INTEGER new_capacity__UJUD,__tmp__YKUD,__tmp__OJWE,Self__3FQF;
+  __BOOLEAN __tmp__CKUD;
+  void **__tmp__XKUD,**new__0IWE;
+  new_capacity__UJUD= 0;
+  if (((__INTEGER)(Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD +  1) <= (__INTEGER)(Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD -  1))) {
+    Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD=(__INTEGER)(Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD +  1);
+    __tmp__CKUD=TRUE__;
   } else {
-    __tmp__0JUD=FALSE__;
-  };
-  if ((! __tmp__0JUD)) {
-    if ((Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD ==  0)) {
-      Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD=create__WYIE( 2);
-      Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD= 2;
-      Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD= 0;
-    } else {
-      new_capacity__MJUD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD <<  1);
-      __tmp__PKUD=Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD;
-      __tmp__QKUD=Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD;
-      new__FJWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__PKUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__QKUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MJUD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__ZJWE=(__INTEGER)(new_capacity__MJUD -  1);
-      Self__ZZPF=__tmp__QKUD;
-      while ((Self__ZZPF <= __tmp__ZJWE)) {
-        new__FJWE[Self__ZZPF]=NULL;
-        Self__ZZPF=(__INTEGER)(Self__ZZPF +  1);
-      };
-      Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD=new__FJWE;
-      Self__KJUD->parent_arrayed_collection__NLYC.capacity__1PTD=new_capacity__MJUD;
-      Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD +  1);
-    };
-  };
-  ((void **)Self__KJUD->parent_arrayed_collection__NLYC.storage__GQTD)[Self__KJUD->parent_arrayed_collection__NLYC.upper__2DQD]=element__LJUD;
+    __tmp__CKUD=FALSE__;
+  };
+  if ((! __tmp__CKUD)) {
+    if ((Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD ==  0)) {
+      Self__SJUD->parent_arrayed_collection__VLYC.storage__OQTD=create__OUIE( 2);
+      Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD= 2;
+      Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD= 0;
+    } else {
+      new_capacity__UJUD=(__INTEGER)(Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD <<  1);
+      __tmp__XKUD=Self__SJUD->parent_arrayed_collection__VLYC.storage__OQTD;
+      __tmp__YKUD=Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD;
+      new__0IWE=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__XKUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__YKUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__UJUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__OJWE=(__INTEGER)(new_capacity__UJUD -  1);
+      Self__3FQF=__tmp__YKUD;
+      while ((Self__3FQF <= __tmp__OJWE)) {
+        new__0IWE[Self__3FQF]=NULL;
+        Self__3FQF=(__INTEGER)(Self__3FQF +  1);
+      };
+      Self__SJUD->parent_arrayed_collection__VLYC.storage__OQTD=new__0IWE;
+      Self__SJUD->parent_arrayed_collection__VLYC.capacity__DQTD=new_capacity__UJUD;
+      Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD=(__INTEGER)(Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD +  1);
+    };
+  };
+  ((void **)Self__SJUD->parent_arrayed_collection__VLYC.storage__OQTD)[Self__SJUD->parent_arrayed_collection__VLYC.upper__EEQD]=element__TJUD;
 }
 
-static void* copy__ILID(void *tmp__KLID)
+static void* copy__QLID(void *tmp__SLID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__SPTD,other_upper__RPTD,Self__SAYE;
-  __INTEGER new_capacity__OAUD,__tmp__WBUD,__tmp__FIWE,Self__0XPF;
-  void *result__MLID;
-  __FAST_ARRAYoLIP_CODEo *Self__PPTD;
-  void **__tmp__JQTD,**__tmp__LQTD,**Self__E5VE;
-  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__MAUD;
-  __BOOLEAN __tmp__3AUD;
-  void **__tmp__VBUD,**new__RHWE;
-  result__MLID=create_with_capacity__2QKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD +  1));
-  Self__PPTD=((__FAST_ARRAYoLIP_CODEo *)result__MLID);
-  new_capacity__SPTD= 0;
-  other_upper__RPTD=((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD;
-  if ((other_upper__RPTD >=  0)) {
-    new_capacity__SPTD=(__INTEGER)(other_upper__RPTD +  1);
-    if ((Self__PPTD->parent_arrayed_collection__NLYC.capacity__1PTD < new_capacity__SPTD)) {
-      Self__PPTD->parent_arrayed_collection__NLYC.storage__GQTD=create__WYIE(new_capacity__SPTD);
-      Self__PPTD->parent_arrayed_collection__NLYC.capacity__1PTD=new_capacity__SPTD;
-    };
-    __tmp__JQTD=Self__PPTD->parent_arrayed_collection__NLYC.storage__GQTD;
-    __tmp__LQTD=((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.storage__GQTD;
-    Self__E5VE=((void **)__tmp__JQTD);
-    Self__SAYE=other_upper__RPTD;
-    while ((Self__SAYE >=  0)) {
-      Self__E5VE[Self__SAYE]=((void **)__tmp__LQTD)[Self__SAYE];
-      Self__SAYE=(__INTEGER)(Self__SAYE -  1);
-    };
-  };
-  Self__PPTD->parent_arrayed_collection__NLYC.upper__2DQD=other_upper__RPTD;
-  ((__FAST_ARRAYoLIP_CODEo *)tmp__KLID)->parent_arrayed_collection__NLYC.upper__2DQD=(__INTEGER)(-  1);
-  Self__MAUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__GKID);
-  new_capacity__OAUD= 0;
-  if (((__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1) <= (__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD -  1))) {
-    Self__MAUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1);
-    __tmp__3AUD=TRUE__;
+  __INTEGER new_capacity__0PTD,other_upper__ZPTD,Self__VAYE;
+  __INTEGER new_capacity__WAUD,__tmp__4BUD,__tmp__0HWE,Self__4DQF;
+  void *result__ULID;
+  __FAST_ARRAYoLIP_CODEo *Self__XPTD;
+  void **__tmp__RQTD,**__tmp__TQTD,**Self__H5VE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__UAUD;
+  __BOOLEAN __tmp__FBUD;
+  void **__tmp__3BUD,**new__GHWE;
+  result__ULID=create_with_capacity__ERKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__SLID)->parent_arrayed_collection__VLYC.upper__EEQD +  1));
+  Self__XPTD=((__FAST_ARRAYoLIP_CODEo *)result__ULID);
+  new_capacity__0PTD= 0;
+  other_upper__ZPTD=((__FAST_ARRAYoLIP_CODEo *)tmp__SLID)->parent_arrayed_collection__VLYC.upper__EEQD;
+  if ((other_upper__ZPTD >=  0)) {
+    new_capacity__0PTD=(__INTEGER)(other_upper__ZPTD +  1);
+    if ((Self__XPTD->parent_arrayed_collection__VLYC.capacity__DQTD < new_capacity__0PTD)) {
+      Self__XPTD->parent_arrayed_collection__VLYC.storage__OQTD=create__OUIE(new_capacity__0PTD);
+      Self__XPTD->parent_arrayed_collection__VLYC.capacity__DQTD=new_capacity__0PTD;
+    };
+    __tmp__RQTD=Self__XPTD->parent_arrayed_collection__VLYC.storage__OQTD;
+    __tmp__TQTD=((__FAST_ARRAYoLIP_CODEo *)tmp__SLID)->parent_arrayed_collection__VLYC.storage__OQTD;
+    Self__H5VE=((void **)__tmp__RQTD);
+    Self__VAYE=other_upper__ZPTD;
+    while ((Self__VAYE >=  0)) {
+      Self__H5VE[Self__VAYE]=((void **)__tmp__TQTD)[Self__VAYE];
+      Self__VAYE=(__INTEGER)(Self__VAYE -  1);
+    };
+  };
+  Self__XPTD->parent_arrayed_collection__VLYC.upper__EEQD=other_upper__ZPTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__SLID)->parent_arrayed_collection__VLYC.upper__EEQD=(__INTEGER)(-  1);
+  Self__UAUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__OKID);
+  new_capacity__WAUD= 0;
+  if (((__INTEGER)(Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD +  1) <= (__INTEGER)(Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD -  1))) {
+    Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD=(__INTEGER)(Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD +  1);
+    __tmp__FBUD=TRUE__;
   } else {
-    __tmp__3AUD=FALSE__;
-  };
-  if ((! __tmp__3AUD)) {
-    if ((Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD ==  0)) {
-      Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD=create__K4IE( 2);
-      Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD= 2;
-      Self__MAUD->parent_arrayed_collection__FKID.upper__POTD= 0;
-    } else {
-      new_capacity__OAUD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD <<  1);
-      __tmp__VBUD=Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD;
-      __tmp__WBUD=Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD;
-      new__RHWE=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VBUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__WBUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OAUD * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__FIWE=(__INTEGER)(new_capacity__OAUD -  1);
-      Self__0XPF=__tmp__WBUD;
-      while ((Self__0XPF <= __tmp__FIWE)) {
-        new__RHWE[Self__0XPF]=NULL;
-        Self__0XPF=(__INTEGER)(Self__0XPF +  1);
-      };
-      Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD=new__RHWE;
-      Self__MAUD->parent_arrayed_collection__FKID.capacity__QAUD=new_capacity__OAUD;
-      Self__MAUD->parent_arrayed_collection__FKID.upper__POTD=(__INTEGER)(Self__MAUD->parent_arrayed_collection__FKID.upper__POTD +  1);
-    };
-  };
-  ((void **)Self__MAUD->parent_arrayed_collection__FKID.storage__MBUD)[Self__MAUD->parent_arrayed_collection__FKID.upper__POTD]=tmp__KLID;
-  return(result__MLID);
+    __tmp__FBUD=FALSE__;
+  };
+  if ((! __tmp__FBUD)) {
+    if ((Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD ==  0)) {
+      Self__UAUD->parent_arrayed_collection__NKID.storage__UBUD=create__C0IE( 2);
+      Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD= 2;
+      Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD= 0;
+    } else {
+      new_capacity__WAUD=(__INTEGER)(Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD <<  1);
+      __tmp__3BUD=Self__UAUD->parent_arrayed_collection__NKID.storage__UBUD;
+      __tmp__4BUD=Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD;
+      new__GHWE=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__3BUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__4BUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WAUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__0HWE=(__INTEGER)(new_capacity__WAUD -  1);
+      Self__4DQF=__tmp__4BUD;
+      while ((Self__4DQF <= __tmp__0HWE)) {
+        new__GHWE[Self__4DQF]=NULL;
+        Self__4DQF=(__INTEGER)(Self__4DQF +  1);
+      };
+      Self__UAUD->parent_arrayed_collection__NKID.storage__UBUD=new__GHWE;
+      Self__UAUD->parent_arrayed_collection__NKID.capacity__YAUD=new_capacity__WAUD;
+      Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD=(__INTEGER)(Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD +  1);
+    };
+  };
+  ((void **)Self__UAUD->parent_arrayed_collection__NKID.storage__UBUD)[Self__UAUD->parent_arrayed_collection__NKID.upper__XOTD]=tmp__SLID;
+  return(result__ULID);
 }
 
-static void* fast_reference_at__OURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__PURD,void *k__QURD)
+static void* fast_reference_at__WURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__XURD,void *k__YURD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__GTGH;
-  __INTEGER result__FTGH,__tmp__HTGH,Self__ITGH;
-  void *node__0URD;
-  __BOOLEAN __tmp__SVRD;
-  Self__GTGH=((__STRING_CONSTANT *)k__QURD);
-  result__FTGH= 0;
-  __tmp__HTGH=Self__GTGH->count__DD;
-  Self__ITGH= 1;
-  while ((Self__ITGH <= __tmp__HTGH)) {
-    result__FTGH=(__INTEGER)((__INTEGER)( 5 * result__FTGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GTGH->storage__VQO)[(__INTEGER)(Self__ITGH -  1)])));
-    Self__ITGH=(__INTEGER)(Self__ITGH +  1);
-  };
-  if ((result__FTGH <  0)) {
-    result__FTGH=(__INTEGER)(~ result__FTGH);
-  };
-  node__0URD=((void **)Self__PURD->buckets__CVRD)[(__INTEGER)(result__FTGH % Self__PURD->capacity__3URD)];
-  until_do__5FWD:
+  __STRING_CONSTANT *Self__BVHH;
+  __INTEGER result__AVHH,__tmp__CVHH,Self__DVHH;
+  void *node__CVRD;
+  __BOOLEAN __tmp__0VRD;
+  Self__BVHH=((__STRING_CONSTANT *)k__YURD);
+  result__AVHH= 0;
+  __tmp__CVHH=Self__BVHH->count__DD;
+  Self__DVHH= 1;
+  while ((Self__DVHH <= __tmp__CVHH)) {
+    result__AVHH=(__INTEGER)((__INTEGER)( 5 * result__AVHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BVHH->storage__3QO)[(__INTEGER)(Self__DVHH -  1)])));
+    Self__DVHH=(__INTEGER)(Self__DVHH +  1);
+  };
+  if ((result__AVHH <  0)) {
+    result__AVHH=(__INTEGER)(~ result__AVHH);
+  };
+  node__CVRD=((void **)Self__XURD->buckets__KVRD)[(__INTEGER)(result__AVHH % Self__XURD->capacity__FVRD)];
+  until_do__HGWD:
   {
-    if (((void *)node__0URD == (void *)NULL)) {
-      __tmp__SVRD=TRUE__;
+    if (((void *)node__CVRD == (void *)NULL)) {
+      __tmp__0VRD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__SVRD=((void *)NULL == (void *)k__QURD);
+      __tmp__0VRD=((void *)NULL == (void *)k__YURD);
     };
-    if ((! __tmp__SVRD)) {
+    if ((! __tmp__0VRD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__0URD=NULL;
-      goto until_do__5FWD;
+      node__CVRD=NULL;
+      goto until_do__HGWD;
     };
   };
-  if (((void *)node__0URD != (void *)NULL)) {
+  if (((void *)node__CVRD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__GZQD(__LIP_BINARY *Self__HZQD)
+static void* run_expr__OZQD(__LIP_BINARY *Self__PZQD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  void *result__JZQD,*__tmp__OZQD,*__tmp__4QIH,*__tmp__5QIH,*__tmp__RZQD;
-  void *__tmp__DRIH,*__tmp__ERIH,*result__FX2F,*__tmp__ZZQD;
-  void *result__VX2F,*result__HY2F,*__tmp__A0QD,*result__XY2F;
-  void *result__JZ2F,*__tmp__H0QD,*result__ZZ2F,*result__QWGG;
-  void *result__L02F,*__tmp__O0QD,*result__102F,*result__BXGG;
-  void *__tmp__V0QD,*result__312F,*__tmp__20QD,*result__522F;
-  void *__tmp__D1QD,*result__B42F,*__tmp__K1QD,*result__D52F;
-  void *__tmp__R1QD,*result__FA3F,*result__WZGG,*__tmp__Y1QD;
-  void *result__HB3F;
-  void *__tmp__NZQD,*__tmp__QZQD;
-  __LIP_INTEGER *Self__ARIH,*Self__FRIH,*Self__SX2F,*__tmp__YX2F;
-  __LIP_INTEGER *s__WX2F,*Self__UY2F,*__tmp__0Y2F,*s__YY2F,*Self__WZ2F;
-  __LIP_INTEGER *__tmp__2Z2F,*s__0Z2F,*Self__Y02F,*__tmp__402F,*s__202F;
-  __LIP_INTEGER *Self__012F,*__tmp__A22F,*s__412F,*Self__222F;
-  __LIP_INTEGER *__tmp__C32F,*s__A32F,*Self__432F,*__tmp__E42F,*s__C42F;
-  __LIP_INTEGER *Self__A52F,*__tmp__G52F,*s__E52F,*Self__CA3F;
-  __LIP_INTEGER *__tmp__IA3F,*s__GA3F,*Self__EB3F,*__tmp__KB3F,*s__IB3F;
-  __LIP_STRING *Self__BRIH,*Self__GRIH,*__tmp__RVGG,*s__PVGG;
-  __LIP_STRING *__tmp__CWGG,*s__AWGG,*Self__NWGG,*__tmp__TWGG,*s__RWGG;
-  __LIP_STRING *Self__4WGG,*__tmp__EXGG,*s__CXGG,*__tmp__VXGG,*s__TXGG;
-  __LIP_STRING *__tmp__GYGG,*s__EYGG,*__tmp__XYGG,*s__VYGG,*__tmp__IZGG;
-  __LIP_STRING *s__GZGG,*Self__TZGG,*__tmp__ZZGG,*s__XZGG,*__tmp__K0GG;
-  __LIP_STRING *s__I0GG;
-  __LIP_BOOLEAN *Self__CX2F,*__tmp__IX2F,*s__GX2F,*Self__EY2F;
-  __LIP_BOOLEAN *__tmp__KY2F,*s__IY2F,*Self__GZ2F,*__tmp__MZ2F,*s__KZ2F;
-  __LIP_BOOLEAN *Self__I02F,*__tmp__O02F,*s__M02F,*__tmp__Q12F,*s__O12F;
-  __LIP_BOOLEAN *__tmp__S22F,*s__Q22F,*__tmp__U32F,*s__S32F,*__tmp__W42F;
-  __LIP_BOOLEAN *s__U42F,*__tmp__Y52F,*s__W52F,*__tmp__0A3F,*s__YA3F;
-  void *result__CFDH,*result__EFDH,*result__GFDH,*result__IFDH;
-  void *result__KFDH,*result__MFDH,*result__OFDH,*result__QFDH;
-  void *result__SFDH,*result__UFDH,*result__WFDH,*result__YFDH;
-  __POSITION __tmp__B2QD;
-  __CHARACTER Self__KRVD;
-  __BOOLEAN b__DFDH,b__FFDH,b__HFDH,b__JFDH,b__LFDH,b__NFDH,b__PFDH;
-  __BOOLEAN b__RFDH,b__TFDH,b__VFDH,b__XFDH,b__ZFDH;
-  result__JZQD=NULL;
-  __tmp__NZQD=Self__HZQD->left__MZQD;
-  switch (((struct ___OBJ *)__tmp__NZQD)->__id) {
+  void *result__RZQD,*__tmp__WZQD,*__tmp__4SJH,*__tmp__5SJH,*__tmp__ZZQD;
+  void *__tmp__DTJH,*__tmp__ETJH,*result__IO3F,*__tmp__B0QD;
+  void *result__YO3F,*result__KP3F,*__tmp__I0QD,*result__0P3F;
+  void *result__MQ3F,*__tmp__P0QD,*result__2Q3F,*result__KTHG;
+  void *result__OR3F,*__tmp__W0QD,*result__4R3F,*result__1THG;
+  void *__tmp__30QD,*result__AT3F,*__tmp__E1QD,*result__CU3F;
+  void *__tmp__L1QD,*result__EV3F,*__tmp__S1QD,*result__GW3F;
+  void *__tmp__Z1QD,*result__IX3F,*result__QWHG,*__tmp__A2QD;
+  void *result__KY3F;
+  void *__tmp__VZQD,*__tmp__YZQD;
+  __LIP_INTEGER *Self__ATJH,*Self__FTJH,*Self__VO3F,*__tmp__1O3F;
+  __LIP_INTEGER *s__ZO3F,*Self__XP3F,*__tmp__3P3F,*s__1P3F,*Self__ZQ3F;
+  __LIP_INTEGER *__tmp__5Q3F,*s__3Q3F,*Self__1R3F,*__tmp__BS3F,*s__5R3F;
+  __LIP_INTEGER *Self__3S3F,*__tmp__DT3F,*s__BT3F,*Self__5T3F;
+  __LIP_INTEGER *__tmp__FU3F,*s__DU3F,*Self__BV3F,*__tmp__HV3F,*s__FV3F;
+  __LIP_INTEGER *Self__DW3F,*__tmp__JW3F,*s__HW3F,*Self__FX3F;
+  __LIP_INTEGER *__tmp__LX3F,*s__JX3F,*Self__HY3F,*__tmp__NY3F,*s__LY3F;
+  __LIP_STRING *Self__BTJH,*Self__GTJH,*__tmp__LSHG,*s__JSHG;
+  __LIP_STRING *__tmp__2SHG,*s__0SHG,*Self__HTHG,*__tmp__NTHG,*s__LTHG;
+  __LIP_STRING *Self__YTHG,*__tmp__4THG,*s__2THG,*__tmp__PUHG,*s__NUHG;
+  __LIP_STRING *__tmp__AVHG,*s__4UHG,*__tmp__RVHG,*s__PVHG,*__tmp__CWHG;
+  __LIP_STRING *s__AWHG,*Self__NWHG,*__tmp__TWHG,*s__RWHG,*__tmp__EXHG;
+  __LIP_STRING *s__CXHG;
+  __LIP_BOOLEAN *Self__FO3F,*__tmp__LO3F,*s__JO3F,*Self__HP3F;
+  __LIP_BOOLEAN *__tmp__NP3F,*s__LP3F,*Self__JQ3F,*__tmp__PQ3F,*s__NQ3F;
+  __LIP_BOOLEAN *Self__LR3F,*__tmp__RR3F,*s__PR3F,*__tmp__TS3F,*s__RS3F;
+  __LIP_BOOLEAN *__tmp__VT3F,*s__TT3F,*__tmp__XU3F,*s__VU3F,*__tmp__ZV3F;
+  __LIP_BOOLEAN *s__XV3F,*__tmp__1W3F,*s__ZW3F,*__tmp__3X3F,*s__1X3F;
+  void *result__XFEH,*result__ZFEH,*result__1FEH,*result__3FEH;
+  void *result__5FEH,*result__BGEH,*result__DGEH,*result__FGEH;
+  void *result__HGEH,*result__JGEH,*result__LGEH,*result__NGEH;
+  __POSITION __tmp__J2QD;
+  __CHARACTER Self__SRVD;
+  __BOOLEAN b__YFEH,b__0FEH,b__2FEH,b__4FEH,b__AGEH,b__CGEH,b__EGEH;
+  __BOOLEAN b__GGEH,b__IGEH,b__KGEH,b__MGEH,b__OGEH;
+  result__RZQD=NULL;
+  __tmp__VZQD=Self__PZQD->left__UZQD;
+  switch (((struct ___OBJ *)__tmp__VZQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__OZQD=run_expr__GZQD(__tmp__NZQD);
+    __tmp__WZQD=run_expr__OZQD(__tmp__VZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__OZQD=run_expr__F2QD(__tmp__NZQD);
+    __tmp__WZQD=run_expr__N2QD(__tmp__VZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__OZQD=run_expr__FGUE(__tmp__NZQD);
+    __tmp__WZQD=run_expr__IGUE(__tmp__VZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__4QIH=((__LIP_VALUE *)__tmp__NZQD)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__4QIH)->__id) {
+    __tmp__4SJH=((__LIP_VALUE *)__tmp__VZQD)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__4SJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__5QIH=((__LIP_BOOLEAN *)__tmp__4QIH);
+      __tmp__5SJH=((__LIP_BOOLEAN *)__tmp__4SJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__ARIH=((__LIP_INTEGER *)__tmp__4QIH);
-      __tmp__5QIH=get__0JSE(Self__ARIH,Self__ARIH->value__0B3F);
+      Self__ATJH=((__LIP_INTEGER *)__tmp__4SJH);
+      __tmp__5SJH=get__KJSE(Self__ATJH,Self__ATJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__BRIH=((__LIP_STRING *)__tmp__4QIH);
-      __tmp__5QIH=get__RBFF(Self__BRIH,Self__BRIH->value__TBUE);
+      Self__BTJH=((__LIP_STRING *)__tmp__4SJH);
+      __tmp__5SJH=get__TMFF(Self__BTJH,Self__BTJH->value__WBUE);
     } break;
     };
-    __tmp__OZQD=__tmp__5QIH;
+    __tmp__WZQD=__tmp__5SJH;
   } break;
   };
-  __tmp__QZQD=Self__HZQD->right__PZQD;
-  switch (((struct ___OBJ *)__tmp__QZQD)->__id) {
+  __tmp__YZQD=Self__PZQD->right__XZQD;
+  switch (((struct ___OBJ *)__tmp__YZQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__RZQD=run_expr__GZQD(__tmp__QZQD);
+    __tmp__ZZQD=run_expr__OZQD(__tmp__YZQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__RZQD=run_expr__F2QD(__tmp__QZQD);
+    __tmp__ZZQD=run_expr__N2QD(__tmp__YZQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__RZQD=run_expr__FGUE(__tmp__QZQD);
+    __tmp__ZZQD=run_expr__IGUE(__tmp__YZQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__DRIH=((__LIP_VALUE *)__tmp__QZQD)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__DRIH)->__id) {
+    __tmp__DTJH=((__LIP_VALUE *)__tmp__YZQD)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__DTJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__ERIH=((__LIP_BOOLEAN *)__tmp__DRIH);
+      __tmp__ETJH=((__LIP_BOOLEAN *)__tmp__DTJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__FRIH=((__LIP_INTEGER *)__tmp__DRIH);
-      __tmp__ERIH=get__0JSE(Self__FRIH,Self__FRIH->value__0B3F);
+      Self__FTJH=((__LIP_INTEGER *)__tmp__DTJH);
+      __tmp__ETJH=get__KJSE(Self__FTJH,Self__FTJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__GRIH=((__LIP_STRING *)__tmp__DRIH);
-      __tmp__ERIH=get__RBFF(Self__GRIH,Self__GRIH->value__TBUE);
+      Self__GTJH=((__LIP_STRING *)__tmp__DTJH);
+      __tmp__ETJH=get__TMFF(Self__GTJH,Self__GTJH->value__WBUE);
     } break;
     };
-    __tmp__RZQD=__tmp__ERIH;
+    __tmp__ZZQD=__tmp__ETJH;
   } break;
   };
-  Self__KRVD=Self__HZQD->operator__SZQD;
-  if ((Self__KRVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  Self__SRVD=Self__PZQD->operator__0ZQD;
+  if ((Self__SRVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__CX2F=((__LIP_BOOLEAN *)__tmp__OZQD);
-      result__FX2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__IX2F=NULL;
+      Self__FO3F=((__LIP_BOOLEAN *)__tmp__WZQD);
+      result__IO3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__LO3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IX2F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__LO3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IX2F=NULL;
+          __tmp__LO3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__IX2F=NULL;
+          __tmp__LO3F=NULL;
         } break;
         }
       };
-      s__GX2F=__tmp__IX2F;
-      if (((void *)__tmp__IX2F != (void *)NULL)) {
-        b__DFDH=(Self__CX2F->value__PDQD | __tmp__IX2F->value__PDQD);
-        result__CFDH=NULL;
-        if (b__DFDH) {
-          result__CFDH=true__GZKF;
+      s__JO3F=__tmp__LO3F;
+      if (((void *)__tmp__LO3F != (void *)NULL)) {
+        b__YFEH=(Self__FO3F->value__XDQD | __tmp__LO3F->value__XDQD);
+        result__XFEH=NULL;
+        if (b__YFEH) {
+          result__XFEH=true__SELF;
         } else {
-          result__CFDH=LIP_BOOLEAN__;
+          result__XFEH=LIP_BOOLEAN__;
         };
-        result__FX2F=result__CFDH;
+        result__IO3F=result__XFEH;
       };
-      __tmp__ZZQD=result__FX2F;
+      __tmp__B0QD=result__IO3F;
     } break;
     case __LIP_INTEGER__: {
-      Self__SX2F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__VX2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__YX2F=NULL;
+      Self__VO3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__YO3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__1O3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__YX2F=NULL;
+          __tmp__1O3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__YX2F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__1O3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__YX2F=NULL;
+          __tmp__1O3F=NULL;
         } break;
         }
       };
-      s__WX2F=__tmp__YX2F;
-      if (((void *)__tmp__YX2F != (void *)NULL)) {
-        Self__SX2F->value__0B3F=(__INTEGER)(Self__SX2F->value__0B3F | __tmp__YX2F->value__0B3F);
-        free__SW2F(__tmp__YX2F);
-        result__VX2F=Self__SX2F;
+      s__ZO3F=__tmp__1O3F;
+      if (((void *)__tmp__1O3F != (void *)NULL)) {
+        Self__VO3F->value__3Y3F=(__INTEGER)(Self__VO3F->value__3Y3F | __tmp__1O3F->value__3Y3F);
+        free__VN3F(__tmp__1O3F);
+        result__YO3F=Self__VO3F;
       };
-      __tmp__ZZQD=result__VX2F;
+      __tmp__B0QD=result__YO3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__RVGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__LSHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__RVGG=NULL;
+          __tmp__LSHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__RVGG=NULL;
+          __tmp__LSHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__RVGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__LSHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__PVGG=__tmp__RVGG;
-      __tmp__ZZQD=NULL;
+      s__JSHG=__tmp__LSHG;
+      __tmp__B0QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__ZZQD;
+    result__RZQD=__tmp__B0QD;
   };
-  if ((Self__KRVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__EY2F=((__LIP_BOOLEAN *)__tmp__OZQD);
-      result__HY2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__KY2F=NULL;
+      Self__HP3F=((__LIP_BOOLEAN *)__tmp__WZQD);
+      result__KP3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__NP3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__KY2F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__NP3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__KY2F=NULL;
+          __tmp__NP3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__KY2F=NULL;
+          __tmp__NP3F=NULL;
         } break;
         }
       };
-      s__IY2F=__tmp__KY2F;
-      if (((void *)__tmp__KY2F != (void *)NULL)) {
-        b__FFDH=(Self__EY2F->value__PDQD & __tmp__KY2F->value__PDQD);
-        result__EFDH=NULL;
-        if (b__FFDH) {
-          result__EFDH=true__GZKF;
+      s__LP3F=__tmp__NP3F;
+      if (((void *)__tmp__NP3F != (void *)NULL)) {
+        b__0FEH=(Self__HP3F->value__XDQD & __tmp__NP3F->value__XDQD);
+        result__ZFEH=NULL;
+        if (b__0FEH) {
+          result__ZFEH=true__SELF;
         } else {
-          result__EFDH=LIP_BOOLEAN__;
+          result__ZFEH=LIP_BOOLEAN__;
         };
-        result__HY2F=result__EFDH;
+        result__KP3F=result__ZFEH;
       };
-      __tmp__A0QD=result__HY2F;
+      __tmp__I0QD=result__KP3F;
     } break;
     case __LIP_INTEGER__: {
-      Self__UY2F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__XY2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__0Y2F=NULL;
+      Self__XP3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__0P3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__3P3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0Y2F=NULL;
+          __tmp__3P3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0Y2F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__3P3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__0Y2F=NULL;
+          __tmp__3P3F=NULL;
         } break;
         }
       };
-      s__YY2F=__tmp__0Y2F;
-      if (((void *)__tmp__0Y2F != (void *)NULL)) {
-        Self__UY2F->value__0B3F=(__INTEGER)(Self__UY2F->value__0B3F & __tmp__0Y2F->value__0B3F);
-        free__SW2F(__tmp__0Y2F);
-        result__XY2F=Self__UY2F;
+      s__1P3F=__tmp__3P3F;
+      if (((void *)__tmp__3P3F != (void *)NULL)) {
+        Self__XP3F->value__3Y3F=(__INTEGER)(Self__XP3F->value__3Y3F & __tmp__3P3F->value__3Y3F);
+        free__VN3F(__tmp__3P3F);
+        result__0P3F=Self__XP3F;
       };
-      __tmp__A0QD=result__XY2F;
+      __tmp__I0QD=result__0P3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__CWGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__2SHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CWGG=NULL;
+          __tmp__2SHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CWGG=NULL;
+          __tmp__2SHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CWGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__2SHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__AWGG=__tmp__CWGG;
-      __tmp__A0QD=NULL;
+      s__0SHG=__tmp__2SHG;
+      __tmp__I0QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__A0QD;
+    result__RZQD=__tmp__I0QD;
   };
-  if ((Self__KRVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__GZ2F=((__LIP_BOOLEAN *)__tmp__OZQD);
-      result__JZ2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__MZ2F=NULL;
+      Self__JQ3F=((__LIP_BOOLEAN *)__tmp__WZQD);
+      result__MQ3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__PQ3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__MZ2F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__PQ3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__MZ2F=NULL;
+          __tmp__PQ3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__MZ2F=NULL;
+          __tmp__PQ3F=NULL;
         } break;
         }
       };
-      s__KZ2F=__tmp__MZ2F;
-      if (((void *)__tmp__MZ2F != (void *)NULL)) {
-        b__HFDH=(Self__GZ2F->value__PDQD == __tmp__MZ2F->value__PDQD);
-        result__GFDH=NULL;
-        if (b__HFDH) {
-          result__GFDH=true__GZKF;
+      s__NQ3F=__tmp__PQ3F;
+      if (((void *)__tmp__PQ3F != (void *)NULL)) {
+        b__2FEH=(Self__JQ3F->value__XDQD == __tmp__PQ3F->value__XDQD);
+        result__1FEH=NULL;
+        if (b__2FEH) {
+          result__1FEH=true__SELF;
         } else {
-          result__GFDH=LIP_BOOLEAN__;
+          result__1FEH=LIP_BOOLEAN__;
         };
-        result__JZ2F=result__GFDH;
+        result__MQ3F=result__1FEH;
       };
-      __tmp__H0QD=result__JZ2F;
+      __tmp__P0QD=result__MQ3F;
     } break;
     case __LIP_INTEGER__: {
-      Self__WZ2F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__ZZ2F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__2Z2F=NULL;
+      Self__ZQ3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__2Q3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__5Q3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__2Z2F=NULL;
+          __tmp__5Q3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__2Z2F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__5Q3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__2Z2F=NULL;
+          __tmp__5Q3F=NULL;
         } break;
         }
       };
-      s__0Z2F=__tmp__2Z2F;
-      if (((void *)__tmp__2Z2F != (void *)NULL)) {
-        free__SW2F(__tmp__2Z2F);
-        free__SW2F(Self__WZ2F);
-        b__JFDH=(Self__WZ2F->value__0B3F == __tmp__2Z2F->value__0B3F);
-        result__IFDH=NULL;
-        if (b__JFDH) {
-          result__IFDH=true__GZKF;
+      s__3Q3F=__tmp__5Q3F;
+      if (((void *)__tmp__5Q3F != (void *)NULL)) {
+        free__VN3F(__tmp__5Q3F);
+        free__VN3F(Self__ZQ3F);
+        b__4FEH=(Self__ZQ3F->value__3Y3F == __tmp__5Q3F->value__3Y3F);
+        result__3FEH=NULL;
+        if (b__4FEH) {
+          result__3FEH=true__SELF;
         } else {
-          result__IFDH=LIP_BOOLEAN__;
+          result__3FEH=LIP_BOOLEAN__;
         };
-        result__ZZ2F=result__IFDH;
+        result__2Q3F=result__3FEH;
       };
-      __tmp__H0QD=result__ZZ2F;
+      __tmp__P0QD=result__2Q3F;
     } break;
     case __LIP_STRING__: {
-      Self__NWGG=((__LIP_STRING *)__tmp__OZQD);
-      result__QWGG=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__TWGG=NULL;
+      Self__HTHG=((__LIP_STRING *)__tmp__WZQD);
+      result__KTHG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__NTHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TWGG=NULL;
+          __tmp__NTHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TWGG=NULL;
+          __tmp__NTHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__TWGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__NTHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__RWGG=__tmp__TWGG;
-      if (((void *)__tmp__TWGG != (void *)NULL)) {
-        free__EVGG(__tmp__TWGG);
-        free__EVGG(Self__NWGG);
-        b__LFDH=((void *)Self__NWGG->value__TBUE == (void *)__tmp__TWGG->value__TBUE);
-        result__KFDH=NULL;
-        if (b__LFDH) {
-          result__KFDH=true__GZKF;
+      s__LTHG=__tmp__NTHG;
+      if (((void *)__tmp__NTHG != (void *)NULL)) {
+        free__4RHG(__tmp__NTHG);
+        free__4RHG(Self__HTHG);
+        b__AGEH=((void *)Self__HTHG->value__WBUE == (void *)__tmp__NTHG->value__WBUE);
+        result__5FEH=NULL;
+        if (b__AGEH) {
+          result__5FEH=true__SELF;
         } else {
-          result__KFDH=LIP_BOOLEAN__;
+          result__5FEH=LIP_BOOLEAN__;
         };
-        result__QWGG=result__KFDH;
+        result__KTHG=result__5FEH;
       };
-      __tmp__H0QD=result__QWGG;
+      __tmp__P0QD=result__KTHG;
     } break;
     };
-    result__JZQD=__tmp__H0QD;
+    result__RZQD=__tmp__P0QD;
   };
-  if ((Self__KRVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__I02F=((__LIP_BOOLEAN *)__tmp__OZQD);
-      result__L02F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__O02F=NULL;
+      Self__LR3F=((__LIP_BOOLEAN *)__tmp__WZQD);
+      result__OR3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__RR3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__O02F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__RR3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__O02F=NULL;
+          __tmp__RR3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__O02F=NULL;
+          __tmp__RR3F=NULL;
         } break;
         }
       };
-      s__M02F=__tmp__O02F;
-      if (((void *)__tmp__O02F != (void *)NULL)) {
-        b__NFDH=(Self__I02F->value__PDQD != __tmp__O02F->value__PDQD);
-        result__MFDH=NULL;
-        if (b__NFDH) {
-          result__MFDH=true__GZKF;
+      s__PR3F=__tmp__RR3F;
+      if (((void *)__tmp__RR3F != (void *)NULL)) {
+        b__CGEH=(Self__LR3F->value__XDQD != __tmp__RR3F->value__XDQD);
+        result__BGEH=NULL;
+        if (b__CGEH) {
+          result__BGEH=true__SELF;
         } else {
-          result__MFDH=LIP_BOOLEAN__;
+          result__BGEH=LIP_BOOLEAN__;
         };
-        result__L02F=result__MFDH;
+        result__OR3F=result__BGEH;
       };
-      __tmp__O0QD=result__L02F;
+      __tmp__W0QD=result__OR3F;
     } break;
     case __LIP_INTEGER__: {
-      Self__Y02F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__102F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__402F=NULL;
+      Self__1R3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__4R3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__BS3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__402F=NULL;
+          __tmp__BS3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__402F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__BS3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__402F=NULL;
+          __tmp__BS3F=NULL;
         } break;
         }
       };
-      s__202F=__tmp__402F;
-      if (((void *)__tmp__402F != (void *)NULL)) {
-        free__SW2F(__tmp__402F);
-        free__SW2F(Self__Y02F);
-        b__PFDH=(Self__Y02F->value__0B3F != __tmp__402F->value__0B3F);
-        result__OFDH=NULL;
-        if (b__PFDH) {
-          result__OFDH=true__GZKF;
+      s__5R3F=__tmp__BS3F;
+      if (((void *)__tmp__BS3F != (void *)NULL)) {
+        free__VN3F(__tmp__BS3F);
+        free__VN3F(Self__1R3F);
+        b__EGEH=(Self__1R3F->value__3Y3F != __tmp__BS3F->value__3Y3F);
+        result__DGEH=NULL;
+        if (b__EGEH) {
+          result__DGEH=true__SELF;
         } else {
-          result__OFDH=LIP_BOOLEAN__;
+          result__DGEH=LIP_BOOLEAN__;
         };
-        result__102F=result__OFDH;
+        result__4R3F=result__DGEH;
       };
-      __tmp__O0QD=result__102F;
+      __tmp__W0QD=result__4R3F;
     } break;
     case __LIP_STRING__: {
-      Self__4WGG=((__LIP_STRING *)__tmp__OZQD);
-      result__BXGG=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__EXGG=NULL;
+      Self__YTHG=((__LIP_STRING *)__tmp__WZQD);
+      result__1THG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__4THG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__EXGG=NULL;
+          __tmp__4THG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__EXGG=NULL;
+          __tmp__4THG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__EXGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__4THG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__CXGG=__tmp__EXGG;
-      if (((void *)__tmp__EXGG != (void *)NULL)) {
-        free__EVGG(__tmp__EXGG);
-        free__EVGG(Self__4WGG);
-        b__RFDH=((void *)Self__4WGG->value__TBUE != (void *)__tmp__EXGG->value__TBUE);
-        result__QFDH=NULL;
-        if (b__RFDH) {
-          result__QFDH=true__GZKF;
+      s__2THG=__tmp__4THG;
+      if (((void *)__tmp__4THG != (void *)NULL)) {
+        free__4RHG(__tmp__4THG);
+        free__4RHG(Self__YTHG);
+        b__GGEH=((void *)Self__YTHG->value__WBUE != (void *)__tmp__4THG->value__WBUE);
+        result__FGEH=NULL;
+        if (b__GGEH) {
+          result__FGEH=true__SELF;
         } else {
-          result__QFDH=LIP_BOOLEAN__;
+          result__FGEH=LIP_BOOLEAN__;
         };
-        result__BXGG=result__QFDH;
+        result__1THG=result__FGEH;
       };
-      __tmp__O0QD=result__BXGG;
+      __tmp__W0QD=result__1THG;
     } break;
     };
-    result__JZQD=__tmp__O0QD;
+    result__RZQD=__tmp__W0QD;
   };
-  if ((Self__KRVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__Q12F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__TS3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__Q12F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__TS3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__Q12F=NULL;
+          __tmp__TS3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__Q12F=NULL;
+          __tmp__TS3F=NULL;
         } break;
         }
       };
-      s__O12F=__tmp__Q12F;
-      __tmp__V0QD=NULL;
+      s__RS3F=__tmp__TS3F;
+      __tmp__30QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__012F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__312F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__A22F=NULL;
+      Self__3S3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__AT3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__DT3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__A22F=NULL;
+          __tmp__DT3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__A22F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__DT3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__A22F=NULL;
+          __tmp__DT3F=NULL;
         } break;
         }
       };
-      s__412F=__tmp__A22F;
-      if (((void *)__tmp__A22F != (void *)NULL)) {
-        free__SW2F(__tmp__A22F);
-        free__SW2F(Self__012F);
-        b__TFDH=(Self__012F->value__0B3F > __tmp__A22F->value__0B3F);
-        result__SFDH=NULL;
-        if (b__TFDH) {
-          result__SFDH=true__GZKF;
+      s__BT3F=__tmp__DT3F;
+      if (((void *)__tmp__DT3F != (void *)NULL)) {
+        free__VN3F(__tmp__DT3F);
+        free__VN3F(Self__3S3F);
+        b__IGEH=(Self__3S3F->value__3Y3F > __tmp__DT3F->value__3Y3F);
+        result__HGEH=NULL;
+        if (b__IGEH) {
+          result__HGEH=true__SELF;
         } else {
-          result__SFDH=LIP_BOOLEAN__;
+          result__HGEH=LIP_BOOLEAN__;
         };
-        result__312F=result__SFDH;
+        result__AT3F=result__HGEH;
       };
-      __tmp__V0QD=result__312F;
+      __tmp__30QD=result__AT3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__VXGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__PUHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__VXGG=NULL;
+          __tmp__PUHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__VXGG=NULL;
+          __tmp__PUHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__VXGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__PUHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__TXGG=__tmp__VXGG;
-      __tmp__V0QD=NULL;
+      s__NUHG=__tmp__PUHG;
+      __tmp__30QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__V0QD;
+    result__RZQD=__tmp__30QD;
   };
-  if ((Self__KRVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__S22F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__VT3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__S22F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__VT3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__S22F=NULL;
+          __tmp__VT3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__S22F=NULL;
+          __tmp__VT3F=NULL;
         } break;
         }
       };
-      s__Q22F=__tmp__S22F;
-      __tmp__20QD=NULL;
+      s__TT3F=__tmp__VT3F;
+      __tmp__E1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__222F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__522F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__C32F=NULL;
+      Self__5T3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__CU3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__FU3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__C32F=NULL;
+          __tmp__FU3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__C32F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__FU3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__C32F=NULL;
+          __tmp__FU3F=NULL;
         } break;
         }
       };
-      s__A32F=__tmp__C32F;
-      if (((void *)__tmp__C32F != (void *)NULL)) {
-        free__SW2F(__tmp__C32F);
-        free__SW2F(Self__222F);
-        b__VFDH=(Self__222F->value__0B3F < __tmp__C32F->value__0B3F);
-        result__UFDH=NULL;
-        if (b__VFDH) {
-          result__UFDH=true__GZKF;
+      s__DU3F=__tmp__FU3F;
+      if (((void *)__tmp__FU3F != (void *)NULL)) {
+        free__VN3F(__tmp__FU3F);
+        free__VN3F(Self__5T3F);
+        b__KGEH=(Self__5T3F->value__3Y3F < __tmp__FU3F->value__3Y3F);
+        result__JGEH=NULL;
+        if (b__KGEH) {
+          result__JGEH=true__SELF;
         } else {
-          result__UFDH=LIP_BOOLEAN__;
+          result__JGEH=LIP_BOOLEAN__;
         };
-        result__522F=result__UFDH;
+        result__CU3F=result__JGEH;
       };
-      __tmp__20QD=result__522F;
+      __tmp__E1QD=result__CU3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__GYGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__AVHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GYGG=NULL;
+          __tmp__AVHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GYGG=NULL;
+          __tmp__AVHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__GYGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__AVHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__EYGG=__tmp__GYGG;
-      __tmp__20QD=NULL;
+      s__4UHG=__tmp__AVHG;
+      __tmp__E1QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__20QD;
+    result__RZQD=__tmp__E1QD;
   };
-  if ((Self__KRVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__U32F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__XU3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__U32F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__XU3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__U32F=NULL;
+          __tmp__XU3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__U32F=NULL;
+          __tmp__XU3F=NULL;
         } break;
         }
       };
-      s__S32F=__tmp__U32F;
-      __tmp__D1QD=NULL;
+      s__VU3F=__tmp__XU3F;
+      __tmp__L1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__432F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__B42F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__E42F=NULL;
+      Self__BV3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__EV3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__HV3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__E42F=NULL;
+          __tmp__HV3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__E42F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__HV3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__E42F=NULL;
+          __tmp__HV3F=NULL;
         } break;
         }
       };
-      s__C42F=__tmp__E42F;
-      if (((void *)__tmp__E42F != (void *)NULL)) {
-        free__SW2F(__tmp__E42F);
-        free__SW2F(Self__432F);
-        b__XFDH=(Self__432F->value__0B3F >= __tmp__E42F->value__0B3F);
-        result__WFDH=NULL;
-        if (b__XFDH) {
-          result__WFDH=true__GZKF;
+      s__FV3F=__tmp__HV3F;
+      if (((void *)__tmp__HV3F != (void *)NULL)) {
+        free__VN3F(__tmp__HV3F);
+        free__VN3F(Self__BV3F);
+        b__MGEH=(Self__BV3F->value__3Y3F >= __tmp__HV3F->value__3Y3F);
+        result__LGEH=NULL;
+        if (b__MGEH) {
+          result__LGEH=true__SELF;
         } else {
-          result__WFDH=LIP_BOOLEAN__;
+          result__LGEH=LIP_BOOLEAN__;
         };
-        result__B42F=result__WFDH;
+        result__EV3F=result__LGEH;
       };
-      __tmp__D1QD=result__B42F;
+      __tmp__L1QD=result__EV3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__XYGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__RVHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XYGG=NULL;
+          __tmp__RVHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XYGG=NULL;
+          __tmp__RVHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__XYGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__RVHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__VYGG=__tmp__XYGG;
-      __tmp__D1QD=NULL;
+      s__PVHG=__tmp__RVHG;
+      __tmp__L1QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__D1QD;
+    result__RZQD=__tmp__L1QD;
   };
-  if ((Self__KRVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__W42F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__ZV3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__W42F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__ZV3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__W42F=NULL;
+          __tmp__ZV3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__W42F=NULL;
+          __tmp__ZV3F=NULL;
         } break;
         }
       };
-      s__U42F=__tmp__W42F;
-      __tmp__K1QD=NULL;
+      s__XV3F=__tmp__ZV3F;
+      __tmp__S1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__A52F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__D52F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__G52F=NULL;
+      Self__DW3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__GW3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__JW3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__G52F=NULL;
+          __tmp__JW3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__G52F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__JW3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__G52F=NULL;
+          __tmp__JW3F=NULL;
         } break;
         }
       };
-      s__E52F=__tmp__G52F;
-      if (((void *)__tmp__G52F != (void *)NULL)) {
-        free__SW2F(__tmp__G52F);
-        free__SW2F(Self__A52F);
-        b__ZFDH=(Self__A52F->value__0B3F <= __tmp__G52F->value__0B3F);
-        result__YFDH=NULL;
-        if (b__ZFDH) {
-          result__YFDH=true__GZKF;
+      s__HW3F=__tmp__JW3F;
+      if (((void *)__tmp__JW3F != (void *)NULL)) {
+        free__VN3F(__tmp__JW3F);
+        free__VN3F(Self__DW3F);
+        b__OGEH=(Self__DW3F->value__3Y3F <= __tmp__JW3F->value__3Y3F);
+        result__NGEH=NULL;
+        if (b__OGEH) {
+          result__NGEH=true__SELF;
         } else {
-          result__YFDH=LIP_BOOLEAN__;
+          result__NGEH=LIP_BOOLEAN__;
         };
-        result__D52F=result__YFDH;
+        result__GW3F=result__NGEH;
       };
-      __tmp__K1QD=result__D52F;
+      __tmp__S1QD=result__GW3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__IZGG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__CWHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IZGG=NULL;
+          __tmp__CWHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IZGG=NULL;
+          __tmp__CWHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__IZGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__CWHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__GZGG=__tmp__IZGG;
-      __tmp__K1QD=NULL;
+      s__AWHG=__tmp__CWHG;
+      __tmp__S1QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__K1QD;
+    result__RZQD=__tmp__S1QD;
   };
-  if ((Self__KRVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__Y52F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__1W3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__Y52F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__1W3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__Y52F=NULL;
+          __tmp__1W3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__Y52F=NULL;
+          __tmp__1W3F=NULL;
         } break;
         }
       };
-      s__W52F=__tmp__Y52F;
-      __tmp__R1QD=NULL;
+      s__ZW3F=__tmp__1W3F;
+      __tmp__Z1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__CA3F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__FA3F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__IA3F=NULL;
+      Self__FX3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__IX3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__LX3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__IA3F=NULL;
+          __tmp__LX3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__IA3F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__LX3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__IA3F=NULL;
+          __tmp__LX3F=NULL;
         } break;
         }
       };
-      s__GA3F=__tmp__IA3F;
-      if (((void *)__tmp__IA3F != (void *)NULL)) {
-        Self__CA3F->value__0B3F=(__INTEGER)(Self__CA3F->value__0B3F + __tmp__IA3F->value__0B3F);
-        free__SW2F(__tmp__IA3F);
-        result__FA3F=Self__CA3F;
+      s__JX3F=__tmp__LX3F;
+      if (((void *)__tmp__LX3F != (void *)NULL)) {
+        Self__FX3F->value__3Y3F=(__INTEGER)(Self__FX3F->value__3Y3F + __tmp__LX3F->value__3Y3F);
+        free__VN3F(__tmp__LX3F);
+        result__IX3F=Self__FX3F;
       };
-      __tmp__R1QD=result__FA3F;
+      __tmp__Z1QD=result__IX3F;
     } break;
     case __LIP_STRING__: {
-      Self__TZGG=((__LIP_STRING *)__tmp__OZQD);
-      result__WZGG=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__ZZGG=NULL;
+      Self__NWHG=((__LIP_STRING *)__tmp__WZQD);
+      result__QWHG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__TWHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZZGG=NULL;
+          __tmp__TWHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZZGG=NULL;
+          __tmp__TWHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ZZGG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__TWHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__XZGG=__tmp__ZZGG;
-      if (((void *)__tmp__ZZGG != (void *)NULL)) {
-        copy__ZCS(string_tmp__VH,Self__TZGG->value__TBUE);
-        append__BOS(string_tmp__VH,__tmp__ZZGG->value__TBUE);
-        Self__TZGG->value__TBUE=get__IWB(string_tmp__VH);
-        free__EVGG(__tmp__ZZGG);
-        result__WZGG=Self__TZGG;
+      s__RWHG=__tmp__TWHG;
+      if (((void *)__tmp__TWHG != (void *)NULL)) {
+        copy__BDS(string_tmp__VH,Self__NWHG->value__WBUE);
+        append__JOS(string_tmp__VH,__tmp__TWHG->value__WBUE);
+        Self__NWHG->value__WBUE=get__QWB(string_tmp__VH);
+        free__4RHG(__tmp__TWHG);
+        result__QWHG=Self__NWHG;
       };
-      __tmp__R1QD=result__WZGG;
+      __tmp__Z1QD=result__QWHG;
     } break;
     };
-    result__JZQD=__tmp__R1QD;
+    result__RZQD=__tmp__Z1QD;
   };
-  if ((Self__KRVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__OZQD)->__id) {
+  if ((Self__SRVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__0A3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__3X3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__0A3F=((__LIP_BOOLEAN *)__tmp__RZQD);
+          __tmp__3X3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__0A3F=NULL;
+          __tmp__3X3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__0A3F=NULL;
+          __tmp__3X3F=NULL;
         } break;
         }
       };
-      s__YA3F=__tmp__0A3F;
-      __tmp__Y1QD=NULL;
+      s__1X3F=__tmp__3X3F;
+      __tmp__A2QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__EB3F=((__LIP_INTEGER *)__tmp__OZQD);
-      result__HB3F=NULL;
-      if (__tmp__RZQD==NULL) {
-        __tmp__KB3F=NULL;
+      Self__HY3F=((__LIP_INTEGER *)__tmp__WZQD);
+      result__KY3F=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__NY3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__KB3F=NULL;
+          __tmp__NY3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__KB3F=((__LIP_INTEGER *)__tmp__RZQD);
+          __tmp__NY3F=((__LIP_INTEGER *)__tmp__ZZQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__KB3F=NULL;
+          __tmp__NY3F=NULL;
         } break;
         }
       };
-      s__IB3F=__tmp__KB3F;
-      if (((void *)__tmp__KB3F != (void *)NULL)) {
-        Self__EB3F->value__0B3F=(__INTEGER)(Self__EB3F->value__0B3F - __tmp__KB3F->value__0B3F);
-        free__SW2F(__tmp__KB3F);
-        result__HB3F=Self__EB3F;
+      s__LY3F=__tmp__NY3F;
+      if (((void *)__tmp__NY3F != (void *)NULL)) {
+        Self__HY3F->value__3Y3F=(__INTEGER)(Self__HY3F->value__3Y3F - __tmp__NY3F->value__3Y3F);
+        free__VN3F(__tmp__NY3F);
+        result__KY3F=Self__HY3F;
       };
-      __tmp__Y1QD=result__HB3F;
+      __tmp__A2QD=result__KY3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__RZQD==NULL) {
-        __tmp__K0GG=NULL;
+      if (__tmp__ZZQD==NULL) {
+        __tmp__EXHG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__RZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__K0GG=NULL;
+          __tmp__EXHG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__K0GG=NULL;
+          __tmp__EXHG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__K0GG=((__LIP_STRING *)__tmp__RZQD);
+          __tmp__EXHG=((__LIP_STRING *)__tmp__ZZQD);
         } break;
         }
       };
-      s__I0GG=__tmp__K0GG;
-      __tmp__Y1QD=NULL;
+      s__CXHG=__tmp__EXHG;
+      __tmp__A2QD=NULL;
     } break;
     };
-    result__JZQD=__tmp__Y1QD;
+    result__RZQD=__tmp__A2QD;
   };
-  if (((void *)result__JZQD == (void *)NULL)) {
-    __tmp__B2QD=Self__HZQD->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_278));
-    put_position__UOG(__tmp__B2QD);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if (((void *)result__RZQD == (void *)NULL)) {
+    __tmp__J2QD=Self__PZQD->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_277));
+    put_position__2OG(__tmp__J2QD);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__JZQD);
+  return(result__RZQD);
 }
 
-static void* run_expr__F2QD(__LIP_UNARY *Self__G2QD)
+static void* run_expr__N2QD(__LIP_UNARY *Self__O2QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  void *__tmp__K2QD;
-  void *__tmp__L2QD,*__tmp__IRIH,*__tmp__JRIH,*result__I2QD,*__tmp__T2QD;
-  void *__tmp__02QD;
-  __LIP_INTEGER *Self__KRIH,*Self__YB3F,*Self__FC3F;
-  __LIP_STRING *Self__LRIH;
-  void *result__BZKF;
-  __POSITION __tmp__D3QD;
-  __CHARACTER Self__0TVD;
-  __BOOLEAN b__5YKF;
-  __tmp__K2QD=Self__G2QD->value__J2QD;
-  switch (((struct ___OBJ *)__tmp__K2QD)->__id) {
+  void *__tmp__S2QD;
+  void *__tmp__T2QD,*__tmp__ITJH,*__tmp__JTJH,*result__Q2QD,*__tmp__12QD;
+  void *__tmp__C3QD;
+  __LIP_INTEGER *Self__KTJH,*Self__1Y3F,*Self__IZ3F;
+  __LIP_STRING *Self__LTJH;
+  void *result__NELF;
+  __POSITION __tmp__L3QD;
+  __CHARACTER Self__CUVD;
+  __BOOLEAN b__LELF;
+  __tmp__S2QD=Self__O2QD->value__R2QD;
+  switch (((struct ___OBJ *)__tmp__S2QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__L2QD=run_expr__GZQD(__tmp__K2QD);
+    __tmp__T2QD=run_expr__OZQD(__tmp__S2QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__L2QD=run_expr__F2QD(__tmp__K2QD);
+    __tmp__T2QD=run_expr__N2QD(__tmp__S2QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__L2QD=run_expr__FGUE(__tmp__K2QD);
+    __tmp__T2QD=run_expr__IGUE(__tmp__S2QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__IRIH=((__LIP_VALUE *)__tmp__K2QD)->value__FKUE;
-    switch (((struct ___OBJ *)__tmp__IRIH)->__id) {
+    __tmp__ITJH=((__LIP_VALUE *)__tmp__S2QD)->value__IKUE;
+    switch (((struct ___OBJ *)__tmp__ITJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__JRIH=((__LIP_BOOLEAN *)__tmp__IRIH);
+      __tmp__JTJH=((__LIP_BOOLEAN *)__tmp__ITJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__KRIH=((__LIP_INTEGER *)__tmp__IRIH);
-      __tmp__JRIH=get__0JSE(Self__KRIH,Self__KRIH->value__0B3F);
+      Self__KTJH=((__LIP_INTEGER *)__tmp__ITJH);
+      __tmp__JTJH=get__KJSE(Self__KTJH,Self__KTJH->value__3Y3F);
     } break;
     case __LIP_STRING__: {
-      Self__LRIH=((__LIP_STRING *)__tmp__IRIH);
-      __tmp__JRIH=get__RBFF(Self__LRIH,Self__LRIH->value__TBUE);
+      Self__LTJH=((__LIP_STRING *)__tmp__ITJH);
+      __tmp__JTJH=get__TMFF(Self__LTJH,Self__LTJH->value__WBUE);
     } break;
     };
-    __tmp__L2QD=__tmp__JRIH;
+    __tmp__T2QD=__tmp__JTJH;
   } break;
   };
-  result__I2QD=__tmp__L2QD;
-  Self__0TVD=Self__G2QD->operator__M2QD;
-  if ((Self__0TVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__L2QD)->__id) {
+  result__Q2QD=__tmp__T2QD;
+  Self__CUVD=Self__O2QD->operator__U2QD;
+  if ((Self__CUVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__T2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__T2QD=NULL;
+      __tmp__12QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__YB3F=((__LIP_INTEGER *)__tmp__L2QD);
-      Self__YB3F->value__0B3F=(__INTEGER)(- Self__YB3F->value__0B3F);
-      __tmp__T2QD=Self__YB3F;
+      Self__1Y3F=((__LIP_INTEGER *)__tmp__T2QD);
+      Self__1Y3F->value__3Y3F=(__INTEGER)(- Self__1Y3F->value__3Y3F);
+      __tmp__12QD=Self__1Y3F;
     } break;
     case __LIP_STRING__: {
-      __tmp__T2QD=NULL;
+      __tmp__12QD=NULL;
     } break;
     };
-    result__I2QD=__tmp__T2QD;
+    result__Q2QD=__tmp__12QD;
   };
-  if ((Self__0TVD == '!')) {
-    switch (((struct ___OBJ *)result__I2QD)->__id) {
+  if ((Self__CUVD == '!')) {
+    switch (((struct ___OBJ *)result__Q2QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__5YKF=(! ((__LIP_BOOLEAN *)result__I2QD)->value__PDQD);
-      result__BZKF=NULL;
-      if (b__5YKF) {
-        result__BZKF=true__GZKF;
+      b__LELF=(! ((__LIP_BOOLEAN *)result__Q2QD)->value__XDQD);
+      result__NELF=NULL;
+      if (b__LELF) {
+        result__NELF=true__SELF;
       } else {
-        result__BZKF=LIP_BOOLEAN__;
+        result__NELF=LIP_BOOLEAN__;
       };
-      __tmp__02QD=result__BZKF;
+      __tmp__C3QD=result__NELF;
     } break;
     case __LIP_INTEGER__: {
-      Self__FC3F=((__LIP_INTEGER *)result__I2QD);
-      Self__FC3F->value__0B3F=(__INTEGER)(~ Self__FC3F->value__0B3F);
-      __tmp__02QD=Self__FC3F;
+      Self__IZ3F=((__LIP_INTEGER *)result__Q2QD);
+      Self__IZ3F->value__3Y3F=(__INTEGER)(~ Self__IZ3F->value__3Y3F);
+      __tmp__C3QD=Self__IZ3F;
     } break;
     case __LIP_STRING__: {
-      __tmp__02QD=NULL;
+      __tmp__C3QD=NULL;
     } break;
     };
-    result__I2QD=__tmp__02QD;
+    result__Q2QD=__tmp__C3QD;
   };
-  if (((void *)result__I2QD == (void *)NULL)) {
-    __tmp__D3QD=Self__G2QD->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 1,(&__string_278));
-    put_position__UOG(__tmp__D3QD);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+  if (((void *)result__Q2QD == (void *)NULL)) {
+    __tmp__L3QD=Self__O2QD->parent_lip_code__T14B.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 1,(&__string_277));
+    put_position__2OG(__tmp__L3QD);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__I2QD);
+  return(result__Q2QD);
 }
 
-static void* run_expr__FGUE(__LIP_CALL *Self__GGUE)
+static void* run_expr__IGUE(__LIP_CALL *Self__JGUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  void *str__JGUE,*__tmp__5GUE;
-  void *val__KGUE,*result__LGUE,*__tmp__UGUE,*__tmp__GKUE,*__tmp__HKUE;
-  void *__tmp__TGUE;
-  __LIP_INTEGER *Self__EF3F;
-  __LIP_STRING *Self__41GG;
-  __POSITION pos__QS0G,pos__X4JF;
-  __STRING *Self__PGFH;
-  __INTEGER state__4EWF,Self__LJFG;
-  __BOOLEAN __tmp__QHUE,__tmp__CIUE,result__LFXE,sign__5EWF,__tmp__RGWF;
-  __BOOLEAN result__0FDH,__tmp__4GWF,result__NSOG,__tmp__RHWF;
-  __BOOLEAN result__3FDH,result__AGDH,result__DGDH,result__EGDH;
-  __CHARACTER Self__AHAH,Self__1FDH,Self__BHAH,Self__4FDH,Self__BGDH;
-  __CHARACTER mem__ZFLF;
-  __FAST_ARRAYoLIP_SLOT_DATAo *Self__KAPF;
-  str__JGUE=NULL;
-  val__KGUE=NULL;
-  result__LGUE=NULL;
-  if (((void *)Self__GGUE->argument__15TE != (void *)NULL)) {
-    __tmp__TGUE=Self__GGUE->argument__15TE;
-    switch (((struct ___OBJ *)__tmp__TGUE)->__id) {
+  void *str__MGUE,*__tmp__CHUE;
+  void *val__NGUE,*result__OGUE,*__tmp__XGUE,*__tmp__JKUE,*__tmp__KKUE;
+  void *__tmp__WGUE;
+  __LIP_INTEGER *Self__H23F;
+  __LIP_STRING *Self__YYHG;
+  __POSITION pos__BQ1G,pos__ZJKF;
+  __STRING *Self__5HGH;
+  __INTEGER state__CRWF,Self__BDGG;
+  __BOOLEAN __tmp__THUE,__tmp__FIUE,result__OFXE,sign__DRWF,__tmp__VSWF;
+  __BOOLEAN result__PGEH,__tmp__CTWF,result__WOPG,__tmp__VTWF;
+  __BOOLEAN result__TGEH,result__XGEH,result__1GEH,result__2GEH;
+  __CHARACTER Self__DGBH,Self__QGEH,Self__EGBH,Self__UGEH,Self__YGEH;
+  __CHARACTER mem__FRLF;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__OMPF;
+  str__MGUE=NULL;
+  val__NGUE=NULL;
+  result__OGUE=NULL;
+  if (((void *)Self__JGUE->argument__45TE != (void *)NULL)) {
+    __tmp__WGUE=Self__JGUE->argument__45TE;
+    switch (((struct ___OBJ *)__tmp__WGUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__UGUE=run_expr__GZQD(__tmp__TGUE);
+      __tmp__XGUE=run_expr__OZQD(__tmp__WGUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__UGUE=run_expr__F2QD(__tmp__TGUE);
+      __tmp__XGUE=run_expr__N2QD(__tmp__WGUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__UGUE=run_expr__FGUE(__tmp__TGUE);
+      __tmp__XGUE=run_expr__IGUE(__tmp__WGUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__GKUE=((__LIP_VALUE *)__tmp__TGUE)->value__FKUE;
-      switch (((struct ___OBJ *)__tmp__GKUE)->__id) {
+      __tmp__JKUE=((__LIP_VALUE *)__tmp__WGUE)->value__IKUE;
+      switch (((struct ___OBJ *)__tmp__JKUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__HKUE=((__LIP_BOOLEAN *)__tmp__GKUE);
+        __tmp__KKUE=((__LIP_BOOLEAN *)__tmp__JKUE);
       } break;
       case __LIP_INTEGER__: {
-        Self__EF3F=((__LIP_INTEGER *)__tmp__GKUE);
-        __tmp__HKUE=get__0JSE(Self__EF3F,Self__EF3F->value__0B3F);
+        Self__H23F=((__LIP_INTEGER *)__tmp__JKUE);
+        __tmp__KKUE=get__KJSE(Self__H23F,Self__H23F->value__3Y3F);
       } break;
       case __LIP_STRING__: {
-        Self__41GG=((__LIP_STRING *)__tmp__GKUE);
-        __tmp__HKUE=get__RBFF(Self__41GG,Self__41GG->value__TBUE);
+        Self__YYHG=((__LIP_STRING *)__tmp__JKUE);
+        __tmp__KKUE=get__TMFF(Self__YYHG,Self__YYHG->value__WBUE);
       } break;
       };
-      __tmp__UGUE=__tmp__HKUE;
+      __tmp__XGUE=__tmp__KKUE;
     } break;
     };
-    val__KGUE=__tmp__UGUE;
+    val__NGUE=__tmp__XGUE;
   };
-  if (((void *)Self__GGUE->name__GAUE == (void *)(&__string_93))) {
-    if (val__KGUE==NULL) {
-      __tmp__5GUE=NULL;
+  if (((void *)Self__JGUE->name__JAUE == (void *)(&__string_93))) {
+    if (val__NGUE==NULL) {
+      __tmp__CHUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__KGUE)->__id) {
+      switch (((struct ___OBJ *)val__NGUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__5GUE=NULL;
+        __tmp__CHUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__5GUE=NULL;
+        __tmp__CHUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__5GUE=((void *)val__KGUE);
+        __tmp__CHUE=((void *)val__NGUE);
       } break;
       }
     };
-    str__JGUE=__tmp__5GUE;
-    if (((void *)__tmp__5GUE == (void *)NULL)) {
-      pos__QS0G=Self__GGUE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-      put_error__text__KNG( 1,(&__string_311));
-      put_position__UOG(pos__QS0G);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    str__MGUE=__tmp__CHUE;
+    if (((void *)__tmp__CHUE == (void *)NULL)) {
+      pos__BQ1G=Self__JGUE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+      put_error__text__SNG( 1,(&__string_310));
+      put_position__2OG(pos__BQ1G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    ((__STRING *)string_tmp__VH)->count__WFC= 0;
-    append_in__C2GG(__tmp__5GUE,string_tmp__VH);
-    Self__PGFH=((__STRING *)string_tmp__VH);
-    if ((Self__PGFH->capacity__YBS > Self__PGFH->count__WFC)) {
-      ((__CHARACTER *)Self__PGFH->storage__BCS)[Self__PGFH->count__WFC]='\0';
+    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    append_in__2YHG(__tmp__CHUE,string_tmp__VH);
+    Self__5HGH=((__STRING *)string_tmp__VH);
+    if ((Self__5HGH->capacity__ACS > Self__5HGH->count__4FC)) {
+      ((__CHARACTER *)Self__5HGH->storage__JCS)[Self__5HGH->count__4FC]='\0';
     } else {
-      add_last__ZLT(Self__PGFH,'\0');
-      Self__PGFH->count__WFC=(__INTEGER)(Self__PGFH->count__WFC -  1);
+      add_last__BMT(Self__5HGH,'\0');
+      Self__5HGH->count__4FC=(__INTEGER)(Self__5HGH->count__4FC -  1);
     };
-    result__LGUE=get__0JSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__PGFH->storage__BCS)))))));
-    __tmp__QHUE=TRUE__;
+    result__OGUE=get__KJSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__5HGH->storage__JCS)))))));
+    __tmp__THUE=TRUE__;
   } else {
-    __tmp__QHUE=FALSE__;
+    __tmp__THUE=FALSE__;
   };
-  if (__tmp__QHUE) {
-    __tmp__CIUE=TRUE__;
+  if (__tmp__THUE) {
+    __tmp__FIUE=TRUE__;
   } else {
-    result__LFXE=((void *)Self__GGUE->name__GAUE == (void *)(&__string_106));
-    if (result__LFXE) {
-      state__4EWF= 0;
-      sign__5EWF=FALSE__;
-      while ((state__4EWF <=  2)) {
-        if (push_back_flag__3YLF) {
-          push_back_flag__3YLF=FALSE__;
+    result__OFXE=((void *)Self__JGUE->name__JAUE == (void *)(&__string_106));
+    if (result__OFXE) {
+      state__CRWF= 0;
+      sign__DRWF=FALSE__;
+      while ((state__CRWF <=  2)) {
+        if (push_back_flag__JEMF) {
+          push_back_flag__JEMF=FALSE__;
         } else {
-          memory__BGLF=((__CHARACTER )(fgetc(stdin)));
+          memory__NRLF=((__CHARACTER )(fgetc(stdin)));
         };
-        if ((state__4EWF ==  0)) {
-          Self__AHAH=memory__BGLF;
-          if ((((((((Self__AHAH == ' ') || (Self__AHAH == '\t')) || (Self__AHAH == '\n')) || (Self__AHAH == '\r')) || (Self__AHAH == '\0')) || (Self__AHAH == '\f')) || (Self__AHAH == '\v'))) {
-            __tmp__RGWF=TRUE__;
+        if ((state__CRWF ==  0)) {
+          Self__DGBH=memory__NRLF;
+          if ((((((((Self__DGBH == ' ') || (Self__DGBH == '\t')) || (Self__DGBH == '\n')) || (Self__DGBH == '\r')) || (Self__DGBH == '\0')) || (Self__DGBH == '\f')) || (Self__DGBH == '\v'))) {
+            __tmp__VSWF=TRUE__;
           } else {
-            Self__1FDH=memory__BGLF;
-            result__0FDH=FALSE__;
-            if ((((__INTEGER_8 )Self__1FDH) >= ((__INTEGER_8 )'0'))) {
-              result__0FDH=(((__INTEGER_8 )Self__1FDH) <= ((__INTEGER_8 )'9'));
+            Self__QGEH=memory__NRLF;
+            result__PGEH=FALSE__;
+            if ((((__INTEGER_8 )Self__QGEH) >= ((__INTEGER_8 )'0'))) {
+              result__PGEH=(((__INTEGER_8 )Self__QGEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__0FDH) {
-              last_integer__3HUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__BGLF)) -  48);
-              state__4EWF= 2;
+            if (result__PGEH) {
+              last_integer__AIUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48);
+              state__CRWF= 2;
             };
-            __tmp__RGWF=result__0FDH;
+            __tmp__VSWF=result__PGEH;
           };
-          if (__tmp__RGWF) {
-            __tmp__4GWF=TRUE__;
+          if (__tmp__VSWF) {
+            __tmp__CTWF=TRUE__;
           } else {
-            result__NSOG=(memory__BGLF == '-');
-            if (result__NSOG) {
-              sign__5EWF=TRUE__;
-              state__4EWF= 1;
+            result__WOPG=(memory__NRLF == '-');
+            if (result__WOPG) {
+              sign__DRWF=TRUE__;
+              state__CRWF= 1;
             };
-            __tmp__4GWF=result__NSOG;
+            __tmp__CTWF=result__WOPG;
           };
-          if ((! __tmp__4GWF)) {
-            if ((memory__BGLF == '+')) {
-              state__4EWF= 1;
+          if ((! __tmp__CTWF)) {
+            if ((memory__NRLF == '+')) {
+              state__CRWF= 1;
             } else {
-              state__4EWF= 4;
+              state__CRWF= 4;
             };
           };
-          __tmp__RHWF=TRUE__;
+          __tmp__VTWF=TRUE__;
         } else {
-          __tmp__RHWF=FALSE__;
+          __tmp__VTWF=FALSE__;
         };
-        if ((! __tmp__RHWF)) {
-          if ((state__4EWF ==  1)) {
-            Self__BHAH=memory__BGLF;
-            if ((! (((((((Self__BHAH == ' ') || (Self__BHAH == '\t')) || (Self__BHAH == '\n')) || (Self__BHAH == '\r')) || (Self__BHAH == '\0')) || (Self__BHAH == '\f')) || (Self__BHAH == '\v')))) {
-              Self__4FDH=memory__BGLF;
-              result__3FDH=FALSE__;
-              if ((((__INTEGER_8 )Self__4FDH) >= ((__INTEGER_8 )'0'))) {
-                result__3FDH=(((__INTEGER_8 )Self__4FDH) <= ((__INTEGER_8 )'9'));
+        if ((! __tmp__VTWF)) {
+          if ((state__CRWF ==  1)) {
+            Self__EGBH=memory__NRLF;
+            if ((! (((((((Self__EGBH == ' ') || (Self__EGBH == '\t')) || (Self__EGBH == '\n')) || (Self__EGBH == '\r')) || (Self__EGBH == '\0')) || (Self__EGBH == '\f')) || (Self__EGBH == '\v')))) {
+              Self__UGEH=memory__NRLF;
+              result__TGEH=FALSE__;
+              if ((((__INTEGER_8 )Self__UGEH) >= ((__INTEGER_8 )'0'))) {
+                result__TGEH=(((__INTEGER_8 )Self__UGEH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__3FDH) {
-                last_integer__3HUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__BGLF)) -  48);
-                state__4EWF= 2;
+              if (result__TGEH) {
+                last_integer__AIUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48);
+                state__CRWF= 2;
               } else {
-                state__4EWF= 4;
+                state__CRWF= 4;
               };
             };
           } else {
-            Self__BGDH=memory__BGLF;
-            result__AGDH=FALSE__;
-            if ((((__INTEGER_8 )Self__BGDH) >= ((__INTEGER_8 )'0'))) {
-              result__AGDH=(((__INTEGER_8 )Self__BGDH) <= ((__INTEGER_8 )'9'));
+            Self__YGEH=memory__NRLF;
+            result__XGEH=FALSE__;
+            if ((((__INTEGER_8 )Self__YGEH) >= ((__INTEGER_8 )'0'))) {
+              result__XGEH=(((__INTEGER_8 )Self__YGEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__AGDH) {
-              last_integer__3HUE=(__INTEGER)((__INTEGER)(last_integer__3HUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__BGLF)) -  48));
+            if (result__XGEH) {
+              last_integer__AIUE=(__INTEGER)((__INTEGER)(last_integer__AIUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48));
             } else {
-              state__4EWF= 3;
+              state__CRWF= 3;
             };
           };
         };
-        result__DGDH=FALSE__;
-        if ((! push_back_flag__3YLF)) {
-          result__DGDH=(memory__BGLF == ((__CHARACTER )(EOF)));
+        result__1GEH=FALSE__;
+        if ((! push_back_flag__JEMF)) {
+          result__1GEH=(memory__NRLF == ((__CHARACTER )(EOF)));
         };
-        if (result__DGDH) {
-          Self__LJFG=state__4EWF;
-          if (((state__4EWF >=  0) && (state__4EWF <=  1))) {
-            state__4EWF= 4;
+        if (result__1GEH) {
+          Self__BDGG=state__CRWF;
+          if (((state__CRWF >=  0) && (state__CRWF <=  1))) {
+            state__CRWF= 4;
           };
-          if (((Self__LJFG >=  2) && (Self__LJFG <=  3))) {
-            state__4EWF= 3;
+          if (((Self__BDGG >=  2) && (Self__BDGG <=  3))) {
+            state__CRWF= 3;
           };
         };
       };
-      result__EGDH=FALSE__;
-      if ((! push_back_flag__3YLF)) {
-        result__EGDH=(memory__BGLF == ((__CHARACTER )(EOF)));
+      result__2GEH=FALSE__;
+      if ((! push_back_flag__JEMF)) {
+        result__2GEH=(memory__NRLF == ((__CHARACTER )(EOF)));
       };
-      if (result__EGDH) {
-        push_back_flag__3YLF=TRUE__;
+      if (result__2GEH) {
+        push_back_flag__JEMF=TRUE__;
       };
-      if ((state__4EWF ==  4)) {
-        print__WHD((&__string_330));
-        print__WHD((&__string_220));
+      if ((state__CRWF ==  4)) {
+        print__4HD((&__string_329));
+        print__4HD((&__string_218));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__5EWF) {
-        last_integer__3HUE=(__INTEGER)(- last_integer__3HUE);
+      if (sign__DRWF) {
+        last_integer__AIUE=(__INTEGER)(- last_integer__AIUE);
       };
-      result__LGUE=get__0JSE(LIP_INTEGER__,last_integer__3HUE);
+      result__OGUE=get__KJSE(LIP_INTEGER__,last_integer__AIUE);
     };
-    __tmp__CIUE=result__LFXE;
+    __tmp__FIUE=result__OFXE;
   };
-  if ((! __tmp__CIUE)) {
-    if (((void *)Self__GGUE->name__GAUE == (void *)(&__string_107))) {
-      ((__STRING *)last_string__PIUE)->count__WFC= 0;
-      mem__ZFLF='\0';
-      if (push_back_flag__3YLF) {
-        push_back_flag__3YLF=FALSE__;
+  if ((! __tmp__FIUE)) {
+    if (((void *)Self__JGUE->name__JAUE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__SIUE)->count__4FC= 0;
+      mem__FRLF='\0';
+      if (push_back_flag__JEMF) {
+        push_back_flag__JEMF=FALSE__;
       } else {
-        memory__BGLF=((__CHARACTER )(fgetc(stdin)));
+        memory__NRLF=((__CHARACTER )(fgetc(stdin)));
       };
-      if (((memory__BGLF != '\n') && (memory__BGLF != ((__CHARACTER )(EOF))))) {
-        add_last__ZLT(((__STRING *)last_string__PIUE),memory__BGLF);
-        mem__ZFLF=((__CHARACTER )(fgetc(stdin)));
-        while ((! ((mem__ZFLF == ((__CHARACTER )(EOF))) || (mem__ZFLF == '\n')))) {
-          add_last__ZLT(((__STRING *)last_string__PIUE),mem__ZFLF);
-          mem__ZFLF=((__CHARACTER )(fgetc(stdin)));
+      if (((memory__NRLF != '\n') && (memory__NRLF != ((__CHARACTER )(EOF))))) {
+        add_last__BMT(((__STRING *)last_string__SIUE),memory__NRLF);
+        mem__FRLF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__FRLF == ((__CHARACTER )(EOF))) || (mem__FRLF == '\n')))) {
+          add_last__BMT(((__STRING *)last_string__SIUE),mem__FRLF);
+          mem__FRLF=((__CHARACTER )(fgetc(stdin)));
         };
-        memory__BGLF=mem__ZFLF;
+        memory__NRLF=mem__FRLF;
       };
-      result__LGUE=get__RBFF(LIP_STRING__,get__IWB(last_string__PIUE));
+      result__OGUE=get__TMFF(LIP_STRING__,get__QWB(last_string__SIUE));
     } else {
-      if (((void *)fast_reference_at__OURD(list_data__OONC,Self__GGUE->name__GAUE) == (void *)NULL)) {
-        Self__KAPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__FJUE);
-        if (((void *)((void **)Self__KAPF->parent_arrayed_collection__EJUE.storage__GHPF)[Self__KAPF->parent_arrayed_collection__EJUE.upper__UAPF] == (void *)NULL)) {
-          copy__ZCS(string_tmp__VH,(&__string_308));
-          append__BOS(string_tmp__VH,Self__GGUE->name__GAUE);
-          append__BOS(string_tmp__VH,(&__string_309));
-          pos__X4JF=Self__GGUE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-          put_error__text__KNG( 1,string_tmp__VH);
-          put_position__UOG(pos__X4JF);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (((void *)fast_reference_at__WURD(list_data__WONC,Self__JGUE->name__JAUE) == (void *)NULL)) {
+        Self__OMPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__IJUE);
+        if (((void *)((void **)Self__OMPF->parent_arrayed_collection__HJUE.storage__KTPF)[Self__OMPF->parent_arrayed_collection__HJUE.upper__YMPF] == (void *)NULL)) {
+          copy__BDS(string_tmp__VH,(&__string_307));
+          append__JOS(string_tmp__VH,Self__JGUE->name__JAUE);
+          append__JOS(string_tmp__VH,(&__string_308));
+          pos__ZJKF=Self__JGUE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+          put_error__text__SNG( 1,string_tmp__VH);
+          put_position__2OG(pos__ZJKF);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__LGUE=NULL;
+      result__OGUE=NULL;
     };
   };
-  if (((void *)val__KGUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__KGUE)->__id) {
+  if (((void *)val__NGUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__NGUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__SW2F(val__KGUE);
+      free__VN3F(val__NGUE);
     } break;
     case __LIP_STRING__: {
-      free__EVGG(val__KGUE);
+      free__4RHG(val__NGUE);
     } break;
     };
   };
-  return(result__LGUE);
+  return(result__OGUE);
 }
 
-static void* get__0JSE(__LIP_INTEGER *Self__1JSE,__INTEGER i__2JSE)
+static void* get__KJSE(__LIP_INTEGER *Self__LJSE,__INTEGER i__MJSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  void *result__4JSE;
-  __LIP_INTEGER *result__2YRF;
-  __POINTER ptr__3YRF,ptr_table__NRIH,next__MRIH,result__ORIH;
-  __POINTER ptr_table__SRIH,next__RRIH,result__TRIH;
-  __INTEGER typ_id__CZRF;
-  __UINTEGER_32 sz__5YRF,a__LKFH,new_size__MKFH,t__QKFH,a__PKFH;
-  __UINTEGER_32 new_size__VRIH,lab_type__URIH;
-  __FAST_ARRAYoLIP_INTEGERo *Self__EY3E,*Self__0Y3E;
-  result__4JSE=NULL;
-  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__EKSE)->parent_arrayed_collection__DKSE.upper__BWWE <  0)) {
-    result__2YRF=NULL;
-    ptr__3YRF=((__POINTER )(NULL));
-    typ_id__CZRF= 0;
-    sz__5YRF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
-    if ((sz__5YRF ==  0)) {
-      result__2YRF=Self__1JSE;
-    } else {
-      typ_id__CZRF=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5YRF);
-      if ((typ_id__CZRF == (__INTEGER)(-  1))) {
-        a__LKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YRF + a__LKFH) & (__UINTEGER_32)(~ a__LKFH));
-        ptr_table__NRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__MRIH=((__POINTER )(NULL));
-        result__ORIH=((__POINTER *)ptr_table__NRIH)[ 0];
-        if ((result__ORIH == (void *)NULL)) {
-          result__ORIH=new_lab__MRJ(new_size__MKFH);
-          next__MRIH=(void *)((unsigned long)result__ORIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKFH)));
-          ((__POINTER *)next__MRIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__NRIH)[ 0]=next__MRIH;
-        } else {
-          next__MRIH=((__POINTER *)result__ORIH)[ 0];
-          if ((next__MRIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ORIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MKFH <<  1)) <=  4096)) {
-              next__MRIH=(void *)((unsigned long)result__ORIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKFH)));
+  void *result__OJSE;
+  __LIP_INTEGER *result__AFSF;
+  __POINTER ptr__BFSF,ptr_table__NTJH,next__MTJH,result__OTJH;
+  __POINTER ptr_table__STJH,next__RTJH,result__TTJH;
+  __INTEGER typ_id__GFSF;
+  __UINTEGER_32 sz__DFSF,a__1LGH,new_size__2LGH,t__AMGH,a__5LGH;
+  __UINTEGER_32 new_size__VTJH,lab_type__UTJH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__QC4E,*Self__GD4E;
+  result__OJSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__UJSE)->parent_arrayed_collection__TJSE.upper__EWWE <  0)) {
+    result__AFSF=NULL;
+    ptr__BFSF=((__POINTER )(NULL));
+    typ_id__GFSF= 0;
+    sz__DFSF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__DFSF ==  0)) {
+      result__AFSF=Self__LJSE;
+    } else {
+      typ_id__GFSF=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__DFSF);
+      if ((typ_id__GFSF == (__INTEGER)(-  1))) {
+        a__1LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2LGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DFSF + a__1LGH) & (__UINTEGER_32)(~ a__1LGH));
+        ptr_table__NTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2LGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__MTJH=((__POINTER )(NULL));
+        result__OTJH=((__POINTER *)ptr_table__NTJH)[ 0];
+        if ((result__OTJH == (void *)NULL)) {
+          result__OTJH=new_lab__URJ(new_size__2LGH);
+          next__MTJH=(void *)((unsigned long)result__OTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2LGH)));
+          ((__POINTER *)next__MTJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NTJH)[ 0]=next__MTJH;
+        } else {
+          next__MTJH=((__POINTER *)result__OTJH)[ 0];
+          if ((next__MTJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OTJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2LGH <<  1)) <=  4096)) {
+              next__MTJH=(void *)((unsigned long)result__OTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2LGH)));
             } else {
-              next__MRIH=new_lab__MRJ(new_size__MKFH);
-            };
-            ((__POINTER *)next__MRIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NRIH)[ 0]=next__MRIH;
-          } else {
-            ((__POINTER *)result__ORIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ORIH=next__MRIH;
-          };
-        };
-        ptr__3YRF=result__ORIH;
-      } else {
-        t__QKFH=((__UINTEGER_32 )typ_id__CZRF);
-        a__PKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__VRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YRF + a__PKFH) & (__UINTEGER_32)(~ a__PKFH));
-        ptr_table__SRIH=((__POINTER )(&(table_type[(t__QKFH)])));
-        lab_type__URIH=(__UINTEGER_32)(t__QKFH |  1);
-        next__RRIH=((__POINTER )(NULL));
-        result__TRIH=((__POINTER *)ptr_table__SRIH)[ 0];
-        if ((result__TRIH == (void *)NULL)) {
-          result__TRIH=new_lab__MRJ(lab_type__URIH);
-          next__RRIH=(void *)((unsigned long)result__TRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRIH)));
-          ((__POINTER *)next__RRIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__SRIH)[ 0]=next__RRIH;
-        } else {
-          next__RRIH=((__POINTER *)result__TRIH)[ 0];
-          if ((next__RRIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TRIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VRIH <<  1)) <=  4096)) {
-              next__RRIH=(void *)((unsigned long)result__TRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VRIH)));
+              next__MTJH=new_lab__URJ(new_size__2LGH);
+            };
+            ((__POINTER *)next__MTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NTJH)[ 0]=next__MTJH;
+          } else {
+            ((__POINTER *)result__OTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__OTJH=next__MTJH;
+          };
+        };
+        ptr__BFSF=result__OTJH;
+      } else {
+        t__AMGH=((__UINTEGER_32 )typ_id__GFSF);
+        a__5LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__DFSF + a__5LGH) & (__UINTEGER_32)(~ a__5LGH));
+        ptr_table__STJH=((__POINTER )(&(table_type[(t__AMGH)])));
+        lab_type__UTJH=(__UINTEGER_32)(t__AMGH |  1);
+        next__RTJH=((__POINTER )(NULL));
+        result__TTJH=((__POINTER *)ptr_table__STJH)[ 0];
+        if ((result__TTJH == (void *)NULL)) {
+          result__TTJH=new_lab__URJ(lab_type__UTJH);
+          next__RTJH=(void *)((unsigned long)result__TTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VTJH)));
+          ((__POINTER *)next__RTJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__STJH)[ 0]=next__RTJH;
+        } else {
+          next__RTJH=((__POINTER *)result__TTJH)[ 0];
+          if ((next__RTJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TTJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VTJH <<  1)) <=  4096)) {
+              next__RTJH=(void *)((unsigned long)result__TTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VTJH)));
             } else {
-              next__RRIH=new_lab__MRJ(lab_type__URIH);
+              next__RTJH=new_lab__URJ(lab_type__UTJH);
             };
-            ((__POINTER *)next__RRIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__SRIH)[ 0]=next__RRIH;
+            ((__POINTER *)next__RTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__STJH)[ 0]=next__RTJH;
           } else {
-            ((__POINTER *)result__TRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TRIH=next__RRIH;
+            ((__POINTER *)result__TTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TTJH=next__RTJH;
           };
         };
-        ptr__3YRF=result__TRIH;
+        ptr__BFSF=result__TTJH;
       };
-      result__2YRF=((__LIP_INTEGER *)ptr__3YRF);
-      *(result__2YRF) = *(Self__1JSE);
+      result__AFSF=((__LIP_INTEGER *)ptr__BFSF);
+      *(result__AFSF) = *(Self__LJSE);
     };
-    result__4JSE=result__2YRF;
+    result__OJSE=result__AFSF;
   } else {
-    Self__EY3E=((__FAST_ARRAYoLIP_INTEGERo *)storage__EKSE);
-    result__4JSE=((void **)Self__EY3E->parent_arrayed_collection__DKSE.storage__O0WE)[Self__EY3E->parent_arrayed_collection__DKSE.upper__BWWE];
-    Self__0Y3E=((__FAST_ARRAYoLIP_INTEGERo *)storage__EKSE);
-    Self__0Y3E->parent_arrayed_collection__DKSE.upper__BWWE=(__INTEGER)(Self__0Y3E->parent_arrayed_collection__DKSE.upper__BWWE -  1);
+    Self__QC4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__UJSE);
+    result__OJSE=((void **)Self__QC4E->parent_arrayed_collection__TJSE.storage__R0WE)[Self__QC4E->parent_arrayed_collection__TJSE.upper__EWWE];
+    Self__GD4E=((__FAST_ARRAYoLIP_INTEGERo *)storage__UJSE);
+    Self__GD4E->parent_arrayed_collection__TJSE.upper__EWWE=(__INTEGER)(Self__GD4E->parent_arrayed_collection__TJSE.upper__EWWE -  1);
   };
-  ((__LIP_INTEGER *)result__4JSE)->value__0B3F=i__2JSE;
-  return(result__4JSE);
+  ((__LIP_INTEGER *)result__OJSE)->value__3Y3F=i__MJSE;
+  return(result__OJSE);
 }
 
-static void* get__RBFF(__LIP_STRING *Self__SBFF,void *str__TBFF)
+static void* get__TMFF(__LIP_STRING *Self__UMFF,void *str__VMFF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  void *result__VBFF;
-  __LIP_STRING *result__ZDAG;
-  __POINTER ptr__0DAG,ptr_table__XRIH,next__WRIH,result__YRIH;
-  __POINTER ptr_table__2RIH,next__1RIH,result__3RIH;
-  __INTEGER typ_id__5DAG;
-  __UINTEGER_32 sz__2DAG,a__TKFH,new_size__UKFH,t__YKFH,a__XKFH;
-  __UINTEGER_32 new_size__5RIH,lab_type__4RIH;
-  __FAST_ARRAYoLIP_STRINGo *Self__2MSF,*Self__SNSF;
-  result__VBFF=NULL;
-  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__1BFF)->parent_arrayed_collection__0BFF.upper__4XOF <  0)) {
-    result__ZDAG=NULL;
-    ptr__0DAG=((__POINTER )(NULL));
-    typ_id__5DAG= 0;
-    sz__2DAG=((__UINTEGER_32 )sizeof(__LIP_STRING));
-    if ((sz__2DAG ==  0)) {
-      result__ZDAG=Self__SBFF;
-    } else {
-      typ_id__5DAG=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__2DAG);
-      if ((typ_id__5DAG == (__INTEGER)(-  1))) {
-        a__TKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__UKFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2DAG + a__TKFH) & (__UINTEGER_32)(~ a__TKFH));
-        ptr_table__XRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__WRIH=((__POINTER )(NULL));
-        result__YRIH=((__POINTER *)ptr_table__XRIH)[ 0];
-        if ((result__YRIH == (void *)NULL)) {
-          result__YRIH=new_lab__MRJ(new_size__UKFH);
-          next__WRIH=(void *)((unsigned long)result__YRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UKFH)));
-          ((__POINTER *)next__WRIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XRIH)[ 0]=next__WRIH;
-        } else {
-          next__WRIH=((__POINTER *)result__YRIH)[ 0];
-          if ((next__WRIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YRIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UKFH <<  1)) <=  4096)) {
-              next__WRIH=(void *)((unsigned long)result__YRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UKFH)));
+  void *result__XMFF;
+  __LIP_STRING *result__U1AG;
+  __POINTER ptr__V1AG,ptr_table__XTJH,next__WTJH,result__YTJH;
+  __POINTER ptr_table__2TJH,next__1TJH,result__3TJH;
+  __INTEGER typ_id__01AG;
+  __UINTEGER_32 sz__X1AG,a__DMGH,new_size__EMGH,t__IMGH,a__HMGH;
+  __UINTEGER_32 new_size__5TJH,lab_type__4TJH;
+  __FAST_ARRAYoLIP_STRINGo *Self__AZSF,*Self__WZSF;
+  result__XMFF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__3MFF)->parent_arrayed_collection__2MFF.upper__CEPF <  0)) {
+    result__U1AG=NULL;
+    ptr__V1AG=((__POINTER )(NULL));
+    typ_id__01AG= 0;
+    sz__X1AG=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__X1AG ==  0)) {
+      result__U1AG=Self__UMFF;
+    } else {
+      typ_id__01AG=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__X1AG);
+      if ((typ_id__01AG == (__INTEGER)(-  1))) {
+        a__DMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1AG + a__DMGH) & (__UINTEGER_32)(~ a__DMGH));
+        ptr_table__XTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__WTJH=((__POINTER )(NULL));
+        result__YTJH=((__POINTER *)ptr_table__XTJH)[ 0];
+        if ((result__YTJH == (void *)NULL)) {
+          result__YTJH=new_lab__URJ(new_size__EMGH);
+          next__WTJH=(void *)((unsigned long)result__YTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMGH)));
+          ((__POINTER *)next__WTJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XTJH)[ 0]=next__WTJH;
+        } else {
+          next__WTJH=((__POINTER *)result__YTJH)[ 0];
+          if ((next__WTJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YTJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__EMGH <<  1)) <=  4096)) {
+              next__WTJH=(void *)((unsigned long)result__YTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EMGH)));
             } else {
-              next__WRIH=new_lab__MRJ(new_size__UKFH);
-            };
-            ((__POINTER *)next__WRIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XRIH)[ 0]=next__WRIH;
-          } else {
-            ((__POINTER *)result__YRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YRIH=next__WRIH;
-          };
-        };
-        ptr__0DAG=result__YRIH;
-      } else {
-        t__YKFH=((__UINTEGER_32 )typ_id__5DAG);
-        a__XKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__5RIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2DAG + a__XKFH) & (__UINTEGER_32)(~ a__XKFH));
-        ptr_table__2RIH=((__POINTER )(&(table_type[(t__YKFH)])));
-        lab_type__4RIH=(__UINTEGER_32)(t__YKFH |  1);
-        next__1RIH=((__POINTER )(NULL));
-        result__3RIH=((__POINTER *)ptr_table__2RIH)[ 0];
-        if ((result__3RIH == (void *)NULL)) {
-          result__3RIH=new_lab__MRJ(lab_type__4RIH);
-          next__1RIH=(void *)((unsigned long)result__3RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RIH)));
-          ((__POINTER *)next__1RIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2RIH)[ 0]=next__1RIH;
-        } else {
-          next__1RIH=((__POINTER *)result__3RIH)[ 0];
-          if ((next__1RIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3RIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5RIH <<  1)) <=  4096)) {
-              next__1RIH=(void *)((unsigned long)result__3RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RIH)));
+              next__WTJH=new_lab__URJ(new_size__EMGH);
+            };
+            ((__POINTER *)next__WTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XTJH)[ 0]=next__WTJH;
+          } else {
+            ((__POINTER *)result__YTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YTJH=next__WTJH;
+          };
+        };
+        ptr__V1AG=result__YTJH;
+      } else {
+        t__IMGH=((__UINTEGER_32 )typ_id__01AG);
+        a__HMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5TJH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1AG + a__HMGH) & (__UINTEGER_32)(~ a__HMGH));
+        ptr_table__2TJH=((__POINTER )(&(table_type[(t__IMGH)])));
+        lab_type__4TJH=(__UINTEGER_32)(t__IMGH |  1);
+        next__1TJH=((__POINTER )(NULL));
+        result__3TJH=((__POINTER *)ptr_table__2TJH)[ 0];
+        if ((result__3TJH == (void *)NULL)) {
+          result__3TJH=new_lab__URJ(lab_type__4TJH);
+          next__1TJH=(void *)((unsigned long)result__3TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TJH)));
+          ((__POINTER *)next__1TJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2TJH)[ 0]=next__1TJH;
+        } else {
+          next__1TJH=((__POINTER *)result__3TJH)[ 0];
+          if ((next__1TJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3TJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__5TJH <<  1)) <=  4096)) {
+              next__1TJH=(void *)((unsigned long)result__3TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5TJH)));
             } else {
-              next__1RIH=new_lab__MRJ(lab_type__4RIH);
+              next__1TJH=new_lab__URJ(lab_type__4TJH);
             };
-            ((__POINTER *)next__1RIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2RIH)[ 0]=next__1RIH;
+            ((__POINTER *)next__1TJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2TJH)[ 0]=next__1TJH;
           } else {
-            ((__POINTER *)result__3RIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1RIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3RIH=next__1RIH;
+            ((__POINTER *)result__3TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3TJH=next__1TJH;
           };
         };
-        ptr__0DAG=result__3RIH;
+        ptr__V1AG=result__3TJH;
       };
-      result__ZDAG=((__LIP_STRING *)ptr__0DAG);
-      *(result__ZDAG) = *(Self__SBFF);
+      result__U1AG=((__LIP_STRING *)ptr__V1AG);
+      *(result__U1AG) = *(Self__UMFF);
     };
-    result__VBFF=result__ZDAG;
+    result__XMFF=result__U1AG;
   } else {
-    Self__2MSF=((__FAST_ARRAYoLIP_STRINGo *)storage__1BFF);
-    result__VBFF=((void **)Self__2MSF->parent_arrayed_collection__0BFF.storage__34OF)[Self__2MSF->parent_arrayed_collection__0BFF.upper__4XOF];
-    Self__SNSF=((__FAST_ARRAYoLIP_STRINGo *)storage__1BFF);
-    Self__SNSF->parent_arrayed_collection__0BFF.upper__4XOF=(__INTEGER)(Self__SNSF->parent_arrayed_collection__0BFF.upper__4XOF -  1);
+    Self__AZSF=((__FAST_ARRAYoLIP_STRINGo *)storage__3MFF);
+    result__XMFF=((void **)Self__AZSF->parent_arrayed_collection__2MFF.storage__BLPF)[Self__AZSF->parent_arrayed_collection__2MFF.upper__CEPF];
+    Self__WZSF=((__FAST_ARRAYoLIP_STRINGo *)storage__3MFF);
+    Self__WZSF->parent_arrayed_collection__2MFF.upper__CEPF=(__INTEGER)(Self__WZSF->parent_arrayed_collection__2MFF.upper__CEPF -  1);
   };
-  ((__LIP_STRING *)result__VBFF)->value__TBUE=str__TBFF;
-  return(result__VBFF);
+  ((__LIP_STRING *)result__XMFF)->value__WBUE=str__VMFF;
+  return(result__XMFF);
 }
 
-static void free__SW2F(__LIP_INTEGER *Self__TW2F)
+static void free__VN3F(__LIP_INTEGER *Self__WN3F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__1G4F,__tmp__5H4F,__tmp__BOFG,Self__CWHG;
-  __FAST_ARRAYoLIP_INTEGERo *Self__ZG4F;
-  __BOOLEAN __tmp__JH4F;
-  void **__tmp__4H4F,**new__NNFG;
-  Self__ZG4F=((__FAST_ARRAYoLIP_INTEGERo *)storage__EKSE);
-  new_capacity__1G4F= 0;
-  if (((__INTEGER)(Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE +  1) <= (__INTEGER)(Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE -  1))) {
-    Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE=(__INTEGER)(Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE +  1);
-    __tmp__JH4F=TRUE__;
+  __INTEGER new_capacity__P44F,__tmp__T54F,__tmp__5HGG,Self__ATIG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__N44F;
+  __BOOLEAN __tmp__344F;
+  void **__tmp__S54F,**new__LHGG;
+  Self__N44F=((__FAST_ARRAYoLIP_INTEGERo *)storage__UJSE);
+  new_capacity__P44F= 0;
+  if (((__INTEGER)(Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE +  1) <= (__INTEGER)(Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE -  1))) {
+    Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE=(__INTEGER)(Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE +  1);
+    __tmp__344F=TRUE__;
   } else {
-    __tmp__JH4F=FALSE__;
-  };
-  if ((! __tmp__JH4F)) {
-    if ((Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE ==  0)) {
-      Self__ZG4F->parent_arrayed_collection__DKSE.storage__O0WE=create__3RFF( 2);
-      Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE= 2;
-      Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE= 0;
-    } else {
-      new_capacity__1G4F=(__INTEGER)(Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE <<  1);
-      __tmp__4H4F=Self__ZG4F->parent_arrayed_collection__DKSE.storage__O0WE;
-      __tmp__5H4F=Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE;
-      new__NNFG=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__4H4F)),((__UINTEGER_32 )(__INTEGER)(__tmp__5H4F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__1G4F * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__BOFG=(__INTEGER)(new_capacity__1G4F -  1);
-      Self__CWHG=__tmp__5H4F;
-      while ((Self__CWHG <= __tmp__BOFG)) {
-        new__NNFG[Self__CWHG]=NULL;
-        Self__CWHG=(__INTEGER)(Self__CWHG +  1);
-      };
-      Self__ZG4F->parent_arrayed_collection__DKSE.storage__O0WE=new__NNFG;
-      Self__ZG4F->parent_arrayed_collection__DKSE.capacity__D0WE=new_capacity__1G4F;
-      Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE=(__INTEGER)(Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE +  1);
-    };
-  };
-  ((void **)Self__ZG4F->parent_arrayed_collection__DKSE.storage__O0WE)[Self__ZG4F->parent_arrayed_collection__DKSE.upper__BWWE]=Self__TW2F;
+    __tmp__344F=FALSE__;
+  };
+  if ((! __tmp__344F)) {
+    if ((Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE ==  0)) {
+      Self__N44F->parent_arrayed_collection__TJSE.storage__R0WE=create__52FF( 2);
+      Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE= 2;
+      Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE= 0;
+    } else {
+      new_capacity__P44F=(__INTEGER)(Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE <<  1);
+      __tmp__S54F=Self__N44F->parent_arrayed_collection__TJSE.storage__R0WE;
+      __tmp__T54F=Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE;
+      new__LHGG=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__S54F)),((__UINTEGER_32 )(__INTEGER)(__tmp__T54F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__P44F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__5HGG=(__INTEGER)(new_capacity__P44F -  1);
+      Self__ATIG=__tmp__T54F;
+      while ((Self__ATIG <= __tmp__5HGG)) {
+        new__LHGG[Self__ATIG]=NULL;
+        Self__ATIG=(__INTEGER)(Self__ATIG +  1);
+      };
+      Self__N44F->parent_arrayed_collection__TJSE.storage__R0WE=new__LHGG;
+      Self__N44F->parent_arrayed_collection__TJSE.capacity__G0WE=new_capacity__P44F;
+      Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE=(__INTEGER)(Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE +  1);
+    };
+  };
+  ((void **)Self__N44F->parent_arrayed_collection__TJSE.storage__R0WE)[Self__N44F->parent_arrayed_collection__TJSE.upper__EWWE]=Self__WN3F;
 }
 
-static void free__EVGG(__LIP_STRING *Self__FVGG)
+static void free__4RHG(__LIP_STRING *Self__5RHG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__4NHG,__tmp__CPHG,__tmp__SCLG,Self__PPMG;
-  __FAST_ARRAYoLIP_STRINGo *Self__2NHG;
-  __BOOLEAN __tmp__MOHG;
-  void **__tmp__BPHG,**new__4BLG;
-  Self__2NHG=((__FAST_ARRAYoLIP_STRINGo *)storage__1BFF);
-  new_capacity__4NHG= 0;
-  if (((__INTEGER)(Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF +  1) <= (__INTEGER)(Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF -  1))) {
-    Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF=(__INTEGER)(Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF +  1);
-    __tmp__MOHG=TRUE__;
+  __INTEGER new_capacity__2KIG,__tmp__AMIG,__tmp__14LG,Self__YLNG;
+  __FAST_ARRAYoLIP_STRINGo *Self__0KIG;
+  __BOOLEAN __tmp__KLIG;
+  void **__tmp__5LIG,**new__H4LG;
+  Self__0KIG=((__FAST_ARRAYoLIP_STRINGo *)storage__3MFF);
+  new_capacity__2KIG= 0;
+  if (((__INTEGER)(Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF +  1) <= (__INTEGER)(Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF -  1))) {
+    Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF=(__INTEGER)(Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF +  1);
+    __tmp__KLIG=TRUE__;
   } else {
-    __tmp__MOHG=FALSE__;
-  };
-  if ((! __tmp__MOHG)) {
-    if ((Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF ==  0)) {
-      Self__2NHG->parent_arrayed_collection__0BFF.storage__34OF=create__SNXF( 2);
-      Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF= 2;
-      Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF= 0;
-    } else {
-      new_capacity__4NHG=(__INTEGER)(Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF <<  1);
-      __tmp__BPHG=Self__2NHG->parent_arrayed_collection__0BFF.storage__34OF;
-      __tmp__CPHG=Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF;
-      new__4BLG=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__BPHG)),((__UINTEGER_32 )(__INTEGER)(__tmp__CPHG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__4NHG * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__SCLG=(__INTEGER)(new_capacity__4NHG -  1);
-      Self__PPMG=__tmp__CPHG;
-      while ((Self__PPMG <= __tmp__SCLG)) {
-        new__4BLG[Self__PPMG]=NULL;
-        Self__PPMG=(__INTEGER)(Self__PPMG +  1);
-      };
-      Self__2NHG->parent_arrayed_collection__0BFF.storage__34OF=new__4BLG;
-      Self__2NHG->parent_arrayed_collection__0BFF.capacity__S4OF=new_capacity__4NHG;
-      Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF=(__INTEGER)(Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF +  1);
-    };
-  };
-  ((void **)Self__2NHG->parent_arrayed_collection__0BFF.storage__34OF)[Self__2NHG->parent_arrayed_collection__0BFF.upper__4XOF]=Self__FVGG;
+    __tmp__KLIG=FALSE__;
+  };
+  if ((! __tmp__KLIG)) {
+    if ((Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF ==  0)) {
+      Self__0KIG->parent_arrayed_collection__2MFF.storage__BLPF=create__Y0XF( 2);
+      Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF= 2;
+      Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF= 0;
+    } else {
+      new_capacity__2KIG=(__INTEGER)(Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF <<  1);
+      __tmp__5LIG=Self__0KIG->parent_arrayed_collection__2MFF.storage__BLPF;
+      __tmp__AMIG=Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF;
+      new__H4LG=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__5LIG)),((__UINTEGER_32 )(__INTEGER)(__tmp__AMIG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__2KIG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__14LG=(__INTEGER)(new_capacity__2KIG -  1);
+      Self__YLNG=__tmp__AMIG;
+      while ((Self__YLNG <= __tmp__14LG)) {
+        new__H4LG[Self__YLNG]=NULL;
+        Self__YLNG=(__INTEGER)(Self__YLNG +  1);
+      };
+      Self__0KIG->parent_arrayed_collection__2MFF.storage__BLPF=new__H4LG;
+      Self__0KIG->parent_arrayed_collection__2MFF.capacity__WKPF=new_capacity__2KIG;
+      Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF=(__INTEGER)(Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF +  1);
+    };
+  };
+  ((void **)Self__0KIG->parent_arrayed_collection__2MFF.storage__BLPF)[Self__0KIG->parent_arrayed_collection__2MFF.upper__CEPF]=Self__5RHG;
 }
 
-static void load_directory__is_recursive__5BWF(__LIP_CALL *Self__ACWF,void *path__BCWF,__BOOLEAN is_rec__CCWF)
+static void load_directory__is_recursive__DOWF(__LIP_CALL *Self__EOWF,void *path__FOWF,__BOOLEAN is_rec__GOWF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  void *dir__ECWF,*__tmp__3CWF;
-  void *entry__DCWF;
-  __FILE_UNIX *Self__OKAH;
-  __INTEGER __tmp__BDWF,Self__UQMG,i1__BSIH,i2__CSIH;
-  void *__tmp__IDWF,*__tmp__RDWF,*__tmp__IEWF;
-  __STRING_CONSTANT *Self__DSIH;
-  __POSITION __tmp__WEWF;
-  __BOOLEAN __tmp__LCWF,__tmp__VCWF,__tmp__SCWF,__tmp__WCWF;
-  __BOOLEAN result__ASIH,__tmp__UDWF,__tmp__4DWF,__tmp__BEWF;
-  dir__ECWF=NULL;
-  if (FILE_SYSTEM__->parent_directory__PFD==0) {
+  void *dir__IOWF,*__tmp__BPWF;
+  void *entry__HOWF;
+  __FILE_UNIX *Self__RJBH;
+  __INTEGER __tmp__FPWF,Self__3MNG,i1__BUJH,i2__CUJH;
+  void *__tmp__MPWF,*__tmp__VPWF,*__tmp__MQWF;
+  __STRING_CONSTANT *Self__DUJH;
+  __POSITION __tmp__0QWF;
+  __BOOLEAN __tmp__POWF,__tmp__ZOWF,__tmp__WOWF,__tmp__0OWF;
+  __BOOLEAN result__AUJH,__tmp__YPWF,__tmp__CQWF,__tmp__FQWF;
+  dir__IOWF=NULL;
+  if (FILE_SYSTEM__->parent_directory__XFD==0) {
   } else {
-    parent_directory__OED();
+    parent_directory__WED();
   };
-  entry__DCWF=get_entry__T0AC(path__BCWF);
-  if (((void *)entry__DCWF != (void *)NULL)) {
-    if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__LCWF=((void *)((__DIRECTORY_UNIX *)entry__DCWF) != (void *)NULL);
+  entry__HOWF=get_entry__10AC(path__FOWF);
+  if (((void *)entry__HOWF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__POWF=((void *)((__DIRECTORY_UNIX *)entry__HOWF) != (void *)NULL);
     } else {
-      __tmp__LCWF=FALSE__;
+      __tmp__POWF=FALSE__;
     };
-    __tmp__VCWF=__tmp__LCWF;
+    __tmp__ZOWF=__tmp__POWF;
   } else {
-    __tmp__VCWF=FALSE__;
+    __tmp__ZOWF=FALSE__;
   };
-  if (__tmp__VCWF) {
-    if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__SCWF=open__ZERD(entry__DCWF);
+  if (__tmp__ZOWF) {
+    if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__WOWF=open__BFRD(entry__HOWF);
     } else {
-      Self__OKAH=((__FILE_UNIX *)entry__DCWF);
-      Self__OKAH->stream__EJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__OKAH->parent_entry_unix__2CF.parent_entry__YED.path__BD)->storage__VQO),"r+b")));
-      __tmp__SCWF=(Self__OKAH->stream__EJRD != (void *)NULL);
+      Self__RJBH=((__FILE_UNIX *)entry__HOWF);
+      Self__RJBH->stream__MJRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__RJBH->parent_entry_unix__EDF.parent_entry__AFD.path__BD)->storage__3QO),"r+b")));
+      __tmp__WOWF=(Self__RJBH->stream__MJRD != (void *)NULL);
     };
-    __tmp__WCWF=__tmp__SCWF;
+    __tmp__0OWF=__tmp__WOWF;
   } else {
-    __tmp__WCWF=FALSE__;
+    __tmp__0OWF=FALSE__;
   };
-  if (__tmp__WCWF) {
-    if (entry__DCWF==NULL) {
-      __tmp__3CWF=NULL;
+  if (__tmp__0OWF) {
+    if (entry__HOWF==NULL) {
+      __tmp__BPWF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__DCWF)->__id) {
+      switch (((struct ___OBJ *)entry__HOWF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__3CWF=((void *)entry__DCWF);
+        __tmp__BPWF=((void *)entry__HOWF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__3CWF=NULL;
+        __tmp__BPWF=NULL;
       } break;
       }
     };
-    dir__ECWF=__tmp__3CWF;
-    __tmp__BDWF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__3CWF)->parent_directory__0ED.list__IFRD)->parent_linked_collection__HFRD.upper__VM3D;
-    Self__UQMG= 1;
-    while ((Self__UQMG <= __tmp__BDWF)) {
-      entry__DCWF=item__FZPE(dir__ECWF,Self__UQMG);
-      if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-        __tmp__IDWF=((__DIRECTORY_UNIX *)entry__DCWF)->parent_entry_unix__ZED.parent_entry__YED.name__VNT;
+    dir__IOWF=__tmp__BPWF;
+    __tmp__FPWF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__BPWF)->parent_directory__CFD.list__QFRD)->parent_linked_collection__PFRD.upper__QM3D;
+    Self__3MNG= 1;
+    while ((Self__3MNG <= __tmp__FPWF)) {
+      entry__HOWF=item__1WPE(dir__IOWF,Self__3MNG);
+      if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__MPWF=((__DIRECTORY_UNIX *)entry__HOWF)->parent_entry_unix__BFD.parent_entry__AFD.name__3NT;
       } else {
-        __tmp__IDWF=((__FILE_UNIX *)entry__DCWF)->parent_entry_unix__2CF.parent_entry__YED.name__VNT;
+        __tmp__MPWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.name__3NT;
       };
-      Self__DSIH=((__STRING_CONSTANT *)__tmp__IDWF);
-      result__ASIH=FALSE__;
-      i1__BSIH= 0;
-      i2__CSIH= 0;
-      if ((((__STRING_CONSTANT *)(&__string_155))->count__DD <= Self__DSIH->count__DD)) {
-        i1__BSIH=(__INTEGER)((__INTEGER)(Self__DSIH->count__DD - ((__STRING_CONSTANT *)(&__string_155))->count__DD) +  1);
-        i2__CSIH= 1;
-        while ((! (((i1__BSIH > Self__DSIH->count__DD) || (i2__CSIH > ((__STRING_CONSTANT *)(&__string_155))->count__DD)) || (((__CHARACTER *)Self__DSIH->storage__VQO)[(__INTEGER)(i1__BSIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__VQO)[(__INTEGER)(i2__CSIH -  1)])))) {
-          i1__BSIH=(__INTEGER)(i1__BSIH +  1);
-          i2__CSIH=(__INTEGER)(i2__CSIH +  1);
+      Self__DUJH=((__STRING_CONSTANT *)__tmp__MPWF);
+      result__AUJH=FALSE__;
+      i1__BUJH= 0;
+      i2__CUJH= 0;
+      if ((((__STRING_CONSTANT *)(&__string_157))->count__DD <= Self__DUJH->count__DD)) {
+        i1__BUJH=(__INTEGER)((__INTEGER)(Self__DUJH->count__DD - ((__STRING_CONSTANT *)(&__string_157))->count__DD) +  1);
+        i2__CUJH= 1;
+        while ((! (((i1__BUJH > Self__DUJH->count__DD) || (i2__CUJH > ((__STRING_CONSTANT *)(&__string_157))->count__DD)) || (((__CHARACTER *)Self__DUJH->storage__3QO)[(__INTEGER)(i1__BUJH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_157))->storage__3QO)[(__INTEGER)(i2__CUJH -  1)])))) {
+          i1__BUJH=(__INTEGER)(i1__BUJH +  1);
+          i2__CUJH=(__INTEGER)(i2__CUJH +  1);
         };
-        result__ASIH=(i1__BSIH > Self__DSIH->count__DD);
+        result__AUJH=(i1__BUJH > Self__DUJH->count__DD);
       };
-      if (result__ASIH) {
-        if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-          __tmp__RDWF=((__DIRECTORY_UNIX *)entry__DCWF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+      if (result__AUJH) {
+        if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__VPWF=((__DIRECTORY_UNIX *)entry__HOWF)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
         } else {
-          __tmp__RDWF=((__FILE_UNIX *)entry__DCWF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+          __tmp__VPWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
         };
-        add_last__RBPD(path_file__PDWF,__tmp__RDWF);
-        __tmp__UDWF=TRUE__;
+        add_last__ZBPD(path_file__TPWF,__tmp__VPWF);
+        __tmp__YPWF=TRUE__;
       } else {
-        __tmp__UDWF=FALSE__;
+        __tmp__YPWF=FALSE__;
       };
-      if ((! __tmp__UDWF)) {
-        if (is_rec__CCWF) {
-          if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__4DWF=((void *)((__DIRECTORY_UNIX *)entry__DCWF) != (void *)NULL);
+      if ((! __tmp__YPWF)) {
+        if (is_rec__GOWF) {
+          if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__CQWF=((void *)((__DIRECTORY_UNIX *)entry__HOWF) != (void *)NULL);
           } else {
-            __tmp__4DWF=FALSE__;
+            __tmp__CQWF=FALSE__;
           };
-          __tmp__BEWF=__tmp__4DWF;
+          __tmp__FQWF=__tmp__CQWF;
         } else {
-          __tmp__BEWF=FALSE__;
+          __tmp__FQWF=FALSE__;
         };
-        if (__tmp__BEWF) {
-          if (((struct ___OBJ *)entry__DCWF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__IEWF=((__DIRECTORY_UNIX *)entry__DCWF)->parent_entry_unix__ZED.parent_entry__YED.path__BD;
+        if (__tmp__FQWF) {
+          if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__MQWF=((__DIRECTORY_UNIX *)entry__HOWF)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
           } else {
-            __tmp__IEWF=((__FILE_UNIX *)entry__DCWF)->parent_entry_unix__2CF.parent_entry__YED.path__BD;
+            __tmp__MQWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
           };
-          load_directory__is_recursive__5BWF(Self__ACWF,__tmp__IEWF,TRUE__);
+          load_directory__is_recursive__DOWF(Self__EOWF,__tmp__MQWF,TRUE__);
         };
       };
-      Self__UQMG=(__INTEGER)(Self__UQMG +  1);
+      Self__3MNG=(__INTEGER)(Self__3MNG +  1);
     };
   } else {
-    copy__ZCS(string_tmp__VH,(&__string_331));
-    append__BOS(string_tmp__VH,path__BCWF);
-    append__BOS(string_tmp__VH,(&__string_292));
-    __tmp__WEWF=Self__ACWF->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ;
-    put_error__text__KNG( 2,string_tmp__VH);
-    put_position__UOG(__tmp__WEWF);
-    put_string__U1F(msg_err__PNG);
-    if ((type_error__ONG !=  2)) {
+    copy__BDS(string_tmp__VH,(&__string_330));
+    append__JOS(string_tmp__VH,path__FOWF);
+    append__JOS(string_tmp__VH,(&__string_291));
+    __tmp__0QWF=Self__EOWF->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ;
+    put_error__text__SNG( 2,string_tmp__VH);
+    put_position__2OG(__tmp__0QWF);
+    put_string__21F(msg_err__XNG);
+    if ((type_error__WNG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__C2GG(__LIP_STRING *Self__D2GG,void *str__E2GG)
+static void append_in__2YHG(__LIP_STRING *Self__3YHG,void *str__4YHG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER i__F2GG;
-  __CHARACTER car__G2GG;
-  car__G2GG='\0';
-  i__F2GG= 1;
-  while ((i__F2GG <= ((__STRING_CONSTANT *)Self__D2GG->value__TBUE)->count__DD)) {
-    car__G2GG=((__CHARACTER *)((__STRING_CONSTANT *)Self__D2GG->value__TBUE)->storage__VQO)[(__INTEGER)(i__F2GG -  1)];
-    if ((car__G2GG == '\\')) {
-      i__F2GG=(__INTEGER)(i__F2GG +  1);
-      if ((i__F2GG <= ((__STRING_CONSTANT *)Self__D2GG->value__TBUE)->count__DD)) {
-        car__G2GG=((__CHARACTER *)((__STRING_CONSTANT *)Self__D2GG->value__TBUE)->storage__VQO)[(__INTEGER)(i__F2GG -  1)];
-        if ((car__G2GG == 'a')) {
-          add_last__ZLT(str__E2GG,'\a');
+  __INTEGER i__5YHG;
+  __CHARACTER car__AZHG;
+  car__AZHG='\0';
+  i__5YHG= 1;
+  while ((i__5YHG <= ((__STRING_CONSTANT *)Self__3YHG->value__WBUE)->count__DD)) {
+    car__AZHG=((__CHARACTER *)((__STRING_CONSTANT *)Self__3YHG->value__WBUE)->storage__3QO)[(__INTEGER)(i__5YHG -  1)];
+    if ((car__AZHG == '\\')) {
+      i__5YHG=(__INTEGER)(i__5YHG +  1);
+      if ((i__5YHG <= ((__STRING_CONSTANT *)Self__3YHG->value__WBUE)->count__DD)) {
+        car__AZHG=((__CHARACTER *)((__STRING_CONSTANT *)Self__3YHG->value__WBUE)->storage__3QO)[(__INTEGER)(i__5YHG -  1)];
+        if ((car__AZHG == 'a')) {
+          add_last__BMT(str__4YHG,'\a');
         };
-        if ((car__G2GG == 'b')) {
-          add_last__ZLT(str__E2GG,'\b');
+        if ((car__AZHG == 'b')) {
+          add_last__BMT(str__4YHG,'\b');
         };
-        if ((car__G2GG == 'f')) {
-          add_last__ZLT(str__E2GG,'\f');
+        if ((car__AZHG == 'f')) {
+          add_last__BMT(str__4YHG,'\f');
         };
-        if ((car__G2GG == 'n')) {
-          add_last__ZLT(str__E2GG,'\n');
+        if ((car__AZHG == 'n')) {
+          add_last__BMT(str__4YHG,'\n');
         };
-        if ((car__G2GG == 'r')) {
-          add_last__ZLT(str__E2GG,'\r');
+        if ((car__AZHG == 'r')) {
+          add_last__BMT(str__4YHG,'\r');
         };
-        if ((car__G2GG == 't')) {
-          add_last__ZLT(str__E2GG,'\t');
+        if ((car__AZHG == 't')) {
+          add_last__BMT(str__4YHG,'\t');
         };
-        if ((car__G2GG == 'v')) {
-          add_last__ZLT(str__E2GG,'\v');
+        if ((car__AZHG == 'v')) {
+          add_last__BMT(str__4YHG,'\v');
         };
-        if ((car__G2GG == '\\')) {
-          add_last__ZLT(str__E2GG,'\\');
+        if ((car__AZHG == '\\')) {
+          add_last__BMT(str__4YHG,'\\');
         };
-        if ((car__G2GG == '?')) {
-          add_last__ZLT(str__E2GG,'\?');
+        if ((car__AZHG == '?')) {
+          add_last__BMT(str__4YHG,'\?');
         };
-        if ((car__G2GG == '\'')) {
-          add_last__ZLT(str__E2GG,'\'');
+        if ((car__AZHG == '\'')) {
+          add_last__BMT(str__4YHG,'\'');
         };
-        if ((car__G2GG == '\"')) {
-          add_last__ZLT(str__E2GG,'\"');
+        if ((car__AZHG == '\"')) {
+          add_last__BMT(str__4YHG,'\"');
         };
       } else {
-        add_last__ZLT(str__E2GG,car__G2GG);
+        add_last__BMT(str__4YHG,car__AZHG);
       };
     } else {
-      add_last__ZLT(str__E2GG,car__G2GG);
+      add_last__BMT(str__4YHG,car__AZHG);
     };
-    i__F2GG=(__INTEGER)(i__F2GG +  1);
+    i__5YHG=(__INTEGER)(i__5YHG +  1);
   };
 }
 
-static void print_positif__Z4JG(__INTEGER Self__04JG)
+static void print_positif__C1KG(__INTEGER Self__D1KG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __INTEGER val__D5JG;
-  __CHARACTER char__C5JG;
-  char__C5JG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__04JG %  10)) + ((__INTEGER_8 )'0')))));
-  val__D5JG=(__INTEGER)(Self__04JG /  10);
-  if ((val__D5JG !=  0)) {
-    print_positif__Z4JG(val__D5JG);
-  };
-  fputc((int)(char__C5JG),stdout);
+  __INTEGER val__M1KG;
+  __CHARACTER char__L1KG;
+  char__L1KG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__D1KG %  10)) + ((__INTEGER_8 )'0')))));
+  val__M1KG=(__INTEGER)(Self__D1KG /  10);
+  if ((val__M1KG !=  0)) {
+    print_positif__C1KG(val__M1KG);
+  };
+  fputc((int)(char__L1KG),stdout);
 }
 
-static __BOOLEAN has__TLMB(__HASHED_SEToSTRING_CONSTANTo *Self__ULMB,void *e__VLMB)
+static __BOOLEAN has__1LMB(__HASHED_SEToSTRING_CONSTANTo *Self__2LMB,void *e__3LMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __STRING_CONSTANT *Self__LTGH;
-  __INTEGER result__KTGH,__tmp__MTGH,Self__NTGH;
-  void *node__4LMB;
-  Self__LTGH=((__STRING_CONSTANT *)e__VLMB);
-  result__KTGH= 0;
-  __tmp__MTGH=Self__LTGH->count__DD;
-  Self__NTGH= 1;
-  while ((Self__NTGH <= __tmp__MTGH)) {
-    result__KTGH=(__INTEGER)((__INTEGER)( 5 * result__KTGH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__LTGH->storage__VQO)[(__INTEGER)(Self__NTGH -  1)])));
-    Self__NTGH=(__INTEGER)(Self__NTGH +  1);
-  };
-  if ((result__KTGH <  0)) {
-    result__KTGH=(__INTEGER)(~ result__KTGH);
-  };
-  node__4LMB=((void **)Self__ULMB->buckets__PEV)[(__INTEGER)(result__KTGH % Self__ULMB->capacity__KIT)];
-  while ((! (((void *)node__4LMB == (void *)NULL) || __infix_equal_equal__45DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__4LMB)->item__1EV,e__VLMB)))) {
-    node__4LMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__4LMB)->next__GFV;
-  };
-  return(((void *)node__4LMB != (void *)NULL));
+  __STRING_CONSTANT *Self__GVHH;
+  __INTEGER result__FVHH,__tmp__HVHH,Self__IVHH;
+  void *node__GMMB;
+  Self__GVHH=((__STRING_CONSTANT *)e__3LMB);
+  result__FVHH= 0;
+  __tmp__HVHH=Self__GVHH->count__DD;
+  Self__IVHH= 1;
+  while ((Self__IVHH <= __tmp__HVHH)) {
+    result__FVHH=(__INTEGER)((__INTEGER)( 5 * result__FVHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GVHH->storage__3QO)[(__INTEGER)(Self__IVHH -  1)])));
+    Self__IVHH=(__INTEGER)(Self__IVHH +  1);
+  };
+  if ((result__FVHH <  0)) {
+    result__FVHH=(__INTEGER)(~ result__FVHH);
+  };
+  node__GMMB=((void **)Self__2LMB->buckets__XEV)[(__INTEGER)(result__FVHH % Self__2LMB->capacity__SIT)];
+  while ((! (((void *)node__GMMB == (void *)NULL) || __infix_equal_equal__GAEB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__GMMB)->item__DFV,e__3LMB)))) {
+    node__GMMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__GMMB)->next__OFV;
+  };
+  return(((void *)node__GMMB != (void *)NULL));
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__QJK(__INTEGER new_count__SJK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__YJK(__INTEGER new_count__0JK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __POINTER ptr__Y3K,ptr_table__GSIH,next__FSIH,result__HSIH;
-  __POINTER ptr_table__LSIH,next__KSIH,result__MSIH;
-  __INTEGER typ_id__33K;
-  __UINTEGER_32 sz__03K,a__1KFH,new_size__2KFH,t__ALFH,a__5KFH;
-  __UINTEGER_32 new_size__OSIH,lab_type__NSIH;
-  __FAST_ARRAYoITM_LOCALo *result__X3K,*Self__ZMU;
-  result__X3K=NULL;
-  ptr__Y3K=((__POINTER )(NULL));
-  typ_id__33K= 0;
-  sz__03K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
-  if ((sz__03K ==  0)) {
-    result__X3K=FAST_ARRAYoITM_LOCALo__;
+  __POINTER ptr__A4K,ptr_table__GUJH,next__FUJH,result__HUJH;
+  __POINTER ptr_table__LUJH,next__KUJH,result__MUJH;
+  __INTEGER typ_id__F4K;
+  __UINTEGER_32 sz__C4K,a__LMGH,new_size__MMGH,t__QMGH,a__PMGH;
+  __UINTEGER_32 new_size__OUJH,lab_type__NUJH;
+  __FAST_ARRAYoITM_LOCALo *result__53K,*Self__BNU;
+  result__53K=NULL;
+  ptr__A4K=((__POINTER )(NULL));
+  typ_id__F4K= 0;
+  sz__C4K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__C4K ==  0)) {
+    result__53K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    typ_id__33K=__FAST_ARRAYoITM_LOCALo__;
-    clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__03K);
-    if ((typ_id__33K == (__INTEGER)(-  1))) {
-      a__1KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__2KFH=(__UINTEGER_32)((__UINTEGER_32)(sz__03K + a__1KFH) & (__UINTEGER_32)(~ a__1KFH));
-      ptr_table__GSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2KFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-      next__FSIH=((__POINTER )(NULL));
-      result__HSIH=((__POINTER *)ptr_table__GSIH)[ 0];
-      if ((result__HSIH == (void *)NULL)) {
-        result__HSIH=new_lab__MRJ(new_size__2KFH);
-        next__FSIH=(void *)((unsigned long)result__HSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KFH)));
-        ((__POINTER *)next__FSIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__GSIH)[ 0]=next__FSIH;
-      } else {
-        next__FSIH=((__POINTER *)result__HSIH)[ 0];
-        if ((next__FSIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2KFH <<  1)) <=  4096)) {
-            next__FSIH=(void *)((unsigned long)result__HSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KFH)));
-          } else {
-            next__FSIH=new_lab__MRJ(new_size__2KFH);
-          };
-          ((__POINTER *)next__FSIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__GSIH)[ 0]=next__FSIH;
-        } else {
-          ((__POINTER *)result__HSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__HSIH=next__FSIH;
-        };
-      };
-      ptr__Y3K=result__HSIH;
-    } else {
-      t__ALFH=((__UINTEGER_32 )typ_id__33K);
-      a__5KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-      new_size__OSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__03K + a__5KFH) & (__UINTEGER_32)(~ a__5KFH));
-      ptr_table__LSIH=((__POINTER )(&(table_type[(t__ALFH)])));
-      lab_type__NSIH=(__UINTEGER_32)(t__ALFH |  1);
-      next__KSIH=((__POINTER )(NULL));
-      result__MSIH=((__POINTER *)ptr_table__LSIH)[ 0];
-      if ((result__MSIH == (void *)NULL)) {
-        result__MSIH=new_lab__MRJ(lab_type__NSIH);
-        next__KSIH=(void *)((unsigned long)result__MSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSIH)));
-        ((__POINTER *)next__KSIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__LSIH)[ 0]=next__KSIH;
-      } else {
-        next__KSIH=((__POINTER *)result__MSIH)[ 0];
-        if ((next__KSIH == (void *)NULL)) {
-          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__OSIH <<  1)) <=  4096)) {
-            next__KSIH=(void *)((unsigned long)result__MSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSIH)));
-          } else {
-            next__KSIH=new_lab__MRJ(lab_type__NSIH);
-          };
-          ((__POINTER *)next__KSIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__LSIH)[ 0]=next__KSIH;
-        } else {
-          ((__POINTER *)result__MSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__MSIH=next__KSIH;
-        };
-      };
-      ptr__Y3K=result__MSIH;
-    };
-    result__X3K=((__FAST_ARRAYoITM_LOCALo *)ptr__Y3K);
-    *(result__X3K) = *(FAST_ARRAYoITM_LOCALo__);
-  };
-  Self__ZMU=((__FAST_ARRAYoITM_LOCALo *)result__X3K);
-  if ((Self__ZMU->parent_arrayed_collection__E1H.capacity__XKU < new_count__SJK)) {
-    Self__ZMU->parent_arrayed_collection__E1H.storage__CLU=create__HRQB(new_count__SJK);
-    Self__ZMU->parent_arrayed_collection__E1H.capacity__XKU=new_count__SJK;
-  };
-  Self__ZMU->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(-  1);
-  return(result__X3K);
+    typ_id__F4K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__C4K);
+    if ((typ_id__F4K == (__INTEGER)(-  1))) {
+      a__LMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__C4K + a__LMGH) & (__UINTEGER_32)(~ a__LMGH));
+      ptr_table__GUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FUJH=((__POINTER )(NULL));
+      result__HUJH=((__POINTER *)ptr_table__GUJH)[ 0];
+      if ((result__HUJH == (void *)NULL)) {
+        result__HUJH=new_lab__URJ(new_size__MMGH);
+        next__FUJH=(void *)((unsigned long)result__HUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMGH)));
+        ((__POINTER *)next__FUJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GUJH)[ 0]=next__FUJH;
+      } else {
+        next__FUJH=((__POINTER *)result__HUJH)[ 0];
+        if ((next__FUJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HUJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MMGH <<  1)) <=  4096)) {
+            next__FUJH=(void *)((unsigned long)result__HUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMGH)));
+          } else {
+            next__FUJH=new_lab__URJ(new_size__MMGH);
+          };
+          ((__POINTER *)next__FUJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GUJH)[ 0]=next__FUJH;
+        } else {
+          ((__POINTER *)result__HUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HUJH=next__FUJH;
+        };
+      };
+      ptr__A4K=result__HUJH;
+    } else {
+      t__QMGH=((__UINTEGER_32 )typ_id__F4K);
+      a__PMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__C4K + a__PMGH) & (__UINTEGER_32)(~ a__PMGH));
+      ptr_table__LUJH=((__POINTER )(&(table_type[(t__QMGH)])));
+      lab_type__NUJH=(__UINTEGER_32)(t__QMGH |  1);
+      next__KUJH=((__POINTER )(NULL));
+      result__MUJH=((__POINTER *)ptr_table__LUJH)[ 0];
+      if ((result__MUJH == (void *)NULL)) {
+        result__MUJH=new_lab__URJ(lab_type__NUJH);
+        next__KUJH=(void *)((unsigned long)result__MUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OUJH)));
+        ((__POINTER *)next__KUJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LUJH)[ 0]=next__KUJH;
+      } else {
+        next__KUJH=((__POINTER *)result__MUJH)[ 0];
+        if ((next__KUJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MUJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__OUJH <<  1)) <=  4096)) {
+            next__KUJH=(void *)((unsigned long)result__MUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OUJH)));
+          } else {
+            next__KUJH=new_lab__URJ(lab_type__NUJH);
+          };
+          ((__POINTER *)next__KUJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LUJH)[ 0]=next__KUJH;
+        } else {
+          ((__POINTER *)result__MUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MUJH=next__KUJH;
+        };
+      };
+      ptr__A4K=result__MUJH;
+    };
+    result__53K=((__FAST_ARRAYoITM_LOCALo *)ptr__A4K);
+    *(result__53K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__BNU=((__FAST_ARRAYoITM_LOCALo *)result__53K);
+  if ((Self__BNU->parent_arrayed_collection__M1H.capacity__5KU < new_count__0JK)) {
+    Self__BNU->parent_arrayed_collection__M1H.storage__KLU=create__PRQB(new_count__0JK);
+    Self__BNU->parent_arrayed_collection__M1H.capacity__5KU=new_count__0JK;
+  };
+  Self__BNU->parent_arrayed_collection__M1H.upper__D1K=(__INTEGER)(-  1);
+  return(result__53K);
 }
 
-static void add_last__F2U(__FAST_ARRAYoITM_LOCALo *Self__G2U,void *element__H2U)
+static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__I2U,__tmp__M3U,__tmp__QCEC,Self__OFVD;
-  __BOOLEAN __tmp__W2U;
-  void **__tmp__L3U,**new__2BEC;
-  new_capacity__I2U= 0;
-  if (((__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1) <= (__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.capacity__XKU -  1))) {
-    Self__G2U->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1);
-    __tmp__W2U=TRUE__;
+  __INTEGER new_capacity__Q2U,__tmp__U3U,__tmp__YCEC,Self__WFVD;
+  __BOOLEAN __tmp__42U;
+  void **__tmp__T3U,**new__ECEC;
+  new_capacity__Q2U= 0;
+  if (((__INTEGER)(Self__O2U->parent_arrayed_collection__M1H.upper__D1K +  1) <= (__INTEGER)(Self__O2U->parent_arrayed_collection__M1H.capacity__5KU -  1))) {
+    Self__O2U->parent_arrayed_collection__M1H.upper__D1K=(__INTEGER)(Self__O2U->parent_arrayed_collection__M1H.upper__D1K +  1);
+    __tmp__42U=TRUE__;
   } else {
-    __tmp__W2U=FALSE__;
-  };
-  if ((! __tmp__W2U)) {
-    if ((Self__G2U->parent_arrayed_collection__E1H.capacity__XKU ==  0)) {
-      Self__G2U->parent_arrayed_collection__E1H.storage__CLU=create__HRQB( 2);
-      Self__G2U->parent_arrayed_collection__E1H.capacity__XKU= 2;
-      Self__G2U->parent_arrayed_collection__E1H.upper__10K= 0;
-    } else {
-      new_capacity__I2U=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.capacity__XKU <<  1);
-      __tmp__L3U=Self__G2U->parent_arrayed_collection__E1H.storage__CLU;
-      __tmp__M3U=Self__G2U->parent_arrayed_collection__E1H.capacity__XKU;
-      new__2BEC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__L3U)),((__UINTEGER_32 )(__INTEGER)(__tmp__M3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__I2U * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__QCEC=(__INTEGER)(new_capacity__I2U -  1);
-      Self__OFVD=__tmp__M3U;
-      while ((Self__OFVD <= __tmp__QCEC)) {
-        new__2BEC[Self__OFVD]=NULL;
-        Self__OFVD=(__INTEGER)(Self__OFVD +  1);
-      };
-      Self__G2U->parent_arrayed_collection__E1H.storage__CLU=new__2BEC;
-      Self__G2U->parent_arrayed_collection__E1H.capacity__XKU=new_capacity__I2U;
-      Self__G2U->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(Self__G2U->parent_arrayed_collection__E1H.upper__10K +  1);
-    };
-  };
-  ((void **)Self__G2U->parent_arrayed_collection__E1H.storage__CLU)[Self__G2U->parent_arrayed_collection__E1H.upper__10K]=element__H2U;
+    __tmp__42U=FALSE__;
+  };
+  if ((! __tmp__42U)) {
+    if ((Self__O2U->parent_arrayed_collection__M1H.capacity__5KU ==  0)) {
+      Self__O2U->parent_arrayed_collection__M1H.storage__KLU=create__PRQB( 2);
+      Self__O2U->parent_arrayed_collection__M1H.capacity__5KU= 2;
+      Self__O2U->parent_arrayed_collection__M1H.upper__D1K= 0;
+    } else {
+      new_capacity__Q2U=(__INTEGER)(Self__O2U->parent_arrayed_collection__M1H.capacity__5KU <<  1);
+      __tmp__T3U=Self__O2U->parent_arrayed_collection__M1H.storage__KLU;
+      __tmp__U3U=Self__O2U->parent_arrayed_collection__M1H.capacity__5KU;
+      new__ECEC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__T3U)),((__UINTEGER_32 )(__INTEGER)(__tmp__U3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__Q2U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__YCEC=(__INTEGER)(new_capacity__Q2U -  1);
+      Self__WFVD=__tmp__U3U;
+      while ((Self__WFVD <= __tmp__YCEC)) {
+        new__ECEC[Self__WFVD]=NULL;
+        Self__WFVD=(__INTEGER)(Self__WFVD +  1);
+      };
+      Self__O2U->parent_arrayed_collection__M1H.storage__KLU=new__ECEC;
+      Self__O2U->parent_arrayed_collection__M1H.capacity__5KU=new_capacity__Q2U;
+      Self__O2U->parent_arrayed_collection__M1H.upper__D1K=(__INTEGER)(Self__O2U->parent_arrayed_collection__M1H.upper__D1K +  1);
+    };
+  };
+  ((void **)Self__O2U->parent_arrayed_collection__M1H.storage__KLU)[Self__O2U->parent_arrayed_collection__M1H.upper__D1K]=element__P2U;
 }
 
-static void free__WJK(void *tmp__YJK)
+static void free__4JK(void *tmp__AKK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__SOU,__tmp__WPU,__tmp__EAEC,Self__PDVD;
-  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__QOU;
-  __BOOLEAN __tmp__APU;
-  void **__tmp__VPU,**new__Q5DC;
-  ((__FAST_ARRAYoITM_LOCALo *)tmp__YJK)->parent_arrayed_collection__E1H.upper__10K=(__INTEGER)(-  1);
-  Self__QOU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__VRI);
-  new_capacity__SOU= 0;
-  if (((__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1) <= (__INTEGER)(Self__QOU->parent_arrayed_collection__URI.capacity__2IU -  1))) {
-    Self__QOU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1);
-    __tmp__APU=TRUE__;
+  __INTEGER new_capacity__0OU,__tmp__4PU,__tmp__MAEC,Self__XDVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__YOU;
+  __BOOLEAN __tmp__IPU;
+  void **__tmp__3PU,**new__Y5DC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__AKK)->parent_arrayed_collection__M1H.upper__D1K=(__INTEGER)(-  1);
+  Self__YOU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__3RI);
+  new_capacity__0OU= 0;
+  if (((__INTEGER)(Self__YOU->parent_arrayed_collection__2RI.upper__R1T +  1) <= (__INTEGER)(Self__YOU->parent_arrayed_collection__2RI.capacity__EJU -  1))) {
+    Self__YOU->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(Self__YOU->parent_arrayed_collection__2RI.upper__R1T +  1);
+    __tmp__IPU=TRUE__;
   } else {
-    __tmp__APU=FALSE__;
-  };
-  if ((! __tmp__APU)) {
-    if ((Self__QOU->parent_arrayed_collection__URI.capacity__2IU ==  0)) {
-      Self__QOU->parent_arrayed_collection__URI.storage__HJU=create__EHQB( 2);
-      Self__QOU->parent_arrayed_collection__URI.capacity__2IU= 2;
-      Self__QOU->parent_arrayed_collection__URI.upper__J1T= 0;
-    } else {
-      new_capacity__SOU=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.capacity__2IU <<  1);
-      __tmp__VPU=Self__QOU->parent_arrayed_collection__URI.storage__HJU;
-      __tmp__WPU=Self__QOU->parent_arrayed_collection__URI.capacity__2IU;
-      new__Q5DC=((void **)realloc_dynamic__old_size__new_size__RELC(((__POINTER )((void **)__tmp__VPU)),((__UINTEGER_32 )(__INTEGER)(__tmp__WPU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SOU * ((__INTEGER )(sizeof(void *)))))));
-      __tmp__EAEC=(__INTEGER)(new_capacity__SOU -  1);
-      Self__PDVD=__tmp__WPU;
-      while ((Self__PDVD <= __tmp__EAEC)) {
-        new__Q5DC[Self__PDVD]=NULL;
-        Self__PDVD=(__INTEGER)(Self__PDVD +  1);
-      };
-      Self__QOU->parent_arrayed_collection__URI.storage__HJU=new__Q5DC;
-      Self__QOU->parent_arrayed_collection__URI.capacity__2IU=new_capacity__SOU;
-      Self__QOU->parent_arrayed_collection__URI.upper__J1T=(__INTEGER)(Self__QOU->parent_arrayed_collection__URI.upper__J1T +  1);
-    };
-  };
-  ((void **)Self__QOU->parent_arrayed_collection__URI.storage__HJU)[Self__QOU->parent_arrayed_collection__URI.upper__J1T]=tmp__YJK;
+    __tmp__IPU=FALSE__;
+  };
+  if ((! __tmp__IPU)) {
+    if ((Self__YOU->parent_arrayed_collection__2RI.capacity__EJU ==  0)) {
+      Self__YOU->parent_arrayed_collection__2RI.storage__PJU=create__MHQB( 2);
+      Self__YOU->parent_arrayed_collection__2RI.capacity__EJU= 2;
+      Self__YOU->parent_arrayed_collection__2RI.upper__R1T= 0;
+    } else {
+      new_capacity__0OU=(__INTEGER)(Self__YOU->parent_arrayed_collection__2RI.capacity__EJU <<  1);
+      __tmp__3PU=Self__YOU->parent_arrayed_collection__2RI.storage__PJU;
+      __tmp__4PU=Self__YOU->parent_arrayed_collection__2RI.capacity__EJU;
+      new__Y5DC=((void **)realloc_dynamic__old_size__new_size__ZELC(((__POINTER )((void **)__tmp__3PU)),((__UINTEGER_32 )(__INTEGER)(__tmp__4PU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0OU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__MAEC=(__INTEGER)(new_capacity__0OU -  1);
+      Self__XDVD=__tmp__4PU;
+      while ((Self__XDVD <= __tmp__MAEC)) {
+        new__Y5DC[Self__XDVD]=NULL;
+        Self__XDVD=(__INTEGER)(Self__XDVD +  1);
+      };
+      Self__YOU->parent_arrayed_collection__2RI.storage__PJU=new__Y5DC;
+      Self__YOU->parent_arrayed_collection__2RI.capacity__EJU=new_capacity__0OU;
+      Self__YOU->parent_arrayed_collection__2RI.upper__R1T=(__INTEGER)(Self__YOU->parent_arrayed_collection__2RI.upper__R1T +  1);
+    };
+  };
+  ((void **)Self__YOU->parent_arrayed_collection__2RI.storage__PJU)[Self__YOU->parent_arrayed_collection__2RI.upper__R1T]=tmp__AKK;
 }
 
-static void* copy__53J(void *tmp__B4J)
+static void* copy__H4J(void *tmp__J4J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __INTEGER new_capacity__OKU,other_upper__NKU,Self__G5JC;
-  void *result__D4J;
-  __FAST_ARRAYoITM_LOCALo *Self__LKU;
-  void **__tmp__FLU,**__tmp__HLU,**Self__LTCC;
-  result__D4J=create_with_capacity__QJK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.upper__10K +  1));
-  Self__LKU=((__FAST_ARRAYoITM_LOCALo *)result__D4J);
-  new_capacity__OKU= 0;
-  other_upper__NKU=((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.upper__10K;
-  if ((other_upper__NKU >=  0)) {
-    new_capacity__OKU=(__INTEGER)(other_upper__NKU +  1);
-    if ((Self__LKU->parent_arrayed_collection__E1H.capacity__XKU < new_capacity__OKU)) {
-      Self__LKU->parent_arrayed_collection__E1H.storage__CLU=create__HRQB(new_capacity__OKU);
-      Self__LKU->parent_arrayed_collection__E1H.capacity__XKU=new_capacity__OKU;
-    };
-    __tmp__FLU=Self__LKU->parent_arrayed_collection__E1H.storage__CLU;
-    __tmp__HLU=((__FAST_ARRAYoITM_LOCALo *)tmp__B4J)->parent_arrayed_collection__E1H.storage__CLU;
-    Self__LTCC=((void **)__tmp__FLU);
-    Self__G5JC=other_upper__NKU;
-    while ((Self__G5JC >=  0)) {
-      Self__LTCC[Self__G5JC]=((void **)__tmp__HLU)[Self__G5JC];
-      Self__G5JC=(__INTEGER)(Self__G5JC -  1);
-    };
-  };
-  Self__LKU->parent_arrayed_collection__E1H.upper__10K=other_upper__NKU;
-  free__WJK(tmp__B4J);
-  return(result__D4J);
+  __INTEGER new_capacity__WKU,other_upper__VKU,Self__O5JC;
+  void *result__L4J;
+  __FAST_ARRAYoITM_LOCALo *Self__TKU;
+  void **__tmp__NLU,**__tmp__PLU,**Self__TTCC;
+  result__L4J=create_with_capacity__YJK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__J4J)->parent_arrayed_collection__M1H.upper__D1K +  1));
+  Self__TKU=((__FAST_ARRAYoITM_LOCALo *)result__L4J);
+  new_capacity__WKU= 0;
+  other_upper__VKU=((__FAST_ARRAYoITM_LOCALo *)tmp__J4J)->parent_arrayed_collection__M1H.upper__D1K;
+  if ((other_upper__VKU >=  0)) {
+    new_capacity__WKU=(__INTEGER)(other_upper__VKU +  1);
+    if ((Self__TKU->parent_arrayed_collection__M1H.capacity__5KU < new_capacity__WKU)) {
+      Self__TKU->parent_arrayed_collection__M1H.storage__KLU=create__PRQB(new_capacity__WKU);
+      Self__TKU->parent_arrayed_collection__M1H.capacity__5KU=new_capacity__WKU;
+    };
+    __tmp__NLU=Self__TKU->parent_arrayed_collection__M1H.storage__KLU;
+    __tmp__PLU=((__FAST_ARRAYoITM_LOCALo *)tmp__J4J)->parent_arrayed_collection__M1H.storage__KLU;
+    Self__TTCC=((void **)__tmp__NLU);
+    Self__O5JC=other_upper__VKU;
+    while ((Self__O5JC >=  0)) {
+      Self__TTCC[Self__O5JC]=((void **)__tmp__PLU)[Self__O5JC];
+      Self__O5JC=(__INTEGER)(Self__O5JC -  1);
+    };
+  };
+  Self__TKU->parent_arrayed_collection__M1H.upper__D1K=other_upper__VKU;
+  free__4JK(tmp__J4J);
+  return(result__L4J);
 }
 
-static void** create__HTQB(__INTEGER nb_elements__JTQB)
+static void** create__PTQB(__INTEGER nb_elements__RTQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__MHDH,a__RHDH,new_size__NHDH,new_size2__OHDH,a__4HFH;
-  __UINTEGER_32 new_size__5HFH;
-  __POINTER result__LHDH,ptr_table__QSIH,next__PSIH,result__RSIH;
-  void *result__USIH;
-  __INTEGER Self__01MC;
-  void **Result__MOTB;
-  sz__MHDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JTQB * ((__INTEGER )(sizeof(void *)))));
-  result__LHDH=((__POINTER )(NULL));
-  a__RHDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__NHDH=(__UINTEGER_32)((__UINTEGER_32)(sz__MHDH + a__RHDH) & (__UINTEGER_32)(~ a__RHDH));
-  new_size2__OHDH=(__UINTEGER_32)(new_size__NHDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__OHDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__4HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__5HFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__OHDH + a__4HFH) & (__UINTEGER_32)(~ a__4HFH));
-    ptr_table__QSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5HFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__PSIH=((__POINTER )(NULL));
-    result__RSIH=((__POINTER *)ptr_table__QSIH)[ 0];
-    if ((result__RSIH == (void *)NULL)) {
-      result__RSIH=new_lab__MRJ(new_size__5HFH);
-      next__PSIH=(void *)((unsigned long)result__RSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5HFH)));
-      ((__POINTER *)next__PSIH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__QSIH)[ 0]=next__PSIH;
-    } else {
-      next__PSIH=((__POINTER *)result__RSIH)[ 0];
-      if ((next__PSIH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__5HFH <<  1)) <=  4096)) {
-          next__PSIH=(void *)((unsigned long)result__RSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5HFH)));
-        } else {
-          next__PSIH=new_lab__MRJ(new_size__5HFH);
-        };
-        ((__POINTER *)next__PSIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__QSIH)[ 0]=next__PSIH;
-      } else {
-        ((__POINTER *)result__RSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__RSIH=next__PSIH;
-      };
-    };
-    ((__POINTER *)result__RSIH)[ 0]=((__POINTER ) 3);
-    result__LHDH=(void *)((unsigned long)result__RSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__EIEH,a__JIEH,new_size__FIEH,new_size2__GIEH,a__OJGH;
+  __UINTEGER_32 new_size__PJGH;
+  __POINTER result__DIEH,ptr_table__QUJH,next__PUJH,result__RUJH;
+  void *result__UUJH;
+  __INTEGER Self__C2MC;
+  void **Result__UOTB;
+  sz__EIEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RTQB * ((__INTEGER )(sizeof(void *)))));
+  result__DIEH=((__POINTER )(NULL));
+  a__JIEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FIEH=(__UINTEGER_32)((__UINTEGER_32)(sz__EIEH + a__JIEH) & (__UINTEGER_32)(~ a__JIEH));
+  new_size2__GIEH=(__UINTEGER_32)(new_size__FIEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GIEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PJGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GIEH + a__OJGH) & (__UINTEGER_32)(~ a__OJGH));
+    ptr_table__QUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PUJH=((__POINTER )(NULL));
+    result__RUJH=((__POINTER *)ptr_table__QUJH)[ 0];
+    if ((result__RUJH == (void *)NULL)) {
+      result__RUJH=new_lab__URJ(new_size__PJGH);
+      next__PUJH=(void *)((unsigned long)result__RUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJGH)));
+      ((__POINTER *)next__PUJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QUJH)[ 0]=next__PUJH;
+    } else {
+      next__PUJH=((__POINTER *)result__RUJH)[ 0];
+      if ((next__PUJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RUJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__PJGH <<  1)) <=  4096)) {
+          next__PUJH=(void *)((unsigned long)result__RUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJGH)));
+        } else {
+          next__PUJH=new_lab__URJ(new_size__PJGH);
+        };
+        ((__POINTER *)next__PUJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QUJH)[ 0]=next__PUJH;
+      } else {
+        ((__POINTER *)result__RUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RUJH=next__PUJH;
+      };
+    };
+    ((__POINTER *)result__RUJH)[ 0]=((__POINTER ) 3);
+    result__DIEH=(void *)((unsigned long)result__RUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__USIH=first_free__XDVB;
-    while ((((void *)result__USIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__USIH)->map_size_and_id__ITB &  4294967292LU) < new_size__NHDH))) {
-      result__USIH=((__MEMORY *)result__USIH)->map_next_free__JTB;
+    result__UUJH=first_free__5DVB;
+    while ((((void *)result__UUJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UUJH)->map_size_and_id__QTB &  4294967292LU) < new_size__FIEH))) {
+      result__UUJH=((__MEMORY *)result__UUJH)->map_next_free__RTB;
     };
-    if (((void *)result__USIH == (void *)NULL)) {
-      result__USIH=new_page__OA5();
+    if (((void *)result__UUJH == (void *)NULL)) {
+      result__UUJH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__USIH,new_size__NHDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__USIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__LHDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__USIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__UUJH,new_size__FIEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UUJH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__DIEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UUJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__MOTB=((void **)result__LHDH);
-  Self__01MC=(__INTEGER)(nb_elements__JTQB -  1);
-  while ((Self__01MC >=  0)) {
-    Result__MOTB[Self__01MC]=NULL;
-    Self__01MC=(__INTEGER)(Self__01MC -  1);
+  Result__UOTB=((void **)result__DIEH);
+  Self__C2MC=(__INTEGER)(nb_elements__RTQB -  1);
+  while ((Self__C2MC >=  0)) {
+    Result__UOTB[Self__C2MC]=NULL;
+    Self__C2MC=(__INTEGER)(Self__C2MC -  1);
   };
-  return(Result__MOTB);
+  return(Result__UOTB);
 }
 
-static void* read_send_msg__M4N(__PARSER *Self__N4N,void *first_arg__O4N)
+static void* read_send_msg__U4N(__PARSER *Self__V4N,void *first_arg__W4N)
 // ({PARSER},{NULLxITM_LISTxITM_PROTOTYPExITM_READxITM_READ_ARG1xITM_READ_ARG2xITM_OLDxITM_EXTERNAL_TYPExITM_BLOCKxITM_EXTERNALxITM_READ_ARGSxITM_REALxITM_NUMBERxITM_CHARACTERxITM_STRING}) With resultNo recursive, No inlinable.
 {
-  void *result__Q4N,*arg__U4N,*tmp__LORB;
-  void *n__S4N,*result__DIFH;
-  __INTEGER p1__V4N,p2__W4N,old_derive__X4N,sav_derive__Y4N;
-  __INTEGER typ_id__RTGH,typ_id__0TGH,typ_id__DUGH,Self__T0YC;
-  __INTEGER typ_id__QCR;
-  __POSITION pos__MAZG,p__XTGH,p__AUGH,p__JUGH,p__34Q;
-  __ITM_READ *result__PTGH;
-  __POINTER ptr__QTGH,ptr_table__YSIH,next__XSIH,result__ZSIH;
-  __POINTER ptr_table__3SIH,next__2SIH,result__4SIH,ptr__ZTGH;
-  __POINTER ptr_table__CTIH,next__BTIH,result__DTIH,ptr_table__HTIH;
-  __POINTER next__GTIH,result__ITIH,ptr__CUGH,ptr_table__MTIH;
-  __POINTER next__LTIH,result__NTIH,ptr_table__RTIH,next__QTIH;
-  __POINTER result__STIH,ptr__LCR,ptr_table__WTIH,next__VTIH;
-  __POINTER result__XTIH,ptr_table__1TIH,next__0TIH,result__2TIH;
-  __UINTEGER_32 sz__STGH,a__TTGH,new_size__UTGH,t__VTGH,a__WTGH;
-  __UINTEGER_32 new_size__ATIH,lab_type__5SIH,sz__1TGH,a__2TGH;
-  __UINTEGER_32 new_size__3TGH,t__4TGH,a__5TGH,new_size__KTIH;
-  __UINTEGER_32 lab_type__JTIH,sz__EUGH,a__FUGH,new_size__GUGH,t__HUGH;
-  __UINTEGER_32 a__IUGH,new_size__UTIH,lab_type__TTIH,sz__NCR,a__EJFH;
-  __UINTEGER_32 new_size__FJFH,t__JJFH,a__IJFH,new_size__4TIH;
-  __UINTEGER_32 lab_type__3TIH;
-  __ITM_READ_ARG1 *result__YTGH;
-  __ITM_READ_ARG2 *result__BUGH;
-  __ITM_READ_ARGS *result__KCR;
-  void *l_arg__T4N,*result__0BGH;
-  __FAST_ARRAYoSTRINGo *Self__EIFH,*Self__GIFH;
-  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__1BGH,*Self__2BGH;
-  __BOOLEAN __tmp__SCO;
-  __FAST_ARRAYoITM_CODEo *Self__3CW;
-  result__Q4N=NULL;
-  n__S4N=NULL;
-  l_arg__T4N=NULL;
-  arg__U4N=NULL;
-  p1__V4N= 0;
-  p2__W4N= 0;
-  old_derive__X4N= 0;
-  sav_derive__Y4N= 0;
-  if (read_identifier__LAL()) {
-    p1__V4N=(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD);
-    p2__W4N=position__SBC;
-    old_derive__X4N=short_derive__BCC;
-    result__DIFH=NULL;
-    if ((((__FAST_ARRAYoSTRINGo *)free__BOP)->parent_arrayed_collection__DKC.upper__GKC <  0)) {
-      result__DIFH=create__NBB( 128);
-    } else {
-      Self__EIFH=((__FAST_ARRAYoSTRINGo *)free__BOP);
-      result__DIFH=((void **)Self__EIFH->parent_arrayed_collection__DKC.storage__XGT)[Self__EIFH->parent_arrayed_collection__DKC.upper__GKC];
-      Self__GIFH=((__FAST_ARRAYoSTRINGo *)free__BOP);
-      Self__GIFH->parent_arrayed_collection__DKC.upper__GKC=(__INTEGER)(Self__GIFH->parent_arrayed_collection__DKC.upper__GKC -  1);
-    };
-    n__S4N=result__DIFH;
-    copy__ZCS(result__DIFH,last_string__I0C);
-    result__0BGH=NULL;
-    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H)->parent_arrayed_collection__A4H.upper__IWT <  0)) {
-      result__0BGH=create_with_capacity__SVI( 16);
-    } else {
-      Self__1BGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      result__0BGH=((void **)Self__1BGH->parent_arrayed_collection__A4H.storage__WAU)[Self__1BGH->parent_arrayed_collection__A4H.upper__IWT];
-      Self__2BGH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__B4H);
-      Self__2BGH->parent_arrayed_collection__A4H.upper__IWT=(__INTEGER)(Self__2BGH->parent_arrayed_collection__A4H.upper__IWT -  1);
-    };
-    l_arg__T4N=result__0BGH;
-    arg__U4N=read_argument__TOP(Self__N4N);
-    if (((void *)arg__U4N != (void *)NULL)) {
-      add_last__U5U(result__0BGH,arg__U4N);
-      while (read_identifier__LAL()) {
-        short__token__to__LBD((&__string_131),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-        append__BOS(n__S4N,(&__string_112));
-        append__BOS(n__S4N,last_string__I0C);
-        arg__U4N=read_argument__TOP(Self__N4N);
-        if (((void *)arg__U4N == (void *)NULL)) {
-          pos__MAZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_332));
-          put_position__UOG(pos__MAZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+  void *result__Y4N,*arg__24N,*tmp__TORB;
+  void *n__04N,*result__TJGH;
+  __INTEGER p1__34N,p2__44N,old_derive__54N,sav_derive__A5N;
+  __INTEGER typ_id__MVHH,typ_id__VVHH,typ_id__4VHH,Self__10YC;
+  __INTEGER typ_id__YCR;
+  __POSITION pos__13ZG,p__SVHH,p__1VHH,p__EWHH,p__F5Q;
+  __ITM_READ *result__KVHH;
+  __POINTER ptr__LVHH,ptr_table__YUJH,next__XUJH,result__ZUJH;
+  __POINTER ptr_table__3UJH,next__2UJH,result__4UJH,ptr__UVHH;
+  __POINTER ptr_table__CVJH,next__BVJH,result__DVJH,ptr_table__HVJH;
+  __POINTER next__GVJH,result__IVJH,ptr__3VHH,ptr_table__MVJH;
+  __POINTER next__LVJH,result__NVJH,ptr_table__RVJH,next__QVJH;
+  __POINTER result__SVJH,ptr__TCR,ptr_table__WVJH,next__VVJH;
+  __POINTER result__XVJH,ptr_table__1VJH,next__0VJH,result__2VJH;
+  __UINTEGER_32 sz__NVHH,a__OVHH,new_size__PVHH,t__QVHH,a__RVHH;
+  __UINTEGER_32 new_size__AVJH,lab_type__5UJH,sz__WVHH,a__XVHH;
+  __UINTEGER_32 new_size__YVHH,t__ZVHH,a__0VHH,new_size__KVJH;
+  __UINTEGER_32 lab_type__JVJH,sz__5VHH,a__AWHH,new_size__BWHH,t__CWHH;
+  __UINTEGER_32 a__DWHH,new_size__UVJH,lab_type__TVJH,sz__VCR,a__UKGH;
+  __UINTEGER_32 new_size__VKGH,t__ZKGH,a__YKGH,new_size__4VJH;
+  __UINTEGER_32 lab_type__3VJH;
+  __ITM_READ_ARG1 *result__TVHH;
+  __ITM_READ_ARG2 *result__2VHH;
+  __ITM_READ_ARGS *result__SCR;
+  void *l_arg__14N,*result__NDHH;
+  __FAST_ARRAYoSTRINGo *Self__UJGH,*Self__WJGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__ODHH,*Self__PDHH;
+  __BOOLEAN __tmp__0CO;
+  __FAST_ARRAYoITM_CODEo *Self__FDW;
+  result__Y4N=NULL;
+  n__04N=NULL;
+  l_arg__14N=NULL;
+  arg__24N=NULL;
+  p1__34N= 0;
+  p2__44N= 0;
+  old_derive__54N= 0;
+  sav_derive__A5N= 0;
+  if (read_identifier__TAL()) {
+    p1__34N=(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD);
+    p2__44N=position__0BC;
+    old_derive__54N=short_derive__JCC;
+    result__TJGH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__JOP)->parent_arrayed_collection__LKC.upper__OKC <  0)) {
+      result__TJGH=create__TBB( 128);
+    } else {
+      Self__UJGH=((__FAST_ARRAYoSTRINGo *)free__JOP);
+      result__TJGH=((void **)Self__UJGH->parent_arrayed_collection__LKC.storage__5GT)[Self__UJGH->parent_arrayed_collection__LKC.upper__OKC];
+      Self__WJGH=((__FAST_ARRAYoSTRINGo *)free__JOP);
+      Self__WJGH->parent_arrayed_collection__LKC.upper__OKC=(__INTEGER)(Self__WJGH->parent_arrayed_collection__LKC.upper__OKC -  1);
+    };
+    n__04N=result__TJGH;
+    copy__BDS(result__TJGH,last_string__Q0C);
+    result__NDHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H)->parent_arrayed_collection__I4H.upper__QWT <  0)) {
+      result__NDHH=create_with_capacity__0VI( 16);
+    } else {
+      Self__ODHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      result__NDHH=((void **)Self__ODHH->parent_arrayed_collection__I4H.storage__4AU)[Self__ODHH->parent_arrayed_collection__I4H.upper__QWT];
+      Self__PDHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__J4H);
+      Self__PDHH->parent_arrayed_collection__I4H.upper__QWT=(__INTEGER)(Self__PDHH->parent_arrayed_collection__I4H.upper__QWT -  1);
+    };
+    l_arg__14N=result__NDHH;
+    arg__24N=read_argument__1OP(Self__V4N);
+    if (((void *)arg__24N != (void *)NULL)) {
+      add_last__25U(result__NDHH,arg__24N);
+      while (read_identifier__TAL()) {
+        short__token__to__TBD((&__string_131),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        append__JOS(n__04N,(&__string_112));
+        append__JOS(n__04N,last_string__Q0C);
+        arg__24N=read_argument__1OP(Self__V4N);
+        if (((void *)arg__24N == (void *)NULL)) {
+          pos__13ZG=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_331));
+          put_position__2OG(pos__13ZG);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__U5U(l_arg__T4N,arg__U4N);
-      };
-    };
-    get__IWB(result__DIFH);
-    add_last__ASV(free__BOP,result__DIFH);
-    ((__STRING *)result__DIFH)->count__WFC= 0;
-    if (is_shorter__5Y) {
-      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__0BGH)->parent_arrayed_collection__RTF.upper__2HL <  0)) || ((void *)first_arg__O4N != (void *)NULL)) || (! fast_has__3DV(short_local__JCC,last_string__I0C)))) {
-        sav_derive__Y4N=short_derive__BCC;
-        short_derive__BCC=old_derive__X4N;
-        short__token__to__LBD((&__string_131),p1__V4N,p2__W4N);
-        short_derive__BCC=(__INTEGER)(sav_derive__Y4N + (__INTEGER)(short_derive__BCC - old_derive__X4N));
-      };
-    };
-    if ((((__FAST_ARRAYoITM_CODEo *)result__0BGH)->parent_arrayed_collection__RTF.upper__2HL <  0)) {
-      if (((void *)first_arg__O4N == (void *)NULL)) {
-        p__XTGH=current_position__JXF();
-        result__PTGH=NULL;
-        ptr__QTGH=((__POINTER )(NULL));
-        typ_id__RTGH= 0;
-        sz__STGH=((__UINTEGER_32 )sizeof(__ITM_READ));
-        if ((sz__STGH ==  0)) {
-          result__PTGH=ITM_READ__;
-        } else {
-          typ_id__RTGH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__STGH);
-          if ((typ_id__RTGH == (__INTEGER)(-  1))) {
-            a__TTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__STGH + a__TTGH) & (__UINTEGER_32)(~ a__TTGH));
-            ptr_table__YSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__XSIH=((__POINTER )(NULL));
-            result__ZSIH=((__POINTER *)ptr_table__YSIH)[ 0];
-            if ((result__ZSIH == (void *)NULL)) {
-              result__ZSIH=new_lab__MRJ(new_size__UTGH);
-              next__XSIH=(void *)((unsigned long)result__ZSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTGH)));
-              ((__POINTER *)next__XSIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YSIH)[ 0]=next__XSIH;
+        add_last__25U(l_arg__14N,arg__24N);
+      };
+    };
+    get__QWB(result__TJGH);
+    add_last__ISV(free__JOP,result__TJGH);
+    ((__STRING *)result__TJGH)->count__4FC= 0;
+    if (is_shorter__FZ) {
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__NDHH)->parent_arrayed_collection__ZTF.upper__EIL <  0)) || ((void *)first_arg__W4N != (void *)NULL)) || (! fast_has__FEV(short_local__RCC,last_string__Q0C)))) {
+        sav_derive__A5N=short_derive__JCC;
+        short_derive__JCC=old_derive__54N;
+        short__token__to__TBD((&__string_131),p1__34N,p2__44N);
+        short_derive__JCC=(__INTEGER)(sav_derive__A5N + (__INTEGER)(short_derive__JCC - old_derive__54N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__NDHH)->parent_arrayed_collection__ZTF.upper__EIL <  0)) {
+      if (((void *)first_arg__W4N == (void *)NULL)) {
+        p__SVHH=current_position__RXF();
+        result__KVHH=NULL;
+        ptr__LVHH=((__POINTER )(NULL));
+        typ_id__MVHH= 0;
+        sz__NVHH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__NVHH ==  0)) {
+          result__KVHH=ITM_READ__;
+        } else {
+          typ_id__MVHH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__NVHH);
+          if ((typ_id__MVHH == (__INTEGER)(-  1))) {
+            a__OVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__PVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVHH + a__OVHH) & (__UINTEGER_32)(~ a__OVHH));
+            ptr_table__YUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PVHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__XUJH=((__POINTER )(NULL));
+            result__ZUJH=((__POINTER *)ptr_table__YUJH)[ 0];
+            if ((result__ZUJH == (void *)NULL)) {
+              result__ZUJH=new_lab__URJ(new_size__PVHH);
+              next__XUJH=(void *)((unsigned long)result__ZUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PVHH)));
+              ((__POINTER *)next__XUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YUJH)[ 0]=next__XUJH;
             } else {
-              next__XSIH=((__POINTER *)result__ZSIH)[ 0];
-              if ((next__XSIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZSIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UTGH <<  1)) <=  4096)) {
-                  next__XSIH=(void *)((unsigned long)result__ZSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTGH)));
+              next__XUJH=((__POINTER *)result__ZUJH)[ 0];
+              if ((next__XUJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZUJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__PVHH <<  1)) <=  4096)) {
+                  next__XUJH=(void *)((unsigned long)result__ZUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PVHH)));
                 } else {
-                  next__XSIH=new_lab__MRJ(new_size__UTGH);
+                  next__XUJH=new_lab__URJ(new_size__PVHH);
                 };
-                ((__POINTER *)next__XSIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YSIH)[ 0]=next__XSIH;
+                ((__POINTER *)next__XUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YUJH)[ 0]=next__XUJH;
               } else {
-                ((__POINTER *)result__ZSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ZSIH=next__XSIH;
+                ((__POINTER *)result__ZUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZUJH=next__XUJH;
               };
             };
-            ptr__QTGH=result__ZSIH;
-          } else {
-            t__VTGH=((__UINTEGER_32 )typ_id__RTGH);
-            a__WTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__ATIH=(__UINTEGER_32)((__UINTEGER_32)(sz__STGH + a__WTGH) & (__UINTEGER_32)(~ a__WTGH));
-            ptr_table__3SIH=((__POINTER )(&(table_type[(t__VTGH)])));
-            lab_type__5SIH=(__UINTEGER_32)(t__VTGH |  1);
-            next__2SIH=((__POINTER )(NULL));
-            result__4SIH=((__POINTER *)ptr_table__3SIH)[ 0];
-            if ((result__4SIH == (void *)NULL)) {
-              result__4SIH=new_lab__MRJ(lab_type__5SIH);
-              next__2SIH=(void *)((unsigned long)result__4SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATIH)));
-              ((__POINTER *)next__2SIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3SIH)[ 0]=next__2SIH;
+            ptr__LVHH=result__ZUJH;
+          } else {
+            t__QVHH=((__UINTEGER_32 )typ_id__MVHH);
+            a__RVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__AVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NVHH + a__RVHH) & (__UINTEGER_32)(~ a__RVHH));
+            ptr_table__3UJH=((__POINTER )(&(table_type[(t__QVHH)])));
+            lab_type__5UJH=(__UINTEGER_32)(t__QVHH |  1);
+            next__2UJH=((__POINTER )(NULL));
+            result__4UJH=((__POINTER *)ptr_table__3UJH)[ 0];
+            if ((result__4UJH == (void *)NULL)) {
+              result__4UJH=new_lab__URJ(lab_type__5UJH);
+              next__2UJH=(void *)((unsigned long)result__4UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVJH)));
+              ((__POINTER *)next__2UJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3UJH)[ 0]=next__2UJH;
             } else {
-              next__2SIH=((__POINTER *)result__4SIH)[ 0];
-              if ((next__2SIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4SIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ATIH <<  1)) <=  4096)) {
-                  next__2SIH=(void *)((unsigned long)result__4SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATIH)));
+              next__2UJH=((__POINTER *)result__4UJH)[ 0];
+              if ((next__2UJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4UJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AVJH <<  1)) <=  4096)) {
+                  next__2UJH=(void *)((unsigned long)result__4UJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVJH)));
                 } else {
-                  next__2SIH=new_lab__MRJ(lab_type__5SIH);
+                  next__2UJH=new_lab__URJ(lab_type__5UJH);
                 };
-                ((__POINTER *)next__2SIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3SIH)[ 0]=next__2SIH;
+                ((__POINTER *)next__2UJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3UJH)[ 0]=next__2UJH;
               } else {
-                ((__POINTER *)result__4SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2SIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4SIH=next__2SIH;
+                ((__POINTER *)result__4UJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4UJH=next__2UJH;
               };
             };
-            ptr__QTGH=result__4SIH;
-          };
-          result__PTGH=((__ITM_READ *)ptr__QTGH);
-          *(result__PTGH) = *(ITM_READ__);
-        };
-        ((__ITM_READ *)result__PTGH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__XTGH;
-        result__Q4N=result__PTGH;
-      } else {
-        p__AUGH=current_position__JXF();
-        result__YTGH=NULL;
-        ptr__ZTGH=((__POINTER )(NULL));
-        typ_id__0TGH= 0;
-        sz__1TGH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
-        if ((sz__1TGH ==  0)) {
-          result__YTGH=ITM_READ_ARG1__;
-        } else {
-          typ_id__0TGH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__1TGH);
-          if ((typ_id__0TGH == (__INTEGER)(-  1))) {
-            a__2TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__3TGH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TGH + a__2TGH) & (__UINTEGER_32)(~ a__2TGH));
-            ptr_table__CTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3TGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__BTIH=((__POINTER )(NULL));
-            result__DTIH=((__POINTER *)ptr_table__CTIH)[ 0];
-            if ((result__DTIH == (void *)NULL)) {
-              result__DTIH=new_lab__MRJ(new_size__3TGH);
-              next__BTIH=(void *)((unsigned long)result__DTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3TGH)));
-              ((__POINTER *)next__BTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CTIH)[ 0]=next__BTIH;
+            ptr__LVHH=result__4UJH;
+          };
+          result__KVHH=((__ITM_READ *)ptr__LVHH);
+          *(result__KVHH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__KVHH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__SVHH;
+        result__Y4N=result__KVHH;
+      } else {
+        p__1VHH=current_position__RXF();
+        result__TVHH=NULL;
+        ptr__UVHH=((__POINTER )(NULL));
+        typ_id__VVHH= 0;
+        sz__WVHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__WVHH ==  0)) {
+          result__TVHH=ITM_READ_ARG1__;
+        } else {
+          typ_id__VVHH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__WVHH);
+          if ((typ_id__VVHH == (__INTEGER)(-  1))) {
+            a__XVHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YVHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WVHH + a__XVHH) & (__UINTEGER_32)(~ a__XVHH));
+            ptr_table__CVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YVHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__BVJH=((__POINTER )(NULL));
+            result__DVJH=((__POINTER *)ptr_table__CVJH)[ 0];
+            if ((result__DVJH == (void *)NULL)) {
+              result__DVJH=new_lab__URJ(new_size__YVHH);
+              next__BVJH=(void *)((unsigned long)result__DVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVHH)));
+              ((__POINTER *)next__BVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CVJH)[ 0]=next__BVJH;
             } else {
-              next__BTIH=((__POINTER *)result__DTIH)[ 0];
-              if ((next__BTIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DTIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__3TGH <<  1)) <=  4096)) {
-                  next__BTIH=(void *)((unsigned long)result__DTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3TGH)));
+              next__BVJH=((__POINTER *)result__DVJH)[ 0];
+              if ((next__BVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DVJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__YVHH <<  1)) <=  4096)) {
+                  next__BVJH=(void *)((unsigned long)result__DVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVHH)));
                 } else {
-                  next__BTIH=new_lab__MRJ(new_size__3TGH);
+                  next__BVJH=new_lab__URJ(new_size__YVHH);
                 };
-                ((__POINTER *)next__BTIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CTIH)[ 0]=next__BTIH;
+                ((__POINTER *)next__BVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CVJH)[ 0]=next__BVJH;
               } else {
-                ((__POINTER *)result__DTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DTIH=next__BTIH;
+                ((__POINTER *)result__DVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DVJH=next__BVJH;
               };
             };
-            ptr__ZTGH=result__DTIH;
-          } else {
-            t__4TGH=((__UINTEGER_32 )typ_id__0TGH);
-            a__5TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__KTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1TGH + a__5TGH) & (__UINTEGER_32)(~ a__5TGH));
-            ptr_table__HTIH=((__POINTER )(&(table_type[(t__4TGH)])));
-            lab_type__JTIH=(__UINTEGER_32)(t__4TGH |  1);
-            next__GTIH=((__POINTER )(NULL));
-            result__ITIH=((__POINTER *)ptr_table__HTIH)[ 0];
-            if ((result__ITIH == (void *)NULL)) {
-              result__ITIH=new_lab__MRJ(lab_type__JTIH);
-              next__GTIH=(void *)((unsigned long)result__ITIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTIH)));
-              ((__POINTER *)next__GTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__HTIH)[ 0]=next__GTIH;
+            ptr__UVHH=result__DVJH;
+          } else {
+            t__ZVHH=((__UINTEGER_32 )typ_id__VVHH);
+            a__0VHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__KVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WVHH + a__0VHH) & (__UINTEGER_32)(~ a__0VHH));
+            ptr_table__HVJH=((__POINTER )(&(table_type[(t__ZVHH)])));
+            lab_type__JVJH=(__UINTEGER_32)(t__ZVHH |  1);
+            next__GVJH=((__POINTER )(NULL));
+            result__IVJH=((__POINTER *)ptr_table__HVJH)[ 0];
+            if ((result__IVJH == (void *)NULL)) {
+              result__IVJH=new_lab__URJ(lab_type__JVJH);
+              next__GVJH=(void *)((unsigned long)result__IVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVJH)));
+              ((__POINTER *)next__GVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HVJH)[ 0]=next__GVJH;
             } else {
-              next__GTIH=((__POINTER *)result__ITIH)[ 0];
-              if ((next__GTIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ITIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__KTIH <<  1)) <=  4096)) {
-                  next__GTIH=(void *)((unsigned long)result__ITIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTIH)));
+              next__GVJH=((__POINTER *)result__IVJH)[ 0];
+              if ((next__GVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IVJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KVJH <<  1)) <=  4096)) {
+                  next__GVJH=(void *)((unsigned long)result__IVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVJH)));
                 } else {
-                  next__GTIH=new_lab__MRJ(lab_type__JTIH);
+                  next__GVJH=new_lab__URJ(lab_type__JVJH);
                 };
-                ((__POINTER *)next__GTIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HTIH)[ 0]=next__GTIH;
+                ((__POINTER *)next__GVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HVJH)[ 0]=next__GVJH;
               } else {
-                ((__POINTER *)result__ITIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ITIH=next__GTIH;
+                ((__POINTER *)result__IVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__IVJH=next__GVJH;
               };
             };
-            ptr__ZTGH=result__ITIH;
-          };
-          result__YTGH=((__ITM_READ_ARG1 *)ptr__ZTGH);
-          *(result__YTGH) = *(ITM_READ_ARG1__);
-        };
-        ((__ITM_READ_ARG1 *)result__YTGH)->parent_itm_read__KIL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__AUGH;
-        result__Q4N=result__YTGH;
-      };
-      free__YVI(result__0BGH);
-      __tmp__SCO=TRUE__;
-    } else {
-      __tmp__SCO=FALSE__;
-    };
-    if ((! __tmp__SCO)) {
-      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__0BGH)->parent_arrayed_collection__RTF.upper__2HL +  1) ==  1)) {
-        p__JUGH=current_position__JXF();
-        result__BUGH=NULL;
-        ptr__CUGH=((__POINTER )(NULL));
-        typ_id__DUGH= 0;
-        sz__EUGH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
-        if ((sz__EUGH ==  0)) {
-          result__BUGH=ITM_READ_ARG2__;
-        } else {
-          typ_id__DUGH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__EUGH);
-          if ((typ_id__DUGH == (__INTEGER)(-  1))) {
-            a__FUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__GUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__EUGH + a__FUGH) & (__UINTEGER_32)(~ a__FUGH));
-            ptr_table__MTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__LTIH=((__POINTER )(NULL));
-            result__NTIH=((__POINTER *)ptr_table__MTIH)[ 0];
-            if ((result__NTIH == (void *)NULL)) {
-              result__NTIH=new_lab__MRJ(new_size__GUGH);
-              next__LTIH=(void *)((unsigned long)result__NTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GUGH)));
-              ((__POINTER *)next__LTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MTIH)[ 0]=next__LTIH;
+            ptr__UVHH=result__IVJH;
+          };
+          result__TVHH=((__ITM_READ_ARG1 *)ptr__UVHH);
+          *(result__TVHH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__TVHH)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__1VHH;
+        result__Y4N=result__TVHH;
+      };
+      free__AWI(result__NDHH);
+      __tmp__0CO=TRUE__;
+    } else {
+      __tmp__0CO=FALSE__;
+    };
+    if ((! __tmp__0CO)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__NDHH)->parent_arrayed_collection__ZTF.upper__EIL +  1) ==  1)) {
+        p__EWHH=current_position__RXF();
+        result__2VHH=NULL;
+        ptr__3VHH=((__POINTER )(NULL));
+        typ_id__4VHH= 0;
+        sz__5VHH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__5VHH ==  0)) {
+          result__2VHH=ITM_READ_ARG2__;
+        } else {
+          typ_id__4VHH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__5VHH);
+          if ((typ_id__4VHH == (__INTEGER)(-  1))) {
+            a__AWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5VHH + a__AWHH) & (__UINTEGER_32)(~ a__AWHH));
+            ptr_table__MVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BWHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__LVJH=((__POINTER )(NULL));
+            result__NVJH=((__POINTER *)ptr_table__MVJH)[ 0];
+            if ((result__NVJH == (void *)NULL)) {
+              result__NVJH=new_lab__URJ(new_size__BWHH);
+              next__LVJH=(void *)((unsigned long)result__NVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWHH)));
+              ((__POINTER *)next__LVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MVJH)[ 0]=next__LVJH;
             } else {
-              next__LTIH=((__POINTER *)result__NTIH)[ 0];
-              if ((next__LTIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NTIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__GUGH <<  1)) <=  4096)) {
-                  next__LTIH=(void *)((unsigned long)result__NTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GUGH)));
+              next__LVJH=((__POINTER *)result__NVJH)[ 0];
+              if ((next__LVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NVJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__BWHH <<  1)) <=  4096)) {
+                  next__LVJH=(void *)((unsigned long)result__NVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BWHH)));
                 } else {
-                  next__LTIH=new_lab__MRJ(new_size__GUGH);
+                  next__LVJH=new_lab__URJ(new_size__BWHH);
                 };
-                ((__POINTER *)next__LTIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MTIH)[ 0]=next__LTIH;
+                ((__POINTER *)next__LVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MVJH)[ 0]=next__LVJH;
               } else {
-                ((__POINTER *)result__NTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NTIH=next__LTIH;
+                ((__POINTER *)result__NVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NVJH=next__LVJH;
               };
             };
-            ptr__CUGH=result__NTIH;
-          } else {
-            t__HUGH=((__UINTEGER_32 )typ_id__DUGH);
-            a__IUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__UTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EUGH + a__IUGH) & (__UINTEGER_32)(~ a__IUGH));
-            ptr_table__RTIH=((__POINTER )(&(table_type[(t__HUGH)])));
-            lab_type__TTIH=(__UINTEGER_32)(t__HUGH |  1);
-            next__QTIH=((__POINTER )(NULL));
-            result__STIH=((__POINTER *)ptr_table__RTIH)[ 0];
-            if ((result__STIH == (void *)NULL)) {
-              result__STIH=new_lab__MRJ(lab_type__TTIH);
-              next__QTIH=(void *)((unsigned long)result__STIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTIH)));
-              ((__POINTER *)next__QTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RTIH)[ 0]=next__QTIH;
+            ptr__3VHH=result__NVJH;
+          } else {
+            t__CWHH=((__UINTEGER_32 )typ_id__4VHH);
+            a__DWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__UVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5VHH + a__DWHH) & (__UINTEGER_32)(~ a__DWHH));
+            ptr_table__RVJH=((__POINTER )(&(table_type[(t__CWHH)])));
+            lab_type__TVJH=(__UINTEGER_32)(t__CWHH |  1);
+            next__QVJH=((__POINTER )(NULL));
+            result__SVJH=((__POINTER *)ptr_table__RVJH)[ 0];
+            if ((result__SVJH == (void *)NULL)) {
+              result__SVJH=new_lab__URJ(lab_type__TVJH);
+              next__QVJH=(void *)((unsigned long)result__SVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UVJH)));
+              ((__POINTER *)next__QVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RVJH)[ 0]=next__QVJH;
             } else {
-              next__QTIH=((__POINTER *)result__STIH)[ 0];
-              if ((next__QTIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__STIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__UTIH <<  1)) <=  4096)) {
-                  next__QTIH=(void *)((unsigned long)result__STIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTIH)));
+              next__QVJH=((__POINTER *)result__SVJH)[ 0];
+              if ((next__QVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SVJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UVJH <<  1)) <=  4096)) {
+                  next__QVJH=(void *)((unsigned long)result__SVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UVJH)));
                 } else {
-                  next__QTIH=new_lab__MRJ(lab_type__TTIH);
+                  next__QVJH=new_lab__URJ(lab_type__TVJH);
                 };
-                ((__POINTER *)next__QTIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RTIH)[ 0]=next__QTIH;
+                ((__POINTER *)next__QVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RVJH)[ 0]=next__QVJH;
               } else {
-                ((__POINTER *)result__STIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__STIH=next__QTIH;
+                ((__POINTER *)result__SVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SVJH=next__QVJH;
               };
             };
-            ptr__CUGH=result__STIH;
-          };
-          result__BUGH=((__ITM_READ_ARG2 *)ptr__CUGH);
-          *(result__BUGH) = *(ITM_READ_ARG2__);
-        };
-        ((__ITM_READ_ARG2 *)result__BUGH)->parent_itm_read__XKL.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__JUGH;
-        result__Q4N=result__BUGH;
-        free__YVI(result__0BGH);
-      } else {
-        Self__3CW=((__FAST_ARRAYoITM_CODEo *)result__0BGH);
-        add_last__U5U(Self__3CW,first_arg__O4N);
-        if ((Self__3CW->parent_arrayed_collection__RTF.upper__2HL !=  0)) {
-          if ((Self__3CW->parent_arrayed_collection__RTF.upper__2HL ==  1)) {
-            tmp__LORB=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0];
-            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0]=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 1];
-            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 1]=tmp__LORB;
-          } else {
-            Self__T0YC=(__INTEGER)(Self__3CW->parent_arrayed_collection__RTF.upper__2HL -  1);
-            while ((Self__T0YC >=  0)) {
-              ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[(__INTEGER)(Self__T0YC +  1)]=((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[Self__T0YC];
-              ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[Self__T0YC]=NULL;
-              Self__T0YC=(__INTEGER)(Self__T0YC -  1);
-            };
-            ((void **)Self__3CW->parent_arrayed_collection__RTF.storage__FYT)[ 0]=first_arg__O4N;
-          };
-        };
-        l_arg__T4N=copy__Q5H(result__0BGH);
-        p__34Q=current_position__JXF();
-        result__KCR=NULL;
-        ptr__LCR=((__POINTER )(NULL));
-        typ_id__QCR= 0;
-        sz__NCR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
-        if ((sz__NCR ==  0)) {
-          result__KCR=ITM_READ_ARGS__;
-        } else {
-          typ_id__QCR=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NCR);
-          if ((typ_id__QCR == (__INTEGER)(-  1))) {
-            a__EJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__FJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCR + a__EJFH) & (__UINTEGER_32)(~ a__EJFH));
-            ptr_table__WTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__VTIH=((__POINTER )(NULL));
-            result__XTIH=((__POINTER *)ptr_table__WTIH)[ 0];
-            if ((result__XTIH == (void *)NULL)) {
-              result__XTIH=new_lab__MRJ(new_size__FJFH);
-              next__VTIH=(void *)((unsigned long)result__XTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJFH)));
-              ((__POINTER *)next__VTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WTIH)[ 0]=next__VTIH;
+            ptr__3VHH=result__SVJH;
+          };
+          result__2VHH=((__ITM_READ_ARG2 *)ptr__3VHH);
+          *(result__2VHH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__2VHH)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__EWHH;
+        result__Y4N=result__2VHH;
+        free__AWI(result__NDHH);
+      } else {
+        Self__FDW=((__FAST_ARRAYoITM_CODEo *)result__NDHH);
+        add_last__25U(Self__FDW,first_arg__W4N);
+        if ((Self__FDW->parent_arrayed_collection__ZTF.upper__EIL !=  0)) {
+          if ((Self__FDW->parent_arrayed_collection__ZTF.upper__EIL ==  1)) {
+            tmp__TORB=((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[ 0];
+            ((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[ 0]=((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[ 1];
+            ((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[ 1]=tmp__TORB;
+          } else {
+            Self__10YC=(__INTEGER)(Self__FDW->parent_arrayed_collection__ZTF.upper__EIL -  1);
+            while ((Self__10YC >=  0)) {
+              ((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[(__INTEGER)(Self__10YC +  1)]=((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[Self__10YC];
+              ((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[Self__10YC]=NULL;
+              Self__10YC=(__INTEGER)(Self__10YC -  1);
+            };
+            ((void **)Self__FDW->parent_arrayed_collection__ZTF.storage__NYT)[ 0]=first_arg__W4N;
+          };
+        };
+        l_arg__14N=copy__Y5H(result__NDHH);
+        p__F5Q=current_position__RXF();
+        result__SCR=NULL;
+        ptr__TCR=((__POINTER )(NULL));
+        typ_id__YCR= 0;
+        sz__VCR=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__VCR ==  0)) {
+          result__SCR=ITM_READ_ARGS__;
+        } else {
+          typ_id__YCR=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__VCR);
+          if ((typ_id__YCR == (__INTEGER)(-  1))) {
+            a__UKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__VKGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VCR + a__UKGH) & (__UINTEGER_32)(~ a__UKGH));
+            ptr_table__WVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VKGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__VVJH=((__POINTER )(NULL));
+            result__XVJH=((__POINTER *)ptr_table__WVJH)[ 0];
+            if ((result__XVJH == (void *)NULL)) {
+              result__XVJH=new_lab__URJ(new_size__VKGH);
+              next__VVJH=(void *)((unsigned long)result__XVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKGH)));
+              ((__POINTER *)next__VVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WVJH)[ 0]=next__VVJH;
             } else {
-              next__VTIH=((__POINTER *)result__XTIH)[ 0];
-              if ((next__VTIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XTIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FJFH <<  1)) <=  4096)) {
-                  next__VTIH=(void *)((unsigned long)result__XTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJFH)));
+              next__VVJH=((__POINTER *)result__XVJH)[ 0];
+              if ((next__VVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XVJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VKGH <<  1)) <=  4096)) {
+                  next__VVJH=(void *)((unsigned long)result__XVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VKGH)));
                 } else {
-                  next__VTIH=new_lab__MRJ(new_size__FJFH);
+                  next__VVJH=new_lab__URJ(new_size__VKGH);
                 };
-                ((__POINTER *)next__VTIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WTIH)[ 0]=next__VTIH;
+                ((__POINTER *)next__VVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WVJH)[ 0]=next__VVJH;
               } else {
-                ((__POINTER *)result__XTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__XTIH=next__VTIH;
+                ((__POINTER *)result__XVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XVJH=next__VVJH;
               };
             };
-            ptr__LCR=result__XTIH;
-          } else {
-            t__JJFH=((__UINTEGER_32 )typ_id__QCR);
-            a__IJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__4TIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCR + a__IJFH) & (__UINTEGER_32)(~ a__IJFH));
-            ptr_table__1TIH=((__POINTER )(&(table_type[(t__JJFH)])));
-            lab_type__3TIH=(__UINTEGER_32)(t__JJFH |  1);
-            next__0TIH=((__POINTER )(NULL));
-            result__2TIH=((__POINTER *)ptr_table__1TIH)[ 0];
-            if ((result__2TIH == (void *)NULL)) {
-              result__2TIH=new_lab__MRJ(lab_type__3TIH);
-              next__0TIH=(void *)((unsigned long)result__2TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TIH)));
-              ((__POINTER *)next__0TIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1TIH)[ 0]=next__0TIH;
+            ptr__TCR=result__XVJH;
+          } else {
+            t__ZKGH=((__UINTEGER_32 )typ_id__YCR);
+            a__YKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__4VJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VCR + a__YKGH) & (__UINTEGER_32)(~ a__YKGH));
+            ptr_table__1VJH=((__POINTER )(&(table_type[(t__ZKGH)])));
+            lab_type__3VJH=(__UINTEGER_32)(t__ZKGH |  1);
+            next__0VJH=((__POINTER )(NULL));
+            result__2VJH=((__POINTER *)ptr_table__1VJH)[ 0];
+            if ((result__2VJH == (void *)NULL)) {
+              result__2VJH=new_lab__URJ(lab_type__3VJH);
+              next__0VJH=(void *)((unsigned long)result__2VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4VJH)));
+              ((__POINTER *)next__0VJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1VJH)[ 0]=next__0VJH;
             } else {
-              next__0TIH=((__POINTER *)result__2TIH)[ 0];
-              if ((next__0TIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2TIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__4TIH <<  1)) <=  4096)) {
-                  next__0TIH=(void *)((unsigned long)result__2TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4TIH)));
+              next__0VJH=((__POINTER *)result__2VJH)[ 0];
+              if ((next__0VJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2VJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__4VJH <<  1)) <=  4096)) {
+                  next__0VJH=(void *)((unsigned long)result__2VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4VJH)));
                 } else {
-                  next__0TIH=new_lab__MRJ(lab_type__3TIH);
+                  next__0VJH=new_lab__URJ(lab_type__3VJH);
                 };
-                ((__POINTER *)next__0TIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1TIH)[ 0]=next__0TIH;
+                ((__POINTER *)next__0VJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1VJH)[ 0]=next__0VJH;
               } else {
-                ((__POINTER *)result__2TIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__2TIH=next__0TIH;
+                ((__POINTER *)result__2VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2VJH=next__0VJH;
               };
             };
-            ptr__LCR=result__2TIH;
+            ptr__TCR=result__2VJH;
           };
-          result__KCR=((__ITM_READ_ARGS *)ptr__LCR);
-          *(result__KCR) = *(ITM_READ_ARGS__);
+          result__SCR=((__ITM_READ_ARGS *)ptr__TCR);
+          *(result__SCR) = *(ITM_READ_ARGS__);
         };
-        ((__ITM_READ_ARGS *)result__KCR)->parent_itm_read__KDO.parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__34Q;
-        result__Q4N=result__KCR;
+        ((__ITM_READ_ARGS *)result__SCR)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__F5Q;
+        result__Y4N=result__SCR;
       };
     };
   };
-  return(result__Q4N);
+  return(result__Y4N);
 }
 
-static void* readlip_expr_cmp__A11B(__PARSER *Self__B11B)
+static void* readlip_expr_cmp__I11B(__PARSER *Self__J11B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__E11B,*result__D11B;
-  void *op__F11B;
-  __POSITION pos__JDZG,p__3TBD;
-  __STRING_CONSTANT *Self__NSBD;
-  __LIP_BINARY *result__THGD,*Self__5WSD;
-  __POINTER ptr__UHGD,ptr_table__AUIH,next__5TIH,result__BUIH;
-  __POINTER ptr_table__FUIH,next__EUIH,result__GUIH;
-  __INTEGER typ_id__ZHGD;
-  __UINTEGER_32 sz__WHGD,a__UJFH,new_size__VJFH,t__ZJFH,a__YJFH;
-  __UINTEGER_32 new_size__IUIH,lab_type__HUIH;
-  __CHARACTER type__G11B;
-  right__E11B=NULL;
-  op__F11B=NULL;
-  type__G11B='\0';
-  result__D11B=readlip_expr_binary__3N3B(Self__B11B);
-  if (((void *)result__D11B != (void *)NULL)) {
-    while ((((((read_symbol__DXJ((&__string_19)) || read_symbol__DXJ((&__string_21))) || read_symbol__DXJ((&__string_17))) || read_symbol__DXJ((&__string_16))) || read_symbol__DXJ((&__string_18))) || read_symbol__DXJ((&__string_20)))) {
-      op__F11B=last_string__I0C;
-      right__E11B=readlip_expr_binary__3N3B(Self__B11B);
-      if (((void *)right__E11B == (void *)NULL)) {
-        pos__JDZG=current_position__JXF();
-        put_error__text__KNG( 0,(&__string_240));
-        put_position__UOG(pos__JDZG);
-        put_string__U1F(msg_err__PNG);
-        if ((type_error__ONG !=  2)) {
+  void *right__M11B,*result__L11B;
+  void *op__N11B;
+  __POSITION pos__YA0G,p__FUBD;
+  __STRING_CONSTANT *Self__VSBD;
+  __LIP_BINARY *result__1HGD,*Self__HXSD;
+  __POINTER ptr__2HGD,ptr_table__AWJH,next__5VJH,result__BWJH;
+  __POINTER ptr_table__FWJH,next__EWJH,result__GWJH;
+  __INTEGER typ_id__BIGD;
+  __UINTEGER_32 sz__4HGD,a__ELGH,new_size__FLGH,t__JLGH,a__ILGH;
+  __UINTEGER_32 new_size__IWJH,lab_type__HWJH;
+  __CHARACTER type__O11B;
+  right__M11B=NULL;
+  op__N11B=NULL;
+  type__O11B='\0';
+  result__L11B=readlip_expr_binary__FO3B(Self__J11B);
+  if (((void *)result__L11B != (void *)NULL)) {
+    while ((((((read_symbol__LXJ((&__string_19)) || read_symbol__LXJ((&__string_21))) || read_symbol__LXJ((&__string_17))) || read_symbol__LXJ((&__string_16))) || read_symbol__LXJ((&__string_18))) || read_symbol__LXJ((&__string_20)))) {
+      op__N11B=last_string__Q0C;
+      right__M11B=readlip_expr_binary__FO3B(Self__J11B);
+      if (((void *)right__M11B == (void *)NULL)) {
+        pos__YA0G=current_position__RXF();
+        put_error__text__SNG( 0,(&__string_238));
+        put_position__2OG(pos__YA0G);
+        put_string__21F(msg_err__XNG);
+        if ((type_error__WNG !=  2)) {
           exit(( 1));
         };
       };
-      Self__NSBD=((__STRING_CONSTANT *)op__F11B);
-      if (((void *)Self__NSBD == (void *)(&__string_19))) {
-        type__G11B='S';
-      };
-      if (((void *)Self__NSBD == (void *)(&__string_21))) {
-        type__G11B='I';
-      };
-      if (((void *)Self__NSBD == (void *)(&__string_17))) {
-        type__G11B='E';
-      };
-      if (((void *)Self__NSBD == (void *)(&__string_16))) {
-        type__G11B='=';
-      };
-      if (((void *)Self__NSBD == (void *)(&__string_18))) {
-        type__G11B='>';
-      };
-      if (((void *)Self__NSBD == (void *)(&__string_20))) {
-        type__G11B='<';
-      };
-      p__3TBD=current_position__JXF();
-      result__THGD=NULL;
-      ptr__UHGD=((__POINTER )(NULL));
-      typ_id__ZHGD= 0;
-      sz__WHGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-      if ((sz__WHGD ==  0)) {
-        result__THGD=LIP_BINARY__;
-      } else {
-        typ_id__ZHGD=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WHGD);
-        if ((typ_id__ZHGD == (__INTEGER)(-  1))) {
-          a__UJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__VJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHGD + a__UJFH) & (__UINTEGER_32)(~ a__UJFH));
-          ptr_table__AUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__5TIH=((__POINTER )(NULL));
-          result__BUIH=((__POINTER *)ptr_table__AUIH)[ 0];
-          if ((result__BUIH == (void *)NULL)) {
-            result__BUIH=new_lab__MRJ(new_size__VJFH);
-            next__5TIH=(void *)((unsigned long)result__BUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VJFH)));
-            ((__POINTER *)next__5TIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AUIH)[ 0]=next__5TIH;
-          } else {
-            next__5TIH=((__POINTER *)result__BUIH)[ 0];
-            if ((next__5TIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BUIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__VJFH <<  1)) <=  4096)) {
-                next__5TIH=(void *)((unsigned long)result__BUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VJFH)));
+      Self__VSBD=((__STRING_CONSTANT *)op__N11B);
+      if (((void *)Self__VSBD == (void *)(&__string_19))) {
+        type__O11B='S';
+      };
+      if (((void *)Self__VSBD == (void *)(&__string_21))) {
+        type__O11B='I';
+      };
+      if (((void *)Self__VSBD == (void *)(&__string_17))) {
+        type__O11B='E';
+      };
+      if (((void *)Self__VSBD == (void *)(&__string_16))) {
+        type__O11B='=';
+      };
+      if (((void *)Self__VSBD == (void *)(&__string_18))) {
+        type__O11B='>';
+      };
+      if (((void *)Self__VSBD == (void *)(&__string_20))) {
+        type__O11B='<';
+      };
+      p__FUBD=current_position__RXF();
+      result__1HGD=NULL;
+      ptr__2HGD=((__POINTER )(NULL));
+      typ_id__BIGD= 0;
+      sz__4HGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__4HGD ==  0)) {
+        result__1HGD=LIP_BINARY__;
+      } else {
+        typ_id__BIGD=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__4HGD);
+        if ((typ_id__BIGD == (__INTEGER)(-  1))) {
+          a__ELGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__FLGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4HGD + a__ELGH) & (__UINTEGER_32)(~ a__ELGH));
+          ptr_table__AWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__5VJH=((__POINTER )(NULL));
+          result__BWJH=((__POINTER *)ptr_table__AWJH)[ 0];
+          if ((result__BWJH == (void *)NULL)) {
+            result__BWJH=new_lab__URJ(new_size__FLGH);
+            next__5VJH=(void *)((unsigned long)result__BWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLGH)));
+            ((__POINTER *)next__5VJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AWJH)[ 0]=next__5VJH;
+          } else {
+            next__5VJH=((__POINTER *)result__BWJH)[ 0];
+            if ((next__5VJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BWJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__FLGH <<  1)) <=  4096)) {
+                next__5VJH=(void *)((unsigned long)result__BWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FLGH)));
               } else {
-                next__5TIH=new_lab__MRJ(new_size__VJFH);
+                next__5VJH=new_lab__URJ(new_size__FLGH);
               };
-              ((__POINTER *)next__5TIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AUIH)[ 0]=next__5TIH;
+              ((__POINTER *)next__5VJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AWJH)[ 0]=next__5VJH;
             } else {
-              ((__POINTER *)result__BUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__BUIH=next__5TIH;
-            };
-          };
-          ptr__UHGD=result__BUIH;
-        } else {
-          t__ZJFH=((__UINTEGER_32 )typ_id__ZHGD);
-          a__YJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__IUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHGD + a__YJFH) & (__UINTEGER_32)(~ a__YJFH));
-          ptr_table__FUIH=((__POINTER )(&(table_type[(t__ZJFH)])));
-          lab_type__HUIH=(__UINTEGER_32)(t__ZJFH |  1);
-          next__EUIH=((__POINTER )(NULL));
-          result__GUIH=((__POINTER *)ptr_table__FUIH)[ 0];
-          if ((result__GUIH == (void *)NULL)) {
-            result__GUIH=new_lab__MRJ(lab_type__HUIH);
-            next__EUIH=(void *)((unsigned long)result__GUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUIH)));
-            ((__POINTER *)next__EUIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__FUIH)[ 0]=next__EUIH;
-          } else {
-            next__EUIH=((__POINTER *)result__GUIH)[ 0];
-            if ((next__EUIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GUIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__IUIH <<  1)) <=  4096)) {
-                next__EUIH=(void *)((unsigned long)result__GUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IUIH)));
+              ((__POINTER *)result__BWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__BWJH=next__5VJH;
+            };
+          };
+          ptr__2HGD=result__BWJH;
+        } else {
+          t__JLGH=((__UINTEGER_32 )typ_id__BIGD);
+          a__ILGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__IWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4HGD + a__ILGH) & (__UINTEGER_32)(~ a__ILGH));
+          ptr_table__FWJH=((__POINTER )(&(table_type[(t__JLGH)])));
+          lab_type__HWJH=(__UINTEGER_32)(t__JLGH |  1);
+          next__EWJH=((__POINTER )(NULL));
+          result__GWJH=((__POINTER *)ptr_table__FWJH)[ 0];
+          if ((result__GWJH == (void *)NULL)) {
+            result__GWJH=new_lab__URJ(lab_type__HWJH);
+            next__EWJH=(void *)((unsigned long)result__GWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWJH)));
+            ((__POINTER *)next__EWJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FWJH)[ 0]=next__EWJH;
+          } else {
+            next__EWJH=((__POINTER *)result__GWJH)[ 0];
+            if ((next__EWJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GWJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__IWJH <<  1)) <=  4096)) {
+                next__EWJH=(void *)((unsigned long)result__GWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWJH)));
               } else {
-                next__EUIH=new_lab__MRJ(lab_type__HUIH);
+                next__EWJH=new_lab__URJ(lab_type__HWJH);
               };
-              ((__POINTER *)next__EUIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FUIH)[ 0]=next__EUIH;
+              ((__POINTER *)next__EWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FWJH)[ 0]=next__EWJH;
             } else {
-              ((__POINTER *)result__GUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GUIH=next__EUIH;
+              ((__POINTER *)result__GWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GWJH=next__EWJH;
             };
           };
-          ptr__UHGD=result__GUIH;
+          ptr__2HGD=result__GWJH;
         };
-        result__THGD=((__LIP_BINARY *)ptr__UHGD);
-        *(result__THGD) = *(LIP_BINARY__);
+        result__1HGD=((__LIP_BINARY *)ptr__2HGD);
+        *(result__1HGD) = *(LIP_BINARY__);
       };
-      Self__5WSD=((__LIP_BINARY *)result__THGD);
-      Self__5WSD->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__3TBD;
-      Self__5WSD->left__MZQD=result__D11B;
-      Self__5WSD->right__PZQD=right__E11B;
-      Self__5WSD->operator__SZQD=type__G11B;
-      result__D11B=result__THGD;
+      Self__HXSD=((__LIP_BINARY *)result__1HGD);
+      Self__HXSD->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ=p__FUBD;
+      Self__HXSD->left__UZQD=result__L11B;
+      Self__HXSD->right__XZQD=right__M11B;
+      Self__HXSD->operator__0ZQD=type__O11B;
+      result__L11B=result__1HGD;
     };
   };
-  return(result__D11B);
+  return(result__L11B);
 }
 
-static void** create__WYIE(__INTEGER nb_elements__YYIE)
+static void** create__OUIE(__INTEGER nb_elements__QUIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__LJDH,a__QJDH,new_size__MJDH,new_size2__NJDH,a__EKFH;
-  __UINTEGER_32 new_size__FKFH;
-  __POINTER result__KJDH,ptr_table__KUIH,next__JUIH,result__LUIH;
-  void *result__OUIH;
-  __INTEGER Self__UEYE;
-  void **Result__D0NE;
-  sz__LJDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YYIE * ((__INTEGER )(sizeof(void *)))));
-  result__KJDH=((__POINTER )(NULL));
-  a__QJDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__MJDH=(__UINTEGER_32)((__UINTEGER_32)(sz__LJDH + a__QJDH) & (__UINTEGER_32)(~ a__QJDH));
-  new_size2__NJDH=(__UINTEGER_32)(new_size__MJDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__NJDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__EKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__FKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NJDH + a__EKFH) & (__UINTEGER_32)(~ a__EKFH));
-    ptr_table__KUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__JUIH=((__POINTER )(NULL));
-    result__LUIH=((__POINTER *)ptr_table__KUIH)[ 0];
-    if ((result__LUIH == (void *)NULL)) {
-      result__LUIH=new_lab__MRJ(new_size__FKFH);
-      next__JUIH=(void *)((unsigned long)result__LUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKFH)));
-      ((__POINTER *)next__JUIH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__KUIH)[ 0]=next__JUIH;
-    } else {
-      next__JUIH=((__POINTER *)result__LUIH)[ 0];
-      if ((next__JUIH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LUIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FKFH <<  1)) <=  4096)) {
-          next__JUIH=(void *)((unsigned long)result__LUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKFH)));
-        } else {
-          next__JUIH=new_lab__MRJ(new_size__FKFH);
-        };
-        ((__POINTER *)next__JUIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__KUIH)[ 0]=next__JUIH;
-      } else {
-        ((__POINTER *)result__LUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__LUIH=next__JUIH;
-      };
-    };
-    ((__POINTER *)result__LUIH)[ 0]=((__POINTER ) 3);
-    result__KJDH=(void *)((unsigned long)result__LUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__DKEH,a__IKEH,new_size__EKEH,new_size2__FKEH,a__ULGH;
+  __UINTEGER_32 new_size__VLGH;
+  __POINTER result__CKEH,ptr_table__KWJH,next__JWJH,result__LWJH;
+  void *result__OWJH;
+  __INTEGER Self__XEYE;
+  void **Result__GWNE;
+  sz__DKEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QUIE * ((__INTEGER )(sizeof(void *)))));
+  result__CKEH=((__POINTER )(NULL));
+  a__IKEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EKEH=(__UINTEGER_32)((__UINTEGER_32)(sz__DKEH + a__IKEH) & (__UINTEGER_32)(~ a__IKEH));
+  new_size2__FKEH=(__UINTEGER_32)(new_size__EKEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FKEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ULGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VLGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FKEH + a__ULGH) & (__UINTEGER_32)(~ a__ULGH));
+    ptr_table__KWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VLGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JWJH=((__POINTER )(NULL));
+    result__LWJH=((__POINTER *)ptr_table__KWJH)[ 0];
+    if ((result__LWJH == (void *)NULL)) {
+      result__LWJH=new_lab__URJ(new_size__VLGH);
+      next__JWJH=(void *)((unsigned long)result__LWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLGH)));
+      ((__POINTER *)next__JWJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KWJH)[ 0]=next__JWJH;
+    } else {
+      next__JWJH=((__POINTER *)result__LWJH)[ 0];
+      if ((next__JWJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LWJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__VLGH <<  1)) <=  4096)) {
+          next__JWJH=(void *)((unsigned long)result__LWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLGH)));
+        } else {
+          next__JWJH=new_lab__URJ(new_size__VLGH);
+        };
+        ((__POINTER *)next__JWJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KWJH)[ 0]=next__JWJH;
+      } else {
+        ((__POINTER *)result__LWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LWJH=next__JWJH;
+      };
+    };
+    ((__POINTER *)result__LWJH)[ 0]=((__POINTER ) 3);
+    result__CKEH=(void *)((unsigned long)result__LWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__OUIH=first_free__XDVB;
-    while ((((void *)result__OUIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OUIH)->map_size_and_id__ITB &  4294967292LU) < new_size__MJDH))) {
-      result__OUIH=((__MEMORY *)result__OUIH)->map_next_free__JTB;
+    result__OWJH=first_free__5DVB;
+    while ((((void *)result__OWJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OWJH)->map_size_and_id__QTB &  4294967292LU) < new_size__EKEH))) {
+      result__OWJH=((__MEMORY *)result__OWJH)->map_next_free__RTB;
     };
-    if (((void *)result__OUIH == (void *)NULL)) {
-      result__OUIH=new_page__OA5();
+    if (((void *)result__OWJH == (void *)NULL)) {
+      result__OWJH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__OUIH,new_size__MJDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OUIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__KJDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OUIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__OWJH,new_size__EKEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OWJH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__CKEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OWJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__D0NE=((void **)result__KJDH);
-  Self__UEYE=(__INTEGER)(nb_elements__YYIE -  1);
-  while ((Self__UEYE >=  0)) {
-    Result__D0NE[Self__UEYE]=NULL;
-    Self__UEYE=(__INTEGER)(Self__UEYE -  1);
+  Result__GWNE=((void **)result__CKEH);
+  Self__XEYE=(__INTEGER)(nb_elements__QUIE -  1);
+  while ((Self__XEYE >=  0)) {
+    Result__GWNE[Self__XEYE]=NULL;
+    Self__XEYE=(__INTEGER)(Self__XEYE -  1);
   };
-  return(Result__D0NE);
+  return(Result__GWNE);
 }
 
-static void** create__HRQB(__INTEGER nb_elements__JRQB)
+static void** create__PRQB(__INTEGER nb_elements__RRQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __UINTEGER_32 sz__2JDH,a__BKDH,new_size__3JDH,new_size2__4JDH,a__DLFH;
-  __UINTEGER_32 new_size__ELFH;
-  __POINTER result__1JDH,ptr_table__SUIH,next__RUIH,result__TUIH;
-  void *result__WUIH;
-  __INTEGER Self__T0MC;
-  void **Result__DLTB;
-  sz__2JDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JRQB * ((__INTEGER )(sizeof(void *)))));
-  result__1JDH=((__POINTER )(NULL));
-  a__BKDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-  new_size__3JDH=(__UINTEGER_32)((__UINTEGER_32)(sz__2JDH + a__BKDH) & (__UINTEGER_32)(~ a__BKDH));
-  new_size2__4JDH=(__UINTEGER_32)(new_size__3JDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
-  if ((new_size2__4JDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
-    a__DLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-    new_size__ELFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4JDH + a__DLFH) & (__UINTEGER_32)(~ a__DLFH));
-    ptr_table__SUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ELFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-    next__RUIH=((__POINTER )(NULL));
-    result__TUIH=((__POINTER *)ptr_table__SUIH)[ 0];
-    if ((result__TUIH == (void *)NULL)) {
-      result__TUIH=new_lab__MRJ(new_size__ELFH);
-      next__RUIH=(void *)((unsigned long)result__TUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELFH)));
-      ((__POINTER *)next__RUIH)[ 0]=NULL;
-      ((__POINTER *)ptr_table__SUIH)[ 0]=next__RUIH;
-    } else {
-      next__RUIH=((__POINTER *)result__TUIH)[ 0];
-      if ((next__RUIH == (void *)NULL)) {
-        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TUIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__ELFH <<  1)) <=  4096)) {
-          next__RUIH=(void *)((unsigned long)result__TUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELFH)));
-        } else {
-          next__RUIH=new_lab__MRJ(new_size__ELFH);
-        };
-        ((__POINTER *)next__RUIH)[ 0]=NULL;
-        ((__POINTER *)ptr_table__SUIH)[ 0]=next__RUIH;
-      } else {
-        ((__POINTER *)result__TUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-        result__TUIH=next__RUIH;
-      };
-    };
-    ((__POINTER *)result__TUIH)[ 0]=((__POINTER ) 3);
-    result__1JDH=(void *)((unsigned long)result__TUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  __UINTEGER_32 sz__UKEH,a__ZKEH,new_size__VKEH,new_size2__WKEH,a__TMGH;
+  __UINTEGER_32 new_size__UMGH;
+  __POINTER result__TKEH,ptr_table__SWJH,next__RWJH,result__TWJH;
+  void *result__WWJH;
+  __INTEGER Self__10MC;
+  void **Result__LLTB;
+  sz__UKEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RRQB * ((__INTEGER )(sizeof(void *)))));
+  result__TKEH=((__POINTER )(NULL));
+  a__ZKEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VKEH=(__UINTEGER_32)((__UINTEGER_32)(sz__UKEH + a__ZKEH) & (__UINTEGER_32)(~ a__ZKEH));
+  new_size2__WKEH=(__UINTEGER_32)(new_size__VKEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WKEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__TMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__UMGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WKEH + a__TMGH) & (__UINTEGER_32)(~ a__TMGH));
+    ptr_table__SWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__RWJH=((__POINTER )(NULL));
+    result__TWJH=((__POINTER *)ptr_table__SWJH)[ 0];
+    if ((result__TWJH == (void *)NULL)) {
+      result__TWJH=new_lab__URJ(new_size__UMGH);
+      next__RWJH=(void *)((unsigned long)result__TWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMGH)));
+      ((__POINTER *)next__RWJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SWJH)[ 0]=next__RWJH;
+    } else {
+      next__RWJH=((__POINTER *)result__TWJH)[ 0];
+      if ((next__RWJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TWJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__UMGH <<  1)) <=  4096)) {
+          next__RWJH=(void *)((unsigned long)result__TWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMGH)));
+        } else {
+          next__RWJH=new_lab__URJ(new_size__UMGH);
+        };
+        ((__POINTER *)next__RWJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SWJH)[ 0]=next__RWJH;
+      } else {
+        ((__POINTER *)result__TWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TWJH=next__RWJH;
+      };
+    };
+    ((__POINTER *)result__TWJH)[ 0]=((__POINTER ) 3);
+    result__TKEH=(void *)((unsigned long)result__TWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    result__WUIH=first_free__XDVB;
-    while ((((void *)result__WUIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WUIH)->map_size_and_id__ITB &  4294967292LU) < new_size__3JDH))) {
-      result__WUIH=((__MEMORY *)result__WUIH)->map_next_free__JTB;
+    result__WWJH=first_free__5DVB;
+    while ((((void *)result__WWJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WWJH)->map_size_and_id__QTB &  4294967292LU) < new_size__VKEH))) {
+      result__WWJH=((__MEMORY *)result__WWJH)->map_next_free__RTB;
     };
-    if (((void *)result__WUIH == (void *)NULL)) {
-      result__WUIH=new_page__OA5();
+    if (((void *)result__WWJH == (void *)NULL)) {
+      result__WWJH=new_page__WA5();
     };
-    to_busy__index__TTFC(result__WUIH,new_size__3JDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WUIH)) - (unsigned long)begin_memory__PVH)))) >>  26));
-    result__1JDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WUIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    to_busy__index__1TFC(result__WWJH,new_size__VKEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WWJH)) - (unsigned long)begin_memory__XVH)))) >>  26));
+    result__TKEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WWJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  Result__DLTB=((void **)result__1JDH);
-  Self__T0MC=(__INTEGER)(nb_elements__JRQB -  1);
-  while ((Self__T0MC >=  0)) {
-    Result__DLTB[Self__T0MC]=NULL;
-    Self__T0MC=(__INTEGER)(Self__T0MC -  1);
+  Result__LLTB=((void **)result__TKEH);
+  Self__10MC=(__INTEGER)(nb_elements__RRQB -  1);
+  while ((Self__10MC >=  0)) {
+    Result__LLTB[Self__10MC]=NULL;
+    Self__10MC=(__INTEGER)(Self__10MC -  1);
   };
-  return(Result__DLTB);
+  return(Result__LLTB);
 }
 
-static void* read_argument__TOP(__PARSER *Self__UOP)
+static void* read_argument__1OP(__PARSER *Self__2OP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__WOP;
-  __POSITION p__SUGH;
-  __ITM_READ *result__KUGH;
-  __POINTER ptr__LUGH,ptr_table__0UIH,next__ZUIH,result__1UIH;
-  __POINTER ptr_table__5UIH,next__4UIH,result__AVIH;
-  __INTEGER typ_id__MUGH;
-  __UINTEGER_32 sz__NUGH,a__OUGH,new_size__PUGH,t__QUGH,a__RUGH;
-  __UINTEGER_32 new_size__CVIH,lab_type__BVIH;
-  result__WOP=read_expr_primary__I4M(Self__UOP);
-  if ((((void *)result__WOP == (void *)NULL) && read_identifier__LAL())) {
-    if (is_shorter__5Y) {
-      if ((! fast_has__3DV(short_local__JCC,last_string__I0C))) {
-        short__token__to__LBD((&__string_131),(__INTEGER)(position__SBC - ((__STRING_CONSTANT *)last_string__I0C)->count__DD),position__SBC);
-      };
-    };
-    p__SUGH=current_position__JXF();
-    result__KUGH=NULL;
-    ptr__LUGH=((__POINTER )(NULL));
-    typ_id__MUGH= 0;
-    sz__NUGH=((__UINTEGER_32 )sizeof(__ITM_READ));
-    if ((sz__NUGH ==  0)) {
-      result__KUGH=ITM_READ__;
-    } else {
-      typ_id__MUGH=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__NUGH);
-      if ((typ_id__MUGH == (__INTEGER)(-  1))) {
-        a__OUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__PUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__NUGH + a__OUGH) & (__UINTEGER_32)(~ a__OUGH));
-        ptr_table__0UIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__ZUIH=((__POINTER )(NULL));
-        result__1UIH=((__POINTER *)ptr_table__0UIH)[ 0];
-        if ((result__1UIH == (void *)NULL)) {
-          result__1UIH=new_lab__MRJ(new_size__PUGH);
-          next__ZUIH=(void *)((unsigned long)result__1UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUGH)));
-          ((__POINTER *)next__ZUIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__0UIH)[ 0]=next__ZUIH;
-        } else {
-          next__ZUIH=((__POINTER *)result__1UIH)[ 0];
-          if ((next__ZUIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1UIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__PUGH <<  1)) <=  4096)) {
-              next__ZUIH=(void *)((unsigned long)result__1UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PUGH)));
+  void *result__4OP;
+  __POSITION p__NWHH;
+  __ITM_READ *result__FWHH;
+  __POINTER ptr__GWHH,ptr_table__0WJH,next__ZWJH,result__1WJH;
+  __POINTER ptr_table__5WJH,next__4WJH,result__AXJH;
+  __INTEGER typ_id__HWHH;
+  __UINTEGER_32 sz__IWHH,a__JWHH,new_size__KWHH,t__LWHH,a__MWHH;
+  __UINTEGER_32 new_size__CXJH,lab_type__BXJH;
+  result__4OP=read_expr_primary__Q4M(Self__2OP);
+  if ((((void *)result__4OP == (void *)NULL) && read_identifier__TAL())) {
+    if (is_shorter__FZ) {
+      if ((! fast_has__FEV(short_local__RCC,last_string__Q0C))) {
+        short__token__to__TBD((&__string_131),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+      };
+    };
+    p__NWHH=current_position__RXF();
+    result__FWHH=NULL;
+    ptr__GWHH=((__POINTER )(NULL));
+    typ_id__HWHH= 0;
+    sz__IWHH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__IWHH ==  0)) {
+      result__FWHH=ITM_READ__;
+    } else {
+      typ_id__HWHH=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__IWHH);
+      if ((typ_id__HWHH == (__INTEGER)(-  1))) {
+        a__JWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IWHH + a__JWHH) & (__UINTEGER_32)(~ a__JWHH));
+        ptr_table__0WJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KWHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ZWJH=((__POINTER )(NULL));
+        result__1WJH=((__POINTER *)ptr_table__0WJH)[ 0];
+        if ((result__1WJH == (void *)NULL)) {
+          result__1WJH=new_lab__URJ(new_size__KWHH);
+          next__ZWJH=(void *)((unsigned long)result__1WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWHH)));
+          ((__POINTER *)next__ZWJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0WJH)[ 0]=next__ZWJH;
+        } else {
+          next__ZWJH=((__POINTER *)result__1WJH)[ 0];
+          if ((next__ZWJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1WJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__KWHH <<  1)) <=  4096)) {
+              next__ZWJH=(void *)((unsigned long)result__1WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWHH)));
             } else {
-              next__ZUIH=new_lab__MRJ(new_size__PUGH);
-            };
-            ((__POINTER *)next__ZUIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0UIH)[ 0]=next__ZUIH;
-          } else {
-            ((__POINTER *)result__1UIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1UIH=next__ZUIH;
-          };
-        };
-        ptr__LUGH=result__1UIH;
-      } else {
-        t__QUGH=((__UINTEGER_32 )typ_id__MUGH);
-        a__RUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__CVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NUGH + a__RUGH) & (__UINTEGER_32)(~ a__RUGH));
-        ptr_table__5UIH=((__POINTER )(&(table_type[(t__QUGH)])));
-        lab_type__BVIH=(__UINTEGER_32)(t__QUGH |  1);
-        next__4UIH=((__POINTER )(NULL));
-        result__AVIH=((__POINTER *)ptr_table__5UIH)[ 0];
-        if ((result__AVIH == (void *)NULL)) {
-          result__AVIH=new_lab__MRJ(lab_type__BVIH);
-          next__4UIH=(void *)((unsigned long)result__AVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVIH)));
-          ((__POINTER *)next__4UIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__5UIH)[ 0]=next__4UIH;
-        } else {
-          next__4UIH=((__POINTER *)result__AVIH)[ 0];
-          if ((next__4UIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AVIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CVIH <<  1)) <=  4096)) {
-              next__4UIH=(void *)((unsigned long)result__AVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVIH)));
+              next__ZWJH=new_lab__URJ(new_size__KWHH);
+            };
+            ((__POINTER *)next__ZWJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0WJH)[ 0]=next__ZWJH;
+          } else {
+            ((__POINTER *)result__1WJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1WJH=next__ZWJH;
+          };
+        };
+        ptr__GWHH=result__1WJH;
+      } else {
+        t__LWHH=((__UINTEGER_32 )typ_id__HWHH);
+        a__MWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__IWHH + a__MWHH) & (__UINTEGER_32)(~ a__MWHH));
+        ptr_table__5WJH=((__POINTER )(&(table_type[(t__LWHH)])));
+        lab_type__BXJH=(__UINTEGER_32)(t__LWHH |  1);
+        next__4WJH=((__POINTER )(NULL));
+        result__AXJH=((__POINTER *)ptr_table__5WJH)[ 0];
+        if ((result__AXJH == (void *)NULL)) {
+          result__AXJH=new_lab__URJ(lab_type__BXJH);
+          next__4WJH=(void *)((unsigned long)result__AXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXJH)));
+          ((__POINTER *)next__4WJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
+        } else {
+          next__4WJH=((__POINTER *)result__AXJH)[ 0];
+          if ((next__4WJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AXJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CXJH <<  1)) <=  4096)) {
+              next__4WJH=(void *)((unsigned long)result__AXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXJH)));
             } else {
-              next__4UIH=new_lab__MRJ(lab_type__BVIH);
+              next__4WJH=new_lab__URJ(lab_type__BXJH);
             };
-            ((__POINTER *)next__4UIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5UIH)[ 0]=next__4UIH;
+            ((__POINTER *)next__4WJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
           } else {
-            ((__POINTER *)result__AVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4UIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AVIH=next__4UIH;
+            ((__POINTER *)result__AXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__AXJH=next__4WJH;
           };
         };
-        ptr__LUGH=result__AVIH;
+        ptr__GWHH=result__AXJH;
       };
-      result__KUGH=((__ITM_READ *)ptr__LUGH);
-      *(result__KUGH) = *(ITM_READ__);
+      result__FWHH=((__ITM_READ *)ptr__GWHH);
+      *(result__FWHH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__KUGH)->parent_itm_code__QGJ.parent_itm_object__XDE.position__NDJ=p__SUGH;
-    result__WOP=result__KUGH;
+    ((__ITM_READ *)result__FWHH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__NWHH;
+    result__4OP=result__FWHH;
   };
-  return(result__WOP);
+  return(result__4OP);
 }
 
-static void* readlip_expr_binary__3N3B(__PARSER *Self__4N3B)
+static void* readlip_expr_binary__FO3B(__PARSER *Self__GO3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *right__BO3B,*result__AO3B;
-  __POSITION pos__NJZG,p__2UGH,p__JVGH;
-  __LIP_BINARY *result__TUGH,*Self__1UGH,*result__AVGH,*Self__IVGH;
-  __POINTER ptr__UUGH,ptr_table__KVIH,next__JVIH,result__LVIH;
-  __POINTER ptr_table__PVIH,next__OVIH,result__QVIH,ptr__BVGH;
-  __POINTER ptr_table__UVIH,next__TVIH,result__VVIH,ptr_table__ZVIH;
-  __POINTER next__YVIH,result__0VIH;
-  __INTEGER typ_id__VUGH,typ_id__CVGH;
-  __UINTEGER_32 sz__WUGH,a__XUGH,new_size__YUGH,t__ZUGH,a__0UGH;
-  __UINTEGER_32 new_size__SVIH,lab_type__RVIH,sz__DVGH,a__EVGH;
-  __UINTEGER_32 new_size__FVGH,t__GVGH,a__HVGH,new_size__2VIH;
-  __UINTEGER_32 lab_type__1VIH;
-  __BOOLEAN result__DVIH,__tmp__WO3B,result__GVIH;
-  __CHARACTER result__EVIH,result__HVIH;
-  right__BO3B=NULL;
-  result__AO3B=readlip_expr_unary__4Z4B(Self__4N3B);
-  if (((void *)result__AO3B != (void *)NULL)) {
-    while_do__C45B:
+  void *right__JO3B,*result__IO3B;
+  __POSITION pos__2G0G,p__XWHH,p__EXHH;
+  __LIP_BINARY *result__OWHH,*Self__WWHH,*result__1WHH,*Self__DXHH;
+  __POINTER ptr__PWHH,ptr_table__KXJH,next__JXJH,result__LXJH;
+  __POINTER ptr_table__PXJH,next__OXJH,result__QXJH,ptr__2WHH;
+  __POINTER ptr_table__UXJH,next__TXJH,result__VXJH,ptr_table__ZXJH;
+  __POINTER next__YXJH,result__0XJH;
+  __INTEGER typ_id__QWHH,typ_id__3WHH;
+  __UINTEGER_32 sz__RWHH,a__SWHH,new_size__TWHH,t__UWHH,a__VWHH;
+  __UINTEGER_32 new_size__SXJH,lab_type__RXJH,sz__4WHH,a__5WHH;
+  __UINTEGER_32 new_size__AXHH,t__BXHH,a__CXHH,new_size__2XJH;
+  __UINTEGER_32 lab_type__1XJH;
+  __BOOLEAN result__DXJH,__tmp__4O3B,result__GXJH;
+  __CHARACTER result__EXJH,result__HXJH;
+  right__JO3B=NULL;
+  result__IO3B=readlip_expr_unary__G04B(Self__GO3B);
+  if (((void *)result__IO3B != (void *)NULL)) {
+    while_do__K45B:
     {
-      result__DVIH=FALSE__;
-      if ((! read_space__3RD())) {
-        result__DVIH=FALSE__;
+      result__DXJH=FALSE__;
+      if ((! read_space__FSD())) {
+        result__DXJH=FALSE__;
       } else {
-        result__EVIH='\0';
-        if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-          result__EVIH=((__CHARACTER )(( 0)));
+        result__EXJH='\0';
+        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+          result__EXJH=((__CHARACTER )(( 0)));
         } else {
-          result__EVIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+          result__EXJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
         };
-        if ((result__EVIH == '-')) {
-          position__SBC=(__INTEGER)(position__SBC +  1);
-          result__DVIH=TRUE__;
+        if ((result__EXJH == '-')) {
+          position__0BC=(__INTEGER)(position__0BC +  1);
+          result__DXJH=TRUE__;
         };
       };
-      if (result__DVIH) {
-        __tmp__WO3B=TRUE__;
+      if (result__DXJH) {
+        __tmp__4O3B=TRUE__;
       } else {
-        result__GVIH=FALSE__;
-        if ((! read_space__3RD())) {
-          result__GVIH=FALSE__;
+        result__GXJH=FALSE__;
+        if ((! read_space__FSD())) {
+          result__GXJH=FALSE__;
         } else {
-          result__HVIH='\0';
-          if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-            result__HVIH=((__CHARACTER )(( 0)));
+          result__HXJH='\0';
+          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+            result__HXJH=((__CHARACTER )(( 0)));
           } else {
-            result__HVIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+            result__HXJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
           };
-          if ((result__HVIH == '+')) {
-            position__SBC=(__INTEGER)(position__SBC +  1);
-            result__GVIH=TRUE__;
+          if ((result__HXJH == '+')) {
+            position__0BC=(__INTEGER)(position__0BC +  1);
+            result__GXJH=TRUE__;
           };
         };
-        __tmp__WO3B=result__GVIH;
+        __tmp__4O3B=result__GXJH;
       };
-      if (__tmp__WO3B) {
-        right__BO3B=readlip_expr_unary__4Z4B(Self__4N3B);
-        if (((void *)right__BO3B == (void *)NULL)) {
-          pos__NJZG=current_position__JXF();
-          put_error__text__KNG( 0,(&__string_240));
-          put_position__UOG(pos__NJZG);
-          put_string__U1F(msg_err__PNG);
-          if ((type_error__ONG !=  2)) {
+      if (__tmp__4O3B) {
+        right__JO3B=readlip_expr_unary__G04B(Self__GO3B);
+        if (((void *)right__JO3B == (void *)NULL)) {
+          pos__2G0G=current_position__RXF();
+          put_error__text__SNG( 0,(&__string_238));
+          put_position__2OG(pos__2G0G);
+          put_string__21F(msg_err__XNG);
+          if ((type_error__WNG !=  2)) {
             exit(( 1));
           };
         };
-        if (result__DVIH) {
-          p__2UGH=current_position__JXF();
-          result__TUGH=NULL;
-          ptr__UUGH=((__POINTER )(NULL));
-          typ_id__VUGH= 0;
-          sz__WUGH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__WUGH ==  0)) {
-            result__TUGH=LIP_BINARY__;
-          } else {
-            typ_id__VUGH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__WUGH);
-            if ((typ_id__VUGH == (__INTEGER)(-  1))) {
-              a__XUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__YUGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUGH + a__XUGH) & (__UINTEGER_32)(~ a__XUGH));
-              ptr_table__KVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YUGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__JVIH=((__POINTER )(NULL));
-              result__LVIH=((__POINTER *)ptr_table__KVIH)[ 0];
-              if ((result__LVIH == (void *)NULL)) {
-                result__LVIH=new_lab__MRJ(new_size__YUGH);
-                next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YUGH)));
-                ((__POINTER *)next__JVIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KVIH)[ 0]=next__JVIH;
+        if (result__DXJH) {
+          p__XWHH=current_position__RXF();
+          result__OWHH=NULL;
+          ptr__PWHH=((__POINTER )(NULL));
+          typ_id__QWHH= 0;
+          sz__RWHH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__RWHH ==  0)) {
+            result__OWHH=LIP_BINARY__;
+          } else {
+            typ_id__QWHH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__RWHH);
+            if ((typ_id__QWHH == (__INTEGER)(-  1))) {
+              a__SWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__TWHH=(__UINTEGER_32)((__UINTEGER_32)(sz__RWHH + a__SWHH) & (__UINTEGER_32)(~ a__SWHH));
+              ptr_table__KXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TWHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JXJH=((__POINTER )(NULL));
+              result__LXJH=((__POINTER *)ptr_table__KXJH)[ 0];
+              if ((result__LXJH == (void *)NULL)) {
+                result__LXJH=new_lab__URJ(new_size__TWHH);
+                next__JXJH=(void *)((unsigned long)result__LXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWHH)));
+                ((__POINTER *)next__JXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KXJH)[ 0]=next__JXJH;
               } else {
-                next__JVIH=((__POINTER *)result__LVIH)[ 0];
-                if ((next__JVIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LVIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__YUGH <<  1)) <=  4096)) {
-                    next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YUGH)));
+                next__JXJH=((__POINTER *)result__LXJH)[ 0];
+                if ((next__JXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LXJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__TWHH <<  1)) <=  4096)) {
+                    next__JXJH=(void *)((unsigned long)result__LXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWHH)));
                   } else {
-                    next__JVIH=new_lab__MRJ(new_size__YUGH);
+                    next__JXJH=new_lab__URJ(new_size__TWHH);
                   };
-                  ((__POINTER *)next__JVIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KVIH)[ 0]=next__JVIH;
+                  ((__POINTER *)next__JXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KXJH)[ 0]=next__JXJH;
                 } else {
-                  ((__POINTER *)result__LVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LVIH=next__JVIH;
+                  ((__POINTER *)result__LXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LXJH=next__JXJH;
                 };
               };
-              ptr__UUGH=result__LVIH;
+              ptr__PWHH=result__LXJH;
             } else {
-              t__ZUGH=((__UINTEGER_32 )typ_id__VUGH);
-              a__0UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__SVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUGH + a__0UGH) & (__UINTEGER_32)(~ a__0UGH));
-              ptr_table__PVIH=((__POINTER )(&(table_type[(t__ZUGH)])));
-              lab_type__RVIH=(__UINTEGER_32)(t__ZUGH |  1);
-              next__OVIH=((__POINTER )(NULL));
-              result__QVIH=((__POINTER *)ptr_table__PVIH)[ 0];
-              if ((result__QVIH == (void *)NULL)) {
-                result__QVIH=new_lab__MRJ(lab_type__RVIH);
-                next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVIH)));
-                ((__POINTER *)next__OVIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
+              t__UWHH=((__UINTEGER_32 )typ_id__QWHH);
+              a__VWHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RWHH + a__VWHH) & (__UINTEGER_32)(~ a__VWHH));
+              ptr_table__PXJH=((__POINTER )(&(table_type[(t__UWHH)])));
+              lab_type__RXJH=(__UINTEGER_32)(t__UWHH |  1);
+              next__OXJH=((__POINTER )(NULL));
+              result__QXJH=((__POINTER *)ptr_table__PXJH)[ 0];
+              if ((result__QXJH == (void *)NULL)) {
+                result__QXJH=new_lab__URJ(lab_type__RXJH);
+                next__OXJH=(void *)((unsigned long)result__QXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SXJH)));
+                ((__POINTER *)next__OXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PXJH)[ 0]=next__OXJH;
               } else {
-                next__OVIH=((__POINTER *)result__QVIH)[ 0];
-                if ((next__OVIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QVIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SVIH <<  1)) <=  4096)) {
-                    next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVIH)));
+                next__OXJH=((__POINTER *)result__QXJH)[ 0];
+                if ((next__OXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QXJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SXJH <<  1)) <=  4096)) {
+                    next__OXJH=(void *)((unsigned long)result__QXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SXJH)));
                   } else {
-                    next__OVIH=new_lab__MRJ(lab_type__RVIH);
+                    next__OXJH=new_lab__URJ(lab_type__RXJH);
                   };
-                  ((__POINTER *)next__OVIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
+                  ((__POINTER *)next__OXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PXJH)[ 0]=next__OXJH;
                 } else {
-                  ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QVIH=next__OVIH;
+                  ((__POINTER *)result__QXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QXJH=next__OXJH;
                 };
               };
-              ptr__UUGH=result__QVIH;
-            };
-            result__TUGH=((__LIP_BINARY *)ptr__UUGH);
-            *(result__TUGH) = *(LIP_BINARY__);
-          };
-          Self__1UGH=((__LIP_BINARY *)result__TUGH);
-          Self__1UGH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__2UGH;
-          Self__1UGH->left__MZQD=result__AO3B;
-          Self__1UGH->right__PZQD=right__BO3B;
-          Self__1UGH->operator__SZQD='-';
-          result__AO3B=result__TUGH;
-        } else {
-          p__JVGH=current_position__JXF();
-          result__AVGH=NULL;
-          ptr__BVGH=((__POINTER )(NULL));
-          typ_id__CVGH= 0;
-          sz__DVGH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
-          if ((sz__DVGH ==  0)) {
-            result__AVGH=LIP_BINARY__;
-          } else {
-            typ_id__CVGH=-1;
-            clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__DVGH);
-            if ((typ_id__CVGH == (__INTEGER)(-  1))) {
-              a__EVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__FVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__DVGH + a__EVGH) & (__UINTEGER_32)(~ a__EVGH));
-              ptr_table__UVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-              next__TVIH=((__POINTER )(NULL));
-              result__VVIH=((__POINTER *)ptr_table__UVIH)[ 0];
-              if ((result__VVIH == (void *)NULL)) {
-                result__VVIH=new_lab__MRJ(new_size__FVGH);
-                next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FVGH)));
-                ((__POINTER *)next__TVIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+              ptr__PWHH=result__QXJH;
+            };
+            result__OWHH=((__LIP_BINARY *)ptr__PWHH);
+            *(result__OWHH) = *(LIP_BINARY__);
+          };
+          Self__WWHH=((__LIP_BINARY *)result__OWHH);
+          Self__WWHH->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ=p__XWHH;
+          Self__WWHH->left__UZQD=result__IO3B;
+          Self__WWHH->right__XZQD=right__JO3B;
+          Self__WWHH->operator__0ZQD='-';
+          result__IO3B=result__OWHH;
+        } else {
+          p__EXHH=current_position__RXF();
+          result__1WHH=NULL;
+          ptr__2WHH=((__POINTER )(NULL));
+          typ_id__3WHH= 0;
+          sz__4WHH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__4WHH ==  0)) {
+            result__1WHH=LIP_BINARY__;
+          } else {
+            typ_id__3WHH=-1;
+            clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__4WHH);
+            if ((typ_id__3WHH == (__INTEGER)(-  1))) {
+              a__5WHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__AXHH=(__UINTEGER_32)((__UINTEGER_32)(sz__4WHH + a__5WHH) & (__UINTEGER_32)(~ a__5WHH));
+              ptr_table__UXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AXHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__TXJH=((__POINTER )(NULL));
+              result__VXJH=((__POINTER *)ptr_table__UXJH)[ 0];
+              if ((result__VXJH == (void *)NULL)) {
+                result__VXJH=new_lab__URJ(new_size__AXHH);
+                next__TXJH=(void *)((unsigned long)result__VXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXHH)));
+                ((__POINTER *)next__TXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__UXJH)[ 0]=next__TXJH;
               } else {
-                next__TVIH=((__POINTER *)result__VVIH)[ 0];
-                if ((next__TVIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VVIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__FVGH <<  1)) <=  4096)) {
-                    next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FVGH)));
+                next__TXJH=((__POINTER *)result__VXJH)[ 0];
+                if ((next__TXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VXJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__AXHH <<  1)) <=  4096)) {
+                    next__TXJH=(void *)((unsigned long)result__VXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXHH)));
                   } else {
-                    next__TVIH=new_lab__MRJ(new_size__FVGH);
+                    next__TXJH=new_lab__URJ(new_size__AXHH);
                   };
-                  ((__POINTER *)next__TVIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+                  ((__POINTER *)next__TXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__UXJH)[ 0]=next__TXJH;
                 } else {
-                  ((__POINTER *)result__VVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__VVIH=next__TVIH;
+                  ((__POINTER *)result__VXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__VXJH=next__TXJH;
                 };
               };
-              ptr__BVGH=result__VVIH;
+              ptr__2WHH=result__VXJH;
             } else {
-              t__GVGH=((__UINTEGER_32 )typ_id__CVGH);
-              a__HVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-              new_size__2VIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DVGH + a__HVGH) & (__UINTEGER_32)(~ a__HVGH));
-              ptr_table__ZVIH=((__POINTER )(&(table_type[(t__GVGH)])));
-              lab_type__1VIH=(__UINTEGER_32)(t__GVGH |  1);
-              next__YVIH=((__POINTER )(NULL));
-              result__0VIH=((__POINTER *)ptr_table__ZVIH)[ 0];
-              if ((result__0VIH == (void *)NULL)) {
-                result__0VIH=new_lab__MRJ(lab_type__1VIH);
-                next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2VIH)));
-                ((__POINTER *)next__YVIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZVIH)[ 0]=next__YVIH;
+              t__BXHH=((__UINTEGER_32 )typ_id__3WHH);
+              a__CXHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__2XJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4WHH + a__CXHH) & (__UINTEGER_32)(~ a__CXHH));
+              ptr_table__ZXJH=((__POINTER )(&(table_type[(t__BXHH)])));
+              lab_type__1XJH=(__UINTEGER_32)(t__BXHH |  1);
+              next__YXJH=((__POINTER )(NULL));
+              result__0XJH=((__POINTER *)ptr_table__ZXJH)[ 0];
+              if ((result__0XJH == (void *)NULL)) {
+                result__0XJH=new_lab__URJ(lab_type__1XJH);
+                next__YXJH=(void *)((unsigned long)result__0XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XJH)));
+                ((__POINTER *)next__YXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZXJH)[ 0]=next__YXJH;
               } else {
-                next__YVIH=((__POINTER *)result__0VIH)[ 0];
-                if ((next__YVIH == (void *)NULL)) {
-                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0VIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2VIH <<  1)) <=  4096)) {
-                    next__YVIH=(void *)((unsigned long)result__0VIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2VIH)));
+                next__YXJH=((__POINTER *)result__0XJH)[ 0];
+                if ((next__YXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0XJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2XJH <<  1)) <=  4096)) {
+                    next__YXJH=(void *)((unsigned long)result__0XJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XJH)));
                   } else {
-                    next__YVIH=new_lab__MRJ(lab_type__1VIH);
+                    next__YXJH=new_lab__URJ(lab_type__1XJH);
                   };
-                  ((__POINTER *)next__YVIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ZVIH)[ 0]=next__YVIH;
+                  ((__POINTER *)next__YXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__ZXJH)[ 0]=next__YXJH;
                 } else {
-                  ((__POINTER *)result__0VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__0VIH=next__YVIH;
+                  ((__POINTER *)result__0XJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__0XJH=next__YXJH;
                 };
               };
-              ptr__BVGH=result__0VIH;
+              ptr__2WHH=result__0XJH;
             };
-            result__AVGH=((__LIP_BINARY *)ptr__BVGH);
-            *(result__AVGH) = *(LIP_BINARY__);
+            result__1WHH=((__LIP_BINARY *)ptr__2WHH);
+            *(result__1WHH) = *(LIP_BINARY__);
           };
-          Self__IVGH=((__LIP_BINARY *)result__AVGH);
-          Self__IVGH->parent_lip_code__2PZB.parent_itm_object__5DE.position__NDJ=p__JVGH;
-          Self__IVGH->left__MZQD=result__AO3B;
-          Self__IVGH->right__PZQD=right__BO3B;
-          Self__IVGH->operator__SZQD='+';
-          result__AO3B=result__AVGH;
+          Self__DXHH=((__LIP_BINARY *)result__1WHH);
+          Self__DXHH->parent_lip_code__EQZB.parent_itm_object__HEE.position__VDJ=p__EXHH;
+          Self__DXHH->left__UZQD=result__IO3B;
+          Self__DXHH->right__XZQD=right__JO3B;
+          Self__DXHH->operator__0ZQD='+';
+          result__IO3B=result__1WHH;
         };
-        goto while_do__C45B;
+        goto while_do__K45B;
       };
     };
   };
-  return(result__AO3B);
+  return(result__IO3B);
 }
 
-static void* readlip_expr_unary__4Z4B(__PARSER *Self__5Z4B)
+static void* readlip_expr_unary__G04B(__PARSER *Self__H04B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  void *result__B04B,*result__YFFE;
-  void *nam__E04B,*n__XWIH;
-  __POSITION pos__5KZG,p__G5ZC,p__WWIH,p__LGFE;
-  __LIP_UNARY *result__2NBD,*Self__YHSD;
-  __POINTER ptr__3NBD,ptr_table__EWIH,next__DWIH,result__FWIH;
-  __POINTER ptr_table__JWIH,next__IWIH,result__KWIH,ptr__OWIH;
-  __POINTER ptr_table__0WIH,next__ZWIH,result__1WIH,ptr_table__5WIH;
-  __POINTER next__4WIH,result__AXIH,ptr__WXLE,ptr_table__EXIH;
-  __POINTER next__DXIH,result__FXIH,ptr_table__JXIH,next__IXIH;
-  __POINTER result__KXIH;
-  __INTEGER typ_id__COBD,typ_id__PWIH,typ_id__1XLE;
-  __UINTEGER_32 sz__5NBD,a__KLFH,new_size__LLFH,t__PLFH,a__OLFH;
-  __UINTEGER_32 new_size__MWIH,lab_type__LWIH,sz__QWIH,a__RWIH;
-  __UINTEGER_32 new_size__SWIH,t__TWIH,a__UWIH,new_size__CXIH;
-  __UINTEGER_32 lab_type__BXIH,sz__YXLE,a__SLFH,new_size__TLFH,t__XLFH;
-  __UINTEGER_32 a__WLFH,new_size__MXIH,lab_type__LXIH;
-  __LIP_CALL *result__NWIH,*Self__VWIH,*result__VXLE,*Self__QAWE;
-  __CHARACTER type__D04B,result__4VIH,result__BWIH;
-  __BOOLEAN result__3VIH,__tmp__P04B,result__AWIH,__tmp__P14B;
-  result__B04B=NULL;
-  type__D04B='\0';
-  nam__E04B=NULL;
-  result__3VIH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__3VIH=FALSE__;
+  void *result__J04B,*result__VDFE;
+  void *nam__M04B,*n__XYJH;
+  __POSITION pos__OI0G,p__O5ZC,p__WYJH,p__IEFE;
+  __LIP_UNARY *result__EOBD,*Self__AISD;
+  __POINTER ptr__FOBD,ptr_table__EYJH,next__DYJH,result__FYJH;
+  __POINTER ptr_table__JYJH,next__IYJH,result__KYJH,ptr__OYJH;
+  __POINTER ptr_table__0YJH,next__ZYJH,result__1YJH,ptr_table__5YJH;
+  __POINTER next__4YJH,result__AZJH,ptr__OTLE,ptr_table__EZJH;
+  __POINTER next__DZJH,result__FZJH,ptr_table__JZJH,next__IZJH;
+  __POINTER result__KZJH;
+  __INTEGER typ_id__KOBD,typ_id__PYJH,typ_id__TTLE;
+  __UINTEGER_32 sz__HOBD,a__0MGH,new_size__1MGH,t__5MGH,a__4MGH;
+  __UINTEGER_32 new_size__MYJH,lab_type__LYJH,sz__QYJH,a__RYJH;
+  __UINTEGER_32 new_size__SYJH,t__TYJH,a__UYJH,new_size__CZJH;
+  __UINTEGER_32 lab_type__BZJH,sz__QTLE,a__CNGH,new_size__DNGH,t__HNGH;
+  __UINTEGER_32 a__GNGH,new_size__MZJH,lab_type__LZJH;
+  __LIP_CALL *result__NYJH,*Self__VYJH,*result__NTLE,*Self__TAWE;
+  __CHARACTER type__L04B,result__4XJH,result__BYJH;
+  __BOOLEAN result__3XJH,__tmp__X04B,result__AYJH,__tmp__X14B;
+  result__J04B=NULL;
+  type__L04B='\0';
+  nam__M04B=NULL;
+  result__3XJH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__3XJH=FALSE__;
   } else {
-    result__4VIH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__4VIH=((__CHARACTER )(( 0)));
+    result__4XJH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__4XJH=((__CHARACTER )(( 0)));
     } else {
-      result__4VIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__4XJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__4VIH == '-')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__3VIH=TRUE__;
+    if ((result__4XJH == '-')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__3XJH=TRUE__;
     };
   };
-  if (result__3VIH) {
-    __tmp__P04B=TRUE__;
+  if (result__3XJH) {
+    __tmp__X04B=TRUE__;
   } else {
-    result__AWIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__AWIH=FALSE__;
+    result__AYJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__AYJH=FALSE__;
     } else {
-      result__BWIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__BWIH=((__CHARACTER )(( 0)));
+      result__BYJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__BYJH=((__CHARACTER )(( 0)));
       } else {
-        result__BWIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__BYJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__BWIH == '!')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__AWIH=TRUE__;
+      if ((result__BYJH == '!')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__AYJH=TRUE__;
       };
     };
-    __tmp__P04B=result__AWIH;
+    __tmp__X04B=result__AYJH;
   };
-  if (__tmp__P04B) {
-    result__B04B=readlip_expr_unary__4Z4B(Self__5Z4B);
-    if (((void *)result__B04B == (void *)NULL)) {
-      pos__5KZG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_240));
-      put_position__UOG(pos__5KZG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if (__tmp__X04B) {
+    result__J04B=readlip_expr_unary__G04B(Self__H04B);
+    if (((void *)result__J04B == (void *)NULL)) {
+      pos__OI0G=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_238));
+      put_position__2OG(pos__OI0G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    if (result__3VIH) {
-      type__D04B='-';
-    } else {
-      type__D04B='!';
-    };
-    p__G5ZC=current_position__JXF();
-    result__2NBD=NULL;
-    ptr__3NBD=((__POINTER )(NULL));
-    typ_id__COBD= 0;
-    sz__5NBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
-    if ((sz__5NBD ==  0)) {
-      result__2NBD=LIP_UNARY__;
-    } else {
-      typ_id__COBD=-1;
-      clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__5NBD);
-      if ((typ_id__COBD == (__INTEGER)(-  1))) {
-        a__KLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__LLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NBD + a__KLFH) & (__UINTEGER_32)(~ a__KLFH));
-        ptr_table__EWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-        next__DWIH=((__POINTER )(NULL));
-        result__FWIH=((__POINTER *)ptr_table__EWIH)[ 0];
-        if ((result__FWIH == (void *)NULL)) {
-          result__FWIH=new_lab__MRJ(new_size__LLFH);
-          next__DWIH=(void *)((unsigned long)result__FWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLFH)));
-          ((__POINTER *)next__DWIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__EWIH)[ 0]=next__DWIH;
-        } else {
-          next__DWIH=((__POINTER *)result__FWIH)[ 0];
-          if ((next__DWIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FWIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__LLFH <<  1)) <=  4096)) {
-              next__DWIH=(void *)((unsigned long)result__FWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LLFH)));
+    if (result__3XJH) {
+      type__L04B='-';
+    } else {
+      type__L04B='!';
+    };
+    p__O5ZC=current_position__RXF();
+    result__EOBD=NULL;
+    ptr__FOBD=((__POINTER )(NULL));
+    typ_id__KOBD= 0;
+    sz__HOBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__HOBD ==  0)) {
+      result__EOBD=LIP_UNARY__;
+    } else {
+      typ_id__KOBD=-1;
+      clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__HOBD);
+      if ((typ_id__KOBD == (__INTEGER)(-  1))) {
+        a__0MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1MGH=(__UINTEGER_32)((__UINTEGER_32)(sz__HOBD + a__0MGH) & (__UINTEGER_32)(~ a__0MGH));
+        ptr_table__EYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1MGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DYJH=((__POINTER )(NULL));
+        result__FYJH=((__POINTER *)ptr_table__EYJH)[ 0];
+        if ((result__FYJH == (void *)NULL)) {
+          result__FYJH=new_lab__URJ(new_size__1MGH);
+          next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MGH)));
+          ((__POINTER *)next__DYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
+        } else {
+          next__DYJH=((__POINTER *)result__FYJH)[ 0];
+          if ((next__DYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FYJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__1MGH <<  1)) <=  4096)) {
+              next__DYJH=(void *)((unsigned long)result__FYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1MGH)));
             } else {
-              next__DWIH=new_lab__MRJ(new_size__LLFH);
-            };
-            ((__POINTER *)next__DWIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EWIH)[ 0]=next__DWIH;
-          } else {
-            ((__POINTER *)result__FWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FWIH=next__DWIH;
-          };
-        };
-        ptr__3NBD=result__FWIH;
-      } else {
-        t__PLFH=((__UINTEGER_32 )typ_id__COBD);
-        a__OLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-        new_size__MWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5NBD + a__OLFH) & (__UINTEGER_32)(~ a__OLFH));
-        ptr_table__JWIH=((__POINTER )(&(table_type[(t__PLFH)])));
-        lab_type__LWIH=(__UINTEGER_32)(t__PLFH |  1);
-        next__IWIH=((__POINTER )(NULL));
-        result__KWIH=((__POINTER *)ptr_table__JWIH)[ 0];
-        if ((result__KWIH == (void *)NULL)) {
-          result__KWIH=new_lab__MRJ(lab_type__LWIH);
-          next__IWIH=(void *)((unsigned long)result__KWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MWIH)));
-          ((__POINTER *)next__IWIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JWIH)[ 0]=next__IWIH;
-        } else {
-          next__IWIH=((__POINTER *)result__KWIH)[ 0];
-          if ((next__IWIH == (void *)NULL)) {
-            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KWIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MWIH <<  1)) <=  4096)) {
-              next__IWIH=(void *)((unsigned long)result__KWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MWIH)));
+              next__DYJH=new_lab__URJ(new_size__1MGH);
+            };
+            ((__POINTER *)next__DYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EYJH)[ 0]=next__DYJH;
+          } else {
+            ((__POINTER *)result__FYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FYJH=next__DYJH;
+          };
+        };
+        ptr__FOBD=result__FYJH;
+      } else {
+        t__5MGH=((__UINTEGER_32 )typ_id__KOBD);
+        a__4MGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__HOBD + a__4MGH) & (__UINTEGER_32)(~ a__4MGH));
+        ptr_table__JYJH=((__POINTER )(&(table_type[(t__5MGH)])));
+        lab_type__LYJH=(__UINTEGER_32)(t__5MGH |  1);
+        next__IYJH=((__POINTER )(NULL));
+        result__KYJH=((__POINTER *)ptr_table__JYJH)[ 0];
+        if ((result__KYJH == (void *)NULL)) {
+          result__KYJH=new_lab__URJ(lab_type__LYJH);
+          next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYJH)));
+          ((__POINTER *)next__IYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
+        } else {
+          next__IYJH=((__POINTER *)result__KYJH)[ 0];
+          if ((next__IYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KYJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MYJH <<  1)) <=  4096)) {
+              next__IYJH=(void *)((unsigned long)result__KYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYJH)));
             } else {
-              next__IWIH=new_lab__MRJ(lab_type__LWIH);
+              next__IYJH=new_lab__URJ(lab_type__LYJH);
             };
-            ((__POINTER *)next__IWIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JWIH)[ 0]=next__IWIH;
+            ((__POINTER *)next__IYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
           } else {
-            ((__POINTER *)result__KWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KWIH=next__IWIH;
+            ((__POINTER *)result__KYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KYJH=next__IYJH;
           };
         };
-        ptr__3NBD=result__KWIH;
+        ptr__FOBD=result__KYJH;
       };
-      result__2NBD=((__LIP_UNARY *)ptr__3NBD);
-      *(result__2NBD) = *(LIP_UNARY__);
+      result__EOBD=((__LIP_UNARY *)ptr__FOBD);
+      *(result__EOBD) = *(LIP_UNARY__);
     };
-    Self__YHSD=((__LIP_UNARY *)result__2NBD);
-    Self__YHSD->parent_lip_code__L14B.parent_itm_object__5DE.position__NDJ=p__G5ZC;
-    Self__YHSD->operator__M2QD=type__D04B;
-    Self__YHSD->value__J2QD=result__B04B;
-    result__B04B=result__2NBD;
-    __tmp__P14B=TRUE__;
+    Self__AISD=((__LIP_UNARY *)result__EOBD);
+    Self__AISD->parent_lip_code__T14B.parent_itm_object__HEE.position__VDJ=p__O5ZC;
+    Self__AISD->operator__U2QD=type__L04B;
+    Self__AISD->value__R2QD=result__J04B;
+    result__J04B=result__EOBD;
+    __tmp__X14B=TRUE__;
   } else {
-    __tmp__P14B=FALSE__;
-  };
-  if ((! __tmp__P14B)) {
-    if (read_identifier__LAL()) {
-      nam__E04B=last_string__I0C;
-      result__YFFE=NULL;
-      if (read_identifier__LAL()) {
-        p__WWIH=current_position__JXF();
-        n__XWIH=last_string__I0C;
-        result__NWIH=NULL;
-        ptr__OWIH=((__POINTER )(NULL));
-        typ_id__PWIH= 0;
-        sz__QWIH=((__UINTEGER_32 )sizeof(__LIP_CALL));
-        if ((sz__QWIH ==  0)) {
-          result__NWIH=LIP_CALL__;
-        } else {
-          typ_id__PWIH=-1;
-          clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__QWIH);
-          if ((typ_id__PWIH == (__INTEGER)(-  1))) {
-            a__RWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__SWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QWIH + a__RWIH) & (__UINTEGER_32)(~ a__RWIH));
-            ptr_table__0WIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SWIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-            next__ZWIH=((__POINTER )(NULL));
-            result__1WIH=((__POINTER *)ptr_table__0WIH)[ 0];
-            if ((result__1WIH == (void *)NULL)) {
-              result__1WIH=new_lab__MRJ(new_size__SWIH);
-              next__ZWIH=(void *)((unsigned long)result__1WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWIH)));
-              ((__POINTER *)next__ZWIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0WIH)[ 0]=next__ZWIH;
+    __tmp__X14B=FALSE__;
+  };
+  if ((! __tmp__X14B)) {
+    if (read_identifier__TAL()) {
+      nam__M04B=last_string__Q0C;
+      result__VDFE=NULL;
+      if (read_identifier__TAL()) {
+        p__WYJH=current_position__RXF();
+        n__XYJH=last_string__Q0C;
+        result__NYJH=NULL;
+        ptr__OYJH=((__POINTER )(NULL));
+        typ_id__PYJH= 0;
+        sz__QYJH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__QYJH ==  0)) {
+          result__NYJH=LIP_CALL__;
+        } else {
+          typ_id__PYJH=-1;
+          clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QYJH);
+          if ((typ_id__PYJH == (__INTEGER)(-  1))) {
+            a__RYJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__SYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QYJH + a__RYJH) & (__UINTEGER_32)(~ a__RYJH));
+            ptr_table__0YJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SYJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ZYJH=((__POINTER )(NULL));
+            result__1YJH=((__POINTER *)ptr_table__0YJH)[ 0];
+            if ((result__1YJH == (void *)NULL)) {
+              result__1YJH=new_lab__URJ(new_size__SYJH);
+              next__ZYJH=(void *)((unsigned long)result__1YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SYJH)));
+              ((__POINTER *)next__ZYJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0YJH)[ 0]=next__ZYJH;
             } else {
-              next__ZWIH=((__POINTER *)result__1WIH)[ 0];
-              if ((next__ZWIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1WIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__SWIH <<  1)) <=  4096)) {
-                  next__ZWIH=(void *)((unsigned long)result__1WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWIH)));
+              next__ZYJH=((__POINTER *)result__1YJH)[ 0];
+              if ((next__ZYJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1YJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__SYJH <<  1)) <=  4096)) {
+                  next__ZYJH=(void *)((unsigned long)result__1YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SYJH)));
                 } else {
-                  next__ZWIH=new_lab__MRJ(new_size__SWIH);
+                  next__ZYJH=new_lab__URJ(new_size__SYJH);
                 };
-                ((__POINTER *)next__ZWIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0WIH)[ 0]=next__ZWIH;
+                ((__POINTER *)next__ZYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0YJH)[ 0]=next__ZYJH;
               } else {
-                ((__POINTER *)result__1WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1WIH=next__ZWIH;
+                ((__POINTER *)result__1YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1YJH=next__ZYJH;
               };
             };
-            ptr__OWIH=result__1WIH;
-          } else {
-            t__TWIH=((__UINTEGER_32 )typ_id__PWIH);
-            a__UWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-            new_size__CXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QWIH + a__UWIH) & (__UINTEGER_32)(~ a__UWIH));
-            ptr_table__5WIH=((__POINTER )(&(table_type[(t__TWIH)])));
-            lab_type__BXIH=(__UINTEGER_32)(t__TWIH |  1);
-            next__4WIH=((__POINTER )(NULL));
-            result__AXIH=((__POINTER *)ptr_table__5WIH)[ 0];
-            if ((result__AXIH == (void *)NULL)) {
-              result__AXIH=new_lab__MRJ(lab_type__BXIH);
-              next__4WIH=(void *)((unsigned long)result__AXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXIH)));
-              ((__POINTER *)next__4WIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5WIH)[ 0]=next__4WIH;
+            ptr__OYJH=result__1YJH;
+          } else {
+            t__TYJH=((__UINTEGER_32 )typ_id__PYJH);
+            a__UYJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__CZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QYJH + a__UYJH) & (__UINTEGER_32)(~ a__UYJH));
+            ptr_table__5YJH=((__POINTER )(&(table_type[(t__TYJH)])));
+            lab_type__BZJH=(__UINTEGER_32)(t__TYJH |  1);
+            next__4YJH=((__POINTER )(NULL));
+            result__AZJH=((__POINTER *)ptr_table__5YJH)[ 0];
+            if ((result__AZJH == (void *)NULL)) {
+              result__AZJH=new_lab__URJ(lab_type__BZJH);
+              next__4YJH=(void *)((unsigned long)result__AZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CZJH)));
+              ((__POINTER *)next__4YJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5YJH)[ 0]=next__4YJH;
             } else {
-              next__4WIH=((__POINTER *)result__AXIH)[ 0];
-              if ((next__4WIH == (void *)NULL)) {
-                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AXIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__CXIH <<  1)) <=  4096)) {
-                  next__4WIH=(void *)((unsigned long)result__AXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXIH)));
+              next__4YJH=((__POINTER *)result__AZJH)[ 0];
+              if ((next__4YJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AZJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__CZJH <<  1)) <=  4096)) {
+                  next__4YJH=(void *)((unsigned long)result__AZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CZJH)));
                 } else {
-                  next__4WIH=new_lab__MRJ(lab_type__BXIH);
+                  next__4YJH=new_lab__URJ(lab_type__BZJH);
                 };
-                ((__POINTER *)next__4WIH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5WIH)[ 0]=next__4WIH;
+                ((__POINTER *)next__4YJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5YJH)[ 0]=next__4YJH;
               } else {
-                ((__POINTER *)result__AXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__AXIH=next__4WIH;
+                ((__POINTER *)result__AZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__AZJH=next__4YJH;
               };
             };
-            ptr__OWIH=result__AXIH;
-          };
-          result__NWIH=((__LIP_CALL *)ptr__OWIH);
-          *(result__NWIH) = *(LIP_CALL__);
-        };
-        Self__VWIH=((__LIP_CALL *)result__NWIH);
-        Self__VWIH->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ=p__WWIH;
-        Self__VWIH->name__GAUE=n__XWIH;
-        Self__VWIH->argument__15TE=NULL;
-        result__YFFE=result__NWIH;
-      } else {
-        result__YFFE=readlip_expr_base__RGFE(Self__5Z4B);
-      };
-      p__LGFE=current_position__JXF();
-      result__VXLE=NULL;
-      ptr__WXLE=((__POINTER )(NULL));
-      typ_id__1XLE= 0;
-      sz__YXLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
-      if ((sz__YXLE ==  0)) {
-        result__VXLE=LIP_CALL__;
-      } else {
-        typ_id__1XLE=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__YXLE);
-        if ((typ_id__1XLE == (__INTEGER)(-  1))) {
-          a__SLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__TLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__YXLE + a__SLFH) & (__UINTEGER_32)(~ a__SLFH));
-          ptr_table__EXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__DXIH=((__POINTER )(NULL));
-          result__FXIH=((__POINTER *)ptr_table__EXIH)[ 0];
-          if ((result__FXIH == (void *)NULL)) {
-            result__FXIH=new_lab__MRJ(new_size__TLFH);
-            next__DXIH=(void *)((unsigned long)result__FXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TLFH)));
-            ((__POINTER *)next__DXIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__EXIH)[ 0]=next__DXIH;
-          } else {
-            next__DXIH=((__POINTER *)result__FXIH)[ 0];
-            if ((next__DXIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FXIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__TLFH <<  1)) <=  4096)) {
-                next__DXIH=(void *)((unsigned long)result__FXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TLFH)));
+            ptr__OYJH=result__AZJH;
+          };
+          result__NYJH=((__LIP_CALL *)ptr__OYJH);
+          *(result__NYJH) = *(LIP_CALL__);
+        };
+        Self__VYJH=((__LIP_CALL *)result__NYJH);
+        Self__VYJH->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ=p__WYJH;
+        Self__VYJH->name__JAUE=n__XYJH;
+        Self__VYJH->argument__45TE=NULL;
+        result__VDFE=result__NYJH;
+      } else {
+        result__VDFE=readlip_expr_base__OEFE(Self__H04B);
+      };
+      p__IEFE=current_position__RXF();
+      result__NTLE=NULL;
+      ptr__OTLE=((__POINTER )(NULL));
+      typ_id__TTLE= 0;
+      sz__QTLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__QTLE ==  0)) {
+        result__NTLE=LIP_CALL__;
+      } else {
+        typ_id__TTLE=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__QTLE);
+        if ((typ_id__TTLE == (__INTEGER)(-  1))) {
+          a__CNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__DNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__QTLE + a__CNGH) & (__UINTEGER_32)(~ a__CNGH));
+          ptr_table__EZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__DZJH=((__POINTER )(NULL));
+          result__FZJH=((__POINTER *)ptr_table__EZJH)[ 0];
+          if ((result__FZJH == (void *)NULL)) {
+            result__FZJH=new_lab__URJ(new_size__DNGH);
+            next__DZJH=(void *)((unsigned long)result__FZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNGH)));
+            ((__POINTER *)next__DZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EZJH)[ 0]=next__DZJH;
+          } else {
+            next__DZJH=((__POINTER *)result__FZJH)[ 0];
+            if ((next__DZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FZJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__DNGH <<  1)) <=  4096)) {
+                next__DZJH=(void *)((unsigned long)result__FZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNGH)));
               } else {
-                next__DXIH=new_lab__MRJ(new_size__TLFH);
+                next__DZJH=new_lab__URJ(new_size__DNGH);
               };
-              ((__POINTER *)next__DXIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EXIH)[ 0]=next__DXIH;
+              ((__POINTER *)next__DZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EZJH)[ 0]=next__DZJH;
             } else {
-              ((__POINTER *)result__FXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__FXIH=next__DXIH;
-            };
-          };
-          ptr__WXLE=result__FXIH;
-        } else {
-          t__XLFH=((__UINTEGER_32 )typ_id__1XLE);
-          a__WLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__MXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YXLE + a__WLFH) & (__UINTEGER_32)(~ a__WLFH));
-          ptr_table__JXIH=((__POINTER )(&(table_type[(t__XLFH)])));
-          lab_type__LXIH=(__UINTEGER_32)(t__XLFH |  1);
-          next__IXIH=((__POINTER )(NULL));
-          result__KXIH=((__POINTER *)ptr_table__JXIH)[ 0];
-          if ((result__KXIH == (void *)NULL)) {
-            result__KXIH=new_lab__MRJ(lab_type__LXIH);
-            next__IXIH=(void *)((unsigned long)result__KXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MXIH)));
-            ((__POINTER *)next__IXIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JXIH)[ 0]=next__IXIH;
-          } else {
-            next__IXIH=((__POINTER *)result__KXIH)[ 0];
-            if ((next__IXIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KXIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__MXIH <<  1)) <=  4096)) {
-                next__IXIH=(void *)((unsigned long)result__KXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MXIH)));
+              ((__POINTER *)result__FZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__FZJH=next__DZJH;
+            };
+          };
+          ptr__OTLE=result__FZJH;
+        } else {
+          t__HNGH=((__UINTEGER_32 )typ_id__TTLE);
+          a__GNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__MZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QTLE + a__GNGH) & (__UINTEGER_32)(~ a__GNGH));
+          ptr_table__JZJH=((__POINTER )(&(table_type[(t__HNGH)])));
+          lab_type__LZJH=(__UINTEGER_32)(t__HNGH |  1);
+          next__IZJH=((__POINTER )(NULL));
+          result__KZJH=((__POINTER *)ptr_table__JZJH)[ 0];
+          if ((result__KZJH == (void *)NULL)) {
+            result__KZJH=new_lab__URJ(lab_type__LZJH);
+            next__IZJH=(void *)((unsigned long)result__KZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZJH)));
+            ((__POINTER *)next__IZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JZJH)[ 0]=next__IZJH;
+          } else {
+            next__IZJH=((__POINTER *)result__KZJH)[ 0];
+            if ((next__IZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KZJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__MZJH <<  1)) <=  4096)) {
+                next__IZJH=(void *)((unsigned long)result__KZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZJH)));
               } else {
-                next__IXIH=new_lab__MRJ(lab_type__LXIH);
+                next__IZJH=new_lab__URJ(lab_type__LZJH);
               };
-              ((__POINTER *)next__IXIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JXIH)[ 0]=next__IXIH;
+              ((__POINTER *)next__IZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JZJH)[ 0]=next__IZJH;
             } else {
-              ((__POINTER *)result__KXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__KXIH=next__IXIH;
+              ((__POINTER *)result__KZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__KZJH=next__IZJH;
             };
           };
-          ptr__WXLE=result__KXIH;
+          ptr__OTLE=result__KZJH;
         };
-        result__VXLE=((__LIP_CALL *)ptr__WXLE);
-        *(result__VXLE) = *(LIP_CALL__);
+        result__NTLE=((__LIP_CALL *)ptr__OTLE);
+        *(result__NTLE) = *(LIP_CALL__);
       };
-      Self__QAWE=((__LIP_CALL *)result__VXLE);
-      Self__QAWE->parent_lip_code__314B.parent_itm_object__5DE.position__NDJ=p__LGFE;
-      Self__QAWE->name__GAUE=nam__E04B;
-      Self__QAWE->argument__15TE=result__YFFE;
-      result__B04B=result__VXLE;
+      Self__TAWE=((__LIP_CALL *)result__NTLE);
+      Self__TAWE->parent_lip_code__F24B.parent_itm_object__HEE.position__VDJ=p__IEFE;
+      Self__TAWE->name__JAUE=nam__M04B;
+      Self__TAWE->argument__45TE=result__VDFE;
+      result__J04B=result__NTLE;
     } else {
-      result__B04B=readlip_expr_base__RGFE(Self__5Z4B);
+      result__J04B=readlip_expr_base__OEFE(Self__H04B);
     };
   };
-  return(result__B04B);
+  return(result__J04B);
 }
 
-static void* readlip_expr_base__RGFE(__PARSER *Self__SGFE)
+static void* readlip_expr_base__OEFE(__PARSER *Self__PEFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  void *result__UGFE;
-  __POSITION pos__PLZG,pos__RLZG,pos__TLZG,p__KTRE;
-  void *result__LVPE;
-  __LIP_VALUE *result__5KSE,*Self__PUWE;
-  __POINTER ptr__ALSE,ptr_table__UXIH,next__TXIH,result__VXIH;
-  __POINTER ptr_table__ZXIH,next__YXIH,result__0XIH;
-  __INTEGER typ_id__FLSE;
-  __UINTEGER_32 sz__CLSE,a__0LFH,new_size__1LFH,t__5LFH,a__4LFH;
-  __UINTEGER_32 new_size__2XIH,lab_type__1XIH;
-  __BOOLEAN result__NXIH,result__QXIH,__tmp__YVPE,__tmp__IWPE;
-  __BOOLEAN result__FQQE,__tmp__3WPE;
-  __CHARACTER result__OXIH,result__RXIH;
-  result__UGFE=NULL;
-  result__NXIH=FALSE__;
-  if ((! read_space__3RD())) {
-    result__NXIH=FALSE__;
+  void *result__REFE;
+  __POSITION pos__4I0G,pos__AJ0G,pos__CJ0G,p__CTRE;
+  void *result__BTPE;
+  __LIP_VALUE *result__PKSE,*Self__SUWE;
+  __POINTER ptr__QKSE,ptr_table__UZJH,next__TZJH,result__VZJH;
+  __POINTER ptr_table__ZZJH,next__YZJH,result__0ZJH;
+  __INTEGER typ_id__VKSE;
+  __UINTEGER_32 sz__SKSE,a__KNGH,new_size__LNGH,t__PNGH,a__ONGH;
+  __UINTEGER_32 new_size__2ZJH,lab_type__1ZJH;
+  __BOOLEAN result__NZJH,result__QZJH,__tmp__OTPE,__tmp__4TPE;
+  __BOOLEAN result__WPQE,__tmp__TUPE;
+  __CHARACTER result__OZJH,result__RZJH;
+  result__REFE=NULL;
+  result__NZJH=FALSE__;
+  if ((! read_space__FSD())) {
+    result__NZJH=FALSE__;
   } else {
-    result__OXIH='\0';
-    if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-      result__OXIH=((__CHARACTER )(( 0)));
+    result__OZJH='\0';
+    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+      result__OZJH=((__CHARACTER )(( 0)));
     } else {
-      result__OXIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+      result__OZJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
     };
-    if ((result__OXIH == '(')) {
-      position__SBC=(__INTEGER)(position__SBC +  1);
-      result__NXIH=TRUE__;
+    if ((result__OZJH == '(')) {
+      position__0BC=(__INTEGER)(position__0BC +  1);
+      result__NZJH=TRUE__;
     };
   };
-  if (result__NXIH) {
-    result__UGFE=readlip_expr_operator__MOZB(Self__SGFE);
-    if (((void *)result__UGFE == (void *)NULL)) {
-      pos__PLZG=current_position__JXF();
-      put_error__text__KNG( 0,(&__string_240));
-      put_position__UOG(pos__PLZG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+  if (result__NZJH) {
+    result__REFE=readlip_expr_operator__UOZB(Self__PEFE);
+    if (((void *)result__REFE == (void *)NULL)) {
+      pos__4I0G=current_position__RXF();
+      put_error__text__SNG( 0,(&__string_238));
+      put_position__2OG(pos__4I0G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
-    result__QXIH=FALSE__;
-    if ((! read_space__3RD())) {
-      result__QXIH=FALSE__;
+    result__QZJH=FALSE__;
+    if ((! read_space__FSD())) {
+      result__QZJH=FALSE__;
     } else {
-      result__RXIH='\0';
-      if ((position__SBC > ((__STRING *)source__PBC)->count__WFC)) {
-        result__RXIH=((__CHARACTER )(( 0)));
+      result__RZJH='\0';
+      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
+        result__RZJH=((__CHARACTER )(( 0)));
       } else {
-        result__RXIH=((__CHARACTER *)((__STRING *)source__PBC)->storage__BCS)[(__INTEGER)(position__SBC -  1)];
+        result__RZJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
       };
-      if ((result__RXIH == ')')) {
-        position__SBC=(__INTEGER)(position__SBC +  1);
-        result__QXIH=TRUE__;
+      if ((result__RZJH == ')')) {
+        position__0BC=(__INTEGER)(position__0BC +  1);
+        result__QZJH=TRUE__;
       };
     };
-    if ((! result__QXIH)) {
-      pos__RLZG=current_position__JXF();
-      put_error__text__KNG( 2,(&__string_238));
-      put_position__UOG(pos__RLZG);
-      put_string__U1F(msg_err__PNG);
-      if ((type_error__ONG !=  2)) {
+    if ((! result__QZJH)) {
+      pos__AJ0G=current_position__RXF();
+      put_error__text__SNG( 2,(&__string_236));
+      put_position__2OG(pos__AJ0G);
+      put_string__21F(msg_err__XNG);
+      if ((type_error__WNG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__LVPE=NULL;
-    if (read_integer__A2P()) {
-      result__LVPE=get__0JSE(LIP_INTEGER__,((__INTEGER )last_integer__ZRO));
-      __tmp__YVPE=TRUE__;
+    result__BTPE=NULL;
+    if (read_integer__I2P()) {
+      result__BTPE=get__KJSE(LIP_INTEGER__,((__INTEGER )last_integer__BSO));
+      __tmp__OTPE=TRUE__;
     } else {
-      __tmp__YVPE=FALSE__;
+      __tmp__OTPE=FALSE__;
     };
-    if (__tmp__YVPE) {
-      __tmp__IWPE=TRUE__;
+    if (__tmp__OTPE) {
+      __tmp__4TPE=TRUE__;
     } else {
-      result__FQQE=read_string__LFQ();
-      if (result__FQQE) {
-        result__LVPE=get__RBFF(LIP_STRING__,last_string__I0C);
+      result__WPQE=read_string__TFQ();
+      if (result__WPQE) {
+        result__BTPE=get__TMFF(LIP_STRING__,last_string__Q0C);
       };
-      __tmp__IWPE=result__FQQE;
+      __tmp__4TPE=result__WPQE;
     };
-    if ((! __tmp__IWPE)) {
-      if (read_cap_identifier__SZJ()) {
-        if (((void *)last_string__I0C == (void *)(&__string_42))) {
-          result__LVPE=true__GZKF;
-          __tmp__3WPE=TRUE__;
+    if ((! __tmp__4TPE)) {
+      if (read_cap_identifier__0ZJ()) {
+        if (((void *)last_string__Q0C == (void *)(&__string_42))) {
+          result__BTPE=true__SELF;
+          __tmp__TUPE=TRUE__;
         } else {
-          __tmp__3WPE=FALSE__;
+          __tmp__TUPE=FALSE__;
         };
-        if ((! __tmp__3WPE)) {
-          if (((void *)last_string__I0C == (void *)(&__string_43))) {
-            result__LVPE=LIP_BOOLEAN__;
+        if ((! __tmp__TUPE)) {
+          if (((void *)last_string__Q0C == (void *)(&__string_43))) {
+            result__BTPE=LIP_BOOLEAN__;
           } else {
-            pos__TLZG=current_position__JXF();
-            put_error__text__KNG( 0,(&__string_333));
-            put_position__UOG(pos__TLZG);
-            put_string__U1F(msg_err__PNG);
-            if ((type_error__ONG !=  2)) {
+            pos__CJ0G=current_position__RXF();
+            put_error__text__SNG( 0,(&__string_332));
+            put_position__2OG(pos__CJ0G);
+            put_string__21F(msg_err__XNG);
+            if ((type_error__WNG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    if (((void *)result__LVPE != (void *)NULL)) {
-      p__KTRE=current_position__JXF();
-      result__5KSE=NULL;
-      ptr__ALSE=((__POINTER )(NULL));
-      typ_id__FLSE= 0;
-      sz__CLSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
-      if ((sz__CLSE ==  0)) {
-        result__5KSE=LIP_VALUE__;
-      } else {
-        typ_id__FLSE=-1;
-        clone_allocation_size__3SB=(__UINTEGER_32)(clone_allocation_size__3SB + sz__CLSE);
-        if ((typ_id__FLSE == (__INTEGER)(-  1))) {
-          a__0LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__1LFH=(__UINTEGER_32)((__UINTEGER_32)(sz__CLSE + a__0LFH) & (__UINTEGER_32)(~ a__0LFH));
-          ptr_table__UXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1LFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
-          next__TXIH=((__POINTER )(NULL));
-          result__VXIH=((__POINTER *)ptr_table__UXIH)[ 0];
-          if ((result__VXIH == (void *)NULL)) {
-            result__VXIH=new_lab__MRJ(new_size__1LFH);
-            next__TXIH=(void *)((unsigned long)result__VXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LFH)));
-            ((__POINTER *)next__TXIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UXIH)[ 0]=next__TXIH;
-          } else {
-            next__TXIH=((__POINTER *)result__VXIH)[ 0];
-            if ((next__TXIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VXIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__1LFH <<  1)) <=  4096)) {
-                next__TXIH=(void *)((unsigned long)result__VXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LFH)));
+    if (((void *)result__BTPE != (void *)NULL)) {
+      p__CTRE=current_position__RXF();
+      result__PKSE=NULL;
+      ptr__QKSE=((__POINTER )(NULL));
+      typ_id__VKSE= 0;
+      sz__SKSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__SKSE ==  0)) {
+        result__PKSE=LIP_VALUE__;
+      } else {
+        typ_id__VKSE=-1;
+        clone_allocation_size__FTB=(__UINTEGER_32)(clone_allocation_size__FTB + sz__SKSE);
+        if ((typ_id__VKSE == (__INTEGER)(-  1))) {
+          a__KNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKSE + a__KNGH) & (__UINTEGER_32)(~ a__KNGH));
+          ptr_table__UZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__TZJH=((__POINTER )(NULL));
+          result__VZJH=((__POINTER *)ptr_table__UZJH)[ 0];
+          if ((result__VZJH == (void *)NULL)) {
+            result__VZJH=new_lab__URJ(new_size__LNGH);
+            next__TZJH=(void *)((unsigned long)result__VZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNGH)));
+            ((__POINTER *)next__TZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UZJH)[ 0]=next__TZJH;
+          } else {
+            next__TZJH=((__POINTER *)result__VZJH)[ 0];
+            if ((next__TZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VZJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__LNGH <<  1)) <=  4096)) {
+                next__TZJH=(void *)((unsigned long)result__VZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LNGH)));
               } else {
-                next__TXIH=new_lab__MRJ(new_size__1LFH);
+                next__TZJH=new_lab__URJ(new_size__LNGH);
               };
-              ((__POINTER *)next__TXIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UXIH)[ 0]=next__TXIH;
+              ((__POINTER *)next__TZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UZJH)[ 0]=next__TZJH;
             } else {
-              ((__POINTER *)result__VXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VXIH=next__TXIH;
-            };
-          };
-          ptr__ALSE=result__VXIH;
-        } else {
-          t__5LFH=((__UINTEGER_32 )typ_id__FLSE);
-          a__4LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
-          new_size__2XIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CLSE + a__4LFH) & (__UINTEGER_32)(~ a__4LFH));
-          ptr_table__ZXIH=((__POINTER )(&(table_type[(t__5LFH)])));
-          lab_type__1XIH=(__UINTEGER_32)(t__5LFH |  1);
-          next__YXIH=((__POINTER )(NULL));
-          result__0XIH=((__POINTER *)ptr_table__ZXIH)[ 0];
-          if ((result__0XIH == (void *)NULL)) {
-            result__0XIH=new_lab__MRJ(lab_type__1XIH);
-            next__YXIH=(void *)((unsigned long)result__0XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XIH)));
-            ((__POINTER *)next__YXIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZXIH)[ 0]=next__YXIH;
-          } else {
-            next__YXIH=((__POINTER *)result__0XIH)[ 0];
-            if ((next__YXIH == (void *)NULL)) {
-              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0XIH - (unsigned long)begin_memory__PVH)))) &  4095) + (__UINTEGER_32)(new_size__2XIH <<  1)) <=  4096)) {
-                next__YXIH=(void *)((unsigned long)result__0XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XIH)));
+              ((__POINTER *)result__VZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VZJH=next__TZJH;
+            };
+          };
+          ptr__QKSE=result__VZJH;
+        } else {
+          t__PNGH=((__UINTEGER_32 )typ_id__VKSE);
+          a__ONGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__2ZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SKSE + a__ONGH) & (__UINTEGER_32)(~ a__ONGH));
+          ptr_table__ZZJH=((__POINTER )(&(table_type[(t__PNGH)])));
+          lab_type__1ZJH=(__UINTEGER_32)(t__PNGH |  1);
+          next__YZJH=((__POINTER )(NULL));
+          result__0ZJH=((__POINTER *)ptr_table__ZZJH)[ 0];
+          if ((result__0ZJH == (void *)NULL)) {
+            result__0ZJH=new_lab__URJ(lab_type__1ZJH);
+            next__YZJH=(void *)((unsigned long)result__0ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2ZJH)));
+            ((__POINTER *)next__YZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZZJH)[ 0]=next__YZJH;
+          } else {
+            next__YZJH=((__POINTER *)result__0ZJH)[ 0];
+            if ((next__YZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0ZJH - (unsigned long)begin_memory__XVH)))) &  4095) + (__UINTEGER_32)(new_size__2ZJH <<  1)) <=  4096)) {
+                next__YZJH=(void *)((unsigned long)result__0ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2ZJH)));
               } else {
-                next__YXIH=new_lab__MRJ(lab_type__1XIH);
+                next__YZJH=new_lab__URJ(lab_type__1ZJH);
               };
-              ((__POINTER *)next__YXIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZXIH)[ 0]=next__YXIH;
+              ((__POINTER *)next__YZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZZJH)[ 0]=next__YZJH;
             } else {
-              ((__POINTER *)result__0XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__0XIH=next__YXIH;
+              ((__POINTER *)result__0ZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0ZJH=next__YZJH;
             };
           };
-          ptr__ALSE=result__0XIH;
+          ptr__QKSE=result__0ZJH;
         };
-        result__5KSE=((__LIP_VALUE *)ptr__ALSE);
-        *(result__5KSE) = *(LIP_VALUE__);
+        result__PKSE=((__LIP_VALUE *)ptr__QKSE);
+        *(result__PKSE) = *(LIP_VALUE__);
       };
-      Self__PUWE=((__LIP_VALUE *)result__5KSE);
-      Self__PUWE->parent_lip_code__2HFE.parent_itm_object__5DE.position__NDJ=p__KTRE;
-      Self__PUWE->value__FKUE=result__LVPE;
-      result__UGFE=result__5KSE;
+      Self__SUWE=((__LIP_VALUE *)result__PKSE);
+      Self__SUWE->parent_lip_code__ZFFE.parent_itm_object__HEE.position__VDJ=p__CTRE;
+      Self__SUWE->value__IKUE=result__BTPE;
+      result__REFE=result__PKSE;
     };
   };
-  return(result__UGFE);
+  return(result__REFE);
 }
 
 //==========================//
diff --git a/lib2/base/false.li b/lib2/base/false.li
index 2bf24bd..dfca9fb 100644
--- a/lib2/base/false.li
+++ b/lib2/base/false.li
@@ -32,7 +32,7 @@ Section Header
   
 Section Inherit
   
-  - parent_boolean:BOOLEAN := BOOLEAN;
+  - inherit_boolean:BOOLEAN := BOOLEAN;
   
 Section Public
   
diff --git a/lib2/base/true.li b/lib2/base/true.li
index efcc517..1581ae1 100644
--- a/lib2/base/true.li
+++ b/lib2/base/true.li
@@ -32,7 +32,7 @@ Section Header
   
 Section Inherit
   
-  - parent_boolean:BOOLEAN := BOOLEAN;
+  - inherit_boolean:BOOLEAN := BOOLEAN;
   
 Section Public
   
diff --git a/lib2/collection/low_level/collection.li b/lib2/collection/low_level/collection.li
index e441245..ce4f168 100644
--- a/lib2/collection/low_level/collection.li
+++ b/lib2/collection/low_level/collection.li
@@ -374,7 +374,23 @@ Section Public
   // `==' for comparison.
   // Answer `upper + 1' when `element' is not inside.
   //
-  // See also `fast_first_index_of', `index_of', `last_index_of', 
+  // * Parameter:
+  //    `element' : element to search.
+  // * Require: `element' not null.
+  // * Ensure: Very good fonction 
+  //
+  // * See: `fast_first_index_of', `index_of start', `last_index_of', 
+  // `reverse_index_of'.
+  // 
+  // * Description en Francais: Donne l'index de la premiere occurence de `element' 
+  // en utilisant `==' pour la comparaison.
+  // Renvoi `upper + 1' lorsque `element' est absent.
+  //
+  // * Parametre: 
+  //    `element' : L'element que l'on veut chercher.
+  // * Necessite: `element' pas null.
+  // * Garantie: c'est une bonne fonction :-)
+  // * Voir: `fast_first_index_of', `index_of', `last_index_of', 
   // `reverse_index_of'.
   ( 
     deferred;
diff --git a/shorter/javadoc.li b/shorter/javadoc.li
index 7a63fa2..177a150 100644
--- a/shorter/javadoc.li
+++ b/shorter/javadoc.li
@@ -66,8 +66,8 @@
   
   - table_item := "<tr class=\"TableRowColor\" bgcolor=\"white\"><td>" + token + "</td></tr>";
   
-  - table_slot_name := "<code><b><a href=\"#"+token+"\">" + token + "</a></b></code><br>";
-  - table_slot_comment := token;
+  - table_slot_name := "<code><dt><b><a href=\"#"+token+"\">" + token + "</a></b></code>";
+  - table_slot_comment := "<dd>" + token;
   
   - table_end := "</tbody></table>&nbsp;";
   
@@ -78,6 +78,20 @@
   - subsub_title := "<dt><b><br>" + token + "</b></dt>";
   
   - prototype_path := "<dd><code>" + token + "</code></dd>";
+
+  - identifier := "<em><b><font color=\"#000000\">" + token + "</font></em></b>";
+  
+  - identifier_slot := "<code><b><a href=\"#"+token+"\">" + token + "</a></b></code>";
+  
+  - parameter := "<dd>" + token + "</dd>";
+  - require := "<dd>" + token + "</dd>";
+  - ensure := "<dd>" + token + "</dd>";
+  - see := "<dd>" + token + "</dd>";
+  
+  - description_en_francais := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";
+  - necessite := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";
+  - garantie := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";
+  - voir := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";  
   
   //
   // Recursive Option.
diff --git a/src/any.li b/src/any.li
index 2da66e1..da11b11 100644
--- a/src/any.li
+++ b/src/any.li
@@ -325,6 +325,8 @@ Section Public
   
   - string_tmp2:STRING := STRING.create 256;
   
+  - string_tmp3:STRING := STRING.create 256;
+  
   //
   // Path directory and command front end.
   //
diff --git a/src/shorter_any/any_option.li b/src/shorter_any/any_option.li
index 7b65afb..f806b4c 100644
--- a/src/shorter_any/any_option.li
+++ b/src/shorter_any/any_option.li
@@ -44,13 +44,15 @@ Section Public
   - put tok:ABSTRACT_STRING to buf:STRING like key:STRING_CONSTANT <-
   ( + lst:LINKED_LIST[STRING_CONSTANT];
     
-    lst := PARSER.short_dico.fast_reference_at key;
-    (lst != NULL).if {
-      (lst.lower).to (lst.upper) do { j:INTEGER;
-        (lst.item j = NULL).if {          
-          buf.append tok;
-        } else {
-          buf.append (lst.item j);
+    (key != NULL).if {
+      lst := PARSER.short_dico.fast_reference_at key;
+      (lst != NULL).if {
+        (lst.lower).to (lst.upper) do { j:INTEGER;
+          (lst.item j = NULL).if {          
+            buf.append tok;
+          } else {
+            buf.append (lst.item j);
+          };
         };
       };
     };
diff --git a/src/tools/alias_str.li b/src/tools/alias_str.li
index 23ee3fa..d604789 100644
--- a/src/tools/alias_str.li
+++ b/src/tools/alias_str.li
@@ -207,6 +207,8 @@ Section Public
   - short_external    :STRING_CONSTANT := "external";
   - short_local       :STRING_CONSTANT := "local";
   - short_warning     :STRING_CONSTANT := "warning";
+  - short_identifier  :STRING_CONSTANT := "identifier";
+  - short_identifier_slot:STRING_CONSTANT := "identifier_slot";
 
   - short_title       :STRING_CONSTANT := "title";
   - short_table_begin :STRING_CONSTANT := "table_begin";
@@ -483,6 +485,8 @@ Section Public
     list.add short_external;
     list.add short_local;
     list.add short_warning;
+    list.add short_identifier;
+    list.add short_identifier_slot;
     
     list.add short_title;
     list.add short_table_begin;
diff --git a/src/type/prototype.li b/src/type/prototype.li
index d891016..4f1a76d 100644
--- a/src/type/prototype.li
+++ b/src/type/prototype.li
@@ -512,7 +512,9 @@ Section PROTOTYPE
         };
         string_tmp2.clear;        
         get_all_comment_slot (s.name) in string_tmp2;
-        put string_tmp2 to string_tmp like (ALIAS_STR.short_table_slot_comment);
+        string_tmp3.clear;
+        shorter_comment string_tmp2 in string_tmp3 light TRUE;        
+        put string_tmp3 to string_tmp like (ALIAS_STR.short_table_slot_comment);
         put string_tmp to buf like (ALIAS_STR.short_table_item);
       };     
     };    
@@ -550,18 +552,10 @@ Section PROTOTYPE
         //
         put "Profile:" to buf like (ALIAS_STR.short_subsub_title);
         s.shorter_profile_in buf;
-        //
-        put "Description:" to buf like (ALIAS_STR.short_subsub_title);
+        //                
         string_tmp.clear;
         get_all_comment_slot (s.name) in string_tmp;        
-        put string_tmp to buf like (ALIAS_STR.short_comment_slot_line);
-        //
-        put "Parameters:" to buf like (ALIAS_STR.short_subsub_title);
-        //
-        put "Contracts:" to buf like (ALIAS_STR.short_subsub_title);
-        //
-        put "See also:" to buf like (ALIAS_STR.short_subsub_title);        
-        //
+        shorter_comment string_tmp in buf light FALSE;        
       };      
     };
   );
@@ -597,4 +591,122 @@ Section PROTOTYPE
     };
   );
   
-  - list_tmp:FAST_ARRAY[ITM_SLOT] := FAST_ARRAY[ITM_SLOT].create_with_capacity 256;
\ No newline at end of file
+  - list_tmp:FAST_ARRAY[ITM_SLOT] := FAST_ARRAY[ITM_SLOT].create_with_capacity 256;
+  
+  - str_tmp:STRING := STRING.create 512;
+  - str_tmp2:STRING := STRING.create 64;
+  - str_tmp3:STRING := STRING.create 64;
+  
+  - shorter_comment str:STRING in buf:STRING light is_light:BOOLEAN <-
+  ( + cur:INTEGER;
+    + stat,old_stat:INTEGER;
+    + car:CHARACTER;
+    + i:INTEGER;
+    + lst:LINKED_LIST[STRING_CONSTANT];
+    + code_balise:STRING_CONSTANT;
+    
+    cur := str.lower;
+    str_tmp.clear;
+    code_balise := ALIAS_STR.short_comment_slot_line;
+    {cur <= str.upper}.while_do {      
+      car := str.item cur;
+      (stat)
+      .when 0 then {        
+        // Begin.
+        (car = '*').if {
+          (str_tmp.count > 1).if {
+            (is_light).if {
+              buf.append str_tmp;
+              cur := str.upper + 1;
+            } else {              
+              put "Description:" to buf like (ALIAS_STR.short_subsub_title);
+              put str_tmp to buf like code_balise;
+            };
+          };
+          str_tmp.clear;
+          stat := 1;
+        }.elseif {car = '`'} then {
+          old_stat := stat;
+          stat := 2;          
+          str_tmp2.clear;
+        } else {
+          str_tmp.add_last car;
+        };
+      }
+      .when 1 then {
+        // Begin slot.
+        (car.to_lower.in_range 'a' to 'z').if {        
+          str_tmp.add_last (car.to_lower);
+        }.elseif {(car = ' ') && {!str_tmp.is_empty}} then {
+          str_tmp.add_last '_';          
+        }.elseif {car = ':'} then {
+          (str_tmp.count != 0).if {            
+            code_balise := ALIAS_STR.get str_tmp;
+            lst := PARSER.short_dico.fast_reference_at code_balise;
+            (lst = NULL).if {                          
+              code_balise := NULL;
+            } else {
+              str_tmp.replace_all '_' with ' ';
+              str_tmp.add_last ':';
+              str_tmp.put (str_tmp.first.to_upper) to 1;
+              put str_tmp to buf like (ALIAS_STR.short_subsub_title);
+            };
+          };
+          str_tmp.clear;
+          stat := 3;
+        };
+      }
+      .when 2 then {
+        // Begin ref.
+        (car = '\'').if {
+          (code_balise != NULL).if {
+            i := list_tmp.lower;
+            {
+              (i <= list_tmp.upper) && {
+                str_tmp3.clear;
+                list_tmp.item i.pretty_name_in str_tmp3;
+                ! (str_tmp3 == str_tmp2)
+              }
+            }.while_do {
+              i := i + 1;
+            };
+            (i <= list_tmp.upper).if {
+              put str_tmp2 to str_tmp like (ALIAS_STR.short_identifier_slot);
+            } else {
+              put str_tmp2 to str_tmp like (ALIAS_STR.short_identifier);
+            };
+          };          
+          stat := old_stat;
+        } else {
+          str_tmp2.add_last car;
+        };
+      }
+      .when 3 then {
+        // Read slot.
+        (car = '*').if {
+          (str_tmp.count > 1).if {            
+            put str_tmp to buf like code_balise;
+          };
+          str_tmp.clear;
+          stat := 1;
+        }.elseif {car = '`'} then {
+          old_stat := stat;
+          stat := 2;          
+          str_tmp2.clear;
+        } else {
+          str_tmp.add_last car;
+        };        
+      };
+      cur := cur + 1;
+    };
+    (str_tmp.count > 1).if {            
+      (is_light).if {
+        buf.append str_tmp;
+      } else {
+        (stat = 0).if {
+          put "Description:" to buf like (ALIAS_STR.short_subsub_title);
+        };
+        put str_tmp to buf like code_balise;
+      };
+    };
+  );
\ No newline at end of file

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list