[SCM] Lisaac compiler branch, master, updated. 53ef0b4ba0591ccaad1f2cbe333685e7cce8489f

Benoit Sonntag sonntag at icps.u-strasbg.fr
Fri Jul 31 01:31:59 UTC 2009


The following commit has been merged in the master branch:
commit 53ef0b4ba0591ccaad1f2cbe333685e7cce8489f
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Fri Jul 31 03:31:49 2009 +0200

    Shorter PA readycd ..cd ..

diff --git a/bin/shorter.c b/bin/shorter.c
index 65fe967..1fa480e 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__4FC;
-  __INTEGER capacity__ACS;
-  __CHARACTER *storage__JCS;
+  __INTEGER count__EGC;
+  __INTEGER capacity__T3R;
+  __CHARACTER *storage__23R;
 };
 __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__OKC;
-  __INTEGER capacity__UGT;
-  void **storage__5GT;
+  __INTEGER upper__UKC;
+  __INTEGER capacity__HCT;
+  void **storage__SCT;
 };
 __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__LKC;
+  __ARRAYED_COLLECTIONoSTRINGo parent_arrayed_collection__RKC;
 };
 __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__SIV;
-  __INTEGER capacity__HOV;
-  void **storage__ZMV;
+  __INTEGER upper__3DV;
+  __INTEGER capacity__SJV;
+  void **storage__EIV;
 };
 __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__BYC;
+  __ARRAYED_COLLECTIONoITM_TYPE_MONOo parent_arrayed_collection__EYC;
 };
 __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__A3T;
-  void *item__T3T;
-  void *next__L3T;
+  void *key__TYT;
+  void *item__GZT;
+  void *next__4YT;
 };
 __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__P2T;
-  __INTEGER count__UFZ;
-  void **buckets__U2T;
+  __INTEGER capacity__CYT;
+  __INTEGER count__5AZ;
+  void **buckets__HYT;
 };
 __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__3QO;
+  __CHARACTER *storage__QMO;
 };
 __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__DAPD;
-  __INTEGER capacity__4BPD;
-  void **storage__ZCPD;
+  __INTEGER upper__R4OD;
+  __INTEGER capacity__MAPD;
+  void **storage__HBPD;
 };
 __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__P5I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__L2I;
 };
 __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__PTB;
-  volatile __UINTEGER_32 map_size_and_id__QTB;
-  void *map_next_free__RTB;
-  void *map_previous_free__STB;
+  volatile __UINTEGER_32 map_previous_linear__XTB;
+  volatile __UINTEGER_32 map_size_and_id__YTB;
+  void *map_next_free__ZTB;
+  void *map_previous_free__0TB;
 } __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__SZR;
-  void *next__4ZR;
+  void *item__FVR;
+  void *next__RVR;
 };
 __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__BZR;
-  __INTEGER count__H0R;
-  void **buckets__GZR;
+  __INTEGER capacity__UUR;
+  __INTEGER count__0VR;
+  void **buckets__ZUR;
 };
 __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__VDJ;
+  __POSITION position__RAJ;
 };
 __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__JEU;
+  __CHARACTER style__25T;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -255,17 +255,19 @@ __NAMED NAMED_;
 typedef struct PROTOTYPE_struct __PROTOTYPE;
 struct PROTOTYPE_struct {
   __NAMED parent_named__5;
-  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;
+  void *source__3BC;
+  void *last_slot__11C;
+  void *type_style__E3C;
+  void *shortname__TEE;
+  void *default_value__BRE;
+  void *type_c__2SE;
+  __INTEGER index__DKG;
+  void *filename__CNG;
+  void *first_slot__XCZB;
+  void *comment_header__U2QC;
+  void *comment_slot__ZPTC;
+  void *idf_generic_list__CJE;
+  void *slot_list__XQS;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -277,8 +279,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__B3R;
-  void *next__M3R;
+  void *key__UYR;
+  void *next__5YR;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
@@ -287,9 +289,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__Q2R;
-  __INTEGER count__V3R;
-  void **buckets__V2R;
+  __INTEGER capacity__DYR;
+  __INTEGER count__IZR;
+  void **buckets__IYR;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -301,7 +303,7 @@ typedef unsigned char __UINTEGER_8;
 #define __TYPE_FULL__ 17
 typedef struct TYPE_FULL_struct __TYPE_FULL;
 struct TYPE_FULL_struct {
-  __UINTEGER_8 flag__AGS;
+  __UINTEGER_8 flag__TBS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -319,9 +321,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__04R;
-  __INTEGER capacity__24R;
-  void **storage__Y5R;
+  __INTEGER upper__N0R;
+  __INTEGER capacity__P0R;
+  void **storage__L1R;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
@@ -330,7 +332,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__0AB;
+  __ARRAYED_COLLECTIONoTYPE_IDo parent_arrayed_collection__ABB;
 };
 __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 #define FAST_ARRAYoTYPE_IDo__ (&FAST_ARRAYoTYPE_IDo_)
@@ -340,7 +342,7 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__3NT;
+  void *name__QJT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -349,7 +351,7 @@ __ENTRY ENTRY_;
 #define __ENTRY_UNIX__ 21
 typedef struct ENTRY_UNIX_struct __ENTRY_UNIX;
 struct ENTRY_UNIX_struct {
-  __ENTRY parent_entry__AFD;
+  __ENTRY parent_entry__FFD;
 };
 __ENTRY_UNIX ENTRY_UNIX_;
 #define ENTRY_UNIX__ (&ENTRY_UNIX_)
@@ -358,7 +360,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__QFRD;
+  void *list__4DRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -368,8 +370,8 @@ __DIRECTORY DIRECTORY_;
 typedef struct DIRECTORY_UNIX_struct __DIRECTORY_UNIX;
 struct DIRECTORY_UNIX_struct {
   unsigned long __id;
-  __ENTRY_UNIX parent_entry_unix__BFD;
-  __DIRECTORY parent_directory__CFD;
+  __ENTRY_UNIX parent_entry_unix__GFD;
+  __DIRECTORY parent_directory__HFD;
 };
 __DIRECTORY_UNIX DIRECTORY_UNIX_={__DIRECTORY_UNIX__};
 #define DIRECTORY_UNIX__ (&DIRECTORY_UNIX_)
@@ -378,9 +380,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__TDT;
-  void *next__4DT;
-  void *item__PY3;
+  void *key__G5S;
+  void *next__R5S;
+  void *item__0T3;
 };
 __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,25 +391,30 @@ __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__CDT;
-  __INTEGER count__QMY;
-  void **buckets__HDT;
+  __INTEGER capacity__V4S;
+  __INTEGER count__1HY;
+  void **buckets__04S;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
 
+// INTEGER_8
+typedef signed char __INTEGER_8;
+
 // ITM_SLOT
 #define __ITM_SLOT__ 8
 typedef struct ITM_SLOT_struct __ITM_SLOT;
 struct ITM_SLOT_struct {
   unsigned long __id;
-  __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;
+  __NAMED parent_named__15;
+  void *id_section__F2C;
+  void *comment__RYOB;
+  void *result_type__N2FC;
+  void *next__FFHC;
+  void *comment_chapter__5YHC;
+  __CHARACTER affect__23FC;
+  void *argument_list__3BHC;
+  __INTEGER_8 stat_shorter__XKTD;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -417,9 +424,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__WU5B;
-  __INTEGER priority_and_level__S0HC;
-  void *pretty_name__30HC;
+  __ITM_SLOT parent_itm_slot__VR5B;
+  __INTEGER priority_and_level__BYHC;
+  void *pretty_name__MYHC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
@@ -428,8 +435,8 @@ __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define __SECTION___ 25
 typedef struct SECTION__struct __SECTION_;
 struct SECTION__struct {
-  void *name__KZDC;
-  void *type_list__ZXFC;
+  void *name__ZWDC;
+  void *type_list__IVFC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
@@ -438,9 +445,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__Z1S;
-  void *item__CTOB;
-  void *next__F2S;
+  void *key__MXS;
+  void *item__OOOB;
+  void *next__YXS;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -449,9 +456,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__I1S;
-  __INTEGER count__O2S;
-  void **buckets__N1S;
+  __INTEGER capacity__1WS;
+  __INTEGER count__BYS;
+  void **buckets__AXS;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -460,7 +467,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__HDD;
+  __INTEGER upper__MDD;
 };
 __LINKED_COLLECTIONoSTRING_CONSTANTo LINKED_COLLECTIONoSTRING_CONSTANTo_;
 #define LINKED_COLLECTIONoSTRING_CONSTANTo__ (&LINKED_COLLECTIONoSTRING_CONSTANTo_)
@@ -470,10 +477,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__WUEC;
-  void *first_link__MUEC;
-  void *last_link__VUEC;
-  void *mem_lnk__YUEC;
+  __INTEGER mem_idx__FSEC;
+  void *first_link__1REC;
+  void *last_link__ESEC;
+  void *mem_lnk__HSEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -491,7 +498,7 @@ __PARSER PARSER_;
 #define __ITM_ARGUMENT__ 31
 typedef struct ITM_ARGUMENT_struct __ITM_ARGUMENT;
 struct ITM_ARGUMENT_struct {
-  __ITM_OBJECT parent_itm_code__04M;
+  __ITM_OBJECT parent_itm_code__N0M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -500,9 +507,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__GAHC;
-  __INTEGER capacity__IAHC;
-  void **storage__EBHC;
+  __INTEGER upper__V3GC;
+  __INTEGER capacity__X3GC;
+  void **storage__T4GC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -511,7 +518,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__NCZB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__U4YB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -521,7 +528,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__IKP;
+  void *list_type__1FP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -531,7 +538,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__DKV;
+  void *value_list__OFV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -541,7 +548,7 @@ __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 typedef struct ITM_RESULT_struct __ITM_RESULT;
 struct ITM_RESULT_struct {
   unsigned long __id;
-  void *value__ULFC;
+  void *value__DJFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -550,9 +557,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__XBGC;
-  void *item__KCGC;
-  void *next__CCGC;
+  void *key__G5FC;
+  void *item__Z5FC;
+  void *next__R5FC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -561,9 +568,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__E5BC;
-  __INTEGER count__WPGC;
-  void **buckets__LBGC;
+  __INTEGER capacity__L2BC;
+  __INTEGER count__FNGC;
+  void **buckets__04FC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
@@ -573,8 +580,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__4MN;
-  void *type_result__INN;
+  void *type_argument__RIN;
+  void *type_result__1IN;
 };
 __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 #define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
@@ -584,7 +591,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__SYP;
+  void *name__FUP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
@@ -594,8 +601,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__JSN;
-  void *style__1YP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__2NN;
+  void *style__OUP;
 };
 __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 #define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
@@ -605,8 +612,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__KSN;
-  void *list_type__FZP;
+  __ITM_TYPE_STYLE parent_itm_type_style__3NN;
+  void *list_type__YUP;
 };
 __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 #define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
@@ -616,9 +623,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__BIHB;
-  void *name__D1HC;
-  void *type__E1HC;
+  __ITM_ARGUMENT parent_itm_argument__NDHB;
+  void *name__SYHC;
+  void *type__TYHC;
 };
 __ITM_ARG ITM_ARG_={__ITM_ARG__};
 #define ITM_ARG__ (&ITM_ARG_)
@@ -628,9 +635,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__ABFE;
-  void *type__QNPF;
-  void *name__PNPF;
+  __ITM_ARGUMENT parent_itm_argument__R5EE;
+  void *type__MYPF;
+  void *name__LYPF;
 };
 __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 #define ITM_ARGS__ (&ITM_ARGS_)
@@ -640,7 +647,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__FEE;
+  __ITM_TYPE_SIMPLE parent_itm_type__LAE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -650,8 +657,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__EDF;
-  __POINTER stream__MJRD;
+  __ENTRY_UNIX parent_entry_unix__05E;
+  __POINTER stream__0HRD;
 };
 __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define FILE_UNIX__ (&FILE_UNIX_)
@@ -660,9 +667,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__4BBC;
-  __INTEGER capacity__ACBC;
-  void **storage__2CBC;
+  __INTEGER upper__G5AC;
+  __INTEGER capacity__I5AC;
+  void **storage__EABC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -671,7 +678,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__1ME;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__BJE;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -680,7 +687,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__HEE;
+  __ITM_OBJECT parent_itm_object__NAE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
@@ -690,9 +697,9 @@ __LIP_CODE LIP_CODE_;
 typedef struct LIP_AFFECT_struct __LIP_AFFECT;
 struct LIP_AFFECT_struct {
   unsigned long __id;
-  __LIP_CODE parent_lip_code__RUPB;
-  void *name__4GFC;
-  void *value__QHFC;
+  __LIP_CODE parent_lip_code__PRPB;
+  void *name__NEFC;
+  void *value__5EFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
@@ -702,9 +709,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__F24B;
-  void *argument__45TE;
-  void *name__JAUE;
+  __LIP_CODE parent_lip_code__SY4B;
+  void *argument__ZJUE;
+  void *name__EKUE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
@@ -714,10 +721,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__GPYC;
-  void *condition__IDQD;
-  void *then__4DQD;
-  void *else__VEQD;
+  __LIP_CODE parent_lip_code__QOYC;
+  void *condition__WBQD;
+  void *then__MCQD;
+  void *else__DDQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
@@ -727,8 +734,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__YPYC;
-  void *message__NEUE;
+  __LIP_CODE parent_lip_code__CPYC;
+  void *message__IOUE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -737,8 +744,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__DFV;
-  void *next__OFV;
+  void *item__OAV;
+  void *next__ZAV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -747,9 +754,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__SIT;
-  __INTEGER count__AIY;
-  void **buckets__XEV;
+  __INTEGER capacity__FET;
+  __INTEGER count__LDY;
+  void **buckets__CAV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
@@ -758,7 +765,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__5DE;
+  __ITM_OBJECT parent_itm_object__FAE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
@@ -767,9 +774,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__EIL;
-  __INTEGER capacity__CYT;
-  void **storage__NYT;
+  __INTEGER upper__MEL;
+  __INTEGER capacity__VTT;
+  void **storage__AUT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
@@ -778,7 +785,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__ZTF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__5QF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
@@ -787,9 +794,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__EEQD;
-  __INTEGER capacity__DQTD;
-  void **storage__OQTD;
+  __INTEGER upper__SCQD;
+  __INTEGER capacity__UQTD;
+  void **storage__5QTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
@@ -798,7 +805,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__VLYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__5KYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
@@ -816,8 +823,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__FVRD;
-  void **buckets__KVRD;
+  __INTEGER capacity__TTRD;
+  void **buckets__YTRD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
@@ -827,10 +834,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__EQZB;
-  void *left__UZQD;
-  void *right__XZQD;
-  __CHARACTER operator__0ZQD;
+  __LIP_CODE parent_lip_code__RMZB;
+  void *left__CYQD;
+  void *right__FYQD;
+  __CHARACTER operator__IYQD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
@@ -840,9 +847,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__T14B;
-  void *value__R2QD;
-  __CHARACTER operator__U2QD;
+  __LIP_CODE parent_lip_code__AY4B;
+  void *value__50QD;
+  __CHARACTER operator__C1QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
@@ -852,7 +859,7 @@ __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 typedef struct LIP_INTEGER_struct __LIP_INTEGER;
 struct LIP_INTEGER_struct {
   unsigned long __id;
-  __INTEGER value__3Y3F;
+  __INTEGER value__ZD4F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
@@ -862,7 +869,7 @@ __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 typedef struct LIP_STRING_struct __LIP_STRING;
 struct LIP_STRING_struct {
   unsigned long __id;
-  void *value__WBUE;
+  void *value__RLUE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
@@ -871,8 +878,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__H1H;
-  void *name__G3K;
+  __ITM_OBJECT parent_itm_object__NYH;
+  void *name__OZK;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
@@ -881,9 +888,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__D1K;
-  __INTEGER capacity__5KU;
-  void **storage__KLU;
+  __INTEGER upper__LXK;
+  __INTEGER capacity__KGU;
+  void **storage__VGU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
@@ -892,7 +899,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__M1H;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__SYH;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -967,8 +974,8 @@ __SHORTER SHORTER_;
 #define __FILE_SYSTEM__ 58
 typedef struct FILE_SYSTEM_struct __FILE_SYSTEM;
 struct FILE_SYSTEM_struct {
-  void *parent_directory__WFD;
-  int parent_directory__XFD;
+  void *parent_directory__1FD;
+  int parent_directory__2FD;
 };
 __FILE_SYSTEM FILE_SYSTEM_;
 #define FILE_SYSTEM__ (&FILE_SYSTEM_)
@@ -977,9 +984,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__JOBC;
-  void *item__23GD;
-  void *next__UOBC;
+  void *key__QLBC;
+  void *item__I3GD;
+  void *next__1LBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
@@ -988,9 +995,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__YNBC;
-  __INTEGER count__3OBC;
-  void **buckets__3NBC;
+  __INTEGER capacity__5KBC;
+  __INTEGER count__EMBC;
+  void **buckets__ELBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
@@ -1000,8 +1007,8 @@ __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRIN
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__FDU;
-  void **storage__STT;
+  __INTEGER capacity__Y4T;
+  void **storage__FPT;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
@@ -1028,8 +1035,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__CWHD;
-  void *next__UOOD;
+  void *item__GWHD;
+  void *next__4MOD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
@@ -1047,7 +1054,7 @@ __TYPE TYPE_;
 #define __ARRAYED_COLLECTIONoSLOTo__ 66
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__2ES;
+  __INTEGER capacity__PAS;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
@@ -1056,7 +1063,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__15;
+  __ARRAYED_COLLECTIONoSLOTo parent_arrayed_collection__BAB;
 };
 __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define FAST_ARRAYoSLOTo__ (&FAST_ARRAYoSLOTo_)
@@ -1065,7 +1072,7 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define __LINKED_COLLECTIONoENTRYo__ 68
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__QM3D;
+  __INTEGER upper__EM3D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
@@ -1074,11 +1081,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__PFRD;
-  __INTEGER mem_idx__M1VE;
-  void *first_link__F1VE;
-  void *mem_lnk__N1VE;
-  void *last_link__O1VE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__3DRD;
+  __INTEGER mem_idx__IFWE;
+  void *first_link__BFWE;
+  void *mem_lnk__JFWE;
+  void *last_link__KFWE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
@@ -1087,8 +1094,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__IOWE;
-  void *next__2KFF;
+  void *item__HYWE;
+  void *next__YTFF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
@@ -1097,9 +1104,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__NVV;
-  __INTEGER capacity__IZV;
-  void **storage__D0V;
+  __INTEGER upper__YQV;
+  __INTEGER capacity__TUV;
+  void **storage__OVV;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1108,7 +1115,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__RUP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__EQP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1126,8 +1133,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__KAW;
-  void *next__WAW;
+  void *item__V1V;
+  void *next__B2V;
 };
 __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 +1143,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__Z5V;
-  __INTEGER count__NIW;
-  void **buckets__45V;
+  __INTEGER capacity__E1V;
+  __INTEGER count__YDW;
+  void **buckets__J1V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1147,9 +1154,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__4JP;
-  __INTEGER capacity__F2V;
-  void **storage__Q2V;
+  __INTEGER upper__RFP;
+  __INTEGER capacity__QXV;
+  void **storage__1XV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
@@ -1158,7 +1165,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__UJP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__HFP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
@@ -1167,9 +1174,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__QMN;
-  __INTEGER capacity__OKV;
-  void **storage__ZKV;
+  __INTEGER upper__DIN;
+  __INTEGER capacity__ZFV;
+  void **storage__EGV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
@@ -1178,7 +1185,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__GMN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__ZHN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
@@ -1187,7 +1194,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__DWF;
+  __ITM_CODE parent_itm_code__JTF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
@@ -1197,7 +1204,7 @@ __ITM_CONSTANT ITM_CONSTANT_;
 typedef struct ITM_REAL_struct __ITM_REAL;
 struct ITM_REAL_struct {
   unsigned long __id;
-  __ITM_CONSTANT parent_itm_constant__NRO;
+  __ITM_CONSTANT parent_itm_constant__ANO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
@@ -1207,7 +1214,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__5RO;
+  __ITM_CONSTANT parent_itm_constant__SNO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
@@ -1217,7 +1224,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__RSO;
+  __ITM_CONSTANT parent_itm_constant__EOO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
@@ -1227,7 +1234,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__CTO;
+  __ITM_CONSTANT parent_itm_constant__VOO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
@@ -1236,9 +1243,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__IYP;
-  __INTEGER capacity__1BW;
-  void **storage__GCW;
+  __INTEGER upper__1TP;
+  __INTEGER capacity__G3V;
+  void **storage__R3V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
@@ -1247,7 +1254,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__4XP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__RTP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
@@ -1256,9 +1263,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__XOR;
-  __INTEGER capacity__DMW;
-  void **storage__OMW;
+  __INTEGER upper__KKR;
+  __INTEGER capacity__OHW;
+  void **storage__ZHW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
@@ -1267,7 +1274,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__NOR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__AKR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
@@ -1277,7 +1284,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__S5E;
+  __ITM_CODE parent_itm_code__I2E;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
@@ -1286,9 +1293,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__R1T;
-  __INTEGER capacity__EJU;
-  void **storage__PJU;
+  __INTEGER upper__EXT;
+  __INTEGER capacity__PEU;
+  void **storage__0EU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
@@ -1297,7 +1304,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__2RI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__YOI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
@@ -1315,9 +1322,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__QWT;
-  __INTEGER capacity__CAU;
-  void **storage__4AU;
+  __INTEGER upper__DST;
+  __INTEGER capacity__V1T;
+  void **storage__R2T;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
@@ -1326,7 +1333,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__I4H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__O1H;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
@@ -1344,9 +1351,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__CTU;
-  __INTEGER capacity__HVU;
-  void **storage__SVU;
+  __INTEGER upper__NOU;
+  __INTEGER capacity__SQU;
+  void **storage__3QU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1355,7 +1362,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__R5K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__Z1K;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1374,7 +1381,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__4CJ;
+  __ITM_CODE parent_itm_code__05I;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
@@ -1384,7 +1391,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__YUF;
+  __ITM_CODE parent_itm_constant__4RF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
@@ -1394,7 +1401,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__EWF;
+  __ITM_CONSTANT parent_itm_constant__KTF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
@@ -1403,7 +1410,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__TDJ;
+  __ITM_CODE parent_itm_code__PAJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
@@ -1413,7 +1420,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__UDJ;
+  __ITM_WRITE parent_itm_write__QAJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
@@ -1423,7 +1430,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__LEJ;
+  __ITM_WRITE parent_itm_write__HBJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
@@ -1433,7 +1440,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__YGJ;
+  __ITM_CODE parent_itm_code__UDJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
@@ -1443,7 +1450,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__WHJ;
+  __ITM_WRITE parent_itm_write__SEJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
@@ -1453,8 +1460,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__MFL;
-  void *name__XIL;
+  __ITM_CODE parent_itm_code__UBL;
+  void *name__5EL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
@@ -1464,7 +1471,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__SIL;
+  __ITM_READ parent_itm_read__0EL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
@@ -1474,7 +1481,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__5KL;
+  __ITM_READ parent_itm_read__HHL;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
@@ -1484,7 +1491,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__V2L;
+  __ITM_CODE parent_itm_code__VYL;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
@@ -1493,7 +1500,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__W4M;
+  __ITM_CODE parent_itm_code__J0M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
@@ -1503,8 +1510,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__X4M;
-  __BOOLEAN is_persistant__UHN;
+  __ITM_EXTERN parent_itm_extern__K0M;
+  __BOOLEAN is_persistant__HDN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
@@ -1514,7 +1521,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__INDC;
+  void *list__XKDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
@@ -1524,7 +1531,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__2FN;
+  __ITM_EXTERN parent_itm_extern__PBN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
@@ -1534,7 +1541,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__SDO;
+  __ITM_READ parent_itm_read__F5N;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
@@ -1543,8 +1550,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__VVPF;
-  void *next__BWPF;
+  void *item__RAQF;
+  void *next__3AQF;
 };
 __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1553,9 +1560,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__EVPF;
-  __INTEGER count__1ZPF;
-  void **buckets__JVPF;
+  __INTEGER capacity__AAQF;
+  __INTEGER count__XEQF;
+  void **buckets__FAQF;
 };
 __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1564,9 +1571,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__EWWE;
-  __INTEGER capacity__G0WE;
-  void **storage__R0WE;
+  __INTEGER upper__FAXE;
+  __INTEGER capacity__HEXE;
+  void **storage__SEXE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1575,7 +1582,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__TJSE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__URSE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1584,9 +1591,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__CEPF;
-  __INTEGER capacity__WKPF;
-  void **storage__BLPF;
+  __INTEGER upper__OOPF;
+  __INTEGER capacity__SVPF;
+  void **storage__3VPF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1595,7 +1602,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__2MFF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__YVFF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1605,7 +1612,7 @@ __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 typedef struct LIP_BOOLEAN_struct __LIP_BOOLEAN;
 struct LIP_BOOLEAN_struct {
   unsigned long __id;
-  __BOOLEAN value__XDQD;
+  __BOOLEAN value__FCQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1618,8 +1625,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__ZFFE;
-  void *value__IKUE;
+  __LIP_CODE parent_lip_code__KEFE;
+  void *value__DUUE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1628,9 +1635,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__XOTD;
-  __INTEGER capacity__YAUD;
-  void **storage__UBUD;
+  __INTEGER upper__IPTD;
+  __INTEGER capacity__JBUD;
+  void **storage__FCUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1639,7 +1646,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__NKID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__RKID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1684,9 +1691,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__YMPF;
-  __INTEGER capacity__5SPF;
-  void **storage__KTPF;
+  __INTEGER upper__UXPF;
+  __INTEGER capacity__13PF;
+  void **storage__G4PF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1695,7 +1702,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__HJUE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__CTUE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1713,9 +1720,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__EIKF;
-  __INTEGER capacity__AOPF;
-  void **storage__LOPF;
+  __INTEGER upper__VSKF;
+  __INTEGER capacity__2YPF;
+  void **storage__HZPF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1724,7 +1731,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__0HKF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__LSKF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1733,9 +1740,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__WPEC;
-  void *item__JQEC;
-  void *next__BQEC;
+  void *key__FNEC;
+  void *item__YNEC;
+  void *next__QNEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1744,9 +1751,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__FPEC;
-  __INTEGER count__HZFC;
-  void **buckets__KPEC;
+  __INTEGER capacity__UMEC;
+  __INTEGER count__WWFC;
+  void **buckets__ZMEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1755,9 +1762,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__PSEC;
-  void *key__2REC;
-  void *next__HSEC;
+  void *item__4PEC;
+  void *key__LPEC;
+  void *next__WPEC;
 };
 __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 +1773,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__LREC;
-  __INTEGER count__B2FC;
-  void **buckets__QREC;
+  __INTEGER capacity__0OEC;
+  __INTEGER count__QZFC;
+  void **buckets__5OEC;
 };
 __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 +1784,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__YTGC;
-  __INTEGER capacity__ALHC;
-  void **storage__LLHC;
+  __INTEGER upper__HRGC;
+  __INTEGER capacity__PIHC;
+  void **storage__0IHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1788,7 +1795,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__3U1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__KR1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1806,9 +1813,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__12XD;
-  __INTEGER capacity__JRVE;
-  void **storage__D4VE;
+  __INTEGER upper__NKTD;
+  __INTEGER capacity__E1VE;
+  void **storage__5HWE;
 };
 __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define ARRAYED_COLLECTIONoITM_SLOTo__ (&ARRAYED_COLLECTIONoITM_SLOTo_)
@@ -1817,14 +1824,11 @@ __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__GKTD;
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__QJTD;
 };
 __FAST_ARRAYoITM_SLOTo FAST_ARRAYoITM_SLOTo_;
 #define FAST_ARRAYoITM_SLOTo__ (&FAST_ARRAYoITM_SLOTo_)
 
-// INTEGER_8
-typedef signed char __INTEGER_8;
-
 // TYPE_NULL
 #define __TYPE_NULL__ 51
 typedef struct TYPE_NULL_struct __TYPE_NULL;
@@ -1869,103 +1873,104 @@ void *table_type[122];
 //==========================//
 
 void *parent_numeric__J;
-__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;
+__POINTER begin_memory__3SH;
+__UINTEGER_32 nb_page__CPJ;
+__UINTEGER_64 capacity_max__L24;
+void *first_free__VAVB;
+__INTEGER type_error__2KG;
+void *msg_err__3KG;
 void *prototype_list__BJ;
-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 *prototype_dico__KPS;
+void *list_tmp__RJTD;
+void *str_tmp__IH4E;
+void *str_tmp2__KJ4E;
+void *str_tmp3__KN4E;
+void *list_id__CBB;
+void *string_tmp__AFD;
+void *string_tmp2__AYAC;
+void *alias__RFD;
+void *string_tmp3__GYAC;
+void *bucket_name__XQOB;
+void *bucket_list__SSOB;
 void *short_dico__QD;
-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 *object__ZBC;
+void *source__5BC;
+__INTEGER position__CCC;
+__INTEGER pos_cur__FCC;
+__INTEGER pos_line__GCC;
+__INTEGER pos_col__HCC;
+__BOOLEAN is_active_short__OCC;
+__INTEGER short_derive__PCC;
+void *short_local__XCC;
+void *last_comment_extern__JYC;
+void *last_string__V0C;
+void *last_section__E1C;
+void *token__TCD;
+__BOOLEAN skip_comment__X2D;
+void *last_comment_slot__J3D;
+__INTEGER begin_position__53D;
+__BOOLEAN is_parameter_type__WGE;
+void *last_group__JRF;
+__INTEGER old_position__HOI;
+__INTEGER old_pos_cur__JOI;
+__INTEGER old_pos_line__LOI;
+__INTEGER old_pos_col__NOI;
+__INTEGER old_short_derive__POI;
+__INTEGER_64 last_integer__UNO;
+void *last_slot__QTOB;
+void *dico__IFP;
+void *dico__0HN;
+void *type_void__MTF;
+void *dico__WQI;
+void *type_self__CQN;
+void *type_null__0QN;
+void *dico__BKR;
+void *dico__STP;
+void *list_data__UMNC;
+void *stack__DTUE;
+void *list_method__MSKF;
+void *storage__VRSE;
+void *storage__ZVFF;
+__UINTEGER_32 clone_allocation_size__NTB;
+__POINTER get_begin_memory__G5PB;
 void *list__FK;
-void *free__JOP;
+void *free__2JP;
 void *string_tmp__VH;
 void *output_code__SI;
-void *output_decl__FGE;
-void *string_tmp2__JAJ;
-void *string_tmp3__DFYD;
-void *path_file__TPWF;
+void *string_tmp3__0SD;
+void *string_tmp4__2SD;
+void *output_decl__LCE;
+void *string_tmp2__F3I;
+void *path_file__P0WF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
-__BOOLEAN is_shorter__FZ;
-__BOOLEAN is_short_code__V1;
-__BOOLEAN is_short_private__D2;
+__BOOLEAN is_shorter__LZ;
+__BOOLEAN is_short_code__11;
+__BOOLEAN is_short_private__J2;
 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__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;
+void *format_name__N1;
+void *string_tmp__3RX;
+__INTEGER index_count__P5;
+void *free_list__FQP;
+void *empty_list__MRP;
+void *bucket__XRP;
+void *free_list__ZOI;
+void *free_list__P1H;
+void *free_list__01K;
+void *empty_list__CDMF;
+void *bucket__MDMF;
+void *true__OOLF;
+void *free_list__SKID;
+__INTEGER last_integer__1RUE;
+void *last_string__NSUE;
+__BOOLEAN push_back_flag__JPMF;
+__CHARACTER memory__31LF;
+void *free_list__LR1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2112,24 +2117,27 @@ __STRING_CONSTANT __string_134={__STRING_CONSTANT__,5,"local"};
 __STRING_CONSTANT __string_135={__STRING_CONSTANT__,7,"warning"};
 __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,"------------------\
+__STRING_CONSTANT __string_138={__STRING_CONSTANT__,23,"prototype_comment_li\
+ght"};
+__STRING_CONSTANT __string_139={__STRING_CONSTANT__,17,"prototype_comment"};
+__STRING_CONSTANT __string_140={__STRING_CONSTANT__,5,"title"};
+__STRING_CONSTANT __string_141={__STRING_CONSTANT__,11,"table_begin"};
+__STRING_CONSTANT __string_142={__STRING_CONSTANT__,10,"table_item"};
+__STRING_CONSTANT __string_143={__STRING_CONSTANT__,15,"table_slot_name"};
+__STRING_CONSTANT __string_144={__STRING_CONSTANT__,18,"table_slot_comment"};
+__STRING_CONSTANT __string_145={__STRING_CONSTANT__,9,"table_end"};
+__STRING_CONSTANT __string_146={__STRING_CONSTANT__,9,"sub_title"};
+__STRING_CONSTANT __string_147={__STRING_CONSTANT__,10,"slot_title"};
+__STRING_CONSTANT __string_148={__STRING_CONSTANT__,12,"subsub_title"};
+__STRING_CONSTANT __string_149={__STRING_CONSTANT__,14,"prototype_path"};
+__STRING_CONSTANT __string_150={__STRING_CONSTANT__,5,"index"};
+__STRING_CONSTANT __string_151={__STRING_CONSTANT__,20,"directory_list_begin"};
+__STRING_CONSTANT __string_152={__STRING_CONSTANT__,19,"directory_list_item"};
+__STRING_CONSTANT __string_153={__STRING_CONSTANT__,18,"directory_list_end"};
+__STRING_CONSTANT __string_154={__STRING_CONSTANT__,15,"file_list_begin"};
+__STRING_CONSTANT __string_155={__STRING_CONSTANT__,14,"file_list_item"};
+__STRING_CONSTANT __string_156={__STRING_CONSTANT__,13,"file_list_end"};
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,1979,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2157,126 +2165,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_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\
+__STRING_CONSTANT __string_158={__STRING_CONSTANT__,8,"shorter/"};
+__STRING_CONSTANT __string_159={__STRING_CONSTANT__,3,".li"};
+__STRING_CONSTANT __string_160={__STRING_CONSTANT__,20,"Error: File format `"};
+__STRING_CONSTANT __string_161={__STRING_CONSTANT__,16,"' is not open !\n"};
+__STRING_CONSTANT __string_162={__STRING_CONSTANT__,26,"Incorrect slot ident\
 ifier."};
-__STRING_CONSTANT __string_161={__STRING_CONSTANT__,23,"Double definition sl\
+__STRING_CONSTANT __string_163={__STRING_CONSTANT__,23,"Double definition sl\
 ot."};
-__STRING_CONSTANT __string_162={__STRING_CONSTANT__,26,"Assignment ':=' is n\
+__STRING_CONSTANT __string_164={__STRING_CONSTANT__,26,"Assignment ':=' is n\
 eeded."};
-__STRING_CONSTANT __string_163={__STRING_CONSTANT__,28,"Incorrect format exp\
+__STRING_CONSTANT __string_165={__STRING_CONSTANT__,28,"Incorrect format exp\
 ression."};
-__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\
+__STRING_CONSTANT __string_166={__STRING_CONSTANT__,21,"Incorrect definition."};
+__STRING_CONSTANT __string_167={__STRING_CONSTANT__,20,"Added ';' is needed."};
+__STRING_CONSTANT __string_168={__STRING_CONSTANT__,17,"Incorrect symbol."};
+__STRING_CONSTANT __string_169={__STRING_CONSTANT__,18,"Error: directory `"};
+__STRING_CONSTANT __string_170={__STRING_CONSTANT__,13,"\' not found.\n"};
+__STRING_CONSTANT __string_171={__STRING_CONSTANT__,12,"\' not open.\n"};
+__STRING_CONSTANT __string_172={__STRING_CONSTANT__,14,"directory_list"};
+__STRING_CONSTANT __string_173={__STRING_CONSTANT__,9,"file_list"};
+__STRING_CONSTANT __string_174={__STRING_CONSTANT__,22,"Inherit/Insert Summa\
 ry"};
-__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\
+__STRING_CONSTANT __string_175={__STRING_CONSTANT__,12,"Slot Summary"};
+__STRING_CONSTANT __string_176={__STRING_CONSTANT__,7,"inherit"};
+__STRING_CONSTANT __string_177={__STRING_CONSTANT__,6,"insert"};
+__STRING_CONSTANT __string_178={__STRING_CONSTANT__,14," No developed."};
+__STRING_CONSTANT __string_179={__STRING_CONSTANT__,6,"create"};
+__STRING_CONSTANT __string_180={__STRING_CONSTANT__,19,"Constructor Summary"};
+__STRING_CONSTANT __string_181={__STRING_CONSTANT__,21,"Inherit/Insert Detail"};
+__STRING_CONSTANT __string_182={__STRING_CONSTANT__,11,"Detail slot"};
+__STRING_CONSTANT __string_183={__STRING_CONSTANT__,7," line #"};
+__STRING_CONSTANT __string_184={__STRING_CONSTANT__,8,"Section:"};
+__STRING_CONSTANT __string_185={__STRING_CONSTANT__,8,"Profile:"};
+__STRING_CONSTANT __string_186={__STRING_CONSTANT__,18,"Constructor 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\
 ound !"};
-__STRING_CONSTANT __string_205={__STRING_CONSTANT__,24,"Identifier is incorr\
+__STRING_CONSTANT __string_207={__STRING_CONSTANT__,24,"Identifier is incorr\
 ect."};
-__STRING_CONSTANT __string_206={__STRING_CONSTANT__,22,"Line counter overflo\
+__STRING_CONSTANT __string_208={__STRING_CONSTANT__,22,"Line counter overflo\
 w."};
-__STRING_CONSTANT __string_207={__STRING_CONSTANT__,40,"Column counter overf\
+__STRING_CONSTANT __string_209={__STRING_CONSTANT__,40,"Column counter overf\
 low (line too long)."};
-__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\
+__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\
 tion prototype:\n"};
-__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 \
+__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 \
 needed."};
-__STRING_CONSTANT __string_228={__STRING_CONSTANT__,22,"Slot `name' not foun\
+__STRING_CONSTANT __string_230={__STRING_CONSTANT__,22,"Slot `name' not foun\
 d."};
-__STRING_CONSTANT __string_229={__STRING_CONSTANT__,23,"Incorrect type secti\
+__STRING_CONSTANT __string_231={__STRING_CONSTANT__,23,"Incorrect type secti\
 on."};
-__STRING_CONSTANT __string_230={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
+__STRING_CONSTANT __string_232={__STRING_CONSTANT__,50,"`Section Inherit/Ins\
 ert' must to be first section."};
-__STRING_CONSTANT __string_231={__STRING_CONSTANT__,78,"`Section Inherit' is\
+__STRING_CONSTANT __string_233={__STRING_CONSTANT__,78,"`Section Inherit' is\
  not possible with Expanded object (Use `Section Insert')."};
-__STRING_CONSTANT __string_232={__STRING_CONSTANT__,31,"No argument for inte\
+__STRING_CONSTANT __string_234={__STRING_CONSTANT__,31,"No argument for inte\
 rrupt slot."};
-__STRING_CONSTANT __string_233={__STRING_CONSTANT__,33,"No argument for inhe\
+__STRING_CONSTANT __string_235={__STRING_CONSTANT__,33,"No argument for inhe\
 ritance slot."};
-__STRING_CONSTANT __string_234={__STRING_CONSTANT__,27,"Incorrect slot decla\
+__STRING_CONSTANT __string_236={__STRING_CONSTANT__,27,"Incorrect slot decla\
 ration."};
-__STRING_CONSTANT __string_235={__STRING_CONSTANT__,22,"Incorrect result typ\
+__STRING_CONSTANT __string_237={__STRING_CONSTANT__,22,"Incorrect result typ\
 e."};
-__STRING_CONSTANT __string_236={__STRING_CONSTANT__,20,"Added ')' is needed."};
-__STRING_CONSTANT __string_237={__STRING_CONSTANT__,36,"Incorrect type for i\
+__STRING_CONSTANT __string_238={__STRING_CONSTANT__,20,"Added ')' is needed."};
+__STRING_CONSTANT __string_239={__STRING_CONSTANT__,36,"Incorrect type for i\
 nheritance slot."};
-__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\
+__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\
 ion."};
-__STRING_CONSTANT __string_242={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
+__STRING_CONSTANT __string_244={__STRING_CONSTANT__,38,"Invariant: Sorry, No\
 t yet implemented."};
-__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 \
+__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__,12,"Description:"};
+__STRING_CONSTANT __string_249={__STRING_CONSTANT__,1,"+"};
+__STRING_CONSTANT __string_250={__STRING_CONSTANT__,1,"-"};
+__STRING_CONSTANT __string_251={__STRING_CONSTANT__,29,"Unterminated string \
 constant."};
-__STRING_CONSTANT __string_250={__STRING_CONSTANT__,27,"Incorrect style slot\
+__STRING_CONSTANT __string_252={__STRING_CONSTANT__,27,"Incorrect style slot\
  ('-')."};
-__STRING_CONSTANT __string_251={__STRING_CONSTANT__,2509,"#include <pthread.\
+__STRING_CONSTANT __string_253={__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\
@@ -2312,128 +2320,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_252={__STRING_CONSTANT__,11,"Added ':='."};
-__STRING_CONSTANT __string_253={__STRING_CONSTANT__,31,"Prototype identifier\
+__STRING_CONSTANT __string_254={__STRING_CONSTANT__,11,"Added ':='."};
+__STRING_CONSTANT __string_255={__STRING_CONSTANT__,31,"Prototype identifier\
  is needed."};
-__STRING_CONSTANT __string_254={__STRING_CONSTANT__,34,"Incorrect name (file\
+__STRING_CONSTANT __string_256={__STRING_CONSTANT__,34,"Incorrect name (file\
 name != name)."};
-__STRING_CONSTANT __string_255={__STRING_CONSTANT__,24,"Object can't be gene\
+__STRING_CONSTANT __string_257={__STRING_CONSTANT__,24,"Object can't be gene\
 ric."};
-__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\
+__STRING_CONSTANT __string_258={__STRING_CONSTANT__,10,"Added ':'."};
+__STRING_CONSTANT __string_259={__STRING_CONSTANT__,12,"Type needed."};
+__STRING_CONSTANT __string_260={__STRING_CONSTANT__,27,"Sorry, not yet imple\
 mented."};
-__STRING_CONSTANT __string_259={__STRING_CONSTANT__,36,"Identifier parameter\
+__STRING_CONSTANT __string_261={__STRING_CONSTANT__,36,"Identifier parameter\
  type is needed."};
-__STRING_CONSTANT __string_260={__STRING_CONSTANT__,10,"Added ')'."};
-__STRING_CONSTANT __string_261={__STRING_CONSTANT__,28,"Invalid generic list\
+__STRING_CONSTANT __string_262={__STRING_CONSTANT__,10,"Added ')'."};
+__STRING_CONSTANT __string_263={__STRING_CONSTANT__,28,"Invalid generic list\
  number."};
-__STRING_CONSTANT __string_262={__STRING_CONSTANT__,34,"Slot `name' must to \
+__STRING_CONSTANT __string_264={__STRING_CONSTANT__,34,"Slot `name' must to \
 be first slot."};
-__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\
+__STRING_CONSTANT __string_265={__STRING_CONSTANT__,20,"Incorrect type list."};
+__STRING_CONSTANT __string_266={__STRING_CONSTANT__,19,"Incorrect external."};
+__STRING_CONSTANT __string_267={__STRING_CONSTANT__,3,"// "};
+__STRING_CONSTANT __string_268={__STRING_CONSTANT__,15,"Incorrect expr."};
+__STRING_CONSTANT __string_269={__STRING_CONSTANT__,33,"Double `default' slo\
 t definition."};
-__STRING_CONSTANT __string_268={__STRING_CONSTANT__,30,"Double `type' slot d\
+__STRING_CONSTANT __string_270={__STRING_CONSTANT__,30,"Double `type' slot d\
 efinition."};
-__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\
+__STRING_CONSTANT __string_271={__STRING_CONSTANT__,17,"Incorrect number."};
+__STRING_CONSTANT __string_272={__STRING_CONSTANT__,21,"Added '<-' is needed."};
+__STRING_CONSTANT __string_273={__STRING_CONSTANT__,20,"Added '(' is needed."};
+__STRING_CONSTANT __string_274={__STRING_CONSTANT__,17,"Unreachable code."};
+__STRING_CONSTANT __string_275={__STRING_CONSTANT__,17,"Incorrect string."};
+__STRING_CONSTANT __string_276={__STRING_CONSTANT__,15,"Incorrect slot."};
+__STRING_CONSTANT __string_277={__STRING_CONSTANT__,59,"For a section, the p\
 rototype name only (without '['...']')."};
-__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\
+__STRING_CONSTANT __string_278={__STRING_CONSTANT__,14,"Slot deferred."};
+__STRING_CONSTANT __string_279={__STRING_CONSTANT__,15,"Incorrect type."};
+__STRING_CONSTANT __string_280={__STRING_CONSTANT__,22,"Type `SELF' is neede\
 d."};
-__STRING_CONSTANT __string_279={__STRING_CONSTANT__,20,"Added ':' is needed."};
-__STRING_CONSTANT __string_280={__STRING_CONSTANT__,30,"Incorrect argument i\
+__STRING_CONSTANT __string_281={__STRING_CONSTANT__,20,"Added ':' is needed."};
+__STRING_CONSTANT __string_282={__STRING_CONSTANT__,30,"Incorrect argument i\
 dentifier."};
-__STRING_CONSTANT __string_281={__STRING_CONSTANT__,24,"Incorrect argument t\
+__STRING_CONSTANT __string_283={__STRING_CONSTANT__,24,"Incorrect argument t\
 ype."};
-__STRING_CONSTANT __string_282={__STRING_CONSTANT__,30,"Incorrect argument d\
+__STRING_CONSTANT __string_284={__STRING_CONSTANT__,30,"Incorrect argument d\
 efinition."};
-__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\
+__STRING_CONSTANT __string_285={__STRING_CONSTANT__,19,"Operator is needed."};
+__STRING_CONSTANT __string_286={__STRING_CONSTANT__,19,"Incorrect operator."};
+__STRING_CONSTANT __string_287={__STRING_CONSTANT__,10,"Added `''."};
+__STRING_CONSTANT __string_288={__STRING_CONSTANT__,29,"Operator declaration\
  invalid."};
-__STRING_CONSTANT __string_287={__STRING_CONSTANT__,39,"Not associativity fo\
+__STRING_CONSTANT __string_289={__STRING_CONSTANT__,39,"Not associativity fo\
 r postfix operator."};
-__STRING_CONSTANT __string_288={__STRING_CONSTANT__,38,"Not associativity fo\
+__STRING_CONSTANT __string_290={__STRING_CONSTANT__,38,"Not associativity fo\
 r prefix operator."};
-__STRING_CONSTANT __string_289={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
+__STRING_CONSTANT __string_291={__STRING_CONSTANT__,32,"Incorrect in `Sectio\
 n External'."};
-__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\
+__STRING_CONSTANT __string_292={__STRING_CONSTANT__,7,"Added '"};
+__STRING_CONSTANT __string_293={__STRING_CONSTANT__,2,"'."};
+__STRING_CONSTANT __string_294={__STRING_CONSTANT__,10,"Added '}'."};
+__STRING_CONSTANT __string_295={__STRING_CONSTANT__,27,"`Expanded' is not po\
 ssible."};
-__STRING_CONSTANT __string_294={__STRING_CONSTANT__,10,"Added ']'."};
-__STRING_CONSTANT __string_295={__STRING_CONSTANT__,45,"Impossible '<-' styl\
+__STRING_CONSTANT __string_296={__STRING_CONSTANT__,10,"Added ']'."};
+__STRING_CONSTANT __string_297={__STRING_CONSTANT__,45,"Impossible '<-' styl\
 e assignment with vector."};
-__STRING_CONSTANT __string_296={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
+__STRING_CONSTANT __string_298={__STRING_CONSTANT__,28,"Sorry, Not yet imple\
 mented !"};
-__STRING_CONSTANT __string_297={__STRING_CONSTANT__,1,"{"};
-__STRING_CONSTANT __string_298={__STRING_CONSTANT__,1,"}"};
-__STRING_CONSTANT __string_299={__STRING_CONSTANT__,24,"Unknown escape seque\
+__STRING_CONSTANT __string_299={__STRING_CONSTANT__,1,"{"};
+__STRING_CONSTANT __string_300={__STRING_CONSTANT__,1,"}"};
+__STRING_CONSTANT __string_301={__STRING_CONSTANT__,24,"Unknown escape seque\
 nce."};
-__STRING_CONSTANT __string_300={__STRING_CONSTANT__,39,"Invalid range charac\
+__STRING_CONSTANT __string_302={__STRING_CONSTANT__,39,"Invalid range charac\
 ter number [0,255]."};
-__STRING_CONSTANT __string_301={__STRING_CONSTANT__,23,"Character '\' is nee\
+__STRING_CONSTANT __string_303={__STRING_CONSTANT__,23,"Character '\' is nee\
 ded."};
-__STRING_CONSTANT __string_302={__STRING_CONSTANT__,24,"Incorrect Result num\
+__STRING_CONSTANT __string_304={__STRING_CONSTANT__,24,"Incorrect Result num\
 ber."};
-__STRING_CONSTANT __string_303={__STRING_CONSTANT__,25,"Incorrect live type \
+__STRING_CONSTANT __string_305={__STRING_CONSTANT__,25,"Incorrect live type \
 list."};
-__STRING_CONSTANT __string_304={__STRING_CONSTANT__,23,"Incorrect octal numb\
+__STRING_CONSTANT __string_306={__STRING_CONSTANT__,23,"Incorrect octal numb\
 er."};
-__STRING_CONSTANT __string_305={__STRING_CONSTANT__,24,"Incorrect binary num\
+__STRING_CONSTANT __string_307={__STRING_CONSTANT__,24,"Incorrect binary num\
 ber."};
-__STRING_CONSTANT __string_306={__STRING_CONSTANT__,25,"Incorrect decimal nu\
+__STRING_CONSTANT __string_308={__STRING_CONSTANT__,25,"Incorrect decimal nu\
 mber."};
-__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\
+__STRING_CONSTANT __string_309={__STRING_CONSTANT__,6,"Slot `"};
+__STRING_CONSTANT __string_310={__STRING_CONSTANT__,12,"' not found."};
+__STRING_CONSTANT __string_311={__STRING_CONSTANT__,30,"No argument for `exi\
 t' method."};
-__STRING_CONSTANT __string_310={__STRING_CONSTANT__,23,"String argument need\
+__STRING_CONSTANT __string_312={__STRING_CONSTANT__,23,"String argument need\
 ed."};
-__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\
+__STRING_CONSTANT __string_313={__STRING_CONSTANT__,17,"Invalid argument."};
+__STRING_CONSTANT __string_314={__STRING_CONSTANT__,21,"No expression result."};
+__STRING_CONSTANT __string_315={__STRING_CONSTANT__,15,"BOOLEAN needed."};
+__STRING_CONSTANT __string_316={__STRING_CONSTANT__,18,"!@#$%^&<|*-+=~/?\\>"};
+__STRING_CONSTANT __string_317={__STRING_CONSTANT__,22,"Prototype name neede\
 d."};
-__STRING_CONSTANT __string_316={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
+__STRING_CONSTANT __string_318={__STRING_CONSTANT__,30,"1) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_317={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
+__STRING_CONSTANT __string_319={__STRING_CONSTANT__,30,"2) Sorry, not yet im\
 plemented."};
-__STRING_CONSTANT __string_318={__STRING_CONSTANT__,7,"Style `"};
-__STRING_CONSTANT __string_319={__STRING_CONSTANT__,32,"' for parameter type\
+__STRING_CONSTANT __string_320={__STRING_CONSTANT__,7,"Style `"};
+__STRING_CONSTANT __string_321={__STRING_CONSTANT__,32,"' for parameter type\
  is ignored."};
-__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\
+__STRING_CONSTANT __string_322={__STRING_CONSTANT__,10,"' ignored."};
+__STRING_CONSTANT __string_323={__STRING_CONSTANT__,21,"Incorrect identifier."};
+__STRING_CONSTANT __string_324={__STRING_CONSTANT__,21,"Incorrect local type."};
+__STRING_CONSTANT __string_325={__STRING_CONSTANT__,27,"Incorrect `Old' expr\
 ession."};
-__STRING_CONSTANT __string_324={__STRING_CONSTANT__,18,"Incorrect message."};
-__STRING_CONSTANT __string_325={__STRING_CONSTANT__,22,"Incorrect real numbe\
+__STRING_CONSTANT __string_326={__STRING_CONSTANT__,18,"Incorrect message."};
+__STRING_CONSTANT __string_327={__STRING_CONSTANT__,22,"Incorrect real numbe\
 r."};
-__STRING_CONSTANT __string_326={__STRING_CONSTANT__,28,"Character constant t\
+__STRING_CONSTANT __string_328={__STRING_CONSTANT__,28,"Character constant t\
 oo long."};
-__STRING_CONSTANT __string_327={__STRING_CONSTANT__,32,"Unterminated charact\
+__STRING_CONSTANT __string_329={__STRING_CONSTANT__,32,"Unterminated charact\
 er constant."};
-__STRING_CONSTANT __string_328={__STRING_CONSTANT__,37,"Incorrect multiple r\
+__STRING_CONSTANT __string_330={__STRING_CONSTANT__,37,"Incorrect multiple r\
 esult expression."};
-__STRING_CONSTANT __string_329={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
+__STRING_CONSTANT __string_331={__STRING_CONSTANT__,36,"Error in INPUT_STREA\
 M.read_integer.\n"};
-__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."};
+__STRING_CONSTANT __string_332={__STRING_CONSTANT__,21,"Incorrect directory `"};
+__STRING_CONSTANT __string_333={__STRING_CONSTANT__,19,"Incorrect argument."};
+__STRING_CONSTANT __string_334={__STRING_CONSTANT__,15,"Type incorrect."};
 
 //==========================//
 // FUNCTION HEADER          //
@@ -2442,212 +2450,212 @@ __STRING_CONSTANT __string_332={__STRING_CONSTANT__,15,"Type incorrect."};
 // Debug Manager
 void print_string(char *str);
 // Source code
-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);
+static __STRING* create__ZBB(__INTEGER needed_capacity__1BB);
+static __POINTER new_lab__QOJ(__UINTEGER_32 t__SOJ);
+static void** create__XCRB(__INTEGER nb_elements__ZCRB);
+static void add_last__UHT(__STRING *Self__VHT,__CHARACTER ch__WHT);
+static void add_last__TNV(__FAST_ARRAYoSTRINGo *Self__UNV,void *element__VNV);
+static __INTEGER prime_number_ceiling__K01(__INTEGER integer__M01);
+static void** create__K33(__INTEGER nb_elements__M33);
+static void** create__0GTC(__INTEGER nb_elements__2GTC);
+static void** create__ECSB(__INTEGER nb_elements__GCSB);
+static void** create__UB4(__INTEGER nb_elements__WB4);
+static void** create__5U2(__INTEGER nb_elements__BV2);
+static void** create__KGRB(__INTEGER nb_elements__MGRB);
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__DBR(__INTEGER new_count__FBR);
+static void** create__OVBB(__INTEGER nb_elements__QVBB);
+static void** create__KIXB(__INTEGER nb_elements__MIXB);
+static void** create__FRWB(__INTEGER nb_elements__HRWB);
+static void** create__EPXB(__INTEGER nb_elements__GPXB);
+static void** create__ID5(__INTEGER nb_elements__KD5);
+static void fast_put__to__GKZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__HKZ,void *v__IKZ,void *k__JKZ);
+static void** create__QEYB(__INTEGER nb_elements__SEYB);
+static void* get__HQI(void *n__JQI);
+static void** create__CEQB(__INTEGER nb_elements__EEQB);
+static void** create__SYPB(__INTEGER nb_elements__UYPB);
+static void** create__U0ZB(__INTEGER nb_elements__W0ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__UFRC(__INTEGER new_count__WFRC);
+static void** create__ZBUF(__INTEGER nb_elements__1BUF);
+static void** create__1FGF(__INTEGER nb_elements__3FGF);
+static void** create__UFYF(__INTEGER nb_elements__WFYF);
+static void** create__LYIE(__INTEGER nb_elements__NYIE);
+static void* new_page__B24();
+static void to_busy__index__KRFC(__MEMORY *Self__LRFC,__UINTEGER_32 sz__MRFC,__UINTEGER_32 idx__NRFC);
+static void** create__D1XC(__INTEGER nb_elements__F1XC);
+static void** create__GAYC(__INTEGER nb_elements__IAYC);
+static void** create__4KBD(__INTEGER nb_elements__ALBD);
+static void** create__35EF(__INTEGER nb_elements__55EF);
+static void** create__UF2(__INTEGER nb_elements__WF2);
+static void add__DUR(__HASHED_SEToABSTRACT_STRINGo *Self__EUR,void *e__FUR);
+static void* operator__name__GHB(void *op__JHB);
+static void print__DID(__STRING_CONSTANT *Self__EID);
+static void* get__YWB(void *str__0WB);
+static void copy__U4R(__STRING *Self__V4R,void *other__W4R);
+static void append__2JS(__STRING *Self__3JS,void *other__4JS);
+static void* parent_directory__1ED();
+static void* get_entry__0XAC(void *p__2XAC);
+static void put_string__CZF(void *s__EZF);
+static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC);
+static __BOOLEAN read_space__KSD();
+static __BOOLEAN read_identifier__12K();
+static __POSITION current_position__XUF();
+static void put_error__text__YKG(__INTEGER type__0KG,void *txt__1KG);
+static void put_position__CMG(__POSITION Self__DMG);
+static __BOOLEAN read_symbol__3TJ(void *st__5TJ);
+static __BOOLEAN read_short_elt__5GKB();
+static void fast_put__to__TXR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__UXR,void *k__WXR);
+static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB);
+static void** create__WUNB(__INTEGER nb_elements__YUNB);
+static void add_last__J0R(__FAST_ARRAYoTYPE_IDo *Self__K0R,void *element__L0R);
+static __BOOLEAN open__PDRD(__DIRECTORY_UNIX *Self__QDRD);
+static void check_in__begin__GPQC(void *entry__IPQC,__INTEGER n__JPQC);
+static void* add_ext__C4E(void *n__E4E);
+static void save_file__with__3DC(void *n__5DC,void *buf__AEC);
+static void resize__LTZ(__STRING *Self__MTZ,__INTEGER new_count__NTZ);
+static void move__to__by__YTCC(__CHARACTER *Self__ZTCC,__INTEGER lower__0TCC,__INTEGER upper__1TCC,__INTEGER offset__2TCC);
+static __BOOLEAN __infix_equal_equal__R1DB(__STRING_CONSTANT *Self__S1DB,void *other__T1DB);
+static void* at__DH4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__EH4,void *k__FH4);
+static void go_on__SBC(void *obj__UBC);
+static void put__to__like__Q0XD(void *tok__S0XD,void *buf__T0XD,void *key__U0XD);
+static void shorter_get_all_slot_in__S2XD(__PROTOTYPE *Self__T2XD,void *lst__U2XD);
+static void pretty_name_in__ZM4F(__ITM_SLOT *Self__0M4F,void *buffer__1M4F);
+static void pretty_name_in__OO4F(__ITM_SLOT_OPERATOR *Self__PO4F,void *buffer__QO4F);
+static void get_all_comment_slot__in__ID4E(__PROTOTYPE *Self__JD4E,void *n__KD4E,void *buf__LD4E);
+static void shorter_comment__in__light__1G4E(void *str__3G4E,void *buf__4G4E,__BOOLEAN is_light__5G4E);
+static void append_in__2FH(__UINTEGER_32 Self__3FH,void *buffer__4FH);
+static void append_in__GQ4F(__SECTION_ *Self__HQ4F,void *buf__IQ4F);
+static void shorter_profile_in__IR4F(__ITM_SLOT *Self__JR4F,void *buf__KR4F);
+static void shorter_profile_in__FS4F(__ITM_SLOT_OPERATOR *Self__GS4F,void *buf__HS4F);
+static __CHARACTER* create__UHEB(__INTEGER nb_elements__WHEB);
+static __POINTER realloc_dynamic__old_size__new_size__XCLC(__POINTER p__ZCLC,__UINTEGER_32 old_sz__0CLC,__UINTEGER_32 new_sz__1CLC);
+static void** create__R4QB(__INTEGER nb_elements__T4QB);
+static void* fast_reference_at__TXT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UXT,void *k__VXT);
+static void** create__5HHE(__INTEGER nb_elements__BIHE);
+static __BOOLEAN has__OLW(__HASHED_SEToABSTRACT_STRINGo *Self__PLW,void *e__QLW);
+static void increase_capacity__SNNB(__HASHED_SEToABSTRACT_STRINGo *Self__TNNB);
+static void put_string__WEF(void *s__YEF);
+static __BOOLEAN fast_has__B2X(__HASHED_SEToABSTRACT_STRINGo *Self__C2X,void *e__D2X);
+static void* physical_get_entry__H5E(void *new_path__J5E);
+static void put__to__MWS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NWS,void *v__OWS,void *k__PWS);
+static void reduce_path__W1HC(void *st__Y1HC);
+static void* reference_at__WT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__XT0C,void *k__YT0C);
+static void* physical_get_entry__KW0C(void *new_path__MW0C);
+static void** create__HY1C(__INTEGER nb_elements__JY1C);
+static void** create__QPSC(__INTEGER nb_elements__SPSC);
+static void short__token__to__YBD(void *key__0BD,__INTEGER beg__1BD,__INTEGER end__2BD);
+static __INTEGER first_substring_index__VSZE(__STRING *Self__WSZE);
+static __BOOLEAN read_string__GBQ();
+static void reduce_path__NG3E(void *st__PG3E);
+static void* item__YVPE(__DIRECTORY_UNIX *Self__ZVPE,__INTEGER i__0VPE);
+static void* item__MZND(__LINKED_LISToSTRING_CONSTANTo *Self__NZND,__INTEGER i__OZND);
+static void** create__GY3(__INTEGER nb_elements__IY3);
+static __BOOLEAN read_word__4MF(void *st__ANF);
+static __BOOLEAN read_slot_header__AAE(__BOOLEAN first__CAE);
+static void* get_name__OQOB(void *n__QQOB);
+static void* read_type_list__DIO(__PARSER *Self__EIO,__BOOLEAN is_section__FIO);
+static __INTEGER hash_code__C10(__FAST_ARRAYoITM_TYPE_MONOo *Self__D10);
+static __CHARACTER read_style__FPF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__GI5B(__INTEGER new_count__II5B);
+static void* read_loc_arg__with_self__25GB(__PARSER *Self__35GB,__BOOLEAN mute__45GB,__BOOLEAN self_first__55GB);
+static void* read_slot_operator__MR5B(void *list_arg__OR5B);
+static void add_last__R3GC(__FAST_ARRAYoITM_ARGUMENTo *Self__S3GC,void *element__T3GC);
+static void* read_slot_keyword__ZW5B(void *list_arg__1W5B);
+static void** create__QPBD(__INTEGER nb_elements__SPBD);
+static void set_argument_list__MAHC(__ITM_SLOT *Self__NAHC,void *p__OAHC);
+static __ITM_TYPE_MULTI* get__3EP(void *lt__5EP);
+static void* read_type__B4L(__PARSER *Self__C4L,__BOOLEAN is_local__D4L);
+static void set_result_type__D1FC(__ITM_SLOT *Self__E1FC,void *t__F1FC);
+static void* read_contract__VQF(__PARSER *Self__WQF);
+static void* read_expr__C2I(__PARSER *Self__D2I);
+static void set_value__type__QDHC(__ITM_SLOT *Self__RDHC,void *e__SDHC,void *p__TDHC);
+static __POSITION position__054B(__ITM_EXPRESSION *Self__154B);
+static __POSITION position__2GHC(__ITM_RESULT *Self__3GHC);
+static void fast_put__to__YLGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZLGC,void *v__0LGC,void *k__1LGC);
+static void* fast_reference_at__H4FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__I4FC,void *k__J4FC);
+static void* fast_reference_at__HFNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IFNE,void *k__JFNE);
+static void append_in__EFPD(__ITM_TYPE_BLOCK *Self__FFPD,void *buffer__GFPD);
+static void append_in__IGPD(__ITM_TYPE_GENERIC *Self__JGPD,void *buffer__KGPD);
+static void put__to__like__3BBG(void *tok__5BBG,void *buf__ACBG,void *key__BCBG);
+static void shorter_in__44AG(__ITM_ARG *Self__54AG,void *buf__A5AG);
+static void shorter_in__V5AG(__ITM_ARGS *Self__W5AG,void *buf__X5AG);
+static void shorter_in__OIDG(__ITM_TYPE_PARAMETER *Self__PIDG,void *buf__QIDG);
+static void shorter_in__5IDG(__ITM_TYPE_SIMPLE *Self__AJDG,void *buf__BJDG);
+static void shorter_raw_in__ARFG(__ITM_TYPE_MULTI *Self__BRFG,void *buf__CRFG);
+static void shorter_in__QJDG(__ITM_TYPE_BLOCK *Self__RJDG,void *buf__SJDG);
+static void shorter_in__YKDG(__ITM_TYPE_GENERIC *Self__ZKDG,void *buf__0KDG);
+static void put__to__like__2OFG(void *tok__4OFG,void *buf__5OFG,void *key__APFG);
+static void put__to__like__GPDG(void *tok__IPDG,void *buf__JPDG,void *key__KPDG);
+static void set_path__JJT(__DIRECTORY_UNIX *Self__KJT,void *n__LJT);
+static void set_path__EKT(__FILE_UNIX *Self__FKT,void *n__GKT);
+static void insert_string__to__NTU(__STRING *Self__OTU,void *s__PTU,__INTEGER i__QTU);
+static void read_escape_character__JWKF();
+static __BOOLEAN read_cap_identifier__MWJ();
+static void add_last__C5AC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__D5AC,void *element__E5AC);
+static __BOOLEAN read_external__1OO();
+static void* read_expr_primary__D0M(__PARSER *Self__E0M);
+static __BOOLEAN read_integer__1XP();
+static void* readlip_expr__PQPB();
+static void run__HEFC(__LIP_AFFECT *Self__IEFC);
+static void run__RJUE(__LIP_CALL *Self__SJUE);
+static void run__SBQD(__LIP_IF *Self__TBQD);
+static void run__FOUE(__LIP_PRINT *Self__GOUE);
+static void add_last__NJV(__FAST_ARRAYoITM_TYPE_MONOo *Self__OJV,void *element__PJV);
+static void* alias__BRP(void *tmp__DRP);
+static void add__WHHB(__HASHED_SEToSTRING_CONSTANTo *Self__XHHB,void *e__YHHB);
+static void add_last__HAPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__IAPD,void *element__JAPD);
+static void free__NO5(void *tmp__PO5);
+static void free__XIQ(void *tmp__ZIQ);
+static __INTEGER hash_code__BKRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__CKRF);
+static void copy__W1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__X1RD,void *other__Y1RD);
+static __BOOLEAN read_operator__FJM();
+static void* operator__name__Y5N(void *typ__05N,void *op__15N);
+static void append_in__BGBC(__ITM_TYPE_MULTI *Self__CGBC,void *buffer__DGBC);
+static void* read_prototype__CKN(__PARSER *Self__DKN,void *styl__EKN);
+static void read_def_local__LYH(__PARSER *Self__MYH);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__WSI(__INTEGER new_count__YSI);
+static void add_last__H1U(__FAST_ARRAYoITM_CODEo *Self__I1U,void *element__J1U);
+static void* copy__42H(void *tmp__A3H);
+static __BOOLEAN fast_has__Q5U(__HASHED_SEToSTRING_CONSTANTo *Self__R5U,void *e__S5U);
+static void restore_context__DAL();
+static void* read_expr_message__KSL(__PARSER *Self__LSL);
+static void free__2SI(void *tmp__4SI);
+static void display_raw__ZJIC(__ITM_TYPE_MULTI *Self__0JIC,void *buffer__1JIC);
+static void put__to__like__IGGG(void *tok__KGGG,void *buf__LGGG,void *key__MGGG);
+static void put__to__like__BNDG(void *tok__DNDG,void *buf__ENDG,void *key__FNDG);
+static void put__to__like__0JFG(void *tok__2JFG,void *buf__3JFG);
+static void put__to__like__NMFG(void *tok__PMFG,void *buf__QMFG,void *key__RMFG);
+static __BOOLEAN is_hexadecimal_digit__3LJE(__CHARACTER Self__4LJE);
+static void* read_constant__WMO();
+static void* read_group__32GB(__PARSER *Self__42GB);
+static void* readlip_expr_operator__BLZB(__PARSER *Self__CLZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__IRKD(__INTEGER new_count__KRKD);
+static void add_last__CKUD(__FAST_ARRAYoLIP_CODEo *Self__DKUD,void *element__EKUD);
+static void* copy__ULID(void *tmp__WLID);
+static void* fast_reference_at__ETRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__FTRD,void *k__GTRD);
+static void* run_expr__2XQD(__LIP_BINARY *Self__3XQD);
+static void* run_expr__10QD(__LIP_UNARY *Self__20QD);
+static void* run_expr__DQUE(__LIP_CALL *Self__EQUE);
+static void* get__LRSE(__LIP_INTEGER *Self__MRSE,__INTEGER i__NRSE);
+static void* get__PVFF(__LIP_STRING *Self__QVFF,void *str__RVFF);
+static void free__RY3F(__LIP_INTEGER *Self__SY3F);
+static void free__52HG(__LIP_STRING *Self__A3HG);
+static void load_directory__is_recursive__5YWF(__LIP_CALL *Self__AZWF,void *path__BZWF,__BOOLEAN is_rec__CZWF);
+static void append_in__ZDIG(__LIP_STRING *Self__0DIG,void *str__1DIG);
+static void print_positif__J2KG(__INTEGER Self__K2KG);
+static __BOOLEAN has__HHMB(__HASHED_SEToSTRING_CONSTANTo *Self__IHMB,void *e__JHMB);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__KGK(__INTEGER new_count__MGK);
+static void add_last__YXU(__FAST_ARRAYoITM_LOCALo *Self__ZXU,void *element__0XU);
+static void free__QGK(void *tmp__SGK);
+static void* copy__Z0J(void *tmp__10J);
+static void** create__FQQB(__INTEGER nb_elements__HQQB);
+static void* read_send_msg__H0N(__PARSER *Self__I0N,void *first_arg__J0N);
+static void* readlip_expr_cmp__VX1B(__PARSER *Self__WX1B);
+static void** create__XSIE(__INTEGER nb_elements__ZSIE);
+static void** create__FOQB(__INTEGER nb_elements__HOQB);
+static void* read_argument__OKP(__PARSER *Self__PKP);
+static void* readlip_expr_binary__SK3B(__PARSER *Self__TK3B);
+static void* readlip_expr_unary__TW4B(__PARSER *Self__UW4B);
+static void* readlip_expr_base__5CFE(__PARSER *Self__ADFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2655,4605 +2663,4616 @@ static void* readlip_expr_base__OEFE(__PARSER *Self__PEFE);
 
 int main(int argc,char **argv)
 {
-  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 *str__QHD,*cmd__HZ;
+  __INTEGER new_count__VEKH,typ_id__OEKH,Self__FEF,limit_up__GEF;
+  __INTEGER idx__LCIH,i__1JEB,typ_id__PRG,new_capacity__WFY;
+  __INTEGER typ_id__1ZDB,new_capacity__QTJC,typ_id__OKJ,typ_id__5KH;
+  __INTEGER new_capacity__WHY,typ_id__BPC,new_capacity__TGX,typ_id__CWQ;
+  __INTEGER typ_id__55Q,new_capacity__NE1,typ_id__POQ,typ_id__VWO;
+  __INTEGER typ_id__2YQ,typ_id__JIK,new_capacity__0AZ,typ_id__MSQ;
+  __INTEGER typ_id__IRR,typ_id__GFK,typ_id__P1J,typ_id__JHM;
+  __INTEGER typ_id__R4NF,new_capacity__IPRF,typ_id__V1F,typ_id__JOTE;
+  __INTEGER typ_id__GIMF,typ_id__OUNF,typ_id__WUMD,typ_id__EVED;
+  __INTEGER new_capacity__IBXD,Self__DHYE,typ_id__KPNF,Self__1EAG;
+  __INTEGER typ_id__JANF,Self__UDAG,typ_id__5ZYB,new_capacity__GEOC;
+  __INTEGER typ_id__E3YB,new_capacity__BIOC,typ_id__4G5B,typ_id__X4HE;
+  __INTEGER typ_id__ZUB,new_capacity__PVW,j__IZ,idx__NLC,typ_id__QCIH;
+  __INTEGER typ_id__4CKB,result__0CIH,__tmp__2CIH,Self__3CIH;
+  __INTEGER result__5CIH,__tmp__BDIH,Self__CDIH,idx__TLEB,idx__TEZB;
+  __INTEGER new_capacity__UEZB,i__VEZB,result__EDIH,__tmp__GDIH;
+  __INTEGER Self__HDIH,typ_id__CHZB,typ_id__LDIH,typ_id__VDIH;
+  __INTEGER typ_id__5DIH,typ_id__0OED,typ_id__CZB,Self__0LWD;
+  __INTEGER typ_id__E3B,typ_id__JEIH,typ_id__W4B,result__TEIH;
+  __INTEGER __tmp__VEIH,Self__WEIH,result__YEIH,__tmp__0EIH,Self__1EIH;
+  __INTEGER result__BFIH,__tmp__DFIH,Self__EFIH,result__GFIH;
+  __INTEGER __tmp__IFIH,Self__JFIH,result__PFIH,__tmp__RFIH,Self__SFIH;
+  __INTEGER result__UFIH,__tmp__WFIH,Self__XFIH,i__4ZEH,j__A0EH;
+  __INTEGER Self__WCHH,result__ZFIH,__tmp__1FIH,Self__2FIH,result__CGIH;
+  __INTEGER __tmp__EGIH,Self__FGIH,result__HGIH,__tmp__JGIH,Self__KGIH;
+  __INTEGER i__K0EH,j__M0EH,Self__CDHH,result__MGIH,__tmp__OGIH;
+  __INTEGER Self__PGIH,result__RGIH,__tmp__TGIH,Self__UGIH,i1__BTKH;
+  __INTEGER i2__CTKH,__tmp__YGIH,Self__0GIH,result__5GIH,len__EHIH;
+  __INTEGER __tmp__FHIH,__tmp__HHIH,Self__IHIH,result__ETC,n__QDHH;
+  __INTEGER Self__GTKH,Self__KZQC,limit_up__LZQC,__tmp__5CYD,Self__ZB5D;
+  __INTEGER i__LTKH,i__QTKH,__tmp__YHYD,Self__LC5D,i__VTKH,i__0TKH;
+  __INTEGER i__5TKH,__tmp__PKTD,Self__IMYD,__tmp__S0QE,Self__3CSE;
+  __INTEGER i__EUKH,i__JUKH,__tmp__ANYD,Self__GD5D,__tmp__2PYD;
+  __INTEGER Self__VD5D,i__OUKH,__tmp__EMTD,Self__PSYD,__tmp__L5QE;
+  __INTEGER Self__PDSE,__tmp__ENTD,Self__4SYD;
+  __POINTER ptr__NEKH,ptr_table__XEKH,next__WEKH,result__YEKH;
+  __POINTER ptr_table__2EKH,next__1EKH,result__3EKH,ptr__KRG;
+  __POINTER ptr_table__BFKH,next__AFKH,result__CFKH,ptr_table__GFKH;
+  __POINTER next__FFKH,result__HFKH,ptr__WZDB,ptr_table__LFKH;
+  __POINTER next__KFKH,result__MFKH,ptr_table__QFKH,next__PFKH;
+  __POINTER result__RFKH,ptr__JKJ,ptr_table__VFKH,next__UFKH;
+  __POINTER result__WFKH,ptr_table__0FKH,next__ZFKH,result__1FKH;
+  __POINTER ptr__0KH,ptr_table__5FKH,next__4FKH,result__AGKH;
+  __POINTER ptr_table__EGKH,next__DGKH,result__FGKH,ptr__2OC;
+  __POINTER ptr_table__JGKH,next__IGKH,result__KGKH,ptr_table__OGKH;
+  __POINTER next__NGKH,result__PGKH,ptr__3VQ,ptr_table__TGKH,next__SGKH;
+  __POINTER result__UGKH,ptr_table__YGKH,next__XGKH,result__ZGKH;
+  __POINTER ptr__05Q,ptr_table__3GKH,next__2GKH,result__4GKH;
+  __POINTER ptr_table__CHKH,next__BHKH,result__DHKH,ptr__KOQ;
+  __POINTER ptr_table__HHKH,next__GHKH,result__IHKH,ptr_table__MHKH;
+  __POINTER next__LHKH,result__NHKH,ptr__QWO,ptr_table__RHKH,next__QHKH;
+  __POINTER result__SHKH,ptr_table__WHKH,next__VHKH,result__XHKH;
+  __POINTER ptr__XYQ,ptr_table__1HKH,next__0HKH,result__2HKH;
+  __POINTER ptr_table__AIKH,next__5HKH,result__BIKH,ptr__EIK;
+  __POINTER ptr_table__FIKH,next__EIKH,result__GIKH,ptr_table__KIKH;
+  __POINTER next__JIKH,result__LIKH,ptr__HSQ,ptr_table__PIKH,next__OIKH;
+  __POINTER result__QIKH,ptr_table__UIKH,next__TIKH,result__VIKH;
+  __POINTER ptr__DRR,ptr_table__ZIKH,next__YIKH,result__0IKH;
+  __POINTER ptr_table__4IKH,next__3IKH,result__5IKH,ptr__BFK;
+  __POINTER ptr_table__DJKH,next__CJKH,result__EJKH,ptr_table__IJKH;
+  __POINTER next__HJKH,result__JJKH,ptr__K1J,ptr_table__NJKH,next__MJKH;
+  __POINTER result__OJKH,ptr_table__SJKH,next__RJKH,result__TJKH;
+  __POINTER ptr__EHM,ptr_table__XJKH,next__WJKH,result__YJKH;
+  __POINTER ptr_table__2JKH,next__1JKH,result__3JKH,ptr__M4NF;
+  __POINTER ptr_table__BKKH,next__AKKH,result__CKKH,ptr_table__GKKH;
+  __POINTER next__FKKH,result__HKKH,ptr__Q1F,ptr_table__LKKH,next__KKKH;
+  __POINTER result__MKKH,ptr_table__QKKH,next__PKKH,result__RKKH;
+  __POINTER ptr__EOTE,ptr_table__VKKH,next__UKKH,result__WKKH;
+  __POINTER ptr_table__0KKH,next__ZKKH,result__1KKH,ptr__BIMF;
+  __POINTER ptr_table__5KKH,next__4KKH,result__ALKH,ptr_table__ELKH;
+  __POINTER next__DLKH,result__FLKH,ptr__JUNF,ptr_table__JLKH;
+  __POINTER next__ILKH,result__KLKH,ptr_table__OLKH,next__NLKH;
+  __POINTER result__PLKH,ptr__RUMD,ptr_table__TLKH,next__SLKH;
+  __POINTER result__ULKH,ptr_table__YLKH,next__XLKH,result__ZLKH;
+  __POINTER ptr__5UED,ptr_table__3LKH,next__2LKH,result__4LKH;
+  __POINTER ptr_table__CMKH,next__BMKH,result__DMKH,result__RWEH;
+  __POINTER ptr_table__HMKH,next__GMKH,result__IMKH,ptr__FPNF;
+  __POINTER ptr_table__PMKH,next__OMKH,result__QMKH,ptr_table__UMKH;
+  __POINTER next__TMKH,result__VMKH,result__ZWEH,ptr_table__ZMKH;
+  __POINTER next__YMKH,result__0MKH,ptr__EANF,ptr_table__BNKH;
+  __POINTER next__ANKH,result__CNKH,ptr_table__GNKH,next__FNKH;
+  __POINTER result__HNKH,result__BXEH,ptr_table__LNKH,next__KNKH;
+  __POINTER result__MNKH,ptr__0ZYB,ptr_table__TNKH,next__SNKH;
+  __POINTER result__UNKH,ptr_table__YNKH,next__XNKH,result__ZNKH;
+  __POINTER ptr__52YB,ptr_table__3NKH,next__2NKH,result__4NKH;
+  __POINTER ptr_table__COKH,next__BOKH,result__DOKH,ptr__ZG5B;
+  __POINTER ptr_table__HOKH,next__GOKH,result__IOKH,ptr_table__MOKH;
+  __POINTER next__LOKH,result__NOKH,ptr__S4HE,ptr_table__ROKH;
+  __POINTER next__QOKH,result__SOKH,ptr_table__WOKH,next__VOKH;
+  __POINTER result__XOKH,ptr__UUB,ptr_table__1OKH,next__0OKH;
+  __POINTER result__2OKH,ptr_table__APKH,next__5OKH,result__BPKH;
+  __POINTER ptr__PCIH,ptr_table__FPKH,next__EPKH,result__GPKH;
+  __POINTER ptr_table__KPKH,next__JPKH,result__LPKH,ptr__ZCKB;
+  __POINTER ptr_table__SPKH,next__RPKH,result__TPKH,ptr_table__XPKH;
+  __POINTER next__WPKH,result__YPKH,ptr__3GZB,ptr_table__2PKH;
+  __POINTER next__1PKH,result__3PKH,ptr_table__BQKH,next__AQKH;
+  __POINTER result__CQKH,ptr__KDIH,ptr_table__GQKH,next__FQKH;
+  __POINTER result__HQKH,ptr_table__LQKH,next__KQKH,result__MQKH;
+  __POINTER ptr__UDIH,ptr_table__QQKH,next__PQKH,result__RQKH;
+  __POINTER ptr_table__VQKH,next__UQKH,result__WQKH,ptr__4DIH;
+  __POINTER ptr_table__3QKH,next__2QKH,result__4QKH,ptr_table__CRKH;
+  __POINTER next__BRKH,result__DRKH,ptr__VOED,ptr_table__HRKH;
+  __POINTER next__GRKH,result__IRKH,ptr_table__MRKH,next__LRKH;
+  __POINTER result__NRKH,ptr__3YB,ptr_table__RRKH,next__QRKH;
+  __POINTER result__SRKH,ptr_table__WRKH,next__VRKH,result__XRKH;
+  __POINTER result__JZEH,ptr_table__1RKH,next__0RKH,result__2RKH;
+  __POINTER ptr__52B,ptr_table__DSKH,next__CSKH,result__ESKH;
+  __POINTER ptr_table__ISKH,next__HSKH,result__JSKH,ptr__IEIH;
+  __POINTER ptr_table__NSKH,next__MSKH,result__OSKH,ptr_table__SSKH;
+  __POINTER next__RSKH,result__TSKH,ptr__R4B,ptr_table__XSKH,next__WSKH;
+  __POINTER result__YSKH,ptr_table__2SKH,next__1SKH,result__3SKH;
+  __UINTEGER_32 sz__PEKH,a__QEKH,new_size__REKH,t__SEKH,a__TEKH;
+  __UINTEGER_32 new_size__5EKH,lab_type__4EKH,sz__MRG,a__FZGH;
+  __UINTEGER_32 new_size__GZGH,t__KZGH,a__JZGH,new_size__JFKH;
+  __UINTEGER_32 lab_type__IFKH,sz__YZDB,a__NZGH,new_size__OZGH,t__SZGH;
+  __UINTEGER_32 a__RZGH,new_size__TFKH,lab_type__SFKH,sz__LKJ,a__VZGH;
+  __UINTEGER_32 new_size__WZGH,t__0ZGH,a__ZZGH,new_size__3FKH;
+  __UINTEGER_32 lab_type__2FKH,sz__2KH,a__3ZGH,new_size__4ZGH,t__C0GH;
+  __UINTEGER_32 a__B0GH,new_size__HGKH,lab_type__GGKH,sz__4OC,a__F0GH;
+  __UINTEGER_32 new_size__G0GH,t__K0GH,a__J0GH,new_size__RGKH;
+  __UINTEGER_32 lab_type__QGKH,sz__5VQ,a__N0GH,new_size__O0GH,t__S0GH;
+  __UINTEGER_32 a__R0GH,new_size__1GKH,lab_type__0GKH,sz__25Q,a__V0GH;
+  __UINTEGER_32 new_size__W0GH,t__00GH,a__Z0GH,new_size__FHKH;
+  __UINTEGER_32 lab_type__EHKH,sz__MOQ,a__30GH,new_size__40GH,t__C1GH;
+  __UINTEGER_32 a__B1GH,new_size__PHKH,lab_type__OHKH,sz__SWO,a__F1GH;
+  __UINTEGER_32 new_size__G1GH,t__K1GH,a__J1GH,new_size__ZHKH;
+  __UINTEGER_32 lab_type__YHKH,sz__ZYQ,a__N1GH,new_size__O1GH,t__S1GH;
+  __UINTEGER_32 a__R1GH,new_size__DIKH,lab_type__CIKH,sz__GIK,a__V1GH;
+  __UINTEGER_32 new_size__W1GH,t__01GH,a__Z1GH,new_size__NIKH;
+  __UINTEGER_32 lab_type__MIKH,sz__JSQ,a__5BFH,new_size__ACFH,t__ECFH;
+  __UINTEGER_32 a__DCFH,new_size__XIKH,lab_type__WIKH,sz__FRR,a__31GH;
+  __UINTEGER_32 new_size__41GH,t__C2GH,a__B2GH,new_size__BJKH;
+  __UINTEGER_32 lab_type__AJKH,sz__DFK,a__F2GH,new_size__G2GH,t__K2GH;
+  __UINTEGER_32 a__J2GH,new_size__LJKH,lab_type__KJKH,sz__M1J,a__N2GH;
+  __UINTEGER_32 new_size__O2GH,t__S2GH,a__R2GH,new_size__VJKH;
+  __UINTEGER_32 lab_type__UJKH,sz__GHM,a__V2GH,new_size__W2GH,t__02GH;
+  __UINTEGER_32 a__Z2GH,new_size__5JKH,lab_type__4JKH,sz__O4NF,a__32GH;
+  __UINTEGER_32 new_size__42GH,t__C3GH,a__B3GH,new_size__JKKH;
+  __UINTEGER_32 lab_type__IKKH,sz__S1F,a__J3EH,new_size__IVG,t__RWG;
+  __UINTEGER_32 a__P3EH,new_size__TKKH,lab_type__SKKH,sz__GOTE,a__F3GH;
+  __UINTEGER_32 new_size__G3GH,t__K3GH,a__J3GH,new_size__3KKH;
+  __UINTEGER_32 lab_type__2KKH,sz__DIMF,a__N3GH,new_size__O3GH,t__S3GH;
+  __UINTEGER_32 a__R3GH,new_size__HLKH,lab_type__GLKH,sz__LUNF,a__V3GH;
+  __UINTEGER_32 new_size__W3GH,t__03GH,a__Z3GH,new_size__RLKH;
+  __UINTEGER_32 lab_type__QLKH,sz__TUMD,a__33GH,new_size__43GH,t__C4GH;
+  __UINTEGER_32 a__B4GH,new_size__1LKH,lab_type__0LKH,sz__BVED,a__F4GH;
+  __UINTEGER_32 new_size__G4GH,t__K4GH,a__J4GH,new_size__FMKH;
+  __UINTEGER_32 lab_type__EMKH,sz__SWEH,a__XWEH,new_size__TWEH;
+  __UINTEGER_32 new_size2__UWEH,a__N4GH,new_size__O4GH,sz__HPNF,a__U4GH;
+  __UINTEGER_32 new_size__V4GH,t__Z4GH,a__Y4GH,new_size__XMKH;
+  __UINTEGER_32 lab_type__WMKH,sz__0WEH,a__5WEH,new_size__1WEH;
+  __UINTEGER_32 new_size2__2WEH,a__24GH,new_size__34GH,sz__GANF,a__D5GH;
+  __UINTEGER_32 new_size__E5GH,t__I5GH,a__H5GH,new_size__JNKH;
+  __UINTEGER_32 lab_type__INKH,sz__CXEH,a__HXEH,new_size__DXEH;
+  __UINTEGER_32 new_size2__EXEH,a__L5GH,new_size__M5GH,sz__2ZYB,a__S5GH;
+  __UINTEGER_32 new_size__T5GH,t__X5GH,a__W5GH,new_size__1NKH;
+  __UINTEGER_32 lab_type__0NKH,sz__B3YB,a__05GH,new_size__15GH,t__55GH;
+  __UINTEGER_32 a__45GH,new_size__FOKH,lab_type__EOKH,sz__1G5B,a__CAHH;
+  __UINTEGER_32 new_size__DAHH,t__HAHH,a__GAHH,new_size__POKH;
+  __UINTEGER_32 lab_type__OOKH,sz__U4HE,a__KAHH,new_size__LAHH,t__PAHH;
+  __UINTEGER_32 a__OAHH,new_size__ZOKH,lab_type__YOKH,sz__WUB,a__SAHH;
+  __UINTEGER_32 new_size__TAHH,t__XAHH,a__WAHH,new_size__DPKH;
+  __UINTEGER_32 lab_type__CPKH,sz__RCIH,a__SCIH,new_size__TCIH,t__UCIH;
+  __UINTEGER_32 a__VCIH,new_size__NPKH,lab_type__MPKH,sz__1CKB,a__1AHH;
+  __UINTEGER_32 new_size__2AHH,t__ABHH,a__5AHH,new_size__0PKH;
+  __UINTEGER_32 lab_type__ZPKH,sz__5GZB,a__GBHH,new_size__HBHH,t__LBHH;
+  __UINTEGER_32 a__KBHH,new_size__EQKH,lab_type__DQKH,sz__MDIH,a__NDIH;
+  __UINTEGER_32 new_size__ODIH,t__PDIH,a__QDIH,new_size__OQKH;
+  __UINTEGER_32 lab_type__NQKH,sz__WDIH,a__XDIH,new_size__YDIH,t__ZDIH;
+  __UINTEGER_32 a__0DIH,new_size__YQKH,lab_type__XQKH,sz__AEIH,a__BEIH;
+  __UINTEGER_32 new_size__CEIH,t__DEIH,a__EEIH,new_size__FRKH;
+  __UINTEGER_32 lab_type__ERKH,sz__XOED,a__ZYFH,new_size__0YFH,t__4YFH;
+  __UINTEGER_32 a__3YFH,new_size__PRKH,lab_type__ORKH,sz__5YB,a__UBHH;
+  __UINTEGER_32 new_size__VBHH,t__ZBHH,a__YBHH,new_size__ZRKH;
+  __UINTEGER_32 lab_type__YRKH,sz__KZEH,a__PZEH,new_size__LZEH;
+  __UINTEGER_32 new_size2__MZEH,a__2BHH,new_size__3BHH,sz__B3B,a__DCHH;
+  __UINTEGER_32 new_size__ECHH,t__ICHH,a__HCHH,new_size__LSKH;
+  __UINTEGER_32 lab_type__KSKH,sz__KEIH,a__LEIH,new_size__MEIH,t__NEIH;
+  __UINTEGER_32 a__OEIH,new_size__VSKH,lab_type__USKH,sz__T4B,a__MMFH;
+  __UINTEGER_32 new_size__NMFH,t__RMFH,a__QMFH,new_size__5SKH;
+  __UINTEGER_32 lab_type__4SKH;
+  __STRING *Self__ZJEB,*new__RK1G,*new__TK1G,*Self__3ZEH,*Self__J0EH;
+  __STRING *Self__WGIH,*Self__NDHH,*Self__PDHH,*Self__FTKH;
+  __ITM_TYPE_PARAMETER *result__GSQ,*Self__4YV;
+  __LIP_BOOLEAN *result__IUNF;
+  void *result__LMKH,*result__3MKH,*result__PNKH,*result__5RKH;
+  void *txt__1,*fmt_name__YNC,*k__XCIH,*__tmp__JOD,*k__LLEB;
+  void *element__QBHH,*i__SDIH,*element__XREC,*i__GEIH,*__tmp__4B;
+  void *__tmp__2H,*title__SITD,*__tmp__KFYD,*__tmp__XFYD,*__tmp__AGYD;
+  void *__tmp__VGYD,*__tmp__EKTD,*__tmp__DKYD,*__tmp__QKYD,*__tmp__ZKYD;
+  void *__tmp__OLYD,*__tmp__4KTD,*t__L0QE,*__tmp__FLTD,*__tmp__32QE;
+  void *__tmp__K3QE,*__tmp__T3QE,*__tmp__I4QE,*__tmp__KPYD,*__tmp__1LTD;
+  void *__tmp__GSYD,*__tmp__SMTD,*t__E5QE,*__tmp__ZMTD,*__tmp__VBRE;
   void *p__AB;
-  __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;
+  __STRING_CONSTANT *result__OCIH,*Self__ISS,*Self__YAHH,*Self__5IS;
+  __STRING_CONSTANT *Self__1CIH,*Self__ADIH,*Self__FDIH,*Self__QK1G;
+  __STRING_CONSTANT *Self__SK1G,*Self__DTKH,*Self__NTKH,*Self__STKH;
+  __STRING_CONSTANT *Self__XTKH,*Self__2TKH,*Self__BUKH,*Self__GUKH;
+  __STRING_CONSTANT *Self__LUKH,*Self__QUKH;
+  __POSITION pos__FG1G,pos__PG1G,pos__BI1G,pos__DI1G,pos__FI1G;
+  __POSITION pos__HI1G,pos__JI1G,__tmp__UOYD,__tmp__ZOYD,__tmp__QRYD;
+  __POSITION __tmp__VRYD,__tmp__5ARE,__tmp__EBRE;
+  __TYPE_ID *result__HEIH,*result__Q4B;
   void *ent__TB;
-  __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;
+  __DIRECTORY_UNIX *Self__CHSD;
+  void *dir__EHSD,*dir__MHSD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__UHRD;
+  __PROTOTYPE *Self__QITD;
+  void *s__TITD,*s__1CYD,*s__UHYD,*s__O0QE,*s__2MYD,*s__YPYD,*s__H5QE;
+  void *__tmp__LNTD;
+  void *__tmp__0JTD,*__tmp__UEYD,*__tmp__NJYD,*__tmp__H2QE,*__tmp__RLTD;
+  void *__tmp__CPYD,*__tmp__4RYD,*__tmp__NBRE;
+  __SECTION_ *Self__O41G,*Self__P41G,*Self__Q41G,*Self__R41G,*Self__S41G;
+  void *__tmp__CFYD,*__tmp__1JYD,*__tmp__V2QE;
+  void *__tmp__EFYD,*ts__BFYD,*__tmp__3JYD,*ts__0JYD,*__tmp__X2QE;
+  void *ts__U2QE;
+  __CHARACTER *arg__PHD,*Self__MCIH,*p__0JEB,*path__KZ,*Self__BLC;
+  __CHARACTER *Self__XCHH,*model__YCHH,*Self__DDHH,*model__EDHH;
+  __CHARACTER *__tmp__XGIH,*Self__ZGIH;
+  __FAST_ARRAYoSTRINGo *result__MEKH,*Self__UEKH,*result__P1F,*Self__4BT;
+  void *result__OHD;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__JRG,*Self__TET;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__VZDB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__JKCC;
+  __FAST_ARRAYoPROTOTYPEo *result__IKJ,*Self__P4T;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__ZKH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0IT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WCIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JLEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PEIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JCHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3EIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NCHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__LFIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RCHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1SVB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__4FIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__3CHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__I4S;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JDHH;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__1OC,*Self__JLS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__2VQ,*Self__KZV;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__Z5Q,*Self__2AW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__JOQ,*Self__HXV;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__PWO,*Self__QFV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__WYQ,*Self__32V;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__DIK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__CHU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__CRR,*Self__FHW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__AFK,*Self__GEU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__J1J,*Self__DBU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__DHM,*Self__JQU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__L4NF,*Self__XCQF;
+  __FAST_ARRAYoLIP_INTEGERo *result__DOTE,*Self__4DXE;
+  __FAST_ARRAYoLIP_STRINGo *result__AIMF,*Self__JVPF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__QUMD,*Self__DGUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__4UED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__MKSD;
+  void **Result__DSHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__EPNF,*Self__S3PF;
+  void **Result__G50F;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__DANF,*Self__TYPF;
+  void **Result__N00F;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__ZZYB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__ZUFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__42YB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__YXFC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__YG5B,*Self__GIHC;
+  __FAST_ARRAYoITM_SLOTo *result__R4HE,*Self__MHWE;
+  __HASHED_SEToABSTRACT_STRINGo *result__TUB,*Self__C4R;
+  __BOOLEAN __tmp__U0,__tmp__P1,result__T1NB,__tmp__31,result__F2NB;
+  __BOOLEAN __tmp__L2,result__X2NB,__tmp__Y2,result__J3NB,__tmp__14;
+  __BOOLEAN result__OPKH,result__1NEB,result__ZQKH,result__JEG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__ATKH;
+  __BOOLEAN is_first_cur__0CYD,__tmp__PDYD,__tmp__RFYD,__tmp__OFYD;
+  __BOOLEAN result__KTKH,__tmp__FGYD,result__PTKH,__tmp__GGYD;
+  __BOOLEAN __tmp__JGYD,is_first_cur__THYD,result__UTKH,__tmp__IIYD;
+  __BOOLEAN __tmp__KKYD,__tmp__HKYD,result__ZTKH,__tmp__4KYD;
+  __BOOLEAN result__4TKH,__tmp__5KYD,__tmp__CLYD,is_first_cur__N0QE;
+  __BOOLEAN __tmp__C1QE,__tmp__E3QE,__tmp__B3QE,result__DUKH;
+  __BOOLEAN __tmp__Y3QE,result__IUKH,__tmp__Z3QE,__tmp__23QE;
+  __BOOLEAN is_first__1MYD,__tmp__QNYD,is_first__XPYD,result__NUKH;
+  __BOOLEAN __tmp__MQYD,is_first__G5QE,__tmp__15QE;
+  __CHARACTER result__PPKH,result__0QKH,result__1JDH,result__K5CH;
+  __CHARACTER Self__HTKH,result__ITKH,__tmp__1EYD,__tmp__UJYD;
+  __CHARACTER __tmp__O2QE;
+  __LINKED_LISToSTRING_CONSTANTo *result__YCKB,*Self__RBHH,*Self__WREC;
+  void *node__YCIH,*node__ULEB,*node1__XEZB,*node2__YEZB,*__tmp__BNEB;
+  void *node__REIH,*node__LCHH,*node__5EIH,*node__PCHH,*node__NFIH;
+  void *node__TCHH,*node__FTVB,*node__AGIH,*node__5CHH,*node__T4S;
+  void *node__LDHH;
+  void **old_buckets__WEZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__2GZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SBGC;
+  void *def__ZNEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__JDIH,*Self__RDIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__TDIH,*Self__1DIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__3DIH,*Self__FEIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__UOED,*Self__0JSD;
+  __FAST_ARRAYoSLOTo *result__2YB,*Self__GAS;
+  void **Result__4H1C;
+  __FAST_ARRAYoTYPE_IDo *result__42B,*Self__FDS;
+  __INTEGER_8 __tmp__MDYD,__tmp__FIYD,__tmp__YKTD,__tmp__50QE;
+  __INTEGER_8 __tmp__NNYD,__tmp__JQYD,__tmp__MMTD,__tmp__Y5QE;
   arg_count  = argc;
   arg_vector = argv;
   parent_numeric__J=NUMERIC__;
-  clone_allocation_size__FTB= 0;
+  clone_allocation_size__NTB= 0;
   STRING_CONSTANT__->count__DD=((__INTEGER )((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;
+  STRING__->count__EGC= 0;
+  STRING_CONSTANT__->storage__QMO=((__CHARACTER *)(NULL));
+  STRING__->storage__23R=NULL;
+  nb_page__CPJ= 0;
+  MEMORY__->map_size_and_id__YTB= 0;
+  capacity_max__L24= 0;
+  get_begin_memory__G5PB=((__POINTER )(NULL));
+  begin_memory__3SH=((__POINTER )(NULL));
+  MEMORY__->map_previous_linear__XTB= 0;
+  first_free__VAVB=NULL;
+  MEMORY__->map_next_free__ZTB=NULL;
+  MEMORY__->map_previous_free__0TB=NULL;
+  STRING__->capacity__T3R= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__ZUR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__UUR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__0VR= 0;
   list__FK=NULL;
-  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__;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__FVR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__RVR=NULL;
+  string_tmp__VH=create__ZBB( 256);
+  is_shorter__LZ=FALSE__;
+  ARRAYED_COLLECTIONoSTRINGo__->upper__UKC= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__HCT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__SCT=NULL;
+  FAST_ARRAYoSTRINGo__->parent_arrayed_collection__RKC=(*ARRAYED_COLLECTIONoSTRINGo__);
+  arg__PHD=NULL;
+  str__QHD=NULL;
+  new_count__VEKH=((__INTEGER )(arg_count));
+  result__MEKH=NULL;
+  ptr__NEKH=((__POINTER )(NULL));
+  typ_id__OEKH= 0;
+  sz__PEKH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__PEKH ==  0)) {
+    result__MEKH=FAST_ARRAYoSTRINGo__;
   } else {
-    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);
+    typ_id__OEKH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PEKH);
+    if ((typ_id__OEKH == (__INTEGER)(-  1))) {
+      a__QEKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__REKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEKH + a__QEKH) & (__UINTEGER_32)(~ a__QEKH));
+      ptr_table__XEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__REKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WEKH=((__POINTER )(NULL));
+      result__YEKH=((__POINTER *)ptr_table__XEKH)[ 0];
+      if ((result__YEKH == (void *)NULL)) {
+        result__YEKH=new_lab__QOJ(new_size__REKH);
+        next__WEKH=(void *)((unsigned long)result__YEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REKH)));
+        ((__POINTER *)next__WEKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XEKH)[ 0]=next__WEKH;
+      } else {
+        next__WEKH=((__POINTER *)result__YEKH)[ 0];
+        if ((next__WEKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YEKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__REKH <<  1)) <=  4096)) {
+            next__WEKH=(void *)((unsigned long)result__YEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__REKH)));
+          } else {
+            next__WEKH=new_lab__QOJ(new_size__REKH);
+          };
+          ((__POINTER *)next__WEKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XEKH)[ 0]=next__WEKH;
+        } else {
+          ((__POINTER *)result__YEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YEKH=next__WEKH;
+        };
+      };
+      ptr__NEKH=result__YEKH;
+    } else {
+      t__SEKH=((__UINTEGER_32 )typ_id__OEKH);
+      a__TEKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5EKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PEKH + a__TEKH) & (__UINTEGER_32)(~ a__TEKH));
+      ptr_table__2EKH=((__POINTER )(&(table_type[(t__SEKH)])));
+      lab_type__4EKH=(__UINTEGER_32)(t__SEKH |  1);
+      next__1EKH=((__POINTER )(NULL));
+      result__3EKH=((__POINTER *)ptr_table__2EKH)[ 0];
+      if ((result__3EKH == (void *)NULL)) {
+        result__3EKH=new_lab__QOJ(lab_type__4EKH);
+        next__1EKH=(void *)((unsigned long)result__3EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EKH)));
+        ((__POINTER *)next__1EKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2EKH)[ 0]=next__1EKH;
+      } else {
+        next__1EKH=((__POINTER *)result__3EKH)[ 0];
+        if ((next__1EKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3EKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5EKH <<  1)) <=  4096)) {
+            next__1EKH=(void *)((unsigned long)result__3EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EKH)));
+          } else {
+            next__1EKH=new_lab__QOJ(lab_type__4EKH);
+          };
+          ((__POINTER *)next__1EKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2EKH)[ 0]=next__1EKH;
+        } else {
+          ((__POINTER *)result__3EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3EKH=next__1EKH;
+        };
+      };
+      ptr__NEKH=result__3EKH;
+    };
+    result__MEKH=((__FAST_ARRAYoSTRINGo *)ptr__NEKH);
+    *(result__MEKH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__UEKH=((__FAST_ARRAYoSTRINGo *)result__MEKH);
+  if ((Self__UEKH->parent_arrayed_collection__RKC.capacity__HCT < new_count__VEKH)) {
+    Self__UEKH->parent_arrayed_collection__RKC.storage__SCT=create__XCRB(new_count__VEKH);
+    Self__UEKH->parent_arrayed_collection__RKC.capacity__HCT=new_count__VEKH;
+  };
+  Self__UEKH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  result__OHD=result__MEKH;
+  Self__FEF= 0;
+  limit_up__GEF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__FEF <= limit_up__GEF)) {
+    arg__PHD=((__CHARACTER *)(arg_vector[(Self__FEF)]));
+    Self__MCIH=((__CHARACTER *)arg__PHD);
+    idx__LCIH= 0;
+    while ((! ((idx__LCIH >  1024) || ('\0' == Self__MCIH[idx__LCIH])))) {
+      idx__LCIH=(__INTEGER)(idx__LCIH +  1);
+    };
+    str__QHD=create__ZBB(idx__LCIH);
+    Self__ZJEB=((__STRING *)str__QHD);
+    p__0JEB=arg__PHD;
+    i__1JEB= 0;
+    Self__ZJEB->count__EGC= 0;
+    while ((((__CHARACTER *)p__0JEB)[i__1JEB] != '\0')) {
+      add_last__UHT(Self__ZJEB,((__CHARACTER *)p__0JEB)[i__1JEB]);
+      i__1JEB=(__INTEGER)(i__1JEB +  1);
+    };
+    add_last__TNV(result__OHD,str__QHD);
+    Self__FEF=(__INTEGER)(Self__FEF +  1);
   };
   output_name__DI=NULL;
-  format_name__H1=NULL;
-  is_short_code__V1=FALSE__;
-  is_short_private__D2=FALSE__;
+  format_name__N1=NULL;
+  is_short_code__11=FALSE__;
+  is_short_private__J2=FALSE__;
   is_short_recursive__JB=FALSE__;
   is_shorter2__VI=FALSE__;
   input_name__3B=NULL;
-  FILE_SYSTEM__->parent_directory__XFD=1;
-  string_tmp__1ED=create__TBB( 255);
+  FILE_SYSTEM__->parent_directory__2FD=1;
+  string_tmp__AFD=create__ZBB( 255);
   ENTRY__->path__BD=NULL;
-  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__;
+  ENTRY__->name__QJT=NULL;
+  ENTRY_UNIX__->parent_entry__FFD=(*ENTRY__);
+  FILE_UNIX__->parent_entry_unix__05E=(*ENTRY_UNIX__);
+  DIRECTORY_UNIX__->parent_entry_unix__GFD=(*ENTRY_UNIX__);
+  DIRECTORY__->list__4DRD=NULL;
+  DIRECTORY_UNIX__->parent_directory__HFD=(*DIRECTORY__);
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__AXS=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__1WS= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__BYS= 0;
+  result__JRG=NULL;
+  ptr__KRG=((__POINTER )(NULL));
+  typ_id__PRG= 0;
+  sz__MRG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__MRG ==  0)) {
+    result__JRG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    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);
+    typ_id__PRG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MRG);
+    if ((typ_id__PRG == (__INTEGER)(-  1))) {
+      a__FZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MRG + a__FZGH) & (__UINTEGER_32)(~ a__FZGH));
+      ptr_table__BFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__AFKH=((__POINTER )(NULL));
+      result__CFKH=((__POINTER *)ptr_table__BFKH)[ 0];
+      if ((result__CFKH == (void *)NULL)) {
+        result__CFKH=new_lab__QOJ(new_size__GZGH);
+        next__AFKH=(void *)((unsigned long)result__CFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZGH)));
+        ((__POINTER *)next__AFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BFKH)[ 0]=next__AFKH;
+      } else {
+        next__AFKH=((__POINTER *)result__CFKH)[ 0];
+        if ((next__AFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CFKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GZGH <<  1)) <=  4096)) {
+            next__AFKH=(void *)((unsigned long)result__CFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZGH)));
+          } else {
+            next__AFKH=new_lab__QOJ(new_size__GZGH);
+          };
+          ((__POINTER *)next__AFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BFKH)[ 0]=next__AFKH;
+        } else {
+          ((__POINTER *)result__CFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CFKH=next__AFKH;
+        };
+      };
+      ptr__KRG=result__CFKH;
+    } else {
+      t__KZGH=((__UINTEGER_32 )typ_id__PRG);
+      a__JZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__MRG + a__JZGH) & (__UINTEGER_32)(~ a__JZGH));
+      ptr_table__GFKH=((__POINTER )(&(table_type[(t__KZGH)])));
+      lab_type__IFKH=(__UINTEGER_32)(t__KZGH |  1);
+      next__FFKH=((__POINTER )(NULL));
+      result__HFKH=((__POINTER *)ptr_table__GFKH)[ 0];
+      if ((result__HFKH == (void *)NULL)) {
+        result__HFKH=new_lab__QOJ(lab_type__IFKH);
+        next__FFKH=(void *)((unsigned long)result__HFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFKH)));
+        ((__POINTER *)next__FFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GFKH)[ 0]=next__FFKH;
+      } else {
+        next__FFKH=((__POINTER *)result__HFKH)[ 0];
+        if ((next__FFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HFKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JFKH <<  1)) <=  4096)) {
+            next__FFKH=(void *)((unsigned long)result__HFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFKH)));
+          } else {
+            next__FFKH=new_lab__QOJ(lab_type__IFKH);
+          };
+          ((__POINTER *)next__FFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GFKH)[ 0]=next__FFKH;
+        } else {
+          ((__POINTER *)result__HFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HFKH=next__FFKH;
+        };
+      };
+      ptr__KRG=result__HFKH;
+    };
+    result__JRG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__KRG);
+    *(result__JRG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__TET=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__JRG);
+  new_capacity__WFY=prime_number_ceiling__K01( 193);
+  Self__TET->buckets__AXS=create__K33(new_capacity__WFY);
+  Self__TET->capacity__1WS=new_capacity__WFY;
+  Self__TET->count__BYS= 0;
+  alias__RFD=result__JRG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__MXS=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__YXS=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__OOOB=NULL;
+  string_tmp2__AYAC=create__ZBB( 255);
+  string_tmp3__GYAC=create__ZBB( 255);
+  ITM_OBJECT__->position__RAJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__JEU='\0';
+  NAMED__->style__25T='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  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__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__ELBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__5KBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__EMBC= 0;
+  result__VZDB=NULL;
+  ptr__WZDB=((__POINTER )(NULL));
+  typ_id__1ZDB= 0;
+  sz__YZDB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__YZDB ==  0)) {
+    result__VZDB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__1ZDB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YZDB);
+    if ((typ_id__1ZDB == (__INTEGER)(-  1))) {
+      a__NZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YZDB + a__NZGH) & (__UINTEGER_32)(~ a__NZGH));
+      ptr_table__LFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KFKH=((__POINTER )(NULL));
+      result__MFKH=((__POINTER *)ptr_table__LFKH)[ 0];
+      if ((result__MFKH == (void *)NULL)) {
+        result__MFKH=new_lab__QOJ(new_size__OZGH);
+        next__KFKH=(void *)((unsigned long)result__MFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZGH)));
+        ((__POINTER *)next__KFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LFKH)[ 0]=next__KFKH;
+      } else {
+        next__KFKH=((__POINTER *)result__MFKH)[ 0];
+        if ((next__KFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MFKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OZGH <<  1)) <=  4096)) {
+            next__KFKH=(void *)((unsigned long)result__MFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZGH)));
+          } else {
+            next__KFKH=new_lab__QOJ(new_size__OZGH);
+          };
+          ((__POINTER *)next__KFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LFKH)[ 0]=next__KFKH;
+        } else {
+          ((__POINTER *)result__MFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MFKH=next__KFKH;
+        };
+      };
+      ptr__WZDB=result__MFKH;
+    } else {
+      t__SZGH=((__UINTEGER_32 )typ_id__1ZDB);
+      a__RZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YZDB + a__RZGH) & (__UINTEGER_32)(~ a__RZGH));
+      ptr_table__QFKH=((__POINTER )(&(table_type[(t__SZGH)])));
+      lab_type__SFKH=(__UINTEGER_32)(t__SZGH |  1);
+      next__PFKH=((__POINTER )(NULL));
+      result__RFKH=((__POINTER *)ptr_table__QFKH)[ 0];
+      if ((result__RFKH == (void *)NULL)) {
+        result__RFKH=new_lab__QOJ(lab_type__SFKH);
+        next__PFKH=(void *)((unsigned long)result__RFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TFKH)));
+        ((__POINTER *)next__PFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QFKH)[ 0]=next__PFKH;
+      } else {
+        next__PFKH=((__POINTER *)result__RFKH)[ 0];
+        if ((next__PFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RFKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TFKH <<  1)) <=  4096)) {
+            next__PFKH=(void *)((unsigned long)result__RFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TFKH)));
+          } else {
+            next__PFKH=new_lab__QOJ(lab_type__SFKH);
+          };
+          ((__POINTER *)next__PFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QFKH)[ 0]=next__PFKH;
+        } else {
+          ((__POINTER *)result__RFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RFKH=next__PFKH;
+        };
+      };
+      ptr__WZDB=result__RFKH;
+    };
+    result__VZDB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__WZDB);
+    *(result__VZDB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__JKCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__VZDB);
+  new_capacity__QTJC=prime_number_ceiling__K01( 193);
+  Self__JKCC->buckets__ELBC=create__0GTC(new_capacity__QTJC);
+  Self__JKCC->capacity__5KBC=new_capacity__QTJC;
+  Self__JKCC->count__EMBC= 0;
+  prototype_dico__KPS=result__VZDB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__QLBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__1LBC=NULL;
+  PROTOTYPE__->filename__CNG=NULL;
+  PROTOTYPE__->shortname__TEE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__G5AC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__I5AC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__EABC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__BJE=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__FUP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__LAE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__CJE=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__STT=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__FDU= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__FPT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__Y4T= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  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__;
+  result__IKJ=NULL;
+  ptr__JKJ=((__POINTER )(NULL));
+  typ_id__OKJ= 0;
+  sz__LKJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__LKJ ==  0)) {
+    result__IKJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    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__;
+    typ_id__OKJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LKJ);
+    if ((typ_id__OKJ == (__INTEGER)(-  1))) {
+      a__VZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKJ + a__VZGH) & (__UINTEGER_32)(~ a__VZGH));
+      ptr_table__VFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UFKH=((__POINTER )(NULL));
+      result__WFKH=((__POINTER *)ptr_table__VFKH)[ 0];
+      if ((result__WFKH == (void *)NULL)) {
+        result__WFKH=new_lab__QOJ(new_size__WZGH);
+        next__UFKH=(void *)((unsigned long)result__WFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WZGH)));
+        ((__POINTER *)next__UFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VFKH)[ 0]=next__UFKH;
+      } else {
+        next__UFKH=((__POINTER *)result__WFKH)[ 0];
+        if ((next__UFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WFKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__WZGH <<  1)) <=  4096)) {
+            next__UFKH=(void *)((unsigned long)result__WFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WZGH)));
+          } else {
+            next__UFKH=new_lab__QOJ(new_size__WZGH);
+          };
+          ((__POINTER *)next__UFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VFKH)[ 0]=next__UFKH;
+        } else {
+          ((__POINTER *)result__WFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WFKH=next__UFKH;
+        };
+      };
+      ptr__JKJ=result__WFKH;
+    } else {
+      t__0ZGH=((__UINTEGER_32 )typ_id__OKJ);
+      a__ZZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3FKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKJ + a__ZZGH) & (__UINTEGER_32)(~ a__ZZGH));
+      ptr_table__0FKH=((__POINTER )(&(table_type[(t__0ZGH)])));
+      lab_type__2FKH=(__UINTEGER_32)(t__0ZGH |  1);
+      next__ZFKH=((__POINTER )(NULL));
+      result__1FKH=((__POINTER *)ptr_table__0FKH)[ 0];
+      if ((result__1FKH == (void *)NULL)) {
+        result__1FKH=new_lab__QOJ(lab_type__2FKH);
+        next__ZFKH=(void *)((unsigned long)result__1FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FKH)));
+        ((__POINTER *)next__ZFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0FKH)[ 0]=next__ZFKH;
+      } else {
+        next__ZFKH=((__POINTER *)result__1FKH)[ 0];
+        if ((next__ZFKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1FKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3FKH <<  1)) <=  4096)) {
+            next__ZFKH=(void *)((unsigned long)result__1FKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3FKH)));
+          } else {
+            next__ZFKH=new_lab__QOJ(lab_type__2FKH);
+          };
+          ((__POINTER *)next__ZFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0FKH)[ 0]=next__ZFKH;
+        } else {
+          ((__POINTER *)result__1FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1FKH=next__ZFKH;
+        };
+      };
+      ptr__JKJ=result__1FKH;
+    };
+    result__IKJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__JKJ);
+    *(result__IKJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__P4T=((__FAST_ARRAYoPROTOTYPEo *)result__IKJ);
+  if ((Self__P4T->parent_arrayed_collection__AJ.capacity__Y4T <  512)) {
+    Self__P4T->parent_arrayed_collection__AJ.storage__FPT=create__ECSB( 512);
+    Self__P4T->parent_arrayed_collection__AJ.capacity__Y4T= 512;
+  };
+  Self__P4T->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__IKJ;
+  PROTOTYPE__->index__DKG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__I3GD=NULL;
+  string_tmp__3RX=create__ZBB( 128);
+  PROTOTYPE__->source__3BC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__04FC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__L2BC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__FNGC= 0;
+  PROTOTYPE__->slot_list__XQS=NULL;
+  object__ZBC=NULL;
+  source__5BC=NULL;
+  position__CCC= 0;
+  pos_cur__FCC= 0;
+  pos_line__GCC= 0;
+  pos_col__HCC= 0;
+  string_tmp3__0SD=create__ZBB( 256);
+  string_tmp4__2SD=create__ZBB( 256);
+  type_error__2KG= 0;
+  msg_err__3KG=create__ZBB( 256);
+  is_active_short__OCC=FALSE__;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__04S=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__V4S= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__1HY= 0;
+  result__ZKH=NULL;
+  ptr__0KH=((__POINTER )(NULL));
+  typ_id__5KH= 0;
+  sz__2KH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__2KH ==  0)) {
+    result__ZKH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__5KH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2KH);
+    if ((typ_id__5KH == (__INTEGER)(-  1))) {
+      a__3ZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4ZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KH + a__3ZGH) & (__UINTEGER_32)(~ a__3ZGH));
+      ptr_table__5FKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4ZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4FKH=((__POINTER )(NULL));
+      result__AGKH=((__POINTER *)ptr_table__5FKH)[ 0];
+      if ((result__AGKH == (void *)NULL)) {
+        result__AGKH=new_lab__QOJ(new_size__4ZGH);
+        next__4FKH=(void *)((unsigned long)result__AGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4ZGH)));
+        ((__POINTER *)next__4FKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5FKH)[ 0]=next__4FKH;
+      } else {
+        next__4FKH=((__POINTER *)result__AGKH)[ 0];
+        if ((next__4FKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AGKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4ZGH <<  1)) <=  4096)) {
+            next__4FKH=(void *)((unsigned long)result__AGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4ZGH)));
+          } else {
+            next__4FKH=new_lab__QOJ(new_size__4ZGH);
+          };
+          ((__POINTER *)next__4FKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5FKH)[ 0]=next__4FKH;
+        } else {
+          ((__POINTER *)result__AGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AGKH=next__4FKH;
+        };
+      };
+      ptr__0KH=result__AGKH;
+    } else {
+      t__C0GH=((__UINTEGER_32 )typ_id__5KH);
+      a__B0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2KH + a__B0GH) & (__UINTEGER_32)(~ a__B0GH));
+      ptr_table__EGKH=((__POINTER )(&(table_type[(t__C0GH)])));
+      lab_type__GGKH=(__UINTEGER_32)(t__C0GH |  1);
+      next__DGKH=((__POINTER )(NULL));
+      result__FGKH=((__POINTER *)ptr_table__EGKH)[ 0];
+      if ((result__FGKH == (void *)NULL)) {
+        result__FGKH=new_lab__QOJ(lab_type__GGKH);
+        next__DGKH=(void *)((unsigned long)result__FGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HGKH)));
+        ((__POINTER *)next__DGKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EGKH)[ 0]=next__DGKH;
+      } else {
+        next__DGKH=((__POINTER *)result__FGKH)[ 0];
+        if ((next__DGKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FGKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HGKH <<  1)) <=  4096)) {
+            next__DGKH=(void *)((unsigned long)result__FGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HGKH)));
+          } else {
+            next__DGKH=new_lab__QOJ(lab_type__GGKH);
+          };
+          ((__POINTER *)next__DGKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EGKH)[ 0]=next__DGKH;
+        } else {
+          ((__POINTER *)result__FGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FGKH=next__DGKH;
+        };
+      };
+      ptr__0KH=result__FGKH;
+    };
+    result__ZKH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__0KH);
+    *(result__ZKH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__0IT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+  new_capacity__WHY=prime_number_ceiling__K01( 193);
+  Self__0IT->buckets__04S=create__UB4(new_capacity__WHY);
+  Self__0IT->capacity__V4S=new_capacity__WHY;
+  Self__0IT->count__1HY= 0;
+  short_dico__QD=result__ZKH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__G5S=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__R5S=NULL;
+  token__TCD=create__ZBB( 100);
+  short_derive__PCC= 0;
+  output_code__SI=create__ZBB( 4000000);
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__0T3=NULL;
+  LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__MDD= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_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__;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__FSEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__HSEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__1REC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__4MOD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__GWHD=NULL;
+  skip_comment__X2D=FALSE__;
+  last_comment_slot__J3D=NULL;
+  last_comment_extern__JYC=NULL;
+  begin_position__53D= 0;
+  last_string__V0C=NULL;
+  string_tmp2__F3I=create__ZBB( 256);
+  last_integer__UNO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__ESEC=NULL;
+  index_count__P5= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__IYR=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__DYR= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__IZR= 0;
+  result__1OC=NULL;
+  ptr__2OC=((__POINTER )(NULL));
+  typ_id__BPC= 0;
+  sz__4OC=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo));
+  if ((sz__4OC ==  0)) {
+    result__1OC=HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__BPC=__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4OC);
+    if ((typ_id__BPC == (__INTEGER)(-  1))) {
+      a__F0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__F0GH) & (__UINTEGER_32)(~ a__F0GH));
+      ptr_table__JGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IGKH=((__POINTER )(NULL));
+      result__KGKH=((__POINTER *)ptr_table__JGKH)[ 0];
+      if ((result__KGKH == (void *)NULL)) {
+        result__KGKH=new_lab__QOJ(new_size__G0GH);
+        next__IGKH=(void *)((unsigned long)result__KGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0GH)));
+        ((__POINTER *)next__IGKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
+      } else {
+        next__IGKH=((__POINTER *)result__KGKH)[ 0];
+        if ((next__IGKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KGKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G0GH <<  1)) <=  4096)) {
+            next__IGKH=(void *)((unsigned long)result__KGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0GH)));
+          } else {
+            next__IGKH=new_lab__QOJ(new_size__G0GH);
+          };
+          ((__POINTER *)next__IGKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
+        } else {
+          ((__POINTER *)result__KGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KGKH=next__IGKH;
+        };
+      };
+      ptr__2OC=result__KGKH;
+    } else {
+      t__K0GH=((__UINTEGER_32 )typ_id__BPC);
+      a__J0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__J0GH) & (__UINTEGER_32)(~ a__J0GH));
+      ptr_table__OGKH=((__POINTER )(&(table_type[(t__K0GH)])));
+      lab_type__QGKH=(__UINTEGER_32)(t__K0GH |  1);
+      next__NGKH=((__POINTER )(NULL));
+      result__PGKH=((__POINTER *)ptr_table__OGKH)[ 0];
+      if ((result__PGKH == (void *)NULL)) {
+        result__PGKH=new_lab__QOJ(lab_type__QGKH);
+        next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RGKH)));
+        ((__POINTER *)next__NGKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
+      } else {
+        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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RGKH <<  1)) <=  4096)) {
+            next__NGKH=(void *)((unsigned long)result__PGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RGKH)));
+          } else {
+            next__NGKH=new_lab__QOJ(lab_type__QGKH);
+          };
+          ((__POINTER *)next__NGKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
+        } else {
+          ((__POINTER *)result__PGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PGKH=next__NGKH;
+        };
+      };
+      ptr__2OC=result__PGKH;
+    };
+    result__1OC=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)ptr__2OC);
+    *(result__1OC) = *(HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__);
+  };
+  Self__JLS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__1OC);
+  new_capacity__TGX=prime_number_ceiling__K01( 193);
+  Self__JLS->buckets__IYR=create__5U2(new_capacity__TGX);
+  Self__JLS->capacity__DYR=new_capacity__TGX;
+  Self__JLS->count__IZR= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__UYR=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__5YR=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__PAS= 0;
+  FAST_ARRAYoSLOTo__->parent_arrayed_collection__BAB=(*ARRAYED_COLLECTIONoSLOTo__);
+  ITM_SLOT__->parent_named__15=(*NAMED__);
+  TYPE_FULL__->flag__TBS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__N0R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__P0R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__L1R=NULL;
+  FAST_ARRAYoTYPE_IDo__->parent_arrayed_collection__ABB=(*ARRAYED_COLLECTIONoTYPE_IDo__);
+  list_id__CBB=NULL;
   directory_list__YB=NULL;
   file_list__0B=NULL;
   current_list__2B=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));
+  LINKED_COLLECTIONoENTRYo__->upper__EM3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__3DRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__BFWE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__IFWE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__JFWE=NULL;
+  LINKED_LISToENTRYo__->last_link__KFWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__HYWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__YTFF=NULL;
+  FILE_UNIX__->stream__0HRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  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__;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__CAV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__FET= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__LDY= 0;
+  short_local__XCC=NULL;
+  output_decl__LCE=create__ZBB( 60000);
+  PROTOTYPE__->type_style__E3C=NULL;
+  is_parameter_type__WGE=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__YQV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__TUV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__OVV=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__EQP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__3DV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__EIV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__SJV= 0;
+  FAST_ARRAYoITM_TYPE_MONOo__->parent_arrayed_collection__EYC=(*ARRAYED_COLLECTIONoITM_TYPE_MONOo__);
+  result__2VQ=NULL;
+  ptr__3VQ=((__POINTER )(NULL));
+  typ_id__CWQ= 0;
+  sz__5VQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__5VQ ==  0)) {
+    result__2VQ=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__CWQ=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5VQ);
+    if ((typ_id__CWQ == (__INTEGER)(-  1))) {
+      a__N0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__O0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__5VQ + a__N0GH) & (__UINTEGER_32)(~ a__N0GH));
+      ptr_table__TGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SGKH=((__POINTER )(NULL));
+      result__UGKH=((__POINTER *)ptr_table__TGKH)[ 0];
+      if ((result__UGKH == (void *)NULL)) {
+        result__UGKH=new_lab__QOJ(new_size__O0GH);
+        next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O0GH)));
+        ((__POINTER *)next__SGKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
+      } else {
+        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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O0GH <<  1)) <=  4096)) {
+            next__SGKH=(void *)((unsigned long)result__UGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O0GH)));
+          } else {
+            next__SGKH=new_lab__QOJ(new_size__O0GH);
+          };
+          ((__POINTER *)next__SGKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
+        } else {
+          ((__POINTER *)result__UGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UGKH=next__SGKH;
+        };
+      };
+      ptr__3VQ=result__UGKH;
+    } else {
+      t__S0GH=((__UINTEGER_32 )typ_id__CWQ);
+      a__R0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1GKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5VQ + a__R0GH) & (__UINTEGER_32)(~ a__R0GH));
+      ptr_table__YGKH=((__POINTER )(&(table_type[(t__S0GH)])));
+      lab_type__0GKH=(__UINTEGER_32)(t__S0GH |  1);
+      next__XGKH=((__POINTER )(NULL));
+      result__ZGKH=((__POINTER *)ptr_table__YGKH)[ 0];
+      if ((result__ZGKH == (void *)NULL)) {
+        result__ZGKH=new_lab__QOJ(lab_type__0GKH);
+        next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1GKH)));
+        ((__POINTER *)next__XGKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
+      } else {
+        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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1GKH <<  1)) <=  4096)) {
+            next__XGKH=(void *)((unsigned long)result__ZGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1GKH)));
+          } else {
+            next__XGKH=new_lab__QOJ(lab_type__0GKH);
+          };
+          ((__POINTER *)next__XGKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
+        } else {
+          ((__POINTER *)result__ZGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZGKH=next__XGKH;
+        };
+      };
+      ptr__3VQ=result__ZGKH;
+    };
+    result__2VQ=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__3VQ);
+    *(result__2VQ) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__KZV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__2VQ);
+  if ((Self__KZV->parent_arrayed_collection__EQP.capacity__TUV <  5)) {
+    Self__KZV->parent_arrayed_collection__EQP.storage__OVV=create__KGRB( 5);
+    Self__KZV->parent_arrayed_collection__EQP.capacity__TUV= 5;
+  };
+  Self__KZV->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(-  1);
+  free_list__FQP=result__2VQ;
+  empty_list__MRP=create_with_capacity__DBR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__J1V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__E1V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__YDW= 0;
+  result__Z5Q=NULL;
+  ptr__05Q=((__POINTER )(NULL));
+  typ_id__55Q= 0;
+  sz__25Q=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__25Q ==  0)) {
+    result__Z5Q=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__55Q=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__25Q);
+    if ((typ_id__55Q == (__INTEGER)(-  1))) {
+      a__V0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__25Q + a__V0GH) & (__UINTEGER_32)(~ a__V0GH));
+      ptr_table__3GKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2GKH=((__POINTER )(NULL));
+      result__4GKH=((__POINTER *)ptr_table__3GKH)[ 0];
+      if ((result__4GKH == (void *)NULL)) {
+        result__4GKH=new_lab__QOJ(new_size__W0GH);
+        next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0GH)));
+        ((__POINTER *)next__2GKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
+      } else {
+        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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W0GH <<  1)) <=  4096)) {
+            next__2GKH=(void *)((unsigned long)result__4GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0GH)));
+          } else {
+            next__2GKH=new_lab__QOJ(new_size__W0GH);
+          };
+          ((__POINTER *)next__2GKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
+        } else {
+          ((__POINTER *)result__4GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4GKH=next__2GKH;
+        };
+      };
+      ptr__05Q=result__4GKH;
+    } else {
+      t__00GH=((__UINTEGER_32 )typ_id__55Q);
+      a__Z0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__25Q + a__Z0GH) & (__UINTEGER_32)(~ a__Z0GH));
+      ptr_table__CHKH=((__POINTER )(&(table_type[(t__00GH)])));
+      lab_type__EHKH=(__UINTEGER_32)(t__00GH |  1);
+      next__BHKH=((__POINTER )(NULL));
+      result__DHKH=((__POINTER *)ptr_table__CHKH)[ 0];
+      if ((result__DHKH == (void *)NULL)) {
+        result__DHKH=new_lab__QOJ(lab_type__EHKH);
+        next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHKH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FHKH <<  1)) <=  4096)) {
+            next__BHKH=(void *)((unsigned long)result__DHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FHKH)));
+          } else {
+            next__BHKH=new_lab__QOJ(lab_type__EHKH);
+          };
+          ((__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__05Q=result__DHKH;
+    };
+    result__Z5Q=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__05Q);
+    *(result__Z5Q) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__2AW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__Z5Q);
+  new_capacity__NE1=prime_number_ceiling__K01( 53);
+  Self__2AW->buckets__J1V=create__OVBB(new_capacity__NE1);
+  Self__2AW->capacity__E1V=new_capacity__NE1;
+  Self__2AW->count__YDW= 0;
+  bucket__XRP=result__Z5Q;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__2NN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__OUP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__3NN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__V1V=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__B2V=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__RFP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__QXV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__1XV=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__HFP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__JOQ=NULL;
+  ptr__KOQ=((__POINTER )(NULL));
+  typ_id__POQ= 0;
+  sz__MOQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__MOQ ==  0)) {
+    result__JOQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    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__;
+    typ_id__POQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MOQ);
+    if ((typ_id__POQ == (__INTEGER)(-  1))) {
+      a__30GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__40GH=(__UINTEGER_32)((__UINTEGER_32)(sz__MOQ + a__30GH) & (__UINTEGER_32)(~ a__30GH));
+      ptr_table__HHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__40GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GHKH=((__POINTER )(NULL));
+      result__IHKH=((__POINTER *)ptr_table__HHKH)[ 0];
+      if ((result__IHKH == (void *)NULL)) {
+        result__IHKH=new_lab__QOJ(new_size__40GH);
+        next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__40GH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__40GH <<  1)) <=  4096)) {
+            next__GHKH=(void *)((unsigned long)result__IHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__40GH)));
+          } else {
+            next__GHKH=new_lab__QOJ(new_size__40GH);
+          };
+          ((__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__KOQ=result__IHKH;
+    } else {
+      t__C1GH=((__UINTEGER_32 )typ_id__POQ);
+      a__B1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__MOQ + a__B1GH) & (__UINTEGER_32)(~ a__B1GH));
+      ptr_table__MHKH=((__POINTER )(&(table_type[(t__C1GH)])));
+      lab_type__OHKH=(__UINTEGER_32)(t__C1GH |  1);
+      next__LHKH=((__POINTER )(NULL));
+      result__NHKH=((__POINTER *)ptr_table__MHKH)[ 0];
+      if ((result__NHKH == (void *)NULL)) {
+        result__NHKH=new_lab__QOJ(lab_type__OHKH);
+        next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PHKH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__PHKH <<  1)) <=  4096)) {
+            next__LHKH=(void *)((unsigned long)result__NHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PHKH)));
+          } else {
+            next__LHKH=new_lab__QOJ(lab_type__OHKH);
+          };
+          ((__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;
+        };
+      };
+      ptr__KOQ=result__NHKH;
+    };
+    result__JOQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__KOQ);
+    *(result__JOQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__HXV=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__JOQ);
+  if ((Self__HXV->parent_arrayed_collection__HFP.capacity__QXV <  32)) {
+    Self__HXV->parent_arrayed_collection__HFP.storage__1XV=create__KIXB( 32);
+    Self__HXV->parent_arrayed_collection__HFP.capacity__QXV= 32;
+  };
+  Self__HXV->parent_arrayed_collection__HFP.upper__RFP=(__INTEGER)(-  1);
+  dico__IFP=result__JOQ;
+  ITM_TYPE_MULTI__->list_type__1FP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__RIN=NULL;
+  ITM_TYPE_GENERIC__->list_type__YUP=NULL;
+  ITM_TYPE_BLOCK__->type_result__1IN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__DIN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__ZFV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__EGV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__ZHN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__PWO=NULL;
+  ptr__QWO=((__POINTER )(NULL));
+  typ_id__VWO= 0;
+  sz__SWO=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__SWO ==  0)) {
+    result__PWO=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    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__;
+    typ_id__VWO=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SWO);
+    if ((typ_id__VWO == (__INTEGER)(-  1))) {
+      a__F1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__SWO + a__F1GH) & (__UINTEGER_32)(~ a__F1GH));
+      ptr_table__RHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QHKH=((__POINTER )(NULL));
+      result__SHKH=((__POINTER *)ptr_table__RHKH)[ 0];
+      if ((result__SHKH == (void *)NULL)) {
+        result__SHKH=new_lab__QOJ(new_size__G1GH);
+        next__QHKH=(void *)((unsigned long)result__SHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1GH)));
+        ((__POINTER *)next__QHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RHKH)[ 0]=next__QHKH;
+      } else {
+        next__QHKH=((__POINTER *)result__SHKH)[ 0];
+        if ((next__QHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SHKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G1GH <<  1)) <=  4096)) {
+            next__QHKH=(void *)((unsigned long)result__SHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1GH)));
+          } else {
+            next__QHKH=new_lab__QOJ(new_size__G1GH);
+          };
+          ((__POINTER *)next__QHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RHKH)[ 0]=next__QHKH;
+        } else {
+          ((__POINTER *)result__SHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SHKH=next__QHKH;
+        };
+      };
+      ptr__QWO=result__SHKH;
+    } else {
+      t__K1GH=((__UINTEGER_32 )typ_id__VWO);
+      a__J1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__SWO + a__J1GH) & (__UINTEGER_32)(~ a__J1GH));
+      ptr_table__WHKH=((__POINTER )(&(table_type[(t__K1GH)])));
+      lab_type__YHKH=(__UINTEGER_32)(t__K1GH |  1);
+      next__VHKH=((__POINTER )(NULL));
+      result__XHKH=((__POINTER *)ptr_table__WHKH)[ 0];
+      if ((result__XHKH == (void *)NULL)) {
+        result__XHKH=new_lab__QOJ(lab_type__YHKH);
+        next__VHKH=(void *)((unsigned long)result__XHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHKH)));
+        ((__POINTER *)next__VHKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WHKH)[ 0]=next__VHKH;
+      } else {
+        next__VHKH=((__POINTER *)result__XHKH)[ 0];
+        if ((next__VHKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XHKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZHKH <<  1)) <=  4096)) {
+            next__VHKH=(void *)((unsigned long)result__XHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHKH)));
+          } else {
+            next__VHKH=new_lab__QOJ(lab_type__YHKH);
+          };
+          ((__POINTER *)next__VHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WHKH)[ 0]=next__VHKH;
+        } else {
+          ((__POINTER *)result__XHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XHKH=next__VHKH;
+        };
+      };
+      ptr__QWO=result__XHKH;
+    };
+    result__PWO=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__QWO);
+    *(result__PWO) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__QFV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__PWO);
+  if ((Self__QFV->parent_arrayed_collection__ZHN.capacity__ZFV <  32)) {
+    Self__QFV->parent_arrayed_collection__ZHN.storage__EGV=create__FRWB( 32);
+    Self__QFV->parent_arrayed_collection__ZHN.capacity__ZFV= 32;
+  };
+  Self__QFV->parent_arrayed_collection__ZHN.upper__DIN=(__INTEGER)(-  1);
+  dico__0HN=result__PWO;
+  ITM_CODE__->parent_itm_object__FAE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__JTF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__ANO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__SNO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__EOO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__VOO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__1TP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__G3V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__R3V=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__RTP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__WYQ=NULL;
+  ptr__XYQ=((__POINTER )(NULL));
+  typ_id__2YQ= 0;
+  sz__ZYQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__ZYQ ==  0)) {
+    result__WYQ=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    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__;
+    typ_id__2YQ=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZYQ);
+    if ((typ_id__2YQ == (__INTEGER)(-  1))) {
+      a__N1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__O1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZYQ + a__N1GH) & (__UINTEGER_32)(~ a__N1GH));
+      ptr_table__1HKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0HKH=((__POINTER )(NULL));
+      result__2HKH=((__POINTER *)ptr_table__1HKH)[ 0];
+      if ((result__2HKH == (void *)NULL)) {
+        result__2HKH=new_lab__QOJ(new_size__O1GH);
+        next__0HKH=(void *)((unsigned long)result__2HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1GH)));
+        ((__POINTER *)next__0HKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1HKH)[ 0]=next__0HKH;
+      } else {
+        next__0HKH=((__POINTER *)result__2HKH)[ 0];
+        if ((next__0HKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2HKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O1GH <<  1)) <=  4096)) {
+            next__0HKH=(void *)((unsigned long)result__2HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1GH)));
+          } else {
+            next__0HKH=new_lab__QOJ(new_size__O1GH);
+          };
+          ((__POINTER *)next__0HKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1HKH)[ 0]=next__0HKH;
+        } else {
+          ((__POINTER *)result__2HKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2HKH=next__0HKH;
+        };
+      };
+      ptr__XYQ=result__2HKH;
+    } else {
+      t__S1GH=((__UINTEGER_32 )typ_id__2YQ);
+      a__R1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZYQ + a__R1GH) & (__UINTEGER_32)(~ a__R1GH));
+      ptr_table__AIKH=((__POINTER )(&(table_type[(t__S1GH)])));
+      lab_type__CIKH=(__UINTEGER_32)(t__S1GH |  1);
+      next__5HKH=((__POINTER )(NULL));
+      result__BIKH=((__POINTER *)ptr_table__AIKH)[ 0];
+      if ((result__BIKH == (void *)NULL)) {
+        result__BIKH=new_lab__QOJ(lab_type__CIKH);
+        next__5HKH=(void *)((unsigned long)result__BIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DIKH)));
+        ((__POINTER *)next__5HKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AIKH)[ 0]=next__5HKH;
+      } else {
+        next__5HKH=((__POINTER *)result__BIKH)[ 0];
+        if ((next__5HKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BIKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DIKH <<  1)) <=  4096)) {
+            next__5HKH=(void *)((unsigned long)result__BIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DIKH)));
+          } else {
+            next__5HKH=new_lab__QOJ(lab_type__CIKH);
+          };
+          ((__POINTER *)next__5HKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AIKH)[ 0]=next__5HKH;
+        } else {
+          ((__POINTER *)result__BIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BIKH=next__5HKH;
+        };
+      };
+      ptr__XYQ=result__BIKH;
+    };
+    result__WYQ=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__XYQ);
+    *(result__WYQ) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__32V=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__WYQ);
+  if ((Self__32V->parent_arrayed_collection__RTP.capacity__G3V <  32)) {
+    Self__32V->parent_arrayed_collection__RTP.storage__R3V=create__EPXB( 32);
+    Self__32V->parent_arrayed_collection__RTP.capacity__G3V= 32;
+  };
+  Self__32V->parent_arrayed_collection__RTP.upper__1TP=(__INTEGER)(-  1);
+  dico__STP=result__WYQ;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__HYT=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__CYT= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__5AZ= 0;
+  result__DIK=NULL;
+  ptr__EIK=((__POINTER )(NULL));
+  typ_id__JIK= 0;
+  sz__GIK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__GIK ==  0)) {
+    result__DIK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    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__;
+    typ_id__JIK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GIK);
+    if ((typ_id__JIK == (__INTEGER)(-  1))) {
+      a__V1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GIK + a__V1GH) & (__UINTEGER_32)(~ a__V1GH));
+      ptr_table__FIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__EIKH=((__POINTER )(NULL));
+      result__GIKH=((__POINTER *)ptr_table__FIKH)[ 0];
+      if ((result__GIKH == (void *)NULL)) {
+        result__GIKH=new_lab__QOJ(new_size__W1GH);
+        next__EIKH=(void *)((unsigned long)result__GIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1GH)));
+        ((__POINTER *)next__EIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FIKH)[ 0]=next__EIKH;
+      } else {
+        next__EIKH=((__POINTER *)result__GIKH)[ 0];
+        if ((next__EIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GIKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W1GH <<  1)) <=  4096)) {
+            next__EIKH=(void *)((unsigned long)result__GIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1GH)));
+          } else {
+            next__EIKH=new_lab__QOJ(new_size__W1GH);
+          };
+          ((__POINTER *)next__EIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FIKH)[ 0]=next__EIKH;
+        } else {
+          ((__POINTER *)result__GIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GIKH=next__EIKH;
+        };
+      };
+      ptr__EIK=result__GIKH;
+    } else {
+      t__01GH=((__UINTEGER_32 )typ_id__JIK);
+      a__Z1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GIK + a__Z1GH) & (__UINTEGER_32)(~ a__Z1GH));
+      ptr_table__KIKH=((__POINTER )(&(table_type[(t__01GH)])));
+      lab_type__MIKH=(__UINTEGER_32)(t__01GH |  1);
+      next__JIKH=((__POINTER )(NULL));
+      result__LIKH=((__POINTER *)ptr_table__KIKH)[ 0];
+      if ((result__LIKH == (void *)NULL)) {
+        result__LIKH=new_lab__QOJ(lab_type__MIKH);
+        next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIKH)));
+        ((__POINTER *)next__JIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
+      } else {
+        next__JIKH=((__POINTER *)result__LIKH)[ 0];
+        if ((next__JIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LIKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NIKH <<  1)) <=  4096)) {
+            next__JIKH=(void *)((unsigned long)result__LIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIKH)));
+          } else {
+            next__JIKH=new_lab__QOJ(lab_type__MIKH);
+          };
+          ((__POINTER *)next__JIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KIKH)[ 0]=next__JIKH;
+        } else {
+          ((__POINTER *)result__LIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LIKH=next__JIKH;
+        };
+      };
+      ptr__EIK=result__LIKH;
+    };
+    result__DIK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__EIK);
+    *(result__DIK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__CHU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__DIK);
+  new_capacity__0AZ=prime_number_ceiling__K01( 193);
+  Self__CHU->buckets__HYT=create__ID5(new_capacity__0AZ);
+  Self__CHU->capacity__CYT=new_capacity__0AZ;
+  Self__CHU->count__5AZ= 0;
+  dico__WQI=result__DIK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__TYT=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__4YT=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__GZT=NULL;
+  result__GSQ=NULL;
+  ptr__HSQ=((__POINTER )(NULL));
+  typ_id__MSQ= 0;
+  sz__JSQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__JSQ ==  0)) {
+    result__GSQ=ITM_TYPE_PARAMETER__;
   } else {
-    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__;
+    typ_id__MSQ=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JSQ);
+    if ((typ_id__MSQ == (__INTEGER)(-  1))) {
+      a__5BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ACFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JSQ + a__5BFH) & (__UINTEGER_32)(~ a__5BFH));
+      ptr_table__PIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ACFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__OIKH=((__POINTER )(NULL));
+      result__QIKH=((__POINTER *)ptr_table__PIKH)[ 0];
+      if ((result__QIKH == (void *)NULL)) {
+        result__QIKH=new_lab__QOJ(new_size__ACFH);
+        next__OIKH=(void *)((unsigned long)result__QIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACFH)));
+        ((__POINTER *)next__OIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
+      } else {
+        next__OIKH=((__POINTER *)result__QIKH)[ 0];
+        if ((next__OIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QIKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ACFH <<  1)) <=  4096)) {
+            next__OIKH=(void *)((unsigned long)result__QIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACFH)));
+          } else {
+            next__OIKH=new_lab__QOJ(new_size__ACFH);
+          };
+          ((__POINTER *)next__OIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PIKH)[ 0]=next__OIKH;
+        } else {
+          ((__POINTER *)result__QIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QIKH=next__OIKH;
+        };
+      };
+      ptr__HSQ=result__QIKH;
+    } else {
+      t__ECFH=((__UINTEGER_32 )typ_id__MSQ);
+      a__DCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__JSQ + a__DCFH) & (__UINTEGER_32)(~ a__DCFH));
+      ptr_table__UIKH=((__POINTER )(&(table_type[(t__ECFH)])));
+      lab_type__WIKH=(__UINTEGER_32)(t__ECFH |  1);
+      next__TIKH=((__POINTER )(NULL));
+      result__VIKH=((__POINTER *)ptr_table__UIKH)[ 0];
+      if ((result__VIKH == (void *)NULL)) {
+        result__VIKH=new_lab__QOJ(lab_type__WIKH);
+        next__TIKH=(void *)((unsigned long)result__VIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XIKH)));
+        ((__POINTER *)next__TIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UIKH)[ 0]=next__TIKH;
+      } else {
+        next__TIKH=((__POINTER *)result__VIKH)[ 0];
+        if ((next__TIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VIKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XIKH <<  1)) <=  4096)) {
+            next__TIKH=(void *)((unsigned long)result__VIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XIKH)));
+          } else {
+            next__TIKH=new_lab__QOJ(lab_type__WIKH);
+          };
+          ((__POINTER *)next__TIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UIKH)[ 0]=next__TIKH;
+        } else {
+          ((__POINTER *)result__VIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VIKH=next__TIKH;
+        };
+      };
+      ptr__HSQ=result__VIKH;
+    };
+    result__GSQ=((__ITM_TYPE_PARAMETER *)ptr__HSQ);
+    *(result__GSQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__4YV=((__ITM_TYPE_PARAMETER *)result__GSQ);
+  Self__4YV->parent_itm_type__LAE.name__FUP=(&__string_1);
+  fast_put__to__GKZ(result__DIK,Self__4YV,(&__string_1));
+  type_self__CQN=result__GSQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__KKR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__OHW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__ZHW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__AKR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__CRR=NULL;
+  ptr__DRR=((__POINTER )(NULL));
+  typ_id__IRR= 0;
+  sz__FRR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__FRR ==  0)) {
+    result__CRR=FAST_ARRAYoITM_TYPE_STYLEo__;
   } else {
-    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__;
+    typ_id__IRR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FRR);
+    if ((typ_id__IRR == (__INTEGER)(-  1))) {
+      a__31GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__41GH=(__UINTEGER_32)((__UINTEGER_32)(sz__FRR + a__31GH) & (__UINTEGER_32)(~ a__31GH));
+      ptr_table__ZIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__41GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YIKH=((__POINTER )(NULL));
+      result__0IKH=((__POINTER *)ptr_table__ZIKH)[ 0];
+      if ((result__0IKH == (void *)NULL)) {
+        result__0IKH=new_lab__QOJ(new_size__41GH);
+        next__YIKH=(void *)((unsigned long)result__0IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__41GH)));
+        ((__POINTER *)next__YIKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZIKH)[ 0]=next__YIKH;
+      } else {
+        next__YIKH=((__POINTER *)result__0IKH)[ 0];
+        if ((next__YIKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0IKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__41GH <<  1)) <=  4096)) {
+            next__YIKH=(void *)((unsigned long)result__0IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__41GH)));
+          } else {
+            next__YIKH=new_lab__QOJ(new_size__41GH);
+          };
+          ((__POINTER *)next__YIKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZIKH)[ 0]=next__YIKH;
+        } else {
+          ((__POINTER *)result__0IKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0IKH=next__YIKH;
+        };
+      };
+      ptr__DRR=result__0IKH;
+    } else {
+      t__C2GH=((__UINTEGER_32 )typ_id__IRR);
+      a__B2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__FRR + a__B2GH) & (__UINTEGER_32)(~ a__B2GH));
+      ptr_table__4IKH=((__POINTER )(&(table_type[(t__C2GH)])));
+      lab_type__AJKH=(__UINTEGER_32)(t__C2GH |  1);
+      next__3IKH=((__POINTER )(NULL));
+      result__5IKH=((__POINTER *)ptr_table__4IKH)[ 0];
+      if ((result__5IKH == (void *)NULL)) {
+        result__5IKH=new_lab__QOJ(lab_type__AJKH);
+        next__3IKH=(void *)((unsigned long)result__5IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BJKH)));
+        ((__POINTER *)next__3IKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4IKH)[ 0]=next__3IKH;
+      } else {
+        next__3IKH=((__POINTER *)result__5IKH)[ 0];
+        if ((next__3IKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5IKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BJKH <<  1)) <=  4096)) {
+            next__3IKH=(void *)((unsigned long)result__5IKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BJKH)));
+          } else {
+            next__3IKH=new_lab__QOJ(lab_type__AJKH);
+          };
+          ((__POINTER *)next__3IKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4IKH)[ 0]=next__3IKH;
+        } else {
+          ((__POINTER *)result__5IKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3IKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5IKH=next__3IKH;
+        };
+      };
+      ptr__DRR=result__5IKH;
+    };
+    result__CRR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__DRR);
+    *(result__CRR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__FHW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__CRR);
+  if ((Self__FHW->parent_arrayed_collection__AKR.capacity__OHW <  32)) {
+    Self__FHW->parent_arrayed_collection__AKR.storage__ZHW=create__QEYB( 32);
+    Self__FHW->parent_arrayed_collection__AKR.capacity__OHW= 32;
+  };
+  Self__FHW->parent_arrayed_collection__AKR.upper__KKR=(__INTEGER)(-  1);
+  dico__BKR=result__CRR;
+  type_null__0QN=get__HQI((&__string_2));
+  ITM_LIST__->parent_itm_code__I2E=(*ITM_CODE__);
+  last_group__JRF=NULL;
+  old_position__HOI= 0;
+  old_pos_cur__JOI= 0;
+  old_pos_line__LOI= 0;
+  old_pos_col__NOI= 0;
+  old_short_derive__POI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__EXT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__PEU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__0EU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__YOI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__LXK= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__KGU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__VGU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__SYH=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__AFK=NULL;
+  ptr__BFK=((__POINTER )(NULL));
+  typ_id__GFK= 0;
+  sz__DFK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__DFK ==  0)) {
+    result__AFK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
   } else {
-    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__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__T4JH=new_lab__URJ(new_size__TQGH);
-          };
-          ((__POINTER *)next__T4JH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__U4JH)[ 0]=next__T4JH;
-        } else {
-          ((__POINTER *)result__V4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__V4JH=next__T4JH;
-        };
-      };
-      ptr__PIK=result__V4JH;
-    } else {
-      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__;
+    typ_id__GFK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DFK);
+    if ((typ_id__GFK == (__INTEGER)(-  1))) {
+      a__F2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__DFK + a__F2GH) & (__UINTEGER_32)(~ a__F2GH));
+      ptr_table__DJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CJKH=((__POINTER )(NULL));
+      result__EJKH=((__POINTER *)ptr_table__DJKH)[ 0];
+      if ((result__EJKH == (void *)NULL)) {
+        result__EJKH=new_lab__QOJ(new_size__G2GH);
+        next__CJKH=(void *)((unsigned long)result__EJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2GH)));
+        ((__POINTER *)next__CJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DJKH)[ 0]=next__CJKH;
+      } else {
+        next__CJKH=((__POINTER *)result__EJKH)[ 0];
+        if ((next__CJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EJKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G2GH <<  1)) <=  4096)) {
+            next__CJKH=(void *)((unsigned long)result__EJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2GH)));
+          } else {
+            next__CJKH=new_lab__QOJ(new_size__G2GH);
+          };
+          ((__POINTER *)next__CJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DJKH)[ 0]=next__CJKH;
+        } else {
+          ((__POINTER *)result__EJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EJKH=next__CJKH;
+        };
+      };
+      ptr__BFK=result__EJKH;
+    } else {
+      t__K2GH=((__UINTEGER_32 )typ_id__GFK);
+      a__J2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__DFK + a__J2GH) & (__UINTEGER_32)(~ a__J2GH));
+      ptr_table__IJKH=((__POINTER )(&(table_type[(t__K2GH)])));
+      lab_type__KJKH=(__UINTEGER_32)(t__K2GH |  1);
+      next__HJKH=((__POINTER )(NULL));
+      result__JJKH=((__POINTER *)ptr_table__IJKH)[ 0];
+      if ((result__JJKH == (void *)NULL)) {
+        result__JJKH=new_lab__QOJ(lab_type__KJKH);
+        next__HJKH=(void *)((unsigned long)result__JJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJKH)));
+        ((__POINTER *)next__HJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IJKH)[ 0]=next__HJKH;
+      } else {
+        next__HJKH=((__POINTER *)result__JJKH)[ 0];
+        if ((next__HJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JJKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LJKH <<  1)) <=  4096)) {
+            next__HJKH=(void *)((unsigned long)result__JJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJKH)));
+          } else {
+            next__HJKH=new_lab__QOJ(lab_type__KJKH);
+          };
+          ((__POINTER *)next__HJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IJKH)[ 0]=next__HJKH;
+        } else {
+          ((__POINTER *)result__JJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JJKH=next__HJKH;
+        };
+      };
+      ptr__BFK=result__JJKH;
+    };
+    result__AFK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__BFK);
+    *(result__AFK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__GEU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__AFK);
+  if ((Self__GEU->parent_arrayed_collection__YOI.capacity__PEU <  5)) {
+    Self__GEU->parent_arrayed_collection__YOI.storage__0EU=create__CEQB( 5);
+    Self__GEU->parent_arrayed_collection__YOI.capacity__PEU= 5;
+  };
+  Self__GEU->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(-  1);
+  free_list__ZOI=result__AFK;
+  ITM_LOCAL__->parent_itm_object__NYH=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__OZK=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__OAV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__ZAV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__DST= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__V1T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__R2T=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__O1H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__MEL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__VTT= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__AUT=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__5QF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__J1J=NULL;
+  ptr__K1J=((__POINTER )(NULL));
+  typ_id__P1J= 0;
+  sz__M1J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__M1J ==  0)) {
+    result__J1J=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__;
+    typ_id__P1J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__M1J);
+    if ((typ_id__P1J == (__INTEGER)(-  1))) {
+      a__N2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__O2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__M1J + a__N2GH) & (__UINTEGER_32)(~ a__N2GH));
+      ptr_table__NJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MJKH=((__POINTER )(NULL));
+      result__OJKH=((__POINTER *)ptr_table__NJKH)[ 0];
+      if ((result__OJKH == (void *)NULL)) {
+        result__OJKH=new_lab__QOJ(new_size__O2GH);
+        next__MJKH=(void *)((unsigned long)result__OJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O2GH)));
+        ((__POINTER *)next__MJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NJKH)[ 0]=next__MJKH;
+      } else {
+        next__MJKH=((__POINTER *)result__OJKH)[ 0];
+        if ((next__MJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OJKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O2GH <<  1)) <=  4096)) {
+            next__MJKH=(void *)((unsigned long)result__OJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O2GH)));
+          } else {
+            next__MJKH=new_lab__QOJ(new_size__O2GH);
+          };
+          ((__POINTER *)next__MJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NJKH)[ 0]=next__MJKH;
+        } else {
+          ((__POINTER *)result__OJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OJKH=next__MJKH;
+        };
+      };
+      ptr__K1J=result__OJKH;
+    } else {
+      t__S2GH=((__UINTEGER_32 )typ_id__P1J);
+      a__R2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__M1J + a__R2GH) & (__UINTEGER_32)(~ a__R2GH));
+      ptr_table__SJKH=((__POINTER )(&(table_type[(t__S2GH)])));
+      lab_type__UJKH=(__UINTEGER_32)(t__S2GH |  1);
+      next__RJKH=((__POINTER )(NULL));
+      result__TJKH=((__POINTER *)ptr_table__SJKH)[ 0];
+      if ((result__TJKH == (void *)NULL)) {
+        result__TJKH=new_lab__QOJ(lab_type__UJKH);
+        next__RJKH=(void *)((unsigned long)result__TJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VJKH)));
+        ((__POINTER *)next__RJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SJKH)[ 0]=next__RJKH;
+      } else {
+        next__RJKH=((__POINTER *)result__TJKH)[ 0];
+        if ((next__RJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TJKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VJKH <<  1)) <=  4096)) {
+            next__RJKH=(void *)((unsigned long)result__TJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VJKH)));
+          } else {
+            next__RJKH=new_lab__QOJ(lab_type__UJKH);
+          };
+          ((__POINTER *)next__RJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SJKH)[ 0]=next__RJKH;
+        } else {
+          ((__POINTER *)result__TJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TJKH=next__RJKH;
+        };
+      };
+      ptr__K1J=result__TJKH;
+    };
+    result__J1J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__K1J);
+    *(result__J1J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__DBU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__J1J);
+  if ((Self__DBU->parent_arrayed_collection__O1H.capacity__V1T <  5)) {
+    Self__DBU->parent_arrayed_collection__O1H.storage__R2T=create__SYPB( 5);
+    Self__DBU->parent_arrayed_collection__O1H.capacity__V1T= 5;
+  };
+  Self__DBU->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(-  1);
+  free_list__P1H=result__J1J;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__NOU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__SQU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__3QU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__Z1K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__R4OD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__MAPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__HBPD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__L2I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__DHM=NULL;
+  ptr__EHM=((__POINTER )(NULL));
+  typ_id__JHM= 0;
+  sz__GHM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__GHM ==  0)) {
+    result__DHM=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__;
+    typ_id__JHM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GHM);
+    if ((typ_id__JHM == (__INTEGER)(-  1))) {
+      a__V2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GHM + a__V2GH) & (__UINTEGER_32)(~ a__V2GH));
+      ptr_table__XJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WJKH=((__POINTER )(NULL));
+      result__YJKH=((__POINTER *)ptr_table__XJKH)[ 0];
+      if ((result__YJKH == (void *)NULL)) {
+        result__YJKH=new_lab__QOJ(new_size__W2GH);
+        next__WJKH=(void *)((unsigned long)result__YJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2GH)));
+        ((__POINTER *)next__WJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XJKH)[ 0]=next__WJKH;
+      } else {
+        next__WJKH=((__POINTER *)result__YJKH)[ 0];
+        if ((next__WJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YJKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W2GH <<  1)) <=  4096)) {
+            next__WJKH=(void *)((unsigned long)result__YJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W2GH)));
+          } else {
+            next__WJKH=new_lab__QOJ(new_size__W2GH);
+          };
+          ((__POINTER *)next__WJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XJKH)[ 0]=next__WJKH;
+        } else {
+          ((__POINTER *)result__YJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YJKH=next__WJKH;
+        };
+      };
+      ptr__EHM=result__YJKH;
+    } else {
+      t__02GH=((__UINTEGER_32 )typ_id__JHM);
+      a__Z2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5JKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GHM + a__Z2GH) & (__UINTEGER_32)(~ a__Z2GH));
+      ptr_table__2JKH=((__POINTER )(&(table_type[(t__02GH)])));
+      lab_type__4JKH=(__UINTEGER_32)(t__02GH |  1);
+      next__1JKH=((__POINTER )(NULL));
+      result__3JKH=((__POINTER *)ptr_table__2JKH)[ 0];
+      if ((result__3JKH == (void *)NULL)) {
+        result__3JKH=new_lab__QOJ(lab_type__4JKH);
+        next__1JKH=(void *)((unsigned long)result__3JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JKH)));
+        ((__POINTER *)next__1JKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2JKH)[ 0]=next__1JKH;
+      } else {
+        next__1JKH=((__POINTER *)result__3JKH)[ 0];
+        if ((next__1JKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3JKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5JKH <<  1)) <=  4096)) {
+            next__1JKH=(void *)((unsigned long)result__3JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5JKH)));
+          } else {
+            next__1JKH=new_lab__QOJ(lab_type__4JKH);
+          };
+          ((__POINTER *)next__1JKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2JKH)[ 0]=next__1JKH;
+        } else {
+          ((__POINTER *)result__3JKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1JKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3JKH=next__1JKH;
+        };
+      };
+      ptr__EHM=result__3JKH;
+    };
+    result__DHM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__EHM);
+    *(result__DHM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__JQU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__DHM);
+  if ((Self__JQU->parent_arrayed_collection__Z1K.capacity__SQU <  5)) {
+    Self__JQU->parent_arrayed_collection__Z1K.storage__3QU=create__U0ZB( 5);
+    Self__JQU->parent_arrayed_collection__Z1K.capacity__SQU= 5;
+  };
+  Self__JQU->parent_arrayed_collection__Z1K.upper__NOU=(__INTEGER)(-  1);
+  free_list__01K=result__DHM;
+  ITM_LIST_IDF__->parent_itm_code__05I=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__4RF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__KTF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__PAJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__QAJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__HBJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__UDJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__SEJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__UBL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__0EL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__HHL=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__OFV=NULL;
+  ITM_OLD__->parent_itm_code__VYL=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__J0M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__K0M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__XKDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__PBN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__F5N=(*ITM_READ__);
+  ITM_RESULT__->value__DJFC=NULL;
+  ITM_OPERATOR__->name__5EL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__N0M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__NDHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__SYHC=NULL;
+  ITM_ARG__->type__TYHC=NULL;
+  empty_list__CDMF=create_with_capacity__UFRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__FAQF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__AAQF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__XEQF= 0;
+  result__L4NF=NULL;
+  ptr__M4NF=((__POINTER )(NULL));
+  typ_id__R4NF= 0;
+  sz__O4NF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__O4NF ==  0)) {
+    result__L4NF=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__;
+    typ_id__R4NF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O4NF);
+    if ((typ_id__R4NF == (__INTEGER)(-  1))) {
+      a__32GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__42GH=(__UINTEGER_32)((__UINTEGER_32)(sz__O4NF + a__32GH) & (__UINTEGER_32)(~ a__32GH));
+      ptr_table__BKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__42GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__AKKH=((__POINTER )(NULL));
+      result__CKKH=((__POINTER *)ptr_table__BKKH)[ 0];
+      if ((result__CKKH == (void *)NULL)) {
+        result__CKKH=new_lab__QOJ(new_size__42GH);
+        next__AKKH=(void *)((unsigned long)result__CKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__42GH)));
+        ((__POINTER *)next__AKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BKKH)[ 0]=next__AKKH;
+      } else {
+        next__AKKH=((__POINTER *)result__CKKH)[ 0];
+        if ((next__AKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CKKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__42GH <<  1)) <=  4096)) {
+            next__AKKH=(void *)((unsigned long)result__CKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__42GH)));
+          } else {
+            next__AKKH=new_lab__QOJ(new_size__42GH);
+          };
+          ((__POINTER *)next__AKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BKKH)[ 0]=next__AKKH;
+        } else {
+          ((__POINTER *)result__CKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CKKH=next__AKKH;
+        };
+      };
+      ptr__M4NF=result__CKKH;
+    } else {
+      t__C3GH=((__UINTEGER_32 )typ_id__R4NF);
+      a__B3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__O4NF + a__B3GH) & (__UINTEGER_32)(~ a__B3GH));
+      ptr_table__GKKH=((__POINTER )(&(table_type[(t__C3GH)])));
+      lab_type__IKKH=(__UINTEGER_32)(t__C3GH |  1);
+      next__FKKH=((__POINTER )(NULL));
+      result__HKKH=((__POINTER *)ptr_table__GKKH)[ 0];
+      if ((result__HKKH == (void *)NULL)) {
+        result__HKKH=new_lab__QOJ(lab_type__IKKH);
+        next__FKKH=(void *)((unsigned long)result__HKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKKH)));
+        ((__POINTER *)next__FKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GKKH)[ 0]=next__FKKH;
+      } else {
+        next__FKKH=((__POINTER *)result__HKKH)[ 0];
+        if ((next__FKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HKKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JKKH <<  1)) <=  4096)) {
+            next__FKKH=(void *)((unsigned long)result__HKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JKKH)));
+          } else {
+            next__FKKH=new_lab__QOJ(lab_type__IKKH);
+          };
+          ((__POINTER *)next__FKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GKKH)[ 0]=next__FKKH;
+        } else {
+          ((__POINTER *)result__HKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HKKH=next__FKKH;
+        };
+      };
+      ptr__M4NF=result__HKKH;
+    };
+    result__L4NF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__M4NF);
+    *(result__L4NF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__XCQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__L4NF);
+  new_capacity__IPRF=prime_number_ceiling__K01( 53);
+  Self__XCQF->buckets__FAQF=create__ZBUF(new_capacity__IPRF);
+  Self__XCQF->capacity__AAQF=new_capacity__IPRF;
+  Self__XCQF->count__XEQF= 0;
+  bucket__MDMF=result__L4NF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__RAQF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__3AQF=NULL;
+  ITM_ARGS__->parent_itm_argument__R5EE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__LYPF=NULL;
+  ITM_ARGS__->type__MYPF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__HDN=FALSE__;
+  result__P1F=NULL;
+  ptr__Q1F=((__POINTER )(NULL));
+  typ_id__V1F= 0;
+  sz__S1F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__S1F ==  0)) {
+    result__P1F=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__;
+    typ_id__V1F=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__S1F);
+    if ((typ_id__V1F == (__INTEGER)(-  1))) {
+      a__J3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IVG=(__UINTEGER_32)((__UINTEGER_32)(sz__S1F + a__J3EH) & (__UINTEGER_32)(~ a__J3EH));
+      ptr_table__LKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IVG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KKKH=((__POINTER )(NULL));
+      result__MKKH=((__POINTER *)ptr_table__LKKH)[ 0];
+      if ((result__MKKH == (void *)NULL)) {
+        result__MKKH=new_lab__QOJ(new_size__IVG);
+        next__KKKH=(void *)((unsigned long)result__MKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IVG)));
+        ((__POINTER *)next__KKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LKKH)[ 0]=next__KKKH;
+      } else {
+        next__KKKH=((__POINTER *)result__MKKH)[ 0];
+        if ((next__KKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MKKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IVG <<  1)) <=  4096)) {
+            next__KKKH=(void *)((unsigned long)result__MKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IVG)));
+          } else {
+            next__KKKH=new_lab__QOJ(new_size__IVG);
+          };
+          ((__POINTER *)next__KKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LKKH)[ 0]=next__KKKH;
+        } else {
+          ((__POINTER *)result__MKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MKKH=next__KKKH;
+        };
+      };
+      ptr__Q1F=result__MKKH;
+    } else {
+      t__RWG=((__UINTEGER_32 )typ_id__V1F);
+      a__P3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__S1F + a__P3EH) & (__UINTEGER_32)(~ a__P3EH));
+      ptr_table__QKKH=((__POINTER )(&(table_type[(t__RWG)])));
+      lab_type__SKKH=(__UINTEGER_32)(t__RWG |  1);
+      next__PKKH=((__POINTER )(NULL));
+      result__RKKH=((__POINTER *)ptr_table__QKKH)[ 0];
+      if ((result__RKKH == (void *)NULL)) {
+        result__RKKH=new_lab__QOJ(lab_type__SKKH);
+        next__PKKH=(void *)((unsigned long)result__RKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TKKH)));
+        ((__POINTER *)next__PKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QKKH)[ 0]=next__PKKH;
+      } else {
+        next__PKKH=((__POINTER *)result__RKKH)[ 0];
+        if ((next__PKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RKKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TKKH <<  1)) <=  4096)) {
+            next__PKKH=(void *)((unsigned long)result__RKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TKKH)));
+          } else {
+            next__PKKH=new_lab__QOJ(lab_type__SKKH);
+          };
+          ((__POINTER *)next__PKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QKKH)[ 0]=next__PKKH;
+        } else {
+          ((__POINTER *)result__RKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RKKH=next__PKKH;
+        };
+      };
+      ptr__Q1F=result__RKKH;
+    };
+    result__P1F=((__FAST_ARRAYoSTRINGo *)ptr__Q1F);
+    *(result__P1F) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__4BT=((__FAST_ARRAYoSTRINGo *)result__P1F);
+  if ((Self__4BT->parent_arrayed_collection__RKC.capacity__HCT <  5)) {
+    Self__4BT->parent_arrayed_collection__RKC.storage__SCT=create__XCRB( 5);
+    Self__4BT->parent_arrayed_collection__RKC.capacity__HCT= 5;
+  };
+  Self__4BT->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  free__2JP=result__P1F;
+  type_void__MTF=get__HQI((&__string_3));
+  PROTOTYPE__->default_value__BRE=NULL;
+  PROTOTYPE__->type_c__2SE=NULL;
+  LIP_CODE__->parent_itm_object__NAE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__AY4B=(*LIP_CODE__);
+  LIP_UNARY__->operator__C1QD='\0';
+  LIP_UNARY__->value__50QD=NULL;
+  LIP_CALL__->parent_lip_code__SY4B=(*LIP_CODE__);
+  LIP_CALL__->name__EKUE=NULL;
+  LIP_CALL__->argument__ZJUE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__FAXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__HEXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__SEXE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__URSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__DOTE=NULL;
+  ptr__EOTE=((__POINTER )(NULL));
+  typ_id__JOTE= 0;
+  sz__GOTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__GOTE ==  0)) {
+    result__DOTE=FAST_ARRAYoLIP_INTEGERo__;
   } else {
-    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__;
+    typ_id__JOTE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GOTE);
+    if ((typ_id__JOTE == (__INTEGER)(-  1))) {
+      a__F3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GOTE + a__F3GH) & (__UINTEGER_32)(~ a__F3GH));
+      ptr_table__VKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__UKKH=((__POINTER )(NULL));
+      result__WKKH=((__POINTER *)ptr_table__VKKH)[ 0];
+      if ((result__WKKH == (void *)NULL)) {
+        result__WKKH=new_lab__QOJ(new_size__G3GH);
+        next__UKKH=(void *)((unsigned long)result__WKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3GH)));
+        ((__POINTER *)next__UKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VKKH)[ 0]=next__UKKH;
+      } else {
+        next__UKKH=((__POINTER *)result__WKKH)[ 0];
+        if ((next__UKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WKKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G3GH <<  1)) <=  4096)) {
+            next__UKKH=(void *)((unsigned long)result__WKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3GH)));
+          } else {
+            next__UKKH=new_lab__QOJ(new_size__G3GH);
+          };
+          ((__POINTER *)next__UKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VKKH)[ 0]=next__UKKH;
+        } else {
+          ((__POINTER *)result__WKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WKKH=next__UKKH;
+        };
+      };
+      ptr__EOTE=result__WKKH;
+    } else {
+      t__K3GH=((__UINTEGER_32 )typ_id__JOTE);
+      a__J3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3KKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GOTE + a__J3GH) & (__UINTEGER_32)(~ a__J3GH));
+      ptr_table__0KKH=((__POINTER )(&(table_type[(t__K3GH)])));
+      lab_type__2KKH=(__UINTEGER_32)(t__K3GH |  1);
+      next__ZKKH=((__POINTER )(NULL));
+      result__1KKH=((__POINTER *)ptr_table__0KKH)[ 0];
+      if ((result__1KKH == (void *)NULL)) {
+        result__1KKH=new_lab__QOJ(lab_type__2KKH);
+        next__ZKKH=(void *)((unsigned long)result__1KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KKH)));
+        ((__POINTER *)next__ZKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0KKH)[ 0]=next__ZKKH;
+      } else {
+        next__ZKKH=((__POINTER *)result__1KKH)[ 0];
+        if ((next__ZKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1KKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3KKH <<  1)) <=  4096)) {
+            next__ZKKH=(void *)((unsigned long)result__1KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3KKH)));
+          } else {
+            next__ZKKH=new_lab__QOJ(lab_type__2KKH);
+          };
+          ((__POINTER *)next__ZKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0KKH)[ 0]=next__ZKKH;
+        } else {
+          ((__POINTER *)result__1KKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1KKH=next__ZKKH;
+        };
+      };
+      ptr__EOTE=result__1KKH;
+    };
+    result__DOTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__EOTE);
+    *(result__DOTE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__4DXE=((__FAST_ARRAYoLIP_INTEGERo *)result__DOTE);
+  if ((Self__4DXE->parent_arrayed_collection__URSE.capacity__HEXE <  10)) {
+    Self__4DXE->parent_arrayed_collection__URSE.storage__SEXE=create__1FGF( 10);
+    Self__4DXE->parent_arrayed_collection__URSE.capacity__HEXE= 10;
+  };
+  Self__4DXE->parent_arrayed_collection__URSE.upper__FAXE=(__INTEGER)(-  1);
+  storage__VRSE=result__DOTE;
+  LIP_INTEGER__->value__ZD4F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__OOPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__SVPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__3VPF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__YVFF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__AIMF=NULL;
+  ptr__BIMF=((__POINTER )(NULL));
+  typ_id__GIMF= 0;
+  sz__DIMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__DIMF ==  0)) {
+    result__AIMF=FAST_ARRAYoLIP_STRINGo__;
   } else {
-    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__;
+    typ_id__GIMF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DIMF);
+    if ((typ_id__GIMF == (__INTEGER)(-  1))) {
+      a__N3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__O3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMF + a__N3GH) & (__UINTEGER_32)(~ a__N3GH));
+      ptr_table__5KKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4KKH=((__POINTER )(NULL));
+      result__ALKH=((__POINTER *)ptr_table__5KKH)[ 0];
+      if ((result__ALKH == (void *)NULL)) {
+        result__ALKH=new_lab__QOJ(new_size__O3GH);
+        next__4KKH=(void *)((unsigned long)result__ALKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O3GH)));
+        ((__POINTER *)next__4KKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5KKH)[ 0]=next__4KKH;
+      } else {
+        next__4KKH=((__POINTER *)result__ALKH)[ 0];
+        if ((next__4KKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ALKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O3GH <<  1)) <=  4096)) {
+            next__4KKH=(void *)((unsigned long)result__ALKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O3GH)));
+          } else {
+            next__4KKH=new_lab__QOJ(new_size__O3GH);
+          };
+          ((__POINTER *)next__4KKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5KKH)[ 0]=next__4KKH;
+        } else {
+          ((__POINTER *)result__ALKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4KKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ALKH=next__4KKH;
+        };
+      };
+      ptr__BIMF=result__ALKH;
+    } else {
+      t__S3GH=((__UINTEGER_32 )typ_id__GIMF);
+      a__R3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__DIMF + a__R3GH) & (__UINTEGER_32)(~ a__R3GH));
+      ptr_table__ELKH=((__POINTER )(&(table_type[(t__S3GH)])));
+      lab_type__GLKH=(__UINTEGER_32)(t__S3GH |  1);
+      next__DLKH=((__POINTER )(NULL));
+      result__FLKH=((__POINTER *)ptr_table__ELKH)[ 0];
+      if ((result__FLKH == (void *)NULL)) {
+        result__FLKH=new_lab__QOJ(lab_type__GLKH);
+        next__DLKH=(void *)((unsigned long)result__FLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLKH)));
+        ((__POINTER *)next__DLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ELKH)[ 0]=next__DLKH;
+      } else {
+        next__DLKH=((__POINTER *)result__FLKH)[ 0];
+        if ((next__DLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FLKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HLKH <<  1)) <=  4096)) {
+            next__DLKH=(void *)((unsigned long)result__FLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HLKH)));
+          } else {
+            next__DLKH=new_lab__QOJ(lab_type__GLKH);
+          };
+          ((__POINTER *)next__DLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ELKH)[ 0]=next__DLKH;
+        } else {
+          ((__POINTER *)result__FLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FLKH=next__DLKH;
+        };
+      };
+      ptr__BIMF=result__FLKH;
+    };
+    result__AIMF=((__FAST_ARRAYoLIP_STRINGo *)ptr__BIMF);
+    *(result__AIMF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__JVPF=((__FAST_ARRAYoLIP_STRINGo *)result__AIMF);
+  if ((Self__JVPF->parent_arrayed_collection__YVFF.capacity__SVPF <  10)) {
+    Self__JVPF->parent_arrayed_collection__YVFF.storage__3VPF=create__UFYF( 10);
+    Self__JVPF->parent_arrayed_collection__YVFF.capacity__SVPF= 10;
+  };
+  Self__JVPF->parent_arrayed_collection__YVFF.upper__OOPF=(__INTEGER)(-  1);
+  storage__ZVFF=result__AIMF;
+  LIP_STRING__->value__RLUE=NULL;
+  LIP_BOOLEAN__->value__FCQD=FALSE__;
+  result__IUNF=NULL;
+  ptr__JUNF=((__POINTER )(NULL));
+  typ_id__OUNF= 0;
+  sz__LUNF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__LUNF ==  0)) {
+    result__IUNF=LIP_BOOLEAN__;
   } else {
-    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__;
+    typ_id__OUNF=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LUNF);
+    if ((typ_id__OUNF == (__INTEGER)(-  1))) {
+      a__V3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUNF + a__V3GH) & (__UINTEGER_32)(~ a__V3GH));
+      ptr_table__JLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ILKH=((__POINTER )(NULL));
+      result__KLKH=((__POINTER *)ptr_table__JLKH)[ 0];
+      if ((result__KLKH == (void *)NULL)) {
+        result__KLKH=new_lab__QOJ(new_size__W3GH);
+        next__ILKH=(void *)((unsigned long)result__KLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3GH)));
+        ((__POINTER *)next__ILKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JLKH)[ 0]=next__ILKH;
+      } else {
+        next__ILKH=((__POINTER *)result__KLKH)[ 0];
+        if ((next__ILKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KLKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W3GH <<  1)) <=  4096)) {
+            next__ILKH=(void *)((unsigned long)result__KLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3GH)));
+          } else {
+            next__ILKH=new_lab__QOJ(new_size__W3GH);
+          };
+          ((__POINTER *)next__ILKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JLKH)[ 0]=next__ILKH;
+        } else {
+          ((__POINTER *)result__KLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ILKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KLKH=next__ILKH;
+        };
+      };
+      ptr__JUNF=result__KLKH;
+    } else {
+      t__03GH=((__UINTEGER_32 )typ_id__OUNF);
+      a__Z3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUNF + a__Z3GH) & (__UINTEGER_32)(~ a__Z3GH));
+      ptr_table__OLKH=((__POINTER )(&(table_type[(t__03GH)])));
+      lab_type__QLKH=(__UINTEGER_32)(t__03GH |  1);
+      next__NLKH=((__POINTER )(NULL));
+      result__PLKH=((__POINTER *)ptr_table__OLKH)[ 0];
+      if ((result__PLKH == (void *)NULL)) {
+        result__PLKH=new_lab__QOJ(lab_type__QLKH);
+        next__NLKH=(void *)((unsigned long)result__PLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLKH)));
+        ((__POINTER *)next__NLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OLKH)[ 0]=next__NLKH;
+      } else {
+        next__NLKH=((__POINTER *)result__PLKH)[ 0];
+        if ((next__NLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PLKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RLKH <<  1)) <=  4096)) {
+            next__NLKH=(void *)((unsigned long)result__PLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RLKH)));
+          } else {
+            next__NLKH=new_lab__QOJ(lab_type__QLKH);
+          };
+          ((__POINTER *)next__NLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OLKH)[ 0]=next__NLKH;
+        } else {
+          ((__POINTER *)result__PLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PLKH=next__NLKH;
+        };
+      };
+      ptr__JUNF=result__PLKH;
+    };
+    result__IUNF=((__LIP_BOOLEAN *)ptr__JUNF);
+    *(result__IUNF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__IUNF)->value__FCQD=TRUE__;
+  true__OOLF=result__IUNF;
+  LIP_VALUE__->parent_lip_code__KEFE=(*LIP_CODE__);
+  LIP_VALUE__->value__DUUE=NULL;
+  LIP_BINARY__->parent_lip_code__RMZB=(*LIP_CODE__);
+  LIP_BINARY__->left__CYQD=NULL;
+  LIP_BINARY__->right__FYQD=NULL;
+  LIP_BINARY__->operator__IYQD='\0';
+  LIP_AFFECT__->parent_lip_code__PRPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__NEFC=NULL;
+  LIP_AFFECT__->value__5EFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__IPTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__JBUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__FCUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__RKID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__SCQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__UQTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__5QTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__5KYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__QUMD=NULL;
+  ptr__RUMD=((__POINTER )(NULL));
+  typ_id__WUMD= 0;
+  sz__TUMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__TUMD ==  0)) {
+    result__QUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
   } else {
-    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__;
+    typ_id__WUMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TUMD);
+    if ((typ_id__WUMD == (__INTEGER)(-  1))) {
+      a__33GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__43GH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUMD + a__33GH) & (__UINTEGER_32)(~ a__33GH));
+      ptr_table__TLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__43GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SLKH=((__POINTER )(NULL));
+      result__ULKH=((__POINTER *)ptr_table__TLKH)[ 0];
+      if ((result__ULKH == (void *)NULL)) {
+        result__ULKH=new_lab__QOJ(new_size__43GH);
+        next__SLKH=(void *)((unsigned long)result__ULKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43GH)));
+        ((__POINTER *)next__SLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TLKH)[ 0]=next__SLKH;
+      } else {
+        next__SLKH=((__POINTER *)result__ULKH)[ 0];
+        if ((next__SLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ULKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__43GH <<  1)) <=  4096)) {
+            next__SLKH=(void *)((unsigned long)result__ULKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43GH)));
+          } else {
+            next__SLKH=new_lab__QOJ(new_size__43GH);
+          };
+          ((__POINTER *)next__SLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TLKH)[ 0]=next__SLKH;
+        } else {
+          ((__POINTER *)result__ULKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ULKH=next__SLKH;
+        };
+      };
+      ptr__RUMD=result__ULKH;
+    } else {
+      t__C4GH=((__UINTEGER_32 )typ_id__WUMD);
+      a__B4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1LKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUMD + a__B4GH) & (__UINTEGER_32)(~ a__B4GH));
+      ptr_table__YLKH=((__POINTER )(&(table_type[(t__C4GH)])));
+      lab_type__0LKH=(__UINTEGER_32)(t__C4GH |  1);
+      next__XLKH=((__POINTER )(NULL));
+      result__ZLKH=((__POINTER *)ptr_table__YLKH)[ 0];
+      if ((result__ZLKH == (void *)NULL)) {
+        result__ZLKH=new_lab__QOJ(lab_type__0LKH);
+        next__XLKH=(void *)((unsigned long)result__ZLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LKH)));
+        ((__POINTER *)next__XLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YLKH)[ 0]=next__XLKH;
+      } else {
+        next__XLKH=((__POINTER *)result__ZLKH)[ 0];
+        if ((next__XLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZLKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1LKH <<  1)) <=  4096)) {
+            next__XLKH=(void *)((unsigned long)result__ZLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1LKH)));
+          } else {
+            next__XLKH=new_lab__QOJ(lab_type__0LKH);
+          };
+          ((__POINTER *)next__XLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YLKH)[ 0]=next__XLKH;
+        } else {
+          ((__POINTER *)result__ZLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZLKH=next__XLKH;
+        };
+      };
+      ptr__RUMD=result__ZLKH;
+    };
+    result__QUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__RUMD);
+    *(result__QUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__DGUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__QUMD);
+  if ((Self__DGUD->parent_arrayed_collection__RKID.capacity__JBUD <  5)) {
+    Self__DGUD->parent_arrayed_collection__RKID.storage__FCUD=create__LYIE( 5);
+    Self__DGUD->parent_arrayed_collection__RKID.capacity__JBUD= 5;
+  };
+  Self__DGUD->parent_arrayed_collection__RKID.upper__IPTD=(__INTEGER)(-  1);
+  free_list__SKID=result__QUMD;
+  LIP_IF__->parent_lip_code__QOYC=(*LIP_CODE__);
+  LIP_IF__->condition__WBQD=NULL;
+  LIP_IF__->then__MCQD=NULL;
+  LIP_IF__->else__DDQD=NULL;
+  LIP_PRINT__->parent_lip_code__CPYC=(*LIP_CODE__);
+  LIP_PRINT__->message__IOUE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__YTRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__TTRD= 0;
+  result__4UED=NULL;
+  ptr__5UED=((__POINTER )(NULL));
+  typ_id__EVED= 0;
+  sz__BVED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__BVED ==  0)) {
+    result__4UED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
   } else {
-    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 *))))));
+    typ_id__EVED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BVED);
+    if ((typ_id__EVED == (__INTEGER)(-  1))) {
+      a__F4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__BVED + a__F4GH) & (__UINTEGER_32)(~ a__F4GH));
+      ptr_table__3LKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2LKH=((__POINTER )(NULL));
+      result__4LKH=((__POINTER *)ptr_table__3LKH)[ 0];
+      if ((result__4LKH == (void *)NULL)) {
+        result__4LKH=new_lab__QOJ(new_size__G4GH);
+        next__2LKH=(void *)((unsigned long)result__4LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4GH)));
+        ((__POINTER *)next__2LKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3LKH)[ 0]=next__2LKH;
+      } else {
+        next__2LKH=((__POINTER *)result__4LKH)[ 0];
+        if ((next__2LKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4LKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G4GH <<  1)) <=  4096)) {
+            next__2LKH=(void *)((unsigned long)result__4LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4GH)));
+          } else {
+            next__2LKH=new_lab__QOJ(new_size__G4GH);
+          };
+          ((__POINTER *)next__2LKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3LKH)[ 0]=next__2LKH;
+        } else {
+          ((__POINTER *)result__4LKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2LKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4LKH=next__2LKH;
+        };
+      };
+      ptr__5UED=result__4LKH;
+    } else {
+      t__K4GH=((__UINTEGER_32 )typ_id__EVED);
+      a__J4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BVED + a__J4GH) & (__UINTEGER_32)(~ a__J4GH));
+      ptr_table__CMKH=((__POINTER )(&(table_type[(t__K4GH)])));
+      lab_type__EMKH=(__UINTEGER_32)(t__K4GH |  1);
+      next__BMKH=((__POINTER )(NULL));
+      result__DMKH=((__POINTER *)ptr_table__CMKH)[ 0];
+      if ((result__DMKH == (void *)NULL)) {
+        result__DMKH=new_lab__QOJ(lab_type__EMKH);
+        next__BMKH=(void *)((unsigned long)result__DMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMKH)));
+        ((__POINTER *)next__BMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CMKH)[ 0]=next__BMKH;
+      } else {
+        next__BMKH=((__POINTER *)result__DMKH)[ 0];
+        if ((next__BMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DMKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FMKH <<  1)) <=  4096)) {
+            next__BMKH=(void *)((unsigned long)result__DMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FMKH)));
+          } else {
+            next__BMKH=new_lab__QOJ(lab_type__EMKH);
+          };
+          ((__POINTER *)next__BMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CMKH)[ 0]=next__BMKH;
+        } else {
+          ((__POINTER *)result__DMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DMKH=next__BMKH;
+        };
+      };
+      ptr__5UED=result__DMKH;
+    };
+    result__4UED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__5UED);
+    *(result__4UED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__MKSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__4UED);
+  new_capacity__IBXD=prime_number_ceiling__K01( 193);
+  sz__SWEH=((__UINTEGER_32 )(__INTEGER)(new_capacity__IBXD * ((__INTEGER )(sizeof(void *)))));
+  result__RWEH=((__POINTER )(NULL));
+  a__XWEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__TWEH=(__UINTEGER_32)((__UINTEGER_32)(sz__SWEH + a__XWEH) & (__UINTEGER_32)(~ a__XWEH));
+  new_size2__UWEH=(__UINTEGER_32)(new_size__TWEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__UWEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__N4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__O4GH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UWEH + a__N4GH) & (__UINTEGER_32)(~ a__N4GH));
+    ptr_table__HMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__GMKH=((__POINTER )(NULL));
+    result__IMKH=((__POINTER *)ptr_table__HMKH)[ 0];
+    if ((result__IMKH == (void *)NULL)) {
+      result__IMKH=new_lab__QOJ(new_size__O4GH);
+      next__GMKH=(void *)((unsigned long)result__IMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4GH)));
+      ((__POINTER *)next__GMKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__HMKH)[ 0]=next__GMKH;
+    } else {
+      next__GMKH=((__POINTER *)result__IMKH)[ 0];
+      if ((next__GMKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IMKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O4GH <<  1)) <=  4096)) {
+          next__GMKH=(void *)((unsigned long)result__IMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4GH)));
+        } else {
+          next__GMKH=new_lab__QOJ(new_size__O4GH);
+        };
+        ((__POINTER *)next__GMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HMKH)[ 0]=next__GMKH;
+      } else {
+        ((__POINTER *)result__IMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__IMKH=next__GMKH;
+      };
+    };
+    ((__POINTER *)result__IMKH)[ 0]=((__POINTER ) 3);
+    result__RWEH=(void *)((unsigned long)result__IMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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__;
+    result__LMKH=first_free__VAVB;
+    while ((((void *)result__LMKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__LMKH)->map_size_and_id__YTB &  4294967292LU) < new_size__TWEH))) {
+      result__LMKH=((__MEMORY *)result__LMKH)->map_next_free__ZTB;
+    };
+    if (((void *)result__LMKH == (void *)NULL)) {
+      result__LMKH=new_page__B24();
+    };
+    to_busy__index__KRFC(result__LMKH,new_size__TWEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__LMKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__RWEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__LMKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__DSHE=((void **)result__RWEH);
+  Self__DHYE=(__INTEGER)(new_capacity__IBXD -  1);
+  while ((Self__DHYE >=  0)) {
+    Result__DSHE[Self__DHYE]=NULL;
+    Self__DHYE=(__INTEGER)(Self__DHYE -  1);
+  };
+  Self__MKSD->buckets__YTRD=Result__DSHE;
+  Self__MKSD->capacity__TTRD=new_capacity__IBXD;
+  list_data__UMNC=result__4UED;
+  push_back_flag__JPMF=FALSE__;
+  memory__31LF='\0';
+  last_integer__1RUE= 0;
+  last_string__NSUE=create__ZBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__UXPF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__13PF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__G4PF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__CTUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__EPNF=NULL;
+  ptr__FPNF=((__POINTER )(NULL));
+  typ_id__KPNF= 0;
+  sz__HPNF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__HPNF ==  0)) {
+    result__EPNF=FAST_ARRAYoLIP_SLOT_DATAo__;
   } else {
-    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__;
+    typ_id__KPNF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HPNF);
+    if ((typ_id__KPNF == (__INTEGER)(-  1))) {
+      a__U4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__V4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__HPNF + a__U4GH) & (__UINTEGER_32)(~ a__U4GH));
+      ptr_table__PMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__OMKH=((__POINTER )(NULL));
+      result__QMKH=((__POINTER *)ptr_table__PMKH)[ 0];
+      if ((result__QMKH == (void *)NULL)) {
+        result__QMKH=new_lab__QOJ(new_size__V4GH);
+        next__OMKH=(void *)((unsigned long)result__QMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V4GH)));
+        ((__POINTER *)next__OMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PMKH)[ 0]=next__OMKH;
+      } else {
+        next__OMKH=((__POINTER *)result__QMKH)[ 0];
+        if ((next__OMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QMKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__V4GH <<  1)) <=  4096)) {
+            next__OMKH=(void *)((unsigned long)result__QMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V4GH)));
+          } else {
+            next__OMKH=new_lab__QOJ(new_size__V4GH);
+          };
+          ((__POINTER *)next__OMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PMKH)[ 0]=next__OMKH;
+        } else {
+          ((__POINTER *)result__QMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QMKH=next__OMKH;
+        };
+      };
+      ptr__FPNF=result__QMKH;
+    } else {
+      t__Z4GH=((__UINTEGER_32 )typ_id__KPNF);
+      a__Y4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HPNF + a__Y4GH) & (__UINTEGER_32)(~ a__Y4GH));
+      ptr_table__UMKH=((__POINTER )(&(table_type[(t__Z4GH)])));
+      lab_type__WMKH=(__UINTEGER_32)(t__Z4GH |  1);
+      next__TMKH=((__POINTER )(NULL));
+      result__VMKH=((__POINTER *)ptr_table__UMKH)[ 0];
+      if ((result__VMKH == (void *)NULL)) {
+        result__VMKH=new_lab__QOJ(lab_type__WMKH);
+        next__TMKH=(void *)((unsigned long)result__VMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMKH)));
+        ((__POINTER *)next__TMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UMKH)[ 0]=next__TMKH;
+      } else {
+        next__TMKH=((__POINTER *)result__VMKH)[ 0];
+        if ((next__TMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VMKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XMKH <<  1)) <=  4096)) {
+            next__TMKH=(void *)((unsigned long)result__VMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XMKH)));
+          } else {
+            next__TMKH=new_lab__QOJ(lab_type__WMKH);
+          };
+          ((__POINTER *)next__TMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UMKH)[ 0]=next__TMKH;
+        } else {
+          ((__POINTER *)result__VMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VMKH=next__TMKH;
+        };
+      };
+      ptr__FPNF=result__VMKH;
+    };
+    result__EPNF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__FPNF);
+    *(result__EPNF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__S3PF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__EPNF);
+  if ((Self__S3PF->parent_arrayed_collection__CTUE.capacity__13PF <  8)) {
+    sz__0WEH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__ZWEH=((__POINTER )(NULL));
+    a__5WEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__1WEH=(__UINTEGER_32)((__UINTEGER_32)(sz__0WEH + a__5WEH) & (__UINTEGER_32)(~ a__5WEH));
+    new_size2__2WEH=(__UINTEGER_32)(new_size__1WEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__2WEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__24GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__34GH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2WEH + a__24GH) & (__UINTEGER_32)(~ a__24GH));
+      ptr_table__ZMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__34GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YMKH=((__POINTER )(NULL));
+      result__0MKH=((__POINTER *)ptr_table__ZMKH)[ 0];
+      if ((result__0MKH == (void *)NULL)) {
+        result__0MKH=new_lab__QOJ(new_size__34GH);
+        next__YMKH=(void *)((unsigned long)result__0MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34GH)));
+        ((__POINTER *)next__YMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZMKH)[ 0]=next__YMKH;
+      } else {
+        next__YMKH=((__POINTER *)result__0MKH)[ 0];
+        if ((next__YMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0MKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__34GH <<  1)) <=  4096)) {
+            next__YMKH=(void *)((unsigned long)result__0MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34GH)));
+          } else {
+            next__YMKH=new_lab__QOJ(new_size__34GH);
+          };
+          ((__POINTER *)next__YMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZMKH)[ 0]=next__YMKH;
+        } else {
+          ((__POINTER *)result__0MKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0MKH=next__YMKH;
+        };
+      };
+      ((__POINTER *)result__0MKH)[ 0]=((__POINTER ) 3);
+      result__ZWEH=(void *)((unsigned long)result__0MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__3MKH=first_free__VAVB;
+      while ((((void *)result__3MKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3MKH)->map_size_and_id__YTB &  4294967292LU) < new_size__1WEH))) {
+        result__3MKH=((__MEMORY *)result__3MKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__3MKH == (void *)NULL)) {
+        result__3MKH=new_page__B24();
+      };
+      to_busy__index__KRFC(result__3MKH,new_size__1WEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3MKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+      result__ZWEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3MKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__G50F=((void **)result__ZWEH);
+    Self__1EAG= 7;
+    while ((Self__1EAG >=  0)) {
+      Result__G50F[Self__1EAG]=NULL;
+      Self__1EAG=(__INTEGER)(Self__1EAG -  1);
+    };
+    Self__S3PF->parent_arrayed_collection__CTUE.storage__G4PF=Result__G50F;
+    Self__S3PF->parent_arrayed_collection__CTUE.capacity__13PF= 8;
+  };
+  Self__S3PF->parent_arrayed_collection__CTUE.upper__UXPF=(__INTEGER)(-  1);
+  stack__DTUE=result__EPNF;
+  path_file__P0WF=create_with_capacity__UFRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__VSKF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__2YPF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__HZPF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__LSKF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__DANF=NULL;
+  ptr__EANF=((__POINTER )(NULL));
+  typ_id__JANF= 0;
+  sz__GANF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__GANF ==  0)) {
+    result__DANF=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__;
+    typ_id__JANF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GANF);
+    if ((typ_id__JANF == (__INTEGER)(-  1))) {
+      a__D5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__E5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__GANF + a__D5GH) & (__UINTEGER_32)(~ a__D5GH));
+      ptr_table__BNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__E5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ANKH=((__POINTER )(NULL));
+      result__CNKH=((__POINTER *)ptr_table__BNKH)[ 0];
+      if ((result__CNKH == (void *)NULL)) {
+        result__CNKH=new_lab__QOJ(new_size__E5GH);
+        next__ANKH=(void *)((unsigned long)result__CNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5GH)));
+        ((__POINTER *)next__ANKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BNKH)[ 0]=next__ANKH;
+      } else {
+        next__ANKH=((__POINTER *)result__CNKH)[ 0];
+        if ((next__ANKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CNKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__E5GH <<  1)) <=  4096)) {
+            next__ANKH=(void *)((unsigned long)result__CNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E5GH)));
+          } else {
+            next__ANKH=new_lab__QOJ(new_size__E5GH);
+          };
+          ((__POINTER *)next__ANKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BNKH)[ 0]=next__ANKH;
+        } else {
+          ((__POINTER *)result__CNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CNKH=next__ANKH;
+        };
+      };
+      ptr__EANF=result__CNKH;
+    } else {
+      t__I5GH=((__UINTEGER_32 )typ_id__JANF);
+      a__H5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JNKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GANF + a__H5GH) & (__UINTEGER_32)(~ a__H5GH));
+      ptr_table__GNKH=((__POINTER )(&(table_type[(t__I5GH)])));
+      lab_type__INKH=(__UINTEGER_32)(t__I5GH |  1);
+      next__FNKH=((__POINTER )(NULL));
+      result__HNKH=((__POINTER *)ptr_table__GNKH)[ 0];
+      if ((result__HNKH == (void *)NULL)) {
+        result__HNKH=new_lab__QOJ(lab_type__INKH);
+        next__FNKH=(void *)((unsigned long)result__HNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNKH)));
+        ((__POINTER *)next__FNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GNKH)[ 0]=next__FNKH;
+      } else {
+        next__FNKH=((__POINTER *)result__HNKH)[ 0];
+        if ((next__FNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JNKH <<  1)) <=  4096)) {
+            next__FNKH=(void *)((unsigned long)result__HNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JNKH)));
+          } else {
+            next__FNKH=new_lab__QOJ(lab_type__INKH);
+          };
+          ((__POINTER *)next__FNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GNKH)[ 0]=next__FNKH;
+        } else {
+          ((__POINTER *)result__HNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HNKH=next__FNKH;
+        };
+      };
+      ptr__EANF=result__HNKH;
+    };
+    result__DANF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__EANF);
+    *(result__DANF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__TYPF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__DANF);
+  if ((Self__TYPF->parent_arrayed_collection__LSKF.capacity__2YPF <  32)) {
+    sz__CXEH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__BXEH=((__POINTER )(NULL));
+    a__HXEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DXEH=(__UINTEGER_32)((__UINTEGER_32)(sz__CXEH + a__HXEH) & (__UINTEGER_32)(~ a__HXEH));
+    new_size2__EXEH=(__UINTEGER_32)(new_size__DXEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__EXEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__L5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__M5GH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EXEH + a__L5GH) & (__UINTEGER_32)(~ a__L5GH));
+      ptr_table__LNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KNKH=((__POINTER )(NULL));
+      result__MNKH=((__POINTER *)ptr_table__LNKH)[ 0];
+      if ((result__MNKH == (void *)NULL)) {
+        result__MNKH=new_lab__QOJ(new_size__M5GH);
+        next__KNKH=(void *)((unsigned long)result__MNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5GH)));
+        ((__POINTER *)next__KNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LNKH)[ 0]=next__KNKH;
+      } else {
+        next__KNKH=((__POINTER *)result__MNKH)[ 0];
+        if ((next__KNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MNKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__M5GH <<  1)) <=  4096)) {
+            next__KNKH=(void *)((unsigned long)result__MNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5GH)));
+          } else {
+            next__KNKH=new_lab__QOJ(new_size__M5GH);
+          };
+          ((__POINTER *)next__KNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LNKH)[ 0]=next__KNKH;
+        } else {
+          ((__POINTER *)result__MNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MNKH=next__KNKH;
+        };
+      };
+      ((__POINTER *)result__MNKH)[ 0]=((__POINTER ) 3);
+      result__BXEH=(void *)((unsigned long)result__MNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__PNKH=first_free__VAVB;
+      while ((((void *)result__PNKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PNKH)->map_size_and_id__YTB &  4294967292LU) < new_size__DXEH))) {
+        result__PNKH=((__MEMORY *)result__PNKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__PNKH == (void *)NULL)) {
+        result__PNKH=new_page__B24();
+      };
+      to_busy__index__KRFC(result__PNKH,new_size__DXEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PNKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+      result__BXEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PNKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__N00F=((void **)result__BXEH);
+    Self__UDAG= 31;
+    while ((Self__UDAG >=  0)) {
+      Result__N00F[Self__UDAG]=NULL;
+      Self__UDAG=(__INTEGER)(Self__UDAG -  1);
+    };
+    Self__TYPF->parent_arrayed_collection__LSKF.storage__HZPF=Result__N00F;
+    Self__TYPF->parent_arrayed_collection__LSKF.capacity__2YPF= 32;
+  };
+  Self__TYPF->parent_arrayed_collection__LSKF.upper__VSKF=(__INTEGER)(-  1);
+  list_method__MSKF=result__DANF;
+  PROTOTYPE__->comment_slot__ZPTC=NULL;
+  PROTOTYPE__->comment_header__U2QC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__ZMEC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__UMEC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__WWFC= 0;
+  result__ZZYB=NULL;
+  ptr__0ZYB=((__POINTER )(NULL));
+  typ_id__5ZYB= 0;
+  sz__2ZYB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__2ZYB ==  0)) {
+    result__ZZYB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
   } else {
-    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__;
+    typ_id__5ZYB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2ZYB);
+    if ((typ_id__5ZYB == (__INTEGER)(-  1))) {
+      a__S5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__T5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ZYB + a__S5GH) & (__UINTEGER_32)(~ a__S5GH));
+      ptr_table__TNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__T5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SNKH=((__POINTER )(NULL));
+      result__UNKH=((__POINTER *)ptr_table__TNKH)[ 0];
+      if ((result__UNKH == (void *)NULL)) {
+        result__UNKH=new_lab__QOJ(new_size__T5GH);
+        next__SNKH=(void *)((unsigned long)result__UNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T5GH)));
+        ((__POINTER *)next__SNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TNKH)[ 0]=next__SNKH;
+      } else {
+        next__SNKH=((__POINTER *)result__UNKH)[ 0];
+        if ((next__SNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UNKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__T5GH <<  1)) <=  4096)) {
+            next__SNKH=(void *)((unsigned long)result__UNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__T5GH)));
+          } else {
+            next__SNKH=new_lab__QOJ(new_size__T5GH);
+          };
+          ((__POINTER *)next__SNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TNKH)[ 0]=next__SNKH;
+        } else {
+          ((__POINTER *)result__UNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UNKH=next__SNKH;
+        };
+      };
+      ptr__0ZYB=result__UNKH;
+    } else {
+      t__X5GH=((__UINTEGER_32 )typ_id__5ZYB);
+      a__W5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__1NKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ZYB + a__W5GH) & (__UINTEGER_32)(~ a__W5GH));
+      ptr_table__YNKH=((__POINTER )(&(table_type[(t__X5GH)])));
+      lab_type__0NKH=(__UINTEGER_32)(t__X5GH |  1);
+      next__XNKH=((__POINTER )(NULL));
+      result__ZNKH=((__POINTER *)ptr_table__YNKH)[ 0];
+      if ((result__ZNKH == (void *)NULL)) {
+        result__ZNKH=new_lab__QOJ(lab_type__0NKH);
+        next__XNKH=(void *)((unsigned long)result__ZNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NKH)));
+        ((__POINTER *)next__XNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YNKH)[ 0]=next__XNKH;
+      } else {
+        next__XNKH=((__POINTER *)result__ZNKH)[ 0];
+        if ((next__XNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZNKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1NKH <<  1)) <=  4096)) {
+            next__XNKH=(void *)((unsigned long)result__ZNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NKH)));
+          } else {
+            next__XNKH=new_lab__QOJ(lab_type__0NKH);
+          };
+          ((__POINTER *)next__XNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YNKH)[ 0]=next__XNKH;
+        } else {
+          ((__POINTER *)result__ZNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZNKH=next__XNKH;
+        };
+      };
+      ptr__0ZYB=result__ZNKH;
+    };
+    result__ZZYB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__0ZYB);
+    *(result__ZZYB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__ZUFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__ZZYB);
+  new_capacity__GEOC=prime_number_ceiling__K01( 193);
+  Self__ZUFC->buckets__ZMEC=create__D1XC(new_capacity__GEOC);
+  Self__ZUFC->capacity__UMEC=new_capacity__GEOC;
+  Self__ZUFC->count__WWFC= 0;
+  bucket_name__XQOB=result__ZZYB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__FNEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__QNEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__YNEC=NULL;
+  SECTION___->name__ZWDC=NULL;
+  SECTION___->type_list__IVFC=NULL;
+  last_section__E1C=NULL;
+  PROTOTYPE__->last_slot__11C=NULL;
+  ITM_SLOT__->id_section__F2C=NULL;
+  ITM_SLOT__->comment__RYOB=NULL;
+  ITM_SLOT__->result_type__N2FC=NULL;
+  ITM_SLOT__->affect__23FC='\0';
+  ITM_SLOT__->argument_list__3BHC=NULL;
+  ITM_SLOT__->next__FFHC=NULL;
+  ITM_SLOT__->comment_chapter__5YHC=NULL;
+  ITM_SLOT__->stat_shorter__XKTD= 0;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__VR5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__5OEC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__0OEC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__QZFC= 0;
+  result__42YB=NULL;
+  ptr__52YB=((__POINTER )(NULL));
+  typ_id__E3YB= 0;
+  sz__B3YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__B3YB ==  0)) {
+    result__42YB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__E3YB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B3YB);
+    if ((typ_id__E3YB == (__INTEGER)(-  1))) {
+      a__05GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__15GH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3YB + a__05GH) & (__UINTEGER_32)(~ a__05GH));
+      ptr_table__3NKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__15GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2NKH=((__POINTER )(NULL));
+      result__4NKH=((__POINTER *)ptr_table__3NKH)[ 0];
+      if ((result__4NKH == (void *)NULL)) {
+        result__4NKH=new_lab__QOJ(new_size__15GH);
+        next__2NKH=(void *)((unsigned long)result__4NKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__15GH)));
+        ((__POINTER *)next__2NKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3NKH)[ 0]=next__2NKH;
+      } else {
+        next__2NKH=((__POINTER *)result__4NKH)[ 0];
+        if ((next__2NKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4NKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__15GH <<  1)) <=  4096)) {
+            next__2NKH=(void *)((unsigned long)result__4NKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__15GH)));
+          } else {
+            next__2NKH=new_lab__QOJ(new_size__15GH);
+          };
+          ((__POINTER *)next__2NKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3NKH)[ 0]=next__2NKH;
+        } else {
+          ((__POINTER *)result__4NKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2NKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4NKH=next__2NKH;
+        };
+      };
+      ptr__52YB=result__4NKH;
+    } else {
+      t__55GH=((__UINTEGER_32 )typ_id__E3YB);
+      a__45GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3YB + a__45GH) & (__UINTEGER_32)(~ a__45GH));
+      ptr_table__COKH=((__POINTER )(&(table_type[(t__55GH)])));
+      lab_type__EOKH=(__UINTEGER_32)(t__55GH |  1);
+      next__BOKH=((__POINTER )(NULL));
+      result__DOKH=((__POINTER *)ptr_table__COKH)[ 0];
+      if ((result__DOKH == (void *)NULL)) {
+        result__DOKH=new_lab__QOJ(lab_type__EOKH);
+        next__BOKH=(void *)((unsigned long)result__DOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOKH)));
+        ((__POINTER *)next__BOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__COKH)[ 0]=next__BOKH;
+      } else {
+        next__BOKH=((__POINTER *)result__DOKH)[ 0];
+        if ((next__BOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DOKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FOKH <<  1)) <=  4096)) {
+            next__BOKH=(void *)((unsigned long)result__DOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOKH)));
+          } else {
+            next__BOKH=new_lab__QOJ(lab_type__EOKH);
+          };
+          ((__POINTER *)next__BOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__COKH)[ 0]=next__BOKH;
+        } else {
+          ((__POINTER *)result__DOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DOKH=next__BOKH;
+        };
+      };
+      ptr__52YB=result__DOKH;
+    };
+    result__42YB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__52YB);
+    *(result__42YB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__YXFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__42YB);
+  new_capacity__BIOC=prime_number_ceiling__K01( 193);
+  Self__YXFC->buckets__5OEC=create__GAYC(new_capacity__BIOC);
+  Self__YXFC->capacity__0OEC=new_capacity__BIOC;
+  Self__YXFC->count__QZFC= 0;
+  bucket_list__SSOB=result__42YB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__LPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__WPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__4PEC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__HRGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__PIHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__0IHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__KR1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__V3GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__X3GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__T4GC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__U4YB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__YG5B=NULL;
+  ptr__ZG5B=((__POINTER )(NULL));
+  typ_id__4G5B= 0;
+  sz__1G5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__1G5B ==  0)) {
+    result__YG5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
   } else {
-    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__;
+    typ_id__4G5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1G5B);
+    if ((typ_id__4G5B == (__INTEGER)(-  1))) {
+      a__CAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1G5B + a__CAHH) & (__UINTEGER_32)(~ a__CAHH));
+      ptr_table__HOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__GOKH=((__POINTER )(NULL));
+      result__IOKH=((__POINTER *)ptr_table__HOKH)[ 0];
+      if ((result__IOKH == (void *)NULL)) {
+        result__IOKH=new_lab__QOJ(new_size__DAHH);
+        next__GOKH=(void *)((unsigned long)result__IOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DAHH)));
+        ((__POINTER *)next__GOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HOKH)[ 0]=next__GOKH;
+      } else {
+        next__GOKH=((__POINTER *)result__IOKH)[ 0];
+        if ((next__GOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IOKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DAHH <<  1)) <=  4096)) {
+            next__GOKH=(void *)((unsigned long)result__IOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DAHH)));
+          } else {
+            next__GOKH=new_lab__QOJ(new_size__DAHH);
+          };
+          ((__POINTER *)next__GOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HOKH)[ 0]=next__GOKH;
+        } else {
+          ((__POINTER *)result__IOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IOKH=next__GOKH;
+        };
+      };
+      ptr__ZG5B=result__IOKH;
+    } else {
+      t__HAHH=((__UINTEGER_32 )typ_id__4G5B);
+      a__GAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__POKH=(__UINTEGER_32)((__UINTEGER_32)(sz__1G5B + a__GAHH) & (__UINTEGER_32)(~ a__GAHH));
+      ptr_table__MOKH=((__POINTER )(&(table_type[(t__HAHH)])));
+      lab_type__OOKH=(__UINTEGER_32)(t__HAHH |  1);
+      next__LOKH=((__POINTER )(NULL));
+      result__NOKH=((__POINTER *)ptr_table__MOKH)[ 0];
+      if ((result__NOKH == (void *)NULL)) {
+        result__NOKH=new_lab__QOJ(lab_type__OOKH);
+        next__LOKH=(void *)((unsigned long)result__NOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POKH)));
+        ((__POINTER *)next__LOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MOKH)[ 0]=next__LOKH;
+      } else {
+        next__LOKH=((__POINTER *)result__NOKH)[ 0];
+        if ((next__LOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NOKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__POKH <<  1)) <=  4096)) {
+            next__LOKH=(void *)((unsigned long)result__NOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POKH)));
+          } else {
+            next__LOKH=new_lab__QOJ(lab_type__OOKH);
+          };
+          ((__POINTER *)next__LOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MOKH)[ 0]=next__LOKH;
+        } else {
+          ((__POINTER *)result__NOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NOKH=next__LOKH;
+        };
+      };
+      ptr__ZG5B=result__NOKH;
+    };
+    result__YG5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__ZG5B);
+    *(result__YG5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__GIHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__YG5B);
+  if ((Self__GIHC->parent_arrayed_collection__KR1B.capacity__PIHC <  5)) {
+    Self__GIHC->parent_arrayed_collection__KR1B.storage__0IHC=create__4KBD( 5);
+    Self__GIHC->parent_arrayed_collection__KR1B.capacity__PIHC= 5;
+  };
+  Self__GIHC->parent_arrayed_collection__KR1B.upper__HRGC=(__INTEGER)(-  1);
+  free_list__LR1B=result__YG5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__BYHC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__MYHC=NULL;
+  last_slot__QTOB=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__G5FC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__R5FC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__Z5FC=NULL;
+  PROTOTYPE__->first_slot__XCZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__NKTD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__E1VE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__5HWE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__QJTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__R4HE=NULL;
+  ptr__S4HE=((__POINTER )(NULL));
+  typ_id__X4HE= 0;
+  sz__U4HE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__U4HE ==  0)) {
+    result__R4HE=FAST_ARRAYoITM_SLOTo__;
   } else {
-    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);
+    typ_id__X4HE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U4HE);
+    if ((typ_id__X4HE == (__INTEGER)(-  1))) {
+      a__KAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4HE + a__KAHH) & (__UINTEGER_32)(~ a__KAHH));
+      ptr_table__ROKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QOKH=((__POINTER )(NULL));
+      result__SOKH=((__POINTER *)ptr_table__ROKH)[ 0];
+      if ((result__SOKH == (void *)NULL)) {
+        result__SOKH=new_lab__QOJ(new_size__LAHH);
+        next__QOKH=(void *)((unsigned long)result__SOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAHH)));
+        ((__POINTER *)next__QOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ROKH)[ 0]=next__QOKH;
+      } else {
+        next__QOKH=((__POINTER *)result__SOKH)[ 0];
+        if ((next__QOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SOKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LAHH <<  1)) <=  4096)) {
+            next__QOKH=(void *)((unsigned long)result__SOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LAHH)));
+          } else {
+            next__QOKH=new_lab__QOJ(new_size__LAHH);
+          };
+          ((__POINTER *)next__QOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ROKH)[ 0]=next__QOKH;
+        } else {
+          ((__POINTER *)result__SOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SOKH=next__QOKH;
+        };
+      };
+      ptr__S4HE=result__SOKH;
+    } else {
+      t__PAHH=((__UINTEGER_32 )typ_id__X4HE);
+      a__OAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__U4HE + a__OAHH) & (__UINTEGER_32)(~ a__OAHH));
+      ptr_table__WOKH=((__POINTER )(&(table_type[(t__PAHH)])));
+      lab_type__YOKH=(__UINTEGER_32)(t__PAHH |  1);
+      next__VOKH=((__POINTER )(NULL));
+      result__XOKH=((__POINTER *)ptr_table__WOKH)[ 0];
+      if ((result__XOKH == (void *)NULL)) {
+        result__XOKH=new_lab__QOJ(lab_type__YOKH);
+        next__VOKH=(void *)((unsigned long)result__XOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOKH)));
+        ((__POINTER *)next__VOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WOKH)[ 0]=next__VOKH;
+      } else {
+        next__VOKH=((__POINTER *)result__XOKH)[ 0];
+        if ((next__VOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XOKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZOKH <<  1)) <=  4096)) {
+            next__VOKH=(void *)((unsigned long)result__XOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOKH)));
+          } else {
+            next__VOKH=new_lab__QOJ(lab_type__YOKH);
+          };
+          ((__POINTER *)next__VOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WOKH)[ 0]=next__VOKH;
+        } else {
+          ((__POINTER *)result__XOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XOKH=next__VOKH;
+        };
+      };
+      ptr__S4HE=result__XOKH;
+    };
+    result__R4HE=((__FAST_ARRAYoITM_SLOTo *)ptr__S4HE);
+    *(result__R4HE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__MHWE=((__FAST_ARRAYoITM_SLOTo *)result__R4HE);
+  if ((Self__MHWE->parent_arrayed_collection__QJTD.capacity__E1VE <  256)) {
+    Self__MHWE->parent_arrayed_collection__QJTD.storage__5HWE=create__35EF( 256);
+    Self__MHWE->parent_arrayed_collection__QJTD.capacity__E1VE= 256;
+  };
+  Self__MHWE->parent_arrayed_collection__QJTD.upper__NKTD=(__INTEGER)(-  1);
+  list_tmp__RJTD=result__R4HE;
+  str_tmp__IH4E=create__ZBB( 512);
+  str_tmp2__KJ4E=create__ZBB( 64);
+  str_tmp3__KN4E=create__ZBB( 64);
   txt__1=NULL;
   p__AB=NULL;
-  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__;
+  create__ZBB( 255);
+  result__TUB=NULL;
+  ptr__UUB=((__POINTER )(NULL));
+  typ_id__ZUB= 0;
+  sz__WUB=((__UINTEGER_32 )sizeof(__HASHED_SEToABSTRACT_STRINGo));
+  if ((sz__WUB ==  0)) {
+    result__TUB=HASHED_SEToABSTRACT_STRINGo__;
   } else {
-    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));
+    typ_id__ZUB=__HASHED_SEToABSTRACT_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WUB);
+    if ((typ_id__ZUB == (__INTEGER)(-  1))) {
+      a__SAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__SAHH) & (__UINTEGER_32)(~ a__SAHH));
+      ptr_table__1OKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0OKH=((__POINTER )(NULL));
+      result__2OKH=((__POINTER *)ptr_table__1OKH)[ 0];
+      if ((result__2OKH == (void *)NULL)) {
+        result__2OKH=new_lab__QOJ(new_size__TAHH);
+        next__0OKH=(void *)((unsigned long)result__2OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TAHH)));
+        ((__POINTER *)next__0OKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1OKH)[ 0]=next__0OKH;
+      } else {
+        next__0OKH=((__POINTER *)result__2OKH)[ 0];
+        if ((next__0OKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2OKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TAHH <<  1)) <=  4096)) {
+            next__0OKH=(void *)((unsigned long)result__2OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TAHH)));
+          } else {
+            next__0OKH=new_lab__QOJ(new_size__TAHH);
+          };
+          ((__POINTER *)next__0OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1OKH)[ 0]=next__0OKH;
+        } else {
+          ((__POINTER *)result__2OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2OKH=next__0OKH;
+        };
+      };
+      ptr__UUB=result__2OKH;
+    } else {
+      t__XAHH=((__UINTEGER_32 )typ_id__ZUB);
+      a__WAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__WAHH) & (__UINTEGER_32)(~ a__WAHH));
+      ptr_table__APKH=((__POINTER )(&(table_type[(t__XAHH)])));
+      lab_type__CPKH=(__UINTEGER_32)(t__XAHH |  1);
+      next__5OKH=((__POINTER )(NULL));
+      result__BPKH=((__POINTER *)ptr_table__APKH)[ 0];
+      if ((result__BPKH == (void *)NULL)) {
+        result__BPKH=new_lab__QOJ(lab_type__CPKH);
+        next__5OKH=(void *)((unsigned long)result__BPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPKH)));
+        ((__POINTER *)next__5OKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
+      } else {
+        next__5OKH=((__POINTER *)result__BPKH)[ 0];
+        if ((next__5OKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BPKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DPKH <<  1)) <=  4096)) {
+            next__5OKH=(void *)((unsigned long)result__BPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPKH)));
+          } else {
+            next__5OKH=new_lab__QOJ(lab_type__CPKH);
+          };
+          ((__POINTER *)next__5OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
+        } else {
+          ((__POINTER *)result__BPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BPKH=next__5OKH;
+        };
+      };
+      ptr__UUB=result__BPKH;
+    };
+    result__TUB=((__HASHED_SEToABSTRACT_STRINGo *)ptr__UUB);
+    *(result__TUB) = *(HASHED_SEToABSTRACT_STRINGo__);
+  };
+  Self__C4R=((__HASHED_SEToABSTRACT_STRINGo *)result__TUB);
+  new_capacity__PVW=prime_number_ceiling__K01( 53);
+  Self__C4R->buckets__ZUR=create__UF2(new_capacity__PVW);
+  Self__C4R->capacity__UUR=new_capacity__PVW;
+  Self__C4R->count__0VR= 0;
+  list__FK=result__TUB;
+  add__DUR(result__TUB,(&__string_4));
+  add__DUR(list__FK,(&__string_5));
+  add__DUR(list__FK,(&__string_6));
+  add__DUR(list__FK,(&__string_7));
+  add__DUR(list__FK,(&__string_8));
+  add__DUR(list__FK,(&__string_9));
+  add__DUR(list__FK,(&__string_10));
+  add__DUR(list__FK,(&__string_11));
+  add__DUR(list__FK,(&__string_12));
+  add__DUR(list__FK,(&__string_13));
+  add__DUR(list__FK,(&__string_14));
+  add__DUR(list__FK,(&__string_15));
+  add__DUR(list__FK,(&__string_16));
+  add__DUR(list__FK,(&__string_17));
+  add__DUR(list__FK,(&__string_18));
+  add__DUR(list__FK,(&__string_19));
+  add__DUR(list__FK,(&__string_20));
+  add__DUR(list__FK,(&__string_21));
+  add__DUR(list__FK,(&__string_22));
+  add__DUR(list__FK,(&__string_23));
+  add__DUR(list__FK,(&__string_24));
+  add__DUR(list__FK,(&__string_25));
+  add__DUR(list__FK,(&__string_26));
+  add__DUR(list__FK,(&__string_27));
+  add__DUR(list__FK,(&__string_28));
+  add__DUR(list__FK,(&__string_29));
+  add__DUR(list__FK,(&__string_30));
+  add__DUR(list__FK,(&__string_31));
+  add__DUR(list__FK,(&__string_32));
+  add__DUR(list__FK,(&__string_33));
+  add__DUR(list__FK,(&__string_34));
+  add__DUR(list__FK,(&__string_35));
+  add__DUR(list__FK,(&__string_36));
+  add__DUR(list__FK,(&__string_37));
+  add__DUR(list__FK,(&__string_38));
+  add__DUR(list__FK,(&__string_39));
+  add__DUR(list__FK,(&__string_40));
+  add__DUR(list__FK,(&__string_41));
+  add__DUR(list__FK,(&__string_42));
+  add__DUR(list__FK,(&__string_43));
+  add__DUR(list__FK,(&__string_44));
+  add__DUR(list__FK,(&__string_45));
+  add__DUR(list__FK,(&__string_46));
+  add__DUR(list__FK,(&__string_47));
+  add__DUR(list__FK,(&__string_1));
+  add__DUR(list__FK,(&__string_48));
+  add__DUR(list__FK,(&__string_49));
+  add__DUR(list__FK,(&__string_50));
+  add__DUR(list__FK,(&__string_51));
+  add__DUR(list__FK,(&__string_52));
+  add__DUR(list__FK,(&__string_53));
+  add__DUR(list__FK,(&__string_54));
+  add__DUR(list__FK,(&__string_55));
+  add__DUR(list__FK,(&__string_56));
+  add__DUR(list__FK,(&__string_57));
+  add__DUR(list__FK,(&__string_58));
+  add__DUR(list__FK,(&__string_59));
+  add__DUR(list__FK,(&__string_2));
+  add__DUR(list__FK,(&__string_3));
+  add__DUR(list__FK,(&__string_60));
+  add__DUR(list__FK,(&__string_61));
+  add__DUR(list__FK,(&__string_62));
+  add__DUR(list__FK,(&__string_63));
+  add__DUR(list__FK,(&__string_64));
+  add__DUR(list__FK,(&__string_65));
+  add__DUR(list__FK,(&__string_66));
+  add__DUR(list__FK,(&__string_67));
+  add__DUR(list__FK,(&__string_68));
+  add__DUR(list__FK,(&__string_69));
+  add__DUR(list__FK,(&__string_70));
+  add__DUR(list__FK,(&__string_71));
+  add__DUR(list__FK,(&__string_72));
+  add__DUR(list__FK,(&__string_73));
+  add__DUR(list__FK,(&__string_74));
+  add__DUR(list__FK,(&__string_75));
+  add__DUR(list__FK,(&__string_76));
+  add__DUR(list__FK,(&__string_77));
+  add__DUR(list__FK,(&__string_78));
+  add__DUR(list__FK,(&__string_79));
+  add__DUR(list__FK,(&__string_80));
+  add__DUR(list__FK,(&__string_81));
+  add__DUR(list__FK,(&__string_82));
+  add__DUR(list__FK,(&__string_83));
+  add__DUR(list__FK,(&__string_84));
+  add__DUR(list__FK,(&__string_85));
+  add__DUR(list__FK,(&__string_86));
+  add__DUR(list__FK,(&__string_87));
+  add__DUR(list__FK,(&__string_88));
+  add__DUR(list__FK,(&__string_89));
+  add__DUR(list__FK,(&__string_90));
+  add__DUR(list__FK,(&__string_91));
+  add__DUR(list__FK,(&__string_92));
+  add__DUR(list__FK,(&__string_93));
+  add__DUR(list__FK,(&__string_94));
+  add__DUR(list__FK,(&__string_95));
+  add__DUR(list__FK,(&__string_96));
+  add__DUR(list__FK,(&__string_97));
+  add__DUR(list__FK,(&__string_98));
+  add__DUR(list__FK,(&__string_99));
+  add__DUR(list__FK,(&__string_100));
+  add__DUR(list__FK,(&__string_101));
+  add__DUR(list__FK,(&__string_102));
+  add__DUR(list__FK,(&__string_103));
+  add__DUR(list__FK,(&__string_104));
+  add__DUR(list__FK,(&__string_105));
+  add__DUR(list__FK,(&__string_106));
+  add__DUR(list__FK,(&__string_107));
+  add__DUR(list__FK,(&__string_108));
+  add__DUR(list__FK,(&__string_109));
+  add__DUR(list__FK,(&__string_110));
+  add__DUR(list__FK,(&__string_111));
+  add__DUR(list__FK,(&__string_112));
+  add__DUR(list__FK,(&__string_113));
+  add__DUR(list__FK,(&__string_114));
+  add__DUR(list__FK,(&__string_115));
+  add__DUR(list__FK,(&__string_116));
+  add__DUR(list__FK,(&__string_117));
+  add__DUR(list__FK,(&__string_118));
+  add__DUR(list__FK,(&__string_119));
+  add__DUR(list__FK,(&__string_120));
+  add__DUR(list__FK,(&__string_121));
+  add__DUR(list__FK,(&__string_122));
+  add__DUR(list__FK,(&__string_123));
+  add__DUR(list__FK,(&__string_124));
+  add__DUR(list__FK,(&__string_125));
+  add__DUR(list__FK,(&__string_126));
+  add__DUR(list__FK,(&__string_127));
+  add__DUR(list__FK,(&__string_128));
+  add__DUR(list__FK,(&__string_129));
+  add__DUR(list__FK,(&__string_70));
+  add__DUR(list__FK,(&__string_130));
+  add__DUR(list__FK,(&__string_131));
+  add__DUR(list__FK,(&__string_132));
+  add__DUR(list__FK,(&__string_133));
+  add__DUR(list__FK,(&__string_65));
+  add__DUR(list__FK,(&__string_134));
+  add__DUR(list__FK,(&__string_135));
+  add__DUR(list__FK,(&__string_136));
+  add__DUR(list__FK,(&__string_137));
+  add__DUR(list__FK,(&__string_138));
+  add__DUR(list__FK,(&__string_139));
+  add__DUR(list__FK,(&__string_140));
+  add__DUR(list__FK,(&__string_141));
+  add__DUR(list__FK,(&__string_142));
+  add__DUR(list__FK,(&__string_143));
+  add__DUR(list__FK,(&__string_144));
+  add__DUR(list__FK,(&__string_145));
+  add__DUR(list__FK,(&__string_146));
+  add__DUR(list__FK,(&__string_147));
+  add__DUR(list__FK,(&__string_148));
+  add__DUR(list__FK,(&__string_149));
+  add__DUR(list__FK,(&__string_150));
+  add__DUR(list__FK,(&__string_66));
+  add__DUR(list__FK,(&__string_151));
+  add__DUR(list__FK,(&__string_152));
+  add__DUR(list__FK,(&__string_153));
+  add__DUR(list__FK,(&__string_154));
+  add__DUR(list__FK,(&__string_155));
+  add__DUR(list__FK,(&__string_156));
+  operator__name__GHB((&__string_16));
+  operator__name__GHB((&__string_17));
+  cmd__HZ=NULL;
+  path__KZ=NULL;
+  is_shorter__LZ=TRUE__;
+  j__IZ= 1;
+  while ((j__IZ <= ((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.upper__UKC)) {
+    cmd__HZ=((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ];
+    if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'o')) {
+        j__IZ=(__INTEGER)(j__IZ +  1);
+        if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
+          print__DID((&__string_157));
           exit(( 1));
         };
-        output_name__DI=get__QWB(((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ]);
-        __tmp__O0=TRUE__;
+        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
+        __tmp__U0=TRUE__;
       } else {
-        __tmp__O0=FALSE__;
+        __tmp__U0=FALSE__;
       };
-      if (__tmp__O0) {
-        __tmp__J1=TRUE__;
+      if (__tmp__U0) {
+        __tmp__P1=TRUE__;
       } else {
-        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));
+        result__T1NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'f');
+        if (result__T1NB) {
+          j__IZ=(__INTEGER)(j__IZ +  1);
+          if ((j__IZ > (__INTEGER)(((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.upper__UKC +  1))) {
+            print__DID((&__string_157));
             exit(( 1));
           };
-          format_name__H1=get__QWB(((void **)((__FAST_ARRAYoSTRINGo *)result__JHD)->parent_arrayed_collection__LKC.storage__5GT)[j__CZ]);
+          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
         };
-        __tmp__J1=result__HAOB;
+        __tmp__P1=result__T1NB;
       };
-      if (__tmp__J1) {
-        __tmp__X1=TRUE__;
+      if (__tmp__P1) {
+        __tmp__31=TRUE__;
       } else {
-        result__ZAOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'c');
-        if (result__ZAOB) {
-          is_short_code__V1=TRUE__;
+        result__F2NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'c');
+        if (result__F2NB) {
+          is_short_code__11=TRUE__;
         };
-        __tmp__X1=result__ZAOB;
+        __tmp__31=result__F2NB;
       };
-      if (__tmp__X1) {
-        __tmp__F2=TRUE__;
+      if (__tmp__31) {
+        __tmp__L2=TRUE__;
       } else {
-        result__LBOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'p');
-        if (result__LBOB) {
-          is_short_private__D2=TRUE__;
+        result__X2NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'p');
+        if (result__X2NB) {
+          is_short_private__J2=TRUE__;
         };
-        __tmp__F2=result__LBOB;
+        __tmp__L2=result__X2NB;
       };
-      if (__tmp__F2) {
-        __tmp__S2=TRUE__;
+      if (__tmp__L2) {
+        __tmp__Y2=TRUE__;
       } else {
-        result__3BOB=(((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'r');
-        if (result__3BOB) {
+        result__J3NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'r');
+        if (result__J3NB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__S2=result__3BOB;
+        __tmp__Y2=result__J3NB;
       };
-      if ((! __tmp__S2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__BZ)->storage__JCS)[ 1] == 'd')) {
-          is_shorter__FZ=FALSE__;
+      if ((! __tmp__Y2)) {
+        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'd')) {
+          is_shorter__LZ=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
         } else {
-          print__4HD((&__string_155));
+          print__DID((&__string_157));
           exit(( 1));
         };
       };
     } else {
       if (((void *)input_name__3B != (void *)NULL)) {
-        print__4HD((&__string_155));
+        print__DID((&__string_157));
         exit(( 1));
       };
-      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);
+      copy__U4R(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
+      input_name__3B=get__YWB(string_tmp__VH);
     };
-    j__CZ=(__INTEGER)(j__CZ +  1);
+    j__IZ=(__INTEGER)(j__IZ +  1);
   };
   if (((void *)input_name__3B == (void *)NULL)) {
-    print__4HD((&__string_155));
+    print__DID((&__string_157));
     exit(( 1));
   };
-  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)));
+  if (((void *)format_name__N1 != (void *)NULL)) {
+    path__KZ=((__CHARACTER *)(LISAAC_DIRECTORY));
+    Self__BLC=((__CHARACTER *)path__KZ);
+    idx__NLC= 0;
+    while ((! ((idx__NLC >  1024) || ('\0' == Self__BLC[idx__NLC])))) {
+      idx__NLC=(__INTEGER)(idx__NLC +  1);
+    };
+    result__OCIH=NULL;
+    ptr__PCIH=((__POINTER )(NULL));
+    typ_id__QCIH= 0;
+    sz__RCIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__RCIH ==  0)) {
+      result__OCIH=STRING_CONSTANT__;
+    } else {
+      typ_id__QCIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RCIH);
+      if ((typ_id__QCIH == (__INTEGER)(-  1))) {
+        a__SCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RCIH + a__SCIH) & (__UINTEGER_32)(~ a__SCIH));
+        ptr_table__FPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TCIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__EPKH=((__POINTER )(NULL));
+        result__GPKH=((__POINTER *)ptr_table__FPKH)[ 0];
+        if ((result__GPKH == (void *)NULL)) {
+          result__GPKH=new_lab__QOJ(new_size__TCIH);
+          next__EPKH=(void *)((unsigned long)result__GPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCIH)));
+          ((__POINTER *)next__EPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FPKH)[ 0]=next__EPKH;
+        } else {
+          next__EPKH=((__POINTER *)result__GPKH)[ 0];
+          if ((next__EPKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GPKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TCIH <<  1)) <=  4096)) {
+              next__EPKH=(void *)((unsigned long)result__GPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TCIH)));
             } else {
-              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)));
+              next__EPKH=new_lab__QOJ(new_size__TCIH);
+            };
+            ((__POINTER *)next__EPKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FPKH)[ 0]=next__EPKH;
+          } else {
+            ((__POINTER *)result__GPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GPKH=next__EPKH;
+          };
+        };
+        ptr__PCIH=result__GPKH;
+      } else {
+        t__UCIH=((__UINTEGER_32 )typ_id__QCIH);
+        a__VCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__RCIH + a__VCIH) & (__UINTEGER_32)(~ a__VCIH));
+        ptr_table__KPKH=((__POINTER )(&(table_type[(t__UCIH)])));
+        lab_type__MPKH=(__UINTEGER_32)(t__UCIH |  1);
+        next__JPKH=((__POINTER )(NULL));
+        result__LPKH=((__POINTER *)ptr_table__KPKH)[ 0];
+        if ((result__LPKH == (void *)NULL)) {
+          result__LPKH=new_lab__QOJ(lab_type__MPKH);
+          next__JPKH=(void *)((unsigned long)result__LPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NPKH)));
+          ((__POINTER *)next__JPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KPKH)[ 0]=next__JPKH;
+        } else {
+          next__JPKH=((__POINTER *)result__LPKH)[ 0];
+          if ((next__JPKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LPKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NPKH <<  1)) <=  4096)) {
+              next__JPKH=(void *)((unsigned long)result__LPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NPKH)));
             } else {
-              next__0EKH=new_lab__URJ(lab_type__3EKH);
+              next__JPKH=new_lab__QOJ(lab_type__MPKH);
             };
-            ((__POINTER *)next__0EKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1EKH)[ 0]=next__0EKH;
+            ((__POINTER *)next__JPKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KPKH)[ 0]=next__JPKH;
           } else {
-            ((__POINTER *)result__2EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2EKH=next__0EKH;
+            ((__POINTER *)result__LPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LPKH=next__JPKH;
           };
         };
-        ptr__MXHH=result__2EKH;
+        ptr__PCIH=result__LPKH;
       };
-      result__LXHH=((__STRING_CONSTANT *)ptr__MXHH);
-      *(result__LXHH) = *(STRING_CONSTANT__);
+      result__OCIH=((__STRING_CONSTANT *)ptr__PCIH);
+      *(result__OCIH) = *(STRING_CONSTANT__);
     };
-    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)] != '\\');
+    Self__ISS=((__STRING_CONSTANT *)result__OCIH);
+    Self__ISS->storage__QMO=path__KZ;
+    Self__ISS->count__DD=idx__NLC;
+    copy__U4R(string_tmp__VH,result__OCIH);
+    Self__YAHH=((__STRING_CONSTANT *)result__OCIH);
+    if ((((__CHARACTER *)Self__YAHH->storage__QMO)[(__INTEGER)(Self__YAHH->count__DD -  1)] != '/')) {
+      Self__5IS=((__STRING_CONSTANT *)result__OCIH);
+      __tmp__14=(((__CHARACTER *)Self__5IS->storage__QMO)[(__INTEGER)(Self__5IS->count__DD -  1)] != '\\');
     } else {
-      __tmp__V4=FALSE__;
+      __tmp__14=FALSE__;
     };
-    if (__tmp__V4) {
-      add_last__BMT(string_tmp__VH,'/');
+    if (__tmp__14) {
+      add_last__UHT(string_tmp__VH,'/');
     };
-    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) {
+    append__2JS(string_tmp__VH,(&__string_158));
+    append__2JS(string_tmp__VH,format_name__N1);
+    append__2JS(string_tmp__VH,(&__string_159));
+    fmt_name__YNC=get__YWB(string_tmp__VH);
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    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));
+    if (((void *)get_entry__0XAC(fmt_name__YNC) == (void *)NULL)) {
+      put_string__CZF((&__string_160));
+      put_string__CZF(fmt_name__YNC);
+      put_string__CZF((&__string_161));
       exit(( 1));
     };
-    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:
+    object__ZBC=create__name__generic_count__JBC(fmt_name__YNC,(&__string_114));
+    source__5BC=((__PROTOTYPE *)object__ZBC)->source__3BC;
+    position__CCC= 1;
+    pos_cur__FCC= 1;
+    pos_line__GCC= 1;
+    pos_col__HCC= 0;
+    while_do__BHF:
     {
-      result__5EKH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__5EKH=FALSE__;
+      result__OPKH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__OPKH=FALSE__;
       } else {
-        result__AFKH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__AFKH=((__CHARACTER )(( 0)));
+        result__PPKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__PPKH=((__CHARACTER )(( 0)));
         } else {
-          result__AFKH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__PPKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__AFKH == '-')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__5EKH=TRUE__;
+        if ((result__PPKH == '-')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__OPKH=TRUE__;
         };
       };
-      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)) {
+      if (result__OPKH) {
+        if ((! read_identifier__12K())) {
+          pos__FG1G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_162));
+          put_position__CMG(pos__FG1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__YCKB=NULL;
+        ptr__ZCKB=((__POINTER )(NULL));
+        typ_id__4CKB= 0;
+        sz__1CKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__1CKB ==  0)) {
+          result__YCKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__4CKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1CKB);
+          if ((typ_id__4CKB == (__INTEGER)(-  1))) {
+            a__1AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__2AHH=(__UINTEGER_32)((__UINTEGER_32)(sz__1CKB + a__1AHH) & (__UINTEGER_32)(~ a__1AHH));
+            ptr_table__SPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2AHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__RPKH=((__POINTER )(NULL));
+            result__TPKH=((__POINTER *)ptr_table__SPKH)[ 0];
+            if ((result__TPKH == (void *)NULL)) {
+              result__TPKH=new_lab__QOJ(new_size__2AHH);
+              next__RPKH=(void *)((unsigned long)result__TPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AHH)));
+              ((__POINTER *)next__RPKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SPKH)[ 0]=next__RPKH;
             } else {
-              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)));
+              next__RPKH=((__POINTER *)result__TPKH)[ 0];
+              if ((next__RPKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TPKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2AHH <<  1)) <=  4096)) {
+                  next__RPKH=(void *)((unsigned long)result__TPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2AHH)));
                 } else {
-                  next__CFKH=new_lab__URJ(new_size__JVGH);
+                  next__RPKH=new_lab__QOJ(new_size__2AHH);
                 };
-                ((__POINTER *)next__CFKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DFKH)[ 0]=next__CFKH;
+                ((__POINTER *)next__RPKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SPKH)[ 0]=next__RPKH;
               } else {
-                ((__POINTER *)result__EFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__EFKH=next__CFKH;
-              };
-            };
-            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;
+                ((__POINTER *)result__TPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TPKH=next__RPKH;
+              };
+            };
+            ptr__ZCKB=result__TPKH;
+          } else {
+            t__ABHH=((__UINTEGER_32 )typ_id__4CKB);
+            a__5AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0PKH=(__UINTEGER_32)((__UINTEGER_32)(sz__1CKB + a__5AHH) & (__UINTEGER_32)(~ a__5AHH));
+            ptr_table__XPKH=((__POINTER )(&(table_type[(t__ABHH)])));
+            lab_type__ZPKH=(__UINTEGER_32)(t__ABHH |  1);
+            next__WPKH=((__POINTER )(NULL));
+            result__YPKH=((__POINTER *)ptr_table__XPKH)[ 0];
+            if ((result__YPKH == (void *)NULL)) {
+              result__YPKH=new_lab__QOJ(lab_type__ZPKH);
+              next__WPKH=(void *)((unsigned long)result__YPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0PKH)));
+              ((__POINTER *)next__WPKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XPKH)[ 0]=next__WPKH;
             } else {
-              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)));
+              next__WPKH=((__POINTER *)result__YPKH)[ 0];
+              if ((next__WPKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YPKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0PKH <<  1)) <=  4096)) {
+                  next__WPKH=(void *)((unsigned long)result__YPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0PKH)));
                 } else {
-                  next__HFKH=new_lab__URJ(lab_type__KFKH);
+                  next__WPKH=new_lab__QOJ(lab_type__ZPKH);
                 };
-                ((__POINTER *)next__HFKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IFKH)[ 0]=next__HFKH;
+                ((__POINTER *)next__WPKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XPKH)[ 0]=next__WPKH;
               } else {
-                ((__POINTER *)result__JFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JFKH=next__HFKH;
-              };
-            };
-            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)) {
+                ((__POINTER *)result__YPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YPKH=next__WPKH;
+              };
+            };
+            ptr__ZCKB=result__YPKH;
+          };
+          result__YCKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__ZCKB);
+          *(result__YCKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        Self__WCIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__XCIH=last_string__V0C;
+        Self__1CIH=((__STRING_CONSTANT *)last_string__V0C);
+        result__0CIH= 0;
+        __tmp__2CIH=Self__1CIH->count__DD;
+        Self__3CIH= 1;
+        while ((Self__3CIH <= __tmp__2CIH)) {
+          result__0CIH=(__INTEGER)((__INTEGER)( 5 * result__0CIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__1CIH->storage__QMO)[(__INTEGER)(Self__3CIH -  1)])));
+          Self__3CIH=(__INTEGER)(Self__3CIH +  1);
+        };
+        if ((result__0CIH <  0)) {
+          result__0CIH=(__INTEGER)(~ result__0CIH);
+        };
+        node__YCIH=((void **)Self__WCIH->buckets__04S)[(__INTEGER)(result__0CIH % Self__WCIH->capacity__V4S)];
+        while ((! (((void *)node__YCIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCIH)->key__G5S == (void *)k__XCIH)))) {
+          node__YCIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YCIH)->next__R5S;
+        };
+        if (((void *)node__YCIH != (void *)NULL)) {
+          pos__PG1G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_163));
+          put_position__CMG(pos__PG1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 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);
+        __tmp__JOD=last_string__V0C;
+        Self__JLEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__LLEB=last_string__V0C;
+        Self__ADIH=((__STRING_CONSTANT *)last_string__V0C);
+        result__5CIH= 0;
+        __tmp__BDIH=Self__ADIH->count__DD;
+        Self__CDIH= 1;
+        while ((Self__CDIH <= __tmp__BDIH)) {
+          result__5CIH=(__INTEGER)((__INTEGER)( 5 * result__5CIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ADIH->storage__QMO)[(__INTEGER)(Self__CDIH -  1)])));
+          Self__CDIH=(__INTEGER)(Self__CDIH +  1);
+        };
+        if ((result__5CIH <  0)) {
+          result__5CIH=(__INTEGER)(~ result__5CIH);
+        };
+        idx__TLEB=(__INTEGER)(result__5CIH % Self__JLEB->capacity__V4S);
+        node__ULEB=((void **)Self__JLEB->buckets__04S)[idx__TLEB];
+        while ((! (((void *)node__ULEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ULEB)->key__G5S == (void *)k__LLEB)))) {
+          node__ULEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ULEB)->next__R5S;
+        };
+        if (((void *)node__ULEB == (void *)NULL)) {
+          if ((Self__JLEB->capacity__V4S == Self__JLEB->count__1HY)) {
+            idx__TEZB= 0;
+            node1__XEZB=NULL;
+            node2__YEZB=NULL;
+            old_buckets__WEZB=Self__JLEB->buckets__04S;
+            new_capacity__UEZB=prime_number_ceiling__K01((__INTEGER)(Self__JLEB->capacity__V4S +  1));
+            Self__JLEB->buckets__04S=create__UB4(new_capacity__UEZB);
+            i__VEZB=(__INTEGER)(Self__JLEB->capacity__V4S -  1);
+            Self__JLEB->capacity__V4S=new_capacity__UEZB;
+            while ((i__VEZB >=  0)) {
+              node1__XEZB=((void **)old_buckets__WEZB)[i__VEZB];
+              while (((void *)node1__XEZB != (void *)NULL)) {
+                node2__YEZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__XEZB)->next__R5S;
+                Self__FDIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__XEZB)->key__G5S);
+                result__EDIH= 0;
+                __tmp__GDIH=Self__FDIH->count__DD;
+                Self__HDIH= 1;
+                while ((Self__HDIH <= __tmp__GDIH)) {
+                  result__EDIH=(__INTEGER)((__INTEGER)( 5 * result__EDIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__FDIH->storage__QMO)[(__INTEGER)(Self__HDIH -  1)])));
+                  Self__HDIH=(__INTEGER)(Self__HDIH +  1);
                 };
-                if ((result__BYHH <  0)) {
-                  result__BYHH=(__INTEGER)(~ result__BYHH);
+                if ((result__EDIH <  0)) {
+                  result__EDIH=(__INTEGER)(~ result__EDIH);
                 };
-                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__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;
+                idx__TEZB=(__INTEGER)(result__EDIH % Self__JLEB->capacity__V4S);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__XEZB)->next__R5S=((void **)Self__JLEB->buckets__04S)[idx__TEZB];
+                ((void **)Self__JLEB->buckets__04S)[idx__TEZB]=node1__XEZB;
+                node1__XEZB=node2__YEZB;
+              };
+              i__VEZB=(__INTEGER)(i__VEZB -  1);
+            };
+            idx__TLEB=(__INTEGER)(result__5CIH % new_capacity__UEZB);
+          };
+          __tmp__BNEB=((void **)Self__JLEB->buckets__04S)[idx__TLEB];
+          result__2GZB=NULL;
+          ptr__3GZB=((__POINTER )(NULL));
+          typ_id__CHZB= 0;
+          sz__5GZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__5GZB ==  0)) {
+            result__2GZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__CHZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5GZB);
+            if ((typ_id__CHZB == (__INTEGER)(-  1))) {
+              a__GBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__HBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5GZB + a__GBHH) & (__UINTEGER_32)(~ a__GBHH));
+              ptr_table__2PKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__1PKH=((__POINTER )(NULL));
+              result__3PKH=((__POINTER *)ptr_table__2PKH)[ 0];
+              if ((result__3PKH == (void *)NULL)) {
+                result__3PKH=new_lab__QOJ(new_size__HBHH);
+                next__1PKH=(void *)((unsigned long)result__3PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBHH)));
+                ((__POINTER *)next__1PKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2PKH)[ 0]=next__1PKH;
               } else {
-                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)));
+                next__1PKH=((__POINTER *)result__3PKH)[ 0];
+                if ((next__1PKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3PKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HBHH <<  1)) <=  4096)) {
+                    next__1PKH=(void *)((unsigned long)result__3PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBHH)));
                   } else {
-                    next__MFKH=new_lab__URJ(new_size__UVGH);
+                    next__1PKH=new_lab__QOJ(new_size__HBHH);
                   };
-                  ((__POINTER *)next__MFKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NFKH)[ 0]=next__MFKH;
+                  ((__POINTER *)next__1PKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__2PKH)[ 0]=next__1PKH;
                 } else {
-                  ((__POINTER *)result__OFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__OFKH=next__MFKH;
+                  ((__POINTER *)result__3PKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__3PKH=next__1PKH;
                 };
               };
-              ptr__QKZB=result__OFKH;
+              ptr__3GZB=result__3PKH;
             } else {
-              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;
+              t__LBHH=((__UINTEGER_32 )typ_id__CHZB);
+              a__KBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__EQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5GZB + a__KBHH) & (__UINTEGER_32)(~ a__KBHH));
+              ptr_table__BQKH=((__POINTER )(&(table_type[(t__LBHH)])));
+              lab_type__DQKH=(__UINTEGER_32)(t__LBHH |  1);
+              next__AQKH=((__POINTER )(NULL));
+              result__CQKH=((__POINTER *)ptr_table__BQKH)[ 0];
+              if ((result__CQKH == (void *)NULL)) {
+                result__CQKH=new_lab__QOJ(lab_type__DQKH);
+                next__AQKH=(void *)((unsigned long)result__CQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQKH)));
+                ((__POINTER *)next__AQKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BQKH)[ 0]=next__AQKH;
               } else {
-                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)));
+                next__AQKH=((__POINTER *)result__CQKH)[ 0];
+                if ((next__AQKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CQKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EQKH <<  1)) <=  4096)) {
+                    next__AQKH=(void *)((unsigned long)result__CQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQKH)));
                   } else {
-                    next__RFKH=new_lab__URJ(lab_type__UFKH);
+                    next__AQKH=new_lab__QOJ(lab_type__DQKH);
                   };
-                  ((__POINTER *)next__RFKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SFKH)[ 0]=next__RFKH;
+                  ((__POINTER *)next__AQKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BQKH)[ 0]=next__AQKH;
                 } else {
-                  ((__POINTER *)result__TFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TFKH=next__RFKH;
+                  ((__POINTER *)result__CQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CQKH=next__AQKH;
                 };
               };
-              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)) {
+              ptr__3GZB=result__CQKH;
+            };
+            result__2GZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__3GZB);
+            *(result__2GZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+          };
+          Self__SBGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__2GZB);
+          Self__SBGC->item__0T3=result__YCKB;
+          Self__SBGC->key__G5S=__tmp__JOD;
+          Self__SBGC->next__R5S=__tmp__BNEB;
+          node__ULEB=result__2GZB;
+          ((void **)Self__JLEB->buckets__04S)[idx__TLEB]=result__2GZB;
+          Self__JLEB->count__1HY=(__INTEGER)(Self__JLEB->count__1HY +  1);
+        } else {
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ULEB)->item__0T3=result__YCKB;
+        };
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__BI1G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_164));
+          put_position__CMG(pos__BI1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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__;
+        def__ZNEB=result__YCKB;
+        result__1NEB=FALSE__;
+        if (read_short_elt__5GKB()) {
+          result__1NEB=TRUE__;
+          Self__RBHH=((__LINKED_LISToSTRING_CONSTANTo *)result__YCKB);
+          element__QBHH=last_string__V0C;
+          if (((void *)Self__RBHH->first_link__1REC == (void *)NULL)) {
+            i__SDIH=last_string__V0C;
+            result__JDIH=NULL;
+            ptr__KDIH=((__POINTER )(NULL));
+            typ_id__LDIH= 0;
+            sz__MDIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__MDIH ==  0)) {
+              result__JDIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__LDIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MDIH);
+              if ((typ_id__LDIH == (__INTEGER)(-  1))) {
+                a__NDIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__ODIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MDIH + a__NDIH) & (__UINTEGER_32)(~ a__NDIH));
+                ptr_table__GQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ODIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__FQKH=((__POINTER )(NULL));
+                result__HQKH=((__POINTER *)ptr_table__GQKH)[ 0];
+                if ((result__HQKH == (void *)NULL)) {
+                  result__HQKH=new_lab__QOJ(new_size__ODIH);
+                  next__FQKH=(void *)((unsigned long)result__HQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODIH)));
+                  ((__POINTER *)next__FQKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GQKH)[ 0]=next__FQKH;
                 } else {
-                  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)));
+                  next__FQKH=((__POINTER *)result__HQKH)[ 0];
+                  if ((next__FQKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HQKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ODIH <<  1)) <=  4096)) {
+                      next__FQKH=(void *)((unsigned long)result__HQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ODIH)));
                     } else {
-                      next__WFKH=new_lab__URJ(new_size__LYHH);
+                      next__FQKH=new_lab__QOJ(new_size__ODIH);
                     };
-                    ((__POINTER *)next__WFKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
+                    ((__POINTER *)next__FQKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__GQKH)[ 0]=next__FQKH;
                   } else {
-                    ((__POINTER *)result__YFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__YFKH=next__WFKH;
+                    ((__POINTER *)result__HQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__HQKH=next__FQKH;
                   };
                 };
-                ptr__HYHH=result__YFKH;
+                ptr__KDIH=result__HQKH;
               } else {
-                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;
+                t__PDIH=((__UINTEGER_32 )typ_id__LDIH);
+                a__QDIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__OQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__MDIH + a__QDIH) & (__UINTEGER_32)(~ a__QDIH));
+                ptr_table__LQKH=((__POINTER )(&(table_type[(t__PDIH)])));
+                lab_type__NQKH=(__UINTEGER_32)(t__PDIH |  1);
+                next__KQKH=((__POINTER )(NULL));
+                result__MQKH=((__POINTER *)ptr_table__LQKH)[ 0];
+                if ((result__MQKH == (void *)NULL)) {
+                  result__MQKH=new_lab__QOJ(lab_type__NQKH);
+                  next__KQKH=(void *)((unsigned long)result__MQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQKH)));
+                  ((__POINTER *)next__KQKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LQKH)[ 0]=next__KQKH;
                 } else {
-                  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)));
+                  next__KQKH=((__POINTER *)result__MQKH)[ 0];
+                  if ((next__KQKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MQKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OQKH <<  1)) <=  4096)) {
+                      next__KQKH=(void *)((unsigned long)result__MQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OQKH)));
                     } else {
-                      next__1FKH=new_lab__URJ(lab_type__4FKH);
+                      next__KQKH=new_lab__QOJ(lab_type__NQKH);
                     };
-                    ((__POINTER *)next__1FKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__2FKH)[ 0]=next__1FKH;
+                    ((__POINTER *)next__KQKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__LQKH)[ 0]=next__KQKH;
                   } else {
-                    ((__POINTER *)result__3FKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__3FKH=next__1FKH;
+                    ((__POINTER *)result__MQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__MQKH=next__KQKH;
                   };
                 };
-                ptr__HYHH=result__3FKH;
-              };
-              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__;
+                ptr__KDIH=result__MQKH;
+              };
+              result__JDIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__KDIH);
+              *(result__JDIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__RDIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__JDIH);
+            Self__RDIH->item__GWHD=i__SDIH;
+            Self__RDIH->next__4MOD=NULL;
+            Self__RBHH->first_link__1REC=result__JDIH;
+            Self__RBHH->parent_linked_collection__LD.upper__MDD= 1;
+            Self__RBHH->last_link__ESEC=result__JDIH;
+            Self__RBHH->mem_idx__FSEC= 1;
+            Self__RBHH->mem_lnk__HSEC=result__JDIH;
+          } else {
+            result__TDIH=NULL;
+            ptr__UDIH=((__POINTER )(NULL));
+            typ_id__VDIH= 0;
+            sz__WDIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__WDIH ==  0)) {
+              result__TDIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__VDIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WDIH);
+              if ((typ_id__VDIH == (__INTEGER)(-  1))) {
+                a__XDIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__YDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__WDIH + a__XDIH) & (__UINTEGER_32)(~ a__XDIH));
+                ptr_table__QQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YDIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__PQKH=((__POINTER )(NULL));
+                result__RQKH=((__POINTER *)ptr_table__QQKH)[ 0];
+                if ((result__RQKH == (void *)NULL)) {
+                  result__RQKH=new_lab__QOJ(new_size__YDIH);
+                  next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDIH)));
+                  ((__POINTER *)next__PQKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
                 } else {
-                  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)));
+                  next__PQKH=((__POINTER *)result__RQKH)[ 0];
+                  if ((next__PQKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RQKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YDIH <<  1)) <=  4096)) {
+                      next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDIH)));
                     } else {
-                      next__AGKH=new_lab__URJ(new_size__VYHH);
+                      next__PQKH=new_lab__QOJ(new_size__YDIH);
                     };
-                    ((__POINTER *)next__AGKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__BGKH)[ 0]=next__AGKH;
+                    ((__POINTER *)next__PQKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
                   } else {
-                    ((__POINTER *)result__CGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__CGKH=next__AGKH;
+                    ((__POINTER *)result__RQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__RQKH=next__PQKH;
                   };
                 };
-                ptr__RYHH=result__CGKH;
+                ptr__UDIH=result__RQKH;
               } else {
-                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;
+                t__ZDIH=((__UINTEGER_32 )typ_id__VDIH);
+                a__0DIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__YQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WDIH + a__0DIH) & (__UINTEGER_32)(~ a__0DIH));
+                ptr_table__VQKH=((__POINTER )(&(table_type[(t__ZDIH)])));
+                lab_type__XQKH=(__UINTEGER_32)(t__ZDIH |  1);
+                next__UQKH=((__POINTER )(NULL));
+                result__WQKH=((__POINTER *)ptr_table__VQKH)[ 0];
+                if ((result__WQKH == (void *)NULL)) {
+                  result__WQKH=new_lab__QOJ(lab_type__XQKH);
+                  next__UQKH=(void *)((unsigned long)result__WQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YQKH)));
+                  ((__POINTER *)next__UQKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__VQKH)[ 0]=next__UQKH;
                 } else {
-                  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)));
+                  next__UQKH=((__POINTER *)result__WQKH)[ 0];
+                  if ((next__UQKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WQKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YQKH <<  1)) <=  4096)) {
+                      next__UQKH=(void *)((unsigned long)result__WQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YQKH)));
                     } else {
-                      next__FGKH=new_lab__URJ(lab_type__IGKH);
+                      next__UQKH=new_lab__QOJ(lab_type__XQKH);
                     };
-                    ((__POINTER *)next__FGKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__GGKH)[ 0]=next__FGKH;
+                    ((__POINTER *)next__UQKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__VQKH)[ 0]=next__UQKH;
                   } else {
-                    ((__POINTER *)result__HGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__HGKH=next__FGKH;
+                    ((__POINTER *)result__WQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__WQKH=next__UQKH;
                   };
                 };
-                ptr__RYHH=result__HGKH;
+                ptr__UDIH=result__WQKH;
               };
-              result__QYHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__RYHH);
-              *(result__QYHH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__TDIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__UDIH);
+              *(result__TDIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            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;
+            Self__1DIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__TDIH);
+            Self__1DIH->item__GWHD=element__QBHH;
+            Self__1DIH->next__4MOD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__RBHH->last_link__ESEC)->next__4MOD=result__TDIH;
+            Self__RBHH->parent_linked_collection__LD.upper__MDD=(__INTEGER)(Self__RBHH->parent_linked_collection__LD.upper__MDD +  1);
+            Self__RBHH->last_link__ESEC=result__TDIH;
           };
-          while_do__KSSB:
+          while_do__APSB:
           {
-            result__KGKH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__KGKH=FALSE__;
+            result__ZQKH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__ZQKH=FALSE__;
             } else {
-              result__LGKH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__LGKH=((__CHARACTER )(( 0)));
+              result__0QKH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__0QKH=((__CHARACTER )(( 0)));
               } else {
-                result__LGKH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__0QKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__LGKH == '+')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__KGKH=TRUE__;
+              if ((result__0QKH == '+')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__ZQKH=TRUE__;
               };
             };
-            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)) {
+            if (result__ZQKH) {
+              if ((! read_short_elt__5GKB())) {
+                pos__DI1G=current_position__XUF();
+                put_error__text__YKG( 0,(&__string_165));
+                put_position__CMG(pos__DI1G);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              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__;
+              Self__WREC=((__LINKED_LISToSTRING_CONSTANTo *)def__ZNEB);
+              element__XREC=last_string__V0C;
+              if (((void *)Self__WREC->first_link__1REC == (void *)NULL)) {
+                i__GEIH=last_string__V0C;
+                result__3DIH=NULL;
+                ptr__4DIH=((__POINTER )(NULL));
+                typ_id__5DIH= 0;
+                sz__AEIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__AEIH ==  0)) {
+                  result__3DIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__5DIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AEIH);
+                  if ((typ_id__5DIH == (__INTEGER)(-  1))) {
+                    a__BEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__CEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEIH + a__BEIH) & (__UINTEGER_32)(~ a__BEIH));
+                    ptr_table__3QKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CEIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__2QKH=((__POINTER )(NULL));
+                    result__4QKH=((__POINTER *)ptr_table__3QKH)[ 0];
+                    if ((result__4QKH == (void *)NULL)) {
+                      result__4QKH=new_lab__QOJ(new_size__CEIH);
+                      next__2QKH=(void *)((unsigned long)result__4QKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEIH)));
+                      ((__POINTER *)next__2QKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3QKH)[ 0]=next__2QKH;
                     } else {
-                      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)));
+                      next__2QKH=((__POINTER *)result__4QKH)[ 0];
+                      if ((next__2QKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4QKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__CEIH <<  1)) <=  4096)) {
+                          next__2QKH=(void *)((unsigned long)result__4QKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEIH)));
                         } else {
-                          next__NGKH=new_lab__URJ(new_size__5YHH);
+                          next__2QKH=new_lab__QOJ(new_size__CEIH);
                         };
-                        ((__POINTER *)next__NGKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
+                        ((__POINTER *)next__2QKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3QKH)[ 0]=next__2QKH;
                       } else {
-                        ((__POINTER *)result__PGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__PGKH=next__NGKH;
+                        ((__POINTER *)result__4QKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__4QKH=next__2QKH;
                       };
                     };
-                    ptr__1YHH=result__PGKH;
+                    ptr__4DIH=result__4QKH;
                   } else {
-                    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;
+                    t__DEIH=((__UINTEGER_32 )typ_id__5DIH);
+                    a__EEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__FRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__AEIH + a__EEIH) & (__UINTEGER_32)(~ a__EEIH));
+                    ptr_table__CRKH=((__POINTER )(&(table_type[(t__DEIH)])));
+                    lab_type__ERKH=(__UINTEGER_32)(t__DEIH |  1);
+                    next__BRKH=((__POINTER )(NULL));
+                    result__DRKH=((__POINTER *)ptr_table__CRKH)[ 0];
+                    if ((result__DRKH == (void *)NULL)) {
+                      result__DRKH=new_lab__QOJ(lab_type__ERKH);
+                      next__BRKH=(void *)((unsigned long)result__DRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRKH)));
+                      ((__POINTER *)next__BRKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__CRKH)[ 0]=next__BRKH;
                     } else {
-                      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)));
+                      next__BRKH=((__POINTER *)result__DRKH)[ 0];
+                      if ((next__BRKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DRKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FRKH <<  1)) <=  4096)) {
+                          next__BRKH=(void *)((unsigned long)result__DRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FRKH)));
                         } else {
-                          next__SGKH=new_lab__URJ(lab_type__VGKH);
+                          next__BRKH=new_lab__QOJ(lab_type__ERKH);
                         };
-                        ((__POINTER *)next__SGKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__TGKH)[ 0]=next__SGKH;
+                        ((__POINTER *)next__BRKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__CRKH)[ 0]=next__BRKH;
                       } else {
-                        ((__POINTER *)result__UGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__UGKH=next__SGKH;
+                        ((__POINTER *)result__DRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__DRKH=next__BRKH;
                       };
                     };
-                    ptr__1YHH=result__UGKH;
+                    ptr__4DIH=result__DRKH;
                   };
-                  result__0YHH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__1YHH);
-                  *(result__0YHH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__3DIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__4DIH);
+                  *(result__3DIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__FEIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__3DIH);
+                Self__FEIH->item__GWHD=i__GEIH;
+                Self__FEIH->next__4MOD=NULL;
+                Self__WREC->first_link__1REC=result__3DIH;
+                Self__WREC->parent_linked_collection__LD.upper__MDD= 1;
+                Self__WREC->last_link__ESEC=result__3DIH;
+                Self__WREC->mem_idx__FSEC= 1;
+                Self__WREC->mem_lnk__HSEC=result__3DIH;
               } else {
-                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__;
+                result__UOED=NULL;
+                ptr__VOED=((__POINTER )(NULL));
+                typ_id__0OED= 0;
+                sz__XOED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__XOED ==  0)) {
+                  result__UOED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__0OED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XOED);
+                  if ((typ_id__0OED == (__INTEGER)(-  1))) {
+                    a__ZYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__0YFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOED + a__ZYFH) & (__UINTEGER_32)(~ a__ZYFH));
+                    ptr_table__HRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0YFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__GRKH=((__POINTER )(NULL));
+                    result__IRKH=((__POINTER *)ptr_table__HRKH)[ 0];
+                    if ((result__IRKH == (void *)NULL)) {
+                      result__IRKH=new_lab__QOJ(new_size__0YFH);
+                      next__GRKH=(void *)((unsigned long)result__IRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YFH)));
+                      ((__POINTER *)next__GRKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__HRKH)[ 0]=next__GRKH;
                     } else {
-                      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)));
+                      next__GRKH=((__POINTER *)result__IRKH)[ 0];
+                      if ((next__GRKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IRKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0YFH <<  1)) <=  4096)) {
+                          next__GRKH=(void *)((unsigned long)result__IRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0YFH)));
                         } else {
-                          next__XGKH=new_lab__URJ(new_size__HNFH);
+                          next__GRKH=new_lab__QOJ(new_size__0YFH);
                         };
-                        ((__POINTER *)next__XGKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__YGKH)[ 0]=next__XGKH;
+                        ((__POINTER *)next__GRKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__HRKH)[ 0]=next__GRKH;
                       } else {
-                        ((__POINTER *)result__ZGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ZGKH=next__XGKH;
+                        ((__POINTER *)result__IRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__IRKH=next__GRKH;
                       };
                     };
-                    ptr__JPED=result__ZGKH;
+                    ptr__VOED=result__IRKH;
                   } else {
-                    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;
+                    t__4YFH=((__UINTEGER_32 )typ_id__0OED);
+                    a__3YFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__PRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XOED + a__3YFH) & (__UINTEGER_32)(~ a__3YFH));
+                    ptr_table__MRKH=((__POINTER )(&(table_type[(t__4YFH)])));
+                    lab_type__ORKH=(__UINTEGER_32)(t__4YFH |  1);
+                    next__LRKH=((__POINTER )(NULL));
+                    result__NRKH=((__POINTER *)ptr_table__MRKH)[ 0];
+                    if ((result__NRKH == (void *)NULL)) {
+                      result__NRKH=new_lab__QOJ(lab_type__ORKH);
+                      next__LRKH=(void *)((unsigned long)result__NRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRKH)));
+                      ((__POINTER *)next__LRKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__MRKH)[ 0]=next__LRKH;
                     } else {
-                      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)));
+                      next__LRKH=((__POINTER *)result__NRKH)[ 0];
+                      if ((next__LRKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NRKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__PRKH <<  1)) <=  4096)) {
+                          next__LRKH=(void *)((unsigned long)result__NRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PRKH)));
                         } else {
-                          next__2GKH=new_lab__URJ(lab_type__5GKH);
+                          next__LRKH=new_lab__QOJ(lab_type__ORKH);
                         };
-                        ((__POINTER *)next__2GKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3GKH)[ 0]=next__2GKH;
+                        ((__POINTER *)next__LRKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__MRKH)[ 0]=next__LRKH;
                       } else {
-                        ((__POINTER *)result__4GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4GKH=next__2GKH;
+                        ((__POINTER *)result__NRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__NRKH=next__LRKH;
                       };
                     };
-                    ptr__JPED=result__4GKH;
+                    ptr__VOED=result__NRKH;
                   };
-                  result__IPED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__JPED);
-                  *(result__IPED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__UOED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__VOED);
+                  *(result__UOED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__0JSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__UOED);
+                Self__0JSD->item__GWHD=element__XREC;
+                Self__0JSD->next__4MOD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__WREC->last_link__ESEC)->next__4MOD=result__UOED;
+                Self__WREC->parent_linked_collection__LD.upper__MDD=(__INTEGER)(Self__WREC->parent_linked_collection__LD.upper__MDD +  1);
+                Self__WREC->last_link__ESEC=result__UOED;
               };
-              goto while_do__KSSB;
+              goto while_do__APSB;
             };
           };
         };
-        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)) {
+        if ((! result__1NEB)) {
+          pos__FI1G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_166));
+          put_position__CMG(pos__FI1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__DHG=FALSE__;
-        if ((! read_space__FSD())) {
-          result__DHG=FALSE__;
+        result__JEG=FALSE__;
+        if ((! read_space__KSD())) {
+          result__JEG=FALSE__;
         } else {
-          result__21CH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__21CH=((__CHARACTER )(( 0)));
+          result__1JDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__1JDH=((__CHARACTER )(( 0)));
           } else {
-            result__21CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__1JDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__21CH == ';')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__DHG=TRUE__;
+          if ((result__1JDH == ';')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__JEG=TRUE__;
           };
         };
-        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)) {
+        if ((! result__JEG)) {
+          pos__HI1G=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_167));
+          put_position__CMG(pos__HI1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__LKF;
+        goto while_do__BHF;
       };
     };
-    read_space__FSD();
-    result__HSCH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__HSCH=((__CHARACTER )(( 0)));
+    read_space__KSD();
+    result__K5CH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__K5CH=((__CHARACTER )(( 0)));
     } else {
-      result__HSCH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__K5CH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    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)) {
+    if ((result__K5CH != ((__CHARACTER )(( 0))))) {
+      pos__JI1G=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_168));
+      put_position__CMG(pos__JI1G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    object__RBC=NULL;
+    object__ZBC=NULL;
   };
-  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__;
+  index_count__P5=(__INTEGER)(index_count__P5 +  1);
+  fast_put__to__TXR(result__1OC,(&__string_2));
+  result__2YB=NULL;
+  ptr__3YB=((__POINTER )(NULL));
+  typ_id__CZB= 0;
+  sz__5YB=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSLOTo));
+  if ((sz__5YB ==  0)) {
+    result__2YB=FAST_ARRAYoSLOTo__;
   } else {
-    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__;
+    typ_id__CZB=__FAST_ARRAYoSLOTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5YB);
+    if ((typ_id__CZB == (__INTEGER)(-  1))) {
+      a__UBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__UBHH) & (__UINTEGER_32)(~ a__UBHH));
+      ptr_table__RRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QRKH=((__POINTER )(NULL));
+      result__SRKH=((__POINTER *)ptr_table__RRKH)[ 0];
+      if ((result__SRKH == (void *)NULL)) {
+        result__SRKH=new_lab__QOJ(new_size__VBHH);
+        next__QRKH=(void *)((unsigned long)result__SRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VBHH)));
+        ((__POINTER *)next__QRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RRKH)[ 0]=next__QRKH;
+      } else {
+        next__QRKH=((__POINTER *)result__SRKH)[ 0];
+        if ((next__QRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SRKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VBHH <<  1)) <=  4096)) {
+            next__QRKH=(void *)((unsigned long)result__SRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VBHH)));
+          } else {
+            next__QRKH=new_lab__QOJ(new_size__VBHH);
+          };
+          ((__POINTER *)next__QRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RRKH)[ 0]=next__QRKH;
+        } else {
+          ((__POINTER *)result__SRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SRKH=next__QRKH;
+        };
+      };
+      ptr__3YB=result__SRKH;
+    } else {
+      t__ZBHH=((__UINTEGER_32 )typ_id__CZB);
+      a__YBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__YBHH) & (__UINTEGER_32)(~ a__YBHH));
+      ptr_table__WRKH=((__POINTER )(&(table_type[(t__ZBHH)])));
+      lab_type__YRKH=(__UINTEGER_32)(t__ZBHH |  1);
+      next__VRKH=((__POINTER )(NULL));
+      result__XRKH=((__POINTER *)ptr_table__WRKH)[ 0];
+      if ((result__XRKH == (void *)NULL)) {
+        result__XRKH=new_lab__QOJ(lab_type__YRKH);
+        next__VRKH=(void *)((unsigned long)result__XRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZRKH)));
+        ((__POINTER *)next__VRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WRKH)[ 0]=next__VRKH;
+      } else {
+        next__VRKH=((__POINTER *)result__XRKH)[ 0];
+        if ((next__VRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XRKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZRKH <<  1)) <=  4096)) {
+            next__VRKH=(void *)((unsigned long)result__XRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZRKH)));
+          } else {
+            next__VRKH=new_lab__QOJ(lab_type__YRKH);
+          };
+          ((__POINTER *)next__VRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WRKH)[ 0]=next__VRKH;
+        } else {
+          ((__POINTER *)result__XRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XRKH=next__VRKH;
+        };
+      };
+      ptr__3YB=result__XRKH;
+    };
+    result__2YB=((__FAST_ARRAYoSLOTo *)ptr__3YB);
+    *(result__2YB) = *(FAST_ARRAYoSLOTo__);
+  };
+  Self__GAS=((__FAST_ARRAYoSLOTo *)result__2YB);
+  if ((Self__GAS->parent_arrayed_collection__BAB.capacity__PAS <  1)) {
+    sz__KZEH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__JZEH=((__POINTER )(NULL));
+    a__PZEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LZEH=(__UINTEGER_32)((__UINTEGER_32)(sz__KZEH + a__PZEH) & (__UINTEGER_32)(~ a__PZEH));
+    new_size2__MZEH=(__UINTEGER_32)(new_size__LZEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__MZEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__2BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3BHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__MZEH + a__2BHH) & (__UINTEGER_32)(~ a__2BHH));
+      ptr_table__1RKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3BHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0RKH=((__POINTER )(NULL));
+      result__2RKH=((__POINTER *)ptr_table__1RKH)[ 0];
+      if ((result__2RKH == (void *)NULL)) {
+        result__2RKH=new_lab__QOJ(new_size__3BHH);
+        next__0RKH=(void *)((unsigned long)result__2RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3BHH)));
+        ((__POINTER *)next__0RKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1RKH)[ 0]=next__0RKH;
+      } else {
+        next__0RKH=((__POINTER *)result__2RKH)[ 0];
+        if ((next__0RKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2RKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3BHH <<  1)) <=  4096)) {
+            next__0RKH=(void *)((unsigned long)result__2RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3BHH)));
+          } else {
+            next__0RKH=new_lab__QOJ(new_size__3BHH);
+          };
+          ((__POINTER *)next__0RKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1RKH)[ 0]=next__0RKH;
+        } else {
+          ((__POINTER *)result__2RKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0RKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2RKH=next__0RKH;
+        };
+      };
+      ((__POINTER *)result__2RKH)[ 0]=((__POINTER ) 3);
+      result__JZEH=(void *)((unsigned long)result__2RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__5RKH=first_free__VAVB;
+      while ((((void *)result__5RKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5RKH)->map_size_and_id__YTB &  4294967292LU) < new_size__LZEH))) {
+        result__5RKH=((__MEMORY *)result__5RKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__5RKH == (void *)NULL)) {
+        result__5RKH=new_page__B24();
+      };
+      to_busy__index__KRFC(result__5RKH,new_size__LZEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5RKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+      result__JZEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5RKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__4H1C=((void **)result__JZEH);
+    Self__0LWD= 0;
+    while ((Self__0LWD >=  0)) {
+      Result__4H1C[Self__0LWD]=NULL;
+      Self__0LWD=(__INTEGER)(Self__0LWD -  1);
+    };
+    Self__GAS->parent_arrayed_collection__BAB.capacity__PAS= 1;
+  };
+  create__with__CRB(TYPE_NULL__, 0);
+  fast_put__to__TXR(result__1OC,(&__string_3));
+  create__with__CRB(TYPE_VOID__, 0);
+  fast_put__to__TXR(result__1OC,(&__string_45));
+  create__with__CRB(TYPE_CONTEXT__, 1);
+  result__42B=NULL;
+  ptr__52B=((__POINTER )(NULL));
+  typ_id__E3B= 0;
+  sz__B3B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoTYPE_IDo));
+  if ((sz__B3B ==  0)) {
+    result__42B=FAST_ARRAYoTYPE_IDo__;
   } else {
-    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__;
+    typ_id__E3B=__FAST_ARRAYoTYPE_IDo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B3B);
+    if ((typ_id__E3B == (__INTEGER)(-  1))) {
+      a__DCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ECHH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__DCHH) & (__UINTEGER_32)(~ a__DCHH));
+      ptr_table__DSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ECHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CSKH=((__POINTER )(NULL));
+      result__ESKH=((__POINTER *)ptr_table__DSKH)[ 0];
+      if ((result__ESKH == (void *)NULL)) {
+        result__ESKH=new_lab__QOJ(new_size__ECHH);
+        next__CSKH=(void *)((unsigned long)result__ESKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
+        ((__POINTER *)next__CSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DSKH)[ 0]=next__CSKH;
+      } else {
+        next__CSKH=((__POINTER *)result__ESKH)[ 0];
+        if ((next__CSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ESKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ECHH <<  1)) <=  4096)) {
+            next__CSKH=(void *)((unsigned long)result__ESKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECHH)));
+          } else {
+            next__CSKH=new_lab__QOJ(new_size__ECHH);
+          };
+          ((__POINTER *)next__CSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DSKH)[ 0]=next__CSKH;
+        } else {
+          ((__POINTER *)result__ESKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ESKH=next__CSKH;
+        };
+      };
+      ptr__52B=result__ESKH;
+    } else {
+      t__ICHH=((__UINTEGER_32 )typ_id__E3B);
+      a__HCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__HCHH) & (__UINTEGER_32)(~ a__HCHH));
+      ptr_table__ISKH=((__POINTER )(&(table_type[(t__ICHH)])));
+      lab_type__KSKH=(__UINTEGER_32)(t__ICHH |  1);
+      next__HSKH=((__POINTER )(NULL));
+      result__JSKH=((__POINTER *)ptr_table__ISKH)[ 0];
+      if ((result__JSKH == (void *)NULL)) {
+        result__JSKH=new_lab__QOJ(lab_type__KSKH);
+        next__HSKH=(void *)((unsigned long)result__JSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSKH)));
+        ((__POINTER *)next__HSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ISKH)[ 0]=next__HSKH;
+      } else {
+        next__HSKH=((__POINTER *)result__JSKH)[ 0];
+        if ((next__HSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JSKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LSKH <<  1)) <=  4096)) {
+            next__HSKH=(void *)((unsigned long)result__JSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSKH)));
+          } else {
+            next__HSKH=new_lab__QOJ(lab_type__KSKH);
+          };
+          ((__POINTER *)next__HSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ISKH)[ 0]=next__HSKH;
+        } else {
+          ((__POINTER *)result__JSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JSKH=next__HSKH;
+        };
+      };
+      ptr__52B=result__JSKH;
+    };
+    result__42B=((__FAST_ARRAYoTYPE_IDo *)ptr__52B);
+    *(result__42B) = *(FAST_ARRAYoTYPE_IDo__);
+  };
+  Self__FDS=((__FAST_ARRAYoTYPE_IDo *)result__42B);
+  if ((Self__FDS->parent_arrayed_collection__ABB.capacity__P0R <  3)) {
+    Self__FDS->parent_arrayed_collection__ABB.storage__L1R=create__WUNB( 3);
+    Self__FDS->parent_arrayed_collection__ABB.capacity__P0R= 3;
+  };
+  Self__FDS->parent_arrayed_collection__ABB.upper__N0R=(__INTEGER)(-  1);
+  list_id__CBB=result__42B;
+  result__HEIH=NULL;
+  ptr__IEIH=((__POINTER )(NULL));
+  typ_id__JEIH= 0;
+  sz__KEIH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__KEIH ==  0)) {
+    result__HEIH=TYPE_ID__;
   } else {
-    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__;
+    typ_id__JEIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KEIH);
+    if ((typ_id__JEIH == (__INTEGER)(-  1))) {
+      a__LEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MEIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KEIH + a__LEIH) & (__UINTEGER_32)(~ a__LEIH));
+      ptr_table__NSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MEIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__MSKH=((__POINTER )(NULL));
+      result__OSKH=((__POINTER *)ptr_table__NSKH)[ 0];
+      if ((result__OSKH == (void *)NULL)) {
+        result__OSKH=new_lab__QOJ(new_size__MEIH);
+        next__MSKH=(void *)((unsigned long)result__OSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEIH)));
+        ((__POINTER *)next__MSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NSKH)[ 0]=next__MSKH;
+      } else {
+        next__MSKH=((__POINTER *)result__OSKH)[ 0];
+        if ((next__MSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OSKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MEIH <<  1)) <=  4096)) {
+            next__MSKH=(void *)((unsigned long)result__OSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEIH)));
+          } else {
+            next__MSKH=new_lab__QOJ(new_size__MEIH);
+          };
+          ((__POINTER *)next__MSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NSKH)[ 0]=next__MSKH;
+        } else {
+          ((__POINTER *)result__OSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OSKH=next__MSKH;
+        };
+      };
+      ptr__IEIH=result__OSKH;
+    } else {
+      t__NEIH=((__UINTEGER_32 )typ_id__JEIH);
+      a__OEIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KEIH + a__OEIH) & (__UINTEGER_32)(~ a__OEIH));
+      ptr_table__SSKH=((__POINTER )(&(table_type[(t__NEIH)])));
+      lab_type__USKH=(__UINTEGER_32)(t__NEIH |  1);
+      next__RSKH=((__POINTER )(NULL));
+      result__TSKH=((__POINTER *)ptr_table__SSKH)[ 0];
+      if ((result__TSKH == (void *)NULL)) {
+        result__TSKH=new_lab__QOJ(lab_type__USKH);
+        next__RSKH=(void *)((unsigned long)result__TSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSKH)));
+        ((__POINTER *)next__RSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SSKH)[ 0]=next__RSKH;
+      } else {
+        next__RSKH=((__POINTER *)result__TSKH)[ 0];
+        if ((next__RSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TSKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VSKH <<  1)) <=  4096)) {
+            next__RSKH=(void *)((unsigned long)result__TSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSKH)));
+          } else {
+            next__RSKH=new_lab__QOJ(lab_type__USKH);
+          };
+          ((__POINTER *)next__RSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SSKH)[ 0]=next__RSKH;
+        } else {
+          ((__POINTER *)result__TSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TSKH=next__RSKH;
+        };
+      };
+      ptr__IEIH=result__TSKH;
+    };
+    result__HEIH=((__TYPE_ID *)ptr__IEIH);
+    *(result__HEIH) = *(TYPE_ID__);
+  };
+  create__with__CRB(((__TYPE_ID *)result__HEIH), 0);
+  add_last__J0R(result__42B,result__HEIH);
+  result__Q4B=NULL;
+  ptr__R4B=((__POINTER )(NULL));
+  typ_id__W4B= 0;
+  sz__T4B=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__T4B ==  0)) {
+    result__Q4B=TYPE_ID__;
   } else {
-    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);
+    typ_id__W4B=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__T4B);
+    if ((typ_id__W4B == (__INTEGER)(-  1))) {
+      a__MMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__MMFH) & (__UINTEGER_32)(~ a__MMFH));
+      ptr_table__XSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__WSKH=((__POINTER )(NULL));
+      result__YSKH=((__POINTER *)ptr_table__XSKH)[ 0];
+      if ((result__YSKH == (void *)NULL)) {
+        result__YSKH=new_lab__QOJ(new_size__NMFH);
+        next__WSKH=(void *)((unsigned long)result__YSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMFH)));
+        ((__POINTER *)next__WSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XSKH)[ 0]=next__WSKH;
+      } else {
+        next__WSKH=((__POINTER *)result__YSKH)[ 0];
+        if ((next__WSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YSKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NMFH <<  1)) <=  4096)) {
+            next__WSKH=(void *)((unsigned long)result__YSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NMFH)));
+          } else {
+            next__WSKH=new_lab__QOJ(new_size__NMFH);
+          };
+          ((__POINTER *)next__WSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XSKH)[ 0]=next__WSKH;
+        } else {
+          ((__POINTER *)result__YSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YSKH=next__WSKH;
+        };
+      };
+      ptr__R4B=result__YSKH;
+    } else {
+      t__RMFH=((__UINTEGER_32 )typ_id__W4B);
+      a__QMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5SKH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__QMFH) & (__UINTEGER_32)(~ a__QMFH));
+      ptr_table__2SKH=((__POINTER )(&(table_type[(t__RMFH)])));
+      lab_type__4SKH=(__UINTEGER_32)(t__RMFH |  1);
+      next__1SKH=((__POINTER )(NULL));
+      result__3SKH=((__POINTER *)ptr_table__2SKH)[ 0];
+      if ((result__3SKH == (void *)NULL)) {
+        result__3SKH=new_lab__QOJ(lab_type__4SKH);
+        next__1SKH=(void *)((unsigned long)result__3SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5SKH)));
+        ((__POINTER *)next__1SKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2SKH)[ 0]=next__1SKH;
+      } else {
+        next__1SKH=((__POINTER *)result__3SKH)[ 0];
+        if ((next__1SKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3SKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5SKH <<  1)) <=  4096)) {
+            next__1SKH=(void *)((unsigned long)result__3SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5SKH)));
+          } else {
+            next__1SKH=new_lab__QOJ(lab_type__4SKH);
+          };
+          ((__POINTER *)next__1SKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2SKH)[ 0]=next__1SKH;
+        } else {
+          ((__POINTER *)result__3SKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1SKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3SKH=next__1SKH;
+        };
+      };
+      ptr__R4B=result__3SKH;
+    };
+    result__Q4B=((__TYPE_ID *)ptr__R4B);
+    *(result__Q4B) = *(TYPE_ID__);
+  };
+  create__with__CRB(((__TYPE_ID *)result__Q4B), 0);
+  add_last__J0R(list_id__CBB,result__Q4B);
   if (is_short_recursive__JB) {
-    directory_list__YB=create__TBB( 100);
-    file_list__0B=create__TBB( 100);
-    current_list__2B=create__TBB( 100);
+    directory_list__YB=create__ZBB( 100);
+    file_list__0B=create__ZBB( 100);
+    current_list__2B=create__ZBB( 100);
     __tmp__4B=input_name__3B;
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    ent__TB=get_entry__10AC(__tmp__4B);
+    ent__TB=get_entry__0XAC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__QISD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__SISD=Self__QISD;
-        __tmp__FC=((void *)Self__QISD != (void *)NULL);
+        Self__CHSD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__EHSD=Self__CHSD;
+        __tmp__FC=((void *)Self__CHSD != (void *)NULL);
       } else {
-        dir__0ISD=NULL;
+        dir__MHSD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
     };
     if (__tmp__JC) {
-      print__4HD((&__string_167));
-      print__4HD(input_name__3B);
-      print__4HD((&__string_168));
+      print__DID((&__string_169));
+      print__DID(input_name__3B);
+      print__DID((&__string_170));
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__BFRD(ent__TB);
+      __tmp__UC=open__PDRD(ent__TB);
     } else {
-      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);
+      Self__UHRD=((__FILE_UNIX *)ent__TB);
+      Self__UHRD->stream__0HRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__UHRD->parent_entry_unix__05E.parent_entry__FFD.path__BD)->storage__QMO),"r+b")));
+      __tmp__UC=(Self__UHRD->stream__0HRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
-      print__4HD((&__string_167));
-      print__4HD(input_name__3B);
-      print__4HD((&__string_169));
+      print__DID((&__string_169));
+      print__DID(input_name__3B);
+      print__DID((&__string_171));
       exit(( 1));
     };
     if (ent__TB==NULL) {
@@ -7269,19808 +7288,19811 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    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);
+    check_in__begin__GPQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD +  1));
+    Self__PEIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__TEIH= 0;
+    __tmp__VEIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+    Self__WEIH= 1;
+    while ((Self__WEIH <= __tmp__VEIH)) {
+      result__TEIH=(__INTEGER)((__INTEGER)( 5 * result__TEIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__QMO)[(__INTEGER)(Self__WEIH -  1)])));
+      Self__WEIH=(__INTEGER)(Self__WEIH +  1);
+    };
+    if ((result__TEIH <  0)) {
+      result__TEIH=(__INTEGER)(~ result__TEIH);
+    };
+    node__REIH=((void **)Self__PEIH->buckets__04S)[(__INTEGER)(result__TEIH % Self__PEIH->capacity__V4S)];
+    while ((! (((void *)node__REIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__REIH)->key__G5S == (void *)(&__string_150))))) {
+      node__REIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__REIH)->next__R5S;
+    };
+    if (((void *)node__REIH != (void *)NULL)) {
+      Self__JCHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+      result__YEIH= 0;
+      __tmp__0EIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+      Self__1EIH= 1;
+      while ((Self__1EIH <= __tmp__0EIH)) {
+        result__YEIH=(__INTEGER)((__INTEGER)( 5 * result__YEIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__QMO)[(__INTEGER)(Self__1EIH -  1)])));
+        Self__1EIH=(__INTEGER)(Self__1EIH +  1);
+      };
+      if ((result__YEIH <  0)) {
+        result__YEIH=(__INTEGER)(~ result__YEIH);
+      };
+      node__LCHH=((void **)Self__JCHH->buckets__04S)[(__INTEGER)(result__YEIH % Self__JCHH->capacity__V4S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LCHH)->key__G5S != (void *)(&__string_150))) {
+        node__LCHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LCHH)->next__R5S;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LCHH)->item__0T3)->first_link__1REC)->item__GWHD;
+      Self__QK1G=((__STRING_CONSTANT *)txt__1);
+      new__RK1G=create__ZBB(Self__QK1G->count__DD);
+      copy__U4R(new__RK1G,Self__QK1G);
+      save_file__with__3DC(add_ext__C4E((&__string_150)),new__RK1G);
+    };
+    Self__3EIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__BFIH= 0;
+    __tmp__DFIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+    Self__EFIH= 1;
+    while ((Self__EFIH <= __tmp__DFIH)) {
+      result__BFIH=(__INTEGER)((__INTEGER)( 5 * result__BFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__QMO)[(__INTEGER)(Self__EFIH -  1)])));
+      Self__EFIH=(__INTEGER)(Self__EFIH +  1);
+    };
+    if ((result__BFIH <  0)) {
+      result__BFIH=(__INTEGER)(~ result__BFIH);
+    };
+    node__5EIH=((void **)Self__3EIH->buckets__04S)[(__INTEGER)(result__BFIH % Self__3EIH->capacity__V4S)];
+    while ((! (((void *)node__5EIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5EIH)->key__G5S == (void *)(&__string_66))))) {
+      node__5EIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5EIH)->next__R5S;
+    };
+    if (((void *)node__5EIH != (void *)NULL)) {
+      Self__NCHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+      result__GFIH= 0;
+      __tmp__IFIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+      Self__JFIH= 1;
+      while ((Self__JFIH <= __tmp__IFIH)) {
+        result__GFIH=(__INTEGER)((__INTEGER)( 5 * result__GFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__QMO)[(__INTEGER)(Self__JFIH -  1)])));
+        Self__JFIH=(__INTEGER)(Self__JFIH +  1);
+      };
+      if ((result__GFIH <  0)) {
+        result__GFIH=(__INTEGER)(~ result__GFIH);
+      };
+      node__PCHH=((void **)Self__NCHH->buckets__04S)[(__INTEGER)(result__GFIH % Self__NCHH->capacity__V4S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PCHH)->key__G5S != (void *)(&__string_66))) {
+        node__PCHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PCHH)->next__R5S;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PCHH)->item__0T3)->first_link__1REC)->item__GWHD;
+      Self__SK1G=((__STRING_CONSTANT *)txt__1);
+      new__TK1G=create__ZBB(Self__SK1G->count__DD);
+      copy__U4R(new__TK1G,Self__SK1G);
+      save_file__with__3DC(add_ext__C4E((&__string_66)),new__TK1G);
+    };
+    Self__LFIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__PFIH= 0;
+    __tmp__RFIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+    Self__SFIH= 1;
+    while ((Self__SFIH <= __tmp__RFIH)) {
+      result__PFIH=(__INTEGER)((__INTEGER)( 5 * result__PFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__QMO)[(__INTEGER)(Self__SFIH -  1)])));
+      Self__SFIH=(__INTEGER)(Self__SFIH +  1);
+    };
+    if ((result__PFIH <  0)) {
+      result__PFIH=(__INTEGER)(~ result__PFIH);
+    };
+    node__NFIH=((void **)Self__LFIH->buckets__04S)[(__INTEGER)(result__PFIH % Self__LFIH->capacity__V4S)];
+    while ((! (((void *)node__NFIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NFIH)->key__G5S == (void *)(&__string_151))))) {
+      node__NFIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__NFIH)->next__R5S;
+    };
+    if (((void *)node__NFIH != (void *)NULL)) {
+      Self__RCHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+      result__UFIH= 0;
+      __tmp__WFIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+      Self__XFIH= 1;
+      while ((Self__XFIH <= __tmp__WFIH)) {
+        result__UFIH=(__INTEGER)((__INTEGER)( 5 * result__UFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__QMO)[(__INTEGER)(Self__XFIH -  1)])));
+        Self__XFIH=(__INTEGER)(Self__XFIH +  1);
+      };
+      if ((result__UFIH <  0)) {
+        result__UFIH=(__INTEGER)(~ result__UFIH);
+      };
+      node__TCHH=((void **)Self__RCHH->buckets__04S)[(__INTEGER)(result__UFIH % Self__RCHH->capacity__V4S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TCHH)->key__G5S != (void *)(&__string_151))) {
+        node__TCHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TCHH)->next__R5S;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TCHH)->item__0T3)->first_link__1REC)->item__GWHD;
+      Self__3ZEH=((__STRING *)directory_list__YB);
+      i__4ZEH=Self__3ZEH->count__EGC;
+      j__A0EH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__LTZ(Self__3ZEH,(__INTEGER)(i__4ZEH + j__A0EH));
+      if (((i__4ZEH >  0) && (j__A0EH >  0))) {
+        move__to__by__YTCC(Self__3ZEH->storage__23R, 0,(__INTEGER)(i__4ZEH -  1),j__A0EH);
+      };
+      Self__XCHH=((__CHARACTER *)Self__3ZEH->storage__23R);
+      model__YCHH=((__STRING_CONSTANT *)txt__1)->storage__QMO;
+      Self__WCHH=(__INTEGER)(j__A0EH -  1);
+      while ((Self__WCHH >=  0)) {
+        Self__XCHH[Self__WCHH]=((__CHARACTER *)model__YCHH)[Self__WCHH];
+        Self__WCHH=(__INTEGER)(Self__WCHH -  1);
+      };
+    };
+    Self__1SVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__ZFIH= 0;
+    __tmp__1FIH=((__STRING_CONSTANT *)(&__string_153))->count__DD;
+    Self__2FIH= 1;
+    while ((Self__2FIH <= __tmp__1FIH)) {
+      result__ZFIH=(__INTEGER)((__INTEGER)( 5 * result__ZFIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_153))->storage__QMO)[(__INTEGER)(Self__2FIH -  1)])));
+      Self__2FIH=(__INTEGER)(Self__2FIH +  1);
+    };
+    if ((result__ZFIH <  0)) {
+      result__ZFIH=(__INTEGER)(~ result__ZFIH);
+    };
+    node__FTVB=((void **)Self__1SVB->buckets__04S)[(__INTEGER)(result__ZFIH % Self__1SVB->capacity__V4S)];
+    while ((! (((void *)node__FTVB == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FTVB)->key__G5S,(&__string_153))))) {
+      node__FTVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FTVB)->next__R5S;
+    };
+    if (((void *)node__FTVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__DH4(result__ZKH,(&__string_153)))->first_link__1REC)->item__GWHD;
+      append__2JS(directory_list__YB,txt__1);
+    };
+    save_file__with__3DC(add_ext__C4E((&__string_172)),directory_list__YB);
+    Self__4FIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__CGIH= 0;
+    __tmp__EGIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+    Self__FGIH= 1;
+    while ((Self__FGIH <= __tmp__EGIH)) {
+      result__CGIH=(__INTEGER)((__INTEGER)( 5 * result__CGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__QMO)[(__INTEGER)(Self__FGIH -  1)])));
+      Self__FGIH=(__INTEGER)(Self__FGIH +  1);
+    };
+    if ((result__CGIH <  0)) {
+      result__CGIH=(__INTEGER)(~ result__CGIH);
+    };
+    node__AGIH=((void **)Self__4FIH->buckets__04S)[(__INTEGER)(result__CGIH % Self__4FIH->capacity__V4S)];
+    while ((! (((void *)node__AGIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AGIH)->key__G5S == (void *)(&__string_154))))) {
+      node__AGIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__AGIH)->next__R5S;
+    };
+    if (((void *)node__AGIH != (void *)NULL)) {
+      Self__3CHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+      result__HGIH= 0;
+      __tmp__JGIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__KGIH= 1;
+      while ((Self__KGIH <= __tmp__JGIH)) {
+        result__HGIH=(__INTEGER)((__INTEGER)( 5 * result__HGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__QMO)[(__INTEGER)(Self__KGIH -  1)])));
+        Self__KGIH=(__INTEGER)(Self__KGIH +  1);
+      };
+      if ((result__HGIH <  0)) {
+        result__HGIH=(__INTEGER)(~ result__HGIH);
+      };
+      node__5CHH=((void **)Self__3CHH->buckets__04S)[(__INTEGER)(result__HGIH % Self__3CHH->capacity__V4S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5CHH)->key__G5S != (void *)(&__string_154))) {
+        node__5CHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5CHH)->next__R5S;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__5CHH)->item__0T3)->first_link__1REC)->item__GWHD;
+      Self__J0EH=((__STRING *)file_list__0B);
+      i__K0EH=Self__J0EH->count__EGC;
+      j__M0EH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__LTZ(Self__J0EH,(__INTEGER)(i__K0EH + j__M0EH));
+      if (((i__K0EH >  0) && (j__M0EH >  0))) {
+        move__to__by__YTCC(Self__J0EH->storage__23R, 0,(__INTEGER)(i__K0EH -  1),j__M0EH);
+      };
+      Self__DDHH=((__CHARACTER *)Self__J0EH->storage__23R);
+      model__EDHH=((__STRING_CONSTANT *)txt__1)->storage__QMO;
+      Self__CDHH=(__INTEGER)(j__M0EH -  1);
+      while ((Self__CDHH >=  0)) {
+        Self__DDHH[Self__CDHH]=((__CHARACTER *)model__EDHH)[Self__CDHH];
+        Self__CDHH=(__INTEGER)(Self__CDHH -  1);
+      };
+    };
+    Self__I4S=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+    result__MGIH= 0;
+    __tmp__OGIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+    Self__PGIH= 1;
+    while ((Self__PGIH <= __tmp__OGIH)) {
+      result__MGIH=(__INTEGER)((__INTEGER)( 5 * result__MGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__QMO)[(__INTEGER)(Self__PGIH -  1)])));
+      Self__PGIH=(__INTEGER)(Self__PGIH +  1);
+    };
+    if ((result__MGIH <  0)) {
+      result__MGIH=(__INTEGER)(~ result__MGIH);
+    };
+    node__T4S=((void **)Self__I4S->buckets__04S)[(__INTEGER)(result__MGIH % Self__I4S->capacity__V4S)];
+    while ((! (((void *)node__T4S == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__T4S)->key__G5S == (void *)(&__string_156))))) {
+      node__T4S=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__T4S)->next__R5S;
+    };
+    if (((void *)node__T4S != (void *)NULL)) {
+      Self__JDHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__ZKH);
+      result__RGIH= 0;
+      __tmp__TGIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__UGIH= 1;
+      while ((Self__UGIH <= __tmp__TGIH)) {
+        result__RGIH=(__INTEGER)((__INTEGER)( 5 * result__RGIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__QMO)[(__INTEGER)(Self__UGIH -  1)])));
+        Self__UGIH=(__INTEGER)(Self__UGIH +  1);
+      };
+      if ((result__RGIH <  0)) {
+        result__RGIH=(__INTEGER)(~ result__RGIH);
+      };
+      node__LDHH=((void **)Self__JDHH->buckets__04S)[(__INTEGER)(result__RGIH % Self__JDHH->capacity__V4S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LDHH)->key__G5S != (void *)(&__string_156))) {
+        node__LDHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LDHH)->next__R5S;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LDHH)->item__0T3)->first_link__1REC)->item__GWHD;
+      append__2JS(file_list__0B,txt__1);
+    };
+    save_file__with__3DC(add_ext__C4E((&__string_173)),file_list__0B);
   } else {
-    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);
+    Self__DTKH=((__STRING_CONSTANT *)input_name__3B);
+    result__ATKH=FALSE__;
+    i1__BTKH= 0;
+    i2__CTKH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__DTKH->count__DD)) {
+      i1__BTKH=(__INTEGER)((__INTEGER)(Self__DTKH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+      i2__CTKH= 1;
+      while ((! (((i1__BTKH > Self__DTKH->count__DD) || (i2__CTKH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__DTKH->storage__QMO)[(__INTEGER)(i1__BTKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__QMO)[(__INTEGER)(i2__CTKH -  1)])))) {
+        i1__BTKH=(__INTEGER)(i1__BTKH +  1);
+        i2__CTKH=(__INTEGER)(i2__CTKH +  1);
+      };
+      result__ATKH=(i1__BTKH > Self__DTKH->count__DD);
+    };
+    if ((! result__ATKH)) {
+      copy__U4R(string_tmp__VH,input_name__3B);
+      append__2JS(string_tmp__VH,(&__string_159));
+      input_name__3B=get__YWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    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]='/';
+    copy__U4R(string_tmp__VH,input_name__3B);
+    Self__WGIH=((__STRING *)string_tmp__VH);
+    __tmp__XGIH=Self__WGIH->storage__23R;
+    __tmp__YGIH=(__INTEGER)(Self__WGIH->count__EGC -  1);
+    Self__ZGIH=((__CHARACTER *)__tmp__XGIH);
+    Self__0GIH=__tmp__YGIH;
+    while ((Self__0GIH >=  0)) {
+      if (('\\' == Self__ZGIH[Self__0GIH])) {
+        Self__ZGIH[Self__0GIH]='/';
       };
-      Self__X1HH=(__INTEGER)(Self__X1HH -  1);
+      Self__0GIH=(__INTEGER)(Self__0GIH -  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);
+    result__5GIH=((__STRING *)string_tmp__VH)->count__EGC;
+    while ((! ((result__5GIH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__23R)[(__INTEGER)(result__5GIH -  1)] == '/')))) {
+      result__5GIH=(__INTEGER)(result__5GIH -  1);
     };
-    if ((result__21HH >=  1)) {
-      Self__0XGH=((__STRING *)string_tmp__VH);
-      if ((result__21HH > Self__0XGH->count__4FC)) {
-        Self__0XGH->count__4FC= 0;
+    if ((result__5GIH >=  1)) {
+      Self__NDHH=((__STRING *)string_tmp__VH);
+      if ((result__5GIH > Self__NDHH->count__EGC)) {
+        Self__NDHH->count__EGC= 0;
       } else {
-        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);
+        if ((result__5GIH >  0)) {
+          len__EHIH=(__INTEGER)((__INTEGER)(result__5GIH -  1) +  1);
+          if ((len__EHIH >  0)) {
+            __tmp__FHIH=(__INTEGER)(result__5GIH +  1);
+            __tmp__HHIH=Self__NDHH->count__EGC;
+            Self__IHIH=__tmp__FHIH;
+            while ((Self__IHIH <= __tmp__HHIH)) {
+              ((__CHARACTER *)Self__NDHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__IHIH - len__EHIH) -  1)]=((__CHARACTER *)Self__NDHH->storage__23R)[(__INTEGER)(Self__IHIH -  1)];
+              Self__IHIH=(__INTEGER)(Self__IHIH +  1);
             };
-            Self__0XGH->count__4FC=(__INTEGER)(Self__0XGH->count__4FC - len__B2HH);
+            Self__NDHH->count__EGC=(__INTEGER)(Self__NDHH->count__EGC - len__EHIH);
           };
         };
       };
     };
-    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);
+    result__ETC=((__STRING *)string_tmp__VH)->count__EGC;
+    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__23R)[(__INTEGER)(result__ETC -  1)] == '.')))) {
+      result__ETC=(__INTEGER)(result__ETC -  1);
     };
-    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;
+    Self__PDHH=((__STRING *)string_tmp__VH);
+    n__QDHH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC - result__ETC) +  1);
+    if ((n__QDHH > Self__PDHH->count__EGC)) {
+      Self__PDHH->count__EGC= 0;
     } else {
-      Self__2XGH->count__4FC=(__INTEGER)(Self__2XGH->count__4FC - n__3XGH);
+      Self__PDHH->count__EGC=(__INTEGER)(Self__PDHH->count__EGC - n__QDHH);
     };
-    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;
+    Self__FTKH=((__STRING *)string_tmp__VH);
+    Self__GTKH=Self__FTKH->count__EGC;
+    while ((Self__GTKH >=  1)) {
+      Self__HTKH=((__CHARACTER *)Self__FTKH->storage__23R)[(__INTEGER)(Self__GTKH -  1)];
+      result__ITKH='\0';
+      if (((((__INTEGER_8 )Self__HTKH) <  97) || (((__INTEGER_8 )Self__HTKH) >  122))) {
+        result__ITKH=Self__HTKH;
       } else {
-        result__ZIKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__YIKH) -  32))));
+        result__ITKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__HTKH) -  32))));
       };
-      ((__CHARACTER *)Self__WIKH->storage__JCS)[(__INTEGER)(Self__XIKH -  1)]=result__ZIKH;
-      Self__XIKH=(__INTEGER)(Self__XIKH -  1);
+      ((__CHARACTER *)Self__FTKH->storage__23R)[(__INTEGER)(Self__GTKH -  1)]=result__ITKH;
+      Self__GTKH=(__INTEGER)(Self__GTKH -  1);
     };
-    proto_input__BI=create__name__generic_count__BBC(__tmp__2H,get__QWB(string_tmp__VH));
-    go_on__KBC(proto_input__BI);
+    proto_input__BI=create__name__generic_count__JBC(__tmp__2H,get__YWB(string_tmp__VH));
+    go_on__SBC(proto_input__BI);
     if (((void *)output_name__DI == (void *)NULL)) {
-      output_name__DI=add_ext__MBF(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__C4E(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
-    save_file__with__XDC(output_name__DI,output_code__SI);
+    save_file__with__3DC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    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;
+    Self__KZQC= 0;
+    limit_up__LZQC=result__IKJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__KZQC <= limit_up__LZQC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[Self__KZQC];
+      ((__STRING *)output_code__SI)->count__EGC= 0;
+      Self__QITD=((__PROTOTYPE *)p__AB);
+      title__SITD=NULL;
+      s__TITD=NULL;
+      put__to__like__Q0XD(Self__QITD->parent_named__5.name__LI,output_code__SI,(&__string_140));
+      if (((void *)Self__QITD->comment_slot__ZPTC != (void *)NULL)) {
+        put__to__like__Q0XD(Self__QITD->comment_slot__ZPTC,output_code__SI,(&__string_138));
+      };
+      if (((void *)Self__QITD->comment_header__U2QC != (void *)NULL)) {
+        put__to__like__Q0XD(Self__QITD->comment_header__U2QC,output_code__SI,(&__string_139));
+      };
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__S2XD(Self__QITD,list_tmp__RJTD);
+      s__1CYD=NULL;
+      is_first_cur__0CYD=TRUE__;
+      __tmp__5CYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__ZB5D= 0;
+      while ((Self__ZB5D <= __tmp__5CYD)) {
+        s__1CYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__ZB5D];
+        if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+          __tmp__0JTD=((__ITM_SLOT *)s__1CYD)->id_section__F2C;
+        } else {
+          __tmp__0JTD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.id_section__F2C;
+        };
+        Self__O41G=((__SECTION_ *)__tmp__0JTD);
+        if ((((void *)Self__O41G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__O41G->name__ZWDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+            __tmp__MDYD=((__ITM_SLOT *)s__1CYD)->stat_shorter__XKTD;
+          } else {
+            __tmp__MDYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+          };
+          __tmp__PDYD=(__tmp__MDYD ==  0);
+        } else {
+          __tmp__PDYD=FALSE__;
+        };
+        if (__tmp__PDYD) {
+          if (is_first_cur__0CYD) {
+            if (((void *)(&__string_174) == (void *)NULL)) {
+              put__to__like__Q0XD((&__string_175),output_code__SI,(&__string_141));
+            } else {
+              put__to__like__Q0XD((&__string_174),output_code__SI,(&__string_141));
+            };
+            is_first_cur__0CYD=FALSE__;
+          };
+          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__1CYD)->stat_shorter__XKTD= 1;
+          } else {
+            ((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
+          };
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ZM4F(s__1CYD,string_tmp2__F3I);
+          } else {
+            pretty_name_in__OO4F(s__1CYD,string_tmp2__F3I);
+          };
+          put__to__like__Q0XD(string_tmp2__F3I,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+            __tmp__UEYD=((__ITM_SLOT *)s__1CYD)->id_section__F2C;
+          } else {
+            __tmp__UEYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.id_section__F2C;
+          };
+          Self__P41G=((__SECTION_ *)__tmp__UEYD);
+          if ((((void *)Self__P41G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__P41G->name__ZWDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+              __tmp__1EYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.style__25T;
             } else {
-              __tmp__GDYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
+              __tmp__1EYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
             };
-            if ((__tmp__GDYD != '+')) {
-              __tmp__2DYD=TRUE__;
+            if ((__tmp__1EYD != '+')) {
+              __tmp__RFYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
-                __tmp__NDYD=((__ITM_SLOT *)s__4BYD)->result_type__C5FC;
+              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+                __tmp__CFYD=((__ITM_SLOT *)s__1CYD)->result_type__N2FC;
               } else {
-                __tmp__NDYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.result_type__C5FC;
+                __tmp__CFYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.result_type__N2FC;
               };
-              if (__tmp__NDYD==NULL) {
-                __tmp__PDYD=NULL;
+              if (__tmp__CFYD==NULL) {
+                __tmp__EFYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__NDYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__CFYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__PDYD=((void *)__tmp__NDYD);
+                  __tmp__EFYD=((void *)__tmp__CFYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__PDYD=((void *)__tmp__NDYD);
+                  __tmp__EFYD=((void *)__tmp__CFYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__PDYD=NULL;
+                  __tmp__EFYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__PDYD=NULL;
+                  __tmp__EFYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__PDYD=((void *)__tmp__NDYD);
+                  __tmp__EFYD=((void *)__tmp__CFYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__PDYD=((void *)__tmp__NDYD);
+                  __tmp__EFYD=((void *)__tmp__CFYD);
                 } break;
                 }
               };
-              ts__MDYD=__tmp__PDYD;
-              if (((void *)__tmp__PDYD == (void *)NULL)) {
-                __tmp__ZDYD=TRUE__;
+              ts__BFYD=__tmp__EFYD;
+              if (((void *)__tmp__EFYD == (void *)NULL)) {
+                __tmp__OFYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__PDYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__EFYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__VDYD=NULL;
+                  __tmp__KFYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__VDYD=NULL;
+                  __tmp__KFYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__VDYD=((__ITM_TYPE_GENERIC *)__tmp__PDYD)->parent_itm_type_style__KSN.style__1YP;
+                  __tmp__KFYD=((__ITM_TYPE_GENERIC *)__tmp__EFYD)->parent_itm_type_style__3NN.style__OUP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__VDYD=((__ITM_TYPE_STYLE *)__tmp__PDYD)->style__1YP;
+                  __tmp__KFYD=((__ITM_TYPE_STYLE *)__tmp__EFYD)->style__OUP;
                 } break;
                 };
-                __tmp__ZDYD=((void *)__tmp__VDYD != (void *)(&__string_9));
+                __tmp__OFYD=((void *)__tmp__KFYD != (void *)(&__string_9));
               };
-              __tmp__2DYD=__tmp__ZDYD;
+              __tmp__RFYD=__tmp__OFYD;
             };
-            if (__tmp__2DYD) {
-              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
-                __tmp__CEYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.name__LI;
+            if (__tmp__RFYD) {
+              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+                __tmp__XFYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.name__LI;
               } else {
-                __tmp__CEYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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);
+                __tmp__XFYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+              };
+              Self__NTKH=((__STRING_CONSTANT *)__tmp__XFYD);
+              result__KTKH=FALSE__;
+              i__LTKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__NTKH->count__DD)) {
+                i__LTKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__LTKH ==  0) || (((__CHARACTER *)Self__NTKH->storage__QMO)[(__INTEGER)(i__LTKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__QMO)[(__INTEGER)(i__LTKH -  1)])))) {
+                  i__LTKH=(__INTEGER)(i__LTKH -  1);
                 };
-                result__1IKH=(i__2IKH ==  0);
+                result__KTKH=(i__LTKH ==  0);
               };
-              __tmp__QEYD=(! result__1IKH);
+              __tmp__FGYD=(! result__KTKH);
             } else {
-              __tmp__QEYD=FALSE__;
+              __tmp__FGYD=FALSE__;
             };
-            if (__tmp__QEYD) {
-              if (((struct ___OBJ *)s__4BYD)->__id==__ITM_SLOT__) {
-                __tmp__LEYD=((__ITM_SLOT *)s__4BYD)->parent_named__V5.name__LI;
+            if (__tmp__FGYD) {
+              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+                __tmp__AGYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.name__LI;
               } else {
-                __tmp__LEYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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);
+                __tmp__AGYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+              };
+              Self__STKH=((__STRING_CONSTANT *)__tmp__AGYD);
+              result__PTKH=FALSE__;
+              i__QTKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__STKH->count__DD)) {
+                i__QTKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__QTKH ==  0) || (((__CHARACTER *)Self__STKH->storage__QMO)[(__INTEGER)(i__QTKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__QMO)[(__INTEGER)(i__QTKH -  1)])))) {
+                  i__QTKH=(__INTEGER)(i__QTKH -  1);
                 };
-                result__AJKH=(i__BJKH ==  0);
+                result__PTKH=(i__QTKH ==  0);
               };
-              __tmp__REYD=(! result__AJKH);
+              __tmp__GGYD=(! result__PTKH);
             } else {
-              __tmp__REYD=FALSE__;
+              __tmp__GGYD=FALSE__;
             };
-            __tmp__UEYD=__tmp__REYD;
+            __tmp__JGYD=__tmp__GGYD;
           } else {
-            __tmp__UEYD=FALSE__;
+            __tmp__JGYD=FALSE__;
           };
-          if (__tmp__UEYD) {
-            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
+          if (__tmp__JGYD) {
+            put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
+            __tmp__VGYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.name__LI;
           } else {
-            __tmp__AFYD=((__ITM_SLOT_OPERATOR *)s__4BYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__VGYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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));
+          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__VGYD,string_tmp2__F3I);
+          ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
+          shorter_comment__in__light__1G4E(string_tmp2__F3I,string_tmp3__0SD,TRUE__);
+          put__to__like__Q0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__FC5D=(__INTEGER)(Self__FC5D +  1);
+        Self__ZB5D=(__INTEGER)(Self__ZB5D +  1);
       };
-      if ((! is_first_cur__3BYD)) {
-        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
+      if ((! is_first_cur__0CYD)) {
+        put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
       };
-      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;
+      s__UHYD=NULL;
+      is_first_cur__THYD=TRUE__;
+      __tmp__YHYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__LC5D= 0;
+      while ((Self__LC5D <= __tmp__YHYD)) {
+        s__UHYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__LC5D];
+        if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+          __tmp__EKTD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
         } else {
-          __tmp__0KTD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+          __tmp__EKTD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
         };
-        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);
+        Self__XTKH=((__STRING_CONSTANT *)__tmp__EKTD);
+        result__UTKH=FALSE__;
+        i__VTKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__XTKH->count__DD)) {
+          i__VTKH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__VTKH ==  0) || (((__CHARACTER *)Self__XTKH->storage__QMO)[(__INTEGER)(i__VTKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__QMO)[(__INTEGER)(i__VTKH -  1)])))) {
+            i__VTKH=(__INTEGER)(i__VTKH -  1);
           };
-          result__FJKH=(i__GJKH ==  0);
+          result__UTKH=(i__VTKH ==  0);
         };
-        if (result__FJKH) {
-          if (is_first_cur__5FYD) {
-            put__to__like__D0XD((&__string_177),output_code__SI,(&__string_139));
-            is_first_cur__5FYD=FALSE__;
+        if (result__UTKH) {
+          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+            __tmp__FIYD=((__ITM_SLOT *)s__UHYD)->stat_shorter__XKTD;
+          } else {
+            __tmp__FIYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+          };
+          __tmp__IIYD=(__tmp__FIYD ==  0);
+        } else {
+          __tmp__IIYD=FALSE__;
+        };
+        if (__tmp__IIYD) {
+          if (is_first_cur__THYD) {
+            if (((void *)(&__string_180) == (void *)NULL)) {
+              put__to__like__Q0XD((&__string_175),output_code__SI,(&__string_141));
+            } else {
+              put__to__like__Q0XD((&__string_180),output_code__SI,(&__string_141));
+            };
+            is_first_cur__THYD=FALSE__;
           };
-          ((__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);
+          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__UHYD)->stat_shorter__XKTD= 1;
           } else {
-            pretty_name_in__YB4F(s__AGYD,string_tmp2__JAJ);
+            ((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
           };
-          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;
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ZM4F(s__UHYD,string_tmp2__F3I);
           } else {
-            __tmp__BHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.id_section__A2C;
+            pretty_name_in__OO4F(s__UHYD,string_tmp2__F3I);
           };
-          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;
+          put__to__like__Q0XD(string_tmp2__F3I,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+            __tmp__NJYD=((__ITM_SLOT *)s__UHYD)->id_section__F2C;
+          } else {
+            __tmp__NJYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.id_section__F2C;
+          };
+          Self__Q41G=((__SECTION_ *)__tmp__NJYD);
+          if ((((void *)Self__Q41G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__Q41G->name__ZWDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+              __tmp__UJYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.style__25T;
             } else {
-              __tmp__IHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
+              __tmp__UJYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
             };
-            if ((__tmp__IHYD != '+')) {
-              __tmp__4HYD=TRUE__;
+            if ((__tmp__UJYD != '+')) {
+              __tmp__KKYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
-                __tmp__PHYD=((__ITM_SLOT *)s__AGYD)->result_type__C5FC;
+              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+                __tmp__1JYD=((__ITM_SLOT *)s__UHYD)->result_type__N2FC;
               } else {
-                __tmp__PHYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.result_type__C5FC;
+                __tmp__1JYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.result_type__N2FC;
               };
-              if (__tmp__PHYD==NULL) {
-                __tmp__RHYD=NULL;
+              if (__tmp__1JYD==NULL) {
+                __tmp__3JYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__PHYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__1JYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__RHYD=((void *)__tmp__PHYD);
+                  __tmp__3JYD=((void *)__tmp__1JYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__RHYD=((void *)__tmp__PHYD);
+                  __tmp__3JYD=((void *)__tmp__1JYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__RHYD=NULL;
+                  __tmp__3JYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__RHYD=NULL;
+                  __tmp__3JYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__RHYD=((void *)__tmp__PHYD);
+                  __tmp__3JYD=((void *)__tmp__1JYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__RHYD=((void *)__tmp__PHYD);
+                  __tmp__3JYD=((void *)__tmp__1JYD);
                 } break;
                 }
               };
-              ts__OHYD=__tmp__RHYD;
-              if (((void *)__tmp__RHYD == (void *)NULL)) {
-                __tmp__1HYD=TRUE__;
+              ts__0JYD=__tmp__3JYD;
+              if (((void *)__tmp__3JYD == (void *)NULL)) {
+                __tmp__HKYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__RHYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__3JYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__XHYD=NULL;
+                  __tmp__DKYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__XHYD=NULL;
+                  __tmp__DKYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__XHYD=((__ITM_TYPE_GENERIC *)__tmp__RHYD)->parent_itm_type_style__KSN.style__1YP;
+                  __tmp__DKYD=((__ITM_TYPE_GENERIC *)__tmp__3JYD)->parent_itm_type_style__3NN.style__OUP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__XHYD=((__ITM_TYPE_STYLE *)__tmp__RHYD)->style__1YP;
+                  __tmp__DKYD=((__ITM_TYPE_STYLE *)__tmp__3JYD)->style__OUP;
                 } break;
                 };
-                __tmp__1HYD=((void *)__tmp__XHYD != (void *)(&__string_9));
+                __tmp__HKYD=((void *)__tmp__DKYD != (void *)(&__string_9));
               };
-              __tmp__4HYD=__tmp__1HYD;
+              __tmp__KKYD=__tmp__HKYD;
             };
-            if (__tmp__4HYD) {
-              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
-                __tmp__EIYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
+            if (__tmp__KKYD) {
+              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+                __tmp__QKYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
               } else {
-                __tmp__EIYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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);
+                __tmp__QKYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+              };
+              Self__2TKH=((__STRING_CONSTANT *)__tmp__QKYD);
+              result__ZTKH=FALSE__;
+              i__0TKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__2TKH->count__DD)) {
+                i__0TKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__0TKH ==  0) || (((__CHARACTER *)Self__2TKH->storage__QMO)[(__INTEGER)(i__0TKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__QMO)[(__INTEGER)(i__0TKH -  1)])))) {
+                  i__0TKH=(__INTEGER)(i__0TKH -  1);
                 };
-                result__KJKH=(i__LJKH ==  0);
+                result__ZTKH=(i__0TKH ==  0);
               };
-              __tmp__SIYD=(! result__KJKH);
+              __tmp__4KYD=(! result__ZTKH);
             } else {
-              __tmp__SIYD=FALSE__;
+              __tmp__4KYD=FALSE__;
             };
-            if (__tmp__SIYD) {
-              if (((struct ___OBJ *)s__AGYD)->__id==__ITM_SLOT__) {
-                __tmp__NIYD=((__ITM_SLOT *)s__AGYD)->parent_named__V5.name__LI;
+            if (__tmp__4KYD) {
+              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+                __tmp__ZKYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
               } else {
-                __tmp__NIYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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);
+                __tmp__ZKYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+              };
+              Self__BUKH=((__STRING_CONSTANT *)__tmp__ZKYD);
+              result__4TKH=FALSE__;
+              i__5TKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__BUKH->count__DD)) {
+                i__5TKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__5TKH ==  0) || (((__CHARACTER *)Self__BUKH->storage__QMO)[(__INTEGER)(i__5TKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__QMO)[(__INTEGER)(i__5TKH -  1)])))) {
+                  i__5TKH=(__INTEGER)(i__5TKH -  1);
                 };
-                result__PJKH=(i__QJKH ==  0);
+                result__4TKH=(i__5TKH ==  0);
               };
-              __tmp__TIYD=(! result__PJKH);
+              __tmp__5KYD=(! result__4TKH);
             } else {
-              __tmp__TIYD=FALSE__;
+              __tmp__5KYD=FALSE__;
             };
-            __tmp__WIYD=__tmp__TIYD;
+            __tmp__CLYD=__tmp__5KYD;
           } else {
-            __tmp__WIYD=FALSE__;
+            __tmp__CLYD=FALSE__;
           };
-          if (__tmp__WIYD) {
-            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
+          if (__tmp__CLYD) {
+            put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
+            __tmp__OLYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
           } else {
-            __tmp__CJYD=((__ITM_SLOT_OPERATOR *)s__AGYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__OLYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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));
+          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__OLYD,string_tmp2__F3I);
+          ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
+          shorter_comment__in__light__1G4E(string_tmp2__F3I,string_tmp3__0SD,TRUE__);
+          put__to__like__Q0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__XC5D=(__INTEGER)(Self__XC5D +  1);
+        Self__LC5D=(__INTEGER)(Self__LC5D +  1);
       };
-      if ((! is_first_cur__5FYD)) {
-        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
+      if ((! is_first_cur__THYD)) {
+        put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
       };
-      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;
+      __tmp__PKTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__IMYD= 0;
+      while ((Self__IMYD <= __tmp__PKTD)) {
+        s__TITD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__IMYD];
+        if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
+          __tmp__YKTD=((__ITM_SLOT *)s__TITD)->stat_shorter__XKTD;
         } else {
-          __tmp__ELTD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-        };
-        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__UJKH=(i__VJKH ==  0);
+          __tmp__YKTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
         };
-        if ((! result__UJKH)) {
-          if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
-            __tmp__MLTD=((__ITM_SLOT *)s__BKYD)->id_section__A2C;
+        if ((__tmp__YKTD ==  0)) {
+          if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
+            __tmp__4KTD=((__ITM_SLOT *)s__TITD)->comment_chapter__5YHC;
           } else {
-            __tmp__MLTD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.id_section__A2C;
+            __tmp__4KTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.comment_chapter__5YHC;
           };
-          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__RLTD=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__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__YB4F(s__BKYD,string_tmp2__JAJ);
-          };
-          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__CLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.id_section__A2C;
-          };
-          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;
+          title__SITD=__tmp__4KTD;
+          t__L0QE=__tmp__4KTD;
+          s__O0QE=NULL;
+          is_first_cur__N0QE=TRUE__;
+          __tmp__S0QE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+          Self__3CSE= 0;
+          while ((Self__3CSE <= __tmp__S0QE)) {
+            s__O0QE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__3CSE];
+            if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+              __tmp__FLTD=((__ITM_SLOT *)s__O0QE)->comment_chapter__5YHC;
             } else {
-              __tmp__JLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
+              __tmp__FLTD=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.comment_chapter__5YHC;
             };
-            if ((__tmp__JLYD != '+')) {
-              __tmp__5LYD=TRUE__;
-            } else {
-              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
-                __tmp__QLYD=((__ITM_SLOT *)s__BKYD)->result_type__C5FC;
+            if (((void *)__tmp__FLTD == (void *)title__SITD)) {
+              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                __tmp__50QE=((__ITM_SLOT *)s__O0QE)->stat_shorter__XKTD;
               } else {
-                __tmp__QLYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.result_type__C5FC;
+                __tmp__50QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+              };
+              __tmp__C1QE=(__tmp__50QE ==  0);
+            } else {
+              __tmp__C1QE=FALSE__;
+            };
+            if (__tmp__C1QE) {
+              if (is_first_cur__N0QE) {
+                if (((void *)t__L0QE == (void *)NULL)) {
+                  put__to__like__Q0XD((&__string_175),output_code__SI,(&__string_141));
+                } else {
+                  put__to__like__Q0XD(t__L0QE,output_code__SI,(&__string_141));
+                };
+                is_first_cur__N0QE=FALSE__;
               };
-              if (__tmp__QLYD==NULL) {
-                __tmp__SLYD=NULL;
+              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__O0QE)->stat_shorter__XKTD= 1;
               } else {
-                switch (((struct ___OBJ *)__tmp__QLYD)->__id) {
-                case __ITM_TYPE_PARAMETER__: {
-                  __tmp__SLYD=((void *)__tmp__QLYD);
-                } break;
-                case __ITM_TYPE_SIMPLE__: {
-                  __tmp__SLYD=((void *)__tmp__QLYD);
-                } break;
-                case __ITM_TYPE_MULTI__: {
-                  __tmp__SLYD=NULL;
-                } break;
-                case __ITM_TYPE_BLOCK__: {
-                  __tmp__SLYD=NULL;
-                } break;
-                case __ITM_TYPE_GENERIC__: {
-                  __tmp__SLYD=((void *)__tmp__QLYD);
-                } break;
-                case __ITM_TYPE_STYLE__: {
-                  __tmp__SLYD=((void *)__tmp__QLYD);
-                } break;
-                }
+                ((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
               };
-              ts__PLYD=__tmp__SLYD;
-              if (((void *)__tmp__SLYD == (void *)NULL)) {
-                __tmp__2LYD=TRUE__;
+              ((__STRING *)string_tmp__VH)->count__EGC= 0;
+              ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                pretty_name_in__ZM4F(s__O0QE,string_tmp2__F3I);
               } else {
-                switch (((struct ___OBJ *)__tmp__SLYD)->__id) {
-                case __ITM_TYPE_PARAMETER__: {
-                  __tmp__YLYD=NULL;
-                } break;
-                case __ITM_TYPE_SIMPLE__: {
-                  __tmp__YLYD=NULL;
-                } break;
-                case __ITM_TYPE_GENERIC__: {
-                  __tmp__YLYD=((__ITM_TYPE_GENERIC *)__tmp__SLYD)->parent_itm_type_style__KSN.style__1YP;
-                } break;
-                case __ITM_TYPE_STYLE__: {
-                  __tmp__YLYD=((__ITM_TYPE_STYLE *)__tmp__SLYD)->style__1YP;
-                } break;
-                };
-                __tmp__2LYD=((void *)__tmp__YLYD != (void *)(&__string_9));
+                pretty_name_in__OO4F(s__O0QE,string_tmp2__F3I);
               };
-              __tmp__5LYD=__tmp__2LYD;
-            };
-            if (__tmp__5LYD) {
-              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
-                __tmp__FMYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
+              put__to__like__Q0XD(string_tmp2__F3I,string_tmp__VH,(&__string_143));
+              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                __tmp__H2QE=((__ITM_SLOT *)s__O0QE)->id_section__F2C;
               } else {
-                __tmp__FMYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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);
+                __tmp__H2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.id_section__F2C;
+              };
+              Self__R41G=((__SECTION_ *)__tmp__H2QE);
+              if ((((void *)Self__R41G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__R41G->name__ZWDC == (void *)(&__string_24)))) {
+                if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                  __tmp__O2QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.style__25T;
+                } else {
+                  __tmp__O2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.style__25T;
+                };
+                if ((__tmp__O2QE != '+')) {
+                  __tmp__E3QE=TRUE__;
+                } else {
+                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                    __tmp__V2QE=((__ITM_SLOT *)s__O0QE)->result_type__N2FC;
+                  } else {
+                    __tmp__V2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.result_type__N2FC;
+                  };
+                  if (__tmp__V2QE==NULL) {
+                    __tmp__X2QE=NULL;
+                  } else {
+                    switch (((struct ___OBJ *)__tmp__V2QE)->__id) {
+                    case __ITM_TYPE_PARAMETER__: {
+                      __tmp__X2QE=((void *)__tmp__V2QE);
+                    } break;
+                    case __ITM_TYPE_SIMPLE__: {
+                      __tmp__X2QE=((void *)__tmp__V2QE);
+                    } break;
+                    case __ITM_TYPE_MULTI__: {
+                      __tmp__X2QE=NULL;
+                    } break;
+                    case __ITM_TYPE_BLOCK__: {
+                      __tmp__X2QE=NULL;
+                    } break;
+                    case __ITM_TYPE_GENERIC__: {
+                      __tmp__X2QE=((void *)__tmp__V2QE);
+                    } break;
+                    case __ITM_TYPE_STYLE__: {
+                      __tmp__X2QE=((void *)__tmp__V2QE);
+                    } break;
+                    }
+                  };
+                  ts__U2QE=__tmp__X2QE;
+                  if (((void *)__tmp__X2QE == (void *)NULL)) {
+                    __tmp__B3QE=TRUE__;
+                  } else {
+                    switch (((struct ___OBJ *)__tmp__X2QE)->__id) {
+                    case __ITM_TYPE_PARAMETER__: {
+                      __tmp__32QE=NULL;
+                    } break;
+                    case __ITM_TYPE_SIMPLE__: {
+                      __tmp__32QE=NULL;
+                    } break;
+                    case __ITM_TYPE_GENERIC__: {
+                      __tmp__32QE=((__ITM_TYPE_GENERIC *)__tmp__X2QE)->parent_itm_type_style__3NN.style__OUP;
+                    } break;
+                    case __ITM_TYPE_STYLE__: {
+                      __tmp__32QE=((__ITM_TYPE_STYLE *)__tmp__X2QE)->style__OUP;
+                    } break;
+                    };
+                    __tmp__B3QE=((void *)__tmp__32QE != (void *)(&__string_9));
+                  };
+                  __tmp__E3QE=__tmp__B3QE;
                 };
-                result__ZJKH=(i__0JKH ==  0);
+                if (__tmp__E3QE) {
+                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                    __tmp__K3QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.name__LI;
+                  } else {
+                    __tmp__K3QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                  };
+                  Self__GUKH=((__STRING_CONSTANT *)__tmp__K3QE);
+                  result__DUKH=FALSE__;
+                  i__EUKH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__GUKH->count__DD)) {
+                    i__EUKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                    while ((! ((i__EUKH ==  0) || (((__CHARACTER *)Self__GUKH->storage__QMO)[(__INTEGER)(i__EUKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__QMO)[(__INTEGER)(i__EUKH -  1)])))) {
+                      i__EUKH=(__INTEGER)(i__EUKH -  1);
+                    };
+                    result__DUKH=(i__EUKH ==  0);
+                  };
+                  __tmp__Y3QE=(! result__DUKH);
+                } else {
+                  __tmp__Y3QE=FALSE__;
+                };
+                if (__tmp__Y3QE) {
+                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                    __tmp__T3QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.name__LI;
+                  } else {
+                    __tmp__T3QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                  };
+                  Self__LUKH=((__STRING_CONSTANT *)__tmp__T3QE);
+                  result__IUKH=FALSE__;
+                  i__JUKH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__LUKH->count__DD)) {
+                    i__JUKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                    while ((! ((i__JUKH ==  0) || (((__CHARACTER *)Self__LUKH->storage__QMO)[(__INTEGER)(i__JUKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__QMO)[(__INTEGER)(i__JUKH -  1)])))) {
+                      i__JUKH=(__INTEGER)(i__JUKH -  1);
+                    };
+                    result__IUKH=(i__JUKH ==  0);
+                  };
+                  __tmp__Z3QE=(! result__IUKH);
+                } else {
+                  __tmp__Z3QE=FALSE__;
+                };
+                __tmp__23QE=__tmp__Z3QE;
+              } else {
+                __tmp__23QE=FALSE__;
               };
-              __tmp__TMYD=(! result__ZJKH);
-            } else {
-              __tmp__TMYD=FALSE__;
-            };
-            if (__tmp__TMYD) {
-              if (((struct ___OBJ *)s__BKYD)->__id==__ITM_SLOT__) {
-                __tmp__OMYD=((__ITM_SLOT *)s__BKYD)->parent_named__V5.name__LI;
+              if (__tmp__23QE) {
+                put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
+              };
+              ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
+                __tmp__I4QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.name__LI;
               } else {
-                __tmp__OMYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-              };
-              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__4JKH=(i__5JKH ==  0);
+                __tmp__I4QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
               };
-              __tmp__UMYD=(! result__4JKH);
-            } else {
-              __tmp__UMYD=FALSE__;
+              get_all_comment_slot__in__ID4E(Self__QITD,__tmp__I4QE,string_tmp2__F3I);
+              ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
+              shorter_comment__in__light__1G4E(string_tmp2__F3I,string_tmp3__0SD,TRUE__);
+              put__to__like__Q0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+              put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_142));
             };
-            __tmp__XMYD=__tmp__UMYD;
-          } else {
-            __tmp__XMYD=FALSE__;
+            Self__3CSE=(__INTEGER)(Self__3CSE +  1);
           };
-          if (__tmp__XMYD) {
-            put__to__like__D0XD((&__string_175),string_tmp__VH,(&__string_135));
+          if ((! is_first_cur__N0QE)) {
+            put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
           };
-          ((__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__DNYD=((__ITM_SLOT_OPERATOR *)s__BKYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
-          };
-          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__JD5D=(__INTEGER)(Self__JD5D +  1);
-      };
-      if ((! is_first_cur__AKYD)) {
-        put__to__like__D0XD(NULL,output_code__SI,(&__string_143));
+        Self__IMYD=(__INTEGER)(Self__IMYD +  1);
       };
-      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;
+      s__2MYD=NULL;
+      is_first__1MYD=TRUE__;
+      __tmp__ANYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__GD5D= 0;
+      while ((Self__GD5D <= __tmp__ANYD)) {
+        s__2MYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__GD5D];
+        if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+          __tmp__RLTD=((__ITM_SLOT *)s__2MYD)->id_section__F2C;
         } else {
-          __tmp__0LTD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.id_section__A2C;
+          __tmp__RLTD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.id_section__F2C;
         };
-        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__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__YB4F(s__COYD,string_tmp2__JAJ);
-          };
-          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__CPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
-          };
-          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__HPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
-          };
-          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__QPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.id_section__A2C;
-          };
-          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__OF4F(s__COYD,output_code__SI);
-          };
-          ((__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;
+        Self__S41G=((__SECTION_ *)__tmp__RLTD);
+        if ((((void *)Self__S41G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__S41G->name__ZWDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            __tmp__NNYD=((__ITM_SLOT *)s__2MYD)->stat_shorter__XKTD;
           } else {
-            __tmp__YPYD=((__ITM_SLOT_OPERATOR *)s__COYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__NNYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
           };
-          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__1D5D=(__INTEGER)(Self__1D5D +  1);
-      };
-      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;
+          __tmp__QNYD=(__tmp__NNYD ==  1);
         } else {
-          __tmp__EMTD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+          __tmp__QNYD=FALSE__;
         };
-        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);
+        if (__tmp__QNYD) {
+          if (is_first__1MYD) {
+            if (((void *)(&__string_181) == (void *)NULL)) {
+              put__to__like__Q0XD((&__string_182),output_code__SI,(&__string_146));
+            } else {
+              put__to__like__Q0XD((&__string_181),output_code__SI,(&__string_146));
+            };
+            is_first__1MYD=FALSE__;
           };
-          result__DKKH=(i__EKKH ==  0);
-        };
-        if (result__DKKH) {
-          if (is_first__FQYD) {
-            put__to__like__D0XD((&__string_183),output_code__SI,(&__string_144));
-            is_first__FQYD=FALSE__;
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__2MYD)->stat_shorter__XKTD= 2;
+          } else {
+            ((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
           };
-          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
-          if (((struct ___OBJ *)s__GQYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DA4F(s__GQYD,string_tmp2__JAJ);
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ZM4F(s__2MYD,string_tmp2__F3I);
           } else {
-            pretty_name_in__YB4F(s__GQYD,string_tmp2__JAJ);
+            pretty_name_in__OO4F(s__2MYD,string_tmp2__F3I);
           };
-          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;
+          put__to__like__Q0XD(string_tmp2__F3I,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            __tmp__UOYD=((__ITM_SLOT *)s__2MYD)->parent_named__15.parent_itm_object__4.position__RAJ;
           } else {
-            __tmp__GRYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+            __tmp__UOYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
           };
-          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;
+          copy__U4R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__UOYD)) &  511)])->filename__CNG);
+          append__2JS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            __tmp__ZOYD=((__ITM_SLOT *)s__2MYD)->parent_named__15.parent_itm_object__4.position__RAJ;
           } else {
-            __tmp__LRYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+            __tmp__ZOYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
           };
-          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;
+          append_in__2FH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__ZOYD) >>  17),string_tmp__VH);
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__Q0XD((&__string_184),output_code__SI,(&__string_148));
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            __tmp__CPYD=((__ITM_SLOT *)s__2MYD)->id_section__F2C;
           } else {
-            __tmp__URYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.id_section__A2C;
+            __tmp__CPYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.id_section__F2C;
           };
-          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);
+          append_in__GQ4F(__tmp__CPYD,string_tmp__VH);
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__Q0XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__IR4F(s__2MYD,output_code__SI);
           } else {
-            shorter_profile_in__OF4F(s__GQYD,output_code__SI);
+            shorter_profile_in__FS4F(s__2MYD,output_code__SI);
           };
-          ((__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;
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
+            __tmp__KPYD=((__ITM_SLOT *)s__2MYD)->parent_named__15.name__LI;
           } else {
-            __tmp__2RYD=((__ITM_SLOT_OPERATOR *)s__GQYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__KPYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__KPYD,string_tmp__VH);
+          shorter_comment__in__light__1G4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__KE5D=(__INTEGER)(Self__KE5D +  1);
+        Self__GD5D=(__INTEGER)(Self__GD5D +  1);
       };
-      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;
+      s__YPYD=NULL;
+      is_first__XPYD=TRUE__;
+      __tmp__2PYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__VD5D= 0;
+      while ((Self__VD5D <= __tmp__2PYD)) {
+        s__YPYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__VD5D];
+        if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+          __tmp__1LTD=((__ITM_SLOT *)s__YPYD)->parent_named__15.name__LI;
         } else {
-          __tmp__OMTD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+          __tmp__1LTD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
         };
-        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);
+        Self__QUKH=((__STRING_CONSTANT *)__tmp__1LTD);
+        result__NUKH=FALSE__;
+        i__OUKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__QUKH->count__DD)) {
+          i__OUKH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__OUKH ==  0) || (((__CHARACTER *)Self__QUKH->storage__QMO)[(__INTEGER)(i__OUKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__QMO)[(__INTEGER)(i__OUKH -  1)])))) {
+            i__OUKH=(__INTEGER)(i__OUKH -  1);
           };
-          result__IKKH=(i__JKKH ==  0);
+          result__NUKH=(i__OUKH ==  0);
         };
-        if ((! result__IKKH)) {
-          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
-            __tmp__WMTD=((__ITM_SLOT *)s__KSYD)->id_section__A2C;
+        if (result__NUKH) {
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            __tmp__JQYD=((__ITM_SLOT *)s__YPYD)->stat_shorter__XKTD;
           } else {
-            __tmp__WMTD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.id_section__A2C;
+            __tmp__JQYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
           };
-          Self__WR1G=((__SECTION_ *)__tmp__WMTD);
-          __tmp__1MTD=(! (((void *)Self__WR1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__WR1G->name__KZDC == (void *)(&__string_24))));
+          __tmp__MQYD=(__tmp__JQYD ==  1);
         } else {
-          __tmp__1MTD=FALSE__;
+          __tmp__MQYD=FALSE__;
         };
-        if (__tmp__1MTD) {
-          if (is_first__JSYD) {
-            put__to__like__D0XD((&__string_184),output_code__SI,(&__string_144));
-            is_first__JSYD=FALSE__;
+        if (__tmp__MQYD) {
+          if (is_first__XPYD) {
+            if (((void *)(&__string_186) == (void *)NULL)) {
+              put__to__like__Q0XD((&__string_182),output_code__SI,(&__string_146));
+            } else {
+              put__to__like__Q0XD((&__string_186),output_code__SI,(&__string_146));
+            };
+            is_first__XPYD=FALSE__;
+          };
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__YPYD)->stat_shorter__XKTD= 2;
+          } else {
+            ((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
+          };
+          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ZM4F(s__YPYD,string_tmp2__F3I);
+          } else {
+            pretty_name_in__OO4F(s__YPYD,string_tmp2__F3I);
           };
-          ((__STRING *)string_tmp2__JAJ)->count__4FC= 0;
-          if (((struct ___OBJ *)s__KSYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__DA4F(s__KSYD,string_tmp2__JAJ);
+          put__to__like__Q0XD(string_tmp2__F3I,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            __tmp__QRYD=((__ITM_SLOT *)s__YPYD)->parent_named__15.parent_itm_object__4.position__RAJ;
           } else {
-            pretty_name_in__YB4F(s__KSYD,string_tmp2__JAJ);
+            __tmp__QRYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
           };
-          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;
+          copy__U4R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__QRYD)) &  511)])->filename__CNG);
+          append__2JS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            __tmp__VRYD=((__ITM_SLOT *)s__YPYD)->parent_named__15.parent_itm_object__4.position__RAJ;
           } else {
-            __tmp__KTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+            __tmp__VRYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
           };
-          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;
+          append_in__2FH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__VRYD) >>  17),string_tmp__VH);
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__Q0XD((&__string_184),output_code__SI,(&__string_148));
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            __tmp__4RYD=((__ITM_SLOT *)s__YPYD)->id_section__F2C;
           } else {
-            __tmp__PTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+            __tmp__4RYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.id_section__F2C;
           };
-          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;
+          append_in__GQ4F(__tmp__4RYD,string_tmp__VH);
+          put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__Q0XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__IR4F(s__YPYD,output_code__SI);
           } else {
-            __tmp__YTYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.id_section__A2C;
+            shorter_profile_in__FS4F(s__YPYD,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);
+          ((__STRING *)string_tmp__VH)->count__EGC= 0;
+          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
+            __tmp__GSYD=((__ITM_SLOT *)s__YPYD)->parent_named__15.name__LI;
           } else {
-            shorter_profile_in__OF4F(s__KSYD,output_code__SI);
+            __tmp__GSYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.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;
+          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__GSYD,string_tmp__VH);
+          shorter_comment__in__light__1G4E(string_tmp__VH,output_code__SI,FALSE__);
+        };
+        Self__VD5D=(__INTEGER)(Self__VD5D +  1);
+      };
+      __tmp__EMTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__PSYD= 0;
+      while ((Self__PSYD <= __tmp__EMTD)) {
+        s__TITD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__PSYD];
+        if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
+          __tmp__MMTD=((__ITM_SLOT *)s__TITD)->stat_shorter__XKTD;
+        } else {
+          __tmp__MMTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+        };
+        if ((__tmp__MMTD ==  1)) {
+          if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
+            __tmp__SMTD=((__ITM_SLOT *)s__TITD)->comment_chapter__5YHC;
           } else {
-            __tmp__AUYD=((__ITM_SLOT_OPERATOR *)s__KSYD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__SMTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.comment_chapter__5YHC;
+          };
+          title__SITD=__tmp__SMTD;
+          t__E5QE=__tmp__SMTD;
+          s__H5QE=NULL;
+          is_first__G5QE=TRUE__;
+          __tmp__L5QE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+          Self__PDSE= 0;
+          while ((Self__PDSE <= __tmp__L5QE)) {
+            s__H5QE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__PDSE];
+            if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+              __tmp__ZMTD=((__ITM_SLOT *)s__H5QE)->comment_chapter__5YHC;
+            } else {
+              __tmp__ZMTD=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.comment_chapter__5YHC;
+            };
+            if (((void *)__tmp__ZMTD == (void *)title__SITD)) {
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                __tmp__Y5QE=((__ITM_SLOT *)s__H5QE)->stat_shorter__XKTD;
+              } else {
+                __tmp__Y5QE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+              };
+              __tmp__15QE=(__tmp__Y5QE ==  1);
+            } else {
+              __tmp__15QE=FALSE__;
+            };
+            if (__tmp__15QE) {
+              if (is_first__G5QE) {
+                if (((void *)t__E5QE == (void *)NULL)) {
+                  put__to__like__Q0XD((&__string_182),output_code__SI,(&__string_146));
+                } else {
+                  put__to__like__Q0XD(t__E5QE,output_code__SI,(&__string_146));
+                };
+                is_first__G5QE=FALSE__;
+              };
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__H5QE)->stat_shorter__XKTD= 2;
+              } else {
+                ((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
+              };
+              ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                pretty_name_in__ZM4F(s__H5QE,string_tmp2__F3I);
+              } else {
+                pretty_name_in__OO4F(s__H5QE,string_tmp2__F3I);
+              };
+              put__to__like__Q0XD(string_tmp2__F3I,output_code__SI,(&__string_147));
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                __tmp__5ARE=((__ITM_SLOT *)s__H5QE)->parent_named__15.parent_itm_object__4.position__RAJ;
+              } else {
+                __tmp__5ARE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+              };
+              copy__U4R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__5ARE)) &  511)])->filename__CNG);
+              append__2JS(string_tmp__VH,(&__string_183));
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                __tmp__EBRE=((__ITM_SLOT *)s__H5QE)->parent_named__15.parent_itm_object__4.position__RAJ;
+              } else {
+                __tmp__EBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+              };
+              append_in__2FH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__EBRE) >>  17),string_tmp__VH);
+              put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_149));
+              put__to__like__Q0XD((&__string_184),output_code__SI,(&__string_148));
+              ((__STRING *)string_tmp__VH)->count__EGC= 0;
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                __tmp__NBRE=((__ITM_SLOT *)s__H5QE)->id_section__F2C;
+              } else {
+                __tmp__NBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.id_section__F2C;
+              };
+              append_in__GQ4F(__tmp__NBRE,string_tmp__VH);
+              put__to__like__Q0XD(string_tmp__VH,output_code__SI,(&__string_120));
+              put__to__like__Q0XD((&__string_185),output_code__SI,(&__string_148));
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                shorter_profile_in__IR4F(s__H5QE,output_code__SI);
+              } else {
+                shorter_profile_in__FS4F(s__H5QE,output_code__SI);
+              };
+              ((__STRING *)string_tmp__VH)->count__EGC= 0;
+              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
+                __tmp__VBRE=((__ITM_SLOT *)s__H5QE)->parent_named__15.name__LI;
+              } else {
+                __tmp__VBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+              };
+              get_all_comment_slot__in__ID4E(Self__QITD,__tmp__VBRE,string_tmp__VH);
+              shorter_comment__in__light__1G4E(string_tmp__VH,output_code__SI,FALSE__);
+            };
+            Self__PDSE=(__INTEGER)(Self__PDSE +  1);
           };
-          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__ZE5D=(__INTEGER)(Self__ZE5D +  1);
+        Self__PSYD=(__INTEGER)(Self__PSYD +  1);
+      };
+      __tmp__ENTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD;
+      Self__4SYD= 0;
+      while ((Self__4SYD <= __tmp__ENTD)) {
+        __tmp__LNTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[Self__4SYD];
+        if (((struct ___OBJ *)__tmp__LNTD)->__id==__ITM_SLOT__) {
+          ((__ITM_SLOT *)__tmp__LNTD)->stat_shorter__XKTD= 0;
+        } else {
+          ((__ITM_SLOT_OPERATOR *)__tmp__LNTD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 0;
+        };
+        Self__4SYD=(__INTEGER)(Self__4SYD +  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);
+      save_file__with__3DC(add_ext__C4E(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
+      Self__KZQC=(__INTEGER)(Self__KZQC +  1);
     };
   };
   return( 0);
 }
 
-static __STRING* create__TBB(__INTEGER needed_capacity__VBB)
+static __STRING* create__ZBB(__INTEGER needed_capacity__1BB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __STRING *result__YSB,*Self__E3R;
+  __POINTER ptr__ZSB,ptr_table__TUKH,next__SUKH,result__UUKH;
+  __POINTER ptr_table__DRH,next__IRH,result__GRH;
+  __INTEGER typ_id__5SB;
+  __UINTEGER_32 sz__2SB,a__TDHH,new_size__UDHH,t__YDHH,a__XDHH;
+  __UINTEGER_32 new_size__CRH,lab_type__ERH;
+  result__YSB=NULL;
+  ptr__ZSB=((__POINTER )(NULL));
+  typ_id__5SB= 0;
+  sz__2SB=((__UINTEGER_32 )sizeof(__STRING));
+  if ((sz__2SB ==  0)) {
+    result__YSB=STRING__;
   } else {
-    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;
+    typ_id__5SB=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2SB);
+    if ((typ_id__5SB == (__INTEGER)(-  1))) {
+      a__TDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__TDHH) & (__UINTEGER_32)(~ a__TDHH));
+      ptr_table__TUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__SUKH=((__POINTER )(NULL));
+      result__UUKH=((__POINTER *)ptr_table__TUKH)[ 0];
+      if ((result__UUKH == (void *)NULL)) {
+        result__UUKH=new_lab__QOJ(new_size__UDHH);
+        next__SUKH=(void *)((unsigned long)result__UUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UDHH)));
+        ((__POINTER *)next__SUKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TUKH)[ 0]=next__SUKH;
       } else {
-        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)));
+        next__SUKH=((__POINTER *)result__UUKH)[ 0];
+        if ((next__SUKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UUKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__UDHH <<  1)) <=  4096)) {
+            next__SUKH=(void *)((unsigned long)result__UUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UDHH)));
           } else {
-            next__NKKH=new_lab__URJ(new_size__BYGH);
+            next__SUKH=new_lab__QOJ(new_size__UDHH);
           };
-          ((__POINTER *)next__NKKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OKKH)[ 0]=next__NKKH;
+          ((__POINTER *)next__SUKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TUKH)[ 0]=next__SUKH;
         } else {
-          ((__POINTER *)result__PKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PKKH=next__NKKH;
+          ((__POINTER *)result__UUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UUKH=next__SUKH;
         };
       };
-      ptr__RSB=result__PKKH;
+      ptr__ZSB=result__UUKH;
     } else {
-      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;
+      t__YDHH=((__UINTEGER_32 )typ_id__5SB);
+      a__XDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CRH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__XDHH) & (__UINTEGER_32)(~ a__XDHH));
+      ptr_table__DRH=((__POINTER )(&(table_type[(t__YDHH)])));
+      lab_type__ERH=(__UINTEGER_32)(t__YDHH |  1);
+      next__IRH=((__POINTER )(NULL));
+      result__GRH=((__POINTER *)ptr_table__DRH)[ 0];
+      if ((result__GRH == (void *)NULL)) {
+        result__GRH=new_lab__QOJ(lab_type__ERH);
+        next__IRH=(void *)((unsigned long)result__GRH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRH)));
+        ((__POINTER *)next__IRH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DRH)[ 0]=next__IRH;
       } else {
-        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)));
+        next__IRH=((__POINTER *)result__GRH)[ 0];
+        if ((next__IRH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GRH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__CRH <<  1)) <=  4096)) {
+            next__IRH=(void *)((unsigned long)result__GRH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CRH)));
           } else {
-            next__CUH=new_lab__URJ(lab_type__4TH);
+            next__IRH=new_lab__QOJ(lab_type__ERH);
           };
-          ((__POINTER *)next__CUH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3TH)[ 0]=next__CUH;
+          ((__POINTER *)next__IRH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DRH)[ 0]=next__IRH;
         } else {
-          ((__POINTER *)result__AUH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CUH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__AUH=next__CUH;
+          ((__POINTER *)result__GRH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IRH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GRH=next__IRH;
         };
       };
-      ptr__RSB=result__AUH;
+      ptr__ZSB=result__GRH;
     };
-    result__QSB=((__STRING *)ptr__RSB);
-    *(result__QSB) = *(STRING__);
+    result__YSB=((__STRING *)ptr__ZSB);
+    *(result__YSB) = *(STRING__);
   };
-  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__E3R=((__STRING *)result__YSB);
+  if ((needed_capacity__1BB >  0)) {
+    if ((Self__E3R->capacity__T3R < needed_capacity__1BB)) {
+      Self__E3R->storage__23R=create__UHEB(needed_capacity__1BB);
+      Self__E3R->capacity__T3R=needed_capacity__1BB;
     };
   };
-  Self__RBS->count__4FC= 0;
-  return(result__QSB);
+  Self__E3R->count__EGC= 0;
+  return(result__YSB);
 }
 
-static __POINTER new_lab__URJ(__UINTEGER_32 t__WRJ)
+static __POINTER new_lab__QOJ(__UINTEGER_32 t__SOJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __UINTEGER_32 idx__UOJ,pv__1OJ;
+  void *blc__XOJ,*prev__YOJ,*prev__BAEH,*next__CAEH;
+  __MEMORY *Self__PAAH,*Self__AAEH;
+  __POINTER result__ZOJ;
+  __BOOLEAN __tmp__1PJ;
+  idx__UOJ= 0;
+  blc__XOJ=NULL;
+  prev__YOJ=NULL;
+  pv__1OJ= 0;
+  while_do__X5J:
   {
-    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));
+    if ((idx__UOJ < nb_page__CPJ)) {
+      blc__XOJ=((void *)(last_block[(idx__UOJ)]));
+      __tmp__1PJ=(((__UINTEGER_32)(((__MEMORY *)blc__XOJ)->map_size_and_id__YTB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__XOJ)->map_size_and_id__YTB &  1) ==  1));
     } else {
-      __tmp__5SJ=FALSE__;
+      __tmp__1PJ=FALSE__;
     };
-    if (__tmp__5SJ) {
-      idx__YRJ=(__UINTEGER_32)(idx__YRJ +  1);
-      goto while_do__FDK;
+    if (__tmp__1PJ) {
+      idx__UOJ=(__UINTEGER_32)(idx__UOJ +  1);
+      goto while_do__X5J;
     };
   };
-  if ((idx__YRJ >= nb_page__GSJ)) {
-    blc__1RJ=new_page__WA5();
+  if ((idx__UOJ >= nb_page__CPJ)) {
+    blc__XOJ=new_page__B24();
   };
-  ((__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;
+  ((__MEMORY *)blc__XOJ)->map_size_and_id__YTB=(__UINTEGER_32)(((__MEMORY *)blc__XOJ)->map_size_and_id__YTB -  4096);
+  Self__PAAH=((__MEMORY *)blc__XOJ);
+  result__ZOJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__PAAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__PAAH->map_size_and_id__YTB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__XOJ)->map_size_and_id__YTB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__AAEH=((__MEMORY *)blc__XOJ);
+    prev__BAEH=Self__AAEH->map_previous_free__0TB;
+    next__CAEH=Self__AAEH->map_next_free__ZTB;
+    if (((void *)prev__BAEH == (void *)NULL)) {
+      first_free__VAVB=next__CAEH;
     } else {
-      ((__MEMORY *)prev__SUDH)->map_next_free__RTB=next__TUDH;
+      ((__MEMORY *)prev__BAEH)->map_next_free__ZTB=next__CAEH;
     };
-    if (((void *)next__TUDH != (void *)NULL)) {
-      ((__MEMORY *)next__TUDH)->map_previous_free__STB=prev__SUDH;
+    if (((void *)next__CAEH != (void *)NULL)) {
+      ((__MEMORY *)next__CAEH)->map_previous_free__0TB=prev__BAEH;
     };
-    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);
+    pv__1OJ=((__MEMORY *)blc__XOJ)->map_previous_linear__XTB;
+    if ((pv__1OJ !=  4294967295LU)) {
+      prev__YOJ=((void *)(void *)((unsigned long)begin_memory__3SH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__1OJ))));
+      ((__MEMORY *)prev__YOJ)->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__YOJ)->map_size_and_id__YTB + ((__MEMORY *)blc__XOJ)->map_size_and_id__YTB) +  8);
+      last_block[(idx__UOJ)] = (prev__YOJ);
     };
   };
-  ((__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 *)))))));
+  ((__POINTER *)result__ZOJ)[ 0]=((__POINTER )t__SOJ);
+  return((void *)((unsigned long)result__ZOJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__BGRB(__INTEGER nb_elements__DGRB)
+static void** create__XCRB(__INTEGER nb_elements__ZCRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__IYDH,a__1SFH,new_size__JYDH,new_size2__KYDH,a__5SFH;
+  __UINTEGER_32 new_size__ATFH;
+  __POINTER result__HYDH,ptr_table__KYIH,next__JYIH,result__LYIH;
+  void *result__OYIH;
+  __INTEGER Self__R4MC;
+  void **Result__5AUB;
+  sz__IYDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZCRB * ((__INTEGER )(sizeof(void *)))));
+  result__HYDH=((__POINTER )(NULL));
+  a__1SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__JYDH=(__UINTEGER_32)((__UINTEGER_32)(sz__IYDH + a__1SFH) & (__UINTEGER_32)(~ a__1SFH));
+  new_size2__KYDH=(__UINTEGER_32)(new_size__JYDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__KYDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__5SFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ATFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__KYDH + a__5SFH) & (__UINTEGER_32)(~ a__5SFH));
+    ptr_table__KYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ATFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JYIH=((__POINTER )(NULL));
+    result__LYIH=((__POINTER *)ptr_table__KYIH)[ 0];
+    if ((result__LYIH == (void *)NULL)) {
+      result__LYIH=new_lab__QOJ(new_size__ATFH);
+      next__JYIH=(void *)((unsigned long)result__LYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATFH)));
+      ((__POINTER *)next__JYIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KYIH)[ 0]=next__JYIH;
+    } else {
+      next__JYIH=((__POINTER *)result__LYIH)[ 0];
+      if ((next__JYIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LYIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ATFH <<  1)) <=  4096)) {
+          next__JYIH=(void *)((unsigned long)result__LYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ATFH)));
+        } else {
+          next__JYIH=new_lab__QOJ(new_size__ATFH);
+        };
+        ((__POINTER *)next__JYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KYIH)[ 0]=next__JYIH;
+      } else {
+        ((__POINTER *)result__LYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LYIH=next__JYIH;
+      };
+    };
+    ((__POINTER *)result__LYIH)[ 0]=((__POINTER ) 3);
+    result__HYDH=(void *)((unsigned long)result__LYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OYIH=first_free__VAVB;
+    while ((((void *)result__OYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__JYDH))) {
+      result__OYIH=((__MEMORY *)result__OYIH)->map_next_free__ZTB;
     };
-    if (((void *)result__5NIH == (void *)NULL)) {
-      result__5NIH=new_page__WA5();
+    if (((void *)result__OYIH == (void *)NULL)) {
+      result__OYIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__OYIH,new_size__JYDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OYIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__HYDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__5AUB=((void **)result__HYDH);
+  Self__R4MC=(__INTEGER)(nb_elements__ZCRB -  1);
+  while ((Self__R4MC >=  0)) {
+    Result__5AUB[Self__R4MC]=NULL;
+    Self__R4MC=(__INTEGER)(Self__R4MC -  1);
   };
-  return(Result__JEUB);
+  return(Result__5AUB);
 }
 
-static void add_last__BMT(__STRING *Self__CMT,__CHARACTER ch__DMT)
+static void add_last__UHT(__STRING *Self__VHT,__CHARACTER ch__WHT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__XHT,old_nb_elts__E3EH,upper__2DHH,Self__0DHH;
+  __CHARACTER *Self__D3EH,*new__G3EH;
+  new_capacity__XHT= 0;
+  if ((Self__VHT->capacity__T3R <= Self__VHT->count__EGC)) {
+    if ((Self__VHT->capacity__T3R ==  0)) {
+      Self__VHT->capacity__T3R= 32;
+      Self__VHT->storage__23R=create__UHEB( 32);
+    } else {
+      new_capacity__XHT=(__INTEGER)(Self__VHT->capacity__T3R <<  1);
+      Self__D3EH=((__CHARACTER *)Self__VHT->storage__23R);
+      old_nb_elts__E3EH=Self__VHT->capacity__T3R;
+      new__G3EH=((__CHARACTER *)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )Self__D3EH),((__UINTEGER_32 )old_nb_elts__E3EH),((__UINTEGER_32 )new_capacity__XHT)));
+      upper__2DHH=(__INTEGER)(new_capacity__XHT -  1);
+      Self__0DHH=old_nb_elts__E3EH;
+      while ((Self__0DHH <= upper__2DHH)) {
+        new__G3EH[Self__0DHH]='\0';
+        Self__0DHH=(__INTEGER)(Self__0DHH +  1);
+      };
+      Self__VHT->storage__23R=new__G3EH;
+      Self__VHT->capacity__T3R=new_capacity__XHT;
+    };
+  };
+  ((__CHARACTER *)Self__VHT->storage__23R)[Self__VHT->count__EGC]=ch__WHT;
+  Self__VHT->count__EGC=(__INTEGER)(Self__VHT->count__EGC +  1);
 }
 
-static void add_last__ISV(__FAST_ARRAYoSTRINGo *Self__JSV,void *element__KSV)
+static void add_last__TNV(__FAST_ARRAYoSTRINGo *Self__UNV,void *element__VNV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__WNV,__tmp__0OV,__tmp__EGEC,Self__AMVD;
+  __BOOLEAN __tmp__EOV;
+  void **__tmp__ZOV,**new__QFEC;
+  new_capacity__WNV= 0;
+  if (((__INTEGER)(Self__UNV->parent_arrayed_collection__RKC.upper__UKC +  1) <= (__INTEGER)(Self__UNV->parent_arrayed_collection__RKC.capacity__HCT -  1))) {
+    Self__UNV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__UNV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    __tmp__EOV=TRUE__;
   } else {
-    __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;
+    __tmp__EOV=FALSE__;
+  };
+  if ((! __tmp__EOV)) {
+    if ((Self__UNV->parent_arrayed_collection__RKC.capacity__HCT ==  0)) {
+      Self__UNV->parent_arrayed_collection__RKC.storage__SCT=create__XCRB( 2);
+      Self__UNV->parent_arrayed_collection__RKC.capacity__HCT= 2;
+      Self__UNV->parent_arrayed_collection__RKC.upper__UKC= 0;
+    } else {
+      new_capacity__WNV=(__INTEGER)(Self__UNV->parent_arrayed_collection__RKC.capacity__HCT <<  1);
+      __tmp__ZOV=Self__UNV->parent_arrayed_collection__RKC.storage__SCT;
+      __tmp__0OV=Self__UNV->parent_arrayed_collection__RKC.capacity__HCT;
+      new__QFEC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__ZOV)),((__UINTEGER_32 )(__INTEGER)(__tmp__0OV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__WNV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__EGEC=(__INTEGER)(new_capacity__WNV -  1);
+      Self__AMVD=__tmp__0OV;
+      while ((Self__AMVD <= __tmp__EGEC)) {
+        new__QFEC[Self__AMVD]=NULL;
+        Self__AMVD=(__INTEGER)(Self__AMVD +  1);
+      };
+      Self__UNV->parent_arrayed_collection__RKC.storage__SCT=new__QFEC;
+      Self__UNV->parent_arrayed_collection__RKC.capacity__HCT=new_capacity__WNV;
+      Self__UNV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__UNV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    };
+  };
+  ((void **)Self__UNV->parent_arrayed_collection__RKC.storage__SCT)[Self__UNV->parent_arrayed_collection__RKC.upper__UKC]=element__VNV;
 }
 
-static __INTEGER prime_number_ceiling__541(__INTEGER integer__B51)
+static __INTEGER prime_number_ceiling__K01(__INTEGER integer__M01)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER result__O01;
+  __BOOLEAN __tmp__W01,__tmp__D11,result__PMCB,__tmp__Q11,result__BNCB;
+  __BOOLEAN __tmp__311,result__TNCB,__tmp__K21,result__FOCB,__tmp__X21;
+  __BOOLEAN result__XOCB,__tmp__E31,result__JPCB,__tmp__R31;
+  __BOOLEAN result__1PCB,__tmp__431,result__NQCB,__tmp__L41;
+  __BOOLEAN result__5QCB,__tmp__Y41,result__RRCB,__tmp__F51;
+  __BOOLEAN result__DSCB,__tmp__S51,result__VSCB,__tmp__551;
+  __BOOLEAN result__HTCB,__tmp__MA2,result__ZTCB,__tmp__ZA2;
+  __BOOLEAN result__LUCB,__tmp__GB2,result__3UCB,__tmp__TB2;
+  __BOOLEAN result__PVCB,__tmp__AC2,result__BWCB,__tmp__NC2;
+  __BOOLEAN result__TWCB,__tmp__0C2,result__FXCB,__tmp__HD2;
+  __BOOLEAN result__XXCB,__tmp__UD2,result__JYCB,__tmp__BE2;
+  __BOOLEAN result__1YCB,__tmp__OE2,result__NZCB,__tmp__1E2;
+  __BOOLEAN result__5ZCB;
+  result__O01= 0;
+  if ((integer__M01 <=  11)) {
+    result__O01= 11;
+    __tmp__W01=TRUE__;
   } else {
-    __tmp__L51=FALSE__;
+    __tmp__W01=FALSE__;
   };
-  if (__tmp__L51) {
-    __tmp__Y51=TRUE__;
+  if (__tmp__W01) {
+    __tmp__D11=TRUE__;
   } else {
-    result__ERCB=(integer__B51 <=  23);
-    if (result__ERCB) {
-      result__D51= 23;
+    result__PMCB=(integer__M01 <=  23);
+    if (result__PMCB) {
+      result__O01= 23;
     };
-    __tmp__Y51=result__ERCB;
+    __tmp__D11=result__PMCB;
   };
-  if (__tmp__Y51) {
-    __tmp__FA2=TRUE__;
+  if (__tmp__D11) {
+    __tmp__Q11=TRUE__;
   } else {
-    result__WRCB=(integer__B51 <=  53);
-    if (result__WRCB) {
-      result__D51= 53;
+    result__BNCB=(integer__M01 <=  53);
+    if (result__BNCB) {
+      result__O01= 53;
     };
-    __tmp__FA2=result__WRCB;
+    __tmp__Q11=result__BNCB;
   };
-  if (__tmp__FA2) {
-    __tmp__SA2=TRUE__;
+  if (__tmp__Q11) {
+    __tmp__311=TRUE__;
   } else {
-    result__ISCB=(integer__B51 <=  97);
-    if (result__ISCB) {
-      result__D51= 97;
+    result__TNCB=(integer__M01 <=  97);
+    if (result__TNCB) {
+      result__O01= 97;
     };
-    __tmp__SA2=result__ISCB;
+    __tmp__311=result__TNCB;
   };
-  if (__tmp__SA2) {
-    __tmp__5A2=TRUE__;
+  if (__tmp__311) {
+    __tmp__K21=TRUE__;
   } else {
-    result__0SCB=(integer__B51 <=  193);
-    if (result__0SCB) {
-      result__D51= 193;
+    result__FOCB=(integer__M01 <=  193);
+    if (result__FOCB) {
+      result__O01= 193;
     };
-    __tmp__5A2=result__0SCB;
+    __tmp__K21=result__FOCB;
   };
-  if (__tmp__5A2) {
-    __tmp__MB2=TRUE__;
+  if (__tmp__K21) {
+    __tmp__X21=TRUE__;
   } else {
-    result__MTCB=(integer__B51 <=  389);
-    if (result__MTCB) {
-      result__D51= 389;
+    result__XOCB=(integer__M01 <=  389);
+    if (result__XOCB) {
+      result__O01= 389;
     };
-    __tmp__MB2=result__MTCB;
+    __tmp__X21=result__XOCB;
   };
-  if (__tmp__MB2) {
-    __tmp__ZB2=TRUE__;
+  if (__tmp__X21) {
+    __tmp__E31=TRUE__;
   } else {
-    result__4TCB=(integer__B51 <=  769);
-    if (result__4TCB) {
-      result__D51= 769;
+    result__JPCB=(integer__M01 <=  769);
+    if (result__JPCB) {
+      result__O01= 769;
     };
-    __tmp__ZB2=result__4TCB;
+    __tmp__E31=result__JPCB;
   };
-  if (__tmp__ZB2) {
-    __tmp__GC2=TRUE__;
+  if (__tmp__E31) {
+    __tmp__R31=TRUE__;
   } else {
-    result__QUCB=(integer__B51 <=  1543);
-    if (result__QUCB) {
-      result__D51= 1543;
+    result__1PCB=(integer__M01 <=  1543);
+    if (result__1PCB) {
+      result__O01= 1543;
     };
-    __tmp__GC2=result__QUCB;
+    __tmp__R31=result__1PCB;
   };
-  if (__tmp__GC2) {
-    __tmp__TC2=TRUE__;
+  if (__tmp__R31) {
+    __tmp__431=TRUE__;
   } else {
-    result__CVCB=(integer__B51 <=  3079);
-    if (result__CVCB) {
-      result__D51= 3079;
+    result__NQCB=(integer__M01 <=  3079);
+    if (result__NQCB) {
+      result__O01= 3079;
     };
-    __tmp__TC2=result__CVCB;
+    __tmp__431=result__NQCB;
   };
-  if (__tmp__TC2) {
-    __tmp__AD2=TRUE__;
+  if (__tmp__431) {
+    __tmp__L41=TRUE__;
   } else {
-    result__UVCB=(integer__B51 <=  6151);
-    if (result__UVCB) {
-      result__D51= 6151;
+    result__5QCB=(integer__M01 <=  6151);
+    if (result__5QCB) {
+      result__O01= 6151;
     };
-    __tmp__AD2=result__UVCB;
+    __tmp__L41=result__5QCB;
   };
-  if (__tmp__AD2) {
-    __tmp__ND2=TRUE__;
+  if (__tmp__L41) {
+    __tmp__Y41=TRUE__;
   } else {
-    result__GWCB=(integer__B51 <=  12289);
-    if (result__GWCB) {
-      result__D51= 12289;
+    result__RRCB=(integer__M01 <=  12289);
+    if (result__RRCB) {
+      result__O01= 12289;
     };
-    __tmp__ND2=result__GWCB;
+    __tmp__Y41=result__RRCB;
   };
-  if (__tmp__ND2) {
-    __tmp__0D2=TRUE__;
+  if (__tmp__Y41) {
+    __tmp__F51=TRUE__;
   } else {
-    result__YWCB=(integer__B51 <=  24593);
-    if (result__YWCB) {
-      result__D51= 24593;
+    result__DSCB=(integer__M01 <=  24593);
+    if (result__DSCB) {
+      result__O01= 24593;
     };
-    __tmp__0D2=result__YWCB;
+    __tmp__F51=result__DSCB;
   };
-  if (__tmp__0D2) {
-    __tmp__HE2=TRUE__;
+  if (__tmp__F51) {
+    __tmp__S51=TRUE__;
   } else {
-    result__KXCB=(integer__B51 <=  49157);
-    if (result__KXCB) {
-      result__D51= 49157;
+    result__VSCB=(integer__M01 <=  49157);
+    if (result__VSCB) {
+      result__O01= 49157;
     };
-    __tmp__HE2=result__KXCB;
+    __tmp__S51=result__VSCB;
   };
-  if (__tmp__HE2) {
-    __tmp__UE2=TRUE__;
+  if (__tmp__S51) {
+    __tmp__551=TRUE__;
   } else {
-    result__2XCB=(integer__B51 <=  98317);
-    if (result__2XCB) {
-      result__D51= 98317;
+    result__HTCB=(integer__M01 <=  98317);
+    if (result__HTCB) {
+      result__O01= 98317;
     };
-    __tmp__UE2=result__2XCB;
+    __tmp__551=result__HTCB;
   };
-  if (__tmp__UE2) {
-    __tmp__BF2=TRUE__;
+  if (__tmp__551) {
+    __tmp__MA2=TRUE__;
   } else {
-    result__OYCB=(integer__B51 <=  196613);
-    if (result__OYCB) {
-      result__D51= 196613;
+    result__ZTCB=(integer__M01 <=  196613);
+    if (result__ZTCB) {
+      result__O01= 196613;
     };
-    __tmp__BF2=result__OYCB;
+    __tmp__MA2=result__ZTCB;
   };
-  if (__tmp__BF2) {
-    __tmp__OF2=TRUE__;
+  if (__tmp__MA2) {
+    __tmp__ZA2=TRUE__;
   } else {
-    result__AZCB=(integer__B51 <=  393241);
-    if (result__AZCB) {
-      result__D51= 393241;
+    result__LUCB=(integer__M01 <=  393241);
+    if (result__LUCB) {
+      result__O01= 393241;
     };
-    __tmp__OF2=result__AZCB;
+    __tmp__ZA2=result__LUCB;
   };
-  if (__tmp__OF2) {
-    __tmp__1F2=TRUE__;
+  if (__tmp__ZA2) {
+    __tmp__GB2=TRUE__;
   } else {
-    result__SZCB=(integer__B51 <=  786433);
-    if (result__SZCB) {
-      result__D51= 786433;
+    result__3UCB=(integer__M01 <=  786433);
+    if (result__3UCB) {
+      result__O01= 786433;
     };
-    __tmp__1F2=result__SZCB;
+    __tmp__GB2=result__3UCB;
   };
-  if (__tmp__1F2) {
-    __tmp__IG2=TRUE__;
+  if (__tmp__GB2) {
+    __tmp__TB2=TRUE__;
   } else {
-    result__E0CB=(integer__B51 <=  1572869);
-    if (result__E0CB) {
-      result__D51= 1572869;
+    result__PVCB=(integer__M01 <=  1572869);
+    if (result__PVCB) {
+      result__O01= 1572869;
     };
-    __tmp__IG2=result__E0CB;
+    __tmp__TB2=result__PVCB;
   };
-  if (__tmp__IG2) {
-    __tmp__VG2=TRUE__;
+  if (__tmp__TB2) {
+    __tmp__AC2=TRUE__;
   } else {
-    result__W0CB=(integer__B51 <=  3145739);
-    if (result__W0CB) {
-      result__D51= 3145739;
+    result__BWCB=(integer__M01 <=  3145739);
+    if (result__BWCB) {
+      result__O01= 3145739;
     };
-    __tmp__VG2=result__W0CB;
+    __tmp__AC2=result__BWCB;
   };
-  if (__tmp__VG2) {
-    __tmp__CH2=TRUE__;
+  if (__tmp__AC2) {
+    __tmp__NC2=TRUE__;
   } else {
-    result__I1CB=(integer__B51 <=  6291469);
-    if (result__I1CB) {
-      result__D51= 6291469;
+    result__TWCB=(integer__M01 <=  6291469);
+    if (result__TWCB) {
+      result__O01= 6291469;
     };
-    __tmp__CH2=result__I1CB;
+    __tmp__NC2=result__TWCB;
   };
-  if (__tmp__CH2) {
-    __tmp__PH2=TRUE__;
+  if (__tmp__NC2) {
+    __tmp__0C2=TRUE__;
   } else {
-    result__01CB=(integer__B51 <=  12582917);
-    if (result__01CB) {
-      result__D51= 12582917;
+    result__FXCB=(integer__M01 <=  12582917);
+    if (result__FXCB) {
+      result__O01= 12582917;
     };
-    __tmp__PH2=result__01CB;
+    __tmp__0C2=result__FXCB;
   };
-  if (__tmp__PH2) {
-    __tmp__2H2=TRUE__;
+  if (__tmp__0C2) {
+    __tmp__HD2=TRUE__;
   } else {
-    result__M2CB=(integer__B51 <=  25165843);
-    if (result__M2CB) {
-      result__D51= 25165843;
+    result__XXCB=(integer__M01 <=  25165843);
+    if (result__XXCB) {
+      result__O01= 25165843;
     };
-    __tmp__2H2=result__M2CB;
+    __tmp__HD2=result__XXCB;
   };
-  if (__tmp__2H2) {
-    __tmp__JI2=TRUE__;
+  if (__tmp__HD2) {
+    __tmp__UD2=TRUE__;
   } else {
-    result__42CB=(integer__B51 <=  50331653);
-    if (result__42CB) {
-      result__D51= 50331653;
+    result__JYCB=(integer__M01 <=  50331653);
+    if (result__JYCB) {
+      result__O01= 50331653;
     };
-    __tmp__JI2=result__42CB;
+    __tmp__UD2=result__JYCB;
   };
-  if (__tmp__JI2) {
-    __tmp__WI2=TRUE__;
+  if (__tmp__UD2) {
+    __tmp__BE2=TRUE__;
   } else {
-    result__Q3CB=(integer__B51 <=  100663319);
-    if (result__Q3CB) {
-      result__D51= 100663319;
+    result__1YCB=(integer__M01 <=  100663319);
+    if (result__1YCB) {
+      result__O01= 100663319;
     };
-    __tmp__WI2=result__Q3CB;
+    __tmp__BE2=result__1YCB;
   };
-  if (__tmp__WI2) {
-    __tmp__DJ2=TRUE__;
+  if (__tmp__BE2) {
+    __tmp__OE2=TRUE__;
   } else {
-    result__C4CB=(integer__B51 <=  201326611);
-    if (result__C4CB) {
-      result__D51= 201326611;
+    result__NZCB=(integer__M01 <=  201326611);
+    if (result__NZCB) {
+      result__O01= 201326611;
     };
-    __tmp__DJ2=result__C4CB;
+    __tmp__OE2=result__NZCB;
   };
-  if (__tmp__DJ2) {
-    __tmp__QJ2=TRUE__;
+  if (__tmp__OE2) {
+    __tmp__1E2=TRUE__;
   } else {
-    result__U4CB=(integer__B51 <=  402653189);
-    if (result__U4CB) {
-      result__D51= 402653189;
+    result__5ZCB=(integer__M01 <=  402653189);
+    if (result__5ZCB) {
+      result__O01= 402653189;
     };
-    __tmp__QJ2=result__U4CB;
+    __tmp__1E2=result__5ZCB;
   };
-  if ((! __tmp__QJ2)) {
-    if ((integer__B51 <=  805306457)) {
-      result__D51= 805306457;
+  if ((! __tmp__1E2)) {
+    if ((integer__M01 <=  805306457)) {
+      result__O01= 805306457;
     } else {
-      result__D51= 1610612741;
+      result__O01= 1610612741;
     };
   };
-  return(result__D51);
+  return(result__O01);
 }
 
-static void** create__5B4(__INTEGER nb_elements__BC4)
+static void** create__K33(__INTEGER nb_elements__M33)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__S3EH,a__X3EH,new_size__T3EH,new_size2__U3EH,a__13EH;
+  __UINTEGER_32 new_size__23EH;
+  __POINTER result__R3EH,ptr_table__LHIH,next__KHIH,result__MHIH;
+  void *result__XUKH;
+  __INTEGER Self__PZJC;
+  void **Result__BVEB;
+  sz__S3EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__M33 * ((__INTEGER )(sizeof(void *)))));
+  result__R3EH=((__POINTER )(NULL));
+  a__X3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__T3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__S3EH + a__X3EH) & (__UINTEGER_32)(~ a__X3EH));
+  new_size2__U3EH=(__UINTEGER_32)(new_size__T3EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__U3EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__13EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__23EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__U3EH + a__13EH) & (__UINTEGER_32)(~ a__13EH));
+    ptr_table__LHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__23EH / ((__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__QOJ(new_size__23EH);
+      next__KHIH=(void *)((unsigned long)result__MHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23EH)));
+      ((__POINTER *)next__KHIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LHIH)[ 0]=next__KHIH;
+    } else {
+      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__23EH <<  1)) <=  4096)) {
+          next__KHIH=(void *)((unsigned long)result__MHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__23EH)));
+        } else {
+          next__KHIH=new_lab__QOJ(new_size__23EH);
+        };
+        ((__POINTER *)next__KHIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LHIH)[ 0]=next__KHIH;
+      } else {
+        ((__POINTER *)result__MHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MHIH=next__KHIH;
+      };
+    };
+    ((__POINTER *)result__MHIH)[ 0]=((__POINTER ) 3);
+    result__R3EH=(void *)((unsigned long)result__MHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__XUKH=first_free__VAVB;
+    while ((((void *)result__XUKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XUKH)->map_size_and_id__YTB &  4294967292LU) < new_size__T3EH))) {
+      result__XUKH=((__MEMORY *)result__XUKH)->map_next_free__ZTB;
     };
-    if (((void *)result__SKKH == (void *)NULL)) {
-      result__SKKH=new_page__WA5();
+    if (((void *)result__XUKH == (void *)NULL)) {
+      result__XUKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__XUKH,new_size__T3EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XUKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__R3EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XUKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__BVEB=((void **)result__R3EH);
+  Self__PZJC=(__INTEGER)(nb_elements__M33 -  1);
+  while ((Self__PZJC >=  0)) {
+    Result__BVEB[Self__PZJC]=NULL;
+    Self__PZJC=(__INTEGER)(Self__PZJC -  1);
   };
-  return(Result__WZEB);
+  return(Result__BVEB);
 }
 
-static void** create__PITC(__INTEGER nb_elements__RITC)
+static void** create__0GTC(__INTEGER nb_elements__2GTC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__43EH,a__D4EH,new_size__53EH,new_size2__A4EH,a__H4EH;
+  __UINTEGER_32 new_size__I4EH;
+  __POINTER result__33EH,ptr_table__QHIH,next__PHIH,result__RHIH;
+  void *result__0UKH;
+  __INTEGER Self__1QWD;
+  void **Result__FD3C;
+  sz__43EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__2GTC * ((__INTEGER )(sizeof(void *)))));
+  result__33EH=((__POINTER )(NULL));
+  a__D4EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__53EH=(__UINTEGER_32)((__UINTEGER_32)(sz__43EH + a__D4EH) & (__UINTEGER_32)(~ a__D4EH));
+  new_size2__A4EH=(__UINTEGER_32)(new_size__53EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__A4EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__H4EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__I4EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A4EH + a__H4EH) & (__UINTEGER_32)(~ a__H4EH));
+    ptr_table__QHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I4EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PHIH=((__POINTER )(NULL));
+    result__RHIH=((__POINTER *)ptr_table__QHIH)[ 0];
+    if ((result__RHIH == (void *)NULL)) {
+      result__RHIH=new_lab__QOJ(new_size__I4EH);
+      next__PHIH=(void *)((unsigned long)result__RHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I4EH)));
+      ((__POINTER *)next__PHIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QHIH)[ 0]=next__PHIH;
+    } else {
+      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__I4EH <<  1)) <=  4096)) {
+          next__PHIH=(void *)((unsigned long)result__RHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I4EH)));
+        } else {
+          next__PHIH=new_lab__QOJ(new_size__I4EH);
+        };
+        ((__POINTER *)next__PHIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QHIH)[ 0]=next__PHIH;
+      } else {
+        ((__POINTER *)result__RHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RHIH=next__PHIH;
+      };
+    };
+    ((__POINTER *)result__RHIH)[ 0]=((__POINTER ) 3);
+    result__33EH=(void *)((unsigned long)result__RHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__0UKH=first_free__VAVB;
+    while ((((void *)result__0UKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0UKH)->map_size_and_id__YTB &  4294967292LU) < new_size__53EH))) {
+      result__0UKH=((__MEMORY *)result__0UKH)->map_next_free__ZTB;
     };
-    if (((void *)result__VKKH == (void *)NULL)) {
-      result__VKKH=new_page__WA5();
+    if (((void *)result__0UKH == (void *)NULL)) {
+      result__0UKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__0UKH,new_size__53EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0UKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__33EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0UKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__FD3C=((void **)result__33EH);
+  Self__1QWD=(__INTEGER)(nb_elements__2GTC -  1);
+  while ((Self__1QWD >=  0)) {
+    Result__FD3C[Self__1QWD]=NULL;
+    Self__1QWD=(__INTEGER)(Self__1QWD -  1);
   };
-  return(Result__1D3C);
+  return(Result__FD3C);
 }
 
-static void** create__OFSB(__INTEGER nb_elements__QFSB)
+static void** create__ECSB(__INTEGER nb_elements__GCSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__K4EH,a__P4EH,new_size__L4EH,new_size2__M4EH,a__T4EH;
+  __UINTEGER_32 new_size__U4EH;
+  __POINTER result__J4EH,ptr_table__VHIH,next__UHIH,result__WHIH;
+  void *result__3UKH;
+  __INTEGER Self__XFNC;
+  void **Result__3GVB;
+  sz__K4EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GCSB * ((__INTEGER )(sizeof(void *)))));
+  result__J4EH=((__POINTER )(NULL));
+  a__P4EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__L4EH=(__UINTEGER_32)((__UINTEGER_32)(sz__K4EH + a__P4EH) & (__UINTEGER_32)(~ a__P4EH));
+  new_size2__M4EH=(__UINTEGER_32)(new_size__L4EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__M4EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__T4EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__U4EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__M4EH + a__T4EH) & (__UINTEGER_32)(~ a__T4EH));
+    ptr_table__VHIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__U4EH / ((__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__QOJ(new_size__U4EH);
+      next__UHIH=(void *)((unsigned long)result__WHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U4EH)));
+      ((__POINTER *)next__UHIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__VHIH)[ 0]=next__UHIH;
+    } else {
+      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__U4EH <<  1)) <=  4096)) {
+          next__UHIH=(void *)((unsigned long)result__WHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__U4EH)));
+        } else {
+          next__UHIH=new_lab__QOJ(new_size__U4EH);
+        };
+        ((__POINTER *)next__UHIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VHIH)[ 0]=next__UHIH;
+      } else {
+        ((__POINTER *)result__WHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__WHIH=next__UHIH;
+      };
+    };
+    ((__POINTER *)result__WHIH)[ 0]=((__POINTER ) 3);
+    result__J4EH=(void *)((unsigned long)result__WHIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__3UKH=first_free__VAVB;
+    while ((((void *)result__3UKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3UKH)->map_size_and_id__YTB &  4294967292LU) < new_size__L4EH))) {
+      result__3UKH=((__MEMORY *)result__3UKH)->map_next_free__ZTB;
     };
-    if (((void *)result__YKKH == (void *)NULL)) {
-      result__YKKH=new_page__WA5();
+    if (((void *)result__3UKH == (void *)NULL)) {
+      result__3UKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__3UKH,new_size__L4EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3UKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__J4EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3UKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__3GVB=((void **)result__J4EH);
+  Self__XFNC=(__INTEGER)(nb_elements__GCSB -  1);
+  while ((Self__XFNC >=  0)) {
+    Result__3GVB[Self__XFNC]=NULL;
+    Self__XFNC=(__INTEGER)(Self__XFNC -  1);
   };
-  return(Result__HKVB);
+  return(Result__3GVB);
 }
 
-static void** create__JG4(__INTEGER nb_elements__LG4)
+static void** create__UB4(__INTEGER nb_elements__WB4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__W4EH,a__14EH,new_size__X4EH,new_size2__Y4EH,a__54EH;
+  __UINTEGER_32 new_size__A5EH;
+  __POINTER result__V4EH,ptr_table__0HIH,next__ZHIH,result__1HIH;
+  void *result__AVKH;
+  __INTEGER Self__W0JC;
+  void **Result__C1EB;
+  sz__W4EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WB4 * ((__INTEGER )(sizeof(void *)))));
+  result__V4EH=((__POINTER )(NULL));
+  a__14EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__X4EH=(__UINTEGER_32)((__UINTEGER_32)(sz__W4EH + a__14EH) & (__UINTEGER_32)(~ a__14EH));
+  new_size2__Y4EH=(__UINTEGER_32)(new_size__X4EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__Y4EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__54EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__A5EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Y4EH + a__54EH) & (__UINTEGER_32)(~ a__54EH));
+    ptr_table__0HIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A5EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZHIH=((__POINTER )(NULL));
+    result__1HIH=((__POINTER *)ptr_table__0HIH)[ 0];
+    if ((result__1HIH == (void *)NULL)) {
+      result__1HIH=new_lab__QOJ(new_size__A5EH);
+      next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5EH)));
+      ((__POINTER *)next__ZHIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
+    } else {
+      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__A5EH <<  1)) <=  4096)) {
+          next__ZHIH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5EH)));
+        } else {
+          next__ZHIH=new_lab__QOJ(new_size__A5EH);
+        };
+        ((__POINTER *)next__ZHIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
+      } else {
+        ((__POINTER *)result__1HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1HIH=next__ZHIH;
+      };
+    };
+    ((__POINTER *)result__1HIH)[ 0]=((__POINTER ) 3);
+    result__V4EH=(void *)((unsigned long)result__1HIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__AVKH=first_free__VAVB;
+    while ((((void *)result__AVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__AVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__X4EH))) {
+      result__AVKH=((__MEMORY *)result__AVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__1KKH == (void *)NULL)) {
-      result__1KKH=new_page__WA5();
+    if (((void *)result__AVKH == (void *)NULL)) {
+      result__AVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__AVKH,new_size__X4EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__AVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__V4EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__AVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__C1EB=((void **)result__V4EH);
+  Self__W0JC=(__INTEGER)(nb_elements__WB4 -  1);
+  while ((Self__W0JC >=  0)) {
+    Result__C1EB[Self__W0JC]=NULL;
+    Self__W0JC=(__INTEGER)(Self__W0JC -  1);
   };
-  return(Result__X5EB);
+  return(Result__C1EB);
 }
 
-static void** create__UZ2(__INTEGER nb_elements__WZ2)
+static void** create__5U2(__INTEGER nb_elements__BV2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__C5EH,a__H5EH,new_size__D5EH,new_size2__E5EH,a__L5EH;
+  __UINTEGER_32 new_size__M5EH;
+  __POINTER result__B5EH,ptr_table__5HIH,next__4HIH,result__AIIH;
+  void *result__DVKH;
+  __INTEGER Self__YSJC;
+  void **Result__WMDB;
+  sz__C5EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BV2 * ((__INTEGER )(sizeof(void *)))));
+  result__B5EH=((__POINTER )(NULL));
+  a__H5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__D5EH=(__UINTEGER_32)((__UINTEGER_32)(sz__C5EH + a__H5EH) & (__UINTEGER_32)(~ a__H5EH));
+  new_size2__E5EH=(__UINTEGER_32)(new_size__D5EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__E5EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__L5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__M5EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__E5EH + a__L5EH) & (__UINTEGER_32)(~ a__L5EH));
+    ptr_table__5HIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M5EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__4HIH=((__POINTER )(NULL));
+    result__AIIH=((__POINTER *)ptr_table__5HIH)[ 0];
+    if ((result__AIIH == (void *)NULL)) {
+      result__AIIH=new_lab__QOJ(new_size__M5EH);
+      next__4HIH=(void *)((unsigned long)result__AIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5EH)));
+      ((__POINTER *)next__4HIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__5HIH)[ 0]=next__4HIH;
+    } else {
+      next__4HIH=((__POINTER *)result__AIIH)[ 0];
+      if ((next__4HIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AIIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__M5EH <<  1)) <=  4096)) {
+          next__4HIH=(void *)((unsigned long)result__AIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M5EH)));
+        } else {
+          next__4HIH=new_lab__QOJ(new_size__M5EH);
+        };
+        ((__POINTER *)next__4HIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5HIH)[ 0]=next__4HIH;
+      } else {
+        ((__POINTER *)result__AIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4HIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__AIIH=next__4HIH;
+      };
+    };
+    ((__POINTER *)result__AIIH)[ 0]=((__POINTER ) 3);
+    result__B5EH=(void *)((unsigned long)result__AIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__DVKH=first_free__VAVB;
+    while ((((void *)result__DVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__D5EH))) {
+      result__DVKH=((__MEMORY *)result__DVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__4KKH == (void *)NULL)) {
-      result__4KKH=new_page__WA5();
+    if (((void *)result__DVKH == (void *)NULL)) {
+      result__DVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__DVKH,new_size__D5EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__B5EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WMDB=((void **)result__B5EH);
+  Self__YSJC=(__INTEGER)(nb_elements__BV2 -  1);
+  while ((Self__YSJC >=  0)) {
+    Result__WMDB[Self__YSJC]=NULL;
+    Self__YSJC=(__INTEGER)(Self__YSJC -  1);
   };
-  return(Result__LRDB);
+  return(Result__WMDB);
 }
 
-static void** create__UJRB(__INTEGER nb_elements__WJRB)
+static void** create__KGRB(__INTEGER nb_elements__MGRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__O5EH,a__T5EH,new_size__P5EH,new_size2__Q5EH,a__X5EH;
+  __UINTEGER_32 new_size__Y5EH;
+  __POINTER result__N5EH,ptr_table__EIIH,next__DIIH,result__FIIH;
+  void *result__GVKH;
+  __INTEGER Self__Y5MC;
+  void **Result__UFUB;
+  sz__O5EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MGRB * ((__INTEGER )(sizeof(void *)))));
+  result__N5EH=((__POINTER )(NULL));
+  a__T5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__P5EH=(__UINTEGER_32)((__UINTEGER_32)(sz__O5EH + a__T5EH) & (__UINTEGER_32)(~ a__T5EH));
+  new_size2__Q5EH=(__UINTEGER_32)(new_size__P5EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__Q5EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__X5EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__Y5EH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Q5EH + a__X5EH) & (__UINTEGER_32)(~ a__X5EH));
+    ptr_table__EIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y5EH / ((__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__QOJ(new_size__Y5EH);
+      next__DIIH=(void *)((unsigned long)result__FIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y5EH)));
+      ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Y5EH <<  1)) <=  4096)) {
+          next__DIIH=(void *)((unsigned long)result__FIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y5EH)));
+        } else {
+          next__DIIH=new_lab__QOJ(new_size__Y5EH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__FIIH)[ 0]=((__POINTER ) 3);
+    result__N5EH=(void *)((unsigned long)result__FIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GVKH=first_free__VAVB;
+    while ((((void *)result__GVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__P5EH))) {
+      result__GVKH=((__MEMORY *)result__GVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__BLKH == (void *)NULL)) {
-      result__BLKH=new_page__WA5();
+    if (((void *)result__GVKH == (void *)NULL)) {
+      result__GVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__GVKH,new_size__P5EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__N5EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__UFUB=((void **)result__N5EH);
+  Self__Y5MC=(__INTEGER)(nb_elements__MGRB -  1);
+  while ((Self__Y5MC >=  0)) {
+    Result__UFUB[Self__Y5MC]=NULL;
+    Self__Y5MC=(__INTEGER)(Self__Y5MC -  1);
   };
-  return(Result__4IUB);
+  return(Result__UFUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__QFR(__INTEGER new_count__SFR)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__DBR(__INTEGER new_count__FBR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__BHR,ptr_table__JIIH,next__IIIH,result__KIIH;
+  __POINTER ptr_table__OIIH,next__NIIH,result__PIIH;
+  __INTEGER typ_id__GHR;
+  __UINTEGER_32 sz__DHR,a__15EH,new_size__25EH,t__AAFH,a__55EH;
+  __UINTEGER_32 new_size__RIIH,lab_type__QIIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__AHR,*Self__SFW;
+  result__AHR=NULL;
+  ptr__BHR=((__POINTER )(NULL));
+  typ_id__GHR= 0;
+  sz__DHR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__DHR ==  0)) {
+    result__AHR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    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);
+    typ_id__GHR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DHR);
+    if ((typ_id__GHR == (__INTEGER)(-  1))) {
+      a__15EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__25EH=(__UINTEGER_32)((__UINTEGER_32)(sz__DHR + a__15EH) & (__UINTEGER_32)(~ a__15EH));
+      ptr_table__JIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__25EH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__IIIH=((__POINTER )(NULL));
+      result__KIIH=((__POINTER *)ptr_table__JIIH)[ 0];
+      if ((result__KIIH == (void *)NULL)) {
+        result__KIIH=new_lab__QOJ(new_size__25EH);
+        next__IIIH=(void *)((unsigned long)result__KIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__25EH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__25EH <<  1)) <=  4096)) {
+            next__IIIH=(void *)((unsigned long)result__KIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__25EH)));
+          } else {
+            next__IIIH=new_lab__QOJ(new_size__25EH);
+          };
+          ((__POINTER *)next__IIIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JIIH)[ 0]=next__IIIH;
+        } else {
+          ((__POINTER *)result__KIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KIIH=next__IIIH;
+        };
+      };
+      ptr__BHR=result__KIIH;
+    } else {
+      t__AAFH=((__UINTEGER_32 )typ_id__GHR);
+      a__55EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DHR + a__55EH) & (__UINTEGER_32)(~ a__55EH));
+      ptr_table__OIIH=((__POINTER )(&(table_type[(t__AAFH)])));
+      lab_type__QIIH=(__UINTEGER_32)(t__AAFH |  1);
+      next__NIIH=((__POINTER )(NULL));
+      result__PIIH=((__POINTER *)ptr_table__OIIH)[ 0];
+      if ((result__PIIH == (void *)NULL)) {
+        result__PIIH=new_lab__QOJ(lab_type__QIIH);
+        next__NIIH=(void *)((unsigned long)result__PIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RIIH)));
+        ((__POINTER *)next__NIIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OIIH)[ 0]=next__NIIH;
+      } else {
+        next__NIIH=((__POINTER *)result__PIIH)[ 0];
+        if ((next__NIIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PIIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RIIH <<  1)) <=  4096)) {
+            next__NIIH=(void *)((unsigned long)result__PIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RIIH)));
+          } else {
+            next__NIIH=new_lab__QOJ(lab_type__QIIH);
+          };
+          ((__POINTER *)next__NIIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OIIH)[ 0]=next__NIIH;
+        } else {
+          ((__POINTER *)result__PIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PIIH=next__NIIH;
+        };
+      };
+      ptr__BHR=result__PIIH;
+    };
+    result__AHR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__BHR);
+    *(result__AHR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__SFW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__AHR);
+  if ((Self__SFW->parent_arrayed_collection__EYC.capacity__SJV < new_count__FBR)) {
+    Self__SFW->parent_arrayed_collection__EYC.storage__EIV=create__R4QB(new_count__FBR);
+    Self__SFW->parent_arrayed_collection__EYC.capacity__SJV=new_count__FBR;
+  };
+  Self__SFW->parent_arrayed_collection__EYC.upper__3DV=(__INTEGER)(-  1);
+  return(result__AHR);
 }
 
-static void** create__D0BB(__INTEGER nb_elements__F0BB)
+static void** create__OVBB(__INTEGER nb_elements__QVBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__CAFH,a__HAFH,new_size__DAFH,new_size2__EAFH,a__LAFH;
+  __UINTEGER_32 new_size__MAFH;
+  __POINTER result__BAFH,ptr_table__TIIH,next__SIIH,result__UIIH;
+  void *result__JVKH;
+  __INTEGER Self__KKKC;
+  void **Result__1TIB;
+  sz__CAFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QVBB * ((__INTEGER )(sizeof(void *)))));
+  result__BAFH=((__POINTER )(NULL));
+  a__HAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__DAFH=(__UINTEGER_32)((__UINTEGER_32)(sz__CAFH + a__HAFH) & (__UINTEGER_32)(~ a__HAFH));
+  new_size2__EAFH=(__UINTEGER_32)(new_size__DAFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__EAFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MAFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EAFH + a__LAFH) & (__UINTEGER_32)(~ a__LAFH));
+    ptr_table__TIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MAFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SIIH=((__POINTER )(NULL));
+    result__UIIH=((__POINTER *)ptr_table__TIIH)[ 0];
+    if ((result__UIIH == (void *)NULL)) {
+      result__UIIH=new_lab__QOJ(new_size__MAFH);
+      next__SIIH=(void *)((unsigned long)result__UIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAFH)));
+      ((__POINTER *)next__SIIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TIIH)[ 0]=next__SIIH;
+    } else {
+      next__SIIH=((__POINTER *)result__UIIH)[ 0];
+      if ((next__SIIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UIIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MAFH <<  1)) <=  4096)) {
+          next__SIIH=(void *)((unsigned long)result__UIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MAFH)));
+        } else {
+          next__SIIH=new_lab__QOJ(new_size__MAFH);
+        };
+        ((__POINTER *)next__SIIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TIIH)[ 0]=next__SIIH;
+      } else {
+        ((__POINTER *)result__UIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UIIH=next__SIIH;
+      };
+    };
+    ((__POINTER *)result__UIIH)[ 0]=((__POINTER ) 3);
+    result__BAFH=(void *)((unsigned long)result__UIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__JVKH=first_free__VAVB;
+    while ((((void *)result__JVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__DAFH))) {
+      result__JVKH=((__MEMORY *)result__JVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__ELKH == (void *)NULL)) {
-      result__ELKH=new_page__WA5();
+    if (((void *)result__JVKH == (void *)NULL)) {
+      result__JVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__JVKH,new_size__DAFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__BAFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__1TIB=((void **)result__BAFH);
+  Self__KKKC=(__INTEGER)(nb_elements__QVBB -  1);
+  while ((Self__KKKC >=  0)) {
+    Result__1TIB[Self__KKKC]=NULL;
+    Self__KKKC=(__INTEGER)(Self__KKKC -  1);
   };
-  return(Result__PYIB);
+  return(Result__1TIB);
 }
 
-static void** create__3LXB(__INTEGER nb_elements__5LXB)
+static void** create__KIXB(__INTEGER nb_elements__MIXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__OAFH,a__TAFH,new_size__PAFH,new_size2__QAFH,a__XAFH;
+  __UINTEGER_32 new_size__YAFH;
+  __POINTER result__NAFH,ptr_table__YIIH,next__XIIH,result__ZIIH;
+  void *result__MVKH;
+  __INTEGER Self__XXOC;
+  void **Result__3T0B;
+  sz__OAFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__MIXB * ((__INTEGER )(sizeof(void *)))));
+  result__NAFH=((__POINTER )(NULL));
+  a__TAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__PAFH=(__UINTEGER_32)((__UINTEGER_32)(sz__OAFH + a__TAFH) & (__UINTEGER_32)(~ a__TAFH));
+  new_size2__QAFH=(__UINTEGER_32)(new_size__PAFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__QAFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__XAFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__YAFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__QAFH + a__XAFH) & (__UINTEGER_32)(~ a__XAFH));
+    ptr_table__YIIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YAFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XIIH=((__POINTER )(NULL));
+    result__ZIIH=((__POINTER *)ptr_table__YIIH)[ 0];
+    if ((result__ZIIH == (void *)NULL)) {
+      result__ZIIH=new_lab__QOJ(new_size__YAFH);
+      next__XIIH=(void *)((unsigned long)result__ZIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAFH)));
+      ((__POINTER *)next__XIIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YIIH)[ 0]=next__XIIH;
+    } else {
+      next__XIIH=((__POINTER *)result__ZIIH)[ 0];
+      if ((next__XIIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZIIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YAFH <<  1)) <=  4096)) {
+          next__XIIH=(void *)((unsigned long)result__ZIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YAFH)));
+        } else {
+          next__XIIH=new_lab__QOJ(new_size__YAFH);
+        };
+        ((__POINTER *)next__XIIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YIIH)[ 0]=next__XIIH;
+      } else {
+        ((__POINTER *)result__ZIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZIIH=next__XIIH;
+      };
+    };
+    ((__POINTER *)result__ZIIH)[ 0]=((__POINTER ) 3);
+    result__NAFH=(void *)((unsigned long)result__ZIIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__MVKH=first_free__VAVB;
+    while ((((void *)result__MVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__PAFH))) {
+      result__MVKH=((__MEMORY *)result__MVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__HLKH == (void *)NULL)) {
-      result__HLKH=new_page__WA5();
+    if (((void *)result__MVKH == (void *)NULL)) {
+      result__MVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__MVKH,new_size__PAFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__NAFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__3T0B=((void **)result__NAFH);
+  Self__XXOC=(__INTEGER)(nb_elements__MIXB -  1);
+  while ((Self__XXOC >=  0)) {
+    Result__3T0B[Self__XXOC]=NULL;
+    Self__XXOC=(__INTEGER)(Self__XXOC -  1);
   };
-  return(Result__QX0B);
+  return(Result__3T0B);
 }
 
-static void** create__YUWB(__INTEGER nb_elements__0UWB)
+static void** create__FRWB(__INTEGER nb_elements__HRWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__0AFH,a__5AFH,new_size__1AFH,new_size2__2AFH,a__DBFH;
+  __UINTEGER_32 new_size__EBFH;
+  __POINTER result__ZAFH,ptr_table__3IIH,next__2IIH,result__4IIH;
+  void *result__PVKH;
+  __INTEGER Self__QWOC;
+  void **Result__GG0B;
+  sz__0AFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HRWB * ((__INTEGER )(sizeof(void *)))));
+  result__ZAFH=((__POINTER )(NULL));
+  a__5AFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__1AFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0AFH + a__5AFH) & (__UINTEGER_32)(~ a__5AFH));
+  new_size2__2AFH=(__UINTEGER_32)(new_size__1AFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__2AFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EBFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2AFH + a__DBFH) & (__UINTEGER_32)(~ a__DBFH));
+    ptr_table__3IIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__2IIH=((__POINTER )(NULL));
+    result__4IIH=((__POINTER *)ptr_table__3IIH)[ 0];
+    if ((result__4IIH == (void *)NULL)) {
+      result__4IIH=new_lab__QOJ(new_size__EBFH);
+      next__2IIH=(void *)((unsigned long)result__4IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EBFH)));
+      ((__POINTER *)next__2IIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__3IIH)[ 0]=next__2IIH;
+    } else {
+      next__2IIH=((__POINTER *)result__4IIH)[ 0];
+      if ((next__2IIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4IIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EBFH <<  1)) <=  4096)) {
+          next__2IIH=(void *)((unsigned long)result__4IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EBFH)));
+        } else {
+          next__2IIH=new_lab__QOJ(new_size__EBFH);
+        };
+        ((__POINTER *)next__2IIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3IIH)[ 0]=next__2IIH;
+      } else {
+        ((__POINTER *)result__4IIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__4IIH=next__2IIH;
+      };
+    };
+    ((__POINTER *)result__4IIH)[ 0]=((__POINTER ) 3);
+    result__ZAFH=(void *)((unsigned long)result__4IIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__PVKH=first_free__VAVB;
+    while ((((void *)result__PVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__1AFH))) {
+      result__PVKH=((__MEMORY *)result__PVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__KLKH == (void *)NULL)) {
-      result__KLKH=new_page__WA5();
+    if (((void *)result__PVKH == (void *)NULL)) {
+      result__PVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__PVKH,new_size__1AFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__ZAFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__GG0B=((void **)result__ZAFH);
+  Self__QWOC=(__INTEGER)(nb_elements__HRWB -  1);
+  while ((Self__QWOC >=  0)) {
+    Result__GG0B[Self__QWOC]=NULL;
+    Self__QWOC=(__INTEGER)(Self__QWOC -  1);
   };
-  return(Result__ZJ0B);
+  return(Result__GG0B);
 }
 
-static void** create__XSXB(__INTEGER nb_elements__ZSXB)
+static void** create__EPXB(__INTEGER nb_elements__GPXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__GBFH,a__LBFH,new_size__HBFH,new_size2__IBFH,a__PBFH;
+  __UINTEGER_32 new_size__QBFH;
+  __POINTER result__FBFH,ptr_table__CJIH,next__BJIH,result__DJIH;
+  void *result__SVKH;
+  __INTEGER Self__4YOC;
+  void **Result__T10B;
+  sz__GBFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GPXB * ((__INTEGER )(sizeof(void *)))));
+  result__FBFH=((__POINTER )(NULL));
+  a__LBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GBFH + a__LBFH) & (__UINTEGER_32)(~ a__LBFH));
+  new_size2__IBFH=(__UINTEGER_32)(new_size__HBFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__IBFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QBFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IBFH + a__PBFH) & (__UINTEGER_32)(~ a__PBFH));
+    ptr_table__CJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QBFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BJIH=((__POINTER )(NULL));
+    result__DJIH=((__POINTER *)ptr_table__CJIH)[ 0];
+    if ((result__DJIH == (void *)NULL)) {
+      result__DJIH=new_lab__QOJ(new_size__QBFH);
+      next__BJIH=(void *)((unsigned long)result__DJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBFH)));
+      ((__POINTER *)next__BJIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CJIH)[ 0]=next__BJIH;
+    } else {
+      next__BJIH=((__POINTER *)result__DJIH)[ 0];
+      if ((next__BJIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DJIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QBFH <<  1)) <=  4096)) {
+          next__BJIH=(void *)((unsigned long)result__DJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBFH)));
+        } else {
+          next__BJIH=new_lab__QOJ(new_size__QBFH);
+        };
+        ((__POINTER *)next__BJIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CJIH)[ 0]=next__BJIH;
+      } else {
+        ((__POINTER *)result__DJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DJIH=next__BJIH;
+      };
+    };
+    ((__POINTER *)result__DJIH)[ 0]=((__POINTER ) 3);
+    result__FBFH=(void *)((unsigned long)result__DJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__SVKH=first_free__VAVB;
+    while ((((void *)result__SVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__HBFH))) {
+      result__SVKH=((__MEMORY *)result__SVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__NLKH == (void *)NULL)) {
-      result__NLKH=new_page__WA5();
+    if (((void *)result__SVKH == (void *)NULL)) {
+      result__SVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__SVKH,new_size__HBFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__FBFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__T10B=((void **)result__FBFH);
+  Self__4YOC=(__INTEGER)(nb_elements__GPXB -  1);
+  while ((Self__4YOC >=  0)) {
+    Result__T10B[Self__4YOC]=NULL;
+    Self__4YOC=(__INTEGER)(Self__4YOC -  1);
   };
-  return(Result__G50B);
+  return(Result__T10B);
 }
 
-static void** create__3H5(__INTEGER nb_elements__5H5)
+static void** create__ID5(__INTEGER nb_elements__KD5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__SBFH,a__XBFH,new_size__TBFH,new_size2__UBFH,a__1BFH;
+  __UINTEGER_32 new_size__2BFH;
+  __POINTER result__RBFH,ptr_table__HJIH,next__GJIH,result__IJIH;
+  void *result__VVKH;
+  __INTEGER Self__T4JC;
+  void **Result__C3FB;
+  sz__SBFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KD5 * ((__INTEGER )(sizeof(void *)))));
+  result__RBFH=((__POINTER )(NULL));
+  a__XBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__TBFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SBFH + a__XBFH) & (__UINTEGER_32)(~ a__XBFH));
+  new_size2__UBFH=(__UINTEGER_32)(new_size__TBFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__UBFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__1BFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__2BFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UBFH + a__1BFH) & (__UINTEGER_32)(~ a__1BFH));
+    ptr_table__HJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2BFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__GJIH=((__POINTER )(NULL));
+    result__IJIH=((__POINTER *)ptr_table__HJIH)[ 0];
+    if ((result__IJIH == (void *)NULL)) {
+      result__IJIH=new_lab__QOJ(new_size__2BFH);
+      next__GJIH=(void *)((unsigned long)result__IJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2BFH)));
+      ((__POINTER *)next__GJIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__HJIH)[ 0]=next__GJIH;
+    } else {
+      next__GJIH=((__POINTER *)result__IJIH)[ 0];
+      if ((next__GJIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IJIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2BFH <<  1)) <=  4096)) {
+          next__GJIH=(void *)((unsigned long)result__IJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2BFH)));
+        } else {
+          next__GJIH=new_lab__QOJ(new_size__2BFH);
+        };
+        ((__POINTER *)next__GJIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HJIH)[ 0]=next__GJIH;
+      } else {
+        ((__POINTER *)result__IJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__IJIH=next__GJIH;
+      };
+    };
+    ((__POINTER *)result__IJIH)[ 0]=((__POINTER ) 3);
+    result__RBFH=(void *)((unsigned long)result__IJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__VVKH=first_free__VAVB;
+    while ((((void *)result__VVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__TBFH))) {
+      result__VVKH=((__MEMORY *)result__VVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__QLKH == (void *)NULL)) {
-      result__QLKH=new_page__WA5();
+    if (((void *)result__VVKH == (void *)NULL)) {
+      result__VVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__VVKH,new_size__TBFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__RBFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__C3FB=((void **)result__RBFH);
+  Self__T4JC=(__INTEGER)(nb_elements__KD5 -  1);
+  while ((Self__T4JC >=  0)) {
+    Result__C3FB[Self__T4JC]=NULL;
+    Self__T4JC=(__INTEGER)(Self__T4JC -  1);
   };
-  return(Result__WBGB);
+  return(Result__C3FB);
 }
 
-static void fast_put__to__1OZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__2OZ,void *v__3OZ,void *k__4OZ)
+static void fast_put__to__GKZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__HKZ,void *v__IKZ,void *k__JKZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__QTHH,*Self__VTHH;
+  __INTEGER result__PTHH,__tmp__RTHH,Self__STHH,idx__RKZ,idx__P5SB;
+  __INTEGER new_capacity__Q5SB,i__R5SB,result__UTHH,__tmp__WTHH;
+  __INTEGER Self__XTHH,typ_id__4BTB;
+  __POINTER ptr__ZBTB,ptr_table__MJIH,next__LJIH,result__NJIH;
+  __POINTER ptr_table__RJIH,next__QJIH,result__SJIH;
+  __UINTEGER_32 sz__1BTB,a__2VFH,new_size__3VFH,t__BWFH,a__AWFH;
+  __UINTEGER_32 new_size__UJIH,lab_type__TJIH;
+  void *node__SKZ,*node1__T5SB,*node2__U5SB,*__tmp__5LZ;
+  void **old_buckets__S5SB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__YBTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__DVEC;
+  Self__QTHH=((__STRING_CONSTANT *)k__JKZ);
+  result__PTHH= 0;
+  __tmp__RTHH=Self__QTHH->count__DD;
+  Self__STHH= 1;
+  while ((Self__STHH <= __tmp__RTHH)) {
+    result__PTHH=(__INTEGER)((__INTEGER)( 5 * result__PTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__QTHH->storage__QMO)[(__INTEGER)(Self__STHH -  1)])));
+    Self__STHH=(__INTEGER)(Self__STHH +  1);
+  };
+  if ((result__PTHH <  0)) {
+    result__PTHH=(__INTEGER)(~ result__PTHH);
+  };
+  idx__RKZ=(__INTEGER)(result__PTHH % Self__HKZ->capacity__CYT);
+  node__SKZ=((void **)Self__HKZ->buckets__HYT)[idx__RKZ];
+  while ((! (((void *)node__SKZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__SKZ)->key__TYT == (void *)k__JKZ)))) {
+    node__SKZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__SKZ)->next__4YT;
+  };
+  if (((void *)node__SKZ == (void *)NULL)) {
+    if ((Self__HKZ->capacity__CYT == Self__HKZ->count__5AZ)) {
+      idx__P5SB= 0;
+      node1__T5SB=NULL;
+      node2__U5SB=NULL;
+      old_buckets__S5SB=Self__HKZ->buckets__HYT;
+      new_capacity__Q5SB=prime_number_ceiling__K01((__INTEGER)(Self__HKZ->capacity__CYT +  1));
+      Self__HKZ->buckets__HYT=create__ID5(new_capacity__Q5SB);
+      i__R5SB=(__INTEGER)(Self__HKZ->capacity__CYT -  1);
+      Self__HKZ->capacity__CYT=new_capacity__Q5SB;
+      while ((i__R5SB >=  0)) {
+        node1__T5SB=((void **)old_buckets__S5SB)[i__R5SB];
+        while (((void *)node1__T5SB != (void *)NULL)) {
+          node2__U5SB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__T5SB)->next__4YT;
+          Self__VTHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__T5SB)->key__TYT);
+          result__UTHH= 0;
+          __tmp__WTHH=Self__VTHH->count__DD;
+          Self__XTHH= 1;
+          while ((Self__XTHH <= __tmp__WTHH)) {
+            result__UTHH=(__INTEGER)((__INTEGER)( 5 * result__UTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VTHH->storage__QMO)[(__INTEGER)(Self__XTHH -  1)])));
+            Self__XTHH=(__INTEGER)(Self__XTHH +  1);
+          };
+          if ((result__UTHH <  0)) {
+            result__UTHH=(__INTEGER)(~ result__UTHH);
+          };
+          idx__P5SB=(__INTEGER)(result__UTHH % Self__HKZ->capacity__CYT);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__T5SB)->next__4YT=((void **)Self__HKZ->buckets__HYT)[idx__P5SB];
+          ((void **)Self__HKZ->buckets__HYT)[idx__P5SB]=node1__T5SB;
+          node1__T5SB=node2__U5SB;
+        };
+        i__R5SB=(__INTEGER)(i__R5SB -  1);
+      };
+      idx__RKZ=(__INTEGER)(result__PTHH % new_capacity__Q5SB);
+    };
+    __tmp__5LZ=((void **)Self__HKZ->buckets__HYT)[idx__RKZ];
+    result__YBTB=NULL;
+    ptr__ZBTB=((__POINTER )(NULL));
+    typ_id__4BTB= 0;
+    sz__1BTB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__1BTB ==  0)) {
+      result__YBTB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__4BTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1BTB);
+      if ((typ_id__4BTB == (__INTEGER)(-  1))) {
+        a__2VFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3VFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1BTB + a__2VFH) & (__UINTEGER_32)(~ a__2VFH));
+        ptr_table__MJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3VFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__LJIH=((__POINTER )(NULL));
+        result__NJIH=((__POINTER *)ptr_table__MJIH)[ 0];
+        if ((result__NJIH == (void *)NULL)) {
+          result__NJIH=new_lab__QOJ(new_size__3VFH);
+          next__LJIH=(void *)((unsigned long)result__NJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VFH)));
+          ((__POINTER *)next__LJIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MJIH)[ 0]=next__LJIH;
+        } else {
+          next__LJIH=((__POINTER *)result__NJIH)[ 0];
+          if ((next__LJIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NJIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3VFH <<  1)) <=  4096)) {
+              next__LJIH=(void *)((unsigned long)result__NJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VFH)));
             } else {
-              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)));
+              next__LJIH=new_lab__QOJ(new_size__3VFH);
+            };
+            ((__POINTER *)next__LJIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MJIH)[ 0]=next__LJIH;
+          } else {
+            ((__POINTER *)result__NJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NJIH=next__LJIH;
+          };
+        };
+        ptr__ZBTB=result__NJIH;
+      } else {
+        t__BWFH=((__UINTEGER_32 )typ_id__4BTB);
+        a__AWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UJIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1BTB + a__AWFH) & (__UINTEGER_32)(~ a__AWFH));
+        ptr_table__RJIH=((__POINTER )(&(table_type[(t__BWFH)])));
+        lab_type__TJIH=(__UINTEGER_32)(t__BWFH |  1);
+        next__QJIH=((__POINTER )(NULL));
+        result__SJIH=((__POINTER *)ptr_table__RJIH)[ 0];
+        if ((result__SJIH == (void *)NULL)) {
+          result__SJIH=new_lab__QOJ(lab_type__TJIH);
+          next__QJIH=(void *)((unsigned long)result__SJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJIH)));
+          ((__POINTER *)next__QJIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RJIH)[ 0]=next__QJIH;
+        } else {
+          next__QJIH=((__POINTER *)result__SJIH)[ 0];
+          if ((next__QJIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SJIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__UJIH <<  1)) <=  4096)) {
+              next__QJIH=(void *)((unsigned long)result__SJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJIH)));
             } else {
-              next__O4HH=new_lab__URJ(lab_type__R4HH);
+              next__QJIH=new_lab__QOJ(lab_type__TJIH);
             };
-            ((__POINTER *)next__O4HH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__P4HH)[ 0]=next__O4HH;
+            ((__POINTER *)next__QJIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RJIH)[ 0]=next__QJIH;
           } else {
-            ((__POINTER *)result__Q4HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O4HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__Q4HH=next__O4HH;
+            ((__POINTER *)result__SJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SJIH=next__QJIH;
           };
         };
-        ptr__DFTB=result__Q4HH;
+        ptr__ZBTB=result__SJIH;
       };
-      result__CFTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__DFTB);
-      *(result__CFTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__YBTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__ZBTB);
+      *(result__YBTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    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);
+    Self__DVEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__YBTB);
+    Self__DVEC->item__GZT=v__IKZ;
+    Self__DVEC->key__TYT=k__JKZ;
+    Self__DVEC->next__4YT=__tmp__5LZ;
+    node__SKZ=result__YBTB;
+    ((void **)Self__HKZ->buckets__HYT)[idx__RKZ]=result__YBTB;
+    Self__HKZ->count__5AZ=(__INTEGER)(Self__HKZ->count__5AZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__HPZ)->item__T3T=v__3OZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__SKZ)->item__GZT=v__IKZ;
   };
 }
 
-static void** create__DIYB(__INTEGER nb_elements__FIYB)
+static void** create__QEYB(__INTEGER nb_elements__SEYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__GCFH,a__LCFH,new_size__HCFH,new_size2__ICFH,a__PCFH;
+  __UINTEGER_32 new_size__QCFH;
+  __POINTER result__FCFH,ptr_table__WJIH,next__VJIH,result__XJIH;
+  void *result__YVKH;
+  __INTEGER Self__F0OC;
+  void **Result__RF1B;
+  sz__GCFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SEYB * ((__INTEGER )(sizeof(void *)))));
+  result__FCFH=((__POINTER )(NULL));
+  a__LCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GCFH + a__LCFH) & (__UINTEGER_32)(~ a__LCFH));
+  new_size2__ICFH=(__UINTEGER_32)(new_size__HCFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ICFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QCFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ICFH + a__PCFH) & (__UINTEGER_32)(~ a__PCFH));
+    ptr_table__WJIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__VJIH=((__POINTER )(NULL));
+    result__XJIH=((__POINTER *)ptr_table__WJIH)[ 0];
+    if ((result__XJIH == (void *)NULL)) {
+      result__XJIH=new_lab__QOJ(new_size__QCFH);
+      next__VJIH=(void *)((unsigned long)result__XJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QCFH)));
+      ((__POINTER *)next__VJIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__WJIH)[ 0]=next__VJIH;
+    } else {
+      next__VJIH=((__POINTER *)result__XJIH)[ 0];
+      if ((next__VJIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XJIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QCFH <<  1)) <=  4096)) {
+          next__VJIH=(void *)((unsigned long)result__XJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QCFH)));
+        } else {
+          next__VJIH=new_lab__QOJ(new_size__QCFH);
+        };
+        ((__POINTER *)next__VJIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WJIH)[ 0]=next__VJIH;
+      } else {
+        ((__POINTER *)result__XJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__XJIH=next__VJIH;
+      };
+    };
+    ((__POINTER *)result__XJIH)[ 0]=((__POINTER ) 3);
+    result__FCFH=(void *)((unsigned long)result__XJIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__YVKH=first_free__VAVB;
+    while ((((void *)result__YVKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YVKH)->map_size_and_id__YTB &  4294967292LU) < new_size__HCFH))) {
+      result__YVKH=((__MEMORY *)result__YVKH)->map_next_free__ZTB;
     };
-    if (((void *)result__TLKH == (void *)NULL)) {
-      result__TLKH=new_page__WA5();
+    if (((void *)result__YVKH == (void *)NULL)) {
+      result__YVKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__YVKH,new_size__HCFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YVKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__FCFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YVKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__RF1B=((void **)result__FCFH);
+  Self__F0OC=(__INTEGER)(nb_elements__SEYB -  1);
+  while ((Self__F0OC >=  0)) {
+    Result__RF1B[Self__F0OC]=NULL;
+    Self__F0OC=(__INTEGER)(Self__F0OC -  1);
   };
-  return(Result__EJ1B);
+  return(Result__RF1B);
 }
 
-static void* get__LTI(void *n__NTI)
+static void* get__HQI(void *n__JQI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__RQI;
+  __ITM_TYPE_SIMPLE *result__1IL,*Self__FNU;
+  __POINTER ptr__2IL,ptr_table__1JIH,next__0JIH,result__2JIH;
+  __POINTER ptr_table__AKIH,next__5JIH,result__BKIH;
+  __INTEGER typ_id__BJL;
+  __UINTEGER_32 sz__4IL,a__TCFH,new_size__UCFH,t__YCFH,a__XCFH;
+  __UINTEGER_32 new_size__DKIH,lab_type__CKIH;
+  result__RQI=fast_reference_at__TXT(dico__WQI,n__JQI);
+  if (((void *)result__RQI == (void *)NULL)) {
+    result__1IL=NULL;
+    ptr__2IL=((__POINTER )(NULL));
+    typ_id__BJL= 0;
+    sz__4IL=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__4IL ==  0)) {
+      result__1IL=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__BJL=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4IL);
+      if ((typ_id__BJL == (__INTEGER)(-  1))) {
+        a__TCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4IL + a__TCFH) & (__UINTEGER_32)(~ a__TCFH));
+        ptr_table__1JIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__0JIH=((__POINTER )(NULL));
+        result__2JIH=((__POINTER *)ptr_table__1JIH)[ 0];
+        if ((result__2JIH == (void *)NULL)) {
+          result__2JIH=new_lab__QOJ(new_size__UCFH);
+          next__0JIH=(void *)((unsigned long)result__2JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCFH)));
+          ((__POINTER *)next__0JIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1JIH)[ 0]=next__0JIH;
+        } else {
+          next__0JIH=((__POINTER *)result__2JIH)[ 0];
+          if ((next__0JIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2JIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__UCFH <<  1)) <=  4096)) {
+              next__0JIH=(void *)((unsigned long)result__2JIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UCFH)));
             } else {
-              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)));
+              next__0JIH=new_lab__QOJ(new_size__UCFH);
+            };
+            ((__POINTER *)next__0JIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1JIH)[ 0]=next__0JIH;
+          } else {
+            ((__POINTER *)result__2JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2JIH=next__0JIH;
+          };
+        };
+        ptr__2IL=result__2JIH;
+      } else {
+        t__YCFH=((__UINTEGER_32 )typ_id__BJL);
+        a__XCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DKIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4IL + a__XCFH) & (__UINTEGER_32)(~ a__XCFH));
+        ptr_table__AKIH=((__POINTER )(&(table_type[(t__YCFH)])));
+        lab_type__CKIH=(__UINTEGER_32)(t__YCFH |  1);
+        next__5JIH=((__POINTER )(NULL));
+        result__BKIH=((__POINTER *)ptr_table__AKIH)[ 0];
+        if ((result__BKIH == (void *)NULL)) {
+          result__BKIH=new_lab__QOJ(lab_type__CKIH);
+          next__5JIH=(void *)((unsigned long)result__BKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DKIH)));
+          ((__POINTER *)next__5JIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AKIH)[ 0]=next__5JIH;
+        } else {
+          next__5JIH=((__POINTER *)result__BKIH)[ 0];
+          if ((next__5JIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BKIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DKIH <<  1)) <=  4096)) {
+              next__5JIH=(void *)((unsigned long)result__BKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DKIH)));
             } else {
-              next__34HH=new_lab__URJ(lab_type__A5HH);
+              next__5JIH=new_lab__QOJ(lab_type__CKIH);
             };
-            ((__POINTER *)next__34HH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__44HH)[ 0]=next__34HH;
+            ((__POINTER *)next__5JIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AKIH)[ 0]=next__5JIH;
           } else {
-            ((__POINTER *)result__54HH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34HH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__54HH=next__34HH;
+            ((__POINTER *)result__BKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BKIH=next__5JIH;
           };
         };
-        ptr__UML=result__54HH;
+        ptr__2IL=result__BKIH;
       };
-      result__TML=((__ITM_TYPE_SIMPLE *)ptr__UML);
-      *(result__TML) = *(ITM_TYPE_SIMPLE__);
+      result__1IL=((__ITM_TYPE_SIMPLE *)ptr__2IL);
+      *(result__1IL) = *(ITM_TYPE_SIMPLE__);
     };
-    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;
+    Self__FNU=((__ITM_TYPE_SIMPLE *)result__1IL);
+    Self__FNU->name__FUP=n__JQI;
+    fast_put__to__GKZ(dico__WQI,Self__FNU,n__JQI);
+    result__RQI=result__1IL;
   };
-  return(result__VTI);
+  return(result__RQI);
 }
 
-static void** create__MHQB(__INTEGER nb_elements__OHQB)
+static void** create__CEQB(__INTEGER nb_elements__EEQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__0CFH,a__5CFH,new_size__1CFH,new_size2__2CFH,a__DDFH;
+  __UINTEGER_32 new_size__EDFH;
+  __POINTER result__ZCFH,ptr_table__FKIH,next__EKIH,result__GKIH;
+  void *result__1VKH;
+  __INTEGER Self__KVMC;
+  void **Result__P3SB;
+  sz__0CFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__EEQB * ((__INTEGER )(sizeof(void *)))));
+  result__ZCFH=((__POINTER )(NULL));
+  a__5CFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__1CFH=(__UINTEGER_32)((__UINTEGER_32)(sz__0CFH + a__5CFH) & (__UINTEGER_32)(~ a__5CFH));
+  new_size2__2CFH=(__UINTEGER_32)(new_size__1CFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__2CFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EDFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__2CFH + a__DDFH) & (__UINTEGER_32)(~ a__DDFH));
+    ptr_table__FKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EKIH=((__POINTER )(NULL));
+    result__GKIH=((__POINTER *)ptr_table__FKIH)[ 0];
+    if ((result__GKIH == (void *)NULL)) {
+      result__GKIH=new_lab__QOJ(new_size__EDFH);
+      next__EKIH=(void *)((unsigned long)result__GKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EDFH)));
+      ((__POINTER *)next__EKIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FKIH)[ 0]=next__EKIH;
+    } else {
+      next__EKIH=((__POINTER *)result__GKIH)[ 0];
+      if ((next__EKIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GKIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EDFH <<  1)) <=  4096)) {
+          next__EKIH=(void *)((unsigned long)result__GKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EDFH)));
+        } else {
+          next__EKIH=new_lab__QOJ(new_size__EDFH);
+        };
+        ((__POINTER *)next__EKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FKIH)[ 0]=next__EKIH;
+      } else {
+        ((__POINTER *)result__GKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GKIH=next__EKIH;
+      };
+    };
+    ((__POINTER *)result__GKIH)[ 0]=((__POINTER ) 3);
+    result__ZCFH=(void *)((unsigned long)result__GKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__1VKH=first_free__VAVB;
+    while ((((void *)result__1VKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1VKH)->map_size_and_id__YTB &  4294967292LU) < new_size__1CFH))) {
+      result__1VKH=((__MEMORY *)result__1VKH)->map_next_free__ZTB;
     };
-    if (((void *)result__WLKH == (void *)NULL)) {
-      result__WLKH=new_page__WA5();
+    if (((void *)result__1VKH == (void *)NULL)) {
+      result__1VKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__1VKH,new_size__1CFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1VKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__ZCFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1VKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__P3SB=((void **)result__ZCFH);
+  Self__KVMC=(__INTEGER)(nb_elements__EEQB -  1);
+  while ((Self__KVMC >=  0)) {
+    Result__P3SB[Self__KVMC]=NULL;
+    Self__KVMC=(__INTEGER)(Self__KVMC -  1);
   };
-  return(Result__ZATB);
+  return(Result__P3SB);
 }
 
-static void** create__21PB(__INTEGER nb_elements__41PB)
+static void** create__SYPB(__INTEGER nb_elements__UYPB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__GDFH,a__LDFH,new_size__HDFH,new_size2__IDFH,a__PDFH;
+  __UINTEGER_32 new_size__QDFH;
+  __POINTER result__FDFH,ptr_table__KKIH,next__JKIH,result__LKIH;
+  void *result__4VKH;
+  __INTEGER Self__DUMC;
+  void **Result__EVSB;
+  sz__GDFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__UYPB * ((__INTEGER )(sizeof(void *)))));
+  result__FDFH=((__POINTER )(NULL));
+  a__LDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GDFH + a__LDFH) & (__UINTEGER_32)(~ a__LDFH));
+  new_size2__IDFH=(__UINTEGER_32)(new_size__HDFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__IDFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QDFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IDFH + a__PDFH) & (__UINTEGER_32)(~ a__PDFH));
+    ptr_table__KKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JKIH=((__POINTER )(NULL));
+    result__LKIH=((__POINTER *)ptr_table__KKIH)[ 0];
+    if ((result__LKIH == (void *)NULL)) {
+      result__LKIH=new_lab__QOJ(new_size__QDFH);
+      next__JKIH=(void *)((unsigned long)result__LKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDFH)));
+      ((__POINTER *)next__JKIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KKIH)[ 0]=next__JKIH;
+    } else {
+      next__JKIH=((__POINTER *)result__LKIH)[ 0];
+      if ((next__JKIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LKIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QDFH <<  1)) <=  4096)) {
+          next__JKIH=(void *)((unsigned long)result__LKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QDFH)));
+        } else {
+          next__JKIH=new_lab__QOJ(new_size__QDFH);
+        };
+        ((__POINTER *)next__JKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KKIH)[ 0]=next__JKIH;
+      } else {
+        ((__POINTER *)result__LKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LKIH=next__JKIH;
+      };
+    };
+    ((__POINTER *)result__LKIH)[ 0]=((__POINTER ) 3);
+    result__FDFH=(void *)((unsigned long)result__LKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__4VKH=first_free__VAVB;
+    while ((((void *)result__4VKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4VKH)->map_size_and_id__YTB &  4294967292LU) < new_size__HDFH))) {
+      result__4VKH=((__MEMORY *)result__4VKH)->map_next_free__ZTB;
     };
-    if (((void *)result__ZLKH == (void *)NULL)) {
-      result__ZLKH=new_page__WA5();
+    if (((void *)result__4VKH == (void *)NULL)) {
+      result__4VKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__4VKH,new_size__HDFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4VKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__FDFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4VKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__EVSB=((void **)result__FDFH);
+  Self__DUMC=(__INTEGER)(nb_elements__UYPB -  1);
+  while ((Self__DUMC >=  0)) {
+    Result__EVSB[Self__DUMC]=NULL;
+    Self__DUMC=(__INTEGER)(Self__DUMC -  1);
   };
-  return(Result__OYSB);
+  return(Result__EVSB);
 }
 
-static void** create__H4ZB(__INTEGER nb_elements__J4ZB)
+static void** create__U0ZB(__INTEGER nb_elements__W0ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__SDFH,a__XDFH,new_size__TDFH,new_size2__UDFH,a__1DFH;
+  __UINTEGER_32 new_size__2DFH;
+  __POINTER result__RDFH,ptr_table__PKIH,next__OKIH,result__QKIH;
+  void *result__BWKH;
+  __INTEGER Self__R3OC;
+  void **Result__MB2B;
+  sz__SDFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__W0ZB * ((__INTEGER )(sizeof(void *)))));
+  result__RDFH=((__POINTER )(NULL));
+  a__XDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__TDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SDFH + a__XDFH) & (__UINTEGER_32)(~ a__XDFH));
+  new_size2__UDFH=(__UINTEGER_32)(new_size__TDFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__UDFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__1DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__2DFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UDFH + a__1DFH) & (__UINTEGER_32)(~ a__1DFH));
+    ptr_table__PKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2DFH / ((__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__QOJ(new_size__2DFH);
+      next__OKIH=(void *)((unsigned long)result__QKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DFH)));
+      ((__POINTER *)next__OKIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__PKIH)[ 0]=next__OKIH;
+    } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2DFH <<  1)) <=  4096)) {
+          next__OKIH=(void *)((unsigned long)result__QKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DFH)));
+        } else {
+          next__OKIH=new_lab__QOJ(new_size__2DFH);
+        };
+        ((__POINTER *)next__OKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PKIH)[ 0]=next__OKIH;
+      } else {
+        ((__POINTER *)result__QKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__QKIH=next__OKIH;
+      };
+    };
+    ((__POINTER *)result__QKIH)[ 0]=((__POINTER ) 3);
+    result__RDFH=(void *)((unsigned long)result__QKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__BWKH=first_free__VAVB;
+    while ((((void *)result__BWKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BWKH)->map_size_and_id__YTB &  4294967292LU) < new_size__TDFH))) {
+      result__BWKH=((__MEMORY *)result__BWKH)->map_next_free__ZTB;
     };
-    if (((void *)result__2LKH == (void *)NULL)) {
-      result__2LKH=new_page__WA5();
+    if (((void *)result__BWKH == (void *)NULL)) {
+      result__BWKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__BWKH,new_size__TDFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BWKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__RDFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BWKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__MB2B=((void **)result__RDFH);
+  Self__R3OC=(__INTEGER)(nb_elements__W0ZB -  1);
+  while ((Self__R3OC >=  0)) {
+    Result__MB2B[Self__R3OC]=NULL;
+    Self__R3OC=(__INTEGER)(Self__R3OC -  1);
   };
-  return(Result__JF2B);
+  return(Result__MB2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__JHRC(__INTEGER new_count__LHRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__UFRC(__INTEGER new_count__WFRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__0B1C,ptr_table__UKIH,next__TKIH,result__VKIH;
+  __POINTER ptr_table__ZKIH,next__YKIH,result__0KIH;
+  __INTEGER typ_id__5B1C;
+  __UINTEGER_32 sz__2B1C,a__5DFH,new_size__AEFH,t__EEFH,a__DEFH;
+  __UINTEGER_32 new_size__2KIH,lab_type__1KIH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__ZB1C,*Self__Y2RD;
+  result__ZB1C=NULL;
+  ptr__0B1C=((__POINTER )(NULL));
+  typ_id__5B1C= 0;
+  sz__2B1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__2B1C ==  0)) {
+    result__ZB1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    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);
+    typ_id__5B1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2B1C);
+    if ((typ_id__5B1C == (__INTEGER)(-  1))) {
+      a__5DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__2B1C + a__5DFH) & (__UINTEGER_32)(~ a__5DFH));
+      ptr_table__UKIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TKIH=((__POINTER )(NULL));
+      result__VKIH=((__POINTER *)ptr_table__UKIH)[ 0];
+      if ((result__VKIH == (void *)NULL)) {
+        result__VKIH=new_lab__QOJ(new_size__AEFH);
+        next__TKIH=(void *)((unsigned long)result__VKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEFH)));
+        ((__POINTER *)next__TKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UKIH)[ 0]=next__TKIH;
+      } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__AEFH <<  1)) <=  4096)) {
+            next__TKIH=(void *)((unsigned long)result__VKIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AEFH)));
+          } else {
+            next__TKIH=new_lab__QOJ(new_size__AEFH);
+          };
+          ((__POINTER *)next__TKIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UKIH)[ 0]=next__TKIH;
+        } else {
+          ((__POINTER *)result__VKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VKIH=next__TKIH;
+        };
+      };
+      ptr__0B1C=result__VKIH;
+    } else {
+      t__EEFH=((__UINTEGER_32 )typ_id__5B1C);
+      a__DEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2KIH=(__UINTEGER_32)((__UINTEGER_32)(sz__2B1C + a__DEFH) & (__UINTEGER_32)(~ a__DEFH));
+      ptr_table__ZKIH=((__POINTER )(&(table_type[(t__EEFH)])));
+      lab_type__1KIH=(__UINTEGER_32)(t__EEFH |  1);
+      next__YKIH=((__POINTER )(NULL));
+      result__0KIH=((__POINTER *)ptr_table__ZKIH)[ 0];
+      if ((result__0KIH == (void *)NULL)) {
+        result__0KIH=new_lab__QOJ(lab_type__1KIH);
+        next__YKIH=(void *)((unsigned long)result__0KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KIH)));
+        ((__POINTER *)next__YKIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZKIH)[ 0]=next__YKIH;
+      } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2KIH <<  1)) <=  4096)) {
+            next__YKIH=(void *)((unsigned long)result__0KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2KIH)));
+          } else {
+            next__YKIH=new_lab__QOJ(lab_type__1KIH);
+          };
+          ((__POINTER *)next__YKIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZKIH)[ 0]=next__YKIH;
+        } else {
+          ((__POINTER *)result__0KIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YKIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0KIH=next__YKIH;
+        };
+      };
+      ptr__0B1C=result__0KIH;
+    };
+    result__ZB1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__0B1C);
+    *(result__ZB1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__Y2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__ZB1C);
+  if ((Self__Y2RD->parent_arrayed_collection__L2I.capacity__MAPD < new_count__WFRC)) {
+    Self__Y2RD->parent_arrayed_collection__L2I.storage__HBPD=create__5HHE(new_count__WFRC);
+    Self__Y2RD->parent_arrayed_collection__L2I.capacity__MAPD=new_count__WFRC;
+  };
+  Self__Y2RD->parent_arrayed_collection__L2I.upper__R4OD=(__INTEGER)(-  1);
+  return(result__ZB1C);
 }
 
-static void** create__3WTF(__INTEGER nb_elements__5WTF)
+static void** create__ZBUF(__INTEGER nb_elements__1BUF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__GEFH,a__LEFH,new_size__HEFH,new_size2__IEFH,a__PEFH;
+  __UINTEGER_32 new_size__QEFH;
+  __POINTER result__FEFH,ptr_table__4KIH,next__3KIH,result__5KIH;
+  void *result__EWKH;
+  __INTEGER Self__T45F;
+  void **Result__DSYF;
+  sz__GEFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__1BUF * ((__INTEGER )(sizeof(void *)))));
+  result__FEFH=((__POINTER )(NULL));
+  a__LEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__HEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GEFH + a__LEFH) & (__UINTEGER_32)(~ a__LEFH));
+  new_size2__IEFH=(__UINTEGER_32)(new_size__HEFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__IEFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QEFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__IEFH + a__PEFH) & (__UINTEGER_32)(~ a__PEFH));
+    ptr_table__4KIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3KIH=((__POINTER )(NULL));
+    result__5KIH=((__POINTER *)ptr_table__4KIH)[ 0];
+    if ((result__5KIH == (void *)NULL)) {
+      result__5KIH=new_lab__QOJ(new_size__QEFH);
+      next__3KIH=(void *)((unsigned long)result__5KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QEFH)));
+      ((__POINTER *)next__3KIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4KIH)[ 0]=next__3KIH;
+    } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QEFH <<  1)) <=  4096)) {
+          next__3KIH=(void *)((unsigned long)result__5KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QEFH)));
+        } else {
+          next__3KIH=new_lab__QOJ(new_size__QEFH);
+        };
+        ((__POINTER *)next__3KIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4KIH)[ 0]=next__3KIH;
+      } else {
+        ((__POINTER *)result__5KIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3KIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5KIH=next__3KIH;
+      };
+    };
+    ((__POINTER *)result__5KIH)[ 0]=((__POINTER ) 3);
+    result__FEFH=(void *)((unsigned long)result__5KIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__EWKH=first_free__VAVB;
+    while ((((void *)result__EWKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__EWKH)->map_size_and_id__YTB &  4294967292LU) < new_size__HEFH))) {
+      result__EWKH=((__MEMORY *)result__EWKH)->map_next_free__ZTB;
     };
-    if (((void *)result__5LKH == (void *)NULL)) {
-      result__5LKH=new_page__WA5();
+    if (((void *)result__EWKH == (void *)NULL)) {
+      result__EWKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__EWKH,new_size__HEFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__EWKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__FEFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__EWKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__DSYF=((void **)result__FEFH);
+  Self__T45F=(__INTEGER)(nb_elements__1BUF -  1);
+  while ((Self__T45F >=  0)) {
+    Result__DSYF[Self__T45F]=NULL;
+    Self__T45F=(__INTEGER)(Self__T45F -  1);
   };
-  return(Result__HHYF);
+  return(Result__DSYF);
 }
 
-static void** create__52FF(__INTEGER nb_elements__B3FF)
+static void** create__1FGF(__INTEGER nb_elements__3FGF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__SEFH,a__XEFH,new_size__TEFH,new_size2__UEFH,a__1EFH;
+  __UINTEGER_32 new_size__2EFH;
+  __POINTER result__REFH,ptr_table__DLIH,next__CLIH,result__ELIH;
+  void *result__HWKH;
+  __INTEGER Self__YWQF;
+  void **Result__LMKF;
+  sz__SEFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__3FGF * ((__INTEGER )(sizeof(void *)))));
+  result__REFH=((__POINTER )(NULL));
+  a__XEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__TEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__SEFH + a__XEFH) & (__UINTEGER_32)(~ a__XEFH));
+  new_size2__UEFH=(__UINTEGER_32)(new_size__TEFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__UEFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__1EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__2EFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__UEFH + a__1EFH) & (__UINTEGER_32)(~ a__1EFH));
+    ptr_table__DLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2EFH / ((__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__QOJ(new_size__2EFH);
+      next__CLIH=(void *)((unsigned long)result__ELIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
+      ((__POINTER *)next__CLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DLIH)[ 0]=next__CLIH;
+    } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2EFH <<  1)) <=  4096)) {
+          next__CLIH=(void *)((unsigned long)result__ELIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EFH)));
+        } else {
+          next__CLIH=new_lab__QOJ(new_size__2EFH);
+        };
+        ((__POINTER *)next__CLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DLIH)[ 0]=next__CLIH;
+      } else {
+        ((__POINTER *)result__ELIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ELIH=next__CLIH;
+      };
+    };
+    ((__POINTER *)result__ELIH)[ 0]=((__POINTER ) 3);
+    result__REFH=(void *)((unsigned long)result__ELIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__HWKH=first_free__VAVB;
+    while ((((void *)result__HWKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HWKH)->map_size_and_id__YTB &  4294967292LU) < new_size__TEFH))) {
+      result__HWKH=((__MEMORY *)result__HWKH)->map_next_free__ZTB;
     };
-    if (((void *)result__CMKH == (void *)NULL)) {
-      result__CMKH=new_page__WA5();
+    if (((void *)result__HWKH == (void *)NULL)) {
+      result__HWKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__HWKH,new_size__TEFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HWKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__REFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HWKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LMKF=((void **)result__REFH);
+  Self__YWQF=(__INTEGER)(nb_elements__3FGF -  1);
+  while ((Self__YWQF >=  0)) {
+    Result__LMKF[Self__YWQF]=NULL;
+    Self__YWQF=(__INTEGER)(Self__YWQF -  1);
   };
-  return(Result__KCKF);
+  return(Result__LMKF);
 }
 
-static void** create__Y0XF(__INTEGER nb_elements__00XF)
+static void** create__UFYF(__INTEGER nb_elements__WFYF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__4EFH,a__DFFH,new_size__5EFH,new_size2__AFFH,a__HFFH;
+  __UINTEGER_32 new_size__IFFH;
+  __POINTER result__3EFH,ptr_table__ILIH,next__HLIH,result__JLIH;
+  void *result__KWKH;
+  __INTEGER Self__NCAG;
+  void **Result__0W0F;
+  sz__4EFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WFYF * ((__INTEGER )(sizeof(void *)))));
+  result__3EFH=((__POINTER )(NULL));
+  a__DFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__5EFH=(__UINTEGER_32)((__UINTEGER_32)(sz__4EFH + a__DFFH) & (__UINTEGER_32)(~ a__DFFH));
+  new_size2__AFFH=(__UINTEGER_32)(new_size__5EFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__AFFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__HFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__IFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__AFFH + a__HFFH) & (__UINTEGER_32)(~ a__HFFH));
+    ptr_table__ILIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HLIH=((__POINTER )(NULL));
+    result__JLIH=((__POINTER *)ptr_table__ILIH)[ 0];
+    if ((result__JLIH == (void *)NULL)) {
+      result__JLIH=new_lab__QOJ(new_size__IFFH);
+      next__HLIH=(void *)((unsigned long)result__JLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFFH)));
+      ((__POINTER *)next__HLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ILIH)[ 0]=next__HLIH;
+    } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IFFH <<  1)) <=  4096)) {
+          next__HLIH=(void *)((unsigned long)result__JLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IFFH)));
+        } else {
+          next__HLIH=new_lab__QOJ(new_size__IFFH);
+        };
+        ((__POINTER *)next__HLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ILIH)[ 0]=next__HLIH;
+      } else {
+        ((__POINTER *)result__JLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JLIH=next__HLIH;
+      };
+    };
+    ((__POINTER *)result__JLIH)[ 0]=((__POINTER ) 3);
+    result__3EFH=(void *)((unsigned long)result__JLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__KWKH=first_free__VAVB;
+    while ((((void *)result__KWKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__KWKH)->map_size_and_id__YTB &  4294967292LU) < new_size__5EFH))) {
+      result__KWKH=((__MEMORY *)result__KWKH)->map_next_free__ZTB;
     };
-    if (((void *)result__FMKH == (void *)NULL)) {
-      result__FMKH=new_page__WA5();
+    if (((void *)result__KWKH == (void *)NULL)) {
+      result__KWKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__KWKH,new_size__5EFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__KWKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__3EFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__KWKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__0W0F=((void **)result__3EFH);
+  Self__NCAG=(__INTEGER)(nb_elements__WFYF -  1);
+  while ((Self__NCAG >=  0)) {
+    Result__0W0F[Self__NCAG]=NULL;
+    Self__NCAG=(__INTEGER)(Self__NCAG -  1);
   };
-  return(Result__4L0F);
+  return(Result__0W0F);
 }
 
-static void** create__C0IE(__INTEGER nb_elements__E0IE)
+static void** create__LYIE(__INTEGER nb_elements__NYIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__GKJB,a__LFFH,new_size__IKJB,new_size2__LKJB,a__PFFH;
+  __UINTEGER_32 new_size__QFFH;
+  __POINTER result__OKJB,ptr_table__NLIH,next__MLIH,result__OLIH;
+  void *result__W5UB;
+  __INTEGER Self__HQYE;
+  void **Result__FZNE;
+  sz__GKJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__NYIE * ((__INTEGER )(sizeof(void *)))));
+  result__OKJB=((__POINTER )(NULL));
+  a__LFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__IKJB=(__UINTEGER_32)((__UINTEGER_32)(sz__GKJB + a__LFFH) & (__UINTEGER_32)(~ a__LFFH));
+  new_size2__LKJB=(__UINTEGER_32)(new_size__IKJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__LKJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LKJB + a__PFFH) & (__UINTEGER_32)(~ a__PFFH));
+    ptr_table__NLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__MLIH=((__POINTER )(NULL));
+    result__OLIH=((__POINTER *)ptr_table__NLIH)[ 0];
+    if ((result__OLIH == (void *)NULL)) {
+      result__OLIH=new_lab__QOJ(new_size__QFFH);
+      next__MLIH=(void *)((unsigned long)result__OLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFFH)));
+      ((__POINTER *)next__MLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NLIH)[ 0]=next__MLIH;
+    } else {
+      next__MLIH=((__POINTER *)result__OLIH)[ 0];
+      if ((next__MLIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OLIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QFFH <<  1)) <=  4096)) {
+          next__MLIH=(void *)((unsigned long)result__OLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFFH)));
+        } else {
+          next__MLIH=new_lab__QOJ(new_size__QFFH);
+        };
+        ((__POINTER *)next__MLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NLIH)[ 0]=next__MLIH;
+      } else {
+        ((__POINTER *)result__OLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OLIH=next__MLIH;
+      };
+    };
+    ((__POINTER *)result__OLIH)[ 0]=((__POINTER ) 3);
+    result__OKJB=(void *)((unsigned long)result__OLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__W5UB=first_free__VAVB;
+    while ((((void *)result__W5UB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__W5UB)->map_size_and_id__YTB &  4294967292LU) < new_size__IKJB))) {
+      result__W5UB=((__MEMORY *)result__W5UB)->map_next_free__ZTB;
     };
-    if (((void *)result__ADVB == (void *)NULL)) {
-      result__ADVB=new_page__WA5();
+    if (((void *)result__W5UB == (void *)NULL)) {
+      result__W5UB=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__W5UB,new_size__IKJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__W5UB)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__OKJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__W5UB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__FZNE=((void **)result__OKJB);
+  Self__HQYE=(__INTEGER)(nb_elements__NYIE -  1);
+  while ((Self__HQYE >=  0)) {
+    Result__FZNE[Self__HQYE]=NULL;
+    Self__HQYE=(__INTEGER)(Self__HQYE -  1);
   };
-  return(Result__A1NE);
+  return(Result__FZNE);
 }
 
-static void* new_page__WA5()
+static void* new_page__B24()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __UINTEGER_64 cap__PYSB,old_size__E24;
+  __POINTER mem__SYSB;
+  void *block__K24;
+  if ((capacity_max__L24 ==  0)) {
+    mem__SYSB=((__POINTER )(NULL));
+    cap__PYSB= 33554432;
     do {
-      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));
+      cap__PYSB=(__UINTEGER_64)(cap__PYSB <<  1);
+      mem__SYSB=((__POINTER )(malloc((cap__PYSB))));
+      if ((mem__SYSB != (void *)NULL)) {
+        free((mem__SYSB));
+      };
+    } while ((! ((mem__SYSB == (void *)NULL) || (cap__PYSB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__SYSB == (void *)NULL)) {
+      cap__PYSB=(__UINTEGER_64)(cap__PYSB >>  1);
+    };
+    get_begin_memory__G5PB=((__POINTER )(malloc((cap__PYSB))));
+    capacity_max__L24=cap__PYSB;
+    begin_memory__3SH=get_begin_memory__G5PB;
+  };
+  old_size__E24=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__CPJ <<  26));
+  nb_page__CPJ=(__UINTEGER_32)(nb_page__CPJ +  1);
+  if (((__UINTEGER_64)(old_size__E24 +  67108864) > capacity_max__L24)) {
+    print__DID((&__string_187));
     exit(( 1));
   };
-  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);
+  block__K24=((void *)(void *)((unsigned long)begin_memory__3SH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__E24)))));
+  ((__MEMORY *)block__K24)->map_previous_linear__XTB= 4294967295LU;
+  ((__MEMORY *)block__K24)->map_size_and_id__YTB= 67108858;
+  ((__MEMORY *)block__K24)->map_next_free__ZTB=first_free__VAVB;
+  ((__MEMORY *)block__K24)->map_previous_free__0TB=NULL;
+  if (((void *)first_free__VAVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__VAVB)->map_previous_free__0TB=block__K24;
+  };
+  first_free__VAVB=block__K24;
+  last_block[((__UINTEGER_32)(nb_page__CPJ -  1))] = (block__K24);
+  return(block__K24);
 }
 
-static void to_busy__index__1TFC(__MEMORY *Self__2TFC,__UINTEGER_32 sz__3TFC,__UINTEGER_32 idx__4TFC)
+static void to_busy__index__KRFC(__MEMORY *Self__LRFC,__UINTEGER_32 sz__MRFC,__UINTEGER_32 idx__NRFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  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;
+  void *new__URFC,*prev__PBOC,*next__QBOC;
+  __UINTEGER_32 siz__ORFC,new_size__RRFC;
+  __MEMORY *Self__0PCC,*Self__EAAH;
+  new__URFC=NULL;
+  prev__PBOC=Self__LRFC->map_previous_free__0TB;
+  next__QBOC=Self__LRFC->map_next_free__ZTB;
+  if (((void *)prev__PBOC == (void *)NULL)) {
+    first_free__VAVB=next__QBOC;
   } else {
-    ((__MEMORY *)prev__RDOC)->map_next_free__RTB=next__SDOC;
+    ((__MEMORY *)prev__PBOC)->map_next_free__ZTB=next__QBOC;
   };
-  if (((void *)next__SDOC != (void *)NULL)) {
-    ((__MEMORY *)next__SDOC)->map_previous_free__STB=prev__RDOC;
+  if (((void *)next__QBOC != (void *)NULL)) {
+    ((__MEMORY *)next__QBOC)->map_previous_free__0TB=prev__PBOC;
   };
-  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;
+  siz__ORFC=Self__LRFC->map_size_and_id__YTB;
+  new_size__RRFC=(__UINTEGER_32)(siz__ORFC - sz__MRFC);
+  if ((new_size__RRFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__ORFC=sz__MRFC;
+    new__URFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__LRFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__MRFC))));
+    ((__MEMORY *)new__URFC)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__LRFC) - (unsigned long)begin_memory__3SH))));
+    ((__MEMORY *)new__URFC)->map_size_and_id__YTB=(__UINTEGER_32)(new_size__RRFC -  8);
+    Self__0PCC=((__MEMORY *)new__URFC);
+    Self__0PCC->map_next_free__ZTB=first_free__VAVB;
+    Self__0PCC->map_previous_free__0TB=NULL;
+    if (((void *)first_free__VAVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__VAVB)->map_previous_free__0TB=Self__0PCC;
     };
-    first_free__5DVB=Self__LSCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__FUFC)->map_size_and_id__QTB &  2) !=  0)) {
-      last_block[(idx__4TFC)] = (new__FUFC);
+    first_free__VAVB=Self__0PCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__URFC)->map_size_and_id__YTB &  2) !=  0)) {
+      last_block[(idx__NRFC)] = (new__URFC);
     } else {
-      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__EAAH=((__MEMORY *)new__URFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__EAAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__EAAH->map_size_and_id__YTB &  4294967292LU))))))->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__URFC)) - (unsigned long)begin_memory__3SH))));
     };
   };
-  Self__2TFC->map_size_and_id__QTB=(__UINTEGER_32)(siz__5TFC |  1);
+  Self__LRFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__ORFC |  1);
 }
 
-static void** create__F2XC(__INTEGER nb_elements__H2XC)
+static void** create__D1XC(__INTEGER nb_elements__F1XC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__UIDH,a__TFFH,new_size__VIDH,new_size2__WIDH,a__XFFH;
+  __UINTEGER_32 new_size__YFFH;
+  __POINTER result__TIDH,ptr_table__SLIH,next__RLIH,result__TLIH;
+  void *result__WLIH;
+  __INTEGER Self__0SWD;
+  void **Result__1S5C;
+  sz__UIDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__F1XC * ((__INTEGER )(sizeof(void *)))));
+  result__TIDH=((__POINTER )(NULL));
+  a__TFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VIDH=(__UINTEGER_32)((__UINTEGER_32)(sz__UIDH + a__TFFH) & (__UINTEGER_32)(~ a__TFFH));
+  new_size2__WIDH=(__UINTEGER_32)(new_size__VIDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WIDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__XFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__YFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WIDH + a__XFFH) & (__UINTEGER_32)(~ a__XFFH));
+    ptr_table__SLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__RLIH=((__POINTER )(NULL));
+    result__TLIH=((__POINTER *)ptr_table__SLIH)[ 0];
+    if ((result__TLIH == (void *)NULL)) {
+      result__TLIH=new_lab__QOJ(new_size__YFFH);
+      next__RLIH=(void *)((unsigned long)result__TLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFFH)));
+      ((__POINTER *)next__RLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SLIH)[ 0]=next__RLIH;
+    } else {
+      next__RLIH=((__POINTER *)result__TLIH)[ 0];
+      if ((next__RLIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TLIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YFFH <<  1)) <=  4096)) {
+          next__RLIH=(void *)((unsigned long)result__TLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YFFH)));
+        } else {
+          next__RLIH=new_lab__QOJ(new_size__YFFH);
+        };
+        ((__POINTER *)next__RLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SLIH)[ 0]=next__RLIH;
+      } else {
+        ((__POINTER *)result__TLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TLIH=next__RLIH;
+      };
+    };
+    ((__POINTER *)result__TLIH)[ 0]=((__POINTER ) 3);
+    result__TIDH=(void *)((unsigned long)result__TLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__WLIH=first_free__VAVB;
+    while ((((void *)result__WLIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WLIH)->map_size_and_id__YTB &  4294967292LU) < new_size__VIDH))) {
+      result__WLIH=((__MEMORY *)result__WLIH)->map_next_free__ZTB;
     };
-    if (((void *)result__UAIH == (void *)NULL)) {
-      result__UAIH=new_page__WA5();
+    if (((void *)result__WLIH == (void *)NULL)) {
+      result__WLIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__WLIH,new_size__VIDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WLIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__TIDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WLIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__1S5C=((void **)result__TIDH);
+  Self__0SWD=(__INTEGER)(nb_elements__F1XC -  1);
+  while ((Self__0SWD >=  0)) {
+    Result__1S5C[Self__0SWD]=NULL;
+    Self__0SWD=(__INTEGER)(Self__0SWD -  1);
   };
-  return(Result__HT5C);
+  return(Result__1S5C);
 }
 
-static void** create__IBYC(__INTEGER nb_elements__KBYC)
+static void** create__GAYC(__INTEGER nb_elements__IAYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__YIDH,a__4FFH,new_size__ZIDH,new_size2__0IDH,a__CGFH;
+  __UINTEGER_32 new_size__DGFH;
+  __POINTER result__XIDH,ptr_table__0LIH,next__ZLIH,result__1LIH;
+  void *result__4LIH;
+  __INTEGER Self__UWWD;
+  void **Result__FY5C;
+  sz__YIDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__IAYC * ((__INTEGER )(sizeof(void *)))));
+  result__XIDH=((__POINTER )(NULL));
+  a__4FFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ZIDH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIDH + a__4FFH) & (__UINTEGER_32)(~ a__4FFH));
+  new_size2__0IDH=(__UINTEGER_32)(new_size__ZIDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__0IDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__CGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__DGFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__0IDH + a__CGFH) & (__UINTEGER_32)(~ a__CGFH));
+    ptr_table__0LIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DGFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ZLIH=((__POINTER )(NULL));
+    result__1LIH=((__POINTER *)ptr_table__0LIH)[ 0];
+    if ((result__1LIH == (void *)NULL)) {
+      result__1LIH=new_lab__QOJ(new_size__DGFH);
+      next__ZLIH=(void *)((unsigned long)result__1LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DGFH)));
+      ((__POINTER *)next__ZLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__0LIH)[ 0]=next__ZLIH;
+    } else {
+      next__ZLIH=((__POINTER *)result__1LIH)[ 0];
+      if ((next__ZLIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1LIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DGFH <<  1)) <=  4096)) {
+          next__ZLIH=(void *)((unsigned long)result__1LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DGFH)));
+        } else {
+          next__ZLIH=new_lab__QOJ(new_size__DGFH);
+        };
+        ((__POINTER *)next__ZLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0LIH)[ 0]=next__ZLIH;
+      } else {
+        ((__POINTER *)result__1LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__1LIH=next__ZLIH;
+      };
+    };
+    ((__POINTER *)result__1LIH)[ 0]=((__POINTER ) 3);
+    result__XIDH=(void *)((unsigned long)result__1LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__4LIH=first_free__VAVB;
+    while ((((void *)result__4LIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4LIH)->map_size_and_id__YTB &  4294967292LU) < new_size__ZIDH))) {
+      result__4LIH=((__MEMORY *)result__4LIH)->map_next_free__ZTB;
     };
-    if (((void *)result__2AIH == (void *)NULL)) {
-      result__2AIH=new_page__WA5();
+    if (((void *)result__4LIH == (void *)NULL)) {
+      result__4LIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__4LIH,new_size__ZIDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4LIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__XIDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4LIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__FY5C=((void **)result__XIDH);
+  Self__UWWD=(__INTEGER)(nb_elements__IAYC -  1);
+  while ((Self__UWWD >=  0)) {
+    Result__FY5C[Self__UWWD]=NULL;
+    Self__UWWD=(__INTEGER)(Self__UWWD -  1);
   };
-  return(Result__RY5C);
+  return(Result__FY5C);
 }
 
-static void** create__MLBD(__INTEGER nb_elements__OLBD)
+static void** create__4KBD(__INTEGER nb_elements__ALBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__2IDH,a__JGFH,new_size__3IDH,new_size2__4IDH,a__NGFH;
+  __UINTEGER_32 new_size__OGFH;
+  __POINTER result__1IDH,ptr_table__CMIH,next__BMIH,result__DMIH;
+  void *result__GMIH;
+  __INTEGER Self__5EXD;
+  void **Result__V5FD;
+  sz__2IDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ALBD * ((__INTEGER )(sizeof(void *)))));
+  result__1IDH=((__POINTER )(NULL));
+  a__JGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3IDH=(__UINTEGER_32)((__UINTEGER_32)(sz__2IDH + a__JGFH) & (__UINTEGER_32)(~ a__JGFH));
+  new_size2__4IDH=(__UINTEGER_32)(new_size__3IDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4IDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__NGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__OGFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4IDH + a__NGFH) & (__UINTEGER_32)(~ a__NGFH));
+    ptr_table__CMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OGFH / ((__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__QOJ(new_size__OGFH);
+      next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OGFH)));
+      ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OGFH <<  1)) <=  4096)) {
+          next__BMIH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OGFH)));
+        } else {
+          next__BMIH=new_lab__QOJ(new_size__OGFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__DMIH)[ 0]=((__POINTER ) 3);
+    result__1IDH=(void *)((unsigned long)result__DMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GMIH=first_free__VAVB;
+    while ((((void *)result__GMIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GMIH)->map_size_and_id__YTB &  4294967292LU) < new_size__3IDH))) {
+      result__GMIH=((__MEMORY *)result__GMIH)->map_next_free__ZTB;
     };
-    if (((void *)result__EBIH == (void *)NULL)) {
-      result__EBIH=new_page__WA5();
+    if (((void *)result__GMIH == (void *)NULL)) {
+      result__GMIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__GMIH,new_size__3IDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GMIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__1IDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GMIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__V5FD=((void **)result__1IDH);
+  Self__5EXD=(__INTEGER)(nb_elements__ALBD -  1);
+  while ((Self__5EXD >=  0)) {
+    Result__V5FD[Self__5EXD]=NULL;
+    Self__5EXD=(__INTEGER)(Self__5EXD -  1);
   };
-  return(Result__JAGD);
+  return(Result__V5FD);
 }
 
-static void** create__UVEF(__INTEGER nb_elements__WVEF)
+static void** create__35EF(__INTEGER nb_elements__55EF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__AJDH,a__UGFH,new_size__BJDH,new_size2__CJDH,a__YGFH;
+  __UINTEGER_32 new_size__ZGFH;
+  __POINTER result__5IDH,ptr_table__KMIH,next__JMIH,result__LMIH;
+  void *result__OMIH;
+  __INTEGER Self__TUQF;
+  void **Result__ZPJF;
+  sz__AJDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__55EF * ((__INTEGER )(sizeof(void *)))));
+  result__5IDH=((__POINTER )(NULL));
+  a__UGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__BJDH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJDH + a__UGFH) & (__UINTEGER_32)(~ a__UGFH));
+  new_size2__CJDH=(__UINTEGER_32)(new_size__BJDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__CJDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZGFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__CJDH + a__YGFH) & (__UINTEGER_32)(~ a__YGFH));
+    ptr_table__KMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZGFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JMIH=((__POINTER )(NULL));
+    result__LMIH=((__POINTER *)ptr_table__KMIH)[ 0];
+    if ((result__LMIH == (void *)NULL)) {
+      result__LMIH=new_lab__QOJ(new_size__ZGFH);
+      next__JMIH=(void *)((unsigned long)result__LMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZGFH)));
+      ((__POINTER *)next__JMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KMIH)[ 0]=next__JMIH;
+    } else {
+      next__JMIH=((__POINTER *)result__LMIH)[ 0];
+      if ((next__JMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LMIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZGFH <<  1)) <=  4096)) {
+          next__JMIH=(void *)((unsigned long)result__LMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZGFH)));
+        } else {
+          next__JMIH=new_lab__QOJ(new_size__ZGFH);
+        };
+        ((__POINTER *)next__JMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KMIH)[ 0]=next__JMIH;
+      } else {
+        ((__POINTER *)result__LMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LMIH=next__JMIH;
+      };
+    };
+    ((__POINTER *)result__LMIH)[ 0]=((__POINTER ) 3);
+    result__5IDH=(void *)((unsigned long)result__LMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OMIH=first_free__VAVB;
+    while ((((void *)result__OMIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OMIH)->map_size_and_id__YTB &  4294967292LU) < new_size__BJDH))) {
+      result__OMIH=((__MEMORY *)result__OMIH)->map_next_free__ZTB;
     };
-    if (((void *)result__MBIH == (void *)NULL)) {
-      result__MBIH=new_page__WA5();
+    if (((void *)result__OMIH == (void *)NULL)) {
+      result__OMIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__OMIH,new_size__BJDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OMIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__5IDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OMIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__ZPJF=((void **)result__5IDH);
+  Self__TUQF=(__INTEGER)(nb_elements__55EF -  1);
+  while ((Self__TUQF >=  0)) {
+    Result__ZPJF[Self__TUQF]=NULL;
+    Self__TUQF=(__INTEGER)(Self__TUQF -  1);
   };
-  return(Result__QFJF);
+  return(Result__ZPJF);
 }
 
-static void** create__JK2(__INTEGER nb_elements__LK2)
+static void** create__UF2(__INTEGER nb_elements__WF2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__EJDH,a__5GFH,new_size__FJDH,new_size2__GJDH,a__DHFH;
+  __UINTEGER_32 new_size__EHFH;
+  __POINTER result__DJDH,ptr_table__SMIH,next__RMIH,result__TMIH;
+  void *result__WMIH;
+  __INTEGER Self__RRJC;
+  void **Result__L2CB;
+  sz__EJDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WF2 * ((__INTEGER )(sizeof(void *)))));
+  result__DJDH=((__POINTER )(NULL));
+  a__5GFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FJDH=(__UINTEGER_32)((__UINTEGER_32)(sz__EJDH + a__5GFH) & (__UINTEGER_32)(~ a__5GFH));
+  new_size2__GJDH=(__UINTEGER_32)(new_size__FJDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GJDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__DHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__EHFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GJDH + a__DHFH) & (__UINTEGER_32)(~ a__DHFH));
+    ptr_table__SMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__RMIH=((__POINTER )(NULL));
+    result__TMIH=((__POINTER *)ptr_table__SMIH)[ 0];
+    if ((result__TMIH == (void *)NULL)) {
+      result__TMIH=new_lab__QOJ(new_size__EHFH);
+      next__RMIH=(void *)((unsigned long)result__TMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHFH)));
+      ((__POINTER *)next__RMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__SMIH)[ 0]=next__RMIH;
+    } else {
+      next__RMIH=((__POINTER *)result__TMIH)[ 0];
+      if ((next__RMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TMIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EHFH <<  1)) <=  4096)) {
+          next__RMIH=(void *)((unsigned long)result__TMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHFH)));
+        } else {
+          next__RMIH=new_lab__QOJ(new_size__EHFH);
+        };
+        ((__POINTER *)next__RMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SMIH)[ 0]=next__RMIH;
+      } else {
+        ((__POINTER *)result__TMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__TMIH=next__RMIH;
+      };
+    };
+    ((__POINTER *)result__TMIH)[ 0]=((__POINTER ) 3);
+    result__DJDH=(void *)((unsigned long)result__TMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__WMIH=first_free__VAVB;
+    while ((((void *)result__WMIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WMIH)->map_size_and_id__YTB &  4294967292LU) < new_size__FJDH))) {
+      result__WMIH=((__MEMORY *)result__WMIH)->map_next_free__ZTB;
     };
-    if (((void *)result__UBIH == (void *)NULL)) {
-      result__UBIH=new_page__WA5();
+    if (((void *)result__WMIH == (void *)NULL)) {
+      result__WMIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__WMIH,new_size__FJDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WMIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__DJDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WMIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__L2CB=((void **)result__DJDH);
+  Self__RRJC=(__INTEGER)(nb_elements__WF2 -  1);
+  while ((Self__RRJC >=  0)) {
+    Result__L2CB[Self__RRJC]=NULL;
+    Self__RRJC=(__INTEGER)(Self__RRJC -  1);
   };
-  return(Result__ABDB);
+  return(Result__L2CB);
 }
 
-static void add__QYR(__HASHED_SEToABSTRACT_STRINGo *Self__RYR,void *e__SYR)
+static void add__DUR(__HASHED_SEToABSTRACT_STRINGo *Self__EUR,void *e__FUR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__ZMIH,__tmp__1MIH,Self__2MIH,idx__NUR,typ_id__ANIH;
+  __POINTER ptr__5MIH,ptr_table__KNIH,next__JNIH,result__LNIH;
+  __POINTER ptr_table__PNIH,next__ONIH,result__QNIH;
+  __UINTEGER_32 sz__BNIH,a__CNIH,new_size__DNIH,t__ENIH,a__FNIH;
+  __UINTEGER_32 new_size__SNIH,lab_type__RNIH;
+  void *node__QUR,*n__INIH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__4MIH,*Self__GNIH;
+  has__OLW(Self__EUR,e__FUR);
+  has__OLW(Self__EUR,e__FUR);
+  result__ZMIH= 0;
+  __tmp__1MIH=((__STRING_CONSTANT *)e__FUR)->count__DD;
+  Self__2MIH= 1;
+  while ((Self__2MIH <= __tmp__1MIH)) {
+    result__ZMIH=(__INTEGER)((__INTEGER)( 5 * result__ZMIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__FUR)->storage__QMO)[(__INTEGER)(Self__2MIH -  1)])));
+    Self__2MIH=(__INTEGER)(Self__2MIH +  1);
+  };
+  if ((result__ZMIH <  0)) {
+    result__ZMIH=(__INTEGER)(~ result__ZMIH);
+  };
+  idx__NUR=(__INTEGER)(result__ZMIH % Self__EUR->capacity__UUR);
+  node__QUR=((void **)Self__EUR->buckets__ZUR)[idx__NUR];
+  while ((! (((void *)node__QUR == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__QUR)->item__FVR,e__FUR)))) {
+    node__QUR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__QUR)->next__RVR;
+  };
+  if (((void *)node__QUR == (void *)NULL)) {
+    if ((Self__EUR->capacity__UUR == Self__EUR->count__0VR)) {
+      increase_capacity__SNNB(Self__EUR);
+      idx__NUR=(__INTEGER)(result__ZMIH % Self__EUR->capacity__UUR);
+    };
+    n__INIH=((void **)Self__EUR->buckets__ZUR)[idx__NUR];
+    result__4MIH=NULL;
+    ptr__5MIH=((__POINTER )(NULL));
+    typ_id__ANIH= 0;
+    sz__BNIH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__BNIH ==  0)) {
+      result__4MIH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__ANIH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BNIH);
+      if ((typ_id__ANIH == (__INTEGER)(-  1))) {
+        a__CNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BNIH + a__CNIH) & (__UINTEGER_32)(~ a__CNIH));
+        ptr_table__KNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DNIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__JNIH=((__POINTER )(NULL));
+        result__LNIH=((__POINTER *)ptr_table__KNIH)[ 0];
+        if ((result__LNIH == (void *)NULL)) {
+          result__LNIH=new_lab__QOJ(new_size__DNIH);
+          next__JNIH=(void *)((unsigned long)result__LNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNIH)));
+          ((__POINTER *)next__JNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KNIH)[ 0]=next__JNIH;
+        } else {
+          next__JNIH=((__POINTER *)result__LNIH)[ 0];
+          if ((next__JNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LNIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DNIH <<  1)) <=  4096)) {
+              next__JNIH=(void *)((unsigned long)result__LNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DNIH)));
             } else {
-              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)));
+              next__JNIH=new_lab__QOJ(new_size__DNIH);
+            };
+            ((__POINTER *)next__JNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KNIH)[ 0]=next__JNIH;
+          } else {
+            ((__POINTER *)result__LNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LNIH=next__JNIH;
+          };
+        };
+        ptr__5MIH=result__LNIH;
+      } else {
+        t__ENIH=((__UINTEGER_32 )typ_id__ANIH);
+        a__FNIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SNIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BNIH + a__FNIH) & (__UINTEGER_32)(~ a__FNIH));
+        ptr_table__PNIH=((__POINTER )(&(table_type[(t__ENIH)])));
+        lab_type__RNIH=(__UINTEGER_32)(t__ENIH |  1);
+        next__ONIH=((__POINTER )(NULL));
+        result__QNIH=((__POINTER *)ptr_table__PNIH)[ 0];
+        if ((result__QNIH == (void *)NULL)) {
+          result__QNIH=new_lab__QOJ(lab_type__RNIH);
+          next__ONIH=(void *)((unsigned long)result__QNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNIH)));
+          ((__POINTER *)next__ONIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PNIH)[ 0]=next__ONIH;
+        } else {
+          next__ONIH=((__POINTER *)result__QNIH)[ 0];
+          if ((next__ONIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QNIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SNIH <<  1)) <=  4096)) {
+              next__ONIH=(void *)((unsigned long)result__QNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNIH)));
             } else {
-              next__MCIH=new_lab__URJ(lab_type__PCIH);
+              next__ONIH=new_lab__QOJ(lab_type__RNIH);
             };
-            ((__POINTER *)next__MCIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__NCIH)[ 0]=next__MCIH;
+            ((__POINTER *)next__ONIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PNIH)[ 0]=next__ONIH;
           } else {
-            ((__POINTER *)result__OCIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MCIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__OCIH=next__MCIH;
+            ((__POINTER *)result__QNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QNIH=next__ONIH;
           };
         };
-        ptr__3BIH=result__OCIH;
+        ptr__5MIH=result__QNIH;
       };
-      result__2BIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__3BIH);
-      *(result__2BIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__4MIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__5MIH);
+      *(result__4MIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    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);
+    Self__GNIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__4MIH);
+    Self__GNIH->item__FVR=e__FUR;
+    Self__GNIH->next__RVR=n__INIH;
+    node__QUR=result__4MIH;
+    ((void **)Self__EUR->buckets__ZUR)[idx__NUR]=result__4MIH;
+    Self__EUR->count__0VR=(__INTEGER)(Self__EUR->count__0VR +  1);
   };
 }
 
-static void* operator__name__4GB(void *op__BHB)
+static void* operator__name__GHB(void *op__JHB)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER __tmp__RHB,Self__KWB;
+  __CHARACTER c__LHB;
+  __BOOLEAN __tmp__5HB,__tmp__MIB,result__LBDB,__tmp__ZIB,result__3BDB;
+  __BOOLEAN __tmp__GJB,result__PCDB,__tmp__TJB,result__BDDB,__tmp__AKB;
+  __BOOLEAN result__TDDB,__tmp__NKB,result__FEDB,__tmp__0KB;
+  __BOOLEAN result__XEDB,__tmp__HLB,result__JFDB,__tmp__ULB;
+  __BOOLEAN result__1FDB,__tmp__BMB,result__NGDB,__tmp__OMB;
+  __BOOLEAN result__5GDB,__tmp__1MB,result__RHDB,__tmp__INB;
+  __BOOLEAN result__DIDB,__tmp__VNB,result__VIDB,__tmp__COB;
+  __BOOLEAN result__HJDB,__tmp__POB,result__ZJDB;
+  c__LHB='\0';
+  copy__U4R(string_tmp__VH,(&__string_81));
+  __tmp__RHB=((__STRING_CONSTANT *)op__JHB)->count__DD;
+  Self__KWB= 1;
+  while ((Self__KWB <= __tmp__RHB)) {
+    c__LHB=((__CHARACTER *)((__STRING_CONSTANT *)op__JHB)->storage__QMO)[(__INTEGER)(Self__KWB -  1)];
+    if ((c__LHB == '+')) {
+      append__2JS(string_tmp__VH,(&__string_188));
+      __tmp__5HB=TRUE__;
     } else {
-      __tmp__XHB=FALSE__;
+      __tmp__5HB=FALSE__;
     };
-    if (__tmp__XHB) {
-      __tmp__EIB=TRUE__;
+    if (__tmp__5HB) {
+      __tmp__MIB=TRUE__;
     } else {
-      result__AGDB=(c__DHB == '-');
-      if (result__AGDB) {
-        append__JOS(string_tmp__VH,(&__string_187));
+      result__LBDB=(c__LHB == '-');
+      if (result__LBDB) {
+        append__2JS(string_tmp__VH,(&__string_189));
       };
-      __tmp__EIB=result__AGDB;
+      __tmp__MIB=result__LBDB;
     };
-    if (__tmp__EIB) {
-      __tmp__RIB=TRUE__;
+    if (__tmp__MIB) {
+      __tmp__ZIB=TRUE__;
     } else {
-      result__SGDB=(c__DHB == '~');
-      if (result__SGDB) {
-        append__JOS(string_tmp__VH,(&__string_188));
+      result__3BDB=(c__LHB == '~');
+      if (result__3BDB) {
+        append__2JS(string_tmp__VH,(&__string_190));
       };
-      __tmp__RIB=result__SGDB;
+      __tmp__ZIB=result__3BDB;
     };
-    if (__tmp__RIB) {
-      __tmp__4IB=TRUE__;
+    if (__tmp__ZIB) {
+      __tmp__GJB=TRUE__;
     } else {
-      result__EHDB=(c__DHB == '!');
-      if (result__EHDB) {
-        append__JOS(string_tmp__VH,(&__string_189));
+      result__PCDB=(c__LHB == '!');
+      if (result__PCDB) {
+        append__2JS(string_tmp__VH,(&__string_191));
       };
-      __tmp__4IB=result__EHDB;
+      __tmp__GJB=result__PCDB;
     };
-    if (__tmp__4IB) {
-      __tmp__LJB=TRUE__;
+    if (__tmp__GJB) {
+      __tmp__TJB=TRUE__;
     } else {
-      result__WHDB=(c__DHB == '/');
-      if (result__WHDB) {
-        append__JOS(string_tmp__VH,(&__string_190));
+      result__BDDB=(c__LHB == '/');
+      if (result__BDDB) {
+        append__2JS(string_tmp__VH,(&__string_192));
       };
-      __tmp__LJB=result__WHDB;
+      __tmp__TJB=result__BDDB;
     };
-    if (__tmp__LJB) {
-      __tmp__YJB=TRUE__;
+    if (__tmp__TJB) {
+      __tmp__AKB=TRUE__;
     } else {
-      result__IIDB=(c__DHB == '*');
-      if (result__IIDB) {
-        append__JOS(string_tmp__VH,(&__string_191));
+      result__TDDB=(c__LHB == '*');
+      if (result__TDDB) {
+        append__2JS(string_tmp__VH,(&__string_193));
       };
-      __tmp__YJB=result__IIDB;
+      __tmp__AKB=result__TDDB;
     };
-    if (__tmp__YJB) {
-      __tmp__FKB=TRUE__;
+    if (__tmp__AKB) {
+      __tmp__NKB=TRUE__;
     } else {
-      result__0IDB=(c__DHB == '^');
-      if (result__0IDB) {
-        append__JOS(string_tmp__VH,(&__string_192));
+      result__FEDB=(c__LHB == '^');
+      if (result__FEDB) {
+        append__2JS(string_tmp__VH,(&__string_194));
       };
-      __tmp__FKB=result__0IDB;
+      __tmp__NKB=result__FEDB;
     };
-    if (__tmp__FKB) {
-      __tmp__SKB=TRUE__;
+    if (__tmp__NKB) {
+      __tmp__0KB=TRUE__;
     } else {
-      result__MJDB=(c__DHB == '%');
-      if (result__MJDB) {
-        append__JOS(string_tmp__VH,(&__string_193));
+      result__XEDB=(c__LHB == '%');
+      if (result__XEDB) {
+        append__2JS(string_tmp__VH,(&__string_195));
       };
-      __tmp__SKB=result__MJDB;
+      __tmp__0KB=result__XEDB;
     };
-    if (__tmp__SKB) {
-      __tmp__5KB=TRUE__;
+    if (__tmp__0KB) {
+      __tmp__HLB=TRUE__;
     } else {
-      result__4JDB=(c__DHB == '>');
-      if (result__4JDB) {
-        append__JOS(string_tmp__VH,(&__string_194));
+      result__JFDB=(c__LHB == '>');
+      if (result__JFDB) {
+        append__2JS(string_tmp__VH,(&__string_196));
       };
-      __tmp__5KB=result__4JDB;
+      __tmp__HLB=result__JFDB;
     };
-    if (__tmp__5KB) {
-      __tmp__MLB=TRUE__;
+    if (__tmp__HLB) {
+      __tmp__ULB=TRUE__;
     } else {
-      result__QKDB=(c__DHB == '<');
-      if (result__QKDB) {
-        append__JOS(string_tmp__VH,(&__string_195));
+      result__1FDB=(c__LHB == '<');
+      if (result__1FDB) {
+        append__2JS(string_tmp__VH,(&__string_197));
       };
-      __tmp__MLB=result__QKDB;
+      __tmp__ULB=result__1FDB;
     };
-    if (__tmp__MLB) {
-      __tmp__ZLB=TRUE__;
+    if (__tmp__ULB) {
+      __tmp__BMB=TRUE__;
     } else {
-      result__CLDB=(c__DHB == '=');
-      if (result__CLDB) {
-        append__JOS(string_tmp__VH,(&__string_196));
+      result__NGDB=(c__LHB == '=');
+      if (result__NGDB) {
+        append__2JS(string_tmp__VH,(&__string_198));
       };
-      __tmp__ZLB=result__CLDB;
+      __tmp__BMB=result__NGDB;
     };
-    if (__tmp__ZLB) {
-      __tmp__GMB=TRUE__;
+    if (__tmp__BMB) {
+      __tmp__OMB=TRUE__;
     } else {
-      result__ULDB=(c__DHB == '\\');
-      if (result__ULDB) {
-        append__JOS(string_tmp__VH,(&__string_197));
+      result__5GDB=(c__LHB == '\\');
+      if (result__5GDB) {
+        append__2JS(string_tmp__VH,(&__string_199));
       };
-      __tmp__GMB=result__ULDB;
+      __tmp__OMB=result__5GDB;
     };
-    if (__tmp__GMB) {
-      __tmp__TMB=TRUE__;
+    if (__tmp__OMB) {
+      __tmp__1MB=TRUE__;
     } else {
-      result__GMDB=(c__DHB == '|');
-      if (result__GMDB) {
-        append__JOS(string_tmp__VH,(&__string_198));
+      result__RHDB=(c__LHB == '|');
+      if (result__RHDB) {
+        append__2JS(string_tmp__VH,(&__string_200));
       };
-      __tmp__TMB=result__GMDB;
+      __tmp__1MB=result__RHDB;
     };
-    if (__tmp__TMB) {
-      __tmp__ANB=TRUE__;
+    if (__tmp__1MB) {
+      __tmp__INB=TRUE__;
     } else {
-      result__YMDB=(c__DHB == '&');
-      if (result__YMDB) {
-        append__JOS(string_tmp__VH,(&__string_199));
+      result__DIDB=(c__LHB == '&');
+      if (result__DIDB) {
+        append__2JS(string_tmp__VH,(&__string_201));
       };
-      __tmp__ANB=result__YMDB;
+      __tmp__INB=result__DIDB;
     };
-    if (__tmp__ANB) {
-      __tmp__NNB=TRUE__;
+    if (__tmp__INB) {
+      __tmp__VNB=TRUE__;
     } else {
-      result__KNDB=(c__DHB == '$');
-      if (result__KNDB) {
-        append__JOS(string_tmp__VH,(&__string_200));
+      result__VIDB=(c__LHB == '$');
+      if (result__VIDB) {
+        append__2JS(string_tmp__VH,(&__string_202));
       };
-      __tmp__NNB=result__KNDB;
+      __tmp__VNB=result__VIDB;
     };
-    if (__tmp__NNB) {
-      __tmp__0NB=TRUE__;
+    if (__tmp__VNB) {
+      __tmp__COB=TRUE__;
     } else {
-      result__2NDB=(c__DHB == '#');
-      if (result__2NDB) {
-        append__JOS(string_tmp__VH,(&__string_201));
+      result__HJDB=(c__LHB == '#');
+      if (result__HJDB) {
+        append__2JS(string_tmp__VH,(&__string_203));
       };
-      __tmp__0NB=result__2NDB;
+      __tmp__COB=result__HJDB;
     };
-    if (__tmp__0NB) {
-      __tmp__HOB=TRUE__;
+    if (__tmp__COB) {
+      __tmp__POB=TRUE__;
     } else {
-      result__OODB=(c__DHB == '@');
-      if (result__OODB) {
-        append__JOS(string_tmp__VH,(&__string_202));
+      result__ZJDB=(c__LHB == '@');
+      if (result__ZJDB) {
+        append__2JS(string_tmp__VH,(&__string_204));
       };
-      __tmp__HOB=result__OODB;
+      __tmp__POB=result__ZJDB;
     };
-    if ((! __tmp__HOB)) {
-      if ((c__DHB == '?')) {
-        append__JOS(string_tmp__VH,(&__string_203));
+    if ((! __tmp__POB)) {
+      if ((c__LHB == '?')) {
+        append__2JS(string_tmp__VH,(&__string_205));
       };
     };
-    Self__CWB=(__INTEGER)(Self__CWB +  1);
+    Self__KWB=(__INTEGER)(Self__KWB +  1);
   };
-  return(get__QWB(string_tmp__VH));
+  return(get__YWB(string_tmp__VH));
 }
 
-static void print__4HD(__STRING_CONSTANT *Self__5HD)
+static void print__DID(__STRING_CONSTANT *Self__EID)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__AIF(Self__5HD);
+  put_string__WEF(Self__EID);
 }
 
-static void* get__QWB(void *str__SWB)
+static void* get__YWB(void *str__0WB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__2WB,*__tmp__0XB;
+  void *result__KHS;
+  __STRING *Self__UBX;
+  __INTEGER result__WBX,__tmp__XBX,Self__AR2,typ_id__ULD,c__LBT;
+  __INTEGER Self__ZGHH,result__3NIH,__tmp__5NIH,Self__AOIH,idx__MZS;
+  __INTEGER typ_id__2BJB;
+  __STRING_CONSTANT *result__OLD,*result__WDF,*Self__JBT,*Self__4NIH;
+  __POINTER ptr__PLD,ptr_table__UNIH,next__TNIH,result__VNIH;
+  __POINTER ptr_table__ZNIH,next__YNIH,result__0NIH,ptr__XBJB;
+  __POINTER ptr_table__DOIH,next__COIH,result__EOIH,ptr_table__IOIH;
+  __POINTER next__HOIH,result__JOIH;
+  __UINTEGER_32 sz__RLD,a__3HFH,new_size__4HFH,t__CIFH,a__BIFH;
+  __UINTEGER_32 new_size__2NIH,lab_type__1NIH,sz__ZBJB,a__RWFH;
+  __UINTEGER_32 new_size__SWFH,t__WWFH,a__VWFH,new_size__LOIH;
+  __UINTEGER_32 lab_type__KOIH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__XGS,*Self__DZS;
+  void *node__JHS,*node__NZS,*n__0FCB;
+  __CHARACTER *Self__0GHH,*model__1GHH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__WBJB,*Self__C4CC;
+  result__2WB=NULL;
+  Self__XGS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__KHS=NULL;
+  Self__UBX=((__STRING *)str__0WB);
+  result__WBX= 0;
+  __tmp__XBX=Self__UBX->count__EGC;
+  Self__AR2= 1;
+  while ((Self__AR2 <= __tmp__XBX)) {
+    result__WBX=(__INTEGER)((__INTEGER)( 5 * result__WBX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__UBX->storage__23R)[(__INTEGER)(Self__AR2 -  1)])));
+    Self__AR2=(__INTEGER)(Self__AR2 +  1);
+  };
+  if ((result__WBX <  0)) {
+    result__WBX=(__INTEGER)(~ result__WBX);
+  };
+  node__JHS=((void **)Self__XGS->buckets__ZUR)[(__INTEGER)(result__WBX % Self__XGS->capacity__UUR)];
+  while ((! (((void *)node__JHS == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JHS)->item__FVR,str__0WB)))) {
+    node__JHS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JHS)->next__RVR;
+  };
+  if (((void *)node__JHS != (void *)NULL)) {
+    result__KHS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__JHS)->item__FVR;
+  };
+  if (((void *)result__KHS == (void *)NULL)) {
+    result__OLD=NULL;
+    ptr__PLD=((__POINTER )(NULL));
+    typ_id__ULD= 0;
+    sz__RLD=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__RLD ==  0)) {
+      result__OLD=STRING_CONSTANT__;
+    } else {
+      typ_id__ULD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RLD);
+      if ((typ_id__ULD == (__INTEGER)(-  1))) {
+        a__3HFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4HFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RLD + a__3HFH) & (__UINTEGER_32)(~ a__3HFH));
+        ptr_table__UNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4HFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TNIH=((__POINTER )(NULL));
+        result__VNIH=((__POINTER *)ptr_table__UNIH)[ 0];
+        if ((result__VNIH == (void *)NULL)) {
+          result__VNIH=new_lab__QOJ(new_size__4HFH);
+          next__TNIH=(void *)((unsigned long)result__VNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HFH)));
+          ((__POINTER *)next__TNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UNIH)[ 0]=next__TNIH;
+        } else {
+          next__TNIH=((__POINTER *)result__VNIH)[ 0];
+          if ((next__TNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VNIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4HFH <<  1)) <=  4096)) {
+              next__TNIH=(void *)((unsigned long)result__VNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HFH)));
             } else {
-              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)));
+              next__TNIH=new_lab__QOJ(new_size__4HFH);
+            };
+            ((__POINTER *)next__TNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UNIH)[ 0]=next__TNIH;
+          } else {
+            ((__POINTER *)result__VNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VNIH=next__TNIH;
+          };
+        };
+        ptr__PLD=result__VNIH;
+      } else {
+        t__CIFH=((__UINTEGER_32 )typ_id__ULD);
+        a__BIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2NIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RLD + a__BIFH) & (__UINTEGER_32)(~ a__BIFH));
+        ptr_table__ZNIH=((__POINTER )(&(table_type[(t__CIFH)])));
+        lab_type__1NIH=(__UINTEGER_32)(t__CIFH |  1);
+        next__YNIH=((__POINTER )(NULL));
+        result__0NIH=((__POINTER *)ptr_table__ZNIH)[ 0];
+        if ((result__0NIH == (void *)NULL)) {
+          result__0NIH=new_lab__QOJ(lab_type__1NIH);
+          next__YNIH=(void *)((unsigned long)result__0NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NIH)));
+          ((__POINTER *)next__YNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZNIH)[ 0]=next__YNIH;
+        } else {
+          next__YNIH=((__POINTER *)result__0NIH)[ 0];
+          if ((next__YNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0NIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2NIH <<  1)) <=  4096)) {
+              next__YNIH=(void *)((unsigned long)result__0NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NIH)));
             } else {
-              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)));
+              next__YNIH=new_lab__QOJ(lab_type__1NIH);
+            };
+            ((__POINTER *)next__YNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZNIH)[ 0]=next__YNIH;
+          } else {
+            ((__POINTER *)result__0NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0NIH=next__YNIH;
+          };
+        };
+        ptr__PLD=result__0NIH;
+      };
+      result__OLD=((__STRING_CONSTANT *)ptr__PLD);
+      *(result__OLD) = *(STRING_CONSTANT__);
+    };
+    result__WDF=result__OLD;
+    Self__JBT=((__STRING_CONSTANT *)result__OLD);
+    c__LBT=((__STRING *)str__0WB)->count__EGC;
+    if ((c__LBT !=  0)) {
+      Self__JBT->storage__QMO=create__UHEB((__INTEGER)(c__LBT +  1));
+      Self__0GHH=((__CHARACTER *)Self__JBT->storage__QMO);
+      model__1GHH=((__STRING *)str__0WB)->storage__23R;
+      Self__ZGHH=(__INTEGER)(c__LBT -  1);
+      while ((Self__ZGHH >=  0)) {
+        Self__0GHH[Self__ZGHH]=((__CHARACTER *)model__1GHH)[Self__ZGHH];
+        Self__ZGHH=(__INTEGER)(Self__ZGHH -  1);
+      };
+      ((__CHARACTER *)Self__JBT->storage__QMO)[c__LBT]='\0';
+      Self__JBT->count__DD=c__LBT;
+    };
+    result__2WB=result__OLD;
+    Self__DZS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__B2X(Self__DZS,result__OLD);
+    fast_has__B2X(Self__DZS,result__OLD);
+    Self__4NIH=((__STRING_CONSTANT *)result__OLD);
+    result__3NIH= 0;
+    __tmp__5NIH=Self__4NIH->count__DD;
+    Self__AOIH= 1;
+    while ((Self__AOIH <= __tmp__5NIH)) {
+      result__3NIH=(__INTEGER)((__INTEGER)( 5 * result__3NIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4NIH->storage__QMO)[(__INTEGER)(Self__AOIH -  1)])));
+      Self__AOIH=(__INTEGER)(Self__AOIH +  1);
+    };
+    if ((result__3NIH <  0)) {
+      result__3NIH=(__INTEGER)(~ result__3NIH);
+    };
+    idx__MZS=(__INTEGER)(result__3NIH % Self__DZS->capacity__UUR);
+    node__NZS=((void **)Self__DZS->buckets__ZUR)[idx__MZS];
+    while ((! (((void *)node__NZS == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NZS)->item__FVR == (void *)result__WDF)))) {
+      node__NZS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__NZS)->next__RVR;
+    };
+    if (((void *)node__NZS == (void *)NULL)) {
+      if ((Self__DZS->capacity__UUR == Self__DZS->count__0VR)) {
+        increase_capacity__SNNB(Self__DZS);
+        idx__MZS=(__INTEGER)(result__3NIH % Self__DZS->capacity__UUR);
+      };
+      n__0FCB=((void **)Self__DZS->buckets__ZUR)[idx__MZS];
+      result__WBJB=NULL;
+      ptr__XBJB=((__POINTER )(NULL));
+      typ_id__2BJB= 0;
+      sz__ZBJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__ZBJB ==  0)) {
+        result__WBJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__2BJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZBJB);
+        if ((typ_id__2BJB == (__INTEGER)(-  1))) {
+          a__RWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__SWFH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBJB + a__RWFH) & (__UINTEGER_32)(~ a__RWFH));
+          ptr_table__DOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SWFH / ((__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__QOJ(new_size__SWFH);
+            next__COIH=(void *)((unsigned long)result__EOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWFH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SWFH <<  1)) <=  4096)) {
+                next__COIH=(void *)((unsigned long)result__EOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWFH)));
               } else {
-                next__ADIH=new_lab__URJ(new_size__5KFH);
+                next__COIH=new_lab__QOJ(new_size__SWFH);
               };
-              ((__POINTER *)next__ADIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__BDIH)[ 0]=next__ADIH;
+              ((__POINTER *)next__COIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DOIH)[ 0]=next__COIH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__EOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__COIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EOIH=next__COIH;
+            };
+          };
+          ptr__XBJB=result__EOIH;
+        } else {
+          t__WWFH=((__UINTEGER_32 )typ_id__2BJB);
+          a__VWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBJB + a__VWFH) & (__UINTEGER_32)(~ a__VWFH));
+          ptr_table__IOIH=((__POINTER )(&(table_type[(t__WWFH)])));
+          lab_type__KOIH=(__UINTEGER_32)(t__WWFH |  1);
+          next__HOIH=((__POINTER )(NULL));
+          result__JOIH=((__POINTER *)ptr_table__IOIH)[ 0];
+          if ((result__JOIH == (void *)NULL)) {
+            result__JOIH=new_lab__QOJ(lab_type__KOIH);
+            next__HOIH=(void *)((unsigned long)result__JOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOIH)));
+            ((__POINTER *)next__HOIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IOIH)[ 0]=next__HOIH;
+          } else {
+            next__HOIH=((__POINTER *)result__JOIH)[ 0];
+            if ((next__HOIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JOIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LOIH <<  1)) <=  4096)) {
+                next__HOIH=(void *)((unsigned long)result__JOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LOIH)));
               } else {
-                next__FDIH=new_lab__URJ(lab_type__IDIH);
+                next__HOIH=new_lab__QOJ(lab_type__KOIH);
               };
-              ((__POINTER *)next__FDIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GDIH)[ 0]=next__FDIH;
+              ((__POINTER *)next__HOIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IOIH)[ 0]=next__HOIH;
             } else {
-              ((__POINTER *)result__HDIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FDIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__HDIH=next__FDIH;
+              ((__POINTER *)result__JOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JOIH=next__HOIH;
             };
           };
-          ptr__LGJB=result__HDIH;
+          ptr__XBJB=result__JOIH;
         };
-        result__KGJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__LGJB);
-        *(result__KGJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__WBJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__XBJB);
+        *(result__WBJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      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);
+      Self__C4CC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__WBJB);
+      Self__C4CC->item__FVR=result__OLD;
+      Self__C4CC->next__RVR=n__0FCB;
+      node__NZS=result__WBJB;
+      ((void **)Self__DZS->buckets__ZUR)[idx__MZS]=result__WBJB;
+      Self__DZS->count__0VR=(__INTEGER)(Self__DZS->count__0VR +  1);
     };
   } else {
-    if (result__XLS==NULL) {
-      __tmp__SXB=NULL;
+    if (result__KHS==NULL) {
+      __tmp__0XB=NULL;
     } else {
-      __tmp__SXB=((void *)result__XLS);
+      __tmp__0XB=((void *)result__KHS);
     };
-    result__UWB=__tmp__SXB;
+    result__2WB=__tmp__0XB;
   };
-  return(result__UWB);
+  return(result__2WB);
 }
 
-static void copy__BDS(__STRING *Self__CDS,void *other__DDS)
+static void copy__U4R(__STRING *Self__V4R,void *other__W4R)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__X4R,Self__EHHH;
+  __CHARACTER *__tmp__M5R,*__tmp__O5R,*Self__FHHH,*model__GHHH;
+  if (((struct ___OBJ *)other__W4R)->__id==__STRING_CONSTANT__) {
+    __tmp__X4R=((__STRING_CONSTANT *)other__W4R)->count__DD;
   } else {
-    __tmp__EDS=((__STRING *)other__DDS)->count__4FC;
+    __tmp__X4R=((__STRING *)other__W4R)->count__EGC;
   };
-  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;
+  Self__V4R->count__EGC=__tmp__X4R;
+  if ((__tmp__X4R >  0)) {
+    if ((Self__V4R->capacity__T3R < __tmp__X4R)) {
+      Self__V4R->storage__23R=create__UHEB(__tmp__X4R);
+      Self__V4R->capacity__T3R=Self__V4R->count__EGC;
     };
-    __tmp__ZDS=Self__CDS->storage__JCS;
-    if (((struct ___OBJ *)other__DDS)->__id==__STRING_CONSTANT__) {
-      __tmp__1DS=((__STRING_CONSTANT *)other__DDS)->storage__3QO;
+    __tmp__M5R=Self__V4R->storage__23R;
+    if (((struct ___OBJ *)other__W4R)->__id==__STRING_CONSTANT__) {
+      __tmp__O5R=((__STRING_CONSTANT *)other__W4R)->storage__QMO;
     } else {
-      __tmp__1DS=((__STRING *)other__DDS)->storage__JCS;
+      __tmp__O5R=((__STRING *)other__W4R)->storage__23R;
     };
-    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);
+    Self__FHHH=((__CHARACTER *)__tmp__M5R);
+    model__GHHH=__tmp__O5R;
+    Self__EHHH=(__INTEGER)(Self__V4R->count__EGC -  1);
+    while ((Self__EHHH >=  0)) {
+      Self__FHHH[Self__EHHH]=((__CHARACTER *)model__GHHH)[Self__EHHH];
+      Self__EHHH=(__INTEGER)(Self__EHHH -  1);
     };
   };
 }
 
-static void append__JOS(__STRING *Self__KOS,void *other__LOS)
+static void append__2JS(__STRING *Self__3JS,void *other__4JS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__HKS,needed_capacity__AKS,old_nb_elts__QYDC;
+  __INTEGER upper__OHHH,Self__MHHH,dest__UIBC,src_capacity__VIBC;
+  __INTEGER i2__FJBC,i1__EJBC;
+  __CHARACTER *Self__PYDC,*new__HZDC,*__tmp__ELS,*__tmp__FLS,*Self__SIBC;
+  __CHARACTER *src__TIBC;
+  if (((struct ___OBJ *)other__4JS)->__id==__STRING_CONSTANT__) {
+    __tmp__HKS=((__STRING_CONSTANT *)other__4JS)->count__DD;
   } else {
-    __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;
+    __tmp__HKS=((__STRING *)other__4JS)->count__EGC;
+  };
+  needed_capacity__AKS=(__INTEGER)(Self__3JS->count__EGC + __tmp__HKS);
+  if ((Self__3JS->capacity__T3R < needed_capacity__AKS)) {
+    if ((Self__3JS->capacity__T3R ==  0)) {
+      Self__3JS->capacity__T3R=needed_capacity__AKS;
+      Self__3JS->storage__23R=create__UHEB(needed_capacity__AKS);
+    } else {
+      Self__PYDC=((__CHARACTER *)Self__3JS->storage__23R);
+      old_nb_elts__QYDC=Self__3JS->capacity__T3R;
+      new__HZDC=((__CHARACTER *)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )Self__PYDC),((__UINTEGER_32 )old_nb_elts__QYDC),((__UINTEGER_32 )needed_capacity__AKS)));
+      upper__OHHH=(__INTEGER)(needed_capacity__AKS -  1);
+      Self__MHHH=old_nb_elts__QYDC;
+      while ((Self__MHHH <= upper__OHHH)) {
+        new__HZDC[Self__MHHH]='\0';
+        Self__MHHH=(__INTEGER)(Self__MHHH +  1);
+      };
+      Self__3JS->storage__23R=new__HZDC;
+      Self__3JS->capacity__T3R=needed_capacity__AKS;
+    };
+  };
+  __tmp__ELS=Self__3JS->storage__23R;
+  if (((struct ___OBJ *)other__4JS)->__id==__STRING_CONSTANT__) {
+    __tmp__FLS=((__STRING_CONSTANT *)other__4JS)->storage__QMO;
   } else {
-    __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;
+    __tmp__FLS=((__STRING *)other__4JS)->storage__23R;
+  };
+  Self__SIBC=((__CHARACTER *)__tmp__ELS);
+  src__TIBC=__tmp__FLS;
+  dest__UIBC=Self__3JS->count__EGC;
+  src_capacity__VIBC=__tmp__HKS;
+  i2__FJBC= 0;
+  i1__EJBC=dest__UIBC;
+  while ((i2__FJBC != src_capacity__VIBC)) {
+    Self__SIBC[i1__EJBC]=((__CHARACTER *)src__TIBC)[i2__FJBC];
+    i2__FJBC=(__INTEGER)(i2__FJBC +  1);
+    i1__EJBC=(__INTEGER)(i1__EJBC +  1);
+  };
+  Self__3JS->count__EGC=needed_capacity__AKS;
 }
 
-static void* parent_directory__WED()
+static void* parent_directory__1ED()
 // () With resultNo recursive, No inlinable.
 {
-  __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';
+  __STRING *Self__THHH,*Self__MOIH;
+  void *__tmp__LFD;
+  void *__tmp__MFD,*result__5ED;
+  __CHARACTER *cwd__4ED;
+  ((__STRING *)string_tmp__AFD)->count__EGC= 0;
+  Self__THHH=((__STRING *)string_tmp__AFD);
+  if ((Self__THHH->capacity__T3R > Self__THHH->count__EGC)) {
+    ((__CHARACTER *)Self__THHH->storage__23R)[Self__THHH->count__EGC]='\0';
   } else {
-    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;
+    add_last__UHT(Self__THHH,'\0');
+    Self__THHH->count__EGC=(__INTEGER)(Self__THHH->count__EGC -  1);
+  };
+  cwd__4ED=Self__THHH->storage__23R;
+  getcwd((cwd__4ED),255);
+  Self__MOIH=((__STRING *)string_tmp__AFD);
+  Self__MOIH->count__EGC= 0;
+  while ((((__CHARACTER *)cwd__4ED)[Self__MOIH->count__EGC] != '\0')) {
+    Self__MOIH->count__EGC=(__INTEGER)(Self__MOIH->count__EGC +  1);
+  };
+  if (((void *)Self__MOIH->storage__23R != (void *)cwd__4ED)) {
+    Self__MOIH->storage__23R=cwd__4ED;
+    Self__MOIH->capacity__T3R=(__INTEGER)(Self__MOIH->count__EGC +  1);
+  };
+  __tmp__LFD=physical_get_entry__H5E(string_tmp__AFD);
+  if (__tmp__LFD==NULL) {
+    __tmp__MFD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__GFD)->__id) {
+    switch (((struct ___OBJ *)__tmp__LFD)->__id) {
     case __DIRECTORY_UNIX__: {
-      __tmp__HFD=((void *)__tmp__GFD);
+      __tmp__MFD=((void *)__tmp__LFD);
     } break;
     case __FILE_UNIX__: {
-      __tmp__HFD=NULL;
+      __tmp__MFD=NULL;
     } break;
     }
   };
-  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);
+  result__5ED=__tmp__MFD;
+  put__to__MWS(alias__RFD,__tmp__MFD,((__DIRECTORY_UNIX *)__tmp__MFD)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  FILE_SYSTEM__->parent_directory__1FD=__tmp__MFD;
+  FILE_SYSTEM__->parent_directory__2FD=0;
+  return(__tmp__MFD);
 }
 
-static void* get_entry__10AC(void *p__30AC)
+static void* get_entry__0XAC(void *p__2XAC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__4XAC;
+  __INTEGER idx__5XAC,idx__EPHH,n__JPHH,n__KPHH,__tmp__J0AC;
+  void *__tmp__PDIC,*__tmp__U0AC,*dir__S0AC;
+  __STRING *Self__DIFH,*Self__IPHH;
+  __CHARACTER *Self__GPHH;
+  __BOOLEAN __tmp__YZAC,__tmp__D0AC;
+  result__4XAC=NULL;
+  idx__5XAC= 0;
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
-    __tmp__RFIC=FILE_SYSTEM__->parent_directory__WFD;
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    __tmp__PDIC=FILE_SYSTEM__->parent_directory__1FD;
   } else {
-    __tmp__RFIC=parent_directory__WED();
+    __tmp__PDIC=parent_directory__1ED();
   };
-  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) {
+  copy__U4R(string_tmp2__AYAC,((__DIRECTORY_UNIX *)__tmp__PDIC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  add_last__BMT(string_tmp2__B1AC,'/');
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  add_last__UHT(string_tmp2__AYAC,'/');
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  append__JOS(string_tmp2__B1AC,p__30AC);
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  append__2JS(string_tmp2__AYAC,p__2XAC);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  reduce_path__Y3HC(string_tmp2__B1AC);
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  reduce_path__W1HC(string_tmp2__AYAC);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  copy__BDS(string_tmp3__H1AC,string_tmp2__B1AC);
+  copy__U4R(string_tmp3__GYAC,string_tmp2__AYAC);
   do {
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    result__50AC=reference_at__MU0C(alias__MFD,string_tmp2__B1AC);
-    if (((void *)result__50AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    result__4XAC=reference_at__WT0C(alias__RFD,string_tmp2__AYAC);
+    if (((void *)result__4XAC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
-        parent_directory__WED();
+        parent_directory__1ED();
       };
-      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);
+      Self__DIFH=((__STRING *)string_tmp2__AYAC);
+      Self__GPHH=((__CHARACTER *)Self__DIFH->storage__23R);
+      idx__EPHH=(__INTEGER)(Self__DIFH->count__EGC -  1);
+      while ((! ((idx__EPHH <  0) || ('/' == Self__GPHH[idx__EPHH])))) {
+        idx__EPHH=(__INTEGER)(idx__EPHH -  1);
       };
-      idx__A1AC=(__INTEGER)( 1 + idx__RDHH);
-      if ((idx__A1AC >  0)) {
-        if (FILE_SYSTEM__->parent_directory__XFD==0) {
+      idx__5XAC=(__INTEGER)( 1 + idx__EPHH);
+      if ((idx__5XAC >  0)) {
+        if (FILE_SYSTEM__->parent_directory__2FD==0) {
         } else {
-          parent_directory__WED();
+          parent_directory__1ED();
         };
-        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;
+        Self__IPHH=((__STRING *)string_tmp2__AYAC);
+        n__JPHH=(__INTEGER)(idx__5XAC -  1);
+        if ((n__JPHH < Self__IPHH->count__EGC)) {
+          n__KPHH=(__INTEGER)(Self__IPHH->count__EGC - n__JPHH);
+          if ((n__KPHH > Self__IPHH->count__EGC)) {
+            Self__IPHH->count__EGC= 0;
           } else {
-            Self__VDHH->count__4FC=(__INTEGER)(Self__VDHH->count__4FC - n__XDHH);
+            Self__IPHH->count__EGC=(__INTEGER)(Self__IPHH->count__EGC - n__KPHH);
           };
         };
       } else {
-        if (FILE_SYSTEM__->parent_directory__XFD==0) {
+        if (FILE_SYSTEM__->parent_directory__2FD==0) {
         } else {
-          parent_directory__WED();
+          parent_directory__1ED();
         };
-        ((__STRING *)string_tmp2__B1AC)->count__4FC= 0;
+        ((__STRING *)string_tmp2__AYAC)->count__EGC= 0;
       };
     };
-    if (((void *)result__50AC == (void *)NULL)) {
-      if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (((void *)result__4XAC == (void *)NULL)) {
+      if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
-        parent_directory__WED();
+        parent_directory__1ED();
       };
-      __tmp__Z2AC=(((__STRING *)string_tmp2__B1AC)->count__4FC !=  0);
+      __tmp__YZAC=(((__STRING *)string_tmp2__AYAC)->count__EGC !=  0);
     } else {
-      __tmp__Z2AC=FALSE__;
+      __tmp__YZAC=FALSE__;
     };
-  } while (__tmp__Z2AC);
-  if (((void *)result__50AC == (void *)NULL)) {
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  } while (__tmp__YZAC);
+  if (((void *)result__4XAC == (void *)NULL)) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    result__50AC=physical_get_entry__AX0C(string_tmp3__H1AC);
-    __tmp__E3AC=TRUE__;
+    result__4XAC=physical_get_entry__KW0C(string_tmp3__GYAC);
+    __tmp__D0AC=TRUE__;
   } else {
-    __tmp__E3AC=FALSE__;
+    __tmp__D0AC=FALSE__;
   };
-  if ((! __tmp__E3AC)) {
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if ((! __tmp__D0AC)) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    __tmp__K3AC=((__STRING *)string_tmp3__H1AC)->count__4FC;
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    __tmp__J0AC=((__STRING *)string_tmp3__GYAC)->count__EGC;
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    if ((__tmp__K3AC != ((__STRING *)string_tmp2__B1AC)->count__4FC)) {
-      if (result__50AC==NULL) {
-        __tmp__V3AC=NULL;
+    if ((__tmp__J0AC != ((__STRING *)string_tmp2__AYAC)->count__EGC)) {
+      if (result__4XAC==NULL) {
+        __tmp__U0AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__50AC)->__id) {
+        switch (((struct ___OBJ *)result__4XAC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__V3AC=((void *)result__50AC);
+          __tmp__U0AC=((void *)result__4XAC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__V3AC=NULL;
+          __tmp__U0AC=NULL;
         } break;
         }
       };
-      dir__T3AC=__tmp__V3AC;
-      if (FILE_SYSTEM__->parent_directory__XFD==0) {
+      dir__S0AC=__tmp__U0AC;
+      if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
-        parent_directory__WED();
+        parent_directory__1ED();
       };
-      result__50AC=physical_get_entry__RCF(string_tmp3__H1AC);
+      result__4XAC=physical_get_entry__H5E(string_tmp3__GYAC);
     };
   };
-  return(result__50AC);
+  return(result__4XAC);
 }
 
-static void put_string__21F(void *s__41F)
+static void put_string__CZF(void *s__EZF)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__N2F,__tmp__P2F,Self__AXG,limit_up__BXG;
-  __CHARACTER __tmp__W2F;
-  if (((struct ___OBJ *)s__41F)->__id==__STRING_CONSTANT__) {
-    __tmp__N2F= 1;
+  __INTEGER __tmp__TZF,__tmp__VZF,Self__GUG,limit_up__HUG;
+  __CHARACTER __tmp__2ZF;
+  if (((struct ___OBJ *)s__EZF)->__id==__STRING_CONSTANT__) {
+    __tmp__TZF= 1;
   } else {
-    __tmp__N2F= 1;
+    __tmp__TZF= 1;
   };
-  if (((struct ___OBJ *)s__41F)->__id==__STRING_CONSTANT__) {
-    __tmp__P2F=((__STRING_CONSTANT *)s__41F)->count__DD;
+  if (((struct ___OBJ *)s__EZF)->__id==__STRING_CONSTANT__) {
+    __tmp__VZF=((__STRING_CONSTANT *)s__EZF)->count__DD;
   } else {
-    __tmp__P2F=((__STRING *)s__41F)->count__4FC;
+    __tmp__VZF=((__STRING *)s__EZF)->count__EGC;
   };
-  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)];
+  Self__GUG=__tmp__TZF;
+  limit_up__HUG=__tmp__VZF;
+  while ((Self__GUG <= limit_up__HUG)) {
+    if (((struct ___OBJ *)s__EZF)->__id==__STRING_CONSTANT__) {
+      __tmp__2ZF=((__CHARACTER *)((__STRING_CONSTANT *)s__EZF)->storage__QMO)[(__INTEGER)(Self__GUG -  1)];
     } else {
-      __tmp__W2F=((__CHARACTER *)((__STRING *)s__41F)->storage__JCS)[(__INTEGER)(Self__AXG -  1)];
+      __tmp__2ZF=((__CHARACTER *)((__STRING *)s__EZF)->storage__23R)[(__INTEGER)(Self__GUG -  1)];
     };
-    fputc((int)(__tmp__W2F),stderr);
-    Self__AXG=(__INTEGER)(Self__AXG +  1);
+    fputc((int)(__tmp__2ZF),stderr);
+    Self__GUG=(__INTEGER)(Self__GUG +  1);
   };
 }
 
-static __PROTOTYPE* create__name__generic_count__BBC(void *f__DBC,void *n__EBC)
+static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __PROTOTYPE *result__JVC,*Self__1OS;
+  __POINTER ptr__KVC,ptr_table__QOIH,next__POIH,result__ROIH;
+  __POINTER ptr_table__VOIH,next__UOIH,result__WOIH,ptr__ZA3;
+  __POINTER ptr_table__CPIH,next__BPIH,result__DPIH,ptr_table__HPIH;
+  __POINTER next__GPIH,result__IPIH,ptr__50GD,ptr_table__RPIH;
+  __POINTER next__QPIH,result__SPIH,ptr_table__WPIH,next__VPIH;
+  __POINTER result__XPIH,file__5OS,ptr__4G3,ptr_table__1PIH,next__0PIH;
+  __POINTER result__2PIH,ptr_table__AQIH,next__5PIH,result__BQIH;
+  __INTEGER typ_id__PVC,idx__MPHH,idx__CPS,len__1OIH,__tmp__2OIH;
+  __INTEGER __tmp__4OIH,Self__5OIH,typ_id__4A3,new_capacity__FPX;
+  __INTEGER __tmp__JQX,__tmp__YLEC,Self__4PVD,result__LPIH,__tmp__NPIH;
+  __INTEGER Self__OPIH,idx__1KBC,idx__UYGD,new_capacity__VYGD,i__WYGD;
+  __INTEGER result__TJW,__tmp__UJW,Self__KP1,typ_id__E1GD,result__GSX;
+  __INTEGER typ_id__DH3,new_capacity__ZKJC;
+  __UINTEGER_32 sz__MVC,a__MIFH,new_size__NIFH,t__RIFH,a__QIFH;
+  __UINTEGER_32 new_size__YOIH,lab_type__XOIH,sz__1A3,a__UIFH;
+  __UINTEGER_32 new_size__VIFH,t__ZIFH,a__YIFH,new_size__KPIH;
+  __UINTEGER_32 lab_type__JPIH,sz__B1GD,a__LJFH,new_size__MJFH,t__QJFH;
+  __UINTEGER_32 a__PJFH,new_size__ZPIH,lab_type__YPIH,sz__AH3,a__TJFH;
+  __UINTEGER_32 new_size__UJFH,t__YJFH,a__XJFH,new_size__DQIH;
+  __UINTEGER_32 lab_type__CQIH;
+  __STRING_CONSTANT *Self__LNX,*Self__MPIH,*Self__RJW;
+  __STRING *Self__WHHH,*Self__4HHH,*Self__BIHH,*Self__YUS;
+  void *__tmp__QQS;
+  __CHARACTER *Self__OPHH,*ptr__PSX;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__YA3,*Self__O0BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__DPX;
+  __BOOLEAN __tmp__TPX;
+  void **__tmp__IQX,**new__ELEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__RKBC;
+  void *node__3KBC,*node1__YYGD,*node2__ZYGD,*__tmp__RMBC;
+  void **old_buckets__XYGD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__40GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__T2SD;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__3G3,*Self__E2BC;
+  result__JVC=NULL;
+  ptr__KVC=((__POINTER )(NULL));
+  typ_id__PVC= 0;
+  sz__MVC=((__UINTEGER_32 )sizeof(__PROTOTYPE));
+  if ((sz__MVC ==  0)) {
+    result__JVC=PROTOTYPE__;
   } else {
-    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);
+    typ_id__PVC=__PROTOTYPE__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MVC);
+    if ((typ_id__PVC == (__INTEGER)(-  1))) {
+      a__MIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__MIFH) & (__UINTEGER_32)(~ a__MIFH));
+      ptr_table__QOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__POIH=((__POINTER )(NULL));
+      result__ROIH=((__POINTER *)ptr_table__QOIH)[ 0];
+      if ((result__ROIH == (void *)NULL)) {
+        result__ROIH=new_lab__QOJ(new_size__NIFH);
+        next__POIH=(void *)((unsigned long)result__ROIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIFH)));
+        ((__POINTER *)next__POIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QOIH)[ 0]=next__POIH;
+      } else {
+        next__POIH=((__POINTER *)result__ROIH)[ 0];
+        if ((next__POIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ROIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NIFH <<  1)) <=  4096)) {
+            next__POIH=(void *)((unsigned long)result__ROIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NIFH)));
+          } else {
+            next__POIH=new_lab__QOJ(new_size__NIFH);
+          };
+          ((__POINTER *)next__POIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QOIH)[ 0]=next__POIH;
+        } else {
+          ((__POINTER *)result__ROIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__POIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ROIH=next__POIH;
+        };
+      };
+      ptr__KVC=result__ROIH;
+    } else {
+      t__RIFH=((__UINTEGER_32 )typ_id__PVC);
+      a__QIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__QIFH) & (__UINTEGER_32)(~ a__QIFH));
+      ptr_table__VOIH=((__POINTER )(&(table_type[(t__RIFH)])));
+      lab_type__XOIH=(__UINTEGER_32)(t__RIFH |  1);
+      next__UOIH=((__POINTER )(NULL));
+      result__WOIH=((__POINTER *)ptr_table__VOIH)[ 0];
+      if ((result__WOIH == (void *)NULL)) {
+        result__WOIH=new_lab__QOJ(lab_type__XOIH);
+        next__UOIH=(void *)((unsigned long)result__WOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YOIH)));
+        ((__POINTER *)next__UOIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VOIH)[ 0]=next__UOIH;
+      } else {
+        next__UOIH=((__POINTER *)result__WOIH)[ 0];
+        if ((next__UOIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WOIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YOIH <<  1)) <=  4096)) {
+            next__UOIH=(void *)((unsigned long)result__WOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YOIH)));
+          } else {
+            next__UOIH=new_lab__QOJ(lab_type__XOIH);
+          };
+          ((__POINTER *)next__UOIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VOIH)[ 0]=next__UOIH;
+        } else {
+          ((__POINTER *)result__WOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WOIH=next__UOIH;
+        };
+      };
+      ptr__KVC=result__WOIH;
+    };
+    result__JVC=((__PROTOTYPE *)ptr__KVC);
+    *(result__JVC) = *(PROTOTYPE__);
+  };
+  Self__1OS=((__PROTOTYPE *)result__JVC);
+  Self__1OS->filename__CNG=f__LBC;
+  Self__1OS->parent_named__5.name__LI=n__MBC;
+  Self__LNX=((__STRING_CONSTANT *)n__MBC);
+  Self__OPHH=((__CHARACTER *)Self__LNX->storage__QMO);
+  idx__MPHH=(__INTEGER)(Self__LNX->count__DD -  1);
+  while ((! ((idx__MPHH <  0) || ('.' == Self__OPHH[idx__MPHH])))) {
+    idx__MPHH=(__INTEGER)(idx__MPHH -  1);
+  };
+  idx__CPS=(__INTEGER)( 1 + idx__MPHH);
+  if ((idx__CPS !=  0)) {
+    copy__U4R(string_tmp__VH,n__MBC);
+    Self__WHHH=((__STRING *)string_tmp__VH);
+    if ((idx__CPS > Self__WHHH->count__EGC)) {
+      Self__WHHH->count__EGC= 0;
+    } else {
+      if ((idx__CPS >  0)) {
+        len__1OIH=(__INTEGER)((__INTEGER)(idx__CPS -  1) +  1);
+        if ((len__1OIH >  0)) {
+          __tmp__2OIH=(__INTEGER)(idx__CPS +  1);
+          __tmp__4OIH=Self__WHHH->count__EGC;
+          Self__5OIH=__tmp__2OIH;
+          while ((Self__5OIH <= __tmp__4OIH)) {
+            ((__CHARACTER *)Self__WHHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__5OIH - len__1OIH) -  1)]=((__CHARACTER *)Self__WHHH->storage__23R)[(__INTEGER)(Self__5OIH -  1)];
+            Self__5OIH=(__INTEGER)(Self__5OIH +  1);
+          };
+          Self__WHHH->count__EGC=(__INTEGER)(Self__WHHH->count__EGC - len__1OIH);
+        };
+      };
+    };
+    Self__1OS->shortname__TEE=get__YWB(string_tmp__VH);
   } else {
-    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__;
+    Self__1OS->shortname__TEE=n__MBC;
+  };
+  result__YA3=NULL;
+  ptr__ZA3=((__POINTER )(NULL));
+  typ_id__4A3= 0;
+  sz__1A3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__1A3 ==  0)) {
+    result__YA3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    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__;
+    typ_id__4A3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1A3);
+    if ((typ_id__4A3 == (__INTEGER)(-  1))) {
+      a__UIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1A3 + a__UIFH) & (__UINTEGER_32)(~ a__UIFH));
+      ptr_table__CPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BPIH=((__POINTER )(NULL));
+      result__DPIH=((__POINTER *)ptr_table__CPIH)[ 0];
+      if ((result__DPIH == (void *)NULL)) {
+        result__DPIH=new_lab__QOJ(new_size__VIFH);
+        next__BPIH=(void *)((unsigned long)result__DPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIFH)));
+        ((__POINTER *)next__BPIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CPIH)[ 0]=next__BPIH;
+      } else {
+        next__BPIH=((__POINTER *)result__DPIH)[ 0];
+        if ((next__BPIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DPIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VIFH <<  1)) <=  4096)) {
+            next__BPIH=(void *)((unsigned long)result__DPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIFH)));
+          } else {
+            next__BPIH=new_lab__QOJ(new_size__VIFH);
+          };
+          ((__POINTER *)next__BPIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CPIH)[ 0]=next__BPIH;
+        } else {
+          ((__POINTER *)result__DPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DPIH=next__BPIH;
+        };
+      };
+      ptr__ZA3=result__DPIH;
+    } else {
+      t__ZIFH=((__UINTEGER_32 )typ_id__4A3);
+      a__YIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1A3 + a__YIFH) & (__UINTEGER_32)(~ a__YIFH));
+      ptr_table__HPIH=((__POINTER )(&(table_type[(t__ZIFH)])));
+      lab_type__JPIH=(__UINTEGER_32)(t__ZIFH |  1);
+      next__GPIH=((__POINTER )(NULL));
+      result__IPIH=((__POINTER *)ptr_table__HPIH)[ 0];
+      if ((result__IPIH == (void *)NULL)) {
+        result__IPIH=new_lab__QOJ(lab_type__JPIH);
+        next__GPIH=(void *)((unsigned long)result__IPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPIH)));
+        ((__POINTER *)next__GPIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HPIH)[ 0]=next__GPIH;
+      } else {
+        next__GPIH=((__POINTER *)result__IPIH)[ 0];
+        if ((next__GPIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IPIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__KPIH <<  1)) <=  4096)) {
+            next__GPIH=(void *)((unsigned long)result__IPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KPIH)));
+          } else {
+            next__GPIH=new_lab__QOJ(lab_type__JPIH);
+          };
+          ((__POINTER *)next__GPIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HPIH)[ 0]=next__GPIH;
+        } else {
+          ((__POINTER *)result__IPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__IPIH=next__GPIH;
+        };
+      };
+      ptr__ZA3=result__IPIH;
+    };
+    result__YA3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__ZA3);
+    *(result__YA3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__O0BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__YA3);
+  if ((Self__O0BC->parent_arrayed_collection__BJE.capacity__I5AC <  0)) {
+    Self__O0BC->parent_arrayed_collection__BJE.storage__EABC=create__HY1C( 0);
+    Self__O0BC->parent_arrayed_collection__BJE.capacity__I5AC= 0;
+  };
+  Self__O0BC->parent_arrayed_collection__BJE.upper__G5AC=(__INTEGER)(-  1);
+  Self__1OS->idf_generic_list__CJE=result__YA3;
+  Self__1OS->index__DKG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__DPX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__FPX= 0;
+  if (((__INTEGER)(Self__DPX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T -  1))) {
+    Self__DPX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__DPX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__TPX=TRUE__;
   } else {
-    __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)));
+    __tmp__TPX=FALSE__;
+  };
+  if ((! __tmp__TPX)) {
+    if ((Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T ==  0)) {
+      Self__DPX->parent_arrayed_collection__AJ.storage__FPT=create__ECSB( 2);
+      Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T= 2;
+      Self__DPX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__FPX=(__INTEGER)(Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T <<  1);
+      __tmp__IQX=Self__DPX->parent_arrayed_collection__AJ.storage__FPT;
+      __tmp__JQX=Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T;
+      new__ELEC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__IQX)),((__UINTEGER_32 )(__INTEGER)(__tmp__JQX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FPX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__YLEC=(__INTEGER)(new_capacity__FPX -  1);
+      Self__4PVD=__tmp__JQX;
+      while ((Self__4PVD <= __tmp__YLEC)) {
+        new__ELEC[Self__4PVD]=NULL;
+        Self__4PVD=(__INTEGER)(Self__4PVD +  1);
+      };
+      Self__DPX->parent_arrayed_collection__AJ.storage__FPT=new__ELEC;
+      Self__DPX->parent_arrayed_collection__AJ.capacity__Y4T=new_capacity__FPX;
+      Self__DPX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__DPX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__DPX->parent_arrayed_collection__AJ.storage__FPT)[Self__DPX->parent_arrayed_collection__AJ.upper__HJ]=Self__1OS;
+  Self__RKBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__KPS);
+  Self__MPIH=((__STRING_CONSTANT *)f__LBC);
+  result__LPIH= 0;
+  __tmp__NPIH=Self__MPIH->count__DD;
+  Self__OPIH= 1;
+  while ((Self__OPIH <= __tmp__NPIH)) {
+    result__LPIH=(__INTEGER)((__INTEGER)( 5 * result__LPIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__MPIH->storage__QMO)[(__INTEGER)(Self__OPIH -  1)])));
+    Self__OPIH=(__INTEGER)(Self__OPIH +  1);
+  };
+  if ((result__LPIH <  0)) {
+    result__LPIH=(__INTEGER)(~ result__LPIH);
+  };
+  idx__1KBC=(__INTEGER)(result__LPIH % Self__RKBC->capacity__5KBC);
+  node__3KBC=((void **)Self__RKBC->buckets__ELBC)[idx__1KBC];
+  while ((! (((void *)node__3KBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__3KBC)->key__QLBC == (void *)f__LBC)))) {
+    node__3KBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__3KBC)->next__1LBC;
+  };
+  if (((void *)node__3KBC == (void *)NULL)) {
+    if ((Self__RKBC->capacity__5KBC == Self__RKBC->count__EMBC)) {
+      idx__UYGD= 0;
+      node1__YYGD=NULL;
+      node2__ZYGD=NULL;
+      old_buckets__XYGD=Self__RKBC->buckets__ELBC;
+      new_capacity__VYGD=prime_number_ceiling__K01((__INTEGER)(Self__RKBC->capacity__5KBC +  1));
+      Self__RKBC->buckets__ELBC=create__0GTC(new_capacity__VYGD);
+      i__WYGD=(__INTEGER)(Self__RKBC->capacity__5KBC -  1);
+      Self__RKBC->capacity__5KBC=new_capacity__VYGD;
+      while ((i__WYGD >=  0)) {
+        node1__YYGD=((void **)old_buckets__XYGD)[i__WYGD];
+        while (((void *)node1__YYGD != (void *)NULL)) {
+          node2__ZYGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->next__1LBC;
+          Self__RJW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->key__QLBC);
+          result__TJW= 0;
+          __tmp__UJW=Self__RJW->count__DD;
+          Self__KP1= 1;
+          while ((Self__KP1 <= __tmp__UJW)) {
+            result__TJW=(__INTEGER)((__INTEGER)( 5 * result__TJW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__RJW->storage__QMO)[(__INTEGER)(Self__KP1 -  1)])));
+            Self__KP1=(__INTEGER)(Self__KP1 +  1);
+          };
+          if ((result__TJW <  0)) {
+            result__TJW=(__INTEGER)(~ result__TJW);
+          };
+          idx__UYGD=(__INTEGER)(result__TJW % Self__RKBC->capacity__5KBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__YYGD)->next__1LBC=((void **)Self__RKBC->buckets__ELBC)[idx__UYGD];
+          ((void **)Self__RKBC->buckets__ELBC)[idx__UYGD]=node1__YYGD;
+          node1__YYGD=node2__ZYGD;
+        };
+        i__WYGD=(__INTEGER)(i__WYGD -  1);
+      };
+      idx__1KBC=(__INTEGER)(result__LPIH % new_capacity__VYGD);
+    };
+    __tmp__RMBC=((void **)Self__RKBC->buckets__ELBC)[idx__1KBC];
+    result__40GD=NULL;
+    ptr__50GD=((__POINTER )(NULL));
+    typ_id__E1GD= 0;
+    sz__B1GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__B1GD ==  0)) {
+      result__40GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__E1GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B1GD);
+      if ((typ_id__E1GD == (__INTEGER)(-  1))) {
+        a__LJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1GD + a__LJFH) & (__UINTEGER_32)(~ a__LJFH));
+        ptr_table__RPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QPIH=((__POINTER )(NULL));
+        result__SPIH=((__POINTER *)ptr_table__RPIH)[ 0];
+        if ((result__SPIH == (void *)NULL)) {
+          result__SPIH=new_lab__QOJ(new_size__MJFH);
+          next__QPIH=(void *)((unsigned long)result__SPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MJFH)));
+          ((__POINTER *)next__QPIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RPIH)[ 0]=next__QPIH;
+        } else {
+          next__QPIH=((__POINTER *)result__SPIH)[ 0];
+          if ((next__QPIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SPIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MJFH <<  1)) <=  4096)) {
+              next__QPIH=(void *)((unsigned long)result__SPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MJFH)));
             } else {
-              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)));
+              next__QPIH=new_lab__QOJ(new_size__MJFH);
+            };
+            ((__POINTER *)next__QPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RPIH)[ 0]=next__QPIH;
+          } else {
+            ((__POINTER *)result__SPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SPIH=next__QPIH;
+          };
+        };
+        ptr__50GD=result__SPIH;
+      } else {
+        t__QJFH=((__UINTEGER_32 )typ_id__E1GD);
+        a__PJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1GD + a__PJFH) & (__UINTEGER_32)(~ a__PJFH));
+        ptr_table__WPIH=((__POINTER )(&(table_type[(t__QJFH)])));
+        lab_type__YPIH=(__UINTEGER_32)(t__QJFH |  1);
+        next__VPIH=((__POINTER )(NULL));
+        result__XPIH=((__POINTER *)ptr_table__WPIH)[ 0];
+        if ((result__XPIH == (void *)NULL)) {
+          result__XPIH=new_lab__QOJ(lab_type__YPIH);
+          next__VPIH=(void *)((unsigned long)result__XPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZPIH)));
+          ((__POINTER *)next__VPIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WPIH)[ 0]=next__VPIH;
+        } else {
+          next__VPIH=((__POINTER *)result__XPIH)[ 0];
+          if ((next__VPIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XPIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZPIH <<  1)) <=  4096)) {
+              next__VPIH=(void *)((unsigned long)result__XPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZPIH)));
             } else {
-              next__UEIH=new_lab__URJ(lab_type__XEIH);
+              next__VPIH=new_lab__QOJ(lab_type__YPIH);
             };
-            ((__POINTER *)next__UEIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VEIH)[ 0]=next__UEIH;
+            ((__POINTER *)next__VPIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WPIH)[ 0]=next__VPIH;
           } else {
-            ((__POINTER *)result__WEIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UEIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WEIH=next__UEIH;
+            ((__POINTER *)result__XPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XPIH=next__VPIH;
           };
         };
-        ptr__T1GD=result__WEIH;
+        ptr__50GD=result__XPIH;
       };
-      result__S1GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__T1GD);
-      *(result__S1GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__40GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__50GD);
+      *(result__40GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__T2SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__40GD);
+    Self__T2SD->item__I3GD=Self__1OS;
+    Self__T2SD->key__QLBC=f__LBC;
+    Self__T2SD->next__1LBC=__tmp__RMBC;
+    node__3KBC=result__40GD;
+    ((void **)Self__RKBC->buckets__ELBC)[idx__1KBC]=result__40GD;
+    Self__RKBC->count__EMBC=(__INTEGER)(Self__RKBC->count__EMBC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__WNBC)->item__23GD=Self__ITS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__3KBC)->item__I3GD=Self__1OS;
   };
-  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';
+  copy__U4R(string_tmp__3RX,f__LBC);
+  Self__4HHH=((__STRING *)string_tmp__3RX);
+  if ((Self__4HHH->capacity__T3R > Self__4HHH->count__EGC)) {
+    ((__CHARACTER *)Self__4HHH->storage__23R)[Self__4HHH->count__EGC]='\0';
   } else {
-    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';
+    add_last__UHT(Self__4HHH,'\0');
+    Self__4HHH->count__EGC=(__INTEGER)(Self__4HHH->count__EGC -  1);
+  };
+  file__5OS=((__POINTER )(fopen((char*)(Self__4HHH->storage__23R),"rb")));
+  fseek((FILE*)((file__5OS)),0,SEEK_END);
+  result__GSX=((__INTEGER )(ftell((FILE *)(file__5OS))));
+  fseek((FILE*)((file__5OS)),0,SEEK_SET);
+  Self__1OS->source__3BC=create__ZBB((__INTEGER)(result__GSX +  1));
+  __tmp__QQS=Self__1OS->source__3BC;
+  Self__BIHH=((__STRING *)__tmp__QQS);
+  if ((Self__BIHH->capacity__T3R > Self__BIHH->count__EGC)) {
+    ((__CHARACTER *)Self__BIHH->storage__23R)[Self__BIHH->count__EGC]='\0';
   } else {
-    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__;
+    add_last__UHT(Self__BIHH,'\0');
+    Self__BIHH->count__EGC=(__INTEGER)(Self__BIHH->count__EGC -  1);
+  };
+  ptr__PSX=Self__BIHH->storage__23R;
+  fread((void *)((ptr__PSX)),(size_t)(1), (size_t)((result__GSX)),(FILE*)((file__5OS)));
+  ((__CHARACTER *)ptr__PSX)[result__GSX]='\0';
+  Self__YUS=((__STRING *)__tmp__QQS);
+  Self__YUS->count__EGC= 0;
+  while ((((__CHARACTER *)ptr__PSX)[Self__YUS->count__EGC] != '\0')) {
+    Self__YUS->count__EGC=(__INTEGER)(Self__YUS->count__EGC +  1);
+  };
+  if (((void *)Self__YUS->storage__23R != (void *)ptr__PSX)) {
+    Self__YUS->storage__23R=ptr__PSX;
+    Self__YUS->capacity__T3R=(__INTEGER)(Self__YUS->count__EGC +  1);
+  };
+  fclose((FILE*)((file__5OS)));
+  result__3G3=NULL;
+  ptr__4G3=((__POINTER )(NULL));
+  typ_id__DH3= 0;
+  sz__AH3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__AH3 ==  0)) {
+    result__3G3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
   } else {
-    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);
+    typ_id__DH3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AH3);
+    if ((typ_id__DH3 == (__INTEGER)(-  1))) {
+      a__TJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__AH3 + a__TJFH) & (__UINTEGER_32)(~ a__TJFH));
+      ptr_table__1PIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__0PIH=((__POINTER )(NULL));
+      result__2PIH=((__POINTER *)ptr_table__1PIH)[ 0];
+      if ((result__2PIH == (void *)NULL)) {
+        result__2PIH=new_lab__QOJ(new_size__UJFH);
+        next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJFH)));
+        ((__POINTER *)next__0PIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1PIH)[ 0]=next__0PIH;
+      } else {
+        next__0PIH=((__POINTER *)result__2PIH)[ 0];
+        if ((next__0PIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2PIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__UJFH <<  1)) <=  4096)) {
+            next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UJFH)));
+          } else {
+            next__0PIH=new_lab__QOJ(new_size__UJFH);
+          };
+          ((__POINTER *)next__0PIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1PIH)[ 0]=next__0PIH;
+        } else {
+          ((__POINTER *)result__2PIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2PIH=next__0PIH;
+        };
+      };
+      ptr__4G3=result__2PIH;
+    } else {
+      t__YJFH=((__UINTEGER_32 )typ_id__DH3);
+      a__XJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__AH3 + a__XJFH) & (__UINTEGER_32)(~ a__XJFH));
+      ptr_table__AQIH=((__POINTER )(&(table_type[(t__YJFH)])));
+      lab_type__CQIH=(__UINTEGER_32)(t__YJFH |  1);
+      next__5PIH=((__POINTER )(NULL));
+      result__BQIH=((__POINTER *)ptr_table__AQIH)[ 0];
+      if ((result__BQIH == (void *)NULL)) {
+        result__BQIH=new_lab__QOJ(lab_type__CQIH);
+        next__5PIH=(void *)((unsigned long)result__BQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQIH)));
+        ((__POINTER *)next__5PIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AQIH)[ 0]=next__5PIH;
+      } else {
+        next__5PIH=((__POINTER *)result__BQIH)[ 0];
+        if ((next__5PIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BQIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DQIH <<  1)) <=  4096)) {
+            next__5PIH=(void *)((unsigned long)result__BQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQIH)));
+          } else {
+            next__5PIH=new_lab__QOJ(lab_type__CQIH);
+          };
+          ((__POINTER *)next__5PIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AQIH)[ 0]=next__5PIH;
+        } else {
+          ((__POINTER *)result__BQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BQIH=next__5PIH;
+        };
+      };
+      ptr__4G3=result__BQIH;
+    };
+    result__3G3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__4G3);
+    *(result__3G3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__E2BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__3G3);
+  new_capacity__ZKJC=prime_number_ceiling__K01( 193);
+  Self__E2BC->buckets__04FC=create__QPSC(new_capacity__ZKJC);
+  Self__E2BC->capacity__L2BC=new_capacity__ZKJC;
+  Self__E2BC->count__FNGC= 0;
+  Self__1OS->slot_list__XQS=result__3G3;
+  Self__1OS->parent_named__5.parent_itm_object__4.position__RAJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__1OS->index__DKG) |  131072));
+  return(result__JVC);
 }
 
-static __BOOLEAN read_space__FSD()
+static __BOOLEAN read_space__KSD()
 // () With resultNo recursive, No inlinable.
 {
-  __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:
+  __INTEGER pos2__PSD,level_comment__QSD,stat__RSD,pos__OSD,posold__NSD;
+  __INTEGER Self__HPDD;
+  __POSITION pos__VOVG;
+  __CHARACTER result__IODH,result__VODH,result__4ODH,result__HPDH;
+  __CHARACTER result__UPDH,result__BQDH,result__KQDH,result__TQDH;
+  __CHARACTER result__2QDH,result__JRDH,result__WRDH,result__DSDH;
+  __CHARACTER result__W2E;
+  __BOOLEAN __tmp__1TD,__tmp__QWD,__tmp__00D;
+  pos2__PSD= 0;
+  level_comment__QSD= 0;
+  stat__RSD= 0;
+  pos__OSD=position__CCC;
+  posold__NSD=(__INTEGER)(-  1);
+  if (is_shorter2__VI) {
+    ((__STRING *)string_tmp3__0SD)->count__EGC= 0;
+    ((__STRING *)string_tmp4__2SD)->count__EGC= 0;
+  };
+  while ((posold__NSD != position__CCC)) {
+    posold__NSD=position__CCC;
+    until_do__XKI:
     {
-      result__DADH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__DADH=((__CHARACTER )(( 0)));
+      result__IODH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__IODH=((__CHARACTER )(( 0)));
       } else {
-        result__DADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__IODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__DADH == ((__CHARACTER )(( 0))))) {
-        __tmp__QUD=TRUE__;
+      if ((result__IODH == ((__CHARACTER )(( 0))))) {
+        __tmp__1TD=TRUE__;
       } else {
-        result__QADH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__QADH=((__CHARACTER )(( 0)));
+        result__VODH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__VODH=((__CHARACTER )(( 0)));
         } else {
-          result__QADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__VODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__QUD=(((__INTEGER_8 )result__QADH) > ((__INTEGER_8 )' '));
+        __tmp__1TD=(((__INTEGER_8 )result__VODH) > ((__INTEGER_8 )' '));
       };
-      if ((! __tmp__QUD)) {
-        if (is_shorter__FZ) {
-          result__ZADH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__ZADH=((__CHARACTER )(( 0)));
+      if ((! __tmp__1TD)) {
+        if (is_shorter2__VI) {
+          result__4ODH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__4ODH=((__CHARACTER )(( 0)));
           } else {
-            result__ZADH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__4ODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          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__IXC=FALSE__;
-              };
+          if ((result__4ODH == '\n')) {
+            Self__HPDD=stat__RSD;
+            if ((stat__RSD ==  0)) {
+              stat__RSD= 1;
+            };
+            if ((Self__HPDD ==  1)) {
+              stat__RSD= 2;
             };
           };
         };
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto until_do__1NI;
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto until_do__XKI;
       };
     };
-    if ((position__0BC < ((__STRING *)source__XBC)->count__4FC)) {
-      result__CBDH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__CBDH=((__CHARACTER )(( 0)));
+    if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
+      result__HPDH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__HPDH=((__CHARACTER )(( 0)));
       } else {
-        result__CBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__HPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  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__HFIH->count__4FC=(__INTEGER)(Self__HFIH->count__4FC - len__FFIH);
-            };
-            short_derive__JCC=(__INTEGER)(short_derive__JCC - (__INTEGER)((__INTEGER)(end__V22G - begin__U22G) +  1));
-            while_do__5FMD:
-            {
-              result__PBDH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__PBDH=((__CHARACTER )(( 0)));
-              } else {
-                result__PBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-              };
-              if ((result__PBDH == ' ')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                goto while_do__5FMD;
-              };
-            };
-            result__YBDH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__YBDH=((__CHARACTER )(( 0)));
+      if (((result__HPDH == '/') & (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+        position__CCC=(__INTEGER)(position__CCC +  2);
+        pos2__PSD=position__CCC;
+        until_do__H5BD:
+        {
+          result__UPDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__UPDH=((__CHARACTER )(( 0)));
+          } else {
+            result__UPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__UPDH == ((__CHARACTER )(( 0))))) {
+            __tmp__QWD=TRUE__;
+          } else {
+            result__BQDH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__BQDH=((__CHARACTER )(( 0)));
             } else {
-              result__YBDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__BQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__YBDH == '*')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              while_do__XMND:
-              {
-                result__BCDH='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__BCDH=((__CHARACTER )(( 0)));
+            __tmp__QWD=(result__BQDH == '\n');
+          };
+          if ((! __tmp__QWD)) {
+            if (is_shorter2__VI) {
+              if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
+                result__KQDH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__KQDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__BCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                };
-                if ((result__BCDH == ' ')) {
-                  position__0BC=(__INTEGER)(position__0BC +  1);
-                  goto while_do__XMND;
+                  result__KQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
+                add_last__UHT(string_tmp3__0SD,result__KQDH);
               };
-              result__KCDH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__KCDH=((__CHARACTER )(( 0)));
-              } else {
-                result__KCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-              };
-              result__E5EH=FALSE__;
-              if ((((__INTEGER_8 )result__KCDH) >= ((__INTEGER_8 )'a'))) {
-                result__E5EH=(((__INTEGER_8 )result__KCDH) <= ((__INTEGER_8 )'z'));
-              };
-              if (result__E5EH) {
-                ((__STRING *)string_tmp__VH)->count__4FC= 0;
-                do {
-                  result__YCDH='\0';
-                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                    result__YCDH=((__CHARACTER )(( 0)));
-                  } else {
-                    result__YCDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                  };
-                  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__BDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                  };
-                  result__H5EH=FALSE__;
-                  if ((((__INTEGER_8 )result__BDDH) >= ((__INTEGER_8 )'a'))) {
-                    result__H5EH=(((__INTEGER_8 )result__BDDH) <= ((__INTEGER_8 )'z'));
-                  };
-                  if (result__H5EH) {
-                    __tmp__SZD=TRUE__;
-                  } else {
-                    result__KDDH='\0';
-                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                      result__KDDH=((__CHARACTER )(( 0)));
-                    } else {
-                      result__KDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                    };
-                    result__K5EH=FALSE__;
-                    if ((((__INTEGER_8 )result__KDDH) >= ((__INTEGER_8 )'0'))) {
-                      result__K5EH=(((__INTEGER_8 )result__KDDH) <= ((__INTEGER_8 )'9'));
-                    };
-                    __tmp__SZD=result__K5EH;
-                  };
-                  if (__tmp__SZD) {
-                    __tmp__TZD=TRUE__;
-                  } else {
-                    result__TDDH='\0';
-                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                      result__TDDH=((__CHARACTER )(( 0)));
-                    } else {
-                      result__TDDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                    };
-                    __tmp__TZD=(result__TDDH == '_');
-                  };
-                } while (__tmp__TZD);
-                while_do__AKAE:
-                {
-                  result__2DDH='\0';
-                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                    result__2DDH=((__CHARACTER )(( 0)));
-                  } else {
-                    result__2DDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-                  };
-                  if ((result__2DDH == ' ')) {
-                    position__0BC=(__INTEGER)(position__0BC +  1);
-                    goto while_do__AKAE;
-                  };
-                };
-                result__FEDH='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__FEDH=((__CHARACTER )(( 0)));
+              if ((stat__RSD ==  2)) {
+                result__TQDH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__TQDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__FEDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  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__QFIH->count__4FC=(__INTEGER)(Self__QFIH->count__4FC - len__OFIH);
-                  };
-                  short_derive__JCC=(__INTEGER)(short_derive__JCC - (__INTEGER)((__INTEGER)(position__0BC - begin__RFMD) +  1));
-                  pos2__KSD=position__0BC;
+                  result__TQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
+                add_last__UHT(string_tmp4__2SD,result__TQDH);
               };
             };
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            goto until_do__H5BD;
           };
         };
-        if (is_catch_comment__IXC) {
-          add_last__BMT(last_comment__C1D,'\t');
-        };
-        until_do__IACD:
-        {
-          result__OEDH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__OEDH=((__CHARACTER )(( 0)));
-          } else {
-            result__OEDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-          };
-          if ((result__OEDH == ((__CHARACTER )(( 0))))) {
-            __tmp__U1D=TRUE__;
-          } else {
-            result__1EDH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__1EDH=((__CHARACTER )(( 0)));
-            } else {
-              result__1EDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-            };
-            __tmp__U1D=(result__1EDH == '\n');
-          };
-          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__EFDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
-              };
-              add_last__BMT(last_comment__C1D,result__EFDH);
-            };
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            goto until_do__IACD;
+        if (is_shorter2__VI) {
+          if ((stat__RSD ==  3)) {
+            add_last__UHT(string_tmp3__0SD,'\n');
           };
-        };
-        if (is_catch_comment__IXC) {
-          add_last__BMT(last_comment__C1D,'\n');
-        };
-        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__Z2D)->parent_itm_slot__WU5B.comment__4JJD=__tmp__22D;
+          if ((stat__RSD ==  4)) {
+            add_last__UHT(string_tmp4__2SD,'\n');
           };
         };
-        if (((void *)key__LSD == (void *)NULL)) {
-          short__token__to__TBD(key_comment_default__ICC,pos2__KSD,position__0BC);
-        } else {
-          short__token__to__TBD(key__LSD,pos2__KSD,position__0BC);
-        };
+        position__CCC=(__INTEGER)(position__CCC +  1);
       };
     };
-    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)));
+    if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
+      pos2__PSD=position__CCC;
+      result__2QDH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__2QDH=((__CHARACTER )(( 0)));
       } else {
-        result__NFDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__2QDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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:
+      if (((result__2QDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+        position__CCC=(__INTEGER)(position__CCC +  2);
+        level_comment__QSD= 1;
+        until_do__YT2D:
         {
-          result__0FDH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__0FDH=((__CHARACTER )(( 0)));
+          result__JRDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__JRDH=((__CHARACTER )(( 0)));
           } else {
-            result__0FDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__JRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((! ((result__0FDH == ((__CHARACTER )(( 0)))) || (level_comment__NSD ==  0)))) {
-            result__HGDH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__HGDH=((__CHARACTER )(( 0)));
+          if ((! ((result__JRDH == ((__CHARACTER )(( 0)))) || (level_comment__QSD ==  0)))) {
+            result__WRDH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__WRDH=((__CHARACTER )(( 0)));
             } else {
-              result__HGDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__WRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            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__;
+            if (((result__WRDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+              level_comment__QSD=(__INTEGER)(level_comment__QSD +  1);
+              position__CCC=(__INTEGER)(position__CCC +  2);
+              __tmp__00D=TRUE__;
             } else {
-              __tmp__15D=FALSE__;
+              __tmp__00D=FALSE__;
             };
-            if ((! __tmp__15D)) {
-              result__UGDH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__UGDH=((__CHARACTER )(( 0)));
+            if ((! __tmp__00D)) {
+              result__DSDH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__DSDH=((__CHARACTER )(( 0)));
               } else {
-                result__UGDH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__DSDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              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);
+              if (((result__DSDH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+                level_comment__QSD=(__INTEGER)(level_comment__QSD -  1);
+                position__CCC=(__INTEGER)(position__CCC +  2);
               } else {
-                position__0BC=(__INTEGER)(position__0BC +  1);
+                position__CCC=(__INTEGER)(position__CCC +  1);
               };
             };
-            goto until_do__FU2D;
+            goto until_do__YT2D;
           };
         };
-        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)) {
+        if ((level_comment__QSD !=  0)) {
+          position__CCC=pos2__PSD;
+          pos__VOVG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_206));
+          put_position__CMG(pos__VOVG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        short__token__to__TBD((&__string_70),pos2__KSD,position__0BC);
+        short__token__to__YBD((&__string_70),pos2__PSD,position__CCC);
       };
     };
   };
-  begin_position__TBE=position__0BC;
-  result__AAF='\0';
-  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-    result__AAF=((__CHARACTER )(( 0)));
+  if ((is_shorter2__VI && (! skip_comment__X2D))) {
+    if ((((__STRING *)string_tmp3__0SD)->count__EGC ==  0)) {
+      last_comment_slot__J3D=NULL;
+    } else {
+      last_comment_slot__J3D=get__YWB(string_tmp3__0SD);
+    };
+    if ((((__STRING *)string_tmp4__2SD)->count__EGC !=  0)) {
+      last_comment_extern__JYC=get__YWB(string_tmp4__2SD);
+    };
+  };
+  begin_position__53D=position__CCC;
+  result__W2E='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+    result__W2E=((__CHARACTER )(( 0)));
   } else {
-    result__AAF=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    result__W2E=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
   };
-  return(((position__0BC != pos__JSD) | (result__AAF != ((__CHARACTER )(( 0))))));
+  return(((position__CCC != pos__OSD) | (result__W2E != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__TAL()
+static __BOOLEAN read_identifier__12K()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__52K,idx__A3K;
+  __POSITION pos__SQ1G;
+  __BOOLEAN result__42K,__tmp__N3K,result__ZJFH,__tmp__34K,result__2JFH;
+  __BOOLEAN result__5JFH,__tmp__Z4K,__tmp__04K;
+  __CHARACTER result__EKDH,result__SKDH,result__5KDH,result__ILDH;
+  __CHARACTER result__RLDH,result__0LDH;
+  result__42K=FALSE__;
+  posold__52K= 0;
+  idx__A3K= 0;
+  if ((! read_space__KSD())) {
+    __tmp__N3K=TRUE__;
   } else {
-    result__F2CH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__F2CH=((__CHARACTER )(( 0)));
+    result__EKDH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__EKDH=((__CHARACTER )(( 0)));
     } else {
-      result__F2CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__EKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__X3EH=FALSE__;
-    if ((((__INTEGER_8 )result__F2CH) >= ((__INTEGER_8 )'a'))) {
-      result__X3EH=(((__INTEGER_8 )result__F2CH) <= ((__INTEGER_8 )'z'));
+    result__ZJFH=FALSE__;
+    if ((((__INTEGER_8 )result__EKDH) >= ((__INTEGER_8 )'a'))) {
+      result__ZJFH=(((__INTEGER_8 )result__EKDH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__FBL=(! result__X3EH);
+    __tmp__N3K=(! result__ZJFH);
   };
-  if (__tmp__FBL) {
-    result__WAL=FALSE__;
+  if (__tmp__N3K) {
+    result__42K=FALSE__;
   } else {
-    posold__XAL=position__0BC;
-    ((__STRING *)string_tmp__VH)->count__4FC= 0;
-    until_do__FJZE:
+    posold__52K=position__CCC;
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    until_do__OTZE:
     {
-      result__T2CH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__T2CH=((__CHARACTER )(( 0)));
+      result__SKDH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__SKDH=((__CHARACTER )(( 0)));
       } else {
-        result__T2CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__SKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__T2CH == ((__CHARACTER )(( 0))))) {
-        __tmp__VCL=TRUE__;
+      if ((result__SKDH == ((__CHARACTER )(( 0))))) {
+        __tmp__34K=TRUE__;
       } else {
-        result__A3CH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__A3CH=((__CHARACTER )(( 0)));
+        result__5KDH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__5KDH=((__CHARACTER )(( 0)));
         } else {
-          result__A3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__5KDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__03EH=FALSE__;
-        if ((((__INTEGER_8 )result__A3CH) >= ((__INTEGER_8 )'a'))) {
-          result__03EH=(((__INTEGER_8 )result__A3CH) <= ((__INTEGER_8 )'z'));
+        result__2JFH=FALSE__;
+        if ((((__INTEGER_8 )result__5KDH) >= ((__INTEGER_8 )'a'))) {
+          result__2JFH=(((__INTEGER_8 )result__5KDH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__03EH)) {
-          result__J3CH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__J3CH=((__CHARACTER )(( 0)));
+        if ((! result__2JFH)) {
+          result__ILDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__ILDH=((__CHARACTER )(( 0)));
           } else {
-            result__J3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__ILDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__33EH=FALSE__;
-          if ((((__INTEGER_8 )result__J3CH) >= ((__INTEGER_8 )'0'))) {
-            result__33EH=(((__INTEGER_8 )result__J3CH) <= ((__INTEGER_8 )'9'));
+          result__5JFH=FALSE__;
+          if ((((__INTEGER_8 )result__ILDH) >= ((__INTEGER_8 )'0'))) {
+            result__5JFH=(((__INTEGER_8 )result__ILDH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__RCL=(! result__33EH);
+          __tmp__Z4K=(! result__5JFH);
         } else {
-          __tmp__RCL=FALSE__;
+          __tmp__Z4K=FALSE__;
         };
-        if (__tmp__RCL) {
-          result__S3CH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__S3CH=((__CHARACTER )(( 0)));
+        if (__tmp__Z4K) {
+          result__RLDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__RLDH=((__CHARACTER )(( 0)));
           } else {
-            result__S3CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__RLDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__SCL=(result__S3CH != '_');
+          __tmp__04K=(result__RLDH != '_');
         } else {
-          __tmp__SCL=FALSE__;
+          __tmp__04K=FALSE__;
         };
-        __tmp__VCL=__tmp__SCL;
+        __tmp__34K=__tmp__04K;
       };
-      if ((! __tmp__VCL)) {
-        result__13CH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__13CH=((__CHARACTER )(( 0)));
+      if ((! __tmp__34K)) {
+        result__0LDH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__0LDH=((__CHARACTER )(( 0)));
         } else {
-          result__13CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__0LDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__BMT(string_tmp__VH,result__13CH);
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto until_do__FJZE;
+        add_last__UHT(string_tmp__VH,result__0LDH);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto until_do__OTZE;
       };
     };
-    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)) {
+    if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
+      idx__A3K=first_substring_index__VSZE(string_tmp__VH);
+      if ((idx__A3K !=  0)) {
+        position__CCC=(__INTEGER)(posold__52K + idx__A3K);
+        pos__SQ1G=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_207));
+        put_position__CMG(pos__SQ1G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      last_string__Q0C=get__QWB(string_tmp__VH);
-      result__WAL=TRUE__;
+      last_string__V0C=get__YWB(string_tmp__VH);
+      result__42K=TRUE__;
     };
   };
-  return(result__WAL);
+  return(result__42K);
 }
 
-static __POSITION current_position__RXF()
+static __POSITION current_position__XUF()
 // () With resultNo recursive, No inlinable.
 {
-  __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)) {
+  __POSITION result__0UF;
+  result__0UF=((__POSITION ) 0);
+  while ((pos_cur__FCC != position__CCC)) {
+    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
+      pos_col__HCC= 0;
+      pos_line__GCC=(__INTEGER)(pos_line__GCC +  1);
+    } else {
+      pos_col__HCC=(__INTEGER)(pos_col__HCC +  1);
+    };
+    pos_cur__FCC=(__INTEGER)(pos_cur__FCC +  1);
+  };
+  if ((pos_line__GCC >  32767)) {
+    result__0UF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__DKG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) |  4294836224LU));
+    put_error__text__YKG( 0,(&__string_208));
+    put_position__CMG(result__0UF);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((pos_col__HCC >  255)) {
+    result__0UF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__DKG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17))));
+    put_error__text__YKG( 0,(&__string_209));
+    put_position__CMG(result__0UF);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  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)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__DKG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17)))));
 }
 
-static void put_error__text__SNG(__INTEGER type__UNG,void *txt__VNG)
+static void put_error__text__YKG(__INTEGER type__0KG,void *txt__1KG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__WNG=type__UNG;
-  ((__STRING *)msg_err__XNG)->count__4FC= 0;
-  if ((type__UNG ==  0)) {
-    append__JOS(msg_err__XNG,(&__string_208));
+  type_error__2KG=type__0KG;
+  ((__STRING *)msg_err__3KG)->count__EGC= 0;
+  if ((type__0KG ==  0)) {
+    append__2JS(msg_err__3KG,(&__string_210));
   };
-  if ((type__UNG ==  1)) {
-    append__JOS(msg_err__XNG,(&__string_209));
+  if ((type__0KG ==  1)) {
+    append__2JS(msg_err__3KG,(&__string_211));
   };
-  if ((type__UNG ==  2)) {
-    append__JOS(msg_err__XNG,(&__string_210));
+  if ((type__0KG ==  2)) {
+    append__2JS(msg_err__3KG,(&__string_212));
   };
-  if ((type__UNG ==  3)) {
-    append__JOS(msg_err__XNG,(&__string_211));
+  if ((type__0KG ==  3)) {
+    append__2JS(msg_err__3KG,(&__string_213));
   };
-  append__JOS(msg_err__XNG,txt__VNG);
+  append__2JS(msg_err__3KG,txt__1KG);
 }
 
-static void put_position__2OG(__POSITION Self__3OG)
+static void put_position__CMG(__POSITION Self__DMG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __UINTEGER_32 c__FMG,__tmp__NNG,cols__IMG;
+  void *src__LMG;
+  __INTEGER pos__EMG,Self__0IH,limit_up__1IH;
+  __CHARACTER char__MMG;
+  c__FMG= 0;
+  char__MMG='\0';
+  append__2JS(msg_err__3KG,(&__string_214));
+  append_in__2FH((__UINTEGER_32)(((__UINTEGER_32 )Self__DMG) >>  17),msg_err__3KG);
+  append__2JS(msg_err__3KG,(&__string_215));
+  append_in__2FH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__DMG) >>  9) &  255),msg_err__3KG);
+  append__2JS(msg_err__3KG,(&__string_216));
+  append__2JS(msg_err__3KG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__DMG)) &  511)])->parent_named__5.name__LI);
+  add_last__UHT(msg_err__3KG,'(');
+  append__2JS(msg_err__3KG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__DMG)) &  511)])->filename__CNG);
+  append__2JS(msg_err__3KG,(&__string_217));
+  src__LMG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__DMG)) &  511)])->source__3BC;
+  pos__EMG= 1;
+  __tmp__NNG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__DMG) >>  17) -  1);
+  Self__0IH= 1;
+  limit_up__1IH=((__INTEGER )__tmp__NNG);
+  while ((Self__0IH <= limit_up__1IH)) {
+    while ((((__CHARACTER *)((__STRING *)src__LMG)->storage__23R)[(__INTEGER)(pos__EMG -  1)] != '\n')) {
+      pos__EMG=(__INTEGER)(pos__EMG +  1);
+    };
+    pos__EMG=(__INTEGER)(pos__EMG +  1);
+    Self__0IH=(__INTEGER)(Self__0IH +  1);
+  };
+  ((__STRING *)string_tmp__VH)->count__EGC= 0;
+  cols__IMG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__DMG) >>  9) &  255);
+  while ((! ((pos__EMG > ((__STRING *)src__LMG)->count__EGC) || (((__CHARACTER *)((__STRING *)src__LMG)->storage__23R)[(__INTEGER)(pos__EMG -  1)] == '\n')))) {
+    char__MMG=((__CHARACTER *)((__STRING *)src__LMG)->storage__23R)[(__INTEGER)(pos__EMG -  1)];
+    add_last__UHT(msg_err__3KG,char__MMG);
+    if ((c__FMG < cols__IMG)) {
+      if ((char__MMG == '\t')) {
+        add_last__UHT(string_tmp__VH,'\t');
+      } else {
+        add_last__UHT(string_tmp__VH,' ');
+      };
+    };
+    c__FMG=(__UINTEGER_32)(c__FMG +  1);
+    pos__EMG=(__INTEGER)(pos__EMG +  1);
+  };
+  add_last__UHT(msg_err__3KG,'\n');
+  append__2JS(msg_err__3KG,string_tmp__VH);
+  append__2JS(msg_err__3KG,(&__string_218));
 }
 
-static __BOOLEAN read_symbol__LXJ(void *st__NXJ)
+static __BOOLEAN read_symbol__3TJ(void *st__5TJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__BUJ,j__CUJ;
+  __BOOLEAN result__DUJ,__tmp__LVJ,__tmp__IVJ;
+  __CHARACTER result__ANDH,result__NNDH;
+  posold__BUJ= 0;
+  j__CUJ= 0;
+  result__DUJ=FALSE__;
+  if ((! read_space__KSD())) {
+    result__DUJ=FALSE__;
   } else {
-    posold__PXJ=position__0BC;
-    j__QXJ= 1;
-    until_do__GD5:
+    posold__BUJ=position__CCC;
+    j__CUJ= 1;
+    until_do__R44:
     {
-      result__B5CH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__B5CH=((__CHARACTER )(( 0)));
+      result__ANDH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__ANDH=((__CHARACTER )(( 0)));
       } else {
-        result__B5CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__ANDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__B5CH == ((__CHARACTER )(( 0))))) {
-        __tmp__ZYJ=TRUE__;
+      if ((result__ANDH == ((__CHARACTER )(( 0))))) {
+        __tmp__LVJ=TRUE__;
       } else {
-        if ((j__QXJ > ((__STRING_CONSTANT *)st__NXJ)->count__DD)) {
-          __tmp__WYJ=TRUE__;
+        if ((j__CUJ > ((__STRING_CONSTANT *)st__5TJ)->count__DD)) {
+          __tmp__IVJ=TRUE__;
         } else {
-          result__O5CH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__O5CH=((__CHARACTER )(( 0)));
+          result__NNDH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__NNDH=((__CHARACTER )(( 0)));
           } else {
-            result__O5CH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__NNDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__WYJ=(result__O5CH != ((__CHARACTER *)((__STRING_CONSTANT *)st__NXJ)->storage__3QO)[(__INTEGER)(j__QXJ -  1)]);
+          __tmp__IVJ=(result__NNDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__5TJ)->storage__QMO)[(__INTEGER)(j__CUJ -  1)]);
         };
-        __tmp__ZYJ=__tmp__WYJ;
+        __tmp__LVJ=__tmp__IVJ;
       };
-      if ((! __tmp__ZYJ)) {
-        j__QXJ=(__INTEGER)(j__QXJ +  1);
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto until_do__GD5;
+      if ((! __tmp__LVJ)) {
+        j__CUJ=(__INTEGER)(j__CUJ +  1);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto until_do__R44;
       };
     };
-    if ((j__QXJ > ((__STRING_CONSTANT *)st__NXJ)->count__DD)) {
-      result__RXJ=TRUE__;
-      last_string__Q0C=st__NXJ;
+    if ((j__CUJ > ((__STRING_CONSTANT *)st__5TJ)->count__DD)) {
+      result__DUJ=TRUE__;
+      last_string__V0C=st__5TJ;
     } else {
-      position__0BC=posold__PXJ;
-      result__RXJ=FALSE__;
+      position__CCC=posold__BUJ;
+      result__DUJ=FALSE__;
     };
   };
-  return(result__RXJ);
+  return(result__DUJ);
 }
 
-static __BOOLEAN read_short_elt__TLKB()
+static __BOOLEAN read_short_elt__5GKB()
 // () With resultNo recursive, No inlinable.
 {
-  __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)) {
+  __INTEGER j__DHKB;
+  __POSITION pos__IGG;
+  __BOOLEAN result__CHKB,__tmp__WHKB;
+  __CHARACTER __tmp__1IKB;
+  result__CHKB=FALSE__;
+  j__DHKB= 0;
+  if (read_identifier__12K()) {
+    if (((void *)last_string__V0C != (void *)(&__string_115))) {
+      pos__IGG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_219));
+      put_position__CMG(pos__IGG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__Q0C=NULL;
-    result__WLKB=TRUE__;
-    __tmp__KMKB=TRUE__;
+    last_string__V0C=NULL;
+    result__CHKB=TRUE__;
+    __tmp__WHKB=TRUE__;
   } else {
-    __tmp__KMKB=FALSE__;
+    __tmp__WHKB=FALSE__;
   };
-  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__WHKB)) {
+    if (read_string__GBQ()) {
+      ((__STRING *)string_tmp__VH)->count__EGC= 0;
+      j__DHKB= 1;
+      while ((j__DHKB <= ((__STRING_CONSTANT *)last_string__V0C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[(__INTEGER)(j__DHKB -  1)] == '\\')) {
+          j__DHKB=(__INTEGER)(j__DHKB +  1);
+          __tmp__1IKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[(__INTEGER)(j__DHKB -  1)];
+          if ((__tmp__1IKB == 'a')) {
+            add_last__UHT(string_tmp__VH,'\a');
           };
-          if ((__tmp__PNKB == 'b')) {
-            add_last__BMT(string_tmp__VH,'\b');
+          if ((__tmp__1IKB == 'b')) {
+            add_last__UHT(string_tmp__VH,'\b');
           };
-          if ((__tmp__PNKB == 'f')) {
-            add_last__BMT(string_tmp__VH,'\f');
+          if ((__tmp__1IKB == 'f')) {
+            add_last__UHT(string_tmp__VH,'\f');
           };
-          if ((__tmp__PNKB == 'n')) {
-            add_last__BMT(string_tmp__VH,'\n');
+          if ((__tmp__1IKB == 'n')) {
+            add_last__UHT(string_tmp__VH,'\n');
           };
-          if ((__tmp__PNKB == 'r')) {
-            add_last__BMT(string_tmp__VH,'\r');
+          if ((__tmp__1IKB == 'r')) {
+            add_last__UHT(string_tmp__VH,'\r');
           };
-          if ((__tmp__PNKB == 't')) {
-            add_last__BMT(string_tmp__VH,'\t');
+          if ((__tmp__1IKB == 't')) {
+            add_last__UHT(string_tmp__VH,'\t');
           };
-          if ((__tmp__PNKB == 'v')) {
-            add_last__BMT(string_tmp__VH,'\v');
+          if ((__tmp__1IKB == 'v')) {
+            add_last__UHT(string_tmp__VH,'\v');
           };
-          if ((__tmp__PNKB == '\\')) {
-            add_last__BMT(string_tmp__VH,'\\');
+          if ((__tmp__1IKB == '\\')) {
+            add_last__UHT(string_tmp__VH,'\\');
           };
-          if ((__tmp__PNKB == '?')) {
-            add_last__BMT(string_tmp__VH,'\?');
+          if ((__tmp__1IKB == '?')) {
+            add_last__UHT(string_tmp__VH,'\?');
           };
-          if ((__tmp__PNKB == '\'')) {
-            add_last__BMT(string_tmp__VH,'\'');
+          if ((__tmp__1IKB == '\'')) {
+            add_last__UHT(string_tmp__VH,'\'');
           };
-          if ((__tmp__PNKB == '\"')) {
-            add_last__BMT(string_tmp__VH,'\"');
+          if ((__tmp__1IKB == '\"')) {
+            add_last__UHT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__BMT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__Q0C)->storage__3QO)[(__INTEGER)(j__XLKB -  1)]);
+          add_last__UHT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[(__INTEGER)(j__DHKB -  1)]);
         };
-        j__XLKB=(__INTEGER)(j__XLKB +  1);
+        j__DHKB=(__INTEGER)(j__DHKB +  1);
       };
-      last_string__Q0C=get__QWB(string_tmp__VH);
-      result__WLKB=TRUE__;
+      last_string__V0C=get__YWB(string_tmp__VH);
+      result__CHKB=TRUE__;
     };
   };
-  return(result__WLKB);
+  return(result__CHKB);
 }
 
-static void fast_put__to__A2R(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__B2R,void *k__D2R)
+static void fast_put__to__TXR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__UXR,void *k__WXR)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__QPHH,__tmp__SPHH,Self__TPHH,idx__4XR,idx__5PNB;
+  __INTEGER new_capacity__AQNB,i__BQNB,result__VPHH,__tmp__XPHH;
+  __INTEGER Self__YPHH,typ_id__QSNB;
+  __STRING_CONSTANT *Self__WPHH;
+  __POINTER ptr__LSNB,ptr_table__FQIH,next__EQIH,result__GQIH;
+  __POINTER ptr_table__KQIH,next__JQIH,result__LQIH;
+  __UINTEGER_32 sz__NSNB,a__RLFH,new_size__SLFH,t__WLFH,a__VLFH;
+  __UINTEGER_32 new_size__NQIH,lab_type__MQIH;
+  void *node__BYR,*node1__DQNB,*node2__EQNB,*__tmp__VZR;
+  void **old_buckets__CQNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__KSNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__ORDC;
+  result__QPHH= 0;
+  __tmp__SPHH=((__STRING_CONSTANT *)k__WXR)->count__DD;
+  Self__TPHH= 1;
+  while ((Self__TPHH <= __tmp__SPHH)) {
+    result__QPHH=(__INTEGER)((__INTEGER)( 5 * result__QPHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__WXR)->storage__QMO)[(__INTEGER)(Self__TPHH -  1)])));
+    Self__TPHH=(__INTEGER)(Self__TPHH +  1);
+  };
+  if ((result__QPHH <  0)) {
+    result__QPHH=(__INTEGER)(~ result__QPHH);
+  };
+  idx__4XR=(__INTEGER)(result__QPHH % Self__UXR->capacity__DYR);
+  node__BYR=((void **)Self__UXR->buckets__IYR)[idx__4XR];
+  while ((! (((void *)node__BYR == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__BYR)->key__UYR == (void *)k__WXR)))) {
+    node__BYR=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__BYR)->next__5YR;
+  };
+  if (((void *)node__BYR == (void *)NULL)) {
+    if ((Self__UXR->capacity__DYR == Self__UXR->count__IZR)) {
+      idx__5PNB= 0;
+      node1__DQNB=NULL;
+      node2__EQNB=NULL;
+      old_buckets__CQNB=Self__UXR->buckets__IYR;
+      new_capacity__AQNB=prime_number_ceiling__K01((__INTEGER)(Self__UXR->capacity__DYR +  1));
+      Self__UXR->buckets__IYR=create__5U2(new_capacity__AQNB);
+      i__BQNB=(__INTEGER)(Self__UXR->capacity__DYR -  1);
+      Self__UXR->capacity__DYR=new_capacity__AQNB;
+      while ((i__BQNB >=  0)) {
+        node1__DQNB=((void **)old_buckets__CQNB)[i__BQNB];
+        while (((void *)node1__DQNB != (void *)NULL)) {
+          node2__EQNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DQNB)->next__5YR;
+          Self__WPHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DQNB)->key__UYR);
+          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__QMO)[(__INTEGER)(Self__YPHH -  1)])));
+            Self__YPHH=(__INTEGER)(Self__YPHH +  1);
+          };
+          if ((result__VPHH <  0)) {
+            result__VPHH=(__INTEGER)(~ result__VPHH);
+          };
+          idx__5PNB=(__INTEGER)(result__VPHH % Self__UXR->capacity__DYR);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__DQNB)->next__5YR=((void **)Self__UXR->buckets__IYR)[idx__5PNB];
+          ((void **)Self__UXR->buckets__IYR)[idx__5PNB]=node1__DQNB;
+          node1__DQNB=node2__EQNB;
+        };
+        i__BQNB=(__INTEGER)(i__BQNB -  1);
+      };
+      idx__4XR=(__INTEGER)(result__QPHH % new_capacity__AQNB);
+    };
+    __tmp__VZR=((void **)Self__UXR->buckets__IYR)[idx__4XR];
+    result__KSNB=NULL;
+    ptr__LSNB=((__POINTER )(NULL));
+    typ_id__QSNB= 0;
+    sz__NSNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__NSNB ==  0)) {
+      result__KSNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__QSNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NSNB);
+      if ((typ_id__QSNB == (__INTEGER)(-  1))) {
+        a__RLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SLFH=(__UINTEGER_32)((__UINTEGER_32)(sz__NSNB + a__RLFH) & (__UINTEGER_32)(~ a__RLFH));
+        ptr_table__FQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__EQIH=((__POINTER )(NULL));
+        result__GQIH=((__POINTER *)ptr_table__FQIH)[ 0];
+        if ((result__GQIH == (void *)NULL)) {
+          result__GQIH=new_lab__QOJ(new_size__SLFH);
+          next__EQIH=(void *)((unsigned long)result__GQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLFH)));
+          ((__POINTER *)next__EQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FQIH)[ 0]=next__EQIH;
+        } else {
+          next__EQIH=((__POINTER *)result__GQIH)[ 0];
+          if ((next__EQIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GQIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SLFH <<  1)) <=  4096)) {
+              next__EQIH=(void *)((unsigned long)result__GQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SLFH)));
             } else {
-              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)));
+              next__EQIH=new_lab__QOJ(new_size__SLFH);
+            };
+            ((__POINTER *)next__EQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FQIH)[ 0]=next__EQIH;
+          } else {
+            ((__POINTER *)result__GQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GQIH=next__EQIH;
+          };
+        };
+        ptr__LSNB=result__GQIH;
+      } else {
+        t__WLFH=((__UINTEGER_32 )typ_id__QSNB);
+        a__VLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NSNB + a__VLFH) & (__UINTEGER_32)(~ a__VLFH));
+        ptr_table__KQIH=((__POINTER )(&(table_type[(t__WLFH)])));
+        lab_type__MQIH=(__UINTEGER_32)(t__WLFH |  1);
+        next__JQIH=((__POINTER )(NULL));
+        result__LQIH=((__POINTER *)ptr_table__KQIH)[ 0];
+        if ((result__LQIH == (void *)NULL)) {
+          result__LQIH=new_lab__QOJ(lab_type__MQIH);
+          next__JQIH=(void *)((unsigned long)result__LQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NQIH)));
+          ((__POINTER *)next__JQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KQIH)[ 0]=next__JQIH;
+        } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NQIH <<  1)) <=  4096)) {
+              next__JQIH=(void *)((unsigned long)result__LQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NQIH)));
             } else {
-              next__0FIH=new_lab__URJ(lab_type__3FIH);
+              next__JQIH=new_lab__QOJ(lab_type__MQIH);
             };
-            ((__POINTER *)next__0FIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1FIH)[ 0]=next__0FIH;
+            ((__POINTER *)next__JQIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KQIH)[ 0]=next__JQIH;
           } else {
-            ((__POINTER *)result__2FIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0FIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2FIH=next__0FIH;
+            ((__POINTER *)result__LQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LQIH=next__JQIH;
           };
         };
-        ptr__5WNB=result__2FIH;
+        ptr__LSNB=result__LQIH;
       };
-      result__4WNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__5WNB);
-      *(result__4WNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__KSNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__LSNB);
+      *(result__KSNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__ORDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__KSNB);
+    Self__ORDC->key__UYR=k__WXR;
+    Self__ORDC->next__5YR=__tmp__VZR;
+    node__BYR=result__KSNB;
+    ((void **)Self__UXR->buckets__IYR)[idx__4XR]=result__KSNB;
+    Self__UXR->count__IZR=(__INTEGER)(Self__UXR->count__IZR +  1);
   };
 }
 
-static __TYPE_FULL* create__with__0QB(void *typ__2QB,__UINTEGER_8 code__3QB)
+static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB)
 // ({TYPE_NULLxTYPE_VOIDxTYPE_CONTEXTxTYPE_ID},{UINTEGER_8}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __TYPE_FULL *result__L1B,*Self__PBS;
+  __POINTER ptr__M1B,ptr_table__PQIH,next__OQIH,result__QQIH;
+  __POINTER ptr_table__UQIH,next__TQIH,result__VQIH;
+  __INTEGER typ_id__R1B;
+  __UINTEGER_32 sz__O1B,a__ZLFH,new_size__0LFH,t__4LFH,a__3LFH;
+  __UINTEGER_32 new_size__XQIH,lab_type__WQIH;
+  void *__tmp__1BS,*__tmp__DCS;
+  __BOOLEAN __tmp__PCS,__tmp__QCS;
+  result__L1B=NULL;
+  ptr__M1B=((__POINTER )(NULL));
+  typ_id__R1B= 0;
+  sz__O1B=((__UINTEGER_32 )sizeof(__TYPE_FULL));
+  if ((sz__O1B ==  0)) {
+    result__L1B=TYPE_FULL__;
   } else {
-    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) {
+    typ_id__R1B=__TYPE_FULL__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O1B);
+    if ((typ_id__R1B == (__INTEGER)(-  1))) {
+      a__ZLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0LFH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__ZLFH) & (__UINTEGER_32)(~ a__ZLFH));
+      ptr_table__PQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0LFH / ((__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__QOJ(new_size__0LFH);
+        next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LFH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0LFH <<  1)) <=  4096)) {
+            next__OQIH=(void *)((unsigned long)result__QQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0LFH)));
+          } else {
+            next__OQIH=new_lab__QOJ(new_size__0LFH);
+          };
+          ((__POINTER *)next__OQIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+        } else {
+          ((__POINTER *)result__QQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QQIH=next__OQIH;
+        };
+      };
+      ptr__M1B=result__QQIH;
+    } else {
+      t__4LFH=((__UINTEGER_32 )typ_id__R1B);
+      a__3LFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XQIH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__3LFH) & (__UINTEGER_32)(~ a__3LFH));
+      ptr_table__UQIH=((__POINTER )(&(table_type[(t__4LFH)])));
+      lab_type__WQIH=(__UINTEGER_32)(t__4LFH |  1);
+      next__TQIH=((__POINTER )(NULL));
+      result__VQIH=((__POINTER *)ptr_table__UQIH)[ 0];
+      if ((result__VQIH == (void *)NULL)) {
+        result__VQIH=new_lab__QOJ(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__3SH)))) &  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__TQIH=new_lab__QOJ(lab_type__WQIH);
+          };
+          ((__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__M1B=result__VQIH;
+    };
+    result__L1B=((__TYPE_FULL *)ptr__M1B);
+    *(result__L1B) = *(TYPE_FULL__);
+  };
+  Self__PBS=((__TYPE_FULL *)result__L1B);
+  Self__PBS->flag__TBS=code__FRB;
+  if (((void *)typ__ERB != (void *)NULL)) {
+    switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__IGS=(&__string_2);
+      __tmp__1BS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__IGS=(&__string_3);
+      __tmp__1BS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__IGS=(&__string_45);
+      __tmp__1BS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__IGS=(&__string_47);
+      __tmp__1BS=(&__string_47);
     } break;
     };
-    __tmp__2GS=((void *)__tmp__IGS != (void *)NULL);
+    __tmp__PCS=((void *)__tmp__1BS != (void *)NULL);
   } else {
-    __tmp__2GS=FALSE__;
+    __tmp__PCS=FALSE__;
   };
-  if (__tmp__2GS) {
-    switch (((struct ___OBJ *)typ__2QB)->__id) {
+  if (__tmp__PCS) {
+    switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__QGS=(&__string_2);
+      __tmp__DCS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__QGS=(&__string_3);
+      __tmp__DCS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__QGS=(&__string_45);
+      __tmp__DCS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__QGS=(&__string_47);
+      __tmp__DCS=(&__string_47);
     } break;
     };
-    __tmp__3GS=__infix_equal_equal__GAEB(__tmp__QGS,(&__string_33));
+    __tmp__QCS=__infix_equal_equal__R1DB(__tmp__DCS,(&__string_33));
   } else {
-    __tmp__3GS=FALSE__;
+    __tmp__QCS=FALSE__;
   };
-  if ((__tmp__3GS && (! ((__UINTEGER_8)(Self__2FS->flag__AGS &  1) !=  0)))) {
-    print__4HD((&__string_218));
+  if ((__tmp__QCS && (! ((__UINTEGER_8)(Self__PBS->flag__TBS &  1) !=  0)))) {
+    print__DID((&__string_220));
     fputc((int)('\n'),stdout);
     exit(( 1));
   };
-  return(result__D1B);
+  return(result__L1B);
 }
 
-static void** create__KZNB(__INTEGER nb_elements__MZNB)
+static void** create__WUNB(__INTEGER nb_elements__YUNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__ZSDH,a__BMFH,new_size__0SDH,new_size2__1SDH,a__FMFH;
+  __UINTEGER_32 new_size__GMFH;
+  __POINTER result__YSDH,ptr_table__ZQIH,next__YQIH,result__0QIH;
+  void *result__3QIH;
+  __INTEGER Self__BEMC;
+  void **Result__D1RB;
+  sz__ZSDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YUNB * ((__INTEGER )(sizeof(void *)))));
+  result__YSDH=((__POINTER )(NULL));
+  a__BMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__0SDH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZSDH + a__BMFH) & (__UINTEGER_32)(~ a__BMFH));
+  new_size2__1SDH=(__UINTEGER_32)(new_size__0SDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__1SDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__FMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__GMFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__1SDH + a__FMFH) & (__UINTEGER_32)(~ a__FMFH));
+    ptr_table__ZQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GMFH / ((__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__QOJ(new_size__GMFH);
+      next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GMFH)));
+      ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GMFH <<  1)) <=  4096)) {
+          next__YQIH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GMFH)));
+        } else {
+          next__YQIH=new_lab__QOJ(new_size__GMFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__0QIH)[ 0]=((__POINTER ) 3);
+    result__YSDH=(void *)((unsigned long)result__0QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__3QIH=first_free__VAVB;
+    while ((((void *)result__3QIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3QIH)->map_size_and_id__YTB &  4294967292LU) < new_size__0SDH))) {
+      result__3QIH=((__MEMORY *)result__3QIH)->map_next_free__ZTB;
     };
-    if (((void *)result__OGIH == (void *)NULL)) {
-      result__OGIH=new_page__WA5();
+    if (((void *)result__3QIH == (void *)NULL)) {
+      result__3QIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__3QIH,new_size__0SDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3QIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__YSDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3QIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__D1RB=((void **)result__YSDH);
+  Self__BEMC=(__INTEGER)(nb_elements__YUNB -  1);
+  while ((Self__BEMC >=  0)) {
+    Result__D1RB[Self__BEMC]=NULL;
+    Self__BEMC=(__INTEGER)(Self__BEMC -  1);
   };
-  return(Result__N4RB);
+  return(Result__D1RB);
 }
 
-static void add_last__W4R(__FAST_ARRAYoTYPE_IDo *Self__X4R,void *element__Y4R)
+static void add_last__J0R(__FAST_ARRAYoTYPE_IDo *Self__K0R,void *element__L0R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__M0R,__tmp__V1R,__tmp__UTDC,Self__GAVD;
+  __BOOLEAN __tmp__20R;
+  void **__tmp__U1R,**new__ATDC;
+  new_capacity__M0R= 0;
+  if (((__INTEGER)(Self__K0R->parent_arrayed_collection__ABB.upper__N0R +  1) <= (__INTEGER)(Self__K0R->parent_arrayed_collection__ABB.capacity__P0R -  1))) {
+    Self__K0R->parent_arrayed_collection__ABB.upper__N0R=(__INTEGER)(Self__K0R->parent_arrayed_collection__ABB.upper__N0R +  1);
+    __tmp__20R=TRUE__;
   } else {
-    __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;
+    __tmp__20R=FALSE__;
+  };
+  if ((! __tmp__20R)) {
+    if ((Self__K0R->parent_arrayed_collection__ABB.capacity__P0R ==  0)) {
+      Self__K0R->parent_arrayed_collection__ABB.storage__L1R=create__WUNB( 2);
+      Self__K0R->parent_arrayed_collection__ABB.capacity__P0R= 2;
+      Self__K0R->parent_arrayed_collection__ABB.upper__N0R= 0;
+    } else {
+      new_capacity__M0R=(__INTEGER)(Self__K0R->parent_arrayed_collection__ABB.capacity__P0R <<  1);
+      __tmp__U1R=Self__K0R->parent_arrayed_collection__ABB.storage__L1R;
+      __tmp__V1R=Self__K0R->parent_arrayed_collection__ABB.capacity__P0R;
+      new__ATDC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__U1R)),((__UINTEGER_32 )(__INTEGER)(__tmp__V1R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__M0R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__UTDC=(__INTEGER)(new_capacity__M0R -  1);
+      Self__GAVD=__tmp__V1R;
+      while ((Self__GAVD <= __tmp__UTDC)) {
+        new__ATDC[Self__GAVD]=NULL;
+        Self__GAVD=(__INTEGER)(Self__GAVD +  1);
+      };
+      Self__K0R->parent_arrayed_collection__ABB.storage__L1R=new__ATDC;
+      Self__K0R->parent_arrayed_collection__ABB.capacity__P0R=new_capacity__M0R;
+      Self__K0R->parent_arrayed_collection__ABB.upper__N0R=(__INTEGER)(Self__K0R->parent_arrayed_collection__ABB.upper__N0R +  1);
+    };
+  };
+  ((void **)Self__K0R->parent_arrayed_collection__ABB.storage__L1R)[Self__K0R->parent_arrayed_collection__ABB.upper__N0R]=element__L0R;
 }
 
-static __BOOLEAN open__BFRD(__DIRECTORY_UNIX *Self__CFRD)
+static __BOOLEAN open__PDRD(__DIRECTORY_UNIX *Self__QDRD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __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)));
+  __POINTER dirent__WDRD,ptr__NTLE,ptr_table__BRIH,next__ARIH;
+  __POINTER result__CRIH,ptr_table__GRIH,next__FRIH,result__HRIH;
+  __POINTER dir__UDRD,ptr__QRIH,ptr_table__0RIH,next__ZRIH,result__1RIH;
+  __POINTER ptr_table__5RIH,next__4RIH,result__ASIH,ptr__C0NF;
+  __POINTER ptr_table__ESIH,next__DSIH,result__FSIH,ptr_table__JSIH;
+  __POINTER next__ISIH,result__KSIH;
+  __INTEGER i__0DRD,typ_id__STLE,i__LRIH,Self__KMFF,i__INFH,j__KNFH;
+  __INTEGER Self__GJHH,idx__LN3E,idx__H42,n__5UTD,n__FYFH,typ_id__RRIH;
+  __INTEGER typ_id__H0NF;
+  __UINTEGER_32 sz__PTLE,a__UMFH,new_size__VMFH,t__ZMFH,a__YMFH;
+  __UINTEGER_32 new_size__JRIH,lab_type__IRIH,sz__SRIH,a__TRIH;
+  __UINTEGER_32 new_size__URIH,t__VRIH,a__WRIH,new_size__CSIH;
+  __UINTEGER_32 lab_type__BSIH,sz__E0NF,a__LZFH,new_size__MZFH,t__QZFH;
+  __UINTEGER_32 a__PZFH,new_size__MSIH,lab_type__LSIH;
+  __STRING *new__2RQE,*Self__1MFH,*Self__FF3E,*Self__HNFH,*Self__TWSD;
+  __STRING *Self__4UTD;
+  void *other__JNFH;
+  void *result__KN3E;
+  void *__tmp__4P3E,*dir__2P3E;
+  void *__tmp__JGRD;
+  __CHARACTER *n__TDRD,*Self__MRIH,*other__NRIH,*Self__HJHH,*model__IJHH;
+  __CHARACTER *Self__132;
+  __BOOLEAN result__ZDRD,result__0MFH,__tmp__NP3E;
+  __LINKED_LISToENTRYo *result__MTLE,*Self__5EWE,*Self__OFMF;
+  __LINKED_LIST_NODEoENTRYo *result__PRIH,*Self__XRIH,*result__B0NF;
+  __LINKED_LIST_NODEoENTRYo *Self__FCQF;
+  n__TDRD=NULL;
+  dirent__WDRD=((__POINTER )(NULL));
+  result__ZDRD=FALSE__;
+  i__0DRD= 0;
+  if (((void *)Self__QDRD->parent_directory__HFD.list__4DRD == (void *)NULL)) {
+    result__MTLE=NULL;
+    ptr__NTLE=((__POINTER )(NULL));
+    typ_id__STLE= 0;
+    sz__PTLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__PTLE ==  0)) {
+      result__MTLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__STLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PTLE);
+      if ((typ_id__STLE == (__INTEGER)(-  1))) {
+        a__UMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PTLE + a__UMFH) & (__UINTEGER_32)(~ a__UMFH));
+        ptr_table__BRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ARIH=((__POINTER )(NULL));
+        result__CRIH=((__POINTER *)ptr_table__BRIH)[ 0];
+        if ((result__CRIH == (void *)NULL)) {
+          result__CRIH=new_lab__QOJ(new_size__VMFH);
+          next__ARIH=(void *)((unsigned long)result__CRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VMFH)));
+          ((__POINTER *)next__ARIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BRIH)[ 0]=next__ARIH;
+        } else {
+          next__ARIH=((__POINTER *)result__CRIH)[ 0];
+          if ((next__ARIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CRIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VMFH <<  1)) <=  4096)) {
+              next__ARIH=(void *)((unsigned long)result__CRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VMFH)));
             } else {
-              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)));
+              next__ARIH=new_lab__QOJ(new_size__VMFH);
+            };
+            ((__POINTER *)next__ARIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BRIH)[ 0]=next__ARIH;
+          } else {
+            ((__POINTER *)result__CRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ARIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CRIH=next__ARIH;
+          };
+        };
+        ptr__NTLE=result__CRIH;
+      } else {
+        t__ZMFH=((__UINTEGER_32 )typ_id__STLE);
+        a__YMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PTLE + a__YMFH) & (__UINTEGER_32)(~ a__YMFH));
+        ptr_table__GRIH=((__POINTER )(&(table_type[(t__ZMFH)])));
+        lab_type__IRIH=(__UINTEGER_32)(t__ZMFH |  1);
+        next__FRIH=((__POINTER )(NULL));
+        result__HRIH=((__POINTER *)ptr_table__GRIH)[ 0];
+        if ((result__HRIH == (void *)NULL)) {
+          result__HRIH=new_lab__QOJ(lab_type__IRIH);
+          next__FRIH=(void *)((unsigned long)result__HRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JRIH)));
+          ((__POINTER *)next__FRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GRIH)[ 0]=next__FRIH;
+        } else {
+          next__FRIH=((__POINTER *)result__HRIH)[ 0];
+          if ((next__FRIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HRIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JRIH <<  1)) <=  4096)) {
+              next__FRIH=(void *)((unsigned long)result__HRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JRIH)));
             } else {
-              next__WGIH=new_lab__URJ(lab_type__ZGIH);
+              next__FRIH=new_lab__QOJ(lab_type__IRIH);
             };
-            ((__POINTER *)next__WGIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XGIH)[ 0]=next__WGIH;
+            ((__POINTER *)next__FRIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GRIH)[ 0]=next__FRIH;
           } else {
-            ((__POINTER *)result__YGIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WGIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__YGIH=next__WGIH;
+            ((__POINTER *)result__HRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__HRIH=next__FRIH;
           };
         };
-        ptr__KVLE=result__YGIH;
+        ptr__NTLE=result__HRIH;
       };
-      result__JVLE=((__LINKED_LISToENTRYo *)ptr__KVLE);
-      *(result__JVLE) = *(LINKED_LISToENTRYo__);
+      result__MTLE=((__LINKED_LISToENTRYo *)ptr__NTLE);
+      *(result__MTLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__CFRD->parent_directory__CFD.list__QFRD=result__JVLE;
+    Self__QDRD->parent_directory__HFD.list__4DRD=result__MTLE;
   } else {
-    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__;
+    Self__5EWE=((__LINKED_LISToENTRYo *)Self__QDRD->parent_directory__HFD.list__4DRD);
+    if (((void *)Self__5EWE->first_link__BFWE != (void *)NULL)) {
+      Self__5EWE->first_link__BFWE=NULL;
+      Self__5EWE->mem_idx__IFWE= 0;
+      Self__5EWE->mem_lnk__JFWE=NULL;
+      Self__5EWE->parent_linked_collection__3DRD.upper__EM3D= 0;
+      Self__5EWE->last_link__KFWE=NULL;
+    };
+  };
+  dir__UDRD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__QDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->storage__QMO))));
+  if ((dir__UDRD != (void *)NULL)) {
+    result__ZDRD=TRUE__;
     do {
-      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);
+      dirent__WDRD=((__POINTER )(readdir((dir__UDRD))));
+      if ((dirent__WDRD != (void *)NULL)) {
+        n__TDRD=((__CHARACTER *)(((struct dirent *)(dirent__WDRD))->d_name));
+        ((__STRING *)string_tmp__AFD)->count__EGC= 0;
+        i__0DRD= 0;
+        while ((((__CHARACTER *)n__TDRD)[i__0DRD] != '\0')) {
+          add_last__UHT(string_tmp__AFD,((__CHARACTER *)n__TDRD)[i__0DRD]);
+          i__0DRD=(__INTEGER)(i__0DRD +  1);
+        };
+        new__2RQE=create__ZBB(((__STRING_CONSTANT *)(&__string_221))->count__DD);
+        copy__U4R(new__2RQE,(&__string_221));
+        Self__1MFH=((__STRING *)string_tmp__AFD);
+        result__0MFH=FALSE__;
+        if ((Self__1MFH->count__EGC == new__2RQE->count__EGC)) {
+          if ((Self__1MFH->count__EGC ==  0)) {
+            result__0MFH=TRUE__;
+          } else {
+            Self__MRIH=((__CHARACTER *)Self__1MFH->storage__23R);
+            other__NRIH=new__2RQE->storage__23R;
+            i__LRIH=(__INTEGER)(Self__1MFH->count__EGC -  1);
+            while (((i__LRIH >=  0) && (Self__MRIH[i__LRIH] == ((__CHARACTER *)other__NRIH)[i__LRIH]))) {
+              i__LRIH=(__INTEGER)(i__LRIH -  1);
+            };
+            result__0MFH=(i__LRIH <  0);
+          };
+        };
+        if ((! result__0MFH)) {
+          Self__FF3E=((__STRING *)string_tmp__AFD);
+          add_last__UHT(Self__FF3E,' ');
+          Self__KMFF=Self__FF3E->count__EGC;
+          while ((Self__KMFF >=  2)) {
+            ((__CHARACTER *)Self__FF3E->storage__23R)[(__INTEGER)(Self__KMFF -  1)]=((__CHARACTER *)Self__FF3E->storage__23R)[(__INTEGER)((__INTEGER)(Self__KMFF -  1) -  1)];
+            Self__KMFF=(__INTEGER)(Self__KMFF -  1);
+          };
+          ((__CHARACTER *)Self__FF3E->storage__23R)[ 0]='/';
+          Self__HNFH=((__STRING *)string_tmp__AFD);
+          other__JNFH=Self__QDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+          i__INFH=Self__HNFH->count__EGC;
+          j__KNFH=((__STRING_CONSTANT *)other__JNFH)->count__DD;
+          resize__LTZ(Self__HNFH,(__INTEGER)(i__INFH + j__KNFH));
+          if (((i__INFH >  0) && (j__KNFH >  0))) {
+            move__to__by__YTCC(Self__HNFH->storage__23R, 0,(__INTEGER)(i__INFH -  1),j__KNFH);
+          };
+          Self__HJHH=((__CHARACTER *)Self__HNFH->storage__23R);
+          model__IJHH=((__STRING_CONSTANT *)other__JNFH)->storage__QMO;
+          Self__GJHH=(__INTEGER)(j__KNFH -  1);
+          while ((Self__GJHH >=  0)) {
+            Self__HJHH[Self__GJHH]=((__CHARACTER *)model__IJHH)[Self__GJHH];
+            Self__GJHH=(__INTEGER)(Self__GJHH -  1);
+          };
+          reduce_path__NG3E(string_tmp__AFD);
+          result__KN3E=NULL;
+          idx__LN3E= 0;
+          copy__U4R(string_tmp2__AYAC,Self__QDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+          add_last__UHT(string_tmp2__AYAC,'/');
+          append__2JS(string_tmp2__AYAC,string_tmp__AFD);
+          reduce_path__NG3E(string_tmp2__AYAC);
+          copy__U4R(string_tmp3__GYAC,string_tmp2__AYAC);
           do {
-            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__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;
+            result__KN3E=reference_at__WT0C(alias__RFD,string_tmp2__AYAC);
+            if (((void *)result__KN3E == (void *)NULL)) {
+              Self__TWSD=((__STRING *)string_tmp2__AYAC);
+              Self__132=((__CHARACTER *)Self__TWSD->storage__23R);
+              idx__H42=(__INTEGER)(Self__TWSD->count__EGC -  1);
+              while ((! ((idx__H42 <  0) || ('/' == Self__132[idx__H42])))) {
+                idx__H42=(__INTEGER)(idx__H42 -  1);
+              };
+              idx__LN3E=(__INTEGER)( 1 + idx__H42);
+              if ((idx__LN3E >  0)) {
+                Self__4UTD=((__STRING *)string_tmp2__AYAC);
+                n__5UTD=(__INTEGER)(idx__LN3E -  1);
+                if ((n__5UTD < Self__4UTD->count__EGC)) {
+                  n__FYFH=(__INTEGER)(Self__4UTD->count__EGC - n__5UTD);
+                  if ((n__FYFH > Self__4UTD->count__EGC)) {
+                    Self__4UTD->count__EGC= 0;
                   } else {
-                    Self__NUTD->count__4FC=(__INTEGER)(Self__NUTD->count__4FC - n__SMFH);
+                    Self__4UTD->count__EGC=(__INTEGER)(Self__4UTD->count__EGC - n__FYFH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__B1AC)->count__4FC= 0;
+                ((__STRING *)string_tmp2__AYAC)->count__EGC= 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) {
+          } while ((((void *)result__KN3E == (void *)NULL) && (((__STRING *)string_tmp2__AYAC)->count__EGC !=  0)));
+          if (((void *)result__KN3E == (void *)NULL)) {
+            if (FILE_SYSTEM__->parent_directory__2FD==0) {
             } else {
-              parent_directory__WED();
+              parent_directory__1ED();
             };
-            result__KV3E=physical_get_entry__AX0C(string_tmp3__H1AC);
-            __tmp__NX3E=TRUE__;
+            result__KN3E=physical_get_entry__KW0C(string_tmp3__GYAC);
+            __tmp__NP3E=TRUE__;
           } else {
-            __tmp__NX3E=FALSE__;
+            __tmp__NP3E=FALSE__;
           };
-          if ((! __tmp__NX3E)) {
-            if ((((__STRING *)string_tmp3__H1AC)->count__4FC != ((__STRING *)string_tmp2__B1AC)->count__4FC)) {
-              if (result__KV3E==NULL) {
-                __tmp__4X3E=NULL;
+          if ((! __tmp__NP3E)) {
+            if ((((__STRING *)string_tmp3__GYAC)->count__EGC != ((__STRING *)string_tmp2__AYAC)->count__EGC)) {
+              if (result__KN3E==NULL) {
+                __tmp__4P3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__KV3E)->__id) {
+                switch (((struct ___OBJ *)result__KN3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__4X3E=((void *)result__KV3E);
+                  __tmp__4P3E=((void *)result__KN3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__4X3E=NULL;
+                  __tmp__4P3E=NULL;
                 } break;
                 }
               };
-              dir__2X3E=__tmp__4X3E;
-              result__KV3E=physical_get_entry__RCF(string_tmp3__H1AC);
+              dir__2P3E=__tmp__4P3E;
+              result__KN3E=physical_get_entry__H5E(string_tmp3__GYAC);
             };
           };
-          if (((void *)result__KV3E == (void *)NULL)) {
-            result__LFRD=FALSE__;
+          if (((void *)result__KN3E == (void *)NULL)) {
+            result__ZDRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__KV3E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__1HRD=((__DIRECTORY_UNIX *)result__KV3E)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
+            if (((struct ___OBJ *)result__KN3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__JGRD=((__DIRECTORY_UNIX *)result__KN3E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
             } else {
-              __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__;
+              __tmp__JGRD=((__FILE_UNIX *)result__KN3E)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__JGRD)->count__DD >= ((__STRING_CONSTANT *)Self__QDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD)) {
+              Self__OFMF=((__LINKED_LISToENTRYo *)Self__QDRD->parent_directory__HFD.list__4DRD);
+              if (((void *)Self__OFMF->first_link__BFWE == (void *)NULL)) {
+                result__PRIH=NULL;
+                ptr__QRIH=((__POINTER )(NULL));
+                typ_id__RRIH= 0;
+                sz__SRIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__SRIH ==  0)) {
+                  result__PRIH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__RRIH=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SRIH);
+                  if ((typ_id__RRIH == (__INTEGER)(-  1))) {
+                    a__TRIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__URIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRIH + a__TRIH) & (__UINTEGER_32)(~ a__TRIH));
+                    ptr_table__0RIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__URIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__ZRIH=((__POINTER )(NULL));
+                    result__1RIH=((__POINTER *)ptr_table__0RIH)[ 0];
+                    if ((result__1RIH == (void *)NULL)) {
+                      result__1RIH=new_lab__QOJ(new_size__URIH);
+                      next__ZRIH=(void *)((unsigned long)result__1RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URIH)));
+                      ((__POINTER *)next__ZRIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__0RIH)[ 0]=next__ZRIH;
                     } else {
-                      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)));
+                      next__ZRIH=((__POINTER *)result__1RIH)[ 0];
+                      if ((next__ZRIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1RIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__URIH <<  1)) <=  4096)) {
+                          next__ZRIH=(void *)((unsigned long)result__1RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URIH)));
                         } else {
-                          next__KHIH=new_lab__URJ(new_size__FHIH);
+                          next__ZRIH=new_lab__QOJ(new_size__URIH);
                         };
-                        ((__POINTER *)next__KHIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__LHIH)[ 0]=next__KHIH;
+                        ((__POINTER *)next__ZRIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__0RIH)[ 0]=next__ZRIH;
                       } else {
-                        ((__POINTER *)result__MHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__MHIH=next__KHIH;
+                        ((__POINTER *)result__1RIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__1RIH=next__ZRIH;
                       };
                     };
-                    ptr__BHIH=result__MHIH;
+                    ptr__QRIH=result__1RIH;
                   } else {
-                    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;
+                    t__VRIH=((__UINTEGER_32 )typ_id__RRIH);
+                    a__WRIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__CSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__SRIH + a__WRIH) & (__UINTEGER_32)(~ a__WRIH));
+                    ptr_table__5RIH=((__POINTER )(&(table_type[(t__VRIH)])));
+                    lab_type__BSIH=(__UINTEGER_32)(t__VRIH |  1);
+                    next__4RIH=((__POINTER )(NULL));
+                    result__ASIH=((__POINTER *)ptr_table__5RIH)[ 0];
+                    if ((result__ASIH == (void *)NULL)) {
+                      result__ASIH=new_lab__QOJ(lab_type__BSIH);
+                      next__4RIH=(void *)((unsigned long)result__ASIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSIH)));
+                      ((__POINTER *)next__4RIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__5RIH)[ 0]=next__4RIH;
                     } else {
-                      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)));
+                      next__4RIH=((__POINTER *)result__ASIH)[ 0];
+                      if ((next__4RIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ASIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__CSIH <<  1)) <=  4096)) {
+                          next__4RIH=(void *)((unsigned long)result__ASIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CSIH)));
                         } else {
-                          next__PHIH=new_lab__URJ(lab_type__SHIH);
+                          next__4RIH=new_lab__QOJ(lab_type__BSIH);
                         };
-                        ((__POINTER *)next__PHIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__QHIH)[ 0]=next__PHIH;
+                        ((__POINTER *)next__4RIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__5RIH)[ 0]=next__4RIH;
                       } else {
-                        ((__POINTER *)result__RHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__RHIH=next__PHIH;
+                        ((__POINTER *)result__ASIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ASIH=next__4RIH;
                       };
                     };
-                    ptr__BHIH=result__RHIH;
+                    ptr__QRIH=result__ASIH;
                   };
-                  result__AHIH=((__LINKED_LIST_NODEoENTRYo *)ptr__BHIH);
-                  *(result__AHIH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__PRIH=((__LINKED_LIST_NODEoENTRYo *)ptr__QRIH);
+                  *(result__PRIH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__XRIH=((__LINKED_LIST_NODEoENTRYo *)result__PRIH);
+                Self__XRIH->item__HYWE=result__KN3E;
+                Self__XRIH->next__YTFF=NULL;
+                Self__OFMF->first_link__BFWE=result__PRIH;
+                Self__OFMF->parent_linked_collection__3DRD.upper__EM3D= 1;
+                Self__OFMF->last_link__KFWE=result__PRIH;
+                Self__OFMF->mem_idx__IFWE= 1;
+                Self__OFMF->mem_lnk__JFWE=result__PRIH;
               } else {
-                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__;
+                result__B0NF=NULL;
+                ptr__C0NF=((__POINTER )(NULL));
+                typ_id__H0NF= 0;
+                sz__E0NF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__E0NF ==  0)) {
+                  result__B0NF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__H0NF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E0NF);
+                  if ((typ_id__H0NF == (__INTEGER)(-  1))) {
+                    a__LZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__MZFH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0NF + a__LZFH) & (__UINTEGER_32)(~ a__LZFH));
+                    ptr_table__ESIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__DSIH=((__POINTER )(NULL));
+                    result__FSIH=((__POINTER *)ptr_table__ESIH)[ 0];
+                    if ((result__FSIH == (void *)NULL)) {
+                      result__FSIH=new_lab__QOJ(new_size__MZFH);
+                      next__DSIH=(void *)((unsigned long)result__FSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZFH)));
+                      ((__POINTER *)next__DSIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__ESIH)[ 0]=next__DSIH;
                     } else {
-                      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)));
+                      next__DSIH=((__POINTER *)result__FSIH)[ 0];
+                      if ((next__DSIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FSIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MZFH <<  1)) <=  4096)) {
+                          next__DSIH=(void *)((unsigned long)result__FSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MZFH)));
                         } else {
-                          next__UHIH=new_lab__URJ(new_size__2NFH);
+                          next__DSIH=new_lab__QOJ(new_size__MZFH);
                         };
-                        ((__POINTER *)next__UHIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__VHIH)[ 0]=next__UHIH;
+                        ((__POINTER *)next__DSIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__ESIH)[ 0]=next__DSIH;
                       } else {
-                        ((__POINTER *)result__WHIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__WHIH=next__UHIH;
+                        ((__POINTER *)result__FSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__FSIH=next__DSIH;
                       };
                     };
-                    ptr__CPNF=result__WHIH;
+                    ptr__C0NF=result__FSIH;
                   } else {
-                    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;
+                    t__QZFH=((__UINTEGER_32 )typ_id__H0NF);
+                    a__PZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__MSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0NF + a__PZFH) & (__UINTEGER_32)(~ a__PZFH));
+                    ptr_table__JSIH=((__POINTER )(&(table_type[(t__QZFH)])));
+                    lab_type__LSIH=(__UINTEGER_32)(t__QZFH |  1);
+                    next__ISIH=((__POINTER )(NULL));
+                    result__KSIH=((__POINTER *)ptr_table__JSIH)[ 0];
+                    if ((result__KSIH == (void *)NULL)) {
+                      result__KSIH=new_lab__QOJ(lab_type__LSIH);
+                      next__ISIH=(void *)((unsigned long)result__KSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MSIH)));
+                      ((__POINTER *)next__ISIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__JSIH)[ 0]=next__ISIH;
                     } else {
-                      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)));
+                      next__ISIH=((__POINTER *)result__KSIH)[ 0];
+                      if ((next__ISIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KSIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MSIH <<  1)) <=  4096)) {
+                          next__ISIH=(void *)((unsigned long)result__KSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MSIH)));
                         } else {
-                          next__ZHIH=new_lab__URJ(lab_type__2HIH);
+                          next__ISIH=new_lab__QOJ(lab_type__LSIH);
                         };
-                        ((__POINTER *)next__ZHIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__0HIH)[ 0]=next__ZHIH;
+                        ((__POINTER *)next__ISIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__JSIH)[ 0]=next__ISIH;
                       } else {
-                        ((__POINTER *)result__1HIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__1HIH=next__ZHIH;
+                        ((__POINTER *)result__KSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ISIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__KSIH=next__ISIH;
                       };
                     };
-                    ptr__CPNF=result__1HIH;
+                    ptr__C0NF=result__KSIH;
                   };
-                  result__BPNF=((__LINKED_LIST_NODEoENTRYo *)ptr__CPNF);
-                  *(result__BPNF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__B0NF=((__LINKED_LIST_NODEoENTRYo *)ptr__C0NF);
+                  *(result__B0NF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__FCQF=((__LINKED_LIST_NODEoENTRYo *)result__B0NF);
+                Self__FCQF->item__HYWE=result__KN3E;
+                Self__FCQF->next__YTFF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__OFMF->last_link__KFWE)->next__YTFF=result__B0NF;
+                Self__OFMF->parent_linked_collection__3DRD.upper__EM3D=(__INTEGER)(Self__OFMF->parent_linked_collection__3DRD.upper__EM3D +  1);
+                Self__OFMF->last_link__KFWE=result__B0NF;
               };
             };
           };
         };
       };
-    } while (((dirent__IFRD != (void *)NULL) & result__LFRD));
-    closedir((dir__GFRD));
+    } while (((dirent__WDRD != (void *)NULL) & result__ZDRD));
+    closedir((dir__UDRD));
   };
-  return(result__LFRD);
+  return(result__ZDRD);
 }
 
-static void check_in__begin__GRQC(void *entry__IRQC,__INTEGER n__JRQC)
+static void check_in__begin__GPQC(void *entry__IPQC,__INTEGER n__JPQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  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);
+  void *tok__LPQC,*__tmp__VPQC,*__tmp__FRQC,*k__KUDC,*k__QXEG;
+  void *__tmp__RTQC,*__tmp__WTQC;
+  void *dir__NPQC,*__tmp__2PQC;
+  __FILE_UNIX *Self__VP3G;
+  __INTEGER __tmp__BQQC,Self__IM3D,__tmp__WQQC,Self__ZM3D,i1__UES;
+  __INTEGER i2__VES,Self__LLX,result__4PHH,__tmp__AQHH,Self__BQHH;
+  __INTEGER result__DQHH,__tmp__FQHH,Self__GQHH,__tmp__BSQC,Self__AXEG;
+  __INTEGER result__IQHH,__tmp__KQHH,Self__LQHH,result__NQHH;
+  __INTEGER __tmp__PQHH,Self__QQHH,result__WQHH,__tmp__YQHH,Self__ZQHH;
+  __INTEGER result__1QHH,__tmp__3QHH,Self__4QHH,i__CYBD,j__DYBD;
+  __INTEGER Self__C5JB,result__ERHH,__tmp__GRHH,Self__HRHH,result__JRHH;
+  __INTEGER __tmp__LRHH,Self__MRHH,len__URU,__tmp__RSU,__tmp__SSU;
+  __INTEGER Self__KMGB,__tmp__KMS,Self__OQIC,result__SRHH,__tmp__URHH;
+  __INTEGER Self__VRHH,result__XRHH,__tmp__ZRHH,Self__0RHH,__tmp__PWQC;
+  __INTEGER Self__J5RE;
+  void *__tmp__HQQC,*__tmp__2QQC,*__tmp__ERQC,*__tmp__QTQC,*__tmp__VTQC;
+  __STRING_CONSTANT *Self__QES,*Self__JQHH,*Self__OQHH;
+  __STRING *Self__JNS,*Self__POS,*Self__AYBD,*Self__MZ2,*Self__CMS;
+  void *tok_lst__MPQC;
+  __BOOLEAN __tmp__OPQC,__tmp__IQQC,__tmp__3QQC,result__TES;
+  __CHARACTER Self__FOFH,result__EOFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0PHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NJHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SQHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__RJHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ARHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YJHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__ORHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2S3;
+  void *node__2PHH,*node__PJHH,*node__UQHH,*node__TJHH,*node__CRHH;
+  void *node__0JHH,*node__QRHH,*node__HT3;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__JUDC,*Self__PXEG;
+  void *node__TUDC,*node__0XEG;
+  __CHARACTER *Self__OIEB,*model__PIEB,*__tmp__HMS,*Self__WJBC;
+  tok__LPQC=NULL;
+  tok_lst__MPQC=NULL;
+  dir__NPQC=NULL;
+  if (((struct ___OBJ *)entry__IPQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__OPQC=open__PDRD(entry__IPQC);
   } else {
-    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);
+    Self__VP3G=((__FILE_UNIX *)entry__IPQC);
+    Self__VP3G->stream__0HRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__VP3G->parent_entry_unix__05E.parent_entry__FFD.path__BD)->storage__QMO),"r+b")));
+    __tmp__OPQC=(Self__VP3G->stream__0HRD != (void *)NULL);
   };
-  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;
+  if ((! __tmp__OPQC)) {
+    print__DID((&__string_222));
+    if (((struct ___OBJ *)entry__IPQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__VPQC=((__DIRECTORY_UNIX *)entry__IPQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__VRQC=((__FILE_UNIX *)entry__IRQC)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+      __tmp__VPQC=((__FILE_UNIX *)entry__IPQC)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
     };
-    print__4HD(__tmp__VRQC);
-    print__4HD((&__string_169));
+    print__DID(__tmp__VPQC);
+    print__DID((&__string_171));
   } else {
-    if (entry__IRQC==NULL) {
-      __tmp__2RQC=NULL;
+    if (entry__IPQC==NULL) {
+      __tmp__2PQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__IRQC)->__id) {
+      switch (((struct ___OBJ *)entry__IPQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__2RQC=((void *)entry__IRQC);
+        __tmp__2PQC=((void *)entry__IPQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__2RQC=NULL;
+        __tmp__2PQC=NULL;
       } break;
       }
     };
-    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;
+    dir__NPQC=__tmp__2PQC;
+    __tmp__BQQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__2PQC)->parent_directory__HFD.list__4DRD)->parent_linked_collection__3DRD.upper__EM3D;
+    Self__IM3D= 1;
+    while ((Self__IM3D <= __tmp__BQQC)) {
+      __tmp__HQQC=item__YVPE(dir__NPQC,Self__IM3D);
+      if (((struct ___OBJ *)__tmp__HQQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__IQQC=((void *)((__DIRECTORY_UNIX *)__tmp__HQQC) != (void *)NULL);
+      } else {
+        __tmp__IQQC=FALSE__;
+      };
+      if (__tmp__IQQC) {
+        check_in__begin__GPQC(item__YVPE(dir__NPQC,Self__IM3D),n__JPQC);
+      };
+      Self__IM3D=(__INTEGER)(Self__IM3D +  1);
+    };
+    __tmp__WQQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__2PQC)->parent_directory__HFD.list__4DRD)->parent_linked_collection__3DRD.upper__EM3D;
+    Self__ZM3D= 1;
+    while ((Self__ZM3D <= __tmp__WQQC)) {
+      __tmp__2QQC=item__YVPE(dir__NPQC,Self__ZM3D);
+      if (((struct ___OBJ *)__tmp__2QQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__3QQC=((void *)((__DIRECTORY_UNIX *)__tmp__2QQC) != (void *)NULL);
+      } else {
+        __tmp__3QQC=FALSE__;
+      };
+      if ((! __tmp__3QQC)) {
+        __tmp__ERQC=item__YVPE(dir__NPQC,Self__ZM3D);
+        if (((struct ___OBJ *)__tmp__ERQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__FRQC=((__DIRECTORY_UNIX *)__tmp__ERQC)->parent_entry_unix__GFD.parent_entry__FFD.name__QJT;
+        } else {
+          __tmp__FRQC=((__FILE_UNIX *)__tmp__ERQC)->parent_entry_unix__05E.parent_entry__FFD.name__QJT;
+        };
+        Self__QES=((__STRING_CONSTANT *)__tmp__FRQC);
+        result__TES=FALSE__;
+        i1__UES= 0;
+        i2__VES= 0;
+        if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__QES->count__DD)) {
+          i1__UES=(__INTEGER)((__INTEGER)(Self__QES->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+          i2__VES= 1;
+          while ((! (((i1__UES > Self__QES->count__DD) || (i2__VES > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__QES->storage__QMO)[(__INTEGER)(i1__UES -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__QMO)[(__INTEGER)(i2__VES -  1)])))) {
+            i1__UES=(__INTEGER)(i1__UES +  1);
+            i2__VES=(__INTEGER)(i2__VES +  1);
+          };
+          result__TES=(i1__UES > Self__QES->count__DD);
+        };
+        if (result__TES) {
+          copy__U4R(string_tmp__VH,__tmp__FRQC);
+          Self__JNS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__JNS->count__EGC)) {
+            Self__JNS->count__EGC= 0;
+          } else {
+            Self__JNS->count__EGC=(__INTEGER)(Self__JNS->count__EGC -  3);
+          };
+          Self__POS=((__STRING *)string_tmp__VH);
+          Self__LLX=Self__POS->count__EGC;
+          while ((Self__LLX >=  1)) {
+            Self__FOFH=((__CHARACTER *)Self__POS->storage__23R)[(__INTEGER)(Self__LLX -  1)];
+            result__EOFH='\0';
+            if (((((__INTEGER_8 )Self__FOFH) <  97) || (((__INTEGER_8 )Self__FOFH) >  122))) {
+              result__EOFH=Self__FOFH;
             } else {
-              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);
+              result__EOFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__FOFH) -  32))));
+            };
+            ((__CHARACTER *)Self__POS->storage__23R)[(__INTEGER)(Self__LLX -  1)]=result__EOFH;
+            Self__LLX=(__INTEGER)(Self__LLX -  1);
+          };
+          tok__LPQC=get__YWB(string_tmp__VH);
+          Self__0PHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__4PHH= 0;
+          __tmp__AQHH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+          Self__BQHH= 1;
+          while ((Self__BQHH <= __tmp__AQHH)) {
+            result__4PHH=(__INTEGER)((__INTEGER)( 5 * result__4PHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__QMO)[(__INTEGER)(Self__BQHH -  1)])));
+            Self__BQHH=(__INTEGER)(Self__BQHH +  1);
+          };
+          if ((result__4PHH <  0)) {
+            result__4PHH=(__INTEGER)(~ result__4PHH);
+          };
+          node__2PHH=((void **)Self__0PHH->buckets__04S)[(__INTEGER)(result__4PHH % Self__0PHH->capacity__V4S)];
+          while ((! (((void *)node__2PHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2PHH)->key__G5S == (void *)(&__string_155))))) {
+            node__2PHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2PHH)->next__R5S;
+          };
+          if (((void *)node__2PHH != (void *)NULL)) {
+            Self__NJHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+            result__DQHH= 0;
+            __tmp__FQHH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+            Self__GQHH= 1;
+            while ((Self__GQHH <= __tmp__FQHH)) {
+              result__DQHH=(__INTEGER)((__INTEGER)( 5 * result__DQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__QMO)[(__INTEGER)(Self__GQHH -  1)])));
+              Self__GQHH=(__INTEGER)(Self__GQHH +  1);
+            };
+            if ((result__DQHH <  0)) {
+              result__DQHH=(__INTEGER)(~ result__DQHH);
+            };
+            node__PJHH=((void **)Self__NJHH->buckets__04S)[(__INTEGER)(result__DQHH % Self__NJHH->capacity__V4S)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PJHH)->key__G5S != (void *)(&__string_155))) {
+              node__PJHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PJHH)->next__R5S;
+            };
+            tok_lst__MPQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PJHH)->item__0T3;
+            __tmp__BSQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__MPQC)->parent_linked_collection__LD.upper__MDD;
+            Self__AXEG= 1;
+            while ((Self__AXEG <= __tmp__BSQC)) {
+              if (((void *)item__MZND(tok_lst__MPQC,Self__AXEG) == (void *)NULL)) {
+                append__2JS(current_list__2B,tok__LPQC);
+                append__2JS(file_list__0B,tok__LPQC);
               } else {
-                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__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);
+                append__2JS(current_list__2B,item__MZND(tok_lst__MPQC,Self__AXEG));
+                append__2JS(file_list__0B,item__MZND(tok_lst__MPQC,Self__AXEG));
+              };
+              Self__AXEG=(__INTEGER)(Self__AXEG +  1);
+            };
+          } else {
+            append__2JS(current_list__2B,tok__LPQC);
+            add_last__UHT(current_list__2B,'\n');
+            append__2JS(file_list__0B,tok__LPQC);
+            add_last__UHT(file_list__0B,'\n');
+          };
+          Self__JUDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__KPS);
+          k__KUDC=tok__LPQC;
+          Self__JQHH=((__STRING_CONSTANT *)tok__LPQC);
+          result__IQHH= 0;
+          __tmp__KQHH=Self__JQHH->count__DD;
+          Self__LQHH= 1;
+          while ((Self__LQHH <= __tmp__KQHH)) {
+            result__IQHH=(__INTEGER)((__INTEGER)( 5 * result__IQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JQHH->storage__QMO)[(__INTEGER)(Self__LQHH -  1)])));
+            Self__LQHH=(__INTEGER)(Self__LQHH +  1);
+          };
+          if ((result__IQHH <  0)) {
+            result__IQHH=(__INTEGER)(~ result__IQHH);
+          };
+          node__TUDC=((void **)Self__JUDC->buckets__ELBC)[(__INTEGER)(result__IQHH % Self__JUDC->capacity__5KBC)];
+          while ((! (((void *)node__TUDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__TUDC)->key__QLBC == (void *)k__KUDC)))) {
+            node__TUDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__TUDC)->next__1LBC;
+          };
+          if (((void *)node__TUDC != (void *)NULL)) {
+            print__DID((&__string_223));
+            Self__PXEG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__KPS);
+            k__QXEG=tok__LPQC;
+            Self__OQHH=((__STRING_CONSTANT *)tok__LPQC);
+            result__NQHH= 0;
+            __tmp__PQHH=Self__OQHH->count__DD;
+            Self__QQHH= 1;
+            while ((Self__QQHH <= __tmp__PQHH)) {
+              result__NQHH=(__INTEGER)((__INTEGER)( 5 * result__NQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OQHH->storage__QMO)[(__INTEGER)(Self__QQHH -  1)])));
+              Self__QQHH=(__INTEGER)(Self__QQHH +  1);
+            };
+            if ((result__NQHH <  0)) {
+              result__NQHH=(__INTEGER)(~ result__NQHH);
+            };
+            node__0XEG=((void **)Self__PXEG->buckets__ELBC)[(__INTEGER)(result__NQHH % Self__PXEG->capacity__5KBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__0XEG)->key__QLBC != (void *)k__QXEG)) {
+              node__0XEG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__0XEG)->next__1LBC;
+            };
+            print__DID(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__0XEG)->item__I3GD)->filename__CNG);
             fputc((int)('\n'),stdout);
-            __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;
+            __tmp__QTQC=item__YVPE(dir__NPQC,Self__ZM3D);
+            if (((struct ___OBJ *)__tmp__QTQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__RTQC=((__DIRECTORY_UNIX *)__tmp__QTQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
             } else {
-              __tmp__RVQC=((__FILE_UNIX *)__tmp__QVQC)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+              __tmp__RTQC=((__FILE_UNIX *)__tmp__QTQC)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
             };
-            print__4HD(__tmp__RVQC);
+            print__DID(__tmp__RTQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __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);
+          __tmp__VTQC=item__YVPE(dir__NPQC,Self__ZM3D);
+          if (((struct ___OBJ *)__tmp__VTQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__WTQC=((__DIRECTORY_UNIX *)__tmp__VTQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+          } else {
+            __tmp__WTQC=((__FILE_UNIX *)__tmp__VTQC)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+          };
+          proto_input__BI=create__name__generic_count__JBC(__tmp__WTQC,tok__LPQC);
+          go_on__SBC(proto_input__BI);
+          if (is_shorter__LZ) {
+            save_file__with__3DC(add_ext__C4E(tok__LPQC),output_code__SI);
+          };
+        };
+      };
+      Self__ZM3D=(__INTEGER)(Self__ZM3D +  1);
+    };
+    if ((((__STRING *)current_list__2B)->count__EGC !=  0)) {
+      Self__SQHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__WQHH= 0;
+      __tmp__YQHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__ZQHH= 1;
+      while ((Self__ZQHH <= __tmp__YQHH)) {
+        result__WQHH=(__INTEGER)((__INTEGER)( 5 * result__WQHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__QMO)[(__INTEGER)(Self__ZQHH -  1)])));
+        Self__ZQHH=(__INTEGER)(Self__ZQHH +  1);
+      };
+      if ((result__WQHH <  0)) {
+        result__WQHH=(__INTEGER)(~ result__WQHH);
+      };
+      node__UQHH=((void **)Self__SQHH->buckets__04S)[(__INTEGER)(result__WQHH % Self__SQHH->capacity__V4S)];
+      while ((! (((void *)node__UQHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UQHH)->key__G5S == (void *)(&__string_154))))) {
+        node__UQHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UQHH)->next__R5S;
+      };
+      if (((void *)node__UQHH != (void *)NULL)) {
+        Self__RJHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__1QHH= 0;
+        __tmp__3QHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+        Self__4QHH= 1;
+        while ((Self__4QHH <= __tmp__3QHH)) {
+          result__1QHH=(__INTEGER)((__INTEGER)( 5 * result__1QHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__QMO)[(__INTEGER)(Self__4QHH -  1)])));
+          Self__4QHH=(__INTEGER)(Self__4QHH +  1);
+        };
+        if ((result__1QHH <  0)) {
+          result__1QHH=(__INTEGER)(~ result__1QHH);
+        };
+        node__TJHH=((void **)Self__RJHH->buckets__04S)[(__INTEGER)(result__1QHH % Self__RJHH->capacity__V4S)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TJHH)->key__G5S != (void *)(&__string_154))) {
+          node__TJHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TJHH)->next__R5S;
+        };
+        tok__LPQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__TJHH)->item__0T3)->first_link__1REC)->item__GWHD;
+        Self__AYBD=((__STRING *)current_list__2B);
+        i__CYBD=Self__AYBD->count__EGC;
+        j__DYBD=((__STRING_CONSTANT *)tok__LPQC)->count__DD;
+        resize__LTZ(Self__AYBD,(__INTEGER)(i__CYBD + j__DYBD));
+        if (((i__CYBD >  0) && (j__DYBD >  0))) {
+          move__to__by__YTCC(Self__AYBD->storage__23R, 0,(__INTEGER)(i__CYBD -  1),j__DYBD);
+        };
+        Self__OIEB=((__CHARACTER *)Self__AYBD->storage__23R);
+        model__PIEB=((__STRING_CONSTANT *)tok__LPQC)->storage__QMO;
+        Self__C5JB=(__INTEGER)(j__DYBD -  1);
+        while ((Self__C5JB >=  0)) {
+          Self__OIEB[Self__C5JB]=((__CHARACTER *)model__PIEB)[Self__C5JB];
+          Self__C5JB=(__INTEGER)(Self__C5JB -  1);
+        };
+      };
+      Self__ARHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__ERHH= 0;
+      __tmp__GRHH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__HRHH= 1;
+      while ((Self__HRHH <= __tmp__GRHH)) {
+        result__ERHH=(__INTEGER)((__INTEGER)( 5 * result__ERHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__QMO)[(__INTEGER)(Self__HRHH -  1)])));
+        Self__HRHH=(__INTEGER)(Self__HRHH +  1);
+      };
+      if ((result__ERHH <  0)) {
+        result__ERHH=(__INTEGER)(~ result__ERHH);
+      };
+      node__CRHH=((void **)Self__ARHH->buckets__04S)[(__INTEGER)(result__ERHH % Self__ARHH->capacity__V4S)];
+      while ((! (((void *)node__CRHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CRHH)->key__G5S == (void *)(&__string_156))))) {
+        node__CRHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__CRHH)->next__R5S;
+      };
+      if (((void *)node__CRHH != (void *)NULL)) {
+        Self__YJHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__JRHH= 0;
+        __tmp__LRHH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+        Self__MRHH= 1;
+        while ((Self__MRHH <= __tmp__LRHH)) {
+          result__JRHH=(__INTEGER)((__INTEGER)( 5 * result__JRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__QMO)[(__INTEGER)(Self__MRHH -  1)])));
+          Self__MRHH=(__INTEGER)(Self__MRHH +  1);
+        };
+        if ((result__JRHH <  0)) {
+          result__JRHH=(__INTEGER)(~ result__JRHH);
+        };
+        node__0JHH=((void **)Self__YJHH->buckets__04S)[(__INTEGER)(result__JRHH % Self__YJHH->capacity__V4S)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0JHH)->key__G5S != (void *)(&__string_156))) {
+          node__0JHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0JHH)->next__R5S;
+        };
+        tok__LPQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0JHH)->item__0T3)->first_link__1REC)->item__GWHD;
+        append__2JS(current_list__2B,tok__LPQC);
+      };
+      copy__U4R(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__2PQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+      Self__MZ2=((__STRING *)string_tmp__VH);
+      if ((n__JPQC > Self__MZ2->count__EGC)) {
+        Self__MZ2->count__EGC= 0;
+      } else {
+        if ((n__JPQC >  0)) {
+          len__URU=(__INTEGER)((__INTEGER)(n__JPQC -  1) +  1);
+          if ((len__URU >  0)) {
+            __tmp__RSU=(__INTEGER)(n__JPQC +  1);
+            __tmp__SSU=Self__MZ2->count__EGC;
+            Self__KMGB=__tmp__RSU;
+            while ((Self__KMGB <= __tmp__SSU)) {
+              ((__CHARACTER *)Self__MZ2->storage__23R)[(__INTEGER)((__INTEGER)(Self__KMGB - len__URU) -  1)]=((__CHARACTER *)Self__MZ2->storage__23R)[(__INTEGER)(Self__KMGB -  1)];
+              Self__KMGB=(__INTEGER)(Self__KMGB +  1);
+            };
+            Self__MZ2->count__EGC=(__INTEGER)(Self__MZ2->count__EGC - len__URU);
+          };
+        };
+      };
+      if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
+        Self__CMS=((__STRING *)string_tmp__VH);
+        __tmp__HMS=Self__CMS->storage__23R;
+        __tmp__KMS=(__INTEGER)(Self__CMS->count__EGC -  1);
+        Self__WJBC=((__CHARACTER *)__tmp__HMS);
+        Self__OQIC=__tmp__KMS;
+        while ((Self__OQIC >=  0)) {
+          if (('/' == Self__WJBC[Self__OQIC])) {
+            Self__WJBC[Self__OQIC]='-';
+          };
+          Self__OQIC=(__INTEGER)(Self__OQIC -  1);
+        };
+        tok__LPQC=get__YWB(string_tmp__VH);
+        Self__ORHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__SRHH= 0;
+        __tmp__URHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+        Self__VRHH= 1;
+        while ((Self__VRHH <= __tmp__URHH)) {
+          result__SRHH=(__INTEGER)((__INTEGER)( 5 * result__SRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__QMO)[(__INTEGER)(Self__VRHH -  1)])));
+          Self__VRHH=(__INTEGER)(Self__VRHH +  1);
+        };
+        if ((result__SRHH <  0)) {
+          result__SRHH=(__INTEGER)(~ result__SRHH);
+        };
+        node__QRHH=((void **)Self__ORHH->buckets__04S)[(__INTEGER)(result__SRHH % Self__ORHH->capacity__V4S)];
+        while ((! (((void *)node__QRHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QRHH)->key__G5S == (void *)(&__string_152))))) {
+          node__QRHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QRHH)->next__R5S;
+        };
+        if (((void *)node__QRHH != (void *)NULL)) {
+          Self__2S3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__XRHH= 0;
+          __tmp__ZRHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+          Self__0RHH= 1;
+          while ((Self__0RHH <= __tmp__ZRHH)) {
+            result__XRHH=(__INTEGER)((__INTEGER)( 5 * result__XRHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__QMO)[(__INTEGER)(Self__0RHH -  1)])));
+            Self__0RHH=(__INTEGER)(Self__0RHH +  1);
+          };
+          if ((result__XRHH <  0)) {
+            result__XRHH=(__INTEGER)(~ result__XRHH);
+          };
+          node__HT3=((void **)Self__2S3->buckets__04S)[(__INTEGER)(result__XRHH % Self__2S3->capacity__V4S)];
+          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HT3)->key__G5S != (void *)(&__string_152))) {
+            node__HT3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HT3)->next__R5S;
+          };
+          tok_lst__MPQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HT3)->item__0T3;
+          __tmp__PWQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__MPQC)->parent_linked_collection__LD.upper__MDD;
+          Self__J5RE= 1;
+          while ((Self__J5RE <= __tmp__PWQC)) {
+            if (((void *)item__MZND(tok_lst__MPQC,Self__J5RE) == (void *)NULL)) {
+              append__2JS(directory_list__YB,tok__LPQC);
             } else {
-              append__JOS(directory_list__YB,item__A1ND(tok_lst__MRQC,Self__LYRE));
+              append__2JS(directory_list__YB,item__MZND(tok_lst__MPQC,Self__J5RE));
             };
-            Self__LYRE=(__INTEGER)(Self__LYRE +  1);
+            Self__J5RE=(__INTEGER)(Self__J5RE +  1);
           };
         } else {
-          append__JOS(directory_list__YB,tok__LRQC);
-          add_last__BMT(directory_list__YB,'\n');
+          append__2JS(directory_list__YB,tok__LPQC);
+          add_last__UHT(directory_list__YB,'\n');
         };
-        save_file__with__XDC(add_ext__MBF(tok__LRQC),current_list__2B);
-        ((__STRING *)current_list__2B)->count__4FC= 0;
+        save_file__with__3DC(add_ext__C4E(tok__LPQC),current_list__2B);
+        ((__STRING *)current_list__2B)->count__EGC= 0;
       };
     };
   };
 }
 
-static void* add_ext__MBF(void *n__OBF)
+static void* add_ext__C4E(void *n__E4E)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__ASHH,__tmp__CSHH,Self__DSHH,result__FSHH;
+  __INTEGER __tmp__HSHH,Self__ISHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2RHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__PNFH;
+  void *node__4RHH,*node__RNFH;
+  copy__U4R(string_tmp__VH,n__E4E);
+  Self__2RHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+  result__ASHH= 0;
+  __tmp__CSHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+  Self__DSHH= 1;
+  while ((Self__DSHH <= __tmp__CSHH)) {
+    result__ASHH=(__INTEGER)((__INTEGER)( 5 * result__ASHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__QMO)[(__INTEGER)(Self__DSHH -  1)])));
+    Self__DSHH=(__INTEGER)(Self__DSHH +  1);
+  };
+  if ((result__ASHH <  0)) {
+    result__ASHH=(__INTEGER)(~ result__ASHH);
+  };
+  node__4RHH=((void **)Self__2RHH->buckets__04S)[(__INTEGER)(result__ASHH % Self__2RHH->capacity__V4S)];
+  while ((! (((void *)node__4RHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4RHH)->key__G5S == (void *)(&__string_116))))) {
+    node__4RHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4RHH)->next__R5S;
+  };
+  if (((void *)node__4RHH != (void *)NULL)) {
+    Self__PNFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+    result__FSHH= 0;
+    __tmp__HSHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+    Self__ISHH= 1;
+    while ((Self__ISHH <= __tmp__HSHH)) {
+      result__FSHH=(__INTEGER)((__INTEGER)( 5 * result__FSHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__QMO)[(__INTEGER)(Self__ISHH -  1)])));
+      Self__ISHH=(__INTEGER)(Self__ISHH +  1);
+    };
+    if ((result__FSHH <  0)) {
+      result__FSHH=(__INTEGER)(~ result__FSHH);
+    };
+    node__RNFH=((void **)Self__PNFH->buckets__04S)[(__INTEGER)(result__FSHH % Self__PNFH->capacity__V4S)];
+    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RNFH)->key__G5S != (void *)(&__string_116))) {
+      node__RNFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RNFH)->next__R5S;
+    };
+    append__2JS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RNFH)->item__0T3)->first_link__1REC)->item__GWHD);
   } else {
-    append__JOS(string_tmp__VH,(&__string_222));
+    append__2JS(string_tmp__VH,(&__string_224));
   };
-  return(get__QWB(string_tmp__VH));
+  return(get__YWB(string_tmp__VH));
 }
 
-static void save_file__with__XDC(void *n__ZDC,void *buf__0DC)
+static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __STRING *Self__TNFH,*Self__45S,*Self__STS;
+  void *result__YWAC,*__tmp__IXAC,*__tmp__BGC,*file__CEC;
+  void *__tmp__H1HC;
+  __POINTER stream__VCIC,ptr__UCPF;
+  void *__tmp__HXAC;
+  __FILE_UNIX *Self__JQ3G,*Self__HBUE,*Self__QCUE;
+  __INTEGER __tmp__GGC;
+  __BOOLEAN __tmp__XEC,result__XCIC;
   if (((void *)output_name__DI != (void *)NULL)) {
-    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__;
+    copy__U4R(string_tmp__VH,output_name__DI);
+    Self__TNFH=((__STRING *)string_tmp__VH);
+    if ((((__CHARACTER *)Self__TNFH->storage__23R)[(__INTEGER)(Self__TNFH->count__EGC -  1)] != '/')) {
+      __tmp__XEC=TRUE__;
     } else {
-      Self__LET=((__STRING *)string_tmp__VH);
-      __tmp__REC=(((__CHARACTER *)Self__LET->storage__JCS)[(__INTEGER)(Self__LET->count__4FC -  1)] != '\\');
+      Self__45S=((__STRING *)string_tmp__VH);
+      __tmp__XEC=(((__CHARACTER *)Self__45S->storage__23R)[(__INTEGER)(Self__45S->count__EGC -  1)] != '\\');
     };
-    if (__tmp__REC) {
-      add_last__BMT(string_tmp__VH,'/');
+    if (__tmp__XEC) {
+      add_last__UHT(string_tmp__VH,'/');
     };
   } else {
-    ((__STRING *)string_tmp__VH)->count__4FC= 0;
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
   };
-  append__JOS(string_tmp__VH,n__ZDC);
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  append__2JS(string_tmp__VH,n__5DC);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  result__ZZAC=NULL;
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  result__YWAC=NULL;
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
-    __tmp__J3HC=FILE_SYSTEM__->parent_directory__WFD;
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
+    __tmp__H1HC=FILE_SYSTEM__->parent_directory__1FD;
   } else {
-    __tmp__J3HC=parent_directory__WED();
+    __tmp__H1HC=parent_directory__1ED();
   };
-  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) {
+  copy__U4R(string_tmp__AFD,((__DIRECTORY_UNIX *)__tmp__H1HC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  add_last__BMT(string_tmp__1ED,'/');
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  add_last__UHT(string_tmp__AFD,'/');
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  append__JOS(string_tmp__1ED,string_tmp__VH);
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  append__2JS(string_tmp__AFD,string_tmp__VH);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  reduce_path__Y3HC(string_tmp__1ED);
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  reduce_path__W1HC(string_tmp__AFD);
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  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';
+  result__XCIC=FALSE__;
+  Self__STS=((__STRING *)string_tmp__AFD);
+  if ((Self__STS->capacity__T3R > Self__STS->count__EGC)) {
+    ((__CHARACTER *)Self__STS->storage__23R)[Self__STS->count__EGC]='\0';
   } else {
-    add_last__BMT(Self__5XS,'\0');
-    Self__5XS->count__4FC=(__INTEGER)(Self__5XS->count__4FC -  1);
+    add_last__UHT(Self__STS,'\0');
+    Self__STS->count__EGC=(__INTEGER)(Self__STS->count__EGC -  1);
   };
-  stream__XEIC=((__POINTER )(fopen((char*)(Self__5XS->storage__JCS),"w+b")));
-  if ((stream__XEIC != (void *)NULL)) {
-    result__ZEIC=(((__INTEGER )(fclose((FILE*)(stream__XEIC)))) ==  0);
+  stream__VCIC=((__POINTER )(fopen((char*)(Self__STS->storage__23R),"w+b")));
+  if ((stream__VCIC != (void *)NULL)) {
+    result__XCIC=(((__INTEGER )(fclose((FILE*)(stream__VCIC)))) ==  0);
   };
-  if (result__ZEIC) {
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+  if (result__XCIC) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    __tmp__I0AC=get_entry__10AC(string_tmp__1ED);
-    if (__tmp__I0AC==NULL) {
-      __tmp__J0AC=NULL;
+    __tmp__HXAC=get_entry__0XAC(string_tmp__AFD);
+    if (__tmp__HXAC==NULL) {
+      __tmp__IXAC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__I0AC)->__id) {
+      switch (((struct ___OBJ *)__tmp__HXAC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__J0AC=NULL;
+        __tmp__IXAC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__J0AC=((void *)__tmp__I0AC);
+        __tmp__IXAC=((void *)__tmp__HXAC);
       } break;
       }
     };
-    result__ZZAC=__tmp__J0AC;
+    result__YWAC=__tmp__IXAC;
   };
-  if (((void *)result__ZZAC == (void *)NULL)) {
-    put_string__21F((&__string_223));
-    put_string__21F(string_tmp__VH);
-    put_string__21F((&__string_224));
+  if (((void *)result__YWAC == (void *)NULL)) {
+    put_string__CZF((&__string_225));
+    put_string__CZF(string_tmp__VH);
+    put_string__CZF((&__string_226));
     exit(( 1));
   };
-  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));
+  Self__JQ3G=((__FILE_UNIX *)result__YWAC);
+  Self__JQ3G->stream__0HRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__JQ3G->parent_entry_unix__05E.parent_entry__FFD.path__BD)->storage__QMO),"r+b")));
+  if ((! (Self__JQ3G->stream__0HRD != (void *)NULL))) {
+    put_string__CZF((&__string_225));
+    put_string__CZF(string_tmp__VH);
+    put_string__CZF((&__string_227));
     exit(( 1));
   };
-  if (result__ZZAC==NULL) {
-    __tmp__1FC=NULL;
+  if (result__YWAC==NULL) {
+    __tmp__BGC=NULL;
   } else {
-    __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;
+    __tmp__BGC=((void *)result__YWAC);
+  };
+  file__CEC=__tmp__BGC;
+  __tmp__GGC=((__STRING *)buf__AEC)->count__EGC;
+  Self__HBUE=((__FILE_UNIX *)__tmp__BGC);
+  ptr__UCPF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__AEC)->storage__23R));
+  ptr__UCPF=(void *)((unsigned long)ptr__UCPF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__UCPF))),(size_t)(1), (size_t)((__tmp__GGC)),(FILE*)((Self__HBUE->stream__0HRD)));
+  Self__QCUE=((__FILE_UNIX *)__tmp__BGC);
+  fclose((FILE*)((Self__QCUE->stream__0HRD)));
+  Self__QCUE->stream__0HRD=NULL;
 }
 
-static void resize__AYZ(__STRING *Self__BYZ,__INTEGER new_count__CYZ)
+static void resize__LTZ(__STRING *Self__MTZ,__INTEGER new_count__NTZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER old_nb_elts__12DH,upper__5JHH,Self__3JHH,lower__CO3C;
+  __INTEGER upper__DO3C,Self__WTDD;
+  __CHARACTER *Self__02DH,*new__32DH,*Self__BO3C;
+  if ((! (new_count__NTZ <= Self__MTZ->count__EGC))) {
+    if ((Self__MTZ->capacity__T3R < new_count__NTZ)) {
+      if ((Self__MTZ->capacity__T3R ==  0)) {
+        Self__MTZ->storage__23R=create__UHEB(new_count__NTZ);
+      } else {
+        Self__02DH=((__CHARACTER *)Self__MTZ->storage__23R);
+        old_nb_elts__12DH=Self__MTZ->capacity__T3R;
+        new__32DH=((__CHARACTER *)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )Self__02DH),((__UINTEGER_32 )old_nb_elts__12DH),((__UINTEGER_32 )new_count__NTZ)));
+        upper__5JHH=(__INTEGER)(new_count__NTZ -  1);
+        Self__3JHH=old_nb_elts__12DH;
+        while ((Self__3JHH <= upper__5JHH)) {
+          new__32DH[Self__3JHH]='\0';
+          Self__3JHH=(__INTEGER)(Self__3JHH +  1);
+        };
+        Self__MTZ->storage__23R=new__32DH;
+      };
+      Self__MTZ->capacity__T3R=new_count__NTZ;
+    } else {
+      Self__BO3C=((__CHARACTER *)Self__MTZ->storage__23R);
+      lower__CO3C=Self__MTZ->count__EGC;
+      upper__DO3C=(__INTEGER)(new_count__NTZ -  1);
+      Self__WTDD=lower__CO3C;
+      while ((Self__WTDD <= upper__DO3C)) {
+        Self__BO3C[Self__WTDD]='\0';
+        Self__WTDD=(__INTEGER)(Self__WTDD +  1);
+      };
+    };
+  };
+  Self__MTZ->count__EGC=new_count__NTZ;
 }
 
-static void move__to__by__JWCC(__CHARACTER *Self__KWCC,__INTEGER lower__LWCC,__INTEGER upper__MWCC,__INTEGER offset__NWCC)
+static void move__to__by__YTCC(__CHARACTER *Self__ZTCC,__INTEGER lower__0TCC,__INTEGER upper__1TCC,__INTEGER offset__2TCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER Self__VJHD,Self__EKHD;
+  if ((offset__2TCC !=  0)) {
+    if ((offset__2TCC <  0)) {
+      Self__VJHD=lower__0TCC;
+      while ((Self__VJHD <= upper__1TCC)) {
+        Self__ZTCC[(__INTEGER)(Self__VJHD + offset__2TCC)]=Self__ZTCC[Self__VJHD];
+        Self__VJHD=(__INTEGER)(Self__VJHD +  1);
       };
     } else {
-      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);
+      Self__EKHD=upper__1TCC;
+      while ((Self__EKHD >= lower__0TCC)) {
+        Self__ZTCC[(__INTEGER)(Self__EKHD + offset__2TCC)]=Self__ZTCC[Self__EKHD];
+        Self__EKHD=(__INTEGER)(Self__EKHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__GAEB(__STRING_CONSTANT *Self__HAEB,void *other__IAEB)
+static __BOOLEAN __infix_equal_equal__R1DB(__STRING_CONSTANT *Self__S1DB,void *other__T1DB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__21DB,__tmp__31DB,i__OSIH;
+  __BOOLEAN result__V1DB;
+  __CHARACTER *__tmp__O2DB,*__tmp__P2DB,*Self__PSIH,*other__QSIH;
+  result__V1DB=FALSE__;
+  __tmp__21DB=Self__S1DB->count__DD;
+  if (((struct ___OBJ *)other__T1DB)->__id==__STRING_CONSTANT__) {
+    __tmp__31DB=((__STRING_CONSTANT *)other__T1DB)->count__DD;
   } else {
-    __tmp__SAEB=((__STRING *)other__IAEB)->count__4FC;
+    __tmp__31DB=((__STRING *)other__T1DB)->count__EGC;
   };
-  if ((__tmp__RAEB == __tmp__SAEB)) {
-    if ((Self__HAEB->count__DD ==  0)) {
-      result__KAEB=TRUE__;
+  if ((__tmp__21DB == __tmp__31DB)) {
+    if ((Self__S1DB->count__DD ==  0)) {
+      result__V1DB=TRUE__;
     } else {
-      __tmp__DBEB=Self__HAEB->storage__3QO;
-      if (((struct ___OBJ *)other__IAEB)->__id==__STRING_CONSTANT__) {
-        __tmp__EBEB=((__STRING_CONSTANT *)other__IAEB)->storage__3QO;
+      __tmp__O2DB=Self__S1DB->storage__QMO;
+      if (((struct ___OBJ *)other__T1DB)->__id==__STRING_CONSTANT__) {
+        __tmp__P2DB=((__STRING_CONSTANT *)other__T1DB)->storage__QMO;
       } else {
-        __tmp__EBEB=((__STRING *)other__IAEB)->storage__JCS;
+        __tmp__P2DB=((__STRING *)other__T1DB)->storage__23R;
       };
-      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);
+      Self__PSIH=((__CHARACTER *)__tmp__O2DB);
+      other__QSIH=__tmp__P2DB;
+      i__OSIH=(__INTEGER)(Self__S1DB->count__DD -  1);
+      while (((i__OSIH >=  0) && (Self__PSIH[i__OSIH] == ((__CHARACTER *)other__QSIH)[i__OSIH]))) {
+        i__OSIH=(__INTEGER)(i__OSIH -  1);
       };
-      result__KAEB=(i__5HIH <  0);
+      result__V1DB=(i__OSIH <  0);
     };
   };
-  return(result__KAEB);
+  return(result__V1DB);
 }
 
-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.
+static void* at__DH4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__EH4,void *k__FH4)
+// ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__KSHH,__tmp__MSHH,Self__NSHH;
+  void *node__PH4;
+  result__KSHH= 0;
+  __tmp__MSHH=((__STRING_CONSTANT *)k__FH4)->count__DD;
+  Self__NSHH= 1;
+  while ((Self__NSHH <= __tmp__MSHH)) {
+    result__KSHH=(__INTEGER)((__INTEGER)( 5 * result__KSHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__FH4)->storage__QMO)[(__INTEGER)(Self__NSHH -  1)])));
+    Self__NSHH=(__INTEGER)(Self__NSHH +  1);
+  };
+  if ((result__KSHH <  0)) {
+    result__KSHH=(__INTEGER)(~ result__KSHH);
+  };
+  node__PH4=((void **)Self__EH4->buckets__04S)[(__INTEGER)(result__KSHH % Self__EH4->capacity__V4S)];
+  while ((! __infix_equal_equal__R1DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PH4)->key__G5S,k__FH4))) {
+    node__PH4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PH4)->next__R5S;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__PH4)->item__0T3);
 }
 
-static void go_on__KBC(void *obj__MBC)
+static void go_on__SBC(void *obj__UBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __POINTER ptr__SCG,ptr_table__TSIH,next__SSIH,result__USIH;
+  __POINTER ptr_table__YSIH,next__XSIH,result__ZSIH,ptr__3SIH;
+  __POINTER ptr_table__FTIH,next__ETIH,result__GTIH,ptr_table__KTIH;
+  __POINTER next__JTIH,result__LTIH,ptr__EGID,ptr_table__PTIH;
+  __POINTER next__OTIH,result__QTIH,ptr_table__UTIH,next__TTIH;
+  __POINTER result__VTIH,ptr__2TIH,ptr_table__IUIH,next__HUIH;
+  __POINTER result__JUIH,ptr_table__NUIH,next__MUIH,result__OUIH;
+  __POINTER ptr__DVIH,ptr_table__PVIH,next__OVIH,result__QVIH;
+  __POINTER ptr_table__UVIH,next__TVIH,result__VVIH,ptr__ZVIH;
+  __POINTER ptr_table__FWIH,next__EWIH,result__GWIH,ptr_table__KWIH;
+  __POINTER next__JWIH,result__LWIH,ptr__PWIH,ptr_table__YWIH;
+  __POINTER next__XWIH,result__ZWIH,ptr_table__3WIH,next__2WIH;
+  __POINTER result__4WIH,ptr__CXIH,ptr_table__LXIH,next__KXIH;
+  __POINTER result__MXIH,ptr_table__QXIH,next__PXIH,result__RXIH;
+  __INTEGER typ_id__XCG,new_capacity__GDY,pos_sec__2XC,old_derive__3XC;
+  __INTEGER typ_id__4SIH,h__NYFC,idx__OYFC,idx__0DID,new_capacity__1DID;
+  __INTEGER i__2DID,typ_id__JGID,old_pos__GTOB,old_derive__HTOB;
+  __INTEGER typ_id__3TIH,new_capacity__FKHC,other_upper__EKHC;
+  __INTEGER Self__B3WD,new_capacity__QSHC,__tmp__UTHC,__tmp__EITD;
+  __INTEGER Self__24XE,__tmp__JCHC,typ_id__EVIH,typ_id__0VIH;
+  __INTEGER typ_id__QWIH,typ_id__DXIH,start__QSHH,end__PSHH,len__RSHH;
+  __INTEGER __tmp__SSHH,__tmp__USHH,Self__VSHH,__tmp__3G3B,Self__1XPC;
+  __INTEGER start__YSHH,end__XSHH,len__ZSHH,__tmp__0SHH,__tmp__2SHH;
+  __INTEGER Self__3SHH;
+  __UINTEGER_32 sz__UCG,a__JOFH,new_size__KOFH,t__OOFH,a__NOFH;
+  __UINTEGER_32 new_size__1SIH,lab_type__0SIH,sz__5SIH,a__ATIH;
+  __UINTEGER_32 new_size__BTIH,t__CTIH,a__DTIH,new_size__NTIH;
+  __UINTEGER_32 lab_type__MTIH,sz__GGID,a__APFH,new_size__BPFH,t__FPFH;
+  __UINTEGER_32 a__EPFH,new_size__XTIH,lab_type__WTIH,sz__4TIH,a__5TIH;
+  __UINTEGER_32 new_size__AUIH,t__BUIH,a__CUIH,new_size__QUIH;
+  __UINTEGER_32 lab_type__PUIH,sz__FVIH,a__GVIH,new_size__HVIH,t__IVIH;
+  __UINTEGER_32 a__JVIH,new_size__XVIH,lab_type__WVIH,sz__1VIH,a__2VIH;
+  __UINTEGER_32 new_size__3VIH,t__4VIH,a__5VIH,new_size__NWIH;
+  __UINTEGER_32 lab_type__MWIH,sz__RWIH,a__SWIH,new_size__TWIH,t__UWIH;
+  __UINTEGER_32 a__VWIH,new_size__AXIH,lab_type__5WIH,sz__EXIH,a__FXIH;
+  __UINTEGER_32 new_size__GXIH,t__HXIH,a__IXIH,new_size__TXIH;
+  __UINTEGER_32 lab_type__SXIH;
+  __POSITION pos__TZVG,pos__VZVG,pos__XZVG,pos__C0VG,pos__E0VG;
+  __POSITION pos__H0VG,pos__J0VG,p__EUIH,__tmp__1CHC,__tmp__IDHC;
+  __POSITION pos__Y4VG,pos__04VG,pos__24VG,pos__44VG,pos__3ZID;
+  __POSITION pos__G5VG,__tmp__BEBD,__tmp__JEBD,__tmp__3EBD,__tmp__GFBD;
+  __POSITION pos__Q5VG,__tmp__12OB,__tmp__32OB,pos__LAWG,pos__NAWG;
+  void *n__SOOB,*__tmp__MXOB,*n__UDBD,*__tmp__SYOB,*__tmp__CZOB;
+  void *__tmp__Q2OB,*__tmp__VCZB;
+  __SECTION_ *Self__SU3G,*Self__TU3G,*result__2SIH,*Self__00VG;
+  __SECTION_ *Self__KY3G,*Self__LY3G;
+  void *__tmp__E2C,*s__ITOB,*result__P4YB,*__tmp__XWOB,*__tmp__GG3B;
+  void *s__TCZB,*__tmp__DDZB;
+  void *__tmp__G2C,*result__YOEC,*result__OSOB,*sec__VDBD;
+  void *t__CTOB;
+  void *arg__O4YB,*__tmp__ICHC,*__tmp__0CHC,*__tmp__HDHC;
+  __ITM_ARG *result__1TIH,*Self__DUIH,*result__CVIH,*Self__KVIH;
+  __ITM_SLOT_OPERATOR *Self__5BHC,*Self__P2FC,*Self__KEHC;
+  void *tm__R2FC,*__tmp__02FC;
+  void *expr__ZF3B;
+  void *__tmp__HG3B;
+  __ITM_SLOT *result__YVIH,*Self__AWIH;
+  __ITM_PROTOTYPE *result__OWIH;
+  __ITM_READ_ARG1 *result__BXIH;
+  __STRING *Self__TSHH,*Self__1SHH;
+  __PROTOTYPE *Self__SCZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__RCG,*Self__XDT,*Self__YG3B;
+  void *t__FYC,*k__NOEC,*k__GYFC,*lt__DTOB;
+  __BOOLEAN result__OWKH,result__QWKH,result__N4D,result__BCEB;
+  __BOOLEAN __tmp__OCEB,result__K54,result__POFH,result__JT5;
+  __BOOLEAN __tmp__GEEB,result__ARAB,__tmp__HEEB,__tmp__KEEB,__tmp__X2C;
+  __BOOLEAN __tmp__M2C,result__BTOB,result__YTIH,result__RUIH;
+  __BOOLEAN __tmp__55YB,result__UUIH,__tmp__4SHC,__tmp__NCHC;
+  __BOOLEAN result__ZUIH,__tmp__TUOB,result__2UIH,result__5UIH;
+  __BOOLEAN result__UXIH,__tmp__G1OB,__tmp__H1OB;
+  __CHARACTER result__BT3G,result__GT3G,result__LT3G,result__QT3G;
+  __CHARACTER result__VT3G,result__4T3G,result__DU3G,result__IU3G;
+  __CHARACTER result__NU3G,affect__FTOB,style__ETOB,result__ZTIH;
+  __CHARACTER result__SUIH,result__VUIH,result__0UIH,result__3UIH;
+  __CHARACTER result__AVIH,result__VXIH,result__VY3G,result__4Y3G;
+  __CHARACTER result__DZ3G,result__IZ3G,result__ZZ3G;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__MOEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__EYFC;
+  void *node__XOEC,*node__PYFC,*node1__4DID,*node2__5DID,*__tmp__3ZFC;
+  void **old_buckets__3DID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__DGID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__DDTD;
+  void *result__FR1B,*result__HR4B,*larg__WDBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__ICZC,*Self__4CZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__OSHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__CKHC,*Self__TPFH,*Self__2PFH;
+  void **__tmp__YKHC,**__tmp__0KHC,**Self__4FSD;
+  void **__tmp__TTHC,**new__QHTD;
+  void *__tmp__O2OB,*__tmp__UCZB;
+  void **__tmp__0G3B,**Self__KFHC;
+  object__ZBC=obj__UBC;
+  source__5BC=((__PROTOTYPE *)obj__UBC)->source__3BC;
+  position__CCC= 1;
+  pos_cur__FCC= 1;
+  pos_line__GCC= 1;
+  pos_col__HCC= 0;
+  if (is_shorter__LZ) {
+    is_active_short__OCC=TRUE__;
+    short_derive__PCC= 0;
+    copy__U4R(output_code__SI,source__5BC);
+    result__RCG=NULL;
+    ptr__SCG=((__POINTER )(NULL));
+    typ_id__XCG= 0;
+    sz__UCG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__UCG ==  0)) {
+      result__RCG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__XCG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UCG);
+      if ((typ_id__XCG == (__INTEGER)(-  1))) {
+        a__JOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KOFH=(__UINTEGER_32)((__UINTEGER_32)(sz__UCG + a__JOFH) & (__UINTEGER_32)(~ a__JOFH));
+        ptr_table__TSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KOFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__SSIH=((__POINTER )(NULL));
+        result__USIH=((__POINTER *)ptr_table__TSIH)[ 0];
+        if ((result__USIH == (void *)NULL)) {
+          result__USIH=new_lab__QOJ(new_size__KOFH);
+          next__SSIH=(void *)((unsigned long)result__USIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOFH)));
+          ((__POINTER *)next__SSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TSIH)[ 0]=next__SSIH;
+        } else {
+          next__SSIH=((__POINTER *)result__USIH)[ 0];
+          if ((next__SSIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__USIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__KOFH <<  1)) <=  4096)) {
+              next__SSIH=(void *)((unsigned long)result__USIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KOFH)));
             } else {
-              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)));
+              next__SSIH=new_lab__QOJ(new_size__KOFH);
+            };
+            ((__POINTER *)next__SSIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TSIH)[ 0]=next__SSIH;
+          } else {
+            ((__POINTER *)result__USIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__USIH=next__SSIH;
+          };
+        };
+        ptr__SCG=result__USIH;
+      } else {
+        t__OOFH=((__UINTEGER_32 )typ_id__XCG);
+        a__NOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1SIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UCG + a__NOFH) & (__UINTEGER_32)(~ a__NOFH));
+        ptr_table__YSIH=((__POINTER )(&(table_type[(t__OOFH)])));
+        lab_type__0SIH=(__UINTEGER_32)(t__OOFH |  1);
+        next__XSIH=((__POINTER )(NULL));
+        result__ZSIH=((__POINTER *)ptr_table__YSIH)[ 0];
+        if ((result__ZSIH == (void *)NULL)) {
+          result__ZSIH=new_lab__QOJ(lab_type__0SIH);
+          next__XSIH=(void *)((unsigned long)result__ZSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SIH)));
+          ((__POINTER *)next__XSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YSIH)[ 0]=next__XSIH;
+        } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1SIH <<  1)) <=  4096)) {
+              next__XSIH=(void *)((unsigned long)result__ZSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1SIH)));
             } else {
-              next__IIIH=new_lab__URJ(lab_type__LIIH);
+              next__XSIH=new_lab__QOJ(lab_type__0SIH);
             };
-            ((__POINTER *)next__IIIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JIIH)[ 0]=next__IIIH;
+            ((__POINTER *)next__XSIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YSIH)[ 0]=next__XSIH;
           } else {
-            ((__POINTER *)result__KIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KIIH=next__IIIH;
+            ((__POINTER *)result__ZSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZSIH=next__XSIH;
           };
         };
-        ptr__MFG=result__KIIH;
+        ptr__SCG=result__ZSIH;
       };
-      result__LFG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__MFG);
-      *(result__LFG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__RCG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__SCG);
+      *(result__RCG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    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);
+    Self__XDT=((__HASHED_SEToSTRING_CONSTANTo *)result__RCG);
+    new_capacity__GDY=prime_number_ceiling__K01( 53);
+    Self__XDT->buckets__CAV=create__GY3(new_capacity__GDY);
+    Self__XDT->capacity__FET=new_capacity__GDY;
+    Self__XDT->count__LDY= 0;
+    short_local__XCC=result__RCG;
+    short__token__to__YBD((&__string_117), 1, 1);
   };
-  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);
+  t__FYC=NULL;
+  read_space__KSD();
+  pos_sec__2XC=position__CCC;
+  old_derive__3XC=short_derive__PCC;
+  last_comment_extern__JYC=NULL;
+  result__OWKH=read_word__4MF((&__string_4));
+  if (is_shorter__LZ) {
+    if (result__OWKH) {
+      short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
     };
   };
-  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)) {
+  if ((! result__OWKH)) {
+    pos__TZVG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_228));
+    put_position__CMG(pos__TZVG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  key_comment_default__ICC=(&__string_127);
-  if (is_shorter2__VI) {
-    is_catch_comment__IXC=FALSE__;
-  };
-  result__LMKH=read_word__YPF((&__string_22));
-  if (is_shorter__FZ) {
-    if (result__LMKH) {
+  result__QWKH=read_word__4MF((&__string_22));
+  if (is_shorter__LZ) {
+    if (result__QWKH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
-        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
-        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if ((! result__QWKH)) {
+    pos__VZVG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_229));
+    put_position__CMG(pos__VZVG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((! read_slot_header__AAE(TRUE__))) {
+    pos__XZVG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_230));
+    put_position__CMG(pos__XZVG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__0DE(FALSE__)) {
+  while (read_slot_header__AAE(FALSE__)) {
   };
-  while_do__F5E:
+  if (is_shorter2__VI) {
+    ((__PROTOTYPE *)object__ZBC)->comment_header__U2QC=last_comment_extern__JYC;
+  };
+  while_do__11E:
   {
-    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);
+    result__N4D=read_word__4MF((&__string_4));
+    if (is_shorter__LZ) {
+      if (result__N4D) {
+        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       };
     };
-    if (result__BCE) {
-      result__WGEB=FALSE__;
-      if ((! read_space__FSD())) {
-        __tmp__DHEB=TRUE__;
+    if (result__N4D) {
+      last_comment_extern__JYC=NULL;
+      result__BCEB=FALSE__;
+      if ((! read_space__KSD())) {
+        __tmp__OCEB=TRUE__;
       } else {
-        result__KG3G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__KG3G=((__CHARACTER )(( 0)));
+        result__BT3G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__BT3G=((__CHARACTER )(( 0)));
         } else {
-          result__KG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__BT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__5D5=FALSE__;
-        if ((((__INTEGER_8 )result__KG3G) >= ((__INTEGER_8 )'A'))) {
-          result__5D5=(((__INTEGER_8 )result__KG3G) <= ((__INTEGER_8 )'Z'));
+        result__K54=FALSE__;
+        if ((((__INTEGER_8 )result__BT3G) >= ((__INTEGER_8 )'A'))) {
+          result__K54=(((__INTEGER_8 )result__BT3G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__DHEB=(! result__5D5);
+        __tmp__OCEB=(! result__K54);
       };
-      if (__tmp__DHEB) {
-        result__WGEB=FALSE__;
+      if (__tmp__OCEB) {
+        result__BCEB=FALSE__;
       } else {
-        ((__STRING *)string_tmp__VH)->count__4FC= 0;
-        result__PG3G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__PG3G=((__CHARACTER )(( 0)));
+        ((__STRING *)string_tmp__VH)->count__EGC= 0;
+        result__GT3G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__GT3G=((__CHARACTER )(( 0)));
         } else {
-          result__PG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__GT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        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)));
+        add_last__UHT(string_tmp__VH,result__GT3G);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__LT3G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__LT3G=((__CHARACTER )(( 0)));
         } else {
-          result__UG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__LT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__XCFH=FALSE__;
-        if ((((__INTEGER_8 )result__UG3G) >= ((__INTEGER_8 )'a'))) {
-          result__XCFH=(((__INTEGER_8 )result__UG3G) <= ((__INTEGER_8 )'z'));
+        result__POFH=FALSE__;
+        if ((((__INTEGER_8 )result__LT3G) >= ((__INTEGER_8 )'a'))) {
+          result__POFH=(((__INTEGER_8 )result__LT3G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__XCFH) {
-          result__ZG3G='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__ZG3G=((__CHARACTER )(( 0)));
+        if (result__POFH) {
+          result__QT3G='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__QT3G=((__CHARACTER )(( 0)));
           } else {
-            result__ZG3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__QT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__ZG3G);
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          while_do__AIGF:
+          add_last__UHT(string_tmp__VH,result__QT3G);
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          while_do__JSGF:
           {
-            result__4G3G='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__4G3G=((__CHARACTER )(( 0)));
+            result__VT3G='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__VT3G=((__CHARACTER )(( 0)));
             } else {
-              result__4G3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__VT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__4G3G != ((__CHARACTER )(( 0))))) {
-              result__HH3G='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__HH3G=((__CHARACTER )(( 0)));
+            if ((result__VT3G != ((__CHARACTER )(( 0))))) {
+              result__4T3G='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__4T3G=((__CHARACTER )(( 0)));
               } else {
-                result__HH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__4T3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              result__4X5=FALSE__;
-              if ((((__INTEGER_8 )result__HH3G) >= ((__INTEGER_8 )'a'))) {
-                result__4X5=(((__INTEGER_8 )result__HH3G) <= ((__INTEGER_8 )'z'));
+              result__JT5=FALSE__;
+              if ((((__INTEGER_8 )result__4T3G) >= ((__INTEGER_8 )'a'))) {
+                result__JT5=(((__INTEGER_8 )result__4T3G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__4X5) {
-                __tmp__1IEB=TRUE__;
+              if (result__JT5) {
+                __tmp__GEEB=TRUE__;
               } else {
-                result__MH3G='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__MH3G=((__CHARACTER )(( 0)));
+                result__DU3G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__DU3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__MH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__DU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                result__VVAB=FALSE__;
-                if ((((__INTEGER_8 )result__MH3G) >= ((__INTEGER_8 )'0'))) {
-                  result__VVAB=(((__INTEGER_8 )result__MH3G) <= ((__INTEGER_8 )'9'));
+                result__ARAB=FALSE__;
+                if ((((__INTEGER_8 )result__DU3G) >= ((__INTEGER_8 )'0'))) {
+                  result__ARAB=(((__INTEGER_8 )result__DU3G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__1IEB=result__VVAB;
+                __tmp__GEEB=result__ARAB;
               };
-              if (__tmp__1IEB) {
-                __tmp__2IEB=TRUE__;
+              if (__tmp__GEEB) {
+                __tmp__HEEB=TRUE__;
               } else {
-                result__RH3G='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__RH3G=((__CHARACTER )(( 0)));
+                result__IU3G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__IU3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__RH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__IU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                __tmp__2IEB=(result__RH3G == '_');
+                __tmp__HEEB=(result__IU3G == '_');
               };
-              __tmp__5IEB=__tmp__2IEB;
+              __tmp__KEEB=__tmp__HEEB;
             } else {
-              __tmp__5IEB=FALSE__;
+              __tmp__KEEB=FALSE__;
             };
-            if (__tmp__5IEB) {
-              result__WH3G='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__WH3G=((__CHARACTER )(( 0)));
+            if (__tmp__KEEB) {
+              result__NU3G='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__NU3G=((__CHARACTER )(( 0)));
               } else {
-                result__WH3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__NU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__BMT(string_tmp__VH,result__WH3G);
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              goto while_do__AIGF;
+              add_last__UHT(string_tmp__VH,result__NU3G);
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              goto while_do__JSGF;
             };
           };
-          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);
+          last_string__V0C=get__YWB(string_tmp__VH);
+          result__BCEB=TRUE__;
+          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
-          position__0BC=(__INTEGER)(position__0BC -  1);
-          result__WGEB=FALSE__;
+          position__CCC=(__INTEGER)(position__CCC -  1);
+          result__BCEB=FALSE__;
         };
       };
-      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)) {
+      if (result__BCEB) {
+        n__SOOB=last_string__V0C;
+        if ((! (((((((((void *)n__SOOB == (void *)(&__string_23)) || ((void *)n__SOOB == (void *)(&__string_24))) || ((void *)n__SOOB == (void *)(&__string_25))) || ((void *)n__SOOB == (void *)(&__string_26))) || ((void *)n__SOOB == (void *)(&__string_27))) || ((void *)n__SOOB == (void *)(&__string_28))) || ((void *)n__SOOB == (void *)(&__string_29))) || ((void *)n__SOOB == (void *)(&__string_30))))) {
+          pos__C0VG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_231));
+          put_position__CMG(pos__C0VG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__50C=get_name__CVOB(last_string__Q0C);
-        if (((void *)((__SECTION_ *)last_section__50C)->name__KZDC == (void *)(&__string_28))) {
-          __tmp__S2C=TRUE__;
+        last_section__E1C=get_name__OQOB(last_string__V0C);
+        if (((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC == (void *)(&__string_28))) {
+          __tmp__X2C=TRUE__;
         } else {
-          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;
+          Self__SU3G=((__SECTION_ *)last_section__E1C);
+          if (((((void *)Self__SU3G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__SU3G->name__ZWDC == (void *)(&__string_24))) && ((void *)((__PROTOTYPE *)object__ZBC)->last_slot__11C != (void *)NULL))) {
+            __tmp__E2C=((__PROTOTYPE *)object__ZBC)->last_slot__11C;
+            if (((struct ___OBJ *)__tmp__E2C)->__id==__ITM_SLOT__) {
+              __tmp__G2C=((__ITM_SLOT *)__tmp__E2C)->id_section__F2C;
             } else {
-              __tmp__B2C=((__ITM_SLOT_OPERATOR *)__tmp__51C)->parent_itm_slot__WU5B.id_section__A2C;
+              __tmp__G2C=((__ITM_SLOT_OPERATOR *)__tmp__E2C)->parent_itm_slot__VR5B.id_section__F2C;
             };
-            Self__2H3G=((__SECTION_ *)__tmp__B2C);
-            __tmp__H2C=(! (((void *)Self__2H3G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__2H3G->name__KZDC == (void *)(&__string_24))));
+            Self__TU3G=((__SECTION_ *)__tmp__G2C);
+            __tmp__M2C=(! (((void *)Self__TU3G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__TU3G->name__ZWDC == (void *)(&__string_24))));
           } else {
-            __tmp__H2C=FALSE__;
+            __tmp__M2C=FALSE__;
           };
-          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)) {
+          if (__tmp__M2C) {
+            pos__E0VG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_232));
+            put_position__CMG(pos__E0VG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          __tmp__S2C=__tmp__H2C;
+          __tmp__X2C=__tmp__M2C;
         };
-        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)) {
+        if ((! __tmp__X2C)) {
+          if ((((((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC == (void *)(&__string_23)) && ((void *)((__PROTOTYPE *)object__ZBC)->type_style__E3C == (void *)(&__string_9))) && ((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_42))) && ((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_43)))) {
+            pos__H0VG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_233));
+            put_position__CMG(pos__H0VG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        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)) {
+        t__FYC=read_type_list__DIO(PARSER__,TRUE__);
+        if (((void *)t__FYC == (void *)NULL)) {
+          pos__J0VG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_231));
+          put_position__CMG(pos__J0VG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        Self__MOEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__SSOB);
+        k__NOEC=t__FYC;
+        result__YOEC=NULL;
+        node__XOEC=((void **)Self__MOEC->buckets__5OEC)[(__INTEGER)(hash_code__C10(t__FYC) % Self__MOEC->capacity__0OEC)];
+        while ((! (((void *)node__XOEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__XOEC)->key__LPEC == (void *)k__NOEC)))) {
+          node__XOEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__XOEC)->next__WPEC;
+        };
+        if (((void *)node__XOEC != (void *)NULL)) {
+          result__YOEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__XOEC)->item__4PEC;
+        };
+        result__OSOB=result__YOEC;
+        if (((void *)result__YOEC == (void *)NULL)) {
+          result__2SIH=NULL;
+          ptr__3SIH=((__POINTER )(NULL));
+          typ_id__4SIH= 0;
+          sz__5SIH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__5SIH ==  0)) {
+            result__2SIH=SECTION___;
+          } else {
+            typ_id__4SIH=__SECTION___;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5SIH);
+            if ((typ_id__4SIH == (__INTEGER)(-  1))) {
+              a__ATIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5SIH + a__ATIH) & (__UINTEGER_32)(~ a__ATIH));
+              ptr_table__FTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BTIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__ETIH=((__POINTER )(NULL));
+              result__GTIH=((__POINTER *)ptr_table__FTIH)[ 0];
+              if ((result__GTIH == (void *)NULL)) {
+                result__GTIH=new_lab__QOJ(new_size__BTIH);
+                next__ETIH=(void *)((unsigned long)result__GTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTIH)));
+                ((__POINTER *)next__ETIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FTIH)[ 0]=next__ETIH;
               } else {
-                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)));
+                next__ETIH=((__POINTER *)result__GTIH)[ 0];
+                if ((next__ETIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GTIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BTIH <<  1)) <=  4096)) {
+                    next__ETIH=(void *)((unsigned long)result__GTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTIH)));
                   } else {
-                    next__VIIH=new_lab__URJ(new_size__SIIH);
+                    next__ETIH=new_lab__QOJ(new_size__BTIH);
                   };
-                  ((__POINTER *)next__VIIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__WIIH)[ 0]=next__VIIH;
+                  ((__POINTER *)next__ETIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FTIH)[ 0]=next__ETIH;
                 } else {
-                  ((__POINTER *)result__XIIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VIIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__XIIH=next__VIIH;
+                  ((__POINTER *)result__GTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ETIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__GTIH=next__ETIH;
                 };
               };
-              ptr__OIIH=result__XIIH;
+              ptr__3SIH=result__GTIH;
             } else {
-              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;
+              t__CTIH=((__UINTEGER_32 )typ_id__4SIH);
+              a__DTIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__NTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5SIH + a__DTIH) & (__UINTEGER_32)(~ a__DTIH));
+              ptr_table__KTIH=((__POINTER )(&(table_type[(t__CTIH)])));
+              lab_type__MTIH=(__UINTEGER_32)(t__CTIH |  1);
+              next__JTIH=((__POINTER )(NULL));
+              result__LTIH=((__POINTER *)ptr_table__KTIH)[ 0];
+              if ((result__LTIH == (void *)NULL)) {
+                result__LTIH=new_lab__QOJ(lab_type__MTIH);
+                next__JTIH=(void *)((unsigned long)result__LTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTIH)));
+                ((__POINTER *)next__JTIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KTIH)[ 0]=next__JTIH;
               } else {
-                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)));
+                next__JTIH=((__POINTER *)result__LTIH)[ 0];
+                if ((next__JTIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LTIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NTIH <<  1)) <=  4096)) {
+                    next__JTIH=(void *)((unsigned long)result__LTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NTIH)));
                   } else {
-                    next__0IIH=new_lab__URJ(lab_type__3IIH);
+                    next__JTIH=new_lab__QOJ(lab_type__MTIH);
                   };
-                  ((__POINTER *)next__0IIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__1IIH)[ 0]=next__0IIH;
+                  ((__POINTER *)next__JTIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KTIH)[ 0]=next__JTIH;
                 } else {
-                  ((__POINTER *)result__2IIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__2IIH=next__0IIH;
+                  ((__POINTER *)result__LTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LTIH=next__JTIH;
                 };
               };
-              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;
+              ptr__3SIH=result__LTIH;
+            };
+            result__2SIH=((__SECTION_ *)ptr__3SIH);
+            *(result__2SIH) = *(SECTION___);
+          };
+          result__OSOB=result__2SIH;
+          Self__00VG=((__SECTION_ *)result__2SIH);
+          Self__00VG->name__ZWDC=NULL;
+          Self__00VG->type_list__IVFC=t__FYC;
+          Self__EYFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__SSOB);
+          k__GYFC=t__FYC;
+          h__NYFC=hash_code__C10(t__FYC);
+          idx__OYFC=(__INTEGER)(h__NYFC % Self__EYFC->capacity__0OEC);
+          node__PYFC=((void **)Self__EYFC->buckets__5OEC)[idx__OYFC];
+          while ((! (((void *)node__PYFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__PYFC)->key__LPEC == (void *)k__GYFC)))) {
+            node__PYFC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__PYFC)->next__WPEC;
+          };
+          if (((void *)node__PYFC == (void *)NULL)) {
+            if ((Self__EYFC->capacity__0OEC == Self__EYFC->count__QZFC)) {
+              idx__0DID= 0;
+              node1__4DID=NULL;
+              node2__5DID=NULL;
+              old_buckets__3DID=Self__EYFC->buckets__5OEC;
+              new_capacity__1DID=prime_number_ceiling__K01((__INTEGER)(Self__EYFC->capacity__0OEC +  1));
+              Self__EYFC->buckets__5OEC=create__GAYC(new_capacity__1DID);
+              i__2DID=(__INTEGER)(Self__EYFC->capacity__0OEC -  1);
+              Self__EYFC->capacity__0OEC=new_capacity__1DID;
+              while ((i__2DID >=  0)) {
+                node1__4DID=((void **)old_buckets__3DID)[i__2DID];
+                while (((void *)node1__4DID != (void *)NULL)) {
+                  node2__5DID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__4DID)->next__WPEC;
+                  idx__0DID=(__INTEGER)(hash_code__C10(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__4DID)->key__LPEC) % Self__EYFC->capacity__0OEC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__4DID)->next__WPEC=((void **)Self__EYFC->buckets__5OEC)[idx__0DID];
+                  ((void **)Self__EYFC->buckets__5OEC)[idx__0DID]=node1__4DID;
+                  node1__4DID=node2__5DID;
                 };
-                i__YDID=(__INTEGER)(i__YDID -  1);
+                i__2DID=(__INTEGER)(i__2DID -  1);
               };
-              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__;
+              idx__OYFC=(__INTEGER)(h__NYFC % Self__EYFC->capacity__0OEC);
+            };
+            __tmp__3ZFC=((void **)Self__EYFC->buckets__5OEC)[idx__OYFC];
+            result__DGID=NULL;
+            ptr__EGID=((__POINTER )(NULL));
+            typ_id__JGID= 0;
+            sz__GGID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__GGID ==  0)) {
+              result__DGID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
             } else {
-              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;
+              typ_id__JGID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GGID);
+              if ((typ_id__JGID == (__INTEGER)(-  1))) {
+                a__APFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__BPFH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGID + a__APFH) & (__UINTEGER_32)(~ a__APFH));
+                ptr_table__PTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BPFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__OTIH=((__POINTER )(NULL));
+                result__QTIH=((__POINTER *)ptr_table__PTIH)[ 0];
+                if ((result__QTIH == (void *)NULL)) {
+                  result__QTIH=new_lab__QOJ(new_size__BPFH);
+                  next__OTIH=(void *)((unsigned long)result__QTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPFH)));
+                  ((__POINTER *)next__OTIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PTIH)[ 0]=next__OTIH;
                 } else {
-                  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)));
+                  next__OTIH=((__POINTER *)result__QTIH)[ 0];
+                  if ((next__OTIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QTIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BPFH <<  1)) <=  4096)) {
+                      next__OTIH=(void *)((unsigned long)result__QTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BPFH)));
                     } else {
-                      next__5IIH=new_lab__URJ(new_size__JDFH);
+                      next__OTIH=new_lab__QOJ(new_size__BPFH);
                     };
-                    ((__POINTER *)next__5IIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__AJIH)[ 0]=next__5IIH;
+                    ((__POINTER *)next__OTIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PTIH)[ 0]=next__OTIH;
                   } else {
-                    ((__POINTER *)result__BJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5IIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BJIH=next__5IIH;
+                    ((__POINTER *)result__QTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QTIH=next__OTIH;
                   };
                 };
-                ptr__AGID=result__BJIH;
+                ptr__EGID=result__QTIH;
               } else {
-                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;
+                t__FPFH=((__UINTEGER_32 )typ_id__JGID);
+                a__EPFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__XTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__GGID + a__EPFH) & (__UINTEGER_32)(~ a__EPFH));
+                ptr_table__UTIH=((__POINTER )(&(table_type[(t__FPFH)])));
+                lab_type__WTIH=(__UINTEGER_32)(t__FPFH |  1);
+                next__TTIH=((__POINTER )(NULL));
+                result__VTIH=((__POINTER *)ptr_table__UTIH)[ 0];
+                if ((result__VTIH == (void *)NULL)) {
+                  result__VTIH=new_lab__QOJ(lab_type__WTIH);
+                  next__TTIH=(void *)((unsigned long)result__VTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTIH)));
+                  ((__POINTER *)next__TTIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__UTIH)[ 0]=next__TTIH;
                 } 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__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)));
+                  next__TTIH=((__POINTER *)result__VTIH)[ 0];
+                  if ((next__TTIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VTIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XTIH <<  1)) <=  4096)) {
+                      next__TTIH=(void *)((unsigned long)result__VTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XTIH)));
                     } else {
-                      next__EJIH=new_lab__URJ(lab_type__HJIH);
+                      next__TTIH=new_lab__QOJ(lab_type__WTIH);
                     };
-                    ((__POINTER *)next__EJIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__FJIH)[ 0]=next__EJIH;
+                    ((__POINTER *)next__TTIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__UTIH)[ 0]=next__TTIH;
                   } else {
-                    ((__POINTER *)result__GJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__GJIH=next__EJIH;
+                    ((__POINTER *)result__VTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__VTIH=next__TTIH;
                   };
                 };
-                ptr__AGID=result__GJIH;
+                ptr__EGID=result__VTIH;
               };
-              result__5FID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__AGID);
-              *(result__5FID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__DGID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__EGID);
+              *(result__DGID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            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);
+            Self__DDTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__DGID);
+            Self__DDTD->item__4PEC=result__2SIH;
+            Self__DDTD->key__LPEC=t__FYC;
+            Self__DDTD->next__WPEC=__tmp__3ZFC;
+            node__PYFC=result__DGID;
+            ((void **)Self__EYFC->buckets__5OEC)[idx__OYFC]=result__DGID;
+            Self__EYFC->count__QZFC=(__INTEGER)(Self__EYFC->count__QZFC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__A1FC)->item__PSEC=result__NIIH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__PYFC)->item__4PEC=result__2SIH;
           };
         };
-        last_section__50C=result__CXOB;
+        last_section__E1C=result__OSOB;
       };
       do {
-        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__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__;
+        result__BTOB=FALSE__;
+        t__CTOB=NULL;
+        lt__DTOB=NULL;
+        affect__FTOB='\0';
+        old_pos__GTOB= 0;
+        old_derive__HTOB= 0;
+        s__ITOB=NULL;
+        style__ETOB=read_style__FPF();
+        if ((style__ETOB != ' ')) {
+          result__BTOB=TRUE__;
+          result__P4YB=NULL;
+          result__FR1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__LR1B)->parent_arrayed_collection__KR1B.upper__HRGC <  0)) {
+            result__FR1B=create_with_capacity__GI5B( 16);
+          } else {
+            Self__ICZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__LR1B);
+            result__FR1B=((void **)Self__ICZC->parent_arrayed_collection__KR1B.storage__0IHC)[Self__ICZC->parent_arrayed_collection__KR1B.upper__HRGC];
+            Self__4CZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__LR1B);
+            Self__4CZC->parent_arrayed_collection__KR1B.upper__HRGC=(__INTEGER)(Self__4CZC->parent_arrayed_collection__KR1B.upper__HRGC -  1);
+          };
+          arg__O4YB=read_loc_arg__with_self__25GB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__O4YB == (void *)NULL)) {
+            result__YTIH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__YTIH=FALSE__;
             } else {
-              result__KJIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__KJIH=((__CHARACTER )(( 0)));
+              result__ZTIH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__ZTIH=((__CHARACTER )(( 0)));
               } else {
-                result__KJIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__ZTIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__KJIH == '\'')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__JJIH=TRUE__;
+              if ((result__ZTIH == '\'')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__YTIH=TRUE__;
               };
             };
-            if (result__JJIH) {
-              result__ICZB=read_slot_operator__NU5B(result__YU1B);
+            if (result__YTIH) {
+              result__P4YB=read_slot_operator__MR5B(result__FR1B);
             } else {
-              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__;
+              p__EUIH=current_position__XUF();
+              result__1TIH=NULL;
+              ptr__2TIH=((__POINTER )(NULL));
+              typ_id__3TIH= 0;
+              sz__4TIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__4TIH ==  0)) {
+                result__1TIH=ITM_ARG__;
               } else {
-                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;
+                typ_id__3TIH=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4TIH);
+                if ((typ_id__3TIH == (__INTEGER)(-  1))) {
+                  a__5TIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__AUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TIH + a__5TIH) & (__UINTEGER_32)(~ a__5TIH));
+                  ptr_table__IUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AUIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__HUIH=((__POINTER )(NULL));
+                  result__JUIH=((__POINTER *)ptr_table__IUIH)[ 0];
+                  if ((result__JUIH == (void *)NULL)) {
+                    result__JUIH=new_lab__QOJ(new_size__AUIH);
+                    next__HUIH=(void *)((unsigned long)result__JUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUIH)));
+                    ((__POINTER *)next__HUIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__IUIH)[ 0]=next__HUIH;
                   } else {
-                    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)));
+                    next__HUIH=((__POINTER *)result__JUIH)[ 0];
+                    if ((next__HUIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JUIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__AUIH <<  1)) <=  4096)) {
+                        next__HUIH=(void *)((unsigned long)result__JUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AUIH)));
                       } else {
-                        next__YJIH=new_lab__URJ(new_size__RJIH);
+                        next__HUIH=new_lab__QOJ(new_size__AUIH);
                       };
-                      ((__POINTER *)next__YJIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ZJIH)[ 0]=next__YJIH;
+                      ((__POINTER *)next__HUIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__IUIH)[ 0]=next__HUIH;
                     } else {
-                      ((__POINTER *)result__0JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__0JIH=next__YJIH;
+                      ((__POINTER *)result__JUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__JUIH=next__HUIH;
                     };
                   };
-                  ptr__NJIH=result__0JIH;
+                  ptr__2TIH=result__JUIH;
                 } else {
-                  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;
+                  t__BUIH=((__UINTEGER_32 )typ_id__3TIH);
+                  a__CUIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__QUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__4TIH + a__CUIH) & (__UINTEGER_32)(~ a__CUIH));
+                  ptr_table__NUIH=((__POINTER )(&(table_type[(t__BUIH)])));
+                  lab_type__PUIH=(__UINTEGER_32)(t__BUIH |  1);
+                  next__MUIH=((__POINTER )(NULL));
+                  result__OUIH=((__POINTER *)ptr_table__NUIH)[ 0];
+                  if ((result__OUIH == (void *)NULL)) {
+                    result__OUIH=new_lab__QOJ(lab_type__PUIH);
+                    next__MUIH=(void *)((unsigned long)result__OUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUIH)));
+                    ((__POINTER *)next__MUIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__NUIH)[ 0]=next__MUIH;
                   } else {
-                    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)));
+                    next__MUIH=((__POINTER *)result__OUIH)[ 0];
+                    if ((next__MUIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OUIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QUIH <<  1)) <=  4096)) {
+                        next__MUIH=(void *)((unsigned long)result__OUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUIH)));
                       } else {
-                        next__3JIH=new_lab__URJ(lab_type__AKIH);
+                        next__MUIH=new_lab__QOJ(lab_type__PUIH);
                       };
-                      ((__POINTER *)next__3JIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__4JIH)[ 0]=next__3JIH;
+                      ((__POINTER *)next__MUIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__NUIH)[ 0]=next__MUIH;
                     } else {
-                      ((__POINTER *)result__5JIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__5JIH=next__3JIH;
+                      ((__POINTER *)result__OUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__OUIH=next__MUIH;
                     };
                   };
-                  ptr__NJIH=result__5JIH;
+                  ptr__2TIH=result__OUIH;
                 };
-                result__MJIH=((__ITM_ARG *)ptr__NJIH);
-                *(result__MJIH) = *(ITM_ARG__);
-              };
-              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__;
+                result__1TIH=((__ITM_ARG *)ptr__2TIH);
+                *(result__1TIH) = *(ITM_ARG__);
+              };
+              Self__DUIH=((__ITM_ARG *)result__1TIH);
+              Self__DUIH->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ=p__EUIH;
+              Self__DUIH->name__SYHC=(&__string_58);
+              Self__DUIH->type__TYHC=type_self__CQN;
+              arg__O4YB=result__1TIH;
+              add_last__R3GC(result__FR1B,result__1TIH);
+              result__P4YB=read_slot_keyword__ZW5B(result__FR1B);
+            };
+          } else {
+            add_last__R3GC(result__FR1B,arg__O4YB);
+            result__RUIH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__RUIH=FALSE__;
             } else {
-              result__DKIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__DKIH=((__CHARACTER )(( 0)));
+              result__SUIH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__SUIH=((__CHARACTER )(( 0)));
               } else {
-                result__DKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__SUIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__DKIH == '.')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__CKIH=TRUE__;
+              if ((result__SUIH == '.')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__RUIH=TRUE__;
               };
             };
-            if (result__CKIH) {
-              result__ICZB=read_slot_keyword__0Z5B(result__YU1B);
-              __tmp__YDZB=TRUE__;
+            if (result__RUIH) {
+              result__P4YB=read_slot_keyword__ZW5B(result__FR1B);
+              __tmp__55YB=TRUE__;
             } else {
-              __tmp__YDZB=FALSE__;
+              __tmp__55YB=FALSE__;
             };
-            if ((! __tmp__YDZB)) {
-              result__FKIH=FALSE__;
-              if ((! read_space__FSD())) {
-                result__FKIH=FALSE__;
+            if ((! __tmp__55YB)) {
+              result__UUIH=FALSE__;
+              if ((! read_space__KSD())) {
+                result__UUIH=FALSE__;
               } else {
-                result__GKIH='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__GKIH=((__CHARACTER )(( 0)));
+                result__VUIH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__VUIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__GKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__VUIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__GKIH == '\'')) {
-                  position__0BC=(__INTEGER)(position__0BC +  1);
-                  result__FKIH=TRUE__;
+                if ((result__VUIH == '\'')) {
+                  position__CCC=(__INTEGER)(position__CCC +  1);
+                  result__UUIH=TRUE__;
                 };
               };
-              if (result__FKIH) {
-                result__ICZB=read_slot_operator__NU5B(result__YU1B);
-              };
-            };
-          };
-          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__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__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__;
+              if (result__UUIH) {
+                result__P4YB=read_slot_operator__MR5B(result__FR1B);
+              };
+            };
+          };
+          if (((void *)result__P4YB != (void *)NULL)) {
+            result__HR4B=create_with_capacity__GI5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__FR1B)->parent_arrayed_collection__U4YB.upper__V3GC +  1));
+            Self__CKHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__HR4B);
+            new_capacity__FKHC= 0;
+            other_upper__EKHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__FR1B)->parent_arrayed_collection__U4YB.upper__V3GC;
+            if ((other_upper__EKHC >=  0)) {
+              new_capacity__FKHC=(__INTEGER)(other_upper__EKHC +  1);
+              if ((Self__CKHC->parent_arrayed_collection__U4YB.capacity__X3GC < new_capacity__FKHC)) {
+                Self__CKHC->parent_arrayed_collection__U4YB.storage__T4GC=create__QPBD(new_capacity__FKHC);
+                Self__CKHC->parent_arrayed_collection__U4YB.capacity__X3GC=new_capacity__FKHC;
+              };
+              __tmp__YKHC=Self__CKHC->parent_arrayed_collection__U4YB.storage__T4GC;
+              __tmp__0KHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__FR1B)->parent_arrayed_collection__U4YB.storage__T4GC;
+              Self__4FSD=((void **)__tmp__YKHC);
+              Self__B3WD=other_upper__EKHC;
+              while ((Self__B3WD >=  0)) {
+                Self__4FSD[Self__B3WD]=((void **)__tmp__0KHC)[Self__B3WD];
+                Self__B3WD=(__INTEGER)(Self__B3WD -  1);
+              };
+            };
+            Self__CKHC->parent_arrayed_collection__U4YB.upper__V3GC=other_upper__EKHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__FR1B)->parent_arrayed_collection__U4YB.upper__V3GC=(__INTEGER)(-  1);
+            Self__OSHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__LR1B);
+            new_capacity__QSHC= 0;
+            if (((__INTEGER)(Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC +  1) <= (__INTEGER)(Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC -  1))) {
+              Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC=(__INTEGER)(Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC +  1);
+              __tmp__4SHC=TRUE__;
             } else {
-              __tmp__PVHC=FALSE__;
+              __tmp__4SHC=FALSE__;
             };
-            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;
+            if ((! __tmp__4SHC)) {
+              if ((Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC ==  0)) {
+                Self__OSHC->parent_arrayed_collection__KR1B.storage__0IHC=create__4KBD( 2);
+                Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC= 2;
+                Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC= 0;
               } else {
-                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);
+                new_capacity__QSHC=(__INTEGER)(Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC <<  1);
+                __tmp__TTHC=Self__OSHC->parent_arrayed_collection__KR1B.storage__0IHC;
+                __tmp__UTHC=Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC;
+                new__QHTD=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__TTHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__UTHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QSHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__EITD=(__INTEGER)(new_capacity__QSHC -  1);
+                Self__24XE=__tmp__UTHC;
+                while ((Self__24XE <= __tmp__EITD)) {
+                  new__QHTD[Self__24XE]=NULL;
+                  Self__24XE=(__INTEGER)(Self__24XE +  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);
+                Self__OSHC->parent_arrayed_collection__KR1B.storage__0IHC=new__QHTD;
+                Self__OSHC->parent_arrayed_collection__KR1B.capacity__PIHC=new_capacity__QSHC;
+                Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC=(__INTEGER)(Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC +  1);
               };
             };
-            ((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);
+            ((void **)Self__OSHC->parent_arrayed_collection__KR1B.storage__0IHC)[Self__OSHC->parent_arrayed_collection__KR1B.upper__HRGC]=result__FR1B;
+            if (((struct ___OBJ *)result__P4YB)->__id==__ITM_SLOT__) {
+              set_argument_list__MAHC(result__P4YB,result__HR4B);
             } else {
-              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__;
+              Self__5BHC=((__ITM_SLOT_OPERATOR *)result__P4YB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__HR4B)->parent_arrayed_collection__U4YB.upper__V3GC +  1) >  1)) {
+                __tmp__NCHC=TRUE__;
               } else {
-                __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;
+                __tmp__ICHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__HR4B)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+                if (((struct ___OBJ *)__tmp__ICHC)->__id==__ITM_ARG__) {
+                  __tmp__JCHC= 1;
                 } else {
-                  __tmp__0EHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__ZEHC)->name__PNPF)->parent_arrayed_collection__P5I.upper__DAPD +  1);
+                  __tmp__JCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__ICHC)->name__LYPF)->parent_arrayed_collection__L2I.upper__R4OD +  1);
                 };
-                __tmp__4EHC=(__tmp__0EHC >  1);
-              };
-              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;
+                __tmp__NCHC=(__tmp__JCHC >  1);
+              };
+              if (__tmp__NCHC) {
+                if (((void *)((__SECTION_ *)Self__5BHC->parent_itm_slot__VR5B.id_section__F2C)->name__ZWDC == (void *)(&__string_25))) {
+                  Self__TPFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__HR4B);
+                  __tmp__0CHC=((void **)Self__TPFH->parent_arrayed_collection__U4YB.storage__T4GC)[Self__TPFH->parent_arrayed_collection__U4YB.upper__V3GC];
+                  if (((struct ___OBJ *)__tmp__0CHC)->__id==__ITM_ARG__) {
+                    __tmp__1CHC=((__ITM_ARG *)__tmp__0CHC)->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ;
                   } else {
-                    __tmp__MFHC=((__ITM_ARGS *)__tmp__LFHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
+                    __tmp__1CHC=((__ITM_ARGS *)__tmp__0CHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
                   };
-                  put_error__text__SNG( 1,(&__string_232));
-                  put_position__2OG(__tmp__MFHC);
-                  put_string__21F(msg_err__XNG);
-                  if ((type_error__WNG !=  2)) {
+                  put_error__text__YKG( 1,(&__string_234));
+                  put_position__CMG(__tmp__1CHC);
+                  put_string__CZF(msg_err__3KG);
+                  if ((type_error__2KG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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;
+                Self__KY3G=((__SECTION_ *)Self__5BHC->parent_itm_slot__VR5B.id_section__F2C);
+                if ((((void *)Self__KY3G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__KY3G->name__ZWDC == (void *)(&__string_24)))) {
+                  Self__2PFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__HR4B);
+                  __tmp__HDHC=((void **)Self__2PFH->parent_arrayed_collection__U4YB.storage__T4GC)[Self__2PFH->parent_arrayed_collection__U4YB.upper__V3GC];
+                  if (((struct ___OBJ *)__tmp__HDHC)->__id==__ITM_ARG__) {
+                    __tmp__IDHC=((__ITM_ARG *)__tmp__HDHC)->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ;
                   } else {
-                    __tmp__ZFHC=((__ITM_ARGS *)__tmp__YFHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
+                    __tmp__IDHC=((__ITM_ARGS *)__tmp__HDHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
                   };
-                  put_error__text__SNG( 1,(&__string_233));
-                  put_position__2OG(__tmp__ZFHC);
-                  put_string__21F(msg_err__XNG);
-                  if ((type_error__WNG !=  2)) {
+                  put_error__text__YKG( 1,(&__string_235));
+                  put_position__CMG(__tmp__IDHC);
+                  put_string__CZF(msg_err__3KG);
+                  if ((type_error__2KG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__QEHC->parent_itm_slot__WU5B.argument_list__OEHC=result__0U4B;
+              Self__5BHC->parent_itm_slot__VR5B.argument_list__3BHC=result__HR4B;
             };
           };
-          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)) {
+          last_slot__QTOB=result__P4YB;
+          if (((void *)result__P4YB == (void *)NULL)) {
+            pos__Y4VG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_236));
+            put_position__CMG(pos__Y4VG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__Y2D)->parent_named__V5.style__JEU=style__YXOB;
+          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__QTOB)->parent_named__15.style__25T=style__ETOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.style__JEU=style__YXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.style__25T=style__ETOB;
           };
-          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];
+          if (((read_symbol__3TJ((&__string_12)) || read_symbol__3TJ((&__string_13))) || read_symbol__3TJ((&__string_14)))) {
+            affect__FTOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[ 0];
           } else {
-            affect__ZXOB=' ';
+            affect__FTOB=' ';
           };
-          if ((affect__ZXOB == ' ')) {
-            result__KKIH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__KKIH=FALSE__;
+          if ((affect__FTOB == ' ')) {
+            result__ZUIH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__ZUIH=FALSE__;
             } else {
-              result__LKIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__LKIH=((__CHARACTER )(( 0)));
+              result__0UIH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__0UIH=((__CHARACTER )(( 0)));
               } else {
-                result__LKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__0UIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__LKIH == ':')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__KKIH=TRUE__;
+              if ((result__0UIH == ':')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__ZUIH=TRUE__;
               };
             };
-            __tmp__PZOB=result__KKIH;
+            __tmp__TUOB=result__ZUIH;
           } else {
-            __tmp__PZOB=FALSE__;
+            __tmp__TUOB=FALSE__;
           };
-          if (__tmp__PZOB) {
-            result__NKIH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__NKIH=FALSE__;
+          if (__tmp__TUOB) {
+            result__2UIH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__2UIH=FALSE__;
             } else {
-              result__OKIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__OKIH=((__CHARACTER )(( 0)));
+              result__3UIH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__3UIH=((__CHARACTER )(( 0)));
               } else {
-                result__OKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__3UIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__OKIH == '(')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__NKIH=TRUE__;
+              if ((result__3UIH == '(')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__2UIH=TRUE__;
               };
             };
-            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)) {
+            if (result__2UIH) {
+              lt__DTOB=read_type_list__DIO(PARSER__,FALSE__);
+              if (((void *)lt__DTOB == (void *)NULL)) {
+                pos__04VG=current_position__XUF();
+                put_error__text__YKG( 0,(&__string_237));
+                put_position__CMG(pos__04VG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__QKIH=FALSE__;
-              if ((! read_space__FSD())) {
-                result__QKIH=FALSE__;
+              result__5UIH=FALSE__;
+              if ((! read_space__KSD())) {
+                result__5UIH=FALSE__;
               } else {
-                result__RKIH='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__RKIH=((__CHARACTER )(( 0)));
+                result__AVIH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__AVIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__RKIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__AVIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__RKIH == ')')) {
-                  position__0BC=(__INTEGER)(position__0BC +  1);
-                  result__QKIH=TRUE__;
+                if ((result__AVIH == ')')) {
+                  position__CCC=(__INTEGER)(position__CCC +  1);
+                  result__5UIH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__5UIH)) {
+                pos__24VG=current_position__XUF();
+                put_error__text__YKG( 2,(&__string_238));
+                put_position__CMG(pos__24VG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__WXOB=get__KJP(lt__XXOB);
+              t__CTOB=get__3EP(lt__DTOB);
             } else {
-              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)) {
+              t__CTOB=read_type__B4L(PARSER__,FALSE__);
+              if (((void *)t__CTOB == (void *)NULL)) {
+                pos__44VG=current_position__XUF();
+                put_error__text__YKG( 0,(&__string_237));
+                put_position__CMG(pos__44VG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            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];
+            if (((read_symbol__3TJ((&__string_12)) || read_symbol__3TJ((&__string_13))) || read_symbol__3TJ((&__string_14)))) {
+              affect__FTOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[ 0];
             };
           } else {
-            t__WXOB=type_void__GWF;
+            t__CTOB=type_void__MTF;
           };
-          __tmp__T1OB=last_slot__Y2D;
-          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
-            set_result_type__Y3FC(last_slot__Y2D,t__WXOB);
+          __tmp__XWOB=last_slot__QTOB;
+          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            set_result_type__D1FC(last_slot__QTOB,t__CTOB);
           } else {
-            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;
+            Self__P2FC=((__ITM_SLOT_OPERATOR *)__tmp__XWOB);
+            tm__R2FC=NULL;
+            Self__LY3G=((__SECTION_ *)Self__P2FC->parent_itm_slot__VR5B.id_section__F2C);
+            if ((((void *)Self__LY3G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__LY3G->name__ZWDC == (void *)(&__string_24)))) {
+              if (t__CTOB==NULL) {
+                __tmp__02FC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__WXOB)->__id) {
+                switch (((struct ___OBJ *)t__CTOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__P5FC=((void *)t__WXOB);
+                  __tmp__02FC=((void *)t__CTOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__P5FC=((void *)t__WXOB);
+                  __tmp__02FC=((void *)t__CTOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__P5FC=NULL;
+                  __tmp__02FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__P5FC=((void *)t__WXOB);
+                  __tmp__02FC=((void *)t__CTOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__P5FC=((void *)t__WXOB);
+                  __tmp__02FC=((void *)t__CTOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__P5FC=((void *)t__WXOB);
+                  __tmp__02FC=((void *)t__CTOB);
                 } break;
                 }
               };
-              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)) {
+              tm__R2FC=__tmp__02FC;
+              if (((((void *)__tmp__02FC == (void *)NULL) || ((void *)__tmp__02FC == (void *)type_self__CQN)) || ((void *)__tmp__02FC == (void *)type_void__MTF))) {
+                pos__3ZID=Self__P2FC->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+                put_error__text__YKG( 1,(&__string_239));
+                put_position__CMG(pos__3ZID);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__E5FC->parent_itm_slot__WU5B.result_type__C5FC=t__WXOB;
+            Self__P2FC->parent_itm_slot__VR5B.result_type__N2FC=t__CTOB;
           };
-          if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__Y2D)->affect__RAGC=affect__ZXOB;
+          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__QTOB)->affect__23FC=affect__FTOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.affect__RAGC=affect__ZXOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.affect__23FC=affect__FTOB;
           };
-          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__) {
+          if ((affect__FTOB != ' ')) {
+            read_space__KSD();
+            if (is_shorter2__VI) {
+              if (((void *)last_comment_slot__J3D != (void *)NULL)) {
+                __tmp__MXOB=last_comment_slot__J3D;
+                if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__QTOB)->comment__RYOB=__tmp__MXOB;
+                } else {
+                  ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB=__tmp__MXOB;
+                };
+              };
+              if (((void *)last_comment_extern__JYC != (void *)NULL)) {
+                if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__QTOB)->comment_chapter__5YHC=last_comment_extern__JYC;
+                } else {
+                  ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment_chapter__5YHC=last_comment_extern__JYC;
+                };
+              };
+              skip_comment__X2D=TRUE__;
+            };
+            old_pos__GTOB=position__CCC;
+            old_derive__HTOB=short_derive__PCC;
+            if (((void *)read_contract__VQF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
               };
             };
-            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)) {
+            expr__ZF3B=read_expr__C2I(PARSER__);
+            if (((void *)expr__ZF3B == (void *)NULL)) {
+              pos__G5VG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_240));
+              put_position__CMG(pos__G5VG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            __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);
+            __tmp__GG3B=last_slot__QTOB;
+            __tmp__HG3B=object__ZBC;
+            if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+              set_value__type__QDHC(last_slot__QTOB,expr__ZF3B,object__ZBC);
             } else {
-              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) {
+              Self__KEHC=((__ITM_SLOT_OPERATOR *)__tmp__GG3B);
+              if ((Self__KEHC->parent_itm_slot__VR5B.affect__23FC != '<')) {
+                copy__U4R(string_tmp__VH,(&__string_241));
+                append__2JS(string_tmp__VH,Self__KEHC->parent_itm_slot__VR5B.parent_named__15.name__LI);
+                n__UDBD=get__YWB(string_tmp__VH);
+                sec__VDBD=get_name__OQOB((&__string_27));
+                larg__WDBD=create_with_capacity__GI5B( 1);
+                switch (((struct ___OBJ *)expr__ZF3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__PEBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__PEBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__PEBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__PEBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__PEBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__PEBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__PEBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__PEBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__PEBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__PEBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__PEBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__PEBD=position__ND5B(expr__MJ3B);
+                  __tmp__BEBD=position__054B(expr__ZF3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__PEBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__PEBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__PEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__PEBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__PEBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__PEBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__PEBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__PEBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__PEBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__BEBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__PEBD=position__NJHC(expr__MJ3B);
+                  __tmp__BEBD=position__2GHC(expr__ZF3B);
                 } break;
                 };
-                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__;
+                result__CVIH=NULL;
+                ptr__DVIH=((__POINTER )(NULL));
+                typ_id__EVIH= 0;
+                sz__FVIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__FVIH ==  0)) {
+                  result__CVIH=ITM_ARG__;
                 } else {
-                  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;
+                  typ_id__EVIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FVIH);
+                  if ((typ_id__EVIH == (__INTEGER)(-  1))) {
+                    a__GVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__HVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVIH + a__GVIH) & (__UINTEGER_32)(~ a__GVIH));
+                    ptr_table__PVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HVIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__OVIH=((__POINTER )(NULL));
+                    result__QVIH=((__POINTER *)ptr_table__PVIH)[ 0];
+                    if ((result__QVIH == (void *)NULL)) {
+                      result__QVIH=new_lab__QOJ(new_size__HVIH);
+                      next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVIH)));
+                      ((__POINTER *)next__OVIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
                     } else {
-                      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)));
+                      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HVIH <<  1)) <=  4096)) {
+                          next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVIH)));
                         } else {
-                          next__5KIH=new_lab__URJ(new_size__YKIH);
+                          next__OVIH=new_lab__QOJ(new_size__HVIH);
                         };
-                        ((__POINTER *)next__5KIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__ALIH)[ 0]=next__5KIH;
+                        ((__POINTER *)next__OVIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
                       } else {
-                        ((__POINTER *)result__BLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5KIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__BLIH=next__5KIH;
+                        ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__QVIH=next__OVIH;
                       };
                     };
-                    ptr__UKIH=result__BLIH;
+                    ptr__DVIH=result__QVIH;
                   } else {
-                    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;
+                    t__IVIH=((__UINTEGER_32 )typ_id__EVIH);
+                    a__JVIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__XVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVIH + a__JVIH) & (__UINTEGER_32)(~ a__JVIH));
+                    ptr_table__UVIH=((__POINTER )(&(table_type[(t__IVIH)])));
+                    lab_type__WVIH=(__UINTEGER_32)(t__IVIH |  1);
+                    next__TVIH=((__POINTER )(NULL));
+                    result__VVIH=((__POINTER *)ptr_table__UVIH)[ 0];
+                    if ((result__VVIH == (void *)NULL)) {
+                      result__VVIH=new_lab__QOJ(lab_type__WVIH);
+                      next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVIH)));
+                      ((__POINTER *)next__TVIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
                     } else {
-                      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)));
+                      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XVIH <<  1)) <=  4096)) {
+                          next__TVIH=(void *)((unsigned long)result__VVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XVIH)));
                         } else {
-                          next__ELIH=new_lab__URJ(lab_type__HLIH);
+                          next__TVIH=new_lab__QOJ(lab_type__WVIH);
                         };
-                        ((__POINTER *)next__ELIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FLIH)[ 0]=next__ELIH;
+                        ((__POINTER *)next__TVIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
                       } else {
-                        ((__POINTER *)result__GLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ELIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GLIH=next__ELIH;
+                        ((__POINTER *)result__VVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__VVIH=next__TVIH;
                       };
                     };
-                    ptr__UKIH=result__GLIH;
+                    ptr__DVIH=result__VVIH;
                   };
-                  result__TKIH=((__ITM_ARG *)ptr__UKIH);
-                  *(result__TKIH) = *(ITM_ARG__);
+                  result__CVIH=((__ITM_ARG *)ptr__DVIH);
+                  *(result__CVIH) = *(ITM_ARG__);
                 };
-                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) {
+                Self__KVIH=((__ITM_ARG *)result__CVIH);
+                Self__KVIH->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ=__tmp__BEBD;
+                Self__KVIH->name__SYHC=(&__string_58);
+                Self__KVIH->type__TYHC=type_self__CQN;
+                add_last__R3GC(larg__WDBD,result__CVIH);
+                switch (((struct ___OBJ *)expr__ZF3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__XEBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__XEBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__XEBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__XEBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__XEBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__XEBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__XEBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__XEBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__XEBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__XEBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__XEBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__XEBD=position__ND5B(expr__MJ3B);
+                  __tmp__JEBD=position__054B(expr__ZF3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__XEBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__XEBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__XEBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__XEBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__XEBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__XEBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__XEBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__JEBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__XEBD=position__NJHC(expr__MJ3B);
+                  __tmp__JEBD=position__2GHC(expr__ZF3B);
                 } break;
                 };
-                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__;
+                result__YVIH=NULL;
+                ptr__ZVIH=((__POINTER )(NULL));
+                typ_id__0VIH= 0;
+                sz__1VIH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__1VIH ==  0)) {
+                  result__YVIH=ITM_SLOT__;
                 } else {
-                  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;
+                  typ_id__0VIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1VIH);
+                  if ((typ_id__0VIH == (__INTEGER)(-  1))) {
+                    a__2VIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__3VIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1VIH + a__2VIH) & (__UINTEGER_32)(~ a__2VIH));
+                    ptr_table__FWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3VIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__EWIH=((__POINTER )(NULL));
+                    result__GWIH=((__POINTER *)ptr_table__FWIH)[ 0];
+                    if ((result__GWIH == (void *)NULL)) {
+                      result__GWIH=new_lab__QOJ(new_size__3VIH);
+                      next__EWIH=(void *)((unsigned long)result__GWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VIH)));
+                      ((__POINTER *)next__EWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__FWIH)[ 0]=next__EWIH;
                     } 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__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)));
+                      next__EWIH=((__POINTER *)result__GWIH)[ 0];
+                      if ((next__EWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GWIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3VIH <<  1)) <=  4096)) {
+                          next__EWIH=(void *)((unsigned long)result__GWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VIH)));
                         } else {
-                          next__VLIH=new_lab__URJ(new_size__OLIH);
+                          next__EWIH=new_lab__QOJ(new_size__3VIH);
                         };
-                        ((__POINTER *)next__VLIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__WLIH)[ 0]=next__VLIH;
+                        ((__POINTER *)next__EWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__FWIH)[ 0]=next__EWIH;
                       } else {
-                        ((__POINTER *)result__XLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__XLIH=next__VLIH;
+                        ((__POINTER *)result__GWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__GWIH=next__EWIH;
                       };
                     };
-                    ptr__KLIH=result__XLIH;
+                    ptr__ZVIH=result__GWIH;
                   } else {
-                    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;
+                    t__4VIH=((__UINTEGER_32 )typ_id__0VIH);
+                    a__5VIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__NWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1VIH + a__5VIH) & (__UINTEGER_32)(~ a__5VIH));
+                    ptr_table__KWIH=((__POINTER )(&(table_type[(t__4VIH)])));
+                    lab_type__MWIH=(__UINTEGER_32)(t__4VIH |  1);
+                    next__JWIH=((__POINTER )(NULL));
+                    result__LWIH=((__POINTER *)ptr_table__KWIH)[ 0];
+                    if ((result__LWIH == (void *)NULL)) {
+                      result__LWIH=new_lab__QOJ(lab_type__MWIH);
+                      next__JWIH=(void *)((unsigned long)result__LWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NWIH)));
+                      ((__POINTER *)next__JWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__KWIH)[ 0]=next__JWIH;
                     } 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__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)));
+                      next__JWIH=((__POINTER *)result__LWIH)[ 0];
+                      if ((next__JWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LWIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NWIH <<  1)) <=  4096)) {
+                          next__JWIH=(void *)((unsigned long)result__LWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NWIH)));
                         } else {
-                          next__0LIH=new_lab__URJ(lab_type__3LIH);
+                          next__JWIH=new_lab__QOJ(lab_type__MWIH);
                         };
-                        ((__POINTER *)next__0LIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__1LIH)[ 0]=next__0LIH;
+                        ((__POINTER *)next__JWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__KWIH)[ 0]=next__JWIH;
                       } else {
-                        ((__POINTER *)result__2LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0LIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__2LIH=next__0LIH;
+                        ((__POINTER *)result__LWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__LWIH=next__JWIH;
                       };
                     };
-                    ptr__KLIH=result__2LIH;
+                    ptr__ZVIH=result__LWIH;
                   };
-                  result__JLIH=((__ITM_SLOT *)ptr__KLIH);
-                  *(result__JLIH) = *(ITM_SLOT__);
+                  result__YVIH=((__ITM_SLOT *)ptr__ZVIH);
+                  *(result__YVIH) = *(ITM_SLOT__);
                 };
-                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) {
+                Self__AWIH=((__ITM_SLOT *)result__YVIH);
+                Self__AWIH->parent_named__15.name__LI=n__UDBD;
+                Self__AWIH->parent_named__15.parent_itm_object__4.position__RAJ=__tmp__JEBD;
+                Self__AWIH->id_section__F2C=sec__VDBD;
+                ((__ITM_SLOT *)result__YVIH)->affect__23FC='<';
+                set_value__type__QDHC(result__YVIH,expr__ZF3B,__tmp__HG3B);
+                set_argument_list__MAHC(result__YVIH,larg__WDBD);
+                set_result_type__D1FC(result__YVIH,Self__KEHC->parent_itm_slot__VR5B.result_type__N2FC);
+                fast_put__to__YLGC(((__PROTOTYPE *)__tmp__HG3B)->slot_list__XQS,result__YVIH,result__YVIH->parent_named__15.name__LI);
+                switch (((struct ___OBJ *)expr__ZF3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__LFBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__LFBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__LFBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__LFBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__LFBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__LFBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__LFBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__LFBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__LFBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__LFBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__LFBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__LFBD=position__ND5B(expr__MJ3B);
+                  __tmp__3EBD=position__054B(expr__ZF3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__LFBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__LFBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__LFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__LFBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__LFBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__LFBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__LFBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__LFBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__LFBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__3EBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__LFBD=position__NJHC(expr__MJ3B);
+                  __tmp__3EBD=position__2GHC(expr__ZF3B);
                 } break;
                 };
-                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__;
+                get__HQI(((__PROTOTYPE *)__tmp__HG3B)->parent_named__5.name__LI);
+                result__OWIH=NULL;
+                ptr__PWIH=((__POINTER )(NULL));
+                typ_id__QWIH= 0;
+                sz__RWIH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__RWIH ==  0)) {
+                  result__OWIH=ITM_PROTOTYPE__;
                 } else {
-                  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;
+                  typ_id__QWIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RWIH);
+                  if ((typ_id__QWIH == (__INTEGER)(-  1))) {
+                    a__SWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__TWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RWIH + a__SWIH) & (__UINTEGER_32)(~ a__SWIH));
+                    ptr_table__YWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TWIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__XWIH=((__POINTER )(NULL));
+                    result__ZWIH=((__POINTER *)ptr_table__YWIH)[ 0];
+                    if ((result__ZWIH == (void *)NULL)) {
+                      result__ZWIH=new_lab__QOJ(new_size__TWIH);
+                      next__XWIH=(void *)((unsigned long)result__ZWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWIH)));
+                      ((__POINTER *)next__XWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
                     } else {
-                      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)));
+                      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TWIH <<  1)) <=  4096)) {
+                          next__XWIH=(void *)((unsigned long)result__ZWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TWIH)));
                         } else {
-                          next__IMIH=new_lab__URJ(new_size__EMIH);
+                          next__XWIH=new_lab__QOJ(new_size__TWIH);
                         };
-                        ((__POINTER *)next__IMIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__JMIH)[ 0]=next__IMIH;
+                        ((__POINTER *)next__XWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
                       } else {
-                        ((__POINTER *)result__KMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__KMIH=next__IMIH;
+                        ((__POINTER *)result__ZWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ZWIH=next__XWIH;
                       };
                     };
-                    ptr__AMIH=result__KMIH;
+                    ptr__PWIH=result__ZWIH;
                   } else {
-                    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;
+                    t__UWIH=((__UINTEGER_32 )typ_id__QWIH);
+                    a__VWIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__AXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RWIH + a__VWIH) & (__UINTEGER_32)(~ a__VWIH));
+                    ptr_table__3WIH=((__POINTER )(&(table_type[(t__UWIH)])));
+                    lab_type__5WIH=(__UINTEGER_32)(t__UWIH |  1);
+                    next__2WIH=((__POINTER )(NULL));
+                    result__4WIH=((__POINTER *)ptr_table__3WIH)[ 0];
+                    if ((result__4WIH == (void *)NULL)) {
+                      result__4WIH=new_lab__QOJ(lab_type__5WIH);
+                      next__2WIH=(void *)((unsigned long)result__4WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXIH)));
+                      ((__POINTER *)next__2WIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3WIH)[ 0]=next__2WIH;
                     } else {
-                      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)));
+                      next__2WIH=((__POINTER *)result__4WIH)[ 0];
+                      if ((next__2WIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4WIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__AXIH <<  1)) <=  4096)) {
+                          next__2WIH=(void *)((unsigned long)result__4WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXIH)));
                         } else {
-                          next__NMIH=new_lab__URJ(lab_type__QMIH);
+                          next__2WIH=new_lab__QOJ(lab_type__5WIH);
                         };
-                        ((__POINTER *)next__NMIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__OMIH)[ 0]=next__NMIH;
+                        ((__POINTER *)next__2WIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3WIH)[ 0]=next__2WIH;
                       } else {
-                        ((__POINTER *)result__PMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__PMIH=next__NMIH;
+                        ((__POINTER *)result__4WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__4WIH=next__2WIH;
                       };
                     };
-                    ptr__AMIH=result__PMIH;
+                    ptr__PWIH=result__4WIH;
                   };
-                  result__5LIH=((__ITM_PROTOTYPE *)ptr__AMIH);
-                  *(result__5LIH) = *(ITM_PROTOTYPE__);
+                  result__OWIH=((__ITM_PROTOTYPE *)ptr__PWIH);
+                  *(result__OWIH) = *(ITM_PROTOTYPE__);
                 };
-                ((__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) {
+                ((__ITM_PROTOTYPE *)result__OWIH)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__3EBD;
+                switch (((struct ___OBJ *)expr__ZF3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__UFBD=((__ITM_LIST *)expr__MJ3B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__UFBD=((__ITM_LDOTS *)expr__MJ3B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__UFBD=((__ITM_PROTOTYPE *)expr__MJ3B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__UFBD=((__ITM_LIST_IDF *)expr__MJ3B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__UFBD=((__ITM_WRITE_VALUE *)expr__MJ3B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__UFBD=((__ITM_WRITE_CAST *)expr__MJ3B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__UFBD=((__ITM_READ *)expr__MJ3B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__UFBD=((__ITM_WRITE_CODE *)expr__MJ3B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__UFBD=((__ITM_OPERATOR *)expr__MJ3B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__UFBD=((__ITM_READ_ARG1 *)expr__MJ3B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__UFBD=((__ITM_READ_ARG2 *)expr__MJ3B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__UFBD=position__ND5B(expr__MJ3B);
+                  __tmp__GFBD=position__054B(expr__ZF3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__UFBD=((__ITM_OLD *)expr__MJ3B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__UFBD=((__ITM_EXTERNAL_TYPE *)expr__MJ3B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__UFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__MJ3B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__UFBD=((__ITM_EXTERNAL *)expr__MJ3B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__UFBD=((__ITM_READ_ARGS *)expr__MJ3B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__UFBD=((__ITM_REAL *)expr__MJ3B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__UFBD=((__ITM_NUMBER *)expr__MJ3B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__UFBD=((__ITM_CHARACTER *)expr__MJ3B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__UFBD=((__ITM_STRING *)expr__MJ3B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+                  __tmp__GFBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__UFBD=position__NJHC(expr__MJ3B);
+                  __tmp__GFBD=position__2GHC(expr__ZF3B);
                 } break;
                 };
-                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__;
+                result__BXIH=NULL;
+                ptr__CXIH=((__POINTER )(NULL));
+                typ_id__DXIH= 0;
+                sz__EXIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__EXIH ==  0)) {
+                  result__BXIH=ITM_READ_ARG1__;
                 } else {
-                  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;
+                  typ_id__DXIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EXIH);
+                  if ((typ_id__DXIH == (__INTEGER)(-  1))) {
+                    a__FXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__GXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXIH + a__FXIH) & (__UINTEGER_32)(~ a__FXIH));
+                    ptr_table__LXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GXIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__KXIH=((__POINTER )(NULL));
+                    result__MXIH=((__POINTER *)ptr_table__LXIH)[ 0];
+                    if ((result__MXIH == (void *)NULL)) {
+                      result__MXIH=new_lab__QOJ(new_size__GXIH);
+                      next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXIH)));
+                      ((__POINTER *)next__KXIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__LXIH)[ 0]=next__KXIH;
                     } else {
-                      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)));
+                      next__KXIH=((__POINTER *)result__MXIH)[ 0];
+                      if ((next__KXIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MXIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GXIH <<  1)) <=  4096)) {
+                          next__KXIH=(void *)((unsigned long)result__MXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXIH)));
                         } else {
-                          next__1MIH=new_lab__URJ(new_size__XMIH);
+                          next__KXIH=new_lab__QOJ(new_size__GXIH);
                         };
-                        ((__POINTER *)next__1MIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__2MIH)[ 0]=next__1MIH;
+                        ((__POINTER *)next__KXIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__LXIH)[ 0]=next__KXIH;
                       } else {
-                        ((__POINTER *)result__3MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__3MIH=next__1MIH;
+                        ((__POINTER *)result__MXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__MXIH=next__KXIH;
                       };
                     };
-                    ptr__TMIH=result__3MIH;
+                    ptr__CXIH=result__MXIH;
                   } else {
-                    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;
+                    t__HXIH=((__UINTEGER_32 )typ_id__DXIH);
+                    a__IXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__TXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EXIH + a__IXIH) & (__UINTEGER_32)(~ a__IXIH));
+                    ptr_table__QXIH=((__POINTER )(&(table_type[(t__HXIH)])));
+                    lab_type__SXIH=(__UINTEGER_32)(t__HXIH |  1);
+                    next__PXIH=((__POINTER )(NULL));
+                    result__RXIH=((__POINTER *)ptr_table__QXIH)[ 0];
+                    if ((result__RXIH == (void *)NULL)) {
+                      result__RXIH=new_lab__QOJ(lab_type__SXIH);
+                      next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXIH)));
+                      ((__POINTER *)next__PXIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
                     } else {
-                      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)));
+                      next__PXIH=((__POINTER *)result__RXIH)[ 0];
+                      if ((next__PXIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RXIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TXIH <<  1)) <=  4096)) {
+                          next__PXIH=(void *)((unsigned long)result__RXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TXIH)));
                         } else {
-                          next__ANIH=new_lab__URJ(lab_type__DNIH);
+                          next__PXIH=new_lab__QOJ(lab_type__SXIH);
                         };
-                        ((__POINTER *)next__ANIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
+                        ((__POINTER *)next__PXIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
                       } else {
-                        ((__POINTER *)result__CNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__CNIH=next__ANIH;
+                        ((__POINTER *)result__RXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__RXIH=next__PXIH;
                       };
                     };
-                    ptr__TMIH=result__CNIH;
+                    ptr__CXIH=result__RXIH;
                   };
-                  result__SMIH=((__ITM_READ_ARG1 *)ptr__TMIH);
-                  *(result__SMIH) = *(ITM_READ_ARG1__);
+                  result__BXIH=((__ITM_READ_ARG1 *)ptr__CXIH);
+                  *(result__BXIH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__SMIH)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__UFBD;
+                ((__ITM_READ_ARG1 *)result__BXIH)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__GFBD;
               };
             };
-            if (((void *)read_contract__PTF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__Y2D)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__VQF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__FNIH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__FNIH=FALSE__;
+          result__UXIH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__UXIH=FALSE__;
           } else {
-            result__GNIH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__GNIH=((__CHARACTER )(( 0)));
+            result__VXIH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__VXIH=((__CHARACTER )(( 0)));
             } else {
-              result__GNIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__VXIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__GNIH == ';')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__FNIH=TRUE__;
+            if ((result__VXIH == ';')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__UXIH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__UXIH)) {
+            pos__Q5VG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_242));
+            put_position__CMG(pos__Q5VG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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:
+          if (is_shorter2__VI) {
+            skip_comment__X2D=FALSE__;
+            read_space__KSD();
+            if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+              __tmp__SYOB=((__ITM_SLOT *)last_slot__QTOB)->comment__RYOB;
+            } else {
+              __tmp__SYOB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB;
+            };
+            if ((((void *)__tmp__SYOB == (void *)NULL) && ((void *)last_comment_slot__J3D != (void *)NULL))) {
+              __tmp__CZOB=last_comment_slot__J3D;
+              if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)last_slot__QTOB)->comment__RYOB=__tmp__CZOB;
+              } else {
+                ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB=__tmp__CZOB;
+              };
+            };
+          };
+          if (is_shorter__LZ) {
+            if ((((! is_short_code__11) && (old_pos__GTOB !=  0)) && ((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__XUF()) >>  9) &  255) <  5)) {
+                while_do__HMLE:
                 {
-                  result__4L3G='\0';
-                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                    result__4L3G=((__CHARACTER )(( 0)));
+                  result__VY3G='\0';
+                  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                    result__VY3G=((__CHARACTER )(( 0)));
                   } else {
-                    result__4L3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                    result__VY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__4L3G != ((__CHARACTER )(( 0))))) {
-                    result__HM3G='\0';
-                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                      result__HM3G=((__CHARACTER )(( 0)));
+                  if ((result__VY3G != ((__CHARACTER )(( 0))))) {
+                    result__4Y3G='\0';
+                    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                      result__4Y3G=((__CHARACTER )(( 0)));
                     } else {
-                      result__HM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                      result__4Y3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__I4OB=(((((((result__HM3G == ' ') || (result__HM3G == '\t')) || (result__HM3G == '\n')) || (result__HM3G == '\r')) || (result__HM3G == '\0')) || (result__HM3G == '\f')) || (result__HM3G == '\v'));
+                    __tmp__G1OB=(((((((result__4Y3G == ' ') || (result__4Y3G == '\t')) || (result__4Y3G == '\n')) || (result__4Y3G == '\r')) || (result__4Y3G == '\0')) || (result__4Y3G == '\f')) || (result__4Y3G == '\v'));
                   } else {
-                    __tmp__I4OB=FALSE__;
+                    __tmp__G1OB=FALSE__;
                   };
-                  if (__tmp__I4OB) {
-                    result__MM3G='\0';
-                    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                      result__MM3G=((__CHARACTER )(( 0)));
+                  if (__tmp__G1OB) {
+                    result__DZ3G='\0';
+                    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                      result__DZ3G=((__CHARACTER )(( 0)));
                     } else {
-                      result__MM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                      result__DZ3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__J4OB=(result__MM3G != '\n');
+                    __tmp__H1OB=(result__DZ3G != '\n');
                   } else {
-                    __tmp__J4OB=FALSE__;
+                    __tmp__H1OB=FALSE__;
                   };
-                  if (__tmp__J4OB) {
-                    position__0BC=(__INTEGER)(position__0BC +  1);
-                    goto while_do__EOLE;
+                  if (__tmp__H1OB) {
+                    position__CCC=(__INTEGER)(position__CCC +  1);
+                    goto while_do__HMLE;
                   };
                 };
-                result__RM3G='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__RM3G=((__CHARACTER )(( 0)));
+                result__IZ3G='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__IZ3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__RM3G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__IZ3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__RM3G == '\n')) {
-                  position__0BC=(__INTEGER)(position__0BC +  1);
+                if ((result__IZ3G == '\n')) {
+                  position__CCC=(__INTEGER)(position__CCC +  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__TSHH=((__STRING *)output_code__SI);
+              start__QSHH=(__INTEGER)(old_pos__GTOB + old_derive__HTOB);
+              end__PSHH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+              len__RSHH=(__INTEGER)((__INTEGER)(end__PSHH - start__QSHH) +  1);
+              if ((len__RSHH >  0)) {
+                __tmp__SSHH=(__INTEGER)(end__PSHH +  1);
+                __tmp__USHH=Self__TSHH->count__EGC;
+                Self__VSHH=__tmp__SSHH;
+                while ((Self__VSHH <= __tmp__USHH)) {
+                  ((__CHARACTER *)Self__TSHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__VSHH - len__RSHH) -  1)]=((__CHARACTER *)Self__TSHH->storage__23R)[(__INTEGER)(Self__VSHH -  1)];
+                  Self__VSHH=(__INTEGER)(Self__VSHH +  1);
                 };
-                Self__AHHH->count__4FC=(__INTEGER)(Self__AHHH->count__4FC - len__4GHH);
+                Self__TSHH->count__EGC=(__INTEGER)(Self__TSHH->count__EGC - len__RSHH);
               };
-              short_derive__JCC=(__INTEGER)(old_derive__1XOB - (__INTEGER)(position__0BC - old_pos__0XOB));
+              short_derive__PCC=(__INTEGER)(old_derive__HTOB - (__INTEGER)(position__CCC - old_pos__GTOB));
             };
           };
-          __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;
+          __tmp__O2OB=((__PROTOTYPE *)object__ZBC)->slot_list__XQS;
+          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            __tmp__Q2OB=((__ITM_SLOT *)last_slot__QTOB)->parent_named__15.name__LI;
           } else {
-            __tmp__S5OB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__Q2OB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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;
+          s__ITOB=fast_reference_at__H4FC(__tmp__O2OB,__tmp__Q2OB);
+          if (((void *)s__ITOB != (void *)NULL)) {
+            put_error__text__YKG( 1,(&__string_243));
+            if (((struct ___OBJ *)s__ITOB)->__id==__ITM_SLOT__) {
+              __tmp__12OB=((__ITM_SLOT *)s__ITOB)->parent_named__15.parent_itm_object__4.position__RAJ;
             } else {
-              __tmp__35OB=((__ITM_SLOT_OPERATOR *)s__2XOB)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+              __tmp__12OB=((__ITM_SLOT_OPERATOR *)s__ITOB)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
             };
-            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;
+            put_position__CMG(__tmp__12OB);
+            if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+              __tmp__32OB=((__ITM_SLOT *)last_slot__QTOB)->parent_named__15.parent_itm_object__4.position__RAJ;
             } else {
-              __tmp__55OB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.parent_itm_object__4.position__VDJ;
+              __tmp__32OB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
             };
-            put_position__2OG(__tmp__55OB);
-            put_string__21F(msg_err__XNG);
-            if ((type_error__WNG !=  2)) {
+            put_position__CMG(__tmp__32OB);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          Self__SCZB=((__PROTOTYPE *)object__ZBC);
+          s__TCZB=last_slot__QTOB;
+          __tmp__UCZB=Self__SCZB->slot_list__XQS;
+          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            __tmp__VCZB=((__ITM_SLOT *)last_slot__QTOB)->parent_named__15.name__LI;
           } else {
-            __tmp__IGZB=((__ITM_SLOT_OPERATOR *)last_slot__Y2D)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__VCZB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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;
+          fast_put__to__YLGC(__tmp__UCZB,last_slot__QTOB,__tmp__VCZB);
+          if (((void *)Self__SCZB->first_slot__XCZB == (void *)NULL)) {
+            Self__SCZB->first_slot__XCZB=s__TCZB;
           } else {
-            __tmp__WGZB=Self__FGZB->last_slot__W1C;
-            if (((struct ___OBJ *)__tmp__WGZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__WGZB)->next__WHHC=s__GGZB;
+            __tmp__DDZB=Self__SCZB->last_slot__11C;
+            if (((struct ___OBJ *)__tmp__DDZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__DDZB)->next__FFHC=s__TCZB;
             } else {
-              ((__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)) {
+              ((__ITM_SLOT_OPERATOR *)__tmp__DDZB)->parent_itm_slot__VR5B.next__FFHC=s__TCZB;
+            };
+          };
+          Self__SCZB->last_slot__11C=s__TCZB;
+          if (is_shorter__LZ) {
+            Self__YG3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__XCC);
+            Self__YG3B->count__LDY= 0;
+            __tmp__0G3B=Self__YG3B->buckets__CAV;
+            __tmp__3G3B=(__INTEGER)(Self__YG3B->capacity__FET -  1);
+            Self__KFHC=((void **)__tmp__0G3B);
+            Self__1XPC=__tmp__3G3B;
+            while ((Self__1XPC >=  0)) {
+              Self__KFHC[Self__1XPC]=NULL;
+              Self__1XPC=(__INTEGER)(Self__1XPC -  1);
+            };
+          };
+        };
+      } while (result__BTOB);
+      if (is_shorter__LZ) {
+        if (((! is_short_private__J2) && ((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC == (void *)(&__string_26)))) {
+          Self__1SHH=((__STRING *)output_code__SI);
+          start__YSHH=(__INTEGER)(pos_sec__2XC + old_derive__3XC);
+          end__XSHH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+          len__ZSHH=(__INTEGER)((__INTEGER)(end__XSHH - start__YSHH) +  1);
+          if ((len__ZSHH >  0)) {
+            __tmp__0SHH=(__INTEGER)(end__XSHH +  1);
+            __tmp__2SHH=Self__1SHH->count__EGC;
+            Self__3SHH=__tmp__0SHH;
+            while ((Self__3SHH <= __tmp__2SHH)) {
+              ((__CHARACTER *)Self__1SHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__3SHH - len__ZSHH) -  1)]=((__CHARACTER *)Self__1SHH->storage__23R)[(__INTEGER)(Self__3SHH -  1)];
+              Self__3SHH=(__INTEGER)(Self__3SHH +  1);
+            };
+            Self__1SHH->count__EGC=(__INTEGER)(Self__1SHH->count__EGC - len__ZSHH);
+          };
+          short_derive__PCC=(__INTEGER)(old_derive__3XC - (__INTEGER)(position__CCC - pos_sec__2XC));
+        };
+        pos_sec__2XC=position__CCC;
+        old_derive__3XC=short_derive__PCC;
+      };
+      goto while_do__11E;
+    };
+  };
+  if (((void *)read_contract__VQF(PARSER__) != (void *)NULL)) {
+    pos__LAWG=current_position__XUF();
+    put_error__text__YKG( 2,(&__string_244));
+    put_position__CMG(pos__LAWG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  read_space__FSD();
-  result__CN3G='\0';
-  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-    result__CN3G=((__CHARACTER )(( 0)));
+  read_space__KSD();
+  result__ZZ3G='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+    result__ZZ3G=((__CHARACTER )(( 0)));
   } else {
-    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)) {
+    result__ZZ3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+  };
+  if ((result__ZZ3G != ((__CHARACTER )(( 0))))) {
+    pos__NAWG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_168));
+    put_position__CMG(pos__NAWG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  short__token__to__TBD((&__string_118),((__STRING *)source__XBC)->count__4FC,((__STRING *)source__XBC)->count__4FC);
-  object__RBC=NULL;
+  short__token__to__YBD((&__string_118),((__STRING *)source__5BC)->count__EGC,((__STRING *)source__5BC)->count__EGC);
+  object__ZBC=NULL;
 }
 
-static void put__to__like__D0XD(void *tok__F0XD,void *buf__G0XD,void *key__H0XD)
+static void put__to__like__Q0XD(void *tok__S0XD,void *buf__T0XD,void *key__U0XD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__F1XD,Self__DBQE;
+  void *lst__V0XD;
+  lst__V0XD=NULL;
+  if (((void *)key__U0XD != (void *)NULL)) {
+    lst__V0XD=fast_reference_at__HFNE(short_dico__QD,key__U0XD);
+    if (((void *)lst__V0XD != (void *)NULL)) {
+      __tmp__F1XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__V0XD)->parent_linked_collection__LD.upper__MDD;
+      Self__DBQE= 1;
+      while ((Self__DBQE <= __tmp__F1XD)) {
+        if (((void *)item__MZND(lst__V0XD,Self__DBQE) == (void *)NULL)) {
+          append__2JS(buf__T0XD,tok__S0XD);
         } else {
-          append__JOS(buf__G0XD,item__A1ND(lst__I0XD,Self__RBQE));
+          append__2JS(buf__T0XD,item__MZND(lst__V0XD,Self__DBQE));
         };
-        Self__RBQE=(__INTEGER)(Self__RBQE +  1);
+        Self__DBQE=(__INTEGER)(Self__DBQE +  1);
       };
     };
   };
 }
 
-static void shorter_get_all_slot_in__T1XD(__PROTOTYPE *Self__U1XD,void *lst__V1XD)
+static void shorter_get_all_slot_in__S2XD(__PROTOTYPE *Self__T2XD,void *lst__U2XD)
 // ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
 {
-  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:
+  void *ps__W2XD,*__tmp__S5XD;
+  void *p__X2XD;
+  __INTEGER i__Y2XD,new_capacity__2AXE,__tmp__ACXE,__tmp__QUPF;
+  __INTEGER Self__E15F,i__SWKH,i__XWKH;
+  void *s__V2XD,*__tmp__A4XD,*__tmp__Z4XD,*__tmp__SCYD;
+  void *__tmp__J3XD,*__tmp__F5XD;
+  void *__tmp__B4XD,*__tmp__C4XD,*__tmp__DAYD,*__tmp__NAYD,*__tmp__VAYD;
+  void *__tmp__2BYD,*__tmp__3BYD;
+  __SECTION_ *Self__Y5EC;
+  void *__tmp__Q5XD;
+  __STRING_CONSTANT *Self__UWKH,*Self__ZWKH;
+  __BOOLEAN __tmp__O3XD,__tmp__F4XD,__tmp__KBXE,__tmp__J5XD,__tmp__WFLF;
+  __BOOLEAN __tmp__ZAYD,result__RWKH,__tmp__0AYD,result__WWKH;
+  __BOOLEAN __tmp__3AYD;
+  __FAST_ARRAYoITM_SLOTo *Self__0AXE;
+  void **__tmp__5BXE,**new__2TPF;
+  __CHARACTER __tmp__25XD;
+  ps__W2XD=NULL;
+  p__X2XD=NULL;
+  i__Y2XD= 0;
+  s__V2XD=Self__T2XD->first_slot__XCZB;
+  while (((void *)s__V2XD != (void *)NULL)) {
+    if (is_short_private__J2) {
+      __tmp__O3XD=TRUE__;
+    } else {
+      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+        __tmp__J3XD=((__ITM_SLOT *)s__V2XD)->id_section__F2C;
+      } else {
+        __tmp__J3XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.id_section__F2C;
+      };
+      __tmp__O3XD=((void *)((__SECTION_ *)__tmp__J3XD)->name__ZWDC != (void *)(&__string_26));
+    };
+    if (__tmp__O3XD) {
+      i__Y2XD= 0;
+      while_do__ICSE:
       {
-        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;
+        if ((i__Y2XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__U2XD)->parent_arrayed_collection__QJTD.upper__NKTD)) {
+          __tmp__A4XD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__U2XD)->parent_arrayed_collection__QJTD.storage__5HWE)[i__Y2XD];
+          if (((struct ___OBJ *)__tmp__A4XD)->__id==__ITM_SLOT__) {
+            __tmp__B4XD=((__ITM_SLOT *)__tmp__A4XD)->parent_named__15.name__LI;
           } else {
-            __tmp__E3XD=((__ITM_SLOT_OPERATOR *)__tmp__D3XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__B4XD=((__ITM_SLOT_OPERATOR *)__tmp__A4XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-            __tmp__F3XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
+          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+            __tmp__C4XD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__F3XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__C4XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          __tmp__I3XD=((void *)__tmp__E3XD != (void *)__tmp__F3XD);
+          __tmp__F4XD=((void *)__tmp__B4XD != (void *)__tmp__C4XD);
         } else {
-          __tmp__I3XD=FALSE__;
+          __tmp__F4XD=FALSE__;
         };
-        if (__tmp__I3XD) {
-          i__Z1XD=(__INTEGER)(i__Z1XD +  1);
-          goto while_do__I1RE;
+        if (__tmp__F4XD) {
+          i__Y2XD=(__INTEGER)(i__Y2XD +  1);
+          goto while_do__ICSE;
         };
       };
-      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__;
+      if ((i__Y2XD > ((__FAST_ARRAYoITM_SLOTo *)lst__U2XD)->parent_arrayed_collection__QJTD.upper__NKTD)) {
+        Self__0AXE=((__FAST_ARRAYoITM_SLOTo *)lst__U2XD);
+        new_capacity__2AXE= 0;
+        if (((__INTEGER)(Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD +  1) <= (__INTEGER)(Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE -  1))) {
+          Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD=(__INTEGER)(Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD +  1);
+          __tmp__KBXE=TRUE__;
         } else {
-          __tmp__JXWE=FALSE__;
+          __tmp__KBXE=FALSE__;
         };
-        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;
+        if ((! __tmp__KBXE)) {
+          if ((Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE ==  0)) {
+            Self__0AXE->parent_arrayed_collection__QJTD.storage__5HWE=create__35EF( 2);
+            Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE= 2;
+            Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD= 0;
           } else {
-            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);
+            new_capacity__2AXE=(__INTEGER)(Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE <<  1);
+            __tmp__5BXE=Self__0AXE->parent_arrayed_collection__QJTD.storage__5HWE;
+            __tmp__ACXE=Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE;
+            new__2TPF=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__5BXE)),((__UINTEGER_32 )(__INTEGER)(__tmp__ACXE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__2AXE * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__QUPF=(__INTEGER)(new_capacity__2AXE -  1);
+            Self__E15F=__tmp__ACXE;
+            while ((Self__E15F <= __tmp__QUPF)) {
+              new__2TPF[Self__E15F]=NULL;
+              Self__E15F=(__INTEGER)(Self__E15F +  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);
+            Self__0AXE->parent_arrayed_collection__QJTD.storage__5HWE=new__2TPF;
+            Self__0AXE->parent_arrayed_collection__QJTD.capacity__E1VE=new_capacity__2AXE;
+            Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD=(__INTEGER)(Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD +  1);
           };
         };
-        ((void **)Self__ZWWE->parent_arrayed_collection__GKTD.storage__D4VE)[Self__ZWWE->parent_arrayed_collection__GKTD.upper__12XD]=s__W1XD;
+        ((void **)Self__0AXE->parent_arrayed_collection__QJTD.storage__5HWE)[Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD]=s__V2XD;
       };
     };
-    if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-      __tmp__23XD=((__ITM_SLOT *)s__W1XD)->next__WHHC;
+    if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+      __tmp__Z4XD=((__ITM_SLOT *)s__V2XD)->next__FFHC;
     } else {
-      __tmp__23XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.next__WHHC;
+      __tmp__Z4XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.next__FFHC;
     };
-    s__W1XD=__tmp__23XD;
+    s__V2XD=__tmp__Z4XD;
   };
-  s__W1XD=Self__U1XD->first_slot__KGZB;
-  while_do__ZB5D:
+  s__V2XD=Self__T2XD->first_slot__XCZB;
+  while_do__NB5D:
   {
-    if (((void *)s__W1XD != (void *)NULL)) {
-      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-        __tmp__I4XD=((__ITM_SLOT *)s__W1XD)->id_section__A2C;
+    if (((void *)s__V2XD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+        __tmp__F5XD=((__ITM_SLOT *)s__V2XD)->id_section__F2C;
       } else {
-        __tmp__I4XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.id_section__A2C;
+        __tmp__F5XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.id_section__F2C;
       };
-      Self__JCFC=((__SECTION_ *)__tmp__I4XD);
-      __tmp__M4XD=(((void *)Self__JCFC->name__KZDC == (void *)(&__string_23)) || ((void *)Self__JCFC->name__KZDC == (void *)(&__string_24)));
+      Self__Y5EC=((__SECTION_ *)__tmp__F5XD);
+      __tmp__J5XD=(((void *)Self__Y5EC->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__Y5EC->name__ZWDC == (void *)(&__string_24)));
     } else {
-      __tmp__M4XD=FALSE__;
+      __tmp__J5XD=FALSE__;
     };
-    if (__tmp__M4XD) {
-      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-        __tmp__T4XD=((__ITM_SLOT *)s__W1XD)->result_type__C5FC;
+    if (__tmp__J5XD) {
+      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+        __tmp__Q5XD=((__ITM_SLOT *)s__V2XD)->result_type__N2FC;
       } else {
-        __tmp__T4XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.result_type__C5FC;
+        __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.result_type__N2FC;
       };
-      if (__tmp__T4XD==NULL) {
-        __tmp__V4XD=NULL;
+      if (__tmp__Q5XD==NULL) {
+        __tmp__S5XD=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__T4XD)->__id) {
+        switch (((struct ___OBJ *)__tmp__Q5XD)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__V4XD=((void *)__tmp__T4XD);
+          __tmp__S5XD=((void *)__tmp__Q5XD);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__V4XD=((void *)__tmp__T4XD);
+          __tmp__S5XD=((void *)__tmp__Q5XD);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__V4XD=NULL;
+          __tmp__S5XD=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__V4XD=NULL;
+          __tmp__S5XD=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__V4XD=((void *)__tmp__T4XD);
+          __tmp__S5XD=((void *)__tmp__Q5XD);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__V4XD=((void *)__tmp__T4XD);
+          __tmp__S5XD=((void *)__tmp__Q5XD);
         } break;
         }
       };
-      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;
+      ps__W2XD=__tmp__S5XD;
+      if (((void *)__tmp__S5XD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+          __tmp__25XD=((__ITM_SLOT *)s__V2XD)->parent_named__15.style__25T;
         } else {
-          __tmp__54XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.style__JEU;
+          __tmp__25XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
         };
-        if ((__tmp__54XD == '+')) {
-          switch (((struct ___OBJ *)__tmp__V4XD)->__id) {
+        if ((__tmp__25XD == '+')) {
+          switch (((struct ___OBJ *)__tmp__S5XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__G5XD=NULL;
+            __tmp__DAYD=NULL;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__G5XD=NULL;
+            __tmp__DAYD=NULL;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__G5XD=((__ITM_TYPE_GENERIC *)__tmp__V4XD)->parent_itm_type_style__KSN.style__1YP;
+            __tmp__DAYD=((__ITM_TYPE_GENERIC *)__tmp__S5XD)->parent_itm_type_style__3NN.style__OUP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__G5XD=((__ITM_TYPE_STYLE *)__tmp__V4XD)->style__1YP;
+            __tmp__DAYD=((__ITM_TYPE_STYLE *)__tmp__S5XD)->style__OUP;
           } break;
           };
-          __tmp__F1KF=((void *)__tmp__G5XD == (void *)(&__string_9));
+          __tmp__WFLF=((void *)__tmp__DAYD == (void *)(&__string_9));
         } else {
-          __tmp__F1KF=FALSE__;
+          __tmp__WFLF=FALSE__;
         };
-        if (__tmp__F1KF) {
-          __tmp__25XD=TRUE__;
+        if (__tmp__WFLF) {
+          __tmp__ZAYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-            __tmp__Q5XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
+          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+            __tmp__NAYD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__NAYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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);
+          Self__UWKH=((__STRING_CONSTANT *)__tmp__NAYD);
+          result__RWKH=FALSE__;
+          i__SWKH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__UWKH->count__DD)) {
+            i__SWKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+            while ((! ((i__SWKH ==  0) || (((__CHARACTER *)Self__UWKH->storage__QMO)[(__INTEGER)(i__SWKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__QMO)[(__INTEGER)(i__SWKH -  1)])))) {
+              i__SWKH=(__INTEGER)(i__SWKH -  1);
             };
-            result__MMKH=(i__NMKH ==  0);
+            result__RWKH=(i__SWKH ==  0);
           };
-          __tmp__25XD=result__MMKH;
+          __tmp__ZAYD=result__RWKH;
         };
-        if (__tmp__25XD) {
-          __tmp__35XD=TRUE__;
+        if (__tmp__ZAYD) {
+          __tmp__0AYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-            __tmp__Y5XD=((__ITM_SLOT *)s__W1XD)->parent_named__V5.name__LI;
+          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+            __tmp__VAYD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__Y5XD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.parent_named__V5.name__LI;
+            __tmp__VAYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
           };
-          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);
+          Self__ZWKH=((__STRING_CONSTANT *)__tmp__VAYD);
+          result__WWKH=FALSE__;
+          i__XWKH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__ZWKH->count__DD)) {
+            i__XWKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+            while ((! ((i__XWKH ==  0) || (((__CHARACTER *)Self__ZWKH->storage__QMO)[(__INTEGER)(i__XWKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__QMO)[(__INTEGER)(i__XWKH -  1)])))) {
+              i__XWKH=(__INTEGER)(i__XWKH -  1);
             };
-            result__RMKH=(i__SMKH ==  0);
+            result__WWKH=(i__XWKH ==  0);
           };
-          __tmp__35XD=result__RMKH;
+          __tmp__0AYD=result__WWKH;
         };
-        __tmp__AAYD=__tmp__35XD;
+        __tmp__3AYD=__tmp__0AYD;
       } else {
-        __tmp__AAYD=FALSE__;
+        __tmp__3AYD=FALSE__;
       };
-      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) {
+      if (__tmp__3AYD) {
+        p__X2XD=NULL;
+        i__Y2XD= 0;
+        while (((i__Y2XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__X2XD == (void *)NULL))) {
+          __tmp__2BYD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__Y2XD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__W2XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__ABYD=((__ITM_TYPE_PARAMETER *)ps__X1XD)->parent_itm_type__FEE.name__SYP;
+            __tmp__3BYD=((__ITM_TYPE_PARAMETER *)ps__W2XD)->parent_itm_type__LAE.name__FUP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__ABYD=((__ITM_TYPE_SIMPLE *)ps__X1XD)->name__SYP;
+            __tmp__3BYD=((__ITM_TYPE_SIMPLE *)ps__W2XD)->name__FUP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__ABYD=((__ITM_TYPE_GENERIC *)ps__X1XD)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP;
+            __tmp__3BYD=((__ITM_TYPE_GENERIC *)ps__W2XD)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__ABYD=((__ITM_TYPE_STYLE *)ps__X1XD)->parent_itm_type_simple__JSN.name__SYP;
+            __tmp__3BYD=((__ITM_TYPE_STYLE *)ps__W2XD)->parent_itm_type_simple__2NN.name__FUP;
           } break;
           };
-          if (((void *)__tmp__5AYD == (void *)__tmp__ABYD)) {
-            p__Y1XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__Z1XD];
+          if (((void *)__tmp__2BYD == (void *)__tmp__3BYD)) {
+            p__X2XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__Y2XD];
           };
-          i__Z1XD=(__INTEGER)(i__Z1XD +  1);
+          i__Y2XD=(__INTEGER)(i__Y2XD +  1);
         };
-        if (((void *)p__Y1XD != (void *)NULL)) {
-          shorter_get_all_slot_in__T1XD(p__Y1XD,lst__V1XD);
+        if (((void *)p__X2XD != (void *)NULL)) {
+          shorter_get_all_slot_in__S2XD(p__X2XD,lst__U2XD);
         };
       };
-      if (((struct ___OBJ *)s__W1XD)->__id==__ITM_SLOT__) {
-        __tmp__VBYD=((__ITM_SLOT *)s__W1XD)->next__WHHC;
+      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
+        __tmp__SCYD=((__ITM_SLOT *)s__V2XD)->next__FFHC;
       } else {
-        __tmp__VBYD=((__ITM_SLOT_OPERATOR *)s__W1XD)->parent_itm_slot__WU5B.next__WHHC;
+        __tmp__SCYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.next__FFHC;
       };
-      s__W1XD=__tmp__VBYD;
-      goto while_do__ZB5D;
+      s__V2XD=__tmp__SCYD;
+      goto while_do__NB5D;
     };
   };
 }
 
-static void pretty_name_in__DA4F(__ITM_SLOT *Self__EA4F,void *buffer__FA4F)
+static void pretty_name_in__ZM4F(__ITM_SLOT *Self__0M4F,void *buffer__1M4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER j__2M4F;
+  __STRING_CONSTANT *Self__ZQFH;
+  j__2M4F= 1;
+  while ((j__2M4F < ((__STRING_CONSTANT *)Self__0M4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__0M4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)(j__2M4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__0M4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)((__INTEGER)(j__2M4F +  1) -  1)] == '_'))) {
+      add_last__UHT(buffer__1M4F,' ');
+      j__2M4F=(__INTEGER)(j__2M4F +  2);
     } else {
-      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);
+      add_last__UHT(buffer__1M4F,((__CHARACTER *)((__STRING_CONSTANT *)Self__0M4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)(j__2M4F -  1)]);
+      j__2M4F=(__INTEGER)(j__2M4F +  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)]);
+  Self__ZQFH=((__STRING_CONSTANT *)Self__0M4F->parent_named__15.name__LI);
+  add_last__UHT(buffer__1M4F,((__CHARACTER *)Self__ZQFH->storage__QMO)[(__INTEGER)(Self__ZQFH->count__DD -  1)]);
 }
 
-static void pretty_name_in__YB4F(__ITM_SLOT_OPERATOR *Self__ZB4F,void *buffer__0B4F)
+static void pretty_name_in__OO4F(__ITM_SLOT_OPERATOR *Self__PO4F,void *buffer__QO4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *Self__4WKH,*Self__DITF;
+  __INTEGER i__2WKH,i__HITF;
+  __BOOLEAN result__1WKH,__tmp__1O4F,result__GITF;
+  Self__4WKH=((__STRING_CONSTANT *)Self__PO4F->parent_itm_slot__VR5B.parent_named__15.name__LI);
+  result__1WKH=FALSE__;
+  i__2WKH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__4WKH->count__DD)) {
+    i__2WKH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__2WKH ==  0) || (((__CHARACTER *)Self__4WKH->storage__QMO)[(__INTEGER)(i__2WKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__QMO)[(__INTEGER)(i__2WKH -  1)])))) {
+      i__2WKH=(__INTEGER)(i__2WKH -  1);
+    };
+    result__1WKH=(i__2WKH ==  0);
+  };
+  if (result__1WKH) {
+    append__2JS(buffer__QO4F,(&__string_245));
+    __tmp__1O4F=TRUE__;
   } else {
-    __tmp__FC4F=FALSE__;
+    __tmp__1O4F=FALSE__;
   };
-  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);
+  if ((! __tmp__1O4F)) {
+    Self__DITF=((__STRING_CONSTANT *)Self__PO4F->parent_itm_slot__VR5B.parent_named__15.name__LI);
+    result__GITF=FALSE__;
+    i__HITF= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__DITF->count__DD)) {
+      i__HITF=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__HITF ==  0) || (((__CHARACTER *)Self__DITF->storage__QMO)[(__INTEGER)(i__HITF -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__QMO)[(__INTEGER)(i__HITF -  1)])))) {
+        i__HITF=(__INTEGER)(i__HITF -  1);
       };
-      result__K3SF=(i__L3SF ==  0);
+      result__GITF=(i__HITF ==  0);
     };
-    if (result__K3SF) {
-      append__JOS(buffer__0B4F,(&__string_244));
+    if (result__GITF) {
+      append__2JS(buffer__QO4F,(&__string_246));
     } else {
-      append__JOS(buffer__0B4F,(&__string_245));
+      append__2JS(buffer__QO4F,(&__string_247));
     };
   };
-  append__JOS(buffer__0B4F,Self__ZB4F->pretty_name__30HC);
-  add_last__BMT(buffer__0B4F,'\'');
+  append__2JS(buffer__QO4F,Self__PO4F->pretty_name__MYHC);
+  add_last__UHT(buffer__QO4F,'\'');
 }
 
-static void get_all_comment_slot__in__A12E(__PROTOTYPE *Self__B12E,void *n__C12E,void *buf__D12E)
+static void get_all_comment_slot__in__ID4E(__PROTOTYPE *Self__JD4E,void *n__KD4E,void *buf__LD4E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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);
+  void *ps__ND4E,*__tmp__1E4E;
+  void *p__OD4E;
+  __INTEGER i__PD4E;
+  void *s__MD4E,*__tmp__QG4E;
+  void *__tmp__XD4E,*__tmp__AE4E,*__tmp__0F4E,*__tmp__1F4E;
+  void *__tmp__OE4E;
+  __SECTION_ *Self__3R1G;
+  void *__tmp__ZE4E;
+  __BOOLEAN __tmp__0D4E,__tmp__SE4E;
+  ps__ND4E=NULL;
+  p__OD4E=NULL;
+  i__PD4E= 0;
+  s__MD4E=fast_reference_at__H4FC(Self__JD4E->slot_list__XQS,n__KD4E);
+  if (((void *)s__MD4E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
+      __tmp__XD4E=((__ITM_SLOT *)s__MD4E)->comment__RYOB;
+    } else {
+      __tmp__XD4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.comment__RYOB;
+    };
+    __tmp__0D4E=((void *)__tmp__XD4E != (void *)NULL);
   } else {
-    __tmp__S12E=FALSE__;
+    __tmp__0D4E=FALSE__;
   };
-  if (__tmp__S12E) {
-    if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
-      __tmp__Y12E=((__ITM_SLOT *)s__E12E)->comment__4JJD;
+  if (__tmp__0D4E) {
+    if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
+      __tmp__AE4E=((__ITM_SLOT *)s__MD4E)->comment__RYOB;
     } else {
-      __tmp__Y12E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.comment__4JJD;
+      __tmp__AE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.comment__RYOB;
     };
-    append__JOS(buf__D12E,__tmp__Y12E);
+    append__2JS(buf__LD4E,__tmp__AE4E);
   };
-  s__E12E=Self__B12E->first_slot__KGZB;
-  while_do__GBFF:
+  s__MD4E=Self__JD4E->first_slot__XCZB;
+  while_do__CHGF:
   {
-    if (((void *)s__E12E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
-        __tmp__G22E=((__ITM_SLOT *)s__E12E)->id_section__A2C;
+    if (((void *)s__MD4E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
+        __tmp__OE4E=((__ITM_SLOT *)s__MD4E)->id_section__F2C;
       } else {
-        __tmp__G22E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.id_section__A2C;
+        __tmp__OE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.id_section__F2C;
       };
-      Self__NE1G=((__SECTION_ *)__tmp__G22E);
-      __tmp__K22E=(((void *)Self__NE1G->name__KZDC == (void *)(&__string_23)) || ((void *)Self__NE1G->name__KZDC == (void *)(&__string_24)));
+      Self__3R1G=((__SECTION_ *)__tmp__OE4E);
+      __tmp__SE4E=(((void *)Self__3R1G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__3R1G->name__ZWDC == (void *)(&__string_24)));
     } else {
-      __tmp__K22E=FALSE__;
+      __tmp__SE4E=FALSE__;
     };
-    if (__tmp__K22E) {
-      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
-        __tmp__R22E=((__ITM_SLOT *)s__E12E)->result_type__C5FC;
+    if (__tmp__SE4E) {
+      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
+        __tmp__ZE4E=((__ITM_SLOT *)s__MD4E)->result_type__N2FC;
       } else {
-        __tmp__R22E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.result_type__C5FC;
+        __tmp__ZE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.result_type__N2FC;
       };
-      if (__tmp__R22E==NULL) {
-        __tmp__T22E=NULL;
+      if (__tmp__ZE4E==NULL) {
+        __tmp__1E4E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__R22E)->__id) {
+        switch (((struct ___OBJ *)__tmp__ZE4E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__T22E=((void *)__tmp__R22E);
+          __tmp__1E4E=((void *)__tmp__ZE4E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__T22E=((void *)__tmp__R22E);
+          __tmp__1E4E=((void *)__tmp__ZE4E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__T22E=NULL;
+          __tmp__1E4E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__T22E=NULL;
+          __tmp__1E4E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__T22E=((void *)__tmp__R22E);
+          __tmp__1E4E=((void *)__tmp__ZE4E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__T22E=((void *)__tmp__R22E);
+          __tmp__1E4E=((void *)__tmp__ZE4E);
         } break;
         }
       };
-      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) {
+      ps__ND4E=__tmp__1E4E;
+      if (((void *)__tmp__1E4E != (void *)NULL)) {
+        p__OD4E=NULL;
+        i__PD4E= 0;
+        while (((i__PD4E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__OD4E == (void *)NULL))) {
+          __tmp__0F4E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__PD4E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__ND4E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__T32E=((__ITM_TYPE_PARAMETER *)ps__F12E)->parent_itm_type__FEE.name__SYP;
+            __tmp__1F4E=((__ITM_TYPE_PARAMETER *)ps__ND4E)->parent_itm_type__LAE.name__FUP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__T32E=((__ITM_TYPE_SIMPLE *)ps__F12E)->name__SYP;
+            __tmp__1F4E=((__ITM_TYPE_SIMPLE *)ps__ND4E)->name__FUP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__T32E=((__ITM_TYPE_GENERIC *)ps__F12E)->parent_itm_type_style__KSN.parent_itm_type_simple__JSN.name__SYP;
+            __tmp__1F4E=((__ITM_TYPE_GENERIC *)ps__ND4E)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__T32E=((__ITM_TYPE_STYLE *)ps__F12E)->parent_itm_type_simple__JSN.name__SYP;
+            __tmp__1F4E=((__ITM_TYPE_STYLE *)ps__ND4E)->parent_itm_type_simple__2NN.name__FUP;
           } break;
           };
-          if (((void *)__tmp__S32E == (void *)__tmp__T32E)) {
-            p__G12E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__STT)[i__H12E];
+          if (((void *)__tmp__0F4E == (void *)__tmp__1F4E)) {
+            p__OD4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__PD4E];
           };
-          i__H12E=(__INTEGER)(i__H12E +  1);
+          i__PD4E=(__INTEGER)(i__PD4E +  1);
         };
-        if (((void *)p__G12E != (void *)NULL)) {
-          get_all_comment_slot__in__A12E(p__G12E,n__C12E,buf__D12E);
+        if (((void *)p__OD4E != (void *)NULL)) {
+          get_all_comment_slot__in__ID4E(p__OD4E,n__KD4E,buf__LD4E);
         };
       };
-      if (((struct ___OBJ *)s__E12E)->__id==__ITM_SLOT__) {
-        __tmp__I42E=((__ITM_SLOT *)s__E12E)->next__WHHC;
+      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
+        __tmp__QG4E=((__ITM_SLOT *)s__MD4E)->next__FFHC;
       } else {
-        __tmp__I42E=((__ITM_SLOT_OPERATOR *)s__E12E)->parent_itm_slot__WU5B.next__WHHC;
+        __tmp__QG4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.next__FFHC;
       };
-      s__E12E=__tmp__I42E;
-      goto while_do__GBFF;
+      s__MD4E=__tmp__QG4E;
+      goto while_do__CHGF;
     };
   };
 }
 
-static void shorter_comment__in__light__V42E(void *str__X42E,void *buf__Y42E,__BOOLEAN is_light__Z42E)
+static void shorter_comment__in__light__1G4E(void *str__3G4E,void *buf__4G4E,__BOOLEAN is_light__5G4E)
 // ({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;
+  __INTEGER stat__BH4E,old_stat__CH4E,i__EH4E,cur__AH4E,__tmp__YH4E;
+  __INTEGER __tmp__BTHH,Self__DTHH,i__VXYB;
+  void *code_balise__GH4E;
+  __STRING *Self__5SHH,*Self__WFLB,*Self__D1RE;
+  void *__tmp__NN4E;
+  __CHARACTER car__DH4E,result__FRFH,result__RL2F,Self__KFOB;
+  __CHARACTER result__MFOB;
+  __BOOLEAN __tmp__5I4E,__tmp__EK4E,__tmp__2K4E,__tmp__TK4E;
+  __BOOLEAN result__G1RE,__tmp__WN4E,__tmp__WP4E;
+  __CHARACTER *__tmp__ATHH,*Self__CTHH,*Self__OXDH,*Self__BXYB;
+  __CHARACTER *other__CXYB;
+  stat__BH4E= 0;
+  old_stat__CH4E= 0;
+  car__DH4E='\0';
+  i__EH4E= 0;
+  cur__AH4E= 1;
+  ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
+  code_balise__GH4E=(&__string_128);
+  while ((cur__AH4E <= ((__STRING *)str__3G4E)->count__EGC)) {
+    car__DH4E=((__CHARACTER *)((__STRING *)str__3G4E)->storage__23R)[(__INTEGER)(cur__AH4E -  1)];
+    __tmp__YH4E=stat__BH4E;
+    if ((stat__BH4E ==  0)) {
+      if ((car__DH4E == '*')) {
+        if ((((__STRING *)str_tmp__IH4E)->count__EGC >  1)) {
+          if (is_light__5G4E) {
+            append__2JS(buf__4G4E,str_tmp__IH4E);
+            cur__AH4E=(__INTEGER)(((__STRING *)str__3G4E)->count__EGC +  1);
+          } else {
+            put__to__like__Q0XD((&__string_248),buf__4G4E,(&__string_148));
+            put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,code_balise__GH4E);
+          };
+        };
+        ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
+        stat__BH4E= 1;
+        __tmp__5I4E=TRUE__;
+      } else {
+        __tmp__5I4E=FALSE__;
+      };
+      if ((! __tmp__5I4E)) {
+        if ((car__DH4E == '`')) {
+          old_stat__CH4E=stat__BH4E;
+          stat__BH4E= 2;
+          ((__STRING *)str_tmp2__KJ4E)->count__EGC= 0;
+        } else {
+          add_last__UHT(str_tmp__IH4E,car__DH4E);
+        };
+      };
+    };
+    if ((__tmp__YH4E ==  1)) {
+      result__FRFH='\0';
+      if (((((__INTEGER_8 )car__DH4E) <  65) || (((__INTEGER_8 )car__DH4E) >  90))) {
+        result__FRFH=car__DH4E;
+      } else {
+        result__FRFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__DH4E) +  32))));
+      };
+      if (((((__INTEGER_8 )result__FRFH) >= ((__INTEGER_8 )'a')) && (((__INTEGER_8 )result__FRFH) <= ((__INTEGER_8 )'z')))) {
+        result__RL2F='\0';
+        if (((((__INTEGER_8 )car__DH4E) <  65) || (((__INTEGER_8 )car__DH4E) >  90))) {
+          result__RL2F=car__DH4E;
+        } else {
+          result__RL2F=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__DH4E) +  32))));
+        };
+        add_last__UHT(str_tmp__IH4E,result__RL2F);
+        __tmp__EK4E=TRUE__;
+      } else {
+        __tmp__EK4E=FALSE__;
+      };
+      if (__tmp__EK4E) {
+        __tmp__2K4E=TRUE__;
+      } else {
+        __tmp__TK4E=((car__DH4E == ' ') && (((__STRING *)str_tmp__IH4E)->count__EGC !=  0));
+        if (__tmp__TK4E) {
+          add_last__UHT(str_tmp__IH4E,'_');
+        };
+        __tmp__2K4E=__tmp__TK4E;
+      };
+      if ((! __tmp__2K4E)) {
+        if ((car__DH4E == ':')) {
+          if ((((__STRING *)str_tmp__IH4E)->count__EGC !=  0)) {
+            code_balise__GH4E=get__YWB(str_tmp__IH4E);
+            if (((void *)fast_reference_at__HFNE(short_dico__QD,code_balise__GH4E) == (void *)NULL)) {
+              code_balise__GH4E=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__5SHH=((__STRING *)str_tmp__IH4E);
+              __tmp__ATHH=Self__5SHH->storage__23R;
+              __tmp__BTHH=(__INTEGER)(Self__5SHH->count__EGC -  1);
+              Self__CTHH=((__CHARACTER *)__tmp__ATHH);
+              Self__DTHH=__tmp__BTHH;
+              while ((Self__DTHH >=  0)) {
+                if (('_' == Self__CTHH[Self__DTHH])) {
+                  Self__CTHH[Self__DTHH]=' ';
                 };
-                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;
+                Self__DTHH=(__INTEGER)(Self__DTHH -  1);
+              };
+              add_last__UHT(str_tmp__IH4E,':');
+              Self__OXDH=((__CHARACTER *)((__STRING *)str_tmp__IH4E)->storage__23R);
+              Self__WFLB=((__STRING *)str_tmp__IH4E);
+              Self__KFOB=Self__OXDH[ 0];
+              result__MFOB='\0';
+              if (((((__INTEGER_8 )Self__KFOB) <  97) || (((__INTEGER_8 )Self__KFOB) >  122))) {
+                result__MFOB=Self__KFOB;
               } else {
-                result__AKOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__4JOB) -  32))));
+                result__MFOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__KFOB) -  32))));
               };
-              ((__CHARACTER *)Self__RFFH->storage__JCS)[ 0]=result__AKOB;
-              put__to__like__D0XD(str_tmp__C52E,buf__Y42E,(&__string_146));
+              ((__CHARACTER *)Self__WFLB->storage__23R)[ 0]=result__MFOB;
+              put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,(&__string_148));
             };
           };
-          ((__STRING *)str_tmp__C52E)->count__4FC= 0;
-          stat__142E= 3;
+          ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
+          stat__BH4E= 3;
         };
       };
     };
-    if ((__tmp__S52E ==  2)) {
-      if ((car__342E == '\'')) {
-        if (((void *)code_balise__A52E != (void *)NULL)) {
-          i__442E= 0;
-          while_do__CF3F:
+    if ((__tmp__YH4E ==  2)) {
+      if ((car__DH4E == '\'')) {
+        if (((void *)code_balise__GH4E != (void *)NULL)) {
+          i__EH4E= 0;
+          while_do__1Q3F:
           {
-            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);
+            if ((i__EH4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD)) {
+              ((__STRING *)str_tmp3__KN4E)->count__EGC= 0;
+              __tmp__NN4E=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.storage__5HWE)[i__EH4E];
+              if (((struct ___OBJ *)__tmp__NN4E)->__id==__ITM_SLOT__) {
+                pretty_name_in__ZM4F(__tmp__NN4E,str_tmp3__KN4E);
               } else {
-                pretty_name_in__YB4F(__tmp__HF3E,str_tmp3__EF3E);
+                pretty_name_in__OO4F(__tmp__NN4E,str_tmp3__KN4E);
               };
-              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__;
+              Self__D1RE=((__STRING *)str_tmp3__KN4E);
+              result__G1RE=FALSE__;
+              if ((Self__D1RE->count__EGC == ((__STRING *)str_tmp2__KJ4E)->count__EGC)) {
+                if ((Self__D1RE->count__EGC ==  0)) {
+                  result__G1RE=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);
+                  Self__BXYB=((__CHARACTER *)Self__D1RE->storage__23R);
+                  other__CXYB=((__STRING *)str_tmp2__KJ4E)->storage__23R;
+                  i__VXYB=(__INTEGER)(Self__D1RE->count__EGC -  1);
+                  while (((i__VXYB >=  0) && (Self__BXYB[i__VXYB] == ((__CHARACTER *)other__CXYB)[i__VXYB]))) {
+                    i__VXYB=(__INTEGER)(i__VXYB -  1);
                   };
-                  result__IURE=(i__I1YB <  0);
+                  result__G1RE=(i__VXYB <  0);
                 };
               };
-              __tmp__QF3E=(! result__IURE);
+              __tmp__WN4E=(! result__G1RE);
             } else {
-              __tmp__QF3E=FALSE__;
+              __tmp__WN4E=FALSE__;
             };
-            if (__tmp__QF3E) {
-              i__442E=(__INTEGER)(i__442E +  1);
-              goto while_do__CF3F;
+            if (__tmp__WN4E) {
+              i__EH4E=(__INTEGER)(i__EH4E +  1);
+              goto while_do__1Q3F;
             };
           };
-          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));
+          if ((i__EH4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__RJTD)->parent_arrayed_collection__QJTD.upper__NKTD)) {
+            put__to__like__Q0XD(str_tmp2__KJ4E,str_tmp__IH4E,(&__string_137));
           } else {
-            put__to__like__D0XD(str_tmp2__EB3E,str_tmp__C52E,(&__string_136));
+            put__to__like__Q0XD(str_tmp2__KJ4E,str_tmp__IH4E,(&__string_136));
           };
         };
-        stat__142E=old_stat__242E;
+        stat__BH4E=old_stat__CH4E;
       } else {
-        add_last__BMT(str_tmp2__EB3E,car__342E);
+        add_last__UHT(str_tmp2__KJ4E,car__DH4E);
       };
     };
-    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);
+    if ((__tmp__YH4E ==  3)) {
+      if ((car__DH4E == '*')) {
+        if ((((__STRING *)str_tmp__IH4E)->count__EGC >  1)) {
+          put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,code_balise__GH4E);
         };
-        ((__STRING *)str_tmp__C52E)->count__4FC= 0;
-        stat__142E= 1;
-        __tmp__QH3E=TRUE__;
+        ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
+        stat__BH4E= 1;
+        __tmp__WP4E=TRUE__;
       } else {
-        __tmp__QH3E=FALSE__;
+        __tmp__WP4E=FALSE__;
       };
-      if ((! __tmp__QH3E)) {
-        if ((car__342E == '`')) {
-          old_stat__242E=stat__142E;
-          stat__142E= 2;
-          ((__STRING *)str_tmp2__EB3E)->count__4FC= 0;
+      if ((! __tmp__WP4E)) {
+        if ((car__DH4E == '`')) {
+          old_stat__CH4E=stat__BH4E;
+          stat__BH4E= 2;
+          ((__STRING *)str_tmp2__KJ4E)->count__EGC= 0;
         } else {
-          add_last__BMT(str_tmp__C52E,car__342E);
+          add_last__UHT(str_tmp__IH4E,car__DH4E);
         };
       };
     };
-    cur__042E=(__INTEGER)(cur__042E +  1);
+    cur__AH4E=(__INTEGER)(cur__AH4E +  1);
   };
-  if ((((__STRING *)str_tmp__C52E)->count__4FC >  1)) {
-    if (is_light__Z42E) {
-      append__JOS(buf__Y42E,str_tmp__C52E);
+  if ((((__STRING *)str_tmp__IH4E)->count__EGC >  1)) {
+    if (is_light__5G4E) {
+      append__2JS(buf__4G4E,str_tmp__IH4E);
     } else {
-      if ((stat__142E ==  0)) {
-        put__to__like__D0XD((&__string_246),buf__Y42E,(&__string_146));
+      if ((stat__BH4E ==  0)) {
+        put__to__like__Q0XD((&__string_248),buf__4G4E,(&__string_148));
       };
-      put__to__like__D0XD(str_tmp__C52E,buf__Y42E,code_balise__A52E);
+      put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,code_balise__GH4E);
     };
   };
 }
 
-static void append_in__WIH(__UINTEGER_32 Self__XIH,void *buffer__YIH)
+static void append_in__2FH(__UINTEGER_32 Self__3FH,void *buffer__4FH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __UINTEGER_32 val__5FH;
+  __INTEGER i__CGH,j__DGH;
+  __STRING *Self__GLHH;
+  __CHARACTER tmp__ILHH;
+  val__5FH= 0;
+  i__CGH= 0;
+  j__DGH= 0;
+  if ((Self__3FH ==  0)) {
+    add_last__UHT(((__STRING *)buffer__4FH),'0');
   } else {
-    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);
+    i__CGH=(__INTEGER)(((__STRING *)buffer__4FH)->count__EGC +  1);
+    val__5FH=Self__3FH;
+    while ((val__5FH !=  0)) {
+      add_last__UHT(((__STRING *)buffer__4FH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__5FH %  10)) + ((__INTEGER_8 )'0'))))));
+      val__5FH=(__UINTEGER_32)(val__5FH /  10);
+    };
+    j__DGH=((__STRING *)buffer__4FH)->count__EGC;
+    while ((i__CGH < j__DGH)) {
+      Self__GLHH=((__STRING *)buffer__4FH);
+      tmp__ILHH=((__CHARACTER *)Self__GLHH->storage__23R)[(__INTEGER)(i__CGH -  1)];
+      ((__CHARACTER *)Self__GLHH->storage__23R)[(__INTEGER)(i__CGH -  1)]=((__CHARACTER *)Self__GLHH->storage__23R)[(__INTEGER)(j__DGH -  1)];
+      ((__CHARACTER *)Self__GLHH->storage__23R)[(__INTEGER)(j__DGH -  1)]=tmp__ILHH;
+      j__DGH=(__INTEGER)(j__DGH -  1);
+      i__CGH=(__INTEGER)(i__CGH +  1);
     };
   };
 }
 
-static void append_in__PD4F(__SECTION_ *Self__QD4F,void *buf__RD4F)
+static void append_in__GQ4F(__SECTION_ *Self__HQ4F,void *buf__IQ4F)
 // ({SECTION_},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__1Q4F,Self__LHDG;
+  void *__tmp__CR4F,*__tmp__FR4F;
+  __ITM_TYPE_STYLE *Self__MRFH,*Self__ORFH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__PLHH;
+  if (((void *)Self__HQ4F->name__ZWDC != (void *)NULL)) {
+    append__2JS(buf__IQ4F,Self__HQ4F->name__ZWDC);
   } else {
-    __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) {
+    __tmp__1Q4F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HQ4F->type_list__IVFC)->parent_arrayed_collection__EYC.upper__3DV -  1);
+    Self__LHDG= 0;
+    while ((Self__LHDG <= __tmp__1Q4F)) {
+      __tmp__CR4F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HQ4F->type_list__IVFC)->parent_arrayed_collection__EYC.storage__EIV)[Self__LHDG];
+      switch (((struct ___OBJ *)__tmp__CR4F)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__JOS(buf__RD4F,((__ITM_TYPE_PARAMETER *)__tmp__LE4F)->parent_itm_type__FEE.name__SYP);
+        append__2JS(buf__IQ4F,((__ITM_TYPE_PARAMETER *)__tmp__CR4F)->parent_itm_type__LAE.name__FUP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__JOS(buf__RD4F,((__ITM_TYPE_SIMPLE *)__tmp__LE4F)->name__SYP);
+        append__2JS(buf__IQ4F,((__ITM_TYPE_SIMPLE *)__tmp__CR4F)->name__FUP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__WGPD(__tmp__LE4F,buf__RD4F);
+        append_in__EFPD(__tmp__CR4F,buf__IQ4F);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__0HPD(__tmp__LE4F,buf__RD4F);
+        append_in__IGPD(__tmp__CR4F,buf__IQ4F);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__MRFH=((__ITM_TYPE_STYLE *)__tmp__CR4F);
+        if (((void *)Self__MRFH->style__OUP != (void *)NULL)) {
+          append__2JS(buf__IQ4F,Self__MRFH->style__OUP);
+          add_last__UHT(buf__IQ4F,' ');
         };
-        append__JOS(buf__RD4F,Self__ZFFH->parent_itm_type_simple__JSN.name__SYP);
+        append__2JS(buf__IQ4F,Self__MRFH->parent_itm_type_simple__2NN.name__FUP);
       } break;
       };
-      add_last__BMT(buf__RD4F,',');
-      add_last__BMT(buf__RD4F,' ');
-      Self__OUCG=(__INTEGER)(Self__OUCG +  1);
+      add_last__UHT(buf__IQ4F,',');
+      add_last__UHT(buf__IQ4F,' ');
+      Self__LHDG=(__INTEGER)(Self__LHDG +  1);
     };
-    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) {
+    Self__PLHH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__HQ4F->type_list__IVFC);
+    __tmp__FR4F=((void **)Self__PLHH->parent_arrayed_collection__EYC.storage__EIV)[Self__PLHH->parent_arrayed_collection__EYC.upper__3DV];
+    switch (((struct ___OBJ *)__tmp__FR4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__JOS(buf__RD4F,((__ITM_TYPE_PARAMETER *)__tmp__OE4F)->parent_itm_type__FEE.name__SYP);
+      append__2JS(buf__IQ4F,((__ITM_TYPE_PARAMETER *)__tmp__FR4F)->parent_itm_type__LAE.name__FUP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__JOS(buf__RD4F,((__ITM_TYPE_SIMPLE *)__tmp__OE4F)->name__SYP);
+      append__2JS(buf__IQ4F,((__ITM_TYPE_SIMPLE *)__tmp__FR4F)->name__FUP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__WGPD(__tmp__OE4F,buf__RD4F);
+      append_in__EFPD(__tmp__FR4F,buf__IQ4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__0HPD(__tmp__OE4F,buf__RD4F);
+      append_in__IGPD(__tmp__FR4F,buf__IQ4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__ORFH=((__ITM_TYPE_STYLE *)__tmp__FR4F);
+      if (((void *)Self__ORFH->style__OUP != (void *)NULL)) {
+        append__2JS(buf__IQ4F,Self__ORFH->style__OUP);
+        add_last__UHT(buf__IQ4F,' ');
       };
-      append__JOS(buf__RD4F,Self__1FFH->parent_itm_type_simple__JSN.name__SYP);
+      append__2JS(buf__IQ4F,Self__ORFH->parent_itm_type_simple__2NN.name__FUP);
     } break;
     };
   };
 }
 
-static void shorter_profile_in__RE4F(__ITM_SLOT *Self__SE4F,void *buf__TE4F)
+static void shorter_profile_in__IR4F(__ITM_SLOT *Self__JR4F,void *buf__KR4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER j__CU5F,i__DU5F;
+  void *__tmp__IU5F,*__tmp__QV5F,*__tmp__QW5F;
+  __STRING_CONSTANT *Self__ASFH;
+  void *__tmp__CS4F;
+  __ITM_TYPE_MULTI *Self__TS1G;
+  __ITM_TYPE_STYLE *Self__KSFH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__CSFH;
+  if ((Self__JR4F->parent_named__15.style__25T == '+')) {
+    put__to__like__3BBG((&__string_249),buf__KR4F,(&__string_132));
   } else {
-    put__to__like__IUAG((&__string_248),buf__TE4F,(&__string_132));
+    put__to__like__3BBG((&__string_250),buf__KR4F,(&__string_132));
   };
-  ((__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);
+  ((__STRING *)string_tmp__VH)->count__EGC= 0;
+  j__CU5F= 1;
+  __tmp__IU5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__JR4F->argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+  if (((struct ___OBJ *)__tmp__IU5F)->__id==__ITM_ARG__) {
+    shorter_in__44AG(__tmp__IU5F,buf__KR4F);
   } else {
-    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) {
+    shorter_in__V5AG(__tmp__IU5F,buf__KR4F);
+  };
+  add_last__UHT(buf__KR4F,'.');
+  i__DU5F= 1;
+  while ((j__CU5F < ((__STRING_CONSTANT *)Self__JR4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__JR4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)(j__CU5F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__JR4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)((__INTEGER)(j__CU5F +  1) -  1)] == '_'))) {
+      put__to__like__3BBG(string_tmp__VH,buf__KR4F,(&__string_130));
+      add_last__UHT(buf__KR4F,' ');
+      __tmp__QV5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__JR4F->argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[i__DU5F];
+      if (((struct ___OBJ *)__tmp__QV5F)->__id==__ITM_ARG__) {
+        shorter_in__44AG(__tmp__QV5F,buf__KR4F);
+      } else {
+        shorter_in__V5AG(__tmp__QV5F,buf__KR4F);
+      };
+      add_last__UHT(buf__KR4F,' ');
+      ((__STRING *)string_tmp__VH)->count__EGC= 0;
+      j__CU5F=(__INTEGER)(j__CU5F +  2);
+      i__DU5F=(__INTEGER)(i__DU5F +  1);
+    } else {
+      add_last__UHT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__JR4F->parent_named__15.name__LI)->storage__QMO)[(__INTEGER)(j__CU5F -  1)]);
+      j__CU5F=(__INTEGER)(j__CU5F +  1);
+    };
+  };
+  Self__ASFH=((__STRING_CONSTANT *)Self__JR4F->parent_named__15.name__LI);
+  add_last__UHT(string_tmp__VH,((__CHARACTER *)Self__ASFH->storage__QMO)[(__INTEGER)(Self__ASFH->count__DD -  1)]);
+  put__to__like__3BBG(string_tmp__VH,buf__KR4F,(&__string_130));
+  if ((i__DU5F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__JR4F->argument_list__3BHC)->parent_arrayed_collection__U4YB.upper__V3GC)) {
+    add_last__UHT(buf__KR4F,' ');
+    Self__CSFH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__JR4F->argument_list__3BHC);
+    __tmp__QW5F=((void **)Self__CSFH->parent_arrayed_collection__U4YB.storage__T4GC)[Self__CSFH->parent_arrayed_collection__U4YB.upper__V3GC];
+    if (((struct ___OBJ *)__tmp__QW5F)->__id==__ITM_ARG__) {
+      shorter_in__44AG(__tmp__QW5F,buf__KR4F);
+    } else {
+      shorter_in__V5AG(__tmp__QW5F,buf__KR4F);
+    };
+    add_last__UHT(buf__KR4F,' ');
+  };
+  if (((void *)Self__JR4F->result_type__N2FC != (void *)type_void__MTF)) {
+    add_last__UHT(buf__KR4F,':');
+    __tmp__CS4F=Self__JR4F->result_type__N2FC;
+    switch (((struct ___OBJ *)__tmp__CS4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__LF4F,buf__TE4F);
+      shorter_in__OIDG(__tmp__CS4F,buf__KR4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__LF4F,buf__TE4F);
+      shorter_in__5IDG(__tmp__CS4F,buf__KR4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__TS1G=((__ITM_TYPE_MULTI *)__tmp__CS4F);
+      add_last__UHT(buf__KR4F,'(');
+      shorter_raw_in__ARFG(Self__TS1G,buf__KR4F);
+      add_last__UHT(buf__KR4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__LF4F,buf__TE4F);
+      shorter_in__QJDG(__tmp__CS4F,buf__KR4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__LF4F,buf__TE4F);
+      shorter_in__YKDG(__tmp__CS4F,buf__KR4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__KSFH=((__ITM_TYPE_STYLE *)__tmp__CS4F);
+      if (((void *)Self__KSFH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__KSFH->style__OUP,buf__KR4F,(&__string_119));
+        add_last__UHT(buf__KR4F,' ');
       };
-      put__to__like__35EG(Self__XGFH->parent_itm_type_simple__JSN.name__SYP,buf__TE4F,(&__string_125));
+      put__to__like__2OFG(Self__KSFH->parent_itm_type_simple__2NN.name__FUP,buf__KR4F,(&__string_125));
     } break;
     };
   };
 }
 
-static void shorter_profile_in__OF4F(__ITM_SLOT_OPERATOR *Self__PF4F,void *buf__QF4F)
+static void shorter_profile_in__FS4F(__ITM_SLOT_OPERATOR *Self__GS4F,void *buf__HS4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__0XIH,*Self__5XIH;
+  __INTEGER i__YXIH,i__3XIH,Self__NBMG,result__PBMG,i__5CMG,j__ADMG;
+  void *__tmp__SX5F,*__tmp__HY5F,*__tmp__3Y5F,*__tmp__HZ5F;
+  void *result__L1LG;
+  __INTEGER_32 Self__UCMG,val__2CMG;
+  __STRING *Self__VTFB;
+  void *__tmp__5S4F;
+  __ITM_TYPE_MULTI *Self__5ODG;
+  __ITM_TYPE_STYLE *Self__MSFH;
+  __BOOLEAN result__XXIH,__tmp__XX5F,result__2XIH;
+  __CHARACTER tmp__YTFB;
+  if ((Self__GS4F->parent_itm_slot__VR5B.parent_named__15.style__25T == '+')) {
+    put__to__like__GPDG((&__string_249),buf__HS4F,(&__string_132));
   } else {
-    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__;
+    put__to__like__GPDG((&__string_250),buf__HS4F,(&__string_132));
+  };
+  Self__0XIH=((__STRING_CONSTANT *)Self__GS4F->parent_itm_slot__VR5B.parent_named__15.name__LI);
+  result__XXIH=FALSE__;
+  i__YXIH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__0XIH->count__DD)) {
+    i__YXIH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__YXIH ==  0) || (((__CHARACTER *)Self__0XIH->storage__QMO)[(__INTEGER)(i__YXIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__QMO)[(__INTEGER)(i__YXIH -  1)])))) {
+      i__YXIH=(__INTEGER)(i__YXIH -  1);
+    };
+    result__XXIH=(i__YXIH ==  0);
+  };
+  if (result__XXIH) {
+    __tmp__SX5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__GS4F->parent_itm_slot__VR5B.argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+    if (((struct ___OBJ *)__tmp__SX5F)->__id==__ITM_ARG__) {
+      shorter_in__44AG(__tmp__SX5F,buf__HS4F);
+    } else {
+      shorter_in__V5AG(__tmp__SX5F,buf__HS4F);
+    };
+    add_last__UHT(buf__HS4F,' ');
+    add_last__UHT(buf__HS4F,'\'');
+    put__to__like__GPDG(Self__GS4F->pretty_name__MYHC,buf__HS4F,(&__string_130));
+    add_last__UHT(buf__HS4F,'\'');
+    add_last__UHT(buf__HS4F,' ');
+    __tmp__XX5F=TRUE__;
   } else {
-    __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) {
+    __tmp__XX5F=FALSE__;
+  };
+  if ((! __tmp__XX5F)) {
+    Self__5XIH=((__STRING_CONSTANT *)Self__GS4F->parent_itm_slot__VR5B.parent_named__15.name__LI);
+    result__2XIH=FALSE__;
+    i__3XIH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__5XIH->count__DD)) {
+      i__3XIH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__3XIH ==  0) || (((__CHARACTER *)Self__5XIH->storage__QMO)[(__INTEGER)(i__3XIH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__QMO)[(__INTEGER)(i__3XIH -  1)])))) {
+        i__3XIH=(__INTEGER)(i__3XIH -  1);
+      };
+      result__2XIH=(i__3XIH ==  0);
+    };
+    if (result__2XIH) {
+      __tmp__HY5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__GS4F->parent_itm_slot__VR5B.argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+      if (((struct ___OBJ *)__tmp__HY5F)->__id==__ITM_ARG__) {
+        shorter_in__44AG(__tmp__HY5F,buf__HS4F);
+      } else {
+        shorter_in__V5AG(__tmp__HY5F,buf__HS4F);
+      };
+      add_last__UHT(buf__HS4F,' ');
+      add_last__UHT(buf__HS4F,'\'');
+      put__to__like__GPDG(Self__GS4F->pretty_name__MYHC,buf__HS4F,(&__string_130));
+      add_last__UHT(buf__HS4F,'\'');
+      if ((Self__GS4F->priority_and_level__BYHC !=  0)) {
+        add_last__UHT(buf__HS4F,' ');
+        result__L1LG=NULL;
+        if ((Self__GS4F->priority_and_level__BYHC >=  0)) {
+          result__L1LG=(&__string_6);
+        } else {
+          result__L1LG=(&__string_5);
+        };
+        put__to__like__GPDG(result__L1LG,buf__HS4F,(&__string_119));
+        add_last__UHT(buf__HS4F,' ');
+        ((__STRING *)string_tmp__VH)->count__EGC= 0;
+        Self__NBMG=Self__GS4F->priority_and_level__BYHC;
+        result__PBMG= 0;
+        if ((Self__NBMG <  0)) {
+          result__PBMG=(__INTEGER)(- Self__NBMG);
+        } else {
+          result__PBMG=Self__NBMG;
+        };
+        Self__UCMG=((__INTEGER_32 )result__PBMG);
+        val__2CMG= 0;
+        i__5CMG= 0;
+        j__ADMG= 0;
+        if ((Self__UCMG ==  0)) {
+          add_last__UHT(((__STRING *)string_tmp__VH),'0');
+        } else {
+          if ((Self__UCMG >  0)) {
+            val__2CMG=Self__UCMG;
+          } else {
+            val__2CMG=(__INTEGER_32)(- Self__UCMG);
+            add_last__UHT(((__STRING *)string_tmp__VH),'-');
+          };
+          i__5CMG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC +  1);
+          while ((val__2CMG !=  0)) {
+            add_last__UHT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__2CMG %  10)) + ((__INTEGER_8 )'0'))))));
+            val__2CMG=(__INTEGER_32)(val__2CMG /  10);
+          };
+          j__ADMG=((__STRING *)string_tmp__VH)->count__EGC;
+          while ((i__5CMG < j__ADMG)) {
+            Self__VTFB=((__STRING *)string_tmp__VH);
+            tmp__YTFB=((__CHARACTER *)Self__VTFB->storage__23R)[(__INTEGER)(i__5CMG -  1)];
+            ((__CHARACTER *)Self__VTFB->storage__23R)[(__INTEGER)(i__5CMG -  1)]=((__CHARACTER *)Self__VTFB->storage__23R)[(__INTEGER)(j__ADMG -  1)];
+            ((__CHARACTER *)Self__VTFB->storage__23R)[(__INTEGER)(j__ADMG -  1)]=tmp__YTFB;
+            j__ADMG=(__INTEGER)(j__ADMG -  1);
+            i__5CMG=(__INTEGER)(i__5CMG +  1);
+          };
+        };
+        put__to__like__GPDG(string_tmp__VH,buf__HS4F,(&__string_119));
+      };
+      add_last__UHT(buf__HS4F,' ');
+      __tmp__3Y5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__GS4F->parent_itm_slot__VR5B.argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 1];
+      if (((struct ___OBJ *)__tmp__3Y5F)->__id==__ITM_ARG__) {
+        shorter_in__44AG(__tmp__3Y5F,buf__HS4F);
+      } else {
+        shorter_in__V5AG(__tmp__3Y5F,buf__HS4F);
+      };
+      add_last__UHT(buf__HS4F,' ');
+    } else {
+      add_last__UHT(buf__HS4F,'\'');
+      put__to__like__GPDG(Self__GS4F->pretty_name__MYHC,buf__HS4F,(&__string_130));
+      add_last__UHT(buf__HS4F,'\'');
+      add_last__UHT(buf__HS4F,' ');
+      __tmp__HZ5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__GS4F->parent_itm_slot__VR5B.argument_list__3BHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+      if (((struct ___OBJ *)__tmp__HZ5F)->__id==__ITM_ARG__) {
+        shorter_in__44AG(__tmp__HZ5F,buf__HS4F);
+      } else {
+        shorter_in__V5AG(__tmp__HZ5F,buf__HS4F);
+      };
+      add_last__UHT(buf__HS4F,' ');
+    };
+  };
+  if (((void *)Self__GS4F->parent_itm_slot__VR5B.result_type__N2FC != (void *)type_void__MTF)) {
+    add_last__UHT(buf__HS4F,':');
+    __tmp__5S4F=Self__GS4F->parent_itm_slot__VR5B.result_type__N2FC;
+    switch (((struct ___OBJ *)__tmp__5S4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__IG4F,buf__QF4F);
+      shorter_in__OIDG(__tmp__5S4F,buf__HS4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__IG4F,buf__QF4F);
+      shorter_in__5IDG(__tmp__5S4F,buf__HS4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__5ODG=((__ITM_TYPE_MULTI *)__tmp__5S4F);
+      add_last__UHT(buf__HS4F,'(');
+      shorter_raw_in__ARFG(Self__5ODG,buf__HS4F);
+      add_last__UHT(buf__HS4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__IG4F,buf__QF4F);
+      shorter_in__QJDG(__tmp__5S4F,buf__HS4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__IG4F,buf__QF4F);
+      shorter_in__YKDG(__tmp__5S4F,buf__HS4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__MSFH=((__ITM_TYPE_STYLE *)__tmp__5S4F);
+      if (((void *)Self__MSFH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__MSFH->style__OUP,buf__HS4F,(&__string_119));
+        add_last__UHT(buf__HS4F,' ');
       };
-      put__to__like__35EG(Self__ZGFH->parent_itm_type_simple__JSN.name__SYP,buf__QF4F,(&__string_125));
+      put__to__like__2OFG(Self__MSFH->parent_itm_type_simple__2NN.name__FUP,buf__HS4F,(&__string_125));
     } break;
     };
   };
 }
 
-static __CHARACTER* create__JMEB(__INTEGER nb_elements__LMEB)
+static __CHARACTER* create__UHEB(__INTEGER nb_elements__WHEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__EYDH,a__QSFH,new_size__FYDH,new_size2__GYDH,a__USFH;
+  __UINTEGER_32 new_size__VSFH;
+  __POINTER result__DYDH,ptr_table__CYIH,next__BYIH,result__DYIH;
+  void *result__GYIH;
+  __INTEGER Self__XSKC;
+  __CHARACTER *Result__W2JB;
+  sz__EYDH=((__UINTEGER_32 )nb_elements__WHEB);
+  result__DYDH=((__POINTER )(NULL));
+  a__QSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__FYDH=(__UINTEGER_32)((__UINTEGER_32)(sz__EYDH + a__QSFH) & (__UINTEGER_32)(~ a__QSFH));
+  new_size2__GYDH=(__UINTEGER_32)(new_size__FYDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__GYDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__USFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VSFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GYDH + a__USFH) & (__UINTEGER_32)(~ a__USFH));
+    ptr_table__CYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BYIH=((__POINTER )(NULL));
+    result__DYIH=((__POINTER *)ptr_table__CYIH)[ 0];
+    if ((result__DYIH == (void *)NULL)) {
+      result__DYIH=new_lab__QOJ(new_size__VSFH);
+      next__BYIH=(void *)((unsigned long)result__DYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSFH)));
+      ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VSFH <<  1)) <=  4096)) {
+          next__BYIH=(void *)((unsigned long)result__DYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VSFH)));
+        } else {
+          next__BYIH=new_lab__QOJ(new_size__VSFH);
+        };
+        ((__POINTER *)next__BYIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CYIH)[ 0]=next__BYIH;
+      } else {
+        ((__POINTER *)result__DYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DYIH=next__BYIH;
+      };
+    };
+    ((__POINTER *)result__DYIH)[ 0]=((__POINTER ) 3);
+    result__DYDH=(void *)((unsigned long)result__DYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GYIH=first_free__VAVB;
+    while ((((void *)result__GYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__FYDH))) {
+      result__GYIH=((__MEMORY *)result__GYIH)->map_next_free__ZTB;
     };
-    if (((void *)result__XNIH == (void *)NULL)) {
-      result__XNIH=new_page__WA5();
+    if (((void *)result__GYIH == (void *)NULL)) {
+      result__GYIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__GYIH,new_size__FYDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GYIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__DYDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__W2JB=((__CHARACTER *)result__DYDH);
+  Self__XSKC=(__INTEGER)(nb_elements__WHEB -  1);
+  while ((Self__XSKC >=  0)) {
+    Result__W2JB[Self__XSKC]='\0';
+    Self__XSKC=(__INTEGER)(Self__XSKC -  1);
   };
-  return(Result__KBKB);
+  return(Result__W2JB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__ZELC(__POINTER p__1ELC,__UINTEGER_32 old_sz__2ELC,__UINTEGER_32 new_sz__3ELC)
+static __POINTER realloc_dynamic__old_size__new_size__XCLC(__POINTER p__ZCLC,__UINTEGER_32 old_sz__0CLC,__UINTEGER_32 new_sz__1CLC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  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;
+  void *mem__GDLC,*result__WYIH,*nxt__3CED,*result__4CED,*result__ZYIH;
+  void *next__LBND,*new_free__KBND,*prev__HUFH,*next__IUFH;
+  __POINTER result__HDLC,result__PYDH,ptr_table__SYIH,next__RYIH;
+  __POINTER result__TYIH,__tmp__LELC,last__YOHD,src__JAED,dst__KAED;
+  __UINTEGER_32 a__GTFH,old_size__3CLC,old_size2__ADLC,a__KTFH;
+  __UINTEGER_32 new_size__DDLC,a__OTFH,new_size__RYDH,new_size2__SYDH;
+  __UINTEGER_32 a__STFH,new_size__TTFH,a__APH,__tmp__YELC,sz__CDED;
+  __UINTEGER_32 old_size__5CED,prev__MBND,new_size__PBND;
+  __INTEGER siz__ITHH,Self__NTHH,siz__OAED,Self__LMHD;
+  __MEMORY *Self__ZCED;
+  __POINTER *na_src__KTHH,*na_dst__MTHH,*na_src__MAED,*na_dst__NAED;
+  mem__GDLC=NULL;
+  result__HDLC=((__POINTER )(NULL));
+  a__GTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__3CLC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__0CLC + a__GTFH) & (__UINTEGER_32)(~ a__GTFH));
+  old_size2__ADLC=(__UINTEGER_32)(old_size__3CLC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__KTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__DDLC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__1CLC + a__KTFH) & (__UINTEGER_32)(~ a__KTFH));
+  if ((old_size2__ADLC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__PYDH=((__POINTER )(NULL));
+    a__OTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__RYDH=(__UINTEGER_32)((__UINTEGER_32)(new_size__DDLC + a__OTFH) & (__UINTEGER_32)(~ a__OTFH));
+    new_size2__SYDH=(__UINTEGER_32)(new_size__RYDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__SYDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__STFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TTFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__SYDH + a__STFH) & (__UINTEGER_32)(~ a__STFH));
+      ptr_table__SYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TTFH / ((__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__QOJ(new_size__TTFH);
+        next__RYIH=(void *)((unsigned long)result__TYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTFH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TTFH <<  1)) <=  4096)) {
+            next__RYIH=(void *)((unsigned long)result__TYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTFH)));
+          } else {
+            next__RYIH=new_lab__QOJ(new_size__TTFH);
+          };
+          ((__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;
+        };
+      };
+      ((__POINTER *)result__TYIH)[ 0]=((__POINTER ) 3);
+      result__PYDH=(void *)((unsigned long)result__TYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__WYIH=first_free__VAVB;
+      while ((((void *)result__WYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__WYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__RYDH))) {
+        result__WYIH=((__MEMORY *)result__WYIH)->map_next_free__ZTB;
+      };
+      if (((void *)result__WYIH == (void *)NULL)) {
+        result__WYIH=new_page__B24();
+      };
+      to_busy__index__KRFC(result__WYIH,new_size__RYDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__WYIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+      result__PYDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__WYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__HDLC=result__PYDH;
+    siz__ITHH=((__INTEGER )old_size__3CLC);
+    siz__ITHH=(__INTEGER)(siz__ITHH / ((__INTEGER )(sizeof(void *))));
+    na_src__KTHH=((__POINTER *)p__ZCLC);
+    na_dst__MTHH=((__POINTER *)result__PYDH);
+    Self__NTHH=(__INTEGER)(siz__ITHH -  1);
+    while ((Self__NTHH >=  0)) {
+      na_dst__MTHH[Self__NTHH]=na_src__KTHH[Self__NTHH];
+      Self__NTHH=(__INTEGER)(Self__NTHH -  1);
+    };
+    __tmp__LELC=(void *)((unsigned long)p__ZCLC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__APH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__YOHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__ADLC + a__APH) & (__UINTEGER_32)(~ a__APH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__LELC)[ 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__YOHD)[ 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__YOHD)[ 0]=__tmp__LELC;
   } else {
-    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);
+    mem__GDLC=((void *)(void *)((unsigned long)p__ZCLC - (unsigned long)((__POINTER ) 8)));
+    __tmp__YELC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__ZCLC - (unsigned long)begin_memory__3SH)))) >>  26);
+    Self__ZCED=((__MEMORY *)mem__GDLC);
+    nxt__3CED=NULL;
+    result__4CED=NULL;
+    sz__CDED= 0;
+    old_size__5CED=(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967292LU);
+    if ((new_size__DDLC > old_size__5CED)) {
+      if ((! ((__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  2) !=  0))) {
+        nxt__3CED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967292LU)))));
+        sz__CDED=(__UINTEGER_32)((__UINTEGER_32)(new_size__DDLC - old_size__5CED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__YTB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__YTB &  4294967292LU) >= sz__CDED))) {
+          to_busy__index__KRFC(nxt__3CED,sz__CDED,__tmp__YELC);
+          Self__ZCED->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB + (__UINTEGER_32)(((__MEMORY *)nxt__3CED)->map_size_and_id__YTB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  2) !=  0)) {
+            last_block[(__tmp__YELC)] = (Self__ZCED);
+          } else {
+            nxt__3CED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967292LU)))));
+            ((__MEMORY *)nxt__3CED)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)begin_memory__3SH))));
+          };
+          result__4CED=Self__ZCED;
+        };
+      };
+      if (((void *)result__4CED == (void *)NULL)) {
+        result__ZYIH=first_free__VAVB;
+        while ((((void *)result__ZYIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__ZYIH)->map_size_and_id__YTB &  4294967292LU) < new_size__DDLC))) {
+          result__ZYIH=((__MEMORY *)result__ZYIH)->map_next_free__ZTB;
+        };
+        if (((void *)result__ZYIH == (void *)NULL)) {
+          result__ZYIH=new_page__B24();
+        };
+        to_busy__index__KRFC(result__ZYIH,new_size__DDLC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZYIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+        result__4CED=result__ZYIH;
+        src__JAED=(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__KAED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__ZYIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__OAED=((__INTEGER )old_size__5CED);
+        siz__OAED=(__INTEGER)(siz__OAED / ((__INTEGER )(sizeof(void *))));
+        na_src__MAED=((__POINTER *)src__JAED);
+        na_dst__NAED=((__POINTER *)dst__KAED);
+        Self__LMHD=(__INTEGER)(siz__OAED -  1);
+        while ((Self__LMHD >=  0)) {
+          na_dst__NAED[Self__LMHD]=na_src__MAED[Self__LMHD];
+          Self__LMHD=(__INTEGER)(Self__LMHD -  1);
+        };
+        prev__MBND=Self__ZCED->map_previous_linear__XTB;
+        next__LBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967292LU)))));
+        new_free__KBND=((void *)(void *)((unsigned long)begin_memory__3SH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__MBND))));
+        new_size__PBND=(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967294LU);
+        if (((prev__MBND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__KBND)->map_size_and_id__YTB &  1) !=  0))) {
+          new_free__KBND=Self__ZCED;
+          Self__ZCED->map_next_free__ZTB=first_free__VAVB;
+          Self__ZCED->map_previous_free__0TB=NULL;
+          if (((void *)first_free__VAVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__VAVB)->map_previous_free__0TB=Self__ZCED;
+          };
+          first_free__VAVB=Self__ZCED;
+        } else {
+          new_size__PBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__PBND + ((__MEMORY *)new_free__KBND)->map_size_and_id__YTB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__LBND)->map_size_and_id__YTB &  1) ==  0))) {
+          new_size__PBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__PBND + ((__MEMORY *)next__LBND)->map_size_and_id__YTB) +  8);
+          prev__HUFH=((__MEMORY *)next__LBND)->map_previous_free__0TB;
+          next__IUFH=((__MEMORY *)next__LBND)->map_next_free__ZTB;
+          if (((void *)prev__HUFH == (void *)NULL)) {
+            first_free__VAVB=next__IUFH;
+          } else {
+            ((__MEMORY *)prev__HUFH)->map_next_free__ZTB=next__IUFH;
+          };
+          if (((void *)next__IUFH != (void *)NULL)) {
+            ((__MEMORY *)next__IUFH)->map_previous_free__0TB=prev__HUFH;
+          };
+        };
+        ((__MEMORY *)new_free__KBND)->map_size_and_id__YTB=new_size__PBND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__KBND)->map_size_and_id__YTB &  2) !=  0)) {
+          last_block[(__tmp__YELC)] = (new_free__KBND);
+        } else {
+          next__LBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__ZCED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__ZCED->map_size_and_id__YTB &  4294967292LU)))));
+          ((__MEMORY *)next__LBND)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__KBND) - (unsigned long)begin_memory__3SH))));
+        };
+      };
+    } else {
+      result__4CED=Self__ZCED;
+    };
+    result__HDLC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4CED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__HDLC);
 }
 
-static void** create__1BRB(__INTEGER nb_elements__3BRB)
+static void** create__R4QB(__INTEGER nb_elements__T4QB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1YDH,a__AZDH,new_size__2YDH,new_size2__3YDH,a__GVFH;
+  __UINTEGER_32 new_size__HVFH;
+  __POINTER result__0YDH,ptr_table__3YIH,next__2YIH,result__4YIH;
+  void *result__BZIH;
+  __INTEGER Self__K3MC;
+  void **Result__Z1TB;
+  sz__1YDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__T4QB * ((__INTEGER )(sizeof(void *)))));
+  result__0YDH=((__POINTER )(NULL));
+  a__AZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2YDH=(__UINTEGER_32)((__UINTEGER_32)(sz__1YDH + a__AZDH) & (__UINTEGER_32)(~ a__AZDH));
+  new_size2__3YDH=(__UINTEGER_32)(new_size__2YDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3YDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__GVFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HVFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3YDH + a__GVFH) & (__UINTEGER_32)(~ a__GVFH));
+    ptr_table__3YIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HVFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__2YIH=((__POINTER )(NULL));
+    result__4YIH=((__POINTER *)ptr_table__3YIH)[ 0];
+    if ((result__4YIH == (void *)NULL)) {
+      result__4YIH=new_lab__QOJ(new_size__HVFH);
+      next__2YIH=(void *)((unsigned long)result__4YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVFH)));
+      ((__POINTER *)next__2YIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__3YIH)[ 0]=next__2YIH;
+    } else {
+      next__2YIH=((__POINTER *)result__4YIH)[ 0];
+      if ((next__2YIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4YIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HVFH <<  1)) <=  4096)) {
+          next__2YIH=(void *)((unsigned long)result__4YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HVFH)));
+        } else {
+          next__2YIH=new_lab__QOJ(new_size__HVFH);
+        };
+        ((__POINTER *)next__2YIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3YIH)[ 0]=next__2YIH;
+      } else {
+        ((__POINTER *)result__4YIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2YIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__4YIH=next__2YIH;
+      };
+    };
+    ((__POINTER *)result__4YIH)[ 0]=((__POINTER ) 3);
+    result__0YDH=(void *)((unsigned long)result__4YIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__BZIH=first_free__VAVB;
+    while ((((void *)result__BZIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__BZIH)->map_size_and_id__YTB &  4294967292LU) < new_size__2YDH))) {
+      result__BZIH=((__MEMORY *)result__BZIH)->map_next_free__ZTB;
     };
-    if (((void *)result__SOIH == (void *)NULL)) {
-      result__SOIH=new_page__WA5();
+    if (((void *)result__BZIH == (void *)NULL)) {
+      result__BZIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__BZIH,new_size__2YDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__BZIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__0YDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__BZIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__Z1TB=((void **)result__0YDH);
+  Self__K3MC=(__INTEGER)(nb_elements__T4QB -  1);
+  while ((Self__K3MC >=  0)) {
+    Result__Z1TB[Self__K3MC]=NULL;
+    Self__K3MC=(__INTEGER)(Self__K3MC -  1);
   };
-  return(Result__D5TB);
+  return(Result__Z1TB);
 }
 
-static void* fast_reference_at__A2T(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__B2T,void *k__C2T)
+static void* fast_reference_at__TXT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UXT,void *k__VXT)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__AYT;
+  __STRING_CONSTANT *Self__0THH;
+  __INTEGER result__ZTHH,__tmp__1THH,Self__2THH;
+  void *node__5XT;
+  result__AYT=NULL;
+  Self__0THH=((__STRING_CONSTANT *)k__VXT);
+  result__ZTHH= 0;
+  __tmp__1THH=Self__0THH->count__DD;
+  Self__2THH= 1;
+  while ((Self__2THH <= __tmp__1THH)) {
+    result__ZTHH=(__INTEGER)((__INTEGER)( 5 * result__ZTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__0THH->storage__QMO)[(__INTEGER)(Self__2THH -  1)])));
+    Self__2THH=(__INTEGER)(Self__2THH +  1);
+  };
+  if ((result__ZTHH <  0)) {
+    result__ZTHH=(__INTEGER)(~ result__ZTHH);
+  };
+  node__5XT=((void **)Self__UXT->buckets__HYT)[(__INTEGER)(result__ZTHH % Self__UXT->capacity__CYT)];
+  while ((! (((void *)node__5XT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5XT)->key__TYT == (void *)k__VXT)))) {
+    node__5XT=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5XT)->next__4YT;
+  };
+  if (((void *)node__5XT != (void *)NULL)) {
+    result__AYT=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__5XT)->item__GZT;
+  };
+  return(result__AYT);
 }
 
-static void** create__OJHE(__INTEGER nb_elements__QJHE)
+static void** create__5HHE(__INTEGER nb_elements__BIHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DZDH,a__IZDH,new_size__EZDH,new_size2__FZDH,a__HWFH;
+  __UINTEGER_32 new_size__IWFH;
+  __POINTER result__CZDH,ptr_table__FZIH,next__EZIH,result__GZIH;
+  void *result__JZIH;
+  __INTEGER Self__5MYE;
+  void **Result__OXME;
+  sz__DZDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BIHE * ((__INTEGER )(sizeof(void *)))));
+  result__CZDH=((__POINTER )(NULL));
+  a__IZDH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EZDH=(__UINTEGER_32)((__UINTEGER_32)(sz__DZDH + a__IZDH) & (__UINTEGER_32)(~ a__IZDH));
+  new_size2__FZDH=(__UINTEGER_32)(new_size__EZDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FZDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__HWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__IWFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FZDH + a__HWFH) & (__UINTEGER_32)(~ a__HWFH));
+    ptr_table__FZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IWFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__EZIH=((__POINTER )(NULL));
+    result__GZIH=((__POINTER *)ptr_table__FZIH)[ 0];
+    if ((result__GZIH == (void *)NULL)) {
+      result__GZIH=new_lab__QOJ(new_size__IWFH);
+      next__EZIH=(void *)((unsigned long)result__GZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWFH)));
+      ((__POINTER *)next__EZIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__FZIH)[ 0]=next__EZIH;
+    } else {
+      next__EZIH=((__POINTER *)result__GZIH)[ 0];
+      if ((next__EZIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GZIH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IWFH <<  1)) <=  4096)) {
+          next__EZIH=(void *)((unsigned long)result__GZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWFH)));
+        } else {
+          next__EZIH=new_lab__QOJ(new_size__IWFH);
+        };
+        ((__POINTER *)next__EZIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FZIH)[ 0]=next__EZIH;
+      } else {
+        ((__POINTER *)result__GZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__GZIH=next__EZIH;
+      };
+    };
+    ((__POINTER *)result__GZIH)[ 0]=((__POINTER ) 3);
+    result__CZDH=(void *)((unsigned long)result__GZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__JZIH=first_free__VAVB;
+    while ((((void *)result__JZIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JZIH)->map_size_and_id__YTB &  4294967292LU) < new_size__EZDH))) {
+      result__JZIH=((__MEMORY *)result__JZIH)->map_next_free__ZTB;
     };
-    if (((void *)result__0OIH == (void *)NULL)) {
-      result__0OIH=new_page__WA5();
+    if (((void *)result__JZIH == (void *)NULL)) {
+      result__JZIH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__JZIH,new_size__EZDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JZIH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__CZDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JZIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__OXME=((void **)result__CZDH);
+  Self__5MYE=(__INTEGER)(nb_elements__BIHE -  1);
+  while ((Self__5MYE >=  0)) {
+    Result__OXME[Self__5MYE]=NULL;
+    Self__5MYE=(__INTEGER)(Self__5MYE -  1);
   };
-  return(Result__LZME);
+  return(Result__OXME);
 }
 
-static __BOOLEAN has__DQW(__HASHED_SEToABSTRACT_STRINGo *Self__EQW,void *e__FQW)
+static __BOOLEAN has__OLW(__HASHED_SEToABSTRACT_STRINGo *Self__PLW,void *e__QLW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER result__4THH,__tmp__AUHH,Self__BUHH;
+  void *node__ZLW;
+  result__4THH= 0;
+  __tmp__AUHH=((__STRING_CONSTANT *)e__QLW)->count__DD;
+  Self__BUHH= 1;
+  while ((Self__BUHH <= __tmp__AUHH)) {
+    result__4THH=(__INTEGER)((__INTEGER)( 5 * result__4THH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__QLW)->storage__QMO)[(__INTEGER)(Self__BUHH -  1)])));
+    Self__BUHH=(__INTEGER)(Self__BUHH +  1);
+  };
+  if ((result__4THH <  0)) {
+    result__4THH=(__INTEGER)(~ result__4THH);
+  };
+  node__ZLW=((void **)Self__PLW->buckets__ZUR)[(__INTEGER)(result__4THH % Self__PLW->capacity__UUR)];
+  while ((! (((void *)node__ZLW == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZLW)->item__FVR,e__QLW)))) {
+    node__ZLW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZLW)->next__RVR;
+  };
+  return(((void *)node__ZLW != (void *)NULL));
 }
 
-static void increase_capacity__GSNB(__HASHED_SEToABSTRACT_STRINGo *Self__HSNB)
+static void increase_capacity__SNNB(__HASHED_SEToABSTRACT_STRINGo *Self__TNNB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER idx__VNNB,new_capacity__WNNB,i__UNNB,result__DUHH;
+  __INTEGER __tmp__FUHH,Self__GUHH;
+  __STRING_CONSTANT *Self__EUHH;
+  void *node1__YNNB,*node2__ZNNB;
+  void **old_buckets__XNNB;
+  idx__VNNB= 0;
+  node1__YNNB=NULL;
+  node2__ZNNB=NULL;
+  new_capacity__WNNB=prime_number_ceiling__K01((__INTEGER)(Self__TNNB->capacity__UUR +  1));
+  old_buckets__XNNB=Self__TNNB->buckets__ZUR;
+  Self__TNNB->buckets__ZUR=create__UF2(new_capacity__WNNB);
+  i__UNNB=(__INTEGER)(Self__TNNB->capacity__UUR -  1);
+  Self__TNNB->capacity__UUR=new_capacity__WNNB;
+  while ((i__UNNB >=  0)) {
+    node1__YNNB=((void **)old_buckets__XNNB)[i__UNNB];
+    while (((void *)node1__YNNB != (void *)NULL)) {
+      node2__ZNNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YNNB)->next__RVR;
+      Self__EUHH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YNNB)->item__FVR);
+      result__DUHH= 0;
+      __tmp__FUHH=Self__EUHH->count__DD;
+      Self__GUHH= 1;
+      while ((Self__GUHH <= __tmp__FUHH)) {
+        result__DUHH=(__INTEGER)((__INTEGER)( 5 * result__DUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EUHH->storage__QMO)[(__INTEGER)(Self__GUHH -  1)])));
+        Self__GUHH=(__INTEGER)(Self__GUHH +  1);
+      };
+      if ((result__DUHH <  0)) {
+        result__DUHH=(__INTEGER)(~ result__DUHH);
+      };
+      idx__VNNB=(__INTEGER)(result__DUHH % Self__TNNB->capacity__UUR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__YNNB)->next__RVR=((void **)Self__TNNB->buckets__ZUR)[idx__VNNB];
+      ((void **)Self__TNNB->buckets__ZUR)[idx__VNNB]=node1__YNNB;
+      node1__YNNB=node2__ZNNB;
+    };
+    i__UNNB=(__INTEGER)(i__UNNB -  1);
   };
 }
 
-static void put_string__AIF(void *s__CIF)
+static void put_string__WEF(void *s__YEF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__TIF,Self__HBG,limit_up__IBG;
-  __CHARACTER __tmp__0IF;
-  if (((struct ___OBJ *)s__CIF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__JFF,Self__N4F,limit_up__O4F;
+  __CHARACTER __tmp__QFF;
+  if (((struct ___OBJ *)s__YEF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__CIF)->__id==__STRING_CONSTANT__) {
-    __tmp__TIF=((__STRING_CONSTANT *)s__CIF)->count__DD;
+  if (((struct ___OBJ *)s__YEF)->__id==__STRING_CONSTANT__) {
+    __tmp__JFF=((__STRING_CONSTANT *)s__YEF)->count__DD;
   } else {
-    __tmp__TIF=((__STRING *)s__CIF)->count__4FC;
+    __tmp__JFF=((__STRING *)s__YEF)->count__EGC;
   };
-  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)];
+  Self__N4F= 1;
+  limit_up__O4F=__tmp__JFF;
+  while ((Self__N4F <= limit_up__O4F)) {
+    if (((struct ___OBJ *)s__YEF)->__id==__STRING_CONSTANT__) {
+      __tmp__QFF=((__CHARACTER *)((__STRING_CONSTANT *)s__YEF)->storage__QMO)[(__INTEGER)(Self__N4F -  1)];
     } else {
-      __tmp__0IF=((__CHARACTER *)((__STRING *)s__CIF)->storage__JCS)[(__INTEGER)(Self__HBG -  1)];
+      __tmp__QFF=((__CHARACTER *)((__STRING *)s__YEF)->storage__23R)[(__INTEGER)(Self__N4F -  1)];
     };
-    fputc((int)(__tmp__0IF),stdout);
-    Self__HBG=(__INTEGER)(Self__HBG +  1);
+    fputc((int)(__tmp__QFF),stdout);
+    Self__N4F=(__INTEGER)(Self__N4F +  1);
   };
 }
 
-static __BOOLEAN fast_has__WAY(__HASHED_SEToABSTRACT_STRINGo *Self__XAY,void *e__YAY)
+static __BOOLEAN fast_has__B2X(__HASHED_SEToABSTRACT_STRINGo *Self__C2X,void *e__D2X)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__JUHH;
+  __INTEGER result__IUHH,__tmp__KUHH,Self__LUHH;
+  void *node__M2X;
+  Self__JUHH=((__STRING_CONSTANT *)e__D2X);
+  result__IUHH= 0;
+  __tmp__KUHH=Self__JUHH->count__DD;
+  Self__LUHH= 1;
+  while ((Self__LUHH <= __tmp__KUHH)) {
+    result__IUHH=(__INTEGER)((__INTEGER)( 5 * result__IUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JUHH->storage__QMO)[(__INTEGER)(Self__LUHH -  1)])));
+    Self__LUHH=(__INTEGER)(Self__LUHH +  1);
+  };
+  if ((result__IUHH <  0)) {
+    result__IUHH=(__INTEGER)(~ result__IUHH);
+  };
+  node__M2X=((void **)Self__C2X->buckets__ZUR)[(__INTEGER)(result__IUHH % Self__C2X->capacity__UUR)];
+  while ((! (((void *)node__M2X == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__M2X)->item__FVR == (void *)e__D2X)))) {
+    node__M2X=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__M2X)->next__RVR;
+  };
+  return(((void *)node__M2X != (void *)NULL));
 }
 
-static void* physical_get_entry__RCF(void *new_path__TCF)
+static void* physical_get_entry__H5E(void *new_path__J5E)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__M5E;
+  __STRING *Self__3WFH;
+  __FILE_UNIX *result__MZIH;
+  __POINTER ptr__NZIH,ptr_table__VZIH,next__UZIH,result__WZIH;
+  __POINTER ptr_table__0ZIH,next__ZZIH,result__1ZIH,ptr__5ZIH;
+  __POINTER ptr_table__H0IH,next__G0IH,result__I0IH,ptr_table__M0IH;
+  __POINTER next__L0IH,result__N0IH;
+  __INTEGER typ_id__OZIH,typ_id__A0IH;
+  __UINTEGER_32 sz__PZIH,a__QZIH,new_size__RZIH,t__SZIH,a__TZIH;
+  __UINTEGER_32 new_size__3ZIH,lab_type__2ZIH,sz__B0IH,a__C0IH;
+  __UINTEGER_32 new_size__D0IH,t__E0IH,a__F0IH,new_size__P0IH;
+  __UINTEGER_32 lab_type__O0IH;
+  __DIRECTORY_UNIX *result__4ZIH;
+  void *__tmp__FAF;
+  __CHARACTER *pe__L5E;
+  result__M5E=NULL;
+  Self__3WFH=((__STRING *)new_path__J5E);
+  if ((Self__3WFH->capacity__T3R > Self__3WFH->count__EGC)) {
+    ((__CHARACTER *)Self__3WFH->storage__23R)[Self__3WFH->count__EGC]='\0';
   } else {
-    add_last__BMT(Self__KLFH,'\0');
-    Self__KLFH->count__4FC=(__INTEGER)(Self__KLFH->count__4FC -  1);
+    add_last__UHT(Self__3WFH,'\0');
+    Self__3WFH->count__EGC=(__INTEGER)(Self__3WFH->count__EGC -  1);
   };
-  pe__VCF=Self__KLFH->storage__JCS;
+  pe__L5E=Self__3WFH->storage__23R;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__VCF),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__L5E),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__MZIH=NULL;
+      ptr__NZIH=((__POINTER )(NULL));
+      typ_id__OZIH= 0;
+      sz__PZIH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__PZIH ==  0)) {
+        result__MZIH=FILE_UNIX__;
+      } else {
+        typ_id__OZIH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PZIH);
+        if ((typ_id__OZIH == (__INTEGER)(-  1))) {
+          a__QZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__RZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PZIH + a__QZIH) & (__UINTEGER_32)(~ a__QZIH));
+          ptr_table__VZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RZIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__UZIH=((__POINTER )(NULL));
+          result__WZIH=((__POINTER *)ptr_table__VZIH)[ 0];
+          if ((result__WZIH == (void *)NULL)) {
+            result__WZIH=new_lab__QOJ(new_size__RZIH);
+            next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZIH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RZIH <<  1)) <=  4096)) {
+                next__UZIH=(void *)((unsigned long)result__WZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RZIH)));
               } else {
-                next__FPIH=new_lab__URJ(new_size__CPIH);
+                next__UZIH=new_lab__QOJ(new_size__RZIH);
               };
-              ((__POINTER *)next__FPIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GPIH)[ 0]=next__FPIH;
+              ((__POINTER *)next__UZIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__WZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WZIH=next__UZIH;
+            };
+          };
+          ptr__NZIH=result__WZIH;
+        } else {
+          t__SZIH=((__UINTEGER_32 )typ_id__OZIH);
+          a__TZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__3ZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__PZIH + a__TZIH) & (__UINTEGER_32)(~ a__TZIH));
+          ptr_table__0ZIH=((__POINTER )(&(table_type[(t__SZIH)])));
+          lab_type__2ZIH=(__UINTEGER_32)(t__SZIH |  1);
+          next__ZZIH=((__POINTER )(NULL));
+          result__1ZIH=((__POINTER *)ptr_table__0ZIH)[ 0];
+          if ((result__1ZIH == (void *)NULL)) {
+            result__1ZIH=new_lab__QOJ(lab_type__2ZIH);
+            next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZIH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3ZIH <<  1)) <=  4096)) {
+                next__ZZIH=(void *)((unsigned long)result__1ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3ZIH)));
               } else {
-                next__KPIH=new_lab__URJ(lab_type__NPIH);
+                next__ZZIH=new_lab__QOJ(lab_type__2ZIH);
               };
-              ((__POINTER *)next__KPIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LPIH)[ 0]=next__KPIH;
+              ((__POINTER *)next__ZZIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__1ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1ZIH=next__ZZIH;
+            };
+          };
+          ptr__NZIH=result__1ZIH;
+        };
+        result__MZIH=((__FILE_UNIX *)ptr__NZIH);
+        *(result__MZIH) = *(FILE_UNIX__);
+      };
+      result__M5E=result__MZIH;
+    } else {
+      result__4ZIH=NULL;
+      ptr__5ZIH=((__POINTER )(NULL));
+      typ_id__A0IH= 0;
+      sz__B0IH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__B0IH ==  0)) {
+        result__4ZIH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__A0IH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B0IH);
+        if ((typ_id__A0IH == (__INTEGER)(-  1))) {
+          a__C0IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__D0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__B0IH + a__C0IH) & (__UINTEGER_32)(~ a__C0IH));
+          ptr_table__H0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D0IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__G0IH=((__POINTER )(NULL));
+          result__I0IH=((__POINTER *)ptr_table__H0IH)[ 0];
+          if ((result__I0IH == (void *)NULL)) {
+            result__I0IH=new_lab__QOJ(new_size__D0IH);
+            next__G0IH=(void *)((unsigned long)result__I0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0IH)));
+            ((__POINTER *)next__G0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__H0IH)[ 0]=next__G0IH;
+          } else {
+            next__G0IH=((__POINTER *)result__I0IH)[ 0];
+            if ((next__G0IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I0IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__D0IH <<  1)) <=  4096)) {
+                next__G0IH=(void *)((unsigned long)result__I0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D0IH)));
               } else {
-                next__XPIH=new_lab__URJ(new_size__UPIH);
+                next__G0IH=new_lab__QOJ(new_size__D0IH);
               };
-              ((__POINTER *)next__XPIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YPIH)[ 0]=next__XPIH;
+              ((__POINTER *)next__G0IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H0IH)[ 0]=next__G0IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__I0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__I0IH=next__G0IH;
+            };
+          };
+          ptr__5ZIH=result__I0IH;
+        } else {
+          t__E0IH=((__UINTEGER_32 )typ_id__A0IH);
+          a__F0IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__B0IH + a__F0IH) & (__UINTEGER_32)(~ a__F0IH));
+          ptr_table__M0IH=((__POINTER )(&(table_type[(t__E0IH)])));
+          lab_type__O0IH=(__UINTEGER_32)(t__E0IH |  1);
+          next__L0IH=((__POINTER )(NULL));
+          result__N0IH=((__POINTER *)ptr_table__M0IH)[ 0];
+          if ((result__N0IH == (void *)NULL)) {
+            result__N0IH=new_lab__QOJ(lab_type__O0IH);
+            next__L0IH=(void *)((unsigned long)result__N0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P0IH)));
+            ((__POINTER *)next__L0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__M0IH)[ 0]=next__L0IH;
+          } else {
+            next__L0IH=((__POINTER *)result__N0IH)[ 0];
+            if ((next__L0IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N0IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__P0IH <<  1)) <=  4096)) {
+                next__L0IH=(void *)((unsigned long)result__N0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P0IH)));
               } else {
-                next__2PIH=new_lab__URJ(lab_type__5PIH);
+                next__L0IH=new_lab__QOJ(lab_type__O0IH);
               };
-              ((__POINTER *)next__2PIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3PIH)[ 0]=next__2PIH;
+              ((__POINTER *)next__L0IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__M0IH)[ 0]=next__L0IH;
             } else {
-              ((__POINTER *)result__4PIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2PIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4PIH=next__2PIH;
+              ((__POINTER *)result__N0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__N0IH=next__L0IH;
             };
           };
-          ptr__QPIH=result__4PIH;
+          ptr__5ZIH=result__N0IH;
         };
-        result__PPIH=((__DIRECTORY_UNIX *)ptr__QPIH);
-        *(result__PPIH) = *(DIRECTORY_UNIX__);
+        result__4ZIH=((__DIRECTORY_UNIX *)ptr__5ZIH);
+        *(result__4ZIH) = *(DIRECTORY_UNIX__);
       };
-      result__WCF=result__PPIH;
+      result__M5E=result__4ZIH;
     };
-    if (((struct ___OBJ *)result__WCF)->__id==__DIRECTORY_UNIX__) {
-      set_path__WNT(result__WCF,new_path__TCF);
+    if (((struct ___OBJ *)result__M5E)->__id==__DIRECTORY_UNIX__) {
+      set_path__JJT(result__M5E,new_path__J5E);
     } else {
-      set_path__ROT(result__WCF,new_path__TCF);
+      set_path__EKT(result__M5E,new_path__J5E);
     };
-    if (((struct ___OBJ *)result__WCF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__PDF=((__DIRECTORY_UNIX *)result__WCF)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
+    if (((struct ___OBJ *)result__M5E)->__id==__DIRECTORY_UNIX__) {
+      __tmp__FAF=((__DIRECTORY_UNIX *)result__M5E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__PDF=((__FILE_UNIX *)result__WCF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+      __tmp__FAF=((__FILE_UNIX *)result__M5E)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
     };
-    put__to__Z0S(alias__MFD,result__WCF,__tmp__PDF);
+    put__to__MWS(alias__RFD,result__M5E,__tmp__FAF);
   };
   };
-  return(result__WCF);
+  return(result__M5E);
 }
 
-static void put__to__Z0S(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__00S,void *v__10S,void *k__20S)
+static void put__to__MWS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NWS,void *v__OWS,void *k__PWS)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__OUHH,*Self__TUHH;
+  __INTEGER result__NUHH,__tmp__PUHH,Self__QUHH,idx__XWS,idx__0JOB;
+  __INTEGER new_capacity__1JOB,i__2JOB,result__SUHH,__tmp__UUHH;
+  __INTEGER Self__VUHH,typ_id__KMOB;
+  __POINTER ptr__FMOB,ptr_table__R0IH,next__Q0IH,result__S0IH;
+  __POINTER ptr_table__W0IH,next__V0IH,result__X0IH;
+  __UINTEGER_32 sz__HMOB,a__RXFH,new_size__SXFH,t__WXFH,a__VXFH;
+  __UINTEGER_32 new_size__Z0IH,lab_type__Y0IH;
+  void *node__ZWS,*node1__4JOB,*node2__5JOB,*__tmp__OYS;
+  void **old_buckets__3JOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__EMOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__3VDC;
+  Self__OUHH=((__STRING_CONSTANT *)k__PWS);
+  result__NUHH= 0;
+  __tmp__PUHH=Self__OUHH->count__DD;
+  Self__QUHH= 1;
+  while ((Self__QUHH <= __tmp__PUHH)) {
+    result__NUHH=(__INTEGER)((__INTEGER)( 5 * result__NUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OUHH->storage__QMO)[(__INTEGER)(Self__QUHH -  1)])));
+    Self__QUHH=(__INTEGER)(Self__QUHH +  1);
+  };
+  if ((result__NUHH <  0)) {
+    result__NUHH=(__INTEGER)(~ result__NUHH);
+  };
+  idx__XWS=(__INTEGER)(result__NUHH % Self__NWS->capacity__1WS);
+  node__ZWS=((void **)Self__NWS->buckets__AXS)[idx__XWS];
+  while ((! (((void *)node__ZWS == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__ZWS)->key__MXS,k__PWS)))) {
+    node__ZWS=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__ZWS)->next__YXS;
+  };
+  if (((void *)node__ZWS == (void *)NULL)) {
+    if ((Self__NWS->capacity__1WS == Self__NWS->count__BYS)) {
+      idx__0JOB= 0;
+      node1__4JOB=NULL;
+      node2__5JOB=NULL;
+      old_buckets__3JOB=Self__NWS->buckets__AXS;
+      new_capacity__1JOB=prime_number_ceiling__K01((__INTEGER)(Self__NWS->capacity__1WS +  1));
+      Self__NWS->buckets__AXS=create__K33(new_capacity__1JOB);
+      i__2JOB=(__INTEGER)(Self__NWS->capacity__1WS -  1);
+      Self__NWS->capacity__1WS=new_capacity__1JOB;
+      while ((i__2JOB >=  0)) {
+        node1__4JOB=((void **)old_buckets__3JOB)[i__2JOB];
+        while (((void *)node1__4JOB != (void *)NULL)) {
+          node2__5JOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4JOB)->next__YXS;
+          Self__TUHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4JOB)->key__MXS);
+          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__QMO)[(__INTEGER)(Self__VUHH -  1)])));
+            Self__VUHH=(__INTEGER)(Self__VUHH +  1);
+          };
+          if ((result__SUHH <  0)) {
+            result__SUHH=(__INTEGER)(~ result__SUHH);
+          };
+          idx__0JOB=(__INTEGER)(result__SUHH % Self__NWS->capacity__1WS);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__4JOB)->next__YXS=((void **)Self__NWS->buckets__AXS)[idx__0JOB];
+          ((void **)Self__NWS->buckets__AXS)[idx__0JOB]=node1__4JOB;
+          node1__4JOB=node2__5JOB;
+        };
+        i__2JOB=(__INTEGER)(i__2JOB -  1);
+      };
+      idx__XWS=(__INTEGER)(result__NUHH % new_capacity__1JOB);
+    };
+    __tmp__OYS=((void **)Self__NWS->buckets__AXS)[idx__XWS];
+    result__EMOB=NULL;
+    ptr__FMOB=((__POINTER )(NULL));
+    typ_id__KMOB= 0;
+    sz__HMOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__HMOB ==  0)) {
+      result__EMOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__KMOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HMOB);
+      if ((typ_id__KMOB == (__INTEGER)(-  1))) {
+        a__RXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SXFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMOB + a__RXFH) & (__UINTEGER_32)(~ a__RXFH));
+        ptr_table__R0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SXFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__Q0IH=((__POINTER )(NULL));
+        result__S0IH=((__POINTER *)ptr_table__R0IH)[ 0];
+        if ((result__S0IH == (void *)NULL)) {
+          result__S0IH=new_lab__QOJ(new_size__SXFH);
+          next__Q0IH=(void *)((unsigned long)result__S0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SXFH)));
+          ((__POINTER *)next__Q0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__R0IH)[ 0]=next__Q0IH;
+        } else {
+          next__Q0IH=((__POINTER *)result__S0IH)[ 0];
+          if ((next__Q0IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S0IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SXFH <<  1)) <=  4096)) {
+              next__Q0IH=(void *)((unsigned long)result__S0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SXFH)));
             } else {
-              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)));
+              next__Q0IH=new_lab__QOJ(new_size__SXFH);
+            };
+            ((__POINTER *)next__Q0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__R0IH)[ 0]=next__Q0IH;
+          } else {
+            ((__POINTER *)result__S0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__S0IH=next__Q0IH;
+          };
+        };
+        ptr__FMOB=result__S0IH;
+      } else {
+        t__WXFH=((__UINTEGER_32 )typ_id__KMOB);
+        a__VXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Z0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMOB + a__VXFH) & (__UINTEGER_32)(~ a__VXFH));
+        ptr_table__W0IH=((__POINTER )(&(table_type[(t__WXFH)])));
+        lab_type__Y0IH=(__UINTEGER_32)(t__WXFH |  1);
+        next__V0IH=((__POINTER )(NULL));
+        result__X0IH=((__POINTER *)ptr_table__W0IH)[ 0];
+        if ((result__X0IH == (void *)NULL)) {
+          result__X0IH=new_lab__QOJ(lab_type__Y0IH);
+          next__V0IH=(void *)((unsigned long)result__X0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z0IH)));
+          ((__POINTER *)next__V0IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__W0IH)[ 0]=next__V0IH;
+        } else {
+          next__V0IH=((__POINTER *)result__X0IH)[ 0];
+          if ((next__V0IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X0IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Z0IH <<  1)) <=  4096)) {
+              next__V0IH=(void *)((unsigned long)result__X0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z0IH)));
             } else {
-              next__GQIH=new_lab__URJ(lab_type__JQIH);
+              next__V0IH=new_lab__QOJ(lab_type__Y0IH);
             };
-            ((__POINTER *)next__GQIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HQIH)[ 0]=next__GQIH;
+            ((__POINTER *)next__V0IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__W0IH)[ 0]=next__V0IH;
           } else {
-            ((__POINTER *)result__IQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IQIH=next__GQIH;
+            ((__POINTER *)result__X0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__X0IH=next__V0IH;
           };
         };
-        ptr__ZQOB=result__IQIH;
+        ptr__FMOB=result__X0IH;
       };
-      result__YQOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__ZQOB);
-      *(result__YQOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__EMOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__FMOB);
+      *(result__EMOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    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);
+    Self__3VDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__EMOB);
+    Self__3VDC->item__OOOB=v__OWS;
+    Self__3VDC->key__MXS=k__PWS;
+    Self__3VDC->next__YXS=__tmp__OYS;
+    node__ZWS=result__EMOB;
+    ((void **)Self__NWS->buckets__AXS)[idx__XWS]=result__EMOB;
+    Self__NWS->count__BYS=(__INTEGER)(Self__NWS->count__BYS +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__G1S)->item__CTOB=v__10S;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__ZWS)->item__OOOB=v__OWS;
   };
 }
 
-static void reduce_path__Y3HC(void *st__03HC)
+static void reduce_path__W1HC(void *st__Y1HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__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);
+  __INTEGER stat__01HC,__tmp__ZUHH,Self__1UHH,i__Z1HC,Self__1KOE;
+  __INTEGER n__1XFH,len__BVHH,__tmp__CVHH,__tmp__EVHH,Self__FVHH;
+  __INTEGER len__JVHH,__tmp__KVHH,__tmp__MVHH,Self__NVHH,result__QVHH;
+  __INTEGER n__3XFH,len__VVHH,__tmp__WVHH,__tmp__YVHH,Self__ZVHH;
+  __INTEGER end__1VHH,len__3VHH,__tmp__4VHH,__tmp__AWHH,Self__BWHH;
+  __INTEGER Self__YDFF,n__5XFH,len__FWHH,__tmp__GWHH,__tmp__IWHH;
+  __INTEGER Self__JWHH,result__MWHH,end__PWHH,len__RWHH,__tmp__SWHH;
+  __INTEGER __tmp__UWHH,Self__VWHH;
+  __STRING *Self__XUHH,*Self__0XFH,*Self__LVHH,*Self__RVHH,*Self__2XFH;
+  __STRING *Self__5VHH,*Self__4XFH,*Self__AYFH,*Self__CYFH,*Self__NWHH;
+  __STRING *Self__TWHH;
+  __CHARACTER car__11HC,Self__10IH;
+  __CHARACTER *__tmp__YUHH,*Self__0UHH;
+  __BOOLEAN __tmp__C4HC,__tmp__H5HC,result__ZGHE,result__00IH;
+  __BOOLEAN __tmp__20IH,__tmp__IAIC;
+  stat__01HC= 0;
+  car__11HC='\0';
+  Self__XUHH=((__STRING *)st__Y1HC);
+  __tmp__YUHH=Self__XUHH->storage__23R;
+  __tmp__ZUHH=(__INTEGER)(Self__XUHH->count__EGC -  1);
+  Self__0UHH=((__CHARACTER *)__tmp__YUHH);
+  Self__1UHH=__tmp__ZUHH;
+  while ((Self__1UHH >=  0)) {
+    if (('\\' == Self__0UHH[Self__1UHH])) {
+      Self__0UHH[Self__1UHH]='/';
+    };
+    Self__1UHH=(__INTEGER)(Self__1UHH -  1);
+  };
+  i__Z1HC= 1;
+  while ((i__Z1HC <= ((__STRING *)st__Y1HC)->count__EGC)) {
+    car__11HC=((__CHARACTER *)((__STRING *)st__Y1HC)->storage__23R)[(__INTEGER)(i__Z1HC -  1)];
+    if ((car__11HC == '/')) {
+      Self__1KOE=stat__01HC;
+      if ((stat__01HC ==  0)) {
+        stat__01HC= 1;
+      };
+      if ((Self__1KOE ==  1)) {
+        Self__0XFH=((__STRING *)st__Y1HC);
+        n__1XFH=(__INTEGER)(i__Z1HC -  1);
+        if ((n__1XFH > Self__0XFH->count__EGC)) {
+          Self__0XFH->count__EGC= 0;
+        } else {
+          if ((n__1XFH >  0)) {
+            len__BVHH=(__INTEGER)((__INTEGER)(n__1XFH -  1) +  1);
+            if ((len__BVHH >  0)) {
+              __tmp__CVHH=(__INTEGER)(n__1XFH +  1);
+              __tmp__EVHH=Self__0XFH->count__EGC;
+              Self__FVHH=__tmp__CVHH;
+              while ((Self__FVHH <= __tmp__EVHH)) {
+                ((__CHARACTER *)Self__0XFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__FVHH - len__BVHH) -  1)]=((__CHARACTER *)Self__0XFH->storage__23R)[(__INTEGER)(Self__FVHH -  1)];
+                Self__FVHH=(__INTEGER)(Self__FVHH +  1);
+              };
+              Self__0XFH->count__EGC=(__INTEGER)(Self__0XFH->count__EGC - len__BVHH);
+            };
+          };
+        };
+        i__Z1HC= 1;
+      };
+      if ((Self__1KOE ==  2)) {
+        Self__LVHH=((__STRING *)st__Y1HC);
+        len__JVHH=(__INTEGER)((__INTEGER)(i__Z1HC - (__INTEGER)(i__Z1HC -  1)) +  1);
+        if ((len__JVHH >  0)) {
+          __tmp__KVHH=(__INTEGER)(i__Z1HC +  1);
+          __tmp__MVHH=Self__LVHH->count__EGC;
+          Self__NVHH=__tmp__KVHH;
+          while ((Self__NVHH <= __tmp__MVHH)) {
+            ((__CHARACTER *)Self__LVHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__NVHH - len__JVHH) -  1)]=((__CHARACTER *)Self__LVHH->storage__23R)[(__INTEGER)(Self__NVHH -  1)];
+            Self__NVHH=(__INTEGER)(Self__NVHH +  1);
+          };
+          Self__LVHH->count__EGC=(__INTEGER)(Self__LVHH->count__EGC - len__JVHH);
+        };
+        i__Z1HC=(__INTEGER)(i__Z1HC -  2);
+        stat__01HC= 1;
+      };
+      if ((Self__1KOE ==  3)) {
+        Self__RVHH=((__STRING *)st__Y1HC);
+        result__QVHH=(__INTEGER)(i__Z1HC -  4);
+        while ((! ((result__QVHH <  1) || ('/' == ((__CHARACTER *)Self__RVHH->storage__23R)[(__INTEGER)(result__QVHH -  1)])))) {
+          result__QVHH=(__INTEGER)(result__QVHH -  1);
+        };
+        if ((result__QVHH ==  0)) {
+          Self__2XFH=((__STRING *)st__Y1HC);
+          n__3XFH=(__INTEGER)(i__Z1HC -  1);
+          if ((n__3XFH > Self__2XFH->count__EGC)) {
+            Self__2XFH->count__EGC= 0;
+          } else {
+            if ((n__3XFH >  0)) {
+              len__VVHH=(__INTEGER)((__INTEGER)(n__3XFH -  1) +  1);
+              if ((len__VVHH >  0)) {
+                __tmp__WVHH=(__INTEGER)(n__3XFH +  1);
+                __tmp__YVHH=Self__2XFH->count__EGC;
+                Self__ZVHH=__tmp__WVHH;
+                while ((Self__ZVHH <= __tmp__YVHH)) {
+                  ((__CHARACTER *)Self__2XFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__ZVHH - len__VVHH) -  1)]=((__CHARACTER *)Self__2XFH->storage__23R)[(__INTEGER)(Self__ZVHH -  1)];
+                  Self__ZVHH=(__INTEGER)(Self__ZVHH +  1);
                 };
-                Self__JMFH->count__4FC=(__INTEGER)(Self__JMFH->count__4FC - len__GKHH);
+                Self__2XFH->count__EGC=(__INTEGER)(Self__2XFH->count__EGC - len__VVHH);
               };
             };
           };
-          i__13HC= 1;
+          i__Z1HC= 1;
         } else {
-          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__5VHH=((__STRING *)st__Y1HC);
+          end__1VHH=(__INTEGER)(i__Z1HC -  1);
+          len__3VHH=(__INTEGER)((__INTEGER)(end__1VHH - result__QVHH) +  1);
+          if ((len__3VHH >  0)) {
+            __tmp__4VHH=(__INTEGER)(end__1VHH +  1);
+            __tmp__AWHH=Self__5VHH->count__EGC;
+            Self__BWHH=__tmp__4VHH;
+            while ((Self__BWHH <= __tmp__AWHH)) {
+              ((__CHARACTER *)Self__5VHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__BWHH - len__3VHH) -  1)]=((__CHARACTER *)Self__5VHH->storage__23R)[(__INTEGER)(Self__BWHH -  1)];
+              Self__BWHH=(__INTEGER)(Self__BWHH +  1);
             };
-            Self__RKHH->count__4FC=(__INTEGER)(Self__RKHH->count__4FC - len__PKHH);
+            Self__5VHH->count__EGC=(__INTEGER)(Self__5VHH->count__EGC - len__3VHH);
           };
-          i__13HC=result__BKHH;
+          i__Z1HC=result__QVHH;
         };
-        stat__23HC= 1;
+        stat__01HC= 1;
       };
-      __tmp__EAIC=TRUE__;
+      __tmp__C4HC=TRUE__;
     } else {
-      __tmp__EAIC=FALSE__;
+      __tmp__C4HC=FALSE__;
     };
-    if (__tmp__EAIC) {
-      __tmp__JBIC=TRUE__;
+    if (__tmp__C4HC) {
+      __tmp__H5HC=TRUE__;
     } else {
-      result__IIHE=(car__33HC == '.');
-      if (result__IIHE) {
-        Self__PZEF=stat__23HC;
-        if ((stat__23HC ==  1)) {
-          stat__23HC= 2;
+      result__ZGHE=(car__11HC == '.');
+      if (result__ZGHE) {
+        Self__YDFF=stat__01HC;
+        if ((stat__01HC ==  1)) {
+          stat__01HC= 2;
         };
-        if ((Self__PZEF ==  2)) {
-          stat__23HC= 3;
+        if ((Self__YDFF ==  2)) {
+          stat__01HC= 3;
         };
-        if ((Self__PZEF ==  3)) {
-          stat__23HC= 0;
+        if ((Self__YDFF ==  3)) {
+          stat__01HC= 0;
         };
       };
-      __tmp__JBIC=result__IIHE;
+      __tmp__H5HC=result__ZGHE;
     };
-    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__;
+    if ((! __tmp__H5HC)) {
+      if (((car__11HC == ':') && (i__Z1HC >  2))) {
+        Self__10IH=((__CHARACTER *)((__STRING *)st__Y1HC)->storage__23R)[(__INTEGER)((__INTEGER)(i__Z1HC -  1) -  1)];
+        result__00IH=FALSE__;
+        if ((((__INTEGER_8 )Self__10IH) >= ((__INTEGER_8 )'a'))) {
+          result__00IH=(((__INTEGER_8 )Self__10IH) <= ((__INTEGER_8 )'z'));
+          __tmp__20IH=TRUE__;
         } else {
-          __tmp__NQIH=FALSE__;
+          __tmp__20IH=FALSE__;
         };
-        if ((! __tmp__NQIH)) {
-          if ((((__INTEGER_8 )Self__MQIH) >= ((__INTEGER_8 )'A'))) {
-            result__LQIH=(((__INTEGER_8 )Self__MQIH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__20IH)) {
+          if ((((__INTEGER_8 )Self__10IH) >= ((__INTEGER_8 )'A'))) {
+            result__00IH=(((__INTEGER_8 )Self__10IH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__KCIC=result__LQIH;
+        __tmp__IAIC=result__00IH;
       } else {
-        __tmp__KCIC=FALSE__;
+        __tmp__IAIC=FALSE__;
       };
-      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;
+      if ((__tmp__IAIC && (((__CHARACTER *)((__STRING *)st__Y1HC)->storage__23R)[(__INTEGER)((__INTEGER)(i__Z1HC -  2) -  1)] == '/'))) {
+        Self__4XFH=((__STRING *)st__Y1HC);
+        n__5XFH=(__INTEGER)(i__Z1HC -  2);
+        if ((n__5XFH > Self__4XFH->count__EGC)) {
+          Self__4XFH->count__EGC= 0;
         } else {
-          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);
+          if ((n__5XFH >  0)) {
+            len__FWHH=(__INTEGER)((__INTEGER)(n__5XFH -  1) +  1);
+            if ((len__FWHH >  0)) {
+              __tmp__GWHH=(__INTEGER)(n__5XFH +  1);
+              __tmp__IWHH=Self__4XFH->count__EGC;
+              Self__JWHH=__tmp__GWHH;
+              while ((Self__JWHH <= __tmp__IWHH)) {
+                ((__CHARACTER *)Self__4XFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__JWHH - len__FWHH) -  1)]=((__CHARACTER *)Self__4XFH->storage__23R)[(__INTEGER)(Self__JWHH -  1)];
+                Self__JWHH=(__INTEGER)(Self__JWHH +  1);
               };
-              Self__LMFH->count__4FC=(__INTEGER)(Self__LMFH->count__4FC - len__YKHH);
+              Self__4XFH->count__EGC=(__INTEGER)(Self__4XFH->count__EGC - len__FWHH);
             };
           };
         };
-        i__13HC= 1;
+        i__Z1HC= 1;
       } else {
-        stat__23HC= 0;
+        stat__01HC= 0;
       };
     };
-    i__13HC=(__INTEGER)(i__13HC +  1);
+    i__Z1HC=(__INTEGER)(i__Z1HC +  1);
   };
-  if ((stat__23HC ==  1)) {
-    Self__NMFH=((__STRING *)st__03HC);
-    if (( 1 > Self__NMFH->count__4FC)) {
-      Self__NMFH->count__4FC= 0;
+  if ((stat__01HC ==  1)) {
+    Self__AYFH=((__STRING *)st__Y1HC);
+    if (( 1 > Self__AYFH->count__EGC)) {
+      Self__AYFH->count__EGC= 0;
     } else {
-      Self__NMFH->count__4FC=(__INTEGER)(Self__NMFH->count__4FC -  1);
+      Self__AYFH->count__EGC=(__INTEGER)(Self__AYFH->count__EGC -  1);
     };
   };
-  if ((stat__23HC ==  2)) {
-    Self__PMFH=((__STRING *)st__03HC);
-    if (( 2 > Self__PMFH->count__4FC)) {
-      Self__PMFH->count__4FC= 0;
+  if ((stat__01HC ==  2)) {
+    Self__CYFH=((__STRING *)st__Y1HC);
+    if (( 2 > Self__CYFH->count__EGC)) {
+      Self__CYFH->count__EGC= 0;
     } else {
-      Self__PMFH->count__4FC=(__INTEGER)(Self__PMFH->count__4FC -  2);
+      Self__CYFH->count__EGC=(__INTEGER)(Self__CYFH->count__EGC -  2);
     };
   };
-  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 ((stat__01HC ==  3)) {
+    Self__NWHH=((__STRING *)st__Y1HC);
+    result__MWHH=(__INTEGER)(i__Z1HC -  4);
+    while ((! ((result__MWHH <  1) || ('/' == ((__CHARACTER *)Self__NWHH->storage__23R)[(__INTEGER)(result__MWHH -  1)])))) {
+      result__MWHH=(__INTEGER)(result__MWHH -  1);
     };
-    if ((result__ALHH ==  0)) {
-      ((__STRING *)st__03HC)->count__4FC= 0;
+    if ((result__MWHH ==  0)) {
+      ((__STRING *)st__Y1HC)->count__EGC= 0;
     } else {
-      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__TWHH=((__STRING *)st__Y1HC);
+      end__PWHH=(__INTEGER)(i__Z1HC -  1);
+      len__RWHH=(__INTEGER)((__INTEGER)(end__PWHH - result__MWHH) +  1);
+      if ((len__RWHH >  0)) {
+        __tmp__SWHH=(__INTEGER)(end__PWHH +  1);
+        __tmp__UWHH=Self__TWHH->count__EGC;
+        Self__VWHH=__tmp__SWHH;
+        while ((Self__VWHH <= __tmp__UWHH)) {
+          ((__CHARACTER *)Self__TWHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__VWHH - len__RWHH) -  1)]=((__CHARACTER *)Self__TWHH->storage__23R)[(__INTEGER)(Self__VWHH -  1)];
+          Self__VWHH=(__INTEGER)(Self__VWHH +  1);
         };
-        Self__HLHH->count__4FC=(__INTEGER)(Self__HLHH->count__4FC - len__FLHH);
+        Self__TWHH->count__EGC=(__INTEGER)(Self__TWHH->count__EGC - len__RWHH);
       };
     };
   };
-  if ((((__STRING *)st__03HC)->count__4FC ==  0)) {
-    add_last__BMT(st__03HC,'/');
+  if ((((__STRING *)st__Y1HC)->count__EGC ==  0)) {
+    add_last__UHT(st__Y1HC,'/');
   };
 }
 
-static void* reference_at__MU0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NU0C,void *k__OU0C)
+static void* reference_at__WT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__XT0C,void *k__YT0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__CU0C;
+  __STRING *Self__YWHH;
+  __INTEGER result__XWHH,__tmp__ZWHH,Self__0WHH;
+  void *node__BU0C;
+  result__CU0C=NULL;
+  Self__YWHH=((__STRING *)k__YT0C);
+  result__XWHH= 0;
+  __tmp__ZWHH=Self__YWHH->count__EGC;
+  Self__0WHH= 1;
+  while ((Self__0WHH <= __tmp__ZWHH)) {
+    result__XWHH=(__INTEGER)((__INTEGER)( 5 * result__XWHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__YWHH->storage__23R)[(__INTEGER)(Self__0WHH -  1)])));
+    Self__0WHH=(__INTEGER)(Self__0WHH +  1);
+  };
+  if ((result__XWHH <  0)) {
+    result__XWHH=(__INTEGER)(~ result__XWHH);
+  };
+  node__BU0C=((void **)Self__XT0C->buckets__AXS)[(__INTEGER)(result__XWHH % Self__XT0C->capacity__1WS)];
+  while ((! (((void *)node__BU0C == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__BU0C)->key__MXS,k__YT0C)))) {
+    node__BU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__BU0C)->next__YXS;
+  };
+  if (((void *)node__BU0C != (void *)NULL)) {
+    result__CU0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__BU0C)->item__OOOB;
+  };
+  return(result__CU0C);
 }
 
-static void* physical_get_entry__AX0C(void *new_path__CX0C)
+static void* physical_get_entry__KW0C(void *new_path__MW0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__PW0C;
+  __STRING *Self__GYFH;
+  __FILE_UNIX *result__CVI;
+  __POINTER ptr__DVI,ptr_table__40IH,next__30IH,result__50IH;
+  __POINTER ptr_table__D1IH,next__C1IH,result__E1IH,ptr__UWI;
+  __POINTER ptr_table__I1IH,next__H1IH,result__J1IH,ptr_table__N1IH;
+  __POINTER next__M1IH,result__O1IH;
+  __INTEGER typ_id__IVI,typ_id__ZWI;
+  __UINTEGER_32 sz__FVI,a__UHGH,new_size__VHGH,t__ZHGH,a__YHGH;
+  __UINTEGER_32 new_size__G1IH,lab_type__F1IH,sz__WWI,a__2HGH;
+  __UINTEGER_32 new_size__3HGH,t__BIGH,a__AIGH,new_size__Q1IH;
+  __UINTEGER_32 lab_type__P1IH;
+  __DIRECTORY_UNIX *result__TWI;
+  void *__tmp__GX0C;
+  __CHARACTER *pe__OW0C;
+  result__PW0C=NULL;
+  Self__GYFH=((__STRING *)new_path__MW0C);
+  if ((Self__GYFH->capacity__T3R > Self__GYFH->count__EGC)) {
+    ((__CHARACTER *)Self__GYFH->storage__23R)[Self__GYFH->count__EGC]='\0';
   } else {
-    add_last__BMT(Self__TMFH,'\0');
-    Self__TMFH->count__4FC=(__INTEGER)(Self__TMFH->count__4FC -  1);
+    add_last__UHT(Self__GYFH,'\0');
+    Self__GYFH->count__EGC=(__INTEGER)(Self__GYFH->count__EGC -  1);
   };
-  pe__EX0C=Self__TMFH->storage__JCS;
+  pe__OW0C=Self__GYFH->storage__23R;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__EX0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__OW0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__CVI=NULL;
+      ptr__DVI=((__POINTER )(NULL));
+      typ_id__IVI= 0;
+      sz__FVI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__FVI ==  0)) {
+        result__CVI=FILE_UNIX__;
+      } else {
+        typ_id__IVI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FVI);
+        if ((typ_id__IVI == (__INTEGER)(-  1))) {
+          a__UHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__VHGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVI + a__UHGH) & (__UINTEGER_32)(~ a__UHGH));
+          ptr_table__40IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VHGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__30IH=((__POINTER )(NULL));
+          result__50IH=((__POINTER *)ptr_table__40IH)[ 0];
+          if ((result__50IH == (void *)NULL)) {
+            result__50IH=new_lab__QOJ(new_size__VHGH);
+            next__30IH=(void *)((unsigned long)result__50IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VHGH)));
+            ((__POINTER *)next__30IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__40IH)[ 0]=next__30IH;
+          } else {
+            next__30IH=((__POINTER *)result__50IH)[ 0];
+            if ((next__30IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__50IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VHGH <<  1)) <=  4096)) {
+                next__30IH=(void *)((unsigned long)result__50IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VHGH)));
               } else {
-                next__OQIH=new_lab__URJ(new_size__C2FH);
+                next__30IH=new_lab__QOJ(new_size__VHGH);
               };
-              ((__POINTER *)next__OQIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+              ((__POINTER *)next__30IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__40IH)[ 0]=next__30IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__50IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__30IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__50IH=next__30IH;
+            };
+          };
+          ptr__DVI=result__50IH;
+        } else {
+          t__ZHGH=((__UINTEGER_32 )typ_id__IVI);
+          a__YHGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__G1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__FVI + a__YHGH) & (__UINTEGER_32)(~ a__YHGH));
+          ptr_table__D1IH=((__POINTER )(&(table_type[(t__ZHGH)])));
+          lab_type__F1IH=(__UINTEGER_32)(t__ZHGH |  1);
+          next__C1IH=((__POINTER )(NULL));
+          result__E1IH=((__POINTER *)ptr_table__D1IH)[ 0];
+          if ((result__E1IH == (void *)NULL)) {
+            result__E1IH=new_lab__QOJ(lab_type__F1IH);
+            next__C1IH=(void *)((unsigned long)result__E1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1IH)));
+            ((__POINTER *)next__C1IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__D1IH)[ 0]=next__C1IH;
+          } else {
+            next__C1IH=((__POINTER *)result__E1IH)[ 0];
+            if ((next__C1IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E1IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G1IH <<  1)) <=  4096)) {
+                next__C1IH=(void *)((unsigned long)result__E1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G1IH)));
               } else {
-                next__TQIH=new_lab__URJ(lab_type__WQIH);
+                next__C1IH=new_lab__QOJ(lab_type__F1IH);
               };
-              ((__POINTER *)next__TQIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
+              ((__POINTER *)next__C1IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__D1IH)[ 0]=next__C1IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__E1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__E1IH=next__C1IH;
+            };
+          };
+          ptr__DVI=result__E1IH;
+        };
+        result__CVI=((__FILE_UNIX *)ptr__DVI);
+        *(result__CVI) = *(FILE_UNIX__);
+      };
+      result__PW0C=result__CVI;
+    } else {
+      result__TWI=NULL;
+      ptr__UWI=((__POINTER )(NULL));
+      typ_id__ZWI= 0;
+      sz__WWI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__WWI ==  0)) {
+        result__TWI=DIRECTORY_UNIX__;
+      } else {
+        typ_id__ZWI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WWI);
+        if ((typ_id__ZWI == (__INTEGER)(-  1))) {
+          a__2HGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__3HGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WWI + a__2HGH) & (__UINTEGER_32)(~ a__2HGH));
+          ptr_table__I1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3HGH / ((__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__QOJ(new_size__3HGH);
+            next__H1IH=(void *)((unsigned long)result__J1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HGH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3HGH <<  1)) <=  4096)) {
+                next__H1IH=(void *)((unsigned long)result__J1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HGH)));
               } else {
-                next__YQIH=new_lab__URJ(new_size__K2FH);
+                next__H1IH=new_lab__QOJ(new_size__3HGH);
               };
-              ((__POINTER *)next__YQIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZQIH)[ 0]=next__YQIH;
+              ((__POINTER *)next__H1IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__I1IH)[ 0]=next__H1IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__J1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__J1IH=next__H1IH;
+            };
+          };
+          ptr__UWI=result__J1IH;
+        } else {
+          t__BIGH=((__UINTEGER_32 )typ_id__ZWI);
+          a__AIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Q1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__WWI + a__AIGH) & (__UINTEGER_32)(~ a__AIGH));
+          ptr_table__N1IH=((__POINTER )(&(table_type[(t__BIGH)])));
+          lab_type__P1IH=(__UINTEGER_32)(t__BIGH |  1);
+          next__M1IH=((__POINTER )(NULL));
+          result__O1IH=((__POINTER *)ptr_table__N1IH)[ 0];
+          if ((result__O1IH == (void *)NULL)) {
+            result__O1IH=new_lab__QOJ(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__3SH)))) &  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__3QIH=new_lab__URJ(lab_type__ARIH);
+                next__M1IH=new_lab__QOJ(lab_type__P1IH);
               };
-              ((__POINTER *)next__3QIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4QIH)[ 0]=next__3QIH;
+              ((__POINTER *)next__M1IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__N1IH)[ 0]=next__M1IH;
             } else {
-              ((__POINTER *)result__5QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5QIH=next__3QIH;
+              ((__POINTER *)result__O1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__O1IH=next__M1IH;
             };
           };
-          ptr__YZI=result__5QIH;
+          ptr__UWI=result__O1IH;
         };
-        result__XZI=((__DIRECTORY_UNIX *)ptr__YZI);
-        *(result__XZI) = *(DIRECTORY_UNIX__);
+        result__TWI=((__DIRECTORY_UNIX *)ptr__UWI);
+        *(result__TWI) = *(DIRECTORY_UNIX__);
       };
-      result__FX0C=result__XZI;
+      result__PW0C=result__TWI;
     };
-    if (((struct ___OBJ *)result__FX0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__WNT(result__FX0C,new_path__CX0C);
+    if (((struct ___OBJ *)result__PW0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__JJT(result__PW0C,new_path__MW0C);
     } else {
-      set_path__ROT(result__FX0C,new_path__CX0C);
+      set_path__EKT(result__PW0C,new_path__MW0C);
     };
-    if (FILE_SYSTEM__->parent_directory__XFD==0) {
+    if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
-      parent_directory__WED();
+      parent_directory__1ED();
     };
-    if (((struct ___OBJ *)result__FX0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__2X0C=((__DIRECTORY_UNIX *)result__FX0C)->parent_entry_unix__BFD.parent_entry__AFD.path__BD;
+    if (((struct ___OBJ *)result__PW0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__GX0C=((__DIRECTORY_UNIX *)result__PW0C)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__2X0C=((__FILE_UNIX *)result__FX0C)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+      __tmp__GX0C=((__FILE_UNIX *)result__PW0C)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
     };
-    put__to__Z0S(alias__MFD,result__FX0C,__tmp__2X0C);
+    put__to__MWS(alias__RFD,result__PW0C,__tmp__GX0C);
   };
   };
-  return(result__FX0C);
+  return(result__PW0C);
 }
 
-static void** create__3Y1C(__INTEGER nb_elements__5Y1C)
+static void** create__HY1C(__INTEGER nb_elements__JY1C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__Q0DH,a__V0DH,new_size__R0DH,new_size2__S0DH,a__LYFH;
+  __UINTEGER_32 new_size__MYFH;
+  __POINTER result__P0DH,ptr_table__S1IH,next__R1IH,result__T1IH;
+  void *result__W1IH;
+  __INTEGER Self__O4WD;
+  void **Result__LUCD;
+  sz__Q0DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JY1C * ((__INTEGER )(sizeof(void *)))));
+  result__P0DH=((__POINTER )(NULL));
+  a__V0DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__R0DH=(__UINTEGER_32)((__UINTEGER_32)(sz__Q0DH + a__V0DH) & (__UINTEGER_32)(~ a__V0DH));
+  new_size2__S0DH=(__UINTEGER_32)(new_size__R0DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__S0DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MYFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__S0DH + a__LYFH) & (__UINTEGER_32)(~ a__LYFH));
+    ptr_table__S1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__R1IH=((__POINTER )(NULL));
+    result__T1IH=((__POINTER *)ptr_table__S1IH)[ 0];
+    if ((result__T1IH == (void *)NULL)) {
+      result__T1IH=new_lab__QOJ(new_size__MYFH);
+      next__R1IH=(void *)((unsigned long)result__T1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYFH)));
+      ((__POINTER *)next__R1IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__S1IH)[ 0]=next__R1IH;
+    } else {
+      next__R1IH=((__POINTER *)result__T1IH)[ 0];
+      if ((next__R1IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__T1IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__MYFH <<  1)) <=  4096)) {
+          next__R1IH=(void *)((unsigned long)result__T1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MYFH)));
+        } else {
+          next__R1IH=new_lab__QOJ(new_size__MYFH);
+        };
+        ((__POINTER *)next__R1IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__S1IH)[ 0]=next__R1IH;
+      } else {
+        ((__POINTER *)result__T1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__T1IH=next__R1IH;
+      };
+    };
+    ((__POINTER *)result__T1IH)[ 0]=((__POINTER ) 3);
+    result__P0DH=(void *)((unsigned long)result__T1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__W1IH=first_free__VAVB;
+    while ((((void *)result__W1IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__W1IH)->map_size_and_id__YTB &  4294967292LU) < new_size__R0DH))) {
+      result__W1IH=((__MEMORY *)result__W1IH)->map_next_free__ZTB;
     };
-    if (((void *)result__HRIH == (void *)NULL)) {
-      result__HRIH=new_page__WA5();
+    if (((void *)result__W1IH == (void *)NULL)) {
+      result__W1IH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__W1IH,new_size__R0DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__W1IH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__P0DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__W1IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LUCD=((void **)result__P0DH);
+  Self__O4WD=(__INTEGER)(nb_elements__JY1C -  1);
+  while ((Self__O4WD >=  0)) {
+    Result__LUCD[Self__O4WD]=NULL;
+    Self__O4WD=(__INTEGER)(Self__O4WD -  1);
   };
-  return(Result__0VCD);
+  return(Result__LUCD);
 }
 
-static void** create__FRSC(__INTEGER nb_elements__HRSC)
+static void** create__QPSC(__INTEGER nb_elements__SPSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__Y0DH,a__30DH,new_size__Z0DH,new_size2__00DH,a__SYFH;
+  __UINTEGER_32 new_size__TYFH;
+  __POINTER result__X0DH,ptr_table__01IH,next__Z1IH,result__11IH;
+  void *result__41IH;
+  __INTEGER Self__UPWD;
+  void **Result__I11C;
+  sz__Y0DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SPSC * ((__INTEGER )(sizeof(void *)))));
+  result__X0DH=((__POINTER )(NULL));
+  a__30DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__Z0DH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y0DH + a__30DH) & (__UINTEGER_32)(~ a__30DH));
+  new_size2__00DH=(__UINTEGER_32)(new_size__Z0DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__00DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__SYFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__TYFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__00DH + a__SYFH) & (__UINTEGER_32)(~ a__SYFH));
+    ptr_table__01IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TYFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__Z1IH=((__POINTER )(NULL));
+    result__11IH=((__POINTER *)ptr_table__01IH)[ 0];
+    if ((result__11IH == (void *)NULL)) {
+      result__11IH=new_lab__QOJ(new_size__TYFH);
+      next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TYFH)));
+      ((__POINTER *)next__Z1IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__01IH)[ 0]=next__Z1IH;
+    } else {
+      next__Z1IH=((__POINTER *)result__11IH)[ 0];
+      if ((next__Z1IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__11IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TYFH <<  1)) <=  4096)) {
+          next__Z1IH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TYFH)));
+        } else {
+          next__Z1IH=new_lab__QOJ(new_size__TYFH);
+        };
+        ((__POINTER *)next__Z1IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__01IH)[ 0]=next__Z1IH;
+      } else {
+        ((__POINTER *)result__11IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__11IH=next__Z1IH;
+      };
+    };
+    ((__POINTER *)result__11IH)[ 0]=((__POINTER ) 3);
+    result__X0DH=(void *)((unsigned long)result__11IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__41IH=first_free__VAVB;
+    while ((((void *)result__41IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__41IH)->map_size_and_id__YTB &  4294967292LU) < new_size__Z0DH))) {
+      result__41IH=((__MEMORY *)result__41IH)->map_next_free__ZTB;
     };
-    if (((void *)result__PRIH == (void *)NULL)) {
-      result__PRIH=new_page__WA5();
+    if (((void *)result__41IH == (void *)NULL)) {
+      result__41IH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__41IH,new_size__Z0DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__41IH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__X0DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__41IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__I11C=((void **)result__X0DH);
+  Self__UPWD=(__INTEGER)(nb_elements__SPSC -  1);
+  while ((Self__UPWD >=  0)) {
+    Result__I11C[Self__UPWD]=NULL;
+    Self__UPWD=(__INTEGER)(Self__UPWD -  1);
   };
-  return(Result__411C);
+  return(Result__I11C);
 }
 
-static void short__token__to__TBD(void *key__VBD,__INTEGER beg__WBD,__INTEGER end__XBD)
-// ({NULLxSTRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
+static void short__token__to__YBD(void *key__0BD,__INTEGER beg__1BD,__INTEGER end__2BD)
+// ({STRING_CONSTANT},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER pos__3BD,result__AXHH,__tmp__CXHH,Self__DXHH,__tmp__YCD;
+  __INTEGER Self__VG4,__tmp__IXHH,__tmp__KXHH,Self__LXHH,__tmp__ODD;
+  __INTEGER Self__GI4,__tmp__EED,__tmp__HED;
+  void *add_text__4BD;
+  __STRING *Self__JXHH;
+  void *fmt__5BD;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2WHH;
+  void *node__4WHH;
+  pos__3BD= 0;
+  add_text__4BD=NULL;
+  fmt__5BD=NULL;
+  if (is_shorter__LZ) {
+    if (is_active_short__OCC) {
+      Self__2WHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__AXHH= 0;
+      __tmp__CXHH=((__STRING_CONSTANT *)key__0BD)->count__DD;
+      Self__DXHH= 1;
+      while ((Self__DXHH <= __tmp__CXHH)) {
+        result__AXHH=(__INTEGER)((__INTEGER)( 5 * result__AXHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)key__0BD)->storage__QMO)[(__INTEGER)(Self__DXHH -  1)])));
+        Self__DXHH=(__INTEGER)(Self__DXHH +  1);
+      };
+      if ((result__AXHH <  0)) {
+        result__AXHH=(__INTEGER)(~ result__AXHH);
+      };
+      node__4WHH=((void **)Self__2WHH->buckets__04S)[(__INTEGER)(result__AXHH % Self__2WHH->capacity__V4S)];
+      while ((! (((void *)node__4WHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4WHH)->key__G5S == (void *)key__0BD)))) {
+        node__4WHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__4WHH)->next__R5S;
+      };
+      if (((void *)node__4WHH != (void *)NULL)) {
+        ((__STRING *)token__TCD)->count__EGC= 0;
+        pos__3BD=(__INTEGER)(beg__1BD + short_derive__PCC);
+        __tmp__YCD=(__INTEGER)(end__2BD -  1);
+        Self__VG4=beg__1BD;
+        while ((Self__VG4 <= __tmp__YCD)) {
+          add_last__UHT(token__TCD,((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(Self__VG4 -  1)]);
+          Self__JXHH=((__STRING *)output_code__SI);
+          __tmp__IXHH=(__INTEGER)(pos__3BD +  1);
+          __tmp__KXHH=Self__JXHH->count__EGC;
+          Self__LXHH=__tmp__IXHH;
+          while ((Self__LXHH <= __tmp__KXHH)) {
+            ((__CHARACTER *)Self__JXHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__LXHH -  1) -  1)]=((__CHARACTER *)Self__JXHH->storage__23R)[(__INTEGER)(Self__LXHH -  1)];
+            Self__LXHH=(__INTEGER)(Self__LXHH +  1);
+          };
+          Self__JXHH->count__EGC=(__INTEGER)(Self__JXHH->count__EGC -  1);
+          Self__VG4=(__INTEGER)(Self__VG4 +  1);
+        };
+        short_derive__PCC=(__INTEGER)(short_derive__PCC - ((__STRING *)token__TCD)->count__EGC);
+        fmt__5BD=at__DH4(short_dico__QD,key__0BD);
+        __tmp__ODD=((__LINKED_LISToSTRING_CONSTANTo *)fmt__5BD)->parent_linked_collection__LD.upper__MDD;
+        Self__GI4= 1;
+        while ((Self__GI4 <= __tmp__ODD)) {
+          if (((void *)item__MZND(fmt__5BD,Self__GI4) == (void *)NULL)) {
+            add_text__4BD=token__TCD;
+          } else {
+            add_text__4BD=item__MZND(fmt__5BD,Self__GI4);
+          };
+          insert_string__to__NTU(output_code__SI,add_text__4BD,pos__3BD);
+          if (((struct ___OBJ *)add_text__4BD)->__id==__STRING_CONSTANT__) {
+            __tmp__EED=((__STRING_CONSTANT *)add_text__4BD)->count__DD;
+          } else {
+            __tmp__EED=((__STRING *)add_text__4BD)->count__EGC;
+          };
+          pos__3BD=(__INTEGER)(pos__3BD + __tmp__EED);
+          if (((struct ___OBJ *)add_text__4BD)->__id==__STRING_CONSTANT__) {
+            __tmp__HED=((__STRING_CONSTANT *)add_text__4BD)->count__DD;
+          } else {
+            __tmp__HED=((__STRING *)add_text__4BD)->count__EGC;
+          };
+          short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__HED);
+          Self__GI4=(__INTEGER)(Self__GI4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__MIZE(__STRING *Self__NIZE)
+static __INTEGER first_substring_index__VSZE(__STRING *Self__WSZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER i__HY4E,result__JY4E,s__IY4E;
+  i__HY4E= 0;
+  result__JY4E= 0;
+  s__IY4E= 1;
+  while ((! ((result__JY4E !=  0) || ((__INTEGER)((__INTEGER)(s__IY4E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__WSZE->count__EGC)))) {
+    i__HY4E= 1;
+    while ((! ((i__HY4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__WSZE->storage__23R)[(__INTEGER)((__INTEGER)((__INTEGER)(s__IY4E + i__HY4E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__QMO)[(__INTEGER)(i__HY4E -  1)])))) {
+      i__HY4E=(__INTEGER)(i__HY4E +  1);
     };
-    if ((i__4N4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__AO4E=s__5N4E;
+    if ((i__HY4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__JY4E=s__IY4E;
     } else {
-      s__5N4E=(__INTEGER)(s__5N4E +  1);
+      s__IY4E=(__INTEGER)(s__IY4E +  1);
     };
   };
-  return(result__AO4E);
+  return(result__JY4E);
 }
 
-static __BOOLEAN read_string__TFQ()
+static __BOOLEAN read_string__GBQ()
 // () With resultNo recursive, No inlinable.
 {
-  __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 == '\"');
+  __INTEGER old_pos__KBQ;
+  __POSITION pos__LFXG;
+  __BOOLEAN result__JBQ,__tmp__UBQ,__tmp__TCQ,__tmp__UCQ;
+  __CHARACTER result__SD5G,result__2D5G,result__FE5G,result__KE5G;
+  __CHARACTER result__PE5G,result__UE5G,result__ZE5G;
+  result__JBQ=FALSE__;
+  old_pos__KBQ= 0;
+  if (read_space__KSD()) {
+    result__SD5G='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__SD5G=((__CHARACTER )(( 0)));
+    } else {
+      result__SD5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    };
+    __tmp__UBQ=(result__SD5G == '\"');
   } else {
-    __tmp__BGQ=FALSE__;
+    __tmp__UBQ=FALSE__;
   };
-  if (__tmp__BGQ) {
-    old_pos__XFQ=position__0BC;
-    position__0BC=(__INTEGER)(position__0BC +  1);
-    ((__STRING *)string_tmp__VH)->count__4FC= 0;
-    until_do__GKRC:
+  if (__tmp__UBQ) {
+    old_pos__KBQ=position__CCC;
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    until_do__RIRC:
     {
-      result__CX4G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__CX4G=((__CHARACTER )(( 0)));
+      result__2D5G='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__2D5G=((__CHARACTER )(( 0)));
       } else {
-        result__CX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__2D5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__CX4G == ((__CHARACTER )(( 0))))) {
-        __tmp__AHQ=TRUE__;
+      if ((result__2D5G == ((__CHARACTER )(( 0))))) {
+        __tmp__TCQ=TRUE__;
       } else {
-        result__LX4G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__LX4G=((__CHARACTER )(( 0)));
+        result__FE5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__FE5G=((__CHARACTER )(( 0)));
         } else {
-          result__LX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__FE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__AHQ=(result__LX4G == '\n');
+        __tmp__TCQ=(result__FE5G == '\n');
       };
-      if (__tmp__AHQ) {
-        __tmp__BHQ=TRUE__;
+      if (__tmp__TCQ) {
+        __tmp__UCQ=TRUE__;
       } else {
-        result__QX4G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__QX4G=((__CHARACTER )(( 0)));
+        result__KE5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__KE5G=((__CHARACTER )(( 0)));
         } else {
-          result__QX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__KE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__BHQ=(result__QX4G == '\"');
+        __tmp__UCQ=(result__KE5G == '\"');
       };
-      if ((! __tmp__BHQ)) {
-        result__VX4G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__VX4G=((__CHARACTER )(( 0)));
+      if ((! __tmp__UCQ)) {
+        result__PE5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__PE5G=((__CHARACTER )(( 0)));
         } else {
-          result__VX4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__PE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__BMT(string_tmp__VH,result__VX4G);
-        result__0X4G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__0X4G=((__CHARACTER )(( 0)));
+        add_last__UHT(string_tmp__VH,result__PE5G);
+        result__UE5G='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__UE5G=((__CHARACTER )(( 0)));
         } else {
-          result__0X4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__UE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__0X4G == '\\')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          read_escape_character__YLKF();
+        if ((result__UE5G == '\\')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          read_escape_character__JWKF();
         } else {
-          position__0BC=(__INTEGER)(position__0BC +  1);
+          position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__GKRC;
+        goto until_do__RIRC;
       };
     };
-    result__5X4G='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__5X4G=((__CHARACTER )(( 0)));
+    result__ZE5G='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__ZE5G=((__CHARACTER )(( 0)));
     } else {
-      result__5X4G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__ZE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    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);
+    if ((result__ZE5G == '\"')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      last_string__V0C=get__YWB(string_tmp__VH);
+      result__JBQ=TRUE__;
+      short__token__to__YBD((&__string_123),old_pos__KBQ,position__CCC);
     } else {
-      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)) {
+      position__CCC=begin_position__53D;
+      pos__LFXG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_251));
+      put_position__CMG(pos__LFXG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__WFQ);
+  return(result__JBQ);
 }
 
-static void reduce_path__NO3E(void *st__PO3E)
+static void reduce_path__NG3E(void *st__PG3E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__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);
+  __INTEGER stat__RG3E,__tmp__PXHH,Self__RXHH,i__QG3E,Self__3K1F;
+  __INTEGER n__AZFH,len__XXHH,__tmp__YXHH,__tmp__0XHH,Self__1XHH;
+  __INTEGER len__5XHH,__tmp__AYHH,__tmp__CYHH,Self__DYHH,result__GYHH;
+  __INTEGER n__CZFH,len__LYHH,__tmp__MYHH,__tmp__OYHH,Self__PYHH;
+  __INTEGER end__RYHH,len__TYHH,__tmp__UYHH,__tmp__WYHH,Self__XYHH;
+  __INTEGER Self__YHEG,n__EZFH,len__1YHH,__tmp__2YHH,__tmp__4YHH;
+  __INTEGER Self__5YHH,result__KLGD,end__BZHH,len__DZHH,__tmp__EZHH;
+  __INTEGER __tmp__GZHH,Self__HZHH;
+  __STRING *Self__NXHH,*Self__5YFH,*Self__BYHH,*Self__HYHH,*Self__BZFH;
+  __STRING *Self__VYHH,*Self__DZFH,*Self__FZFH,*Self__HZFH,*Self__GLGD;
+  __STRING *Self__FZHH;
+  __CHARACTER car__SG3E,Self__W12E;
+  __CHARACTER *__tmp__OXHH,*Self__QXHH;
+  __BOOLEAN __tmp__ZI3E,__tmp__4J3E,result__NVXF,result__Y12E;
+  __BOOLEAN __tmp__C22E,__tmp__5K3E;
+  stat__RG3E= 0;
+  car__SG3E='\0';
+  Self__NXHH=((__STRING *)st__PG3E);
+  __tmp__OXHH=Self__NXHH->storage__23R;
+  __tmp__PXHH=(__INTEGER)(Self__NXHH->count__EGC -  1);
+  Self__QXHH=((__CHARACTER *)__tmp__OXHH);
+  Self__RXHH=__tmp__PXHH;
+  while ((Self__RXHH >=  0)) {
+    if (('\\' == Self__QXHH[Self__RXHH])) {
+      Self__QXHH[Self__RXHH]='/';
+    };
+    Self__RXHH=(__INTEGER)(Self__RXHH -  1);
+  };
+  i__QG3E= 1;
+  while ((i__QG3E <= ((__STRING *)st__PG3E)->count__EGC)) {
+    car__SG3E=((__CHARACTER *)((__STRING *)st__PG3E)->storage__23R)[(__INTEGER)(i__QG3E -  1)];
+    if ((car__SG3E == '/')) {
+      Self__3K1F=stat__RG3E;
+      if ((stat__RG3E ==  0)) {
+        stat__RG3E= 1;
+      };
+      if ((Self__3K1F ==  1)) {
+        Self__5YFH=((__STRING *)st__PG3E);
+        n__AZFH=(__INTEGER)(i__QG3E -  1);
+        if ((n__AZFH > Self__5YFH->count__EGC)) {
+          Self__5YFH->count__EGC= 0;
+        } else {
+          if ((n__AZFH >  0)) {
+            len__XXHH=(__INTEGER)((__INTEGER)(n__AZFH -  1) +  1);
+            if ((len__XXHH >  0)) {
+              __tmp__YXHH=(__INTEGER)(n__AZFH +  1);
+              __tmp__0XHH=Self__5YFH->count__EGC;
+              Self__1XHH=__tmp__YXHH;
+              while ((Self__1XHH <= __tmp__0XHH)) {
+                ((__CHARACTER *)Self__5YFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__1XHH - len__XXHH) -  1)]=((__CHARACTER *)Self__5YFH->storage__23R)[(__INTEGER)(Self__1XHH -  1)];
+                Self__1XHH=(__INTEGER)(Self__1XHH +  1);
+              };
+              Self__5YFH->count__EGC=(__INTEGER)(Self__5YFH->count__EGC - len__XXHH);
+            };
+          };
+        };
+        i__QG3E= 1;
+      };
+      if ((Self__3K1F ==  2)) {
+        Self__BYHH=((__STRING *)st__PG3E);
+        len__5XHH=(__INTEGER)((__INTEGER)(i__QG3E - (__INTEGER)(i__QG3E -  1)) +  1);
+        if ((len__5XHH >  0)) {
+          __tmp__AYHH=(__INTEGER)(i__QG3E +  1);
+          __tmp__CYHH=Self__BYHH->count__EGC;
+          Self__DYHH=__tmp__AYHH;
+          while ((Self__DYHH <= __tmp__CYHH)) {
+            ((__CHARACTER *)Self__BYHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__DYHH - len__5XHH) -  1)]=((__CHARACTER *)Self__BYHH->storage__23R)[(__INTEGER)(Self__DYHH -  1)];
+            Self__DYHH=(__INTEGER)(Self__DYHH +  1);
+          };
+          Self__BYHH->count__EGC=(__INTEGER)(Self__BYHH->count__EGC - len__5XHH);
+        };
+        i__QG3E=(__INTEGER)(i__QG3E -  2);
+        stat__RG3E= 1;
+      };
+      if ((Self__3K1F ==  3)) {
+        Self__HYHH=((__STRING *)st__PG3E);
+        result__GYHH=(__INTEGER)(i__QG3E -  4);
+        while ((! ((result__GYHH <  1) || ('/' == ((__CHARACTER *)Self__HYHH->storage__23R)[(__INTEGER)(result__GYHH -  1)])))) {
+          result__GYHH=(__INTEGER)(result__GYHH -  1);
+        };
+        if ((result__GYHH ==  0)) {
+          Self__BZFH=((__STRING *)st__PG3E);
+          n__CZFH=(__INTEGER)(i__QG3E -  1);
+          if ((n__CZFH > Self__BZFH->count__EGC)) {
+            Self__BZFH->count__EGC= 0;
+          } else {
+            if ((n__CZFH >  0)) {
+              len__LYHH=(__INTEGER)((__INTEGER)(n__CZFH -  1) +  1);
+              if ((len__LYHH >  0)) {
+                __tmp__MYHH=(__INTEGER)(n__CZFH +  1);
+                __tmp__OYHH=Self__BZFH->count__EGC;
+                Self__PYHH=__tmp__MYHH;
+                while ((Self__PYHH <= __tmp__OYHH)) {
+                  ((__CHARACTER *)Self__BZFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__PYHH - len__LYHH) -  1)]=((__CHARACTER *)Self__BZFH->storage__23R)[(__INTEGER)(Self__PYHH -  1)];
+                  Self__PYHH=(__INTEGER)(Self__PYHH +  1);
                 };
-                Self__RNFH->count__4FC=(__INTEGER)(Self__RNFH->count__4FC - len__DNHH);
+                Self__BZFH->count__EGC=(__INTEGER)(Self__BZFH->count__EGC - len__LYHH);
               };
             };
           };
-          i__QO3E= 1;
+          i__QG3E= 1;
         } else {
-          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__VYHH=((__STRING *)st__PG3E);
+          end__RYHH=(__INTEGER)(i__QG3E -  1);
+          len__TYHH=(__INTEGER)((__INTEGER)(end__RYHH - result__GYHH) +  1);
+          if ((len__TYHH >  0)) {
+            __tmp__UYHH=(__INTEGER)(end__RYHH +  1);
+            __tmp__WYHH=Self__VYHH->count__EGC;
+            Self__XYHH=__tmp__UYHH;
+            while ((Self__XYHH <= __tmp__WYHH)) {
+              ((__CHARACTER *)Self__VYHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__XYHH - len__TYHH) -  1)]=((__CHARACTER *)Self__VYHH->storage__23R)[(__INTEGER)(Self__XYHH -  1)];
+              Self__XYHH=(__INTEGER)(Self__XYHH +  1);
             };
-            Self__ONHH->count__4FC=(__INTEGER)(Self__ONHH->count__4FC - len__MNHH);
+            Self__VYHH->count__EGC=(__INTEGER)(Self__VYHH->count__EGC - len__TYHH);
           };
-          i__QO3E=result__4MHH;
+          i__QG3E=result__GYHH;
         };
-        stat__RO3E= 1;
+        stat__RG3E= 1;
       };
-      __tmp__ZQ3E=TRUE__;
+      __tmp__ZI3E=TRUE__;
     } else {
-      __tmp__ZQ3E=FALSE__;
+      __tmp__ZI3E=FALSE__;
     };
-    if (__tmp__ZQ3E) {
-      __tmp__4R3E=TRUE__;
+    if (__tmp__ZI3E) {
+      __tmp__4J3E=TRUE__;
     } else {
-      result__3LXF=(car__SO3E == '.');
-      if (result__3LXF) {
-        Self__X2DG=stat__RO3E;
-        if ((stat__RO3E ==  1)) {
-          stat__RO3E= 2;
+      result__NVXF=(car__SG3E == '.');
+      if (result__NVXF) {
+        Self__YHEG=stat__RG3E;
+        if ((stat__RG3E ==  1)) {
+          stat__RG3E= 2;
         };
-        if ((Self__X2DG ==  2)) {
-          stat__RO3E= 3;
+        if ((Self__YHEG ==  2)) {
+          stat__RG3E= 3;
         };
-        if ((Self__X2DG ==  3)) {
-          stat__RO3E= 0;
+        if ((Self__YHEG ==  3)) {
+          stat__RG3E= 0;
         };
       };
-      __tmp__4R3E=result__3LXF;
+      __tmp__4J3E=result__NVXF;
     };
-    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__;
+    if ((! __tmp__4J3E)) {
+      if (((car__SG3E == ':') && (i__QG3E >  2))) {
+        Self__W12E=((__CHARACTER *)((__STRING *)st__PG3E)->storage__23R)[(__INTEGER)((__INTEGER)(i__QG3E -  1) -  1)];
+        result__Y12E=FALSE__;
+        if ((((__INTEGER_8 )Self__W12E) >= ((__INTEGER_8 )'a'))) {
+          result__Y12E=(((__INTEGER_8 )Self__W12E) <= ((__INTEGER_8 )'z'));
+          __tmp__C22E=TRUE__;
         } else {
-          __tmp__ZR2E=FALSE__;
+          __tmp__C22E=FALSE__;
         };
-        if ((! __tmp__ZR2E)) {
-          if ((((__INTEGER_8 )Self__NR2E) >= ((__INTEGER_8 )'A'))) {
-            result__PR2E=(((__INTEGER_8 )Self__NR2E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__C22E)) {
+          if ((((__INTEGER_8 )Self__W12E) >= ((__INTEGER_8 )'A'))) {
+            result__Y12E=(((__INTEGER_8 )Self__W12E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__5S3E=result__PR2E;
+        __tmp__5K3E=result__Y12E;
       } else {
-        __tmp__5S3E=FALSE__;
+        __tmp__5K3E=FALSE__;
       };
-      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;
+      if ((__tmp__5K3E && (((__CHARACTER *)((__STRING *)st__PG3E)->storage__23R)[(__INTEGER)((__INTEGER)(i__QG3E -  2) -  1)] == '/'))) {
+        Self__DZFH=((__STRING *)st__PG3E);
+        n__EZFH=(__INTEGER)(i__QG3E -  2);
+        if ((n__EZFH > Self__DZFH->count__EGC)) {
+          Self__DZFH->count__EGC= 0;
         } else {
-          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);
+          if ((n__EZFH >  0)) {
+            len__1YHH=(__INTEGER)((__INTEGER)(n__EZFH -  1) +  1);
+            if ((len__1YHH >  0)) {
+              __tmp__2YHH=(__INTEGER)(n__EZFH +  1);
+              __tmp__4YHH=Self__DZFH->count__EGC;
+              Self__5YHH=__tmp__2YHH;
+              while ((Self__5YHH <= __tmp__4YHH)) {
+                ((__CHARACTER *)Self__DZFH->storage__23R)[(__INTEGER)((__INTEGER)(Self__5YHH - len__1YHH) -  1)]=((__CHARACTER *)Self__DZFH->storage__23R)[(__INTEGER)(Self__5YHH -  1)];
+                Self__5YHH=(__INTEGER)(Self__5YHH +  1);
               };
-              Self__TNFH->count__4FC=(__INTEGER)(Self__TNFH->count__4FC - len__VNHH);
+              Self__DZFH->count__EGC=(__INTEGER)(Self__DZFH->count__EGC - len__1YHH);
             };
           };
         };
-        i__QO3E= 1;
+        i__QG3E= 1;
       } else {
-        stat__RO3E= 0;
+        stat__RG3E= 0;
       };
     };
-    i__QO3E=(__INTEGER)(i__QO3E +  1);
+    i__QG3E=(__INTEGER)(i__QG3E +  1);
   };
-  if ((stat__RO3E ==  1)) {
-    Self__VNFH=((__STRING *)st__PO3E);
-    if (( 1 > Self__VNFH->count__4FC)) {
-      Self__VNFH->count__4FC= 0;
+  if ((stat__RG3E ==  1)) {
+    Self__FZFH=((__STRING *)st__PG3E);
+    if (( 1 > Self__FZFH->count__EGC)) {
+      Self__FZFH->count__EGC= 0;
     } else {
-      Self__VNFH->count__4FC=(__INTEGER)(Self__VNFH->count__4FC -  1);
+      Self__FZFH->count__EGC=(__INTEGER)(Self__FZFH->count__EGC -  1);
     };
   };
-  if ((stat__RO3E ==  2)) {
-    Self__XNFH=((__STRING *)st__PO3E);
-    if (( 2 > Self__XNFH->count__4FC)) {
-      Self__XNFH->count__4FC= 0;
+  if ((stat__RG3E ==  2)) {
+    Self__HZFH=((__STRING *)st__PG3E);
+    if (( 2 > Self__HZFH->count__EGC)) {
+      Self__HZFH->count__EGC= 0;
     } else {
-      Self__XNFH->count__4FC=(__INTEGER)(Self__XNFH->count__4FC -  2);
+      Self__HZFH->count__EGC=(__INTEGER)(Self__HZFH->count__EGC -  2);
     };
   };
-  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 ((stat__RG3E ==  3)) {
+    Self__GLGD=((__STRING *)st__PG3E);
+    result__KLGD=(__INTEGER)(i__QG3E -  4);
+    while ((! ((result__KLGD <  1) || ('/' == ((__CHARACTER *)Self__GLGD->storage__23R)[(__INTEGER)(result__KLGD -  1)])))) {
+      result__KLGD=(__INTEGER)(result__KLGD -  1);
     };
-    if ((result__4LGD ==  0)) {
-      ((__STRING *)st__PO3E)->count__4FC= 0;
+    if ((result__KLGD ==  0)) {
+      ((__STRING *)st__PG3E)->count__EGC= 0;
     } else {
-      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__FZHH=((__STRING *)st__PG3E);
+      end__BZHH=(__INTEGER)(i__QG3E -  1);
+      len__DZHH=(__INTEGER)((__INTEGER)(end__BZHH - result__KLGD) +  1);
+      if ((len__DZHH >  0)) {
+        __tmp__EZHH=(__INTEGER)(end__BZHH +  1);
+        __tmp__GZHH=Self__FZHH->count__EGC;
+        Self__HZHH=__tmp__EZHH;
+        while ((Self__HZHH <= __tmp__GZHH)) {
+          ((__CHARACTER *)Self__FZHH->storage__23R)[(__INTEGER)((__INTEGER)(Self__HZHH - len__DZHH) -  1)]=((__CHARACTER *)Self__FZHH->storage__23R)[(__INTEGER)(Self__HZHH -  1)];
+          Self__HZHH=(__INTEGER)(Self__HZHH +  1);
         };
-        Self__AOHH->count__4FC=(__INTEGER)(Self__AOHH->count__4FC - len__4NHH);
+        Self__FZHH->count__EGC=(__INTEGER)(Self__FZHH->count__EGC - len__DZHH);
       };
     };
   };
-  if ((((__STRING *)st__PO3E)->count__4FC ==  0)) {
-    add_last__BMT(st__PO3E,'/');
+  if ((((__STRING *)st__PG3E)->count__EGC ==  0)) {
+    add_last__UHT(st__PG3E,'/');
   };
 }
 
-static void* item__1WPE(__DIRECTORY_UNIX *Self__2WPE,__INTEGER i__3WPE)
+static void* item__YVPE(__DIRECTORY_UNIX *Self__ZVPE,__INTEGER i__0VPE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __LINKED_LISToENTRYo *Self__UXWE;
+  Self__UXWE=((__LINKED_LISToENTRYo *)Self__ZVPE->parent_directory__HFD.list__4DRD);
+  if ((i__0VPE != Self__UXWE->mem_idx__IFWE)) {
+    if ((Self__UXWE->mem_idx__IFWE > i__0VPE)) {
+      Self__UXWE->mem_idx__IFWE= 1;
+      Self__UXWE->mem_lnk__JFWE=Self__UXWE->first_link__BFWE;
     };
-    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);
+    while ((i__0VPE != Self__UXWE->mem_idx__IFWE)) {
+      Self__UXWE->mem_lnk__JFWE=((__LINKED_LIST_NODEoENTRYo *)Self__UXWE->mem_lnk__JFWE)->next__YTFF;
+      Self__UXWE->mem_idx__IFWE=(__INTEGER)(Self__UXWE->mem_idx__IFWE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__VNWE->mem_lnk__N1VE)->item__IOWE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__UXWE->mem_lnk__JFWE)->item__HYWE);
 }
 
-static void* item__A1ND(__LINKED_LISToSTRING_CONSTANTo *Self__B1ND,__INTEGER i__C1ND)
+static void* item__MZND(__LINKED_LISToSTRING_CONSTANTo *Self__NZND,__INTEGER i__OZND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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;
+  if ((i__OZND != Self__NZND->mem_idx__FSEC)) {
+    if ((Self__NZND->mem_idx__FSEC > i__OZND)) {
+      Self__NZND->mem_idx__FSEC= 1;
+      Self__NZND->mem_lnk__HSEC=Self__NZND->first_link__1REC;
     };
-    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);
+    while ((i__OZND != Self__NZND->mem_idx__FSEC)) {
+      Self__NZND->mem_lnk__HSEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__NZND->mem_lnk__HSEC)->next__4MOD;
+      Self__NZND->mem_idx__FSEC=(__INTEGER)(Self__NZND->mem_idx__FSEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__B1ND->mem_lnk__YUEC)->item__CWHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__NZND->mem_lnk__HSEC)->item__GWHD);
 }
 
-static void** create__123(__INTEGER nb_elements__323)
+static void** create__GY3(__INTEGER nb_elements__IY3)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__O3DH,a__T3DH,new_size__P3DH,new_size2__Q3DH,a__WZFH;
+  __UINTEGER_32 new_size__XZFH;
+  __POINTER result__N3DH,ptr_table__C2IH,next__B2IH,result__D2IH;
+  void *result__G2IH;
+  __INTEGER Self__IYJC;
+  void **Result__SQEB;
+  sz__O3DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__IY3 * ((__INTEGER )(sizeof(void *)))));
+  result__N3DH=((__POINTER )(NULL));
+  a__T3DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__P3DH=(__UINTEGER_32)((__UINTEGER_32)(sz__O3DH + a__T3DH) & (__UINTEGER_32)(~ a__T3DH));
+  new_size2__Q3DH=(__UINTEGER_32)(new_size__P3DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__Q3DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XZFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__Q3DH + a__WZFH) & (__UINTEGER_32)(~ a__WZFH));
+    ptr_table__C2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__B2IH=((__POINTER )(NULL));
+    result__D2IH=((__POINTER *)ptr_table__C2IH)[ 0];
+    if ((result__D2IH == (void *)NULL)) {
+      result__D2IH=new_lab__QOJ(new_size__XZFH);
+      next__B2IH=(void *)((unsigned long)result__D2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XZFH)));
+      ((__POINTER *)next__B2IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__C2IH)[ 0]=next__B2IH;
+    } else {
+      next__B2IH=((__POINTER *)result__D2IH)[ 0];
+      if ((next__B2IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D2IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XZFH <<  1)) <=  4096)) {
+          next__B2IH=(void *)((unsigned long)result__D2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XZFH)));
+        } else {
+          next__B2IH=new_lab__QOJ(new_size__XZFH);
+        };
+        ((__POINTER *)next__B2IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__C2IH)[ 0]=next__B2IH;
+      } else {
+        ((__POINTER *)result__D2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__D2IH=next__B2IH;
+      };
+    };
+    ((__POINTER *)result__D2IH)[ 0]=((__POINTER ) 3);
+    result__N3DH=(void *)((unsigned long)result__D2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__G2IH=first_free__VAVB;
+    while ((((void *)result__G2IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__G2IH)->map_size_and_id__YTB &  4294967292LU) < new_size__P3DH))) {
+      result__G2IH=((__MEMORY *)result__G2IH)->map_next_free__ZTB;
     };
-    if (((void *)result__XRIH == (void *)NULL)) {
-      result__XRIH=new_page__WA5();
+    if (((void *)result__G2IH == (void *)NULL)) {
+      result__G2IH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__G2IH,new_size__P3DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__G2IH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__N3DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__G2IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__SQEB=((void **)result__N3DH);
+  Self__IYJC=(__INTEGER)(nb_elements__IY3 -  1);
+  while ((Self__IYJC >=  0)) {
+    Result__SQEB[Self__IYJC]=NULL;
+    Self__IYJC=(__INTEGER)(Self__IYJC -  1);
   };
-  return(Result__HVEB);
+  return(Result__SQEB);
 }
 
-static __BOOLEAN read_word__YPF(void *st__0PF)
+static __BOOLEAN read_word__4MF(void *st__ANF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__CNF,idx__DNF;
+  __BOOLEAN result__ENF,__tmp__COF;
+  __CHARACTER result__0KAH;
+  posold__CNF= 0;
+  idx__DNF= 0;
+  result__ENF=FALSE__;
+  if ((! read_space__KSD())) {
+    result__ENF=FALSE__;
   } else {
-    posold__2PF=position__0BC;
-    idx__3PF= 1;
-    until_do__RA4:
+    posold__CNF=position__CCC;
+    idx__DNF= 1;
+    until_do__213:
     {
-      if ((idx__3PF > ((__STRING_CONSTANT *)st__0PF)->count__DD)) {
-        __tmp__2QF=TRUE__;
+      if ((idx__DNF > ((__STRING_CONSTANT *)st__ANF)->count__DD)) {
+        __tmp__COF=TRUE__;
       } else {
-        result__X35G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__X35G=((__CHARACTER )(( 0)));
+        result__0KAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__0KAH=((__CHARACTER )(( 0)));
         } else {
-          result__X35G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__0KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__2QF=(result__X35G != ((__CHARACTER *)((__STRING_CONSTANT *)st__0PF)->storage__3QO)[(__INTEGER)(idx__3PF -  1)]);
+        __tmp__COF=(result__0KAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__ANF)->storage__QMO)[(__INTEGER)(idx__DNF -  1)]);
       };
-      if ((! __tmp__2QF)) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        idx__3PF=(__INTEGER)(idx__3PF +  1);
-        goto until_do__RA4;
+      if ((! __tmp__COF)) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        idx__DNF=(__INTEGER)(idx__DNF +  1);
+        goto until_do__213;
       };
     };
-    if ((idx__3PF > ((__STRING_CONSTANT *)st__0PF)->count__DD)) {
-      last_string__Q0C=st__0PF;
-      result__4PF=TRUE__;
+    if ((idx__DNF > ((__STRING_CONSTANT *)st__ANF)->count__DD)) {
+      last_string__V0C=st__ANF;
+      result__ENF=TRUE__;
     } else {
-      position__0BC=posold__2PF;
+      position__CCC=posold__CNF;
     };
   };
-  return(result__4PF);
+  return(result__ENF);
 }
 
-static __BOOLEAN read_slot_header__0DE(__BOOLEAN first__2DE)
+static __BOOLEAN read_slot_header__AAE(__BOOLEAN first__CAE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *v__GAE;
+  void *instr__OAE;
+  __POSITION pos__0MXG,pos__2MXG,pos__4MXG,pos__ANXG,pos__CNXG;
+  __POSITION pos__ENXG,pos__GNXG,pos__VW1G,pos__INXG,pos__KNXG;
+  __POSITION pos__MNXG,pos__ONXG,pos__XW1G,pos__QNXG,pos__SNXG;
+  __POSITION pos__UNXG,pos__WNXG,pos__YNXG,pos__0NXG,pos__2NXG;
+  __POSITION pos__4NXG,pos__AOXG,pos__COXG,pos__EOXG,pos__ZW1G;
+  __POSITION pos__GOXG,pos__IOXG,pos__AFM,pos__KOXG,pos__MOXG,pos__OOXG;
+  __POSITION pos__QOXG,__tmp__LBQD,__tmp__QBQD,__tmp__1W1G,pos__SOXG;
+  __POSITION pos__UOXG,pos__WOXG,pos__YOXG,pos__0OXG,pos__2OXG;
+  void *res__KFE,*__tmp__MHE;
+  __INTEGER __tmp__DHE,__tmp__FHE,__tmp__HHE,typ_id__LZHH,typ_id__VZHH;
+  void *n__1ZFH,*n__ULGB;
+  void *result__2ZFH,*result__2LGB;
+  __ITM_TYPE_PARAMETER *result__JZHH,*Self__RZHH,*result__TZHH;
+  __ITM_TYPE_PARAMETER *Self__1ZHH;
+  __POINTER ptr__KZHH,ptr_table__U2IH,next__T2IH,result__V2IH;
+  __POINTER ptr_table__Z2IH,next__Y2IH,result__02IH,ptr__UZHH;
+  __POINTER ptr_table__E3IH,next__D3IH,result__F3IH,ptr_table__J3IH;
+  __POINTER next__I3IH,result__K3IH;
+  __UINTEGER_32 sz__MZHH,a__NZHH,new_size__OZHH,t__PZHH,a__QZHH;
+  __UINTEGER_32 new_size__22IH,lab_type__12IH,sz__WZHH,a__XZHH;
+  __UINTEGER_32 new_size__YZHH,t__ZZHH,a__0ZHH,new_size__M3IH;
+  __UINTEGER_32 lab_type__L3IH;
+  __BOOLEAN result__EAE,result__K2IH,__tmp__UDE,result__M2IH;
+  __BOOLEAN result__N2IH,__tmp__MFE,result__Q2IH,__tmp__2FE,__tmp__KGE;
+  __BOOLEAN result__FPL,__tmp__YGE,result__32IH,result__A3IH;
+  __BOOLEAN result__N3IH,__tmp__XLE,__tmp__3NE,__tmp__JME,__tmp__TPE;
+  __BOOLEAN result__O2G,__tmp__PRE,result__A3G,__tmp__LTE,result__S3G;
+  __BOOLEAN __tmp__YUE,result__E4G,__tmp__4WE,result__W4G,result__Q3IH;
+  __BOOLEAN result__T3IH,result__W3IH,result__Z3IH;
+  __CHARACTER style__IAE,result__O2IH,result__R2IH,result__42IH;
+  __CHARACTER result__B3IH,result__O3IH,result__R3IH,result__U3IH;
+  __CHARACTER result__X3IH,result__03IH;
+  result__EAE=FALSE__;
+  v__GAE=NULL;
+  instr__OAE=NULL;
+  style__IAE=read_style__FPF();
+  if ((style__IAE != ' ')) {
+    result__EAE=TRUE__;
+    if (((! first__CAE) && (style__IAE == '+'))) {
+      pos__0MXG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_252));
+      put_position__CMG(pos__0MXG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    if (first__CAE) {
+      if (read_word__4MF((&__string_62))) {
+        if ((style__IAE == '-')) {
+          append__2JS(output_decl__LCE,(&__string_253));
+        };
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.parent_itm_object__4.position__RAJ=current_position__XUF();
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.style__25T=style__IAE;
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__2MXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__2MXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__1RIH=read_word__YPF((&__string_9));
-        if (is_shorter__FZ) {
-          if (result__1RIH) {
+        result__K2IH=read_word__4MF((&__string_9));
+        if (is_shorter__LZ) {
+          if (result__K2IH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
-              short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+              short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             } else {
-              short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+              short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             };
           };
         };
-        if (result__1RIH) {
-          __tmp__OHE=TRUE__;
+        if (result__K2IH) {
+          __tmp__UDE=TRUE__;
         } else {
-          result__3RIH=read_word__YPF((&__string_10));
-          if (is_shorter__FZ) {
-            if (result__3RIH) {
+          result__M2IH=read_word__4MF((&__string_10));
+          if (is_shorter__LZ) {
+            if (result__M2IH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
-                short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+                short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
               } else {
-                short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+                short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
               };
             };
           };
-          __tmp__OHE=result__3RIH;
+          __tmp__UDE=result__M2IH;
         };
-        if (__tmp__OHE) {
-          ((__PROTOTYPE *)object__RBC)->type_style__52C=last_string__Q0C;
+        if (__tmp__UDE) {
+          ((__PROTOTYPE *)object__ZBC)->type_style__E3C=last_string__V0C;
         };
-        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)) {
+        if ((! read_cap_identifier__MWJ())) {
+          pos__4MXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_255));
+          put_position__CMG(pos__4MXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        short__token__to__YBD((&__string_125),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if (((void *)((__PROTOTYPE *)object__ZBC)->shortname__TEE != (void *)last_string__V0C)) {
+          pos__ANXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_256));
+          put_position__CMG(pos__ANXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__4RIH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__4RIH=FALSE__;
+        result__N2IH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__N2IH=FALSE__;
         } else {
-          result__5RIH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__5RIH=((__CHARACTER )(( 0)));
+          result__O2IH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__O2IH=((__CHARACTER )(( 0)));
           } else {
-            result__5RIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__O2IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5RIH == '(')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__4RIH=TRUE__;
+          if ((result__O2IH == '(')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__N2IH=TRUE__;
           };
         };
-        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)) {
+        if (result__N2IH) {
+          if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
+            pos__CNXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_257));
+            put_position__CMG(pos__CNXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          res__EJE=NULL;
-          __tmp__GJE=read_identifier__TAL();
-          if (__tmp__GJE) {
-            result__BSIH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__BSIH=FALSE__;
+          res__KFE=NULL;
+          __tmp__MFE=read_identifier__12K();
+          if (__tmp__MFE) {
+            result__Q2IH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__Q2IH=FALSE__;
             } else {
-              result__CSIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__CSIH=((__CHARACTER )(( 0)));
+              result__R2IH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__R2IH=((__CHARACTER )(( 0)));
               } else {
-                result__CSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__R2IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__CSIH == ':')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__BSIH=TRUE__;
+              if ((result__R2IH == ':')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__Q2IH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__Q2IH)) {
+              pos__ENXG=current_position__XUF();
+              put_error__text__YKG( 2,(&__string_258));
+              put_position__CMG(pos__ENXG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            __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)) {
+            __tmp__2FE=((void *)read_type__B4L(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__2FE) {
+              pos__GNXG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_259));
+              put_position__CMG(pos__GNXG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            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)) {
+            pos__VW1G=current_position__XUF();
+            put_error__text__YKG( 1,(&__string_260));
+            put_position__CMG(pos__VW1G);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
-            __tmp__EKE=TRUE__;
+            __tmp__KGE=TRUE__;
           } else {
-            __tmp__EKE=FALSE__;
+            __tmp__KGE=FALSE__;
           };
-          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)) {
+          if ((! __tmp__KGE)) {
+            result__FPL=read_cap_identifier__MWJ();
+            if (result__FPL) {
+              __tmp__YGE=is_parameter_type__WGE;
+              if ((! __tmp__YGE)) {
+                pos__INXG=current_position__XUF();
+                put_error__text__YKG( 0,(&__string_261));
+                put_position__CMG(pos__INXG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              __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__;
+              __tmp__DHE=position__CCC;
+              __tmp__FHE=((__STRING_CONSTANT *)last_string__V0C)->count__DD;
+              __tmp__HHE=(__INTEGER)(__tmp__DHE - __tmp__FHE);
+              short__token__to__YBD((&__string_126),__tmp__HHE,position__CCC);
+              n__1ZFH=last_string__V0C;
+              result__2ZFH=fast_reference_at__TXT(dico__WQI,n__1ZFH);
+              if (((void *)result__2ZFH == (void *)NULL)) {
+                result__JZHH=NULL;
+                ptr__KZHH=((__POINTER )(NULL));
+                typ_id__LZHH= 0;
+                sz__MZHH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__MZHH ==  0)) {
+                  result__JZHH=ITM_TYPE_PARAMETER__;
                 } else {
-                  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;
+                  typ_id__LZHH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MZHH);
+                  if ((typ_id__LZHH == (__INTEGER)(-  1))) {
+                    a__NZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__OZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MZHH + a__NZHH) & (__UINTEGER_32)(~ a__NZHH));
+                    ptr_table__U2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OZHH / ((__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__QOJ(new_size__OZHH);
+                      next__T2IH=(void *)((unsigned long)result__V2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZHH)));
+                      ((__POINTER *)next__T2IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__U2IH)[ 0]=next__T2IH;
                     } else {
-                      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)));
+                      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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OZHH <<  1)) <=  4096)) {
+                          next__T2IH=(void *)((unsigned long)result__V2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OZHH)));
                         } else {
-                          next__ESIH=new_lab__URJ(new_size__KOHH);
+                          next__T2IH=new_lab__QOJ(new_size__OZHH);
                         };
-                        ((__POINTER *)next__ESIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FSIH)[ 0]=next__ESIH;
+                        ((__POINTER *)next__T2IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__U2IH)[ 0]=next__T2IH;
                       } else {
-                        ((__POINTER *)result__GSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ESIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GSIH=next__ESIH;
+                        ((__POINTER *)result__V2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__V2IH=next__T2IH;
                       };
                     };
-                    ptr__GOHH=result__GSIH;
+                    ptr__KZHH=result__V2IH;
                   } else {
-                    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;
+                    t__PZHH=((__UINTEGER_32 )typ_id__LZHH);
+                    a__QZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__22IH=(__UINTEGER_32)((__UINTEGER_32)(sz__MZHH + a__QZHH) & (__UINTEGER_32)(~ a__QZHH));
+                    ptr_table__Z2IH=((__POINTER )(&(table_type[(t__PZHH)])));
+                    lab_type__12IH=(__UINTEGER_32)(t__PZHH |  1);
+                    next__Y2IH=((__POINTER )(NULL));
+                    result__02IH=((__POINTER *)ptr_table__Z2IH)[ 0];
+                    if ((result__02IH == (void *)NULL)) {
+                      result__02IH=new_lab__QOJ(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__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)));
+                      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__3SH)))) &  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__JSIH=new_lab__URJ(lab_type__MSIH);
+                          next__Y2IH=new_lab__QOJ(lab_type__12IH);
                         };
-                        ((__POINTER *)next__JSIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__KSIH)[ 0]=next__JSIH;
+                        ((__POINTER *)next__Y2IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__Z2IH)[ 0]=next__Y2IH;
                       } else {
-                        ((__POINTER *)result__LSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__LSIH=next__JSIH;
+                        ((__POINTER *)result__02IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__02IH=next__Y2IH;
                       };
                     };
-                    ptr__GOHH=result__LSIH;
+                    ptr__KZHH=result__02IH;
                   };
-                  result__FOHH=((__ITM_TYPE_PARAMETER *)ptr__GOHH);
-                  *(result__FOHH) = *(ITM_TYPE_PARAMETER__);
+                  result__JZHH=((__ITM_TYPE_PARAMETER *)ptr__KZHH);
+                  *(result__JZHH) = *(ITM_TYPE_PARAMETER__);
                 };
-                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;
+                Self__RZHH=((__ITM_TYPE_PARAMETER *)result__JZHH);
+                Self__RZHH->parent_itm_type__LAE.name__FUP=n__1ZFH;
+                fast_put__to__GKZ(dico__WQI,Self__RZHH,n__1ZFH);
+                result__2ZFH=result__JZHH;
               };
-              if (result__JOFH==NULL) {
-                __tmp__GLE=NULL;
+              if (result__2ZFH==NULL) {
+                __tmp__MHE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__JOFH)->__id) {
+                switch (((struct ___OBJ *)result__2ZFH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__GLE=((void *)result__JOFH);
+                  __tmp__MHE=((void *)result__2ZFH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__GLE=NULL;
+                  __tmp__MHE=NULL;
                 } break;
                 }
               };
-              res__EJE=__tmp__GLE;
+              res__KFE=__tmp__MHE;
             };
           };
-          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)) {
+          if (((void *)res__KFE == (void *)NULL)) {
+            pos__KNXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_261));
+            put_position__CMG(pos__KNXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__0BBC(((__PROTOTYPE *)object__RBC)->idf_generic_list__2ME,res__EJE);
-          while_do__CXK:
+          add_last__C5AC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__CJE,res__KFE);
+          while_do__KTK:
           {
-            result__OSIH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__OSIH=FALSE__;
+            result__32IH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__32IH=FALSE__;
             } else {
-              result__PSIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__PSIH=((__CHARACTER )(( 0)));
+              result__42IH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__42IH=((__CHARACTER )(( 0)));
               } else {
-                result__PSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__42IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__PSIH == ',')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__OSIH=TRUE__;
+              if ((result__42IH == ',')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__32IH=TRUE__;
               };
             };
-            if (result__OSIH) {
-              res__EJE=NULL;
-              __tmp__GJE=read_identifier__TAL();
-              if (__tmp__GJE) {
-                result__RSIH=FALSE__;
-                if ((! read_space__FSD())) {
-                  result__RSIH=FALSE__;
+            if (result__32IH) {
+              res__KFE=NULL;
+              __tmp__MFE=read_identifier__12K();
+              if (__tmp__MFE) {
+                result__A3IH=FALSE__;
+                if ((! read_space__KSD())) {
+                  result__A3IH=FALSE__;
                 } else {
-                  result__SSIH='\0';
-                  if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                    result__SSIH=((__CHARACTER )(( 0)));
+                  result__B3IH='\0';
+                  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                    result__B3IH=((__CHARACTER )(( 0)));
                   } else {
-                    result__SSIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                    result__B3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__SSIH == ':')) {
-                    position__0BC=(__INTEGER)(position__0BC +  1);
-                    result__RSIH=TRUE__;
+                  if ((result__B3IH == ':')) {
+                    position__CCC=(__INTEGER)(position__CCC +  1);
+                    result__A3IH=TRUE__;
                   };
                 };
-                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)) {
+                if ((! result__A3IH)) {
+                  pos__MNXG=current_position__XUF();
+                  put_error__text__YKG( 2,(&__string_258));
+                  put_position__CMG(pos__MNXG);
+                  put_string__CZF(msg_err__3KG);
+                  if ((type_error__2KG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __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)) {
+                __tmp__2FE=((void *)read_type__B4L(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__2FE) {
+                  pos__ONXG=current_position__XUF();
+                  put_error__text__YKG( 0,(&__string_259));
+                  put_position__CMG(pos__ONXG);
+                  put_string__CZF(msg_err__3KG);
+                  if ((type_error__2KG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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)) {
+                pos__XW1G=current_position__XUF();
+                put_error__text__YKG( 1,(&__string_260));
+                put_position__CMG(pos__XW1G);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__EKE=TRUE__;
+                __tmp__KGE=TRUE__;
               } else {
-                __tmp__EKE=FALSE__;
-              };
-              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)) {
+                __tmp__KGE=FALSE__;
+              };
+              if ((! __tmp__KGE)) {
+                result__FPL=read_cap_identifier__MWJ();
+                if (result__FPL) {
+                  __tmp__YGE=is_parameter_type__WGE;
+                  if ((! __tmp__YGE)) {
+                    pos__QNXG=current_position__XUF();
+                    put_error__text__YKG( 0,(&__string_261));
+                    put_position__CMG(pos__QNXG);
+                    put_string__CZF(msg_err__3KG);
+                    if ((type_error__2KG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __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__;
+                  __tmp__DHE=position__CCC;
+                  __tmp__FHE=((__STRING_CONSTANT *)last_string__V0C)->count__DD;
+                  __tmp__HHE=(__INTEGER)(__tmp__DHE - __tmp__FHE);
+                  short__token__to__YBD((&__string_126),__tmp__HHE,position__CCC);
+                  n__ULGB=last_string__V0C;
+                  result__2LGB=fast_reference_at__TXT(dico__WQI,n__ULGB);
+                  if (((void *)result__2LGB == (void *)NULL)) {
+                    result__TZHH=NULL;
+                    ptr__UZHH=((__POINTER )(NULL));
+                    typ_id__VZHH= 0;
+                    sz__WZHH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__WZHH ==  0)) {
+                      result__TZHH=ITM_TYPE_PARAMETER__;
                     } else {
-                      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;
+                      typ_id__VZHH=-1;
+                      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WZHH);
+                      if ((typ_id__VZHH == (__INTEGER)(-  1))) {
+                        a__XZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__YZHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZHH + a__XZHH) & (__UINTEGER_32)(~ a__XZHH));
+                        ptr_table__E3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YZHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__D3IH=((__POINTER )(NULL));
+                        result__F3IH=((__POINTER *)ptr_table__E3IH)[ 0];
+                        if ((result__F3IH == (void *)NULL)) {
+                          result__F3IH=new_lab__QOJ(new_size__YZHH);
+                          next__D3IH=(void *)((unsigned long)result__F3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZHH)));
+                          ((__POINTER *)next__D3IH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__E3IH)[ 0]=next__D3IH;
                         } else {
-                          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)));
+                          next__D3IH=((__POINTER *)result__F3IH)[ 0];
+                          if ((next__D3IH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__F3IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YZHH <<  1)) <=  4096)) {
+                              next__D3IH=(void *)((unsigned long)result__F3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YZHH)));
                             } else {
-                              next__USIH=new_lab__URJ(new_size__UOHH);
+                              next__D3IH=new_lab__QOJ(new_size__YZHH);
                             };
-                            ((__POINTER *)next__USIH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__VSIH)[ 0]=next__USIH;
+                            ((__POINTER *)next__D3IH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__E3IH)[ 0]=next__D3IH;
                           } else {
-                            ((__POINTER *)result__WSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__WSIH=next__USIH;
+                            ((__POINTER *)result__F3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__F3IH=next__D3IH;
                           };
                         };
-                        ptr__QOHH=result__WSIH;
+                        ptr__UZHH=result__F3IH;
                       } else {
-                        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;
+                        t__ZZHH=((__UINTEGER_32 )typ_id__VZHH);
+                        a__0ZHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__M3IH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZHH + a__0ZHH) & (__UINTEGER_32)(~ a__0ZHH));
+                        ptr_table__J3IH=((__POINTER )(&(table_type[(t__ZZHH)])));
+                        lab_type__L3IH=(__UINTEGER_32)(t__ZZHH |  1);
+                        next__I3IH=((__POINTER )(NULL));
+                        result__K3IH=((__POINTER *)ptr_table__J3IH)[ 0];
+                        if ((result__K3IH == (void *)NULL)) {
+                          result__K3IH=new_lab__QOJ(lab_type__L3IH);
+                          next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3IH)));
+                          ((__POINTER *)next__I3IH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__J3IH)[ 0]=next__I3IH;
                         } else {
-                          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)));
+                          next__I3IH=((__POINTER *)result__K3IH)[ 0];
+                          if ((next__I3IH == (void *)NULL)) {
+                            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__K3IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__M3IH <<  1)) <=  4096)) {
+                              next__I3IH=(void *)((unsigned long)result__K3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M3IH)));
                             } else {
-                              next__ZSIH=new_lab__URJ(lab_type__2SIH);
+                              next__I3IH=new_lab__QOJ(lab_type__L3IH);
                             };
-                            ((__POINTER *)next__ZSIH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__0SIH)[ 0]=next__ZSIH;
+                            ((__POINTER *)next__I3IH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__J3IH)[ 0]=next__I3IH;
                           } else {
-                            ((__POINTER *)result__1SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__1SIH=next__ZSIH;
+                            ((__POINTER *)result__K3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__K3IH=next__I3IH;
                           };
                         };
-                        ptr__QOHH=result__1SIH;
+                        ptr__UZHH=result__K3IH;
                       };
-                      result__POHH=((__ITM_TYPE_PARAMETER *)ptr__QOHH);
-                      *(result__POHH) = *(ITM_TYPE_PARAMETER__);
+                      result__TZHH=((__ITM_TYPE_PARAMETER *)ptr__UZHH);
+                      *(result__TZHH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    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;
+                    Self__1ZHH=((__ITM_TYPE_PARAMETER *)result__TZHH);
+                    Self__1ZHH->parent_itm_type__LAE.name__FUP=n__ULGB;
+                    fast_put__to__GKZ(dico__WQI,Self__1ZHH,n__ULGB);
+                    result__2LGB=result__TZHH;
                   };
-                  if (result__QQGB==NULL) {
-                    __tmp__GLE=NULL;
+                  if (result__2LGB==NULL) {
+                    __tmp__MHE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__QQGB)->__id) {
+                    switch (((struct ___OBJ *)result__2LGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__GLE=((void *)result__QQGB);
+                      __tmp__MHE=((void *)result__2LGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__GLE=NULL;
+                      __tmp__MHE=NULL;
                     } break;
                     }
                   };
-                  res__EJE=__tmp__GLE;
+                  res__KFE=__tmp__MHE;
                 };
               };
-              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)) {
+              if (((void *)res__KFE == (void *)NULL)) {
+                pos__SNXG=current_position__XUF();
+                put_error__text__YKG( 0,(&__string_261));
+                put_position__CMG(pos__SNXG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__0BBC(((__PROTOTYPE *)object__RBC)->idf_generic_list__2ME,res__EJE);
-              goto while_do__CXK;
+              add_last__C5AC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__CJE,res__KFE);
+              goto while_do__KTK;
             };
           };
-          result__4SIH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__4SIH=FALSE__;
+          result__N3IH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__N3IH=FALSE__;
           } else {
-            result__5SIH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__5SIH=((__CHARACTER )(( 0)));
+            result__O3IH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__O3IH=((__CHARACTER )(( 0)));
             } else {
-              result__5SIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__O3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__5SIH == ')')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__4SIH=TRUE__;
+            if ((result__O3IH == ')')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__N3IH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__N3IH)) {
+            pos__UNXG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_262));
+            put_position__CMG(pos__UNXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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)) {
+          if (((! is_shorter__LZ) && (! is_shorter2__VI))) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__ZBC)->idf_generic_list__CJE)->parent_arrayed_collection__BJE.upper__G5AC +  1) !=  0)) {
+              pos__WNXG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_263));
+              put_position__CMG(pos__WNXG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        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)) {
+        pos__YNXG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_264));
+        put_position__CMG(pos__YNXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__RPE=TRUE__;
+      __tmp__XLE=TRUE__;
     } else {
-      __tmp__RPE=FALSE__;
+      __tmp__XLE=FALSE__;
     };
-    if (__tmp__RPE) {
-      __tmp__XRE=TRUE__;
+    if (__tmp__XLE) {
+      __tmp__3NE=TRUE__;
     } else {
-      __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)) {
+      __tmp__JME=(read_word__4MF((&__string_63)) || read_word__4MF((&__string_64)));
+      if (__tmp__JME) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__0NXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__0NXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)read_type_list__DIO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__2NXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_265));
+          put_position__CMG(pos__2NXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__XRE=__tmp__DQE;
+      __tmp__3NE=__tmp__JME;
     };
-    if (__tmp__XRE) {
-      __tmp__NTE=TRUE__;
+    if (__tmp__3NE) {
+      __tmp__TPE=TRUE__;
     } else {
-      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)) {
+      result__O2G=read_word__4MF((&__string_65));
+      if (result__O2G) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__4NXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__4NXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__1OO())) {
+          pos__AOXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_266));
+          put_position__CMG(pos__AOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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');
+        append__2JS(output_decl__LCE,(&__string_267));
+        append__2JS(output_decl__LCE,((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI);
+        add_last__UHT(output_decl__LCE,'\n');
+        append__2JS(output_decl__LCE,last_string__V0C);
+        add_last__UHT(output_decl__LCE,'\n');
       };
-      __tmp__NTE=result__I5G;
+      __tmp__TPE=result__O2G;
     };
-    if (__tmp__NTE) {
-      __tmp__JVE=TRUE__;
+    if (__tmp__TPE) {
+      __tmp__PRE=TRUE__;
     } else {
-      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)) {
+      result__A3G=read_word__4MF((&__string_66));
+      if (result__A3G) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__COXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__COXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        v__GAE=read_expr_primary__D0M(PARSER__);
+        if (((void *)v__GAE == (void *)NULL)) {
+          pos__EOXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_268));
+          put_position__CMG(pos__EOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->default_value__BRE != (void *)NULL)) {
+          pos__ZW1G=current_position__XUF();
+          put_error__text__YKG( 1,(&__string_269));
+          put_position__CMG(pos__ZW1G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__RBC)->default_value__1UE=v__AEE;
+        ((__PROTOTYPE *)object__ZBC)->default_value__BRE=v__GAE;
       };
-      __tmp__JVE=result__05G;
+      __tmp__PRE=result__A3G;
     };
-    if (__tmp__JVE) {
-      __tmp__FXE=TRUE__;
+    if (__tmp__PRE) {
+      __tmp__LTE=TRUE__;
     } else {
-      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)) {
+      result__S3G=read_word__4MF((&__string_67));
+      if (result__S3G) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__GOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__GOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__1OO())) {
+          pos__IOXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_266));
+          put_position__CMG(pos__IOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->type_c__2SE != (void *)NULL)) {
+          pos__AFM=current_position__XUF();
+          put_error__text__YKG( 1,(&__string_270));
+          put_position__CMG(pos__AFM);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__RBC)->type_c__WWE=last_string__Q0C;
+        ((__PROTOTYPE *)object__ZBC)->type_c__2SE=last_string__V0C;
       };
-      __tmp__FXE=result__MAH;
+      __tmp__LTE=result__S3G;
     };
-    if (__tmp__FXE) {
-      __tmp__SYE=TRUE__;
+    if (__tmp__LTE) {
+      __tmp__YUE=TRUE__;
     } else {
-      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)) {
+      result__E4G=read_word__4MF((&__string_68));
+      if (result__E4G) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__KOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__KOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_integer__1XP())) {
+          pos__MOXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_271));
+          put_position__CMG(pos__MOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__SYE=result__4AH;
+      __tmp__YUE=result__E4G;
     };
-    if (__tmp__SYE) {
-      __tmp__Y0E=TRUE__;
+    if (__tmp__YUE) {
+      __tmp__4WE=TRUE__;
     } else {
-      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)) {
+      result__W4G=read_word__4MF((&__string_88));
+      if (result__W4G) {
+        if ((! read_symbol__3TJ((&__string_14)))) {
+          pos__OOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_272));
+          put_position__CMG(pos__OOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__BTIH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__BTIH=FALSE__;
+        result__Q3IH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__Q3IH=FALSE__;
         } else {
-          result__CTIH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__CTIH=((__CHARACTER )(( 0)));
+          result__R3IH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__R3IH=((__CHARACTER )(( 0)));
           } else {
-            result__CTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__R3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__CTIH == '(')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__BTIH=TRUE__;
+          if ((result__R3IH == '(')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__Q3IH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__Q3IH)) {
+          pos__QOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_273));
+          put_position__CMG(pos__QOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__UGFB:
+        while_do__5BFB:
         {
-          instr__IEE=readlip_expr__RTPB();
-          if (((void *)instr__IEE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__IEE)->__id) {
+          instr__OAE=readlip_expr__PQPB();
+          if (((void *)instr__OAE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__OAE)->__id) {
             case __LIP_AFFECT__: {
-              run__YGFC(instr__IEE);
+              run__HEFC(instr__OAE);
             } break;
             case __LIP_BINARY__: {
-              __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)) {
+              __tmp__LBQD=((__LIP_BINARY *)instr__OAE)->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ;
+              put_error__text__YKG( 2,(&__string_274));
+              put_position__CMG(__tmp__LBQD);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __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)) {
+              __tmp__QBQD=((__LIP_UNARY *)instr__OAE)->parent_lip_code__AY4B.parent_itm_object__NAE.position__RAJ;
+              put_error__text__YKG( 2,(&__string_274));
+              put_position__CMG(__tmp__QBQD);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__W5TE(instr__IEE);
+              run__RJUE(instr__OAE);
             } break;
             case __LIP_IF__: {
-              run__EDQD(instr__IEE);
+              run__SBQD(instr__OAE);
             } break;
             case __LIP_PRINT__: {
-              run__KEUE(instr__IEE);
+              run__FOUE(instr__OAE);
             } break;
             case __LIP_VALUE__: {
-              __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)) {
+              __tmp__1W1G=((__LIP_VALUE *)instr__OAE)->parent_lip_code__KEFE.parent_itm_object__NAE.position__RAJ;
+              put_error__text__YKG( 2,(&__string_274));
+              put_position__CMG(__tmp__1W1G);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__ETIH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__ETIH=FALSE__;
+            result__T3IH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__T3IH=FALSE__;
             } else {
-              result__FTIH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__FTIH=((__CHARACTER )(( 0)));
+              result__U3IH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__U3IH=((__CHARACTER )(( 0)));
               } else {
-                result__FTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__U3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__FTIH == ';')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__ETIH=TRUE__;
+              if ((result__U3IH == ';')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__T3IH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__T3IH)) {
+              pos__SOXG=current_position__XUF();
+              put_error__text__YKG( 2,(&__string_167));
+              put_position__CMG(pos__SOXG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__UGFB;
+            goto while_do__5BFB;
           };
         };
-        result__HTIH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__HTIH=FALSE__;
+        result__W3IH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__W3IH=FALSE__;
         } else {
-          result__ITIH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__ITIH=((__CHARACTER )(( 0)));
+          result__X3IH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__X3IH=((__CHARACTER )(( 0)));
           } else {
-            result__ITIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__X3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__ITIH == ')')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__HTIH=TRUE__;
+          if ((result__X3IH == ')')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__W3IH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__W3IH)) {
+          pos__UOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_238));
+          put_position__CMG(pos__UOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__Y0E=result__QBH;
+      __tmp__4WE=result__W4G;
     };
-    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)) {
+    if ((! __tmp__4WE)) {
+      if (((((((read_word__4MF((&__string_69)) || read_word__4MF((&__string_70))) || read_word__4MF((&__string_71))) || read_word__4MF((&__string_72))) || read_word__4MF((&__string_73))) || read_word__4MF((&__string_74))) || read_word__4MF((&__string_75)))) {
+        short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        if ((! read_symbol__3TJ((&__string_12)))) {
+          pos__WOXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_254));
+          put_position__CMG(pos__WOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_string__GBQ())) {
+          pos__YOXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_275));
+          put_position__CMG(pos__YOXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
+        if (is_shorter2__VI) {
+          ((__PROTOTYPE *)object__ZBC)->comment_slot__ZPTC=last_string__V0C;
+        };
       } else {
-        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)) {
+        pos__0OXG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_276));
+        put_position__CMG(pos__0OXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__KTIH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__KTIH=FALSE__;
+    result__Z3IH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__Z3IH=FALSE__;
     } else {
-      result__LTIH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__LTIH=((__CHARACTER )(( 0)));
+      result__03IH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__03IH=((__CHARACTER )(( 0)));
       } else {
-        result__LTIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__03IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__LTIH == ';')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__KTIH=TRUE__;
+      if ((result__03IH == ';')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__Z3IH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__Z3IH)) {
+      pos__2OXG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_242));
+      put_position__CMG(pos__2OXG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__4DE);
+  return(result__EAE);
 }
 
-static void* get_name__CVOB(void *n__EVOB)
+static void* get_name__OQOB(void *n__QQOB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__SMEC,*result__SQOB;
+  __STRING_CONSTANT *Self__4ZHH,*Self__D0HH,*Self__I0HH;
+  __INTEGER result__3ZHH,__tmp__5ZHH,Self__A0HH,typ_id__Q1YB;
+  __INTEGER result__C0HH,__tmp__E0HH,Self__F0HH,idx__UVFC,idx__C3HD;
+  __INTEGER new_capacity__D3HD,i__E3HD,result__H0HH,__tmp__J0HH;
+  __INTEGER Self__K0HH,typ_id__R5HD;
+  __SECTION_ *result__K1YB,*Self__FVFC;
+  __POINTER ptr__L1YB,ptr_table__33IH,next__23IH,result__43IH;
+  __POINTER ptr_table__C4IH,next__B4IH,result__D4IH,ptr__M5HD;
+  __POINTER ptr_table__H4IH,next__G4IH,result__I4IH,ptr_table__M4IH;
+  __POINTER next__L4IH,result__N4IH;
+  __UINTEGER_32 sz__N1YB,a__N1FH,new_size__O1FH,t__S1FH,a__R1FH;
+  __UINTEGER_32 new_size__F4IH,lab_type__E4IH,sz__O5HD,a__R0FH;
+  __UINTEGER_32 new_size__S0FH,t__W0FH,a__V0FH,new_size__P4IH;
+  __UINTEGER_32 lab_type__O4IH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__GMEC,*Self__KVFC;
+  void *node__RMEC,*node__VVFC,*node1__G3HD,*node2__H3HD,*__tmp__DXFC;
+  void **old_buckets__F3HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__L5HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__ECTD;
+  Self__GMEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__XQOB);
+  result__SMEC=NULL;
+  Self__4ZHH=((__STRING_CONSTANT *)n__QQOB);
+  result__3ZHH= 0;
+  __tmp__5ZHH=Self__4ZHH->count__DD;
+  Self__A0HH= 1;
+  while ((Self__A0HH <= __tmp__5ZHH)) {
+    result__3ZHH=(__INTEGER)((__INTEGER)( 5 * result__3ZHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4ZHH->storage__QMO)[(__INTEGER)(Self__A0HH -  1)])));
+    Self__A0HH=(__INTEGER)(Self__A0HH +  1);
+  };
+  if ((result__3ZHH <  0)) {
+    result__3ZHH=(__INTEGER)(~ result__3ZHH);
+  };
+  node__RMEC=((void **)Self__GMEC->buckets__ZMEC)[(__INTEGER)(result__3ZHH % Self__GMEC->capacity__UMEC)];
+  while ((! (((void *)node__RMEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__RMEC)->key__FNEC == (void *)n__QQOB)))) {
+    node__RMEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__RMEC)->next__QNEC;
+  };
+  if (((void *)node__RMEC != (void *)NULL)) {
+    result__SMEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__RMEC)->item__YNEC;
+  };
+  result__SQOB=result__SMEC;
+  if (((void *)result__SMEC == (void *)NULL)) {
+    result__K1YB=NULL;
+    ptr__L1YB=((__POINTER )(NULL));
+    typ_id__Q1YB= 0;
+    sz__N1YB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__N1YB ==  0)) {
+      result__K1YB=SECTION___;
+    } else {
+      typ_id__Q1YB=__SECTION___;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__N1YB);
+      if ((typ_id__Q1YB == (__INTEGER)(-  1))) {
+        a__N1FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__O1FH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1YB + a__N1FH) & (__UINTEGER_32)(~ a__N1FH));
+        ptr_table__33IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O1FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__23IH=((__POINTER )(NULL));
+        result__43IH=((__POINTER *)ptr_table__33IH)[ 0];
+        if ((result__43IH == (void *)NULL)) {
+          result__43IH=new_lab__QOJ(new_size__O1FH);
+          next__23IH=(void *)((unsigned long)result__43IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1FH)));
+          ((__POINTER *)next__23IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__33IH)[ 0]=next__23IH;
+        } else {
+          next__23IH=((__POINTER *)result__43IH)[ 0];
+          if ((next__23IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__43IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O1FH <<  1)) <=  4096)) {
+              next__23IH=(void *)((unsigned long)result__43IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O1FH)));
             } else {
-              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)));
+              next__23IH=new_lab__QOJ(new_size__O1FH);
+            };
+            ((__POINTER *)next__23IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__33IH)[ 0]=next__23IH;
+          } else {
+            ((__POINTER *)result__43IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__23IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__43IH=next__23IH;
+          };
+        };
+        ptr__L1YB=result__43IH;
+      } else {
+        t__S1FH=((__UINTEGER_32 )typ_id__Q1YB);
+        a__R1FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__F4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1YB + a__R1FH) & (__UINTEGER_32)(~ a__R1FH));
+        ptr_table__C4IH=((__POINTER )(&(table_type[(t__S1FH)])));
+        lab_type__E4IH=(__UINTEGER_32)(t__S1FH |  1);
+        next__B4IH=((__POINTER )(NULL));
+        result__D4IH=((__POINTER *)ptr_table__C4IH)[ 0];
+        if ((result__D4IH == (void *)NULL)) {
+          result__D4IH=new_lab__QOJ(lab_type__E4IH);
+          next__B4IH=(void *)((unsigned long)result__D4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4IH)));
+          ((__POINTER *)next__B4IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__C4IH)[ 0]=next__B4IH;
+        } else {
+          next__B4IH=((__POINTER *)result__D4IH)[ 0];
+          if ((next__B4IH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D4IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__F4IH <<  1)) <=  4096)) {
+              next__B4IH=(void *)((unsigned long)result__D4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F4IH)));
             } else {
-              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)));
+              next__B4IH=new_lab__QOJ(lab_type__E4IH);
+            };
+            ((__POINTER *)next__B4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__C4IH)[ 0]=next__B4IH;
+          } else {
+            ((__POINTER *)result__D4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__D4IH=next__B4IH;
+          };
+        };
+        ptr__L1YB=result__D4IH;
+      };
+      result__K1YB=((__SECTION_ *)ptr__L1YB);
+      *(result__K1YB) = *(SECTION___);
+    };
+    result__SQOB=result__K1YB;
+    Self__FVFC=((__SECTION_ *)result__K1YB);
+    Self__FVFC->name__ZWDC=n__QQOB;
+    Self__FVFC->type_list__IVFC=NULL;
+    Self__KVFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__XQOB);
+    Self__D0HH=((__STRING_CONSTANT *)n__QQOB);
+    result__C0HH= 0;
+    __tmp__E0HH=Self__D0HH->count__DD;
+    Self__F0HH= 1;
+    while ((Self__F0HH <= __tmp__E0HH)) {
+      result__C0HH=(__INTEGER)((__INTEGER)( 5 * result__C0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__D0HH->storage__QMO)[(__INTEGER)(Self__F0HH -  1)])));
+      Self__F0HH=(__INTEGER)(Self__F0HH +  1);
+    };
+    if ((result__C0HH <  0)) {
+      result__C0HH=(__INTEGER)(~ result__C0HH);
+    };
+    idx__UVFC=(__INTEGER)(result__C0HH % Self__KVFC->capacity__UMEC);
+    node__VVFC=((void **)Self__KVFC->buckets__ZMEC)[idx__UVFC];
+    while ((! (((void *)node__VVFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__VVFC)->key__FNEC == (void *)n__QQOB)))) {
+      node__VVFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__VVFC)->next__QNEC;
+    };
+    if (((void *)node__VVFC == (void *)NULL)) {
+      if ((Self__KVFC->capacity__UMEC == Self__KVFC->count__WWFC)) {
+        idx__C3HD= 0;
+        node1__G3HD=NULL;
+        node2__H3HD=NULL;
+        old_buckets__F3HD=Self__KVFC->buckets__ZMEC;
+        new_capacity__D3HD=prime_number_ceiling__K01((__INTEGER)(Self__KVFC->capacity__UMEC +  1));
+        Self__KVFC->buckets__ZMEC=create__D1XC(new_capacity__D3HD);
+        i__E3HD=(__INTEGER)(Self__KVFC->capacity__UMEC -  1);
+        Self__KVFC->capacity__UMEC=new_capacity__D3HD;
+        while ((i__E3HD >=  0)) {
+          node1__G3HD=((void **)old_buckets__F3HD)[i__E3HD];
+          while (((void *)node1__G3HD != (void *)NULL)) {
+            node2__H3HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__G3HD)->next__QNEC;
+            Self__I0HH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__G3HD)->key__FNEC);
+            result__H0HH= 0;
+            __tmp__J0HH=Self__I0HH->count__DD;
+            Self__K0HH= 1;
+            while ((Self__K0HH <= __tmp__J0HH)) {
+              result__H0HH=(__INTEGER)((__INTEGER)( 5 * result__H0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__I0HH->storage__QMO)[(__INTEGER)(Self__K0HH -  1)])));
+              Self__K0HH=(__INTEGER)(Self__K0HH +  1);
+            };
+            if ((result__H0HH <  0)) {
+              result__H0HH=(__INTEGER)(~ result__H0HH);
+            };
+            idx__C3HD=(__INTEGER)(result__H0HH % Self__KVFC->capacity__UMEC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__G3HD)->next__QNEC=((void **)Self__KVFC->buckets__ZMEC)[idx__C3HD];
+            ((void **)Self__KVFC->buckets__ZMEC)[idx__C3HD]=node1__G3HD;
+            node1__G3HD=node2__H3HD;
+          };
+          i__E3HD=(__INTEGER)(i__E3HD -  1);
+        };
+        idx__UVFC=(__INTEGER)(result__C0HH % new_capacity__D3HD);
+      };
+      __tmp__DXFC=((void **)Self__KVFC->buckets__ZMEC)[idx__UVFC];
+      result__L5HD=NULL;
+      ptr__M5HD=((__POINTER )(NULL));
+      typ_id__R5HD= 0;
+      sz__O5HD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__O5HD ==  0)) {
+        result__L5HD=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__R5HD=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O5HD);
+        if ((typ_id__R5HD == (__INTEGER)(-  1))) {
+          a__R0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__S0FH=(__UINTEGER_32)((__UINTEGER_32)(sz__O5HD + a__R0FH) & (__UINTEGER_32)(~ a__R0FH));
+          ptr_table__H4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__S0FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__G4IH=((__POINTER )(NULL));
+          result__I4IH=((__POINTER *)ptr_table__H4IH)[ 0];
+          if ((result__I4IH == (void *)NULL)) {
+            result__I4IH=new_lab__QOJ(new_size__S0FH);
+            next__G4IH=(void *)((unsigned long)result__I4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0FH)));
+            ((__POINTER *)next__G4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
+          } else {
+            next__G4IH=((__POINTER *)result__I4IH)[ 0];
+            if ((next__G4IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I4IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__S0FH <<  1)) <=  4096)) {
+                next__G4IH=(void *)((unsigned long)result__I4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__S0FH)));
               } else {
-                next__XTIH=new_lab__URJ(new_size__5OFH);
+                next__G4IH=new_lab__QOJ(new_size__S0FH);
               };
-              ((__POINTER *)next__XTIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YTIH)[ 0]=next__XTIH;
+              ((__POINTER *)next__G4IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__I4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__I4IH=next__G4IH;
+            };
+          };
+          ptr__M5HD=result__I4IH;
+        } else {
+          t__W0FH=((__UINTEGER_32 )typ_id__R5HD);
+          a__V0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__O5HD + a__V0FH) & (__UINTEGER_32)(~ a__V0FH));
+          ptr_table__M4IH=((__POINTER )(&(table_type[(t__W0FH)])));
+          lab_type__O4IH=(__UINTEGER_32)(t__W0FH |  1);
+          next__L4IH=((__POINTER )(NULL));
+          result__N4IH=((__POINTER *)ptr_table__M4IH)[ 0];
+          if ((result__N4IH == (void *)NULL)) {
+            result__N4IH=new_lab__QOJ(lab_type__O4IH);
+            next__L4IH=(void *)((unsigned long)result__N4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P4IH)));
+            ((__POINTER *)next__L4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
+          } else {
+            next__L4IH=((__POINTER *)result__N4IH)[ 0];
+            if ((next__L4IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N4IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__P4IH <<  1)) <=  4096)) {
+                next__L4IH=(void *)((unsigned long)result__N4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P4IH)));
               } else {
-                next__2TIH=new_lab__URJ(lab_type__5TIH);
+                next__L4IH=new_lab__QOJ(lab_type__O4IH);
               };
-              ((__POINTER *)next__2TIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3TIH)[ 0]=next__2TIH;
+              ((__POINTER *)next__L4IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
             } else {
-              ((__POINTER *)result__4TIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__4TIH=next__2TIH;
+              ((__POINTER *)result__N4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__N4IH=next__L4IH;
             };
           };
-          ptr__I5HD=result__4TIH;
+          ptr__M5HD=result__N4IH;
         };
-        result__H5HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__I5HD);
-        *(result__H5HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__L5HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__M5HD);
+        *(result__L5HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      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);
+      Self__ECTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__L5HD);
+      Self__ECTD->item__YNEC=result__K1YB;
+      Self__ECTD->key__FNEC=n__QQOB;
+      Self__ECTD->next__QNEC=__tmp__DXFC;
+      node__VVFC=result__L5HD;
+      ((void **)Self__KVFC->buckets__ZMEC)[idx__UVFC]=result__L5HD;
+      Self__KVFC->count__WWFC=(__INTEGER)(Self__KVFC->count__WWFC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__GYFC)->item__JQEC=result__34YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__VVFC)->item__YNEC=result__K1YB;
     };
   };
-  return(result__GVOB);
+  return(result__SQOB);
 }
 
-static void* read_type_list__QMO(__PARSER *Self__RMO,__BOOLEAN is_section__SMO)
+static void* read_type_list__DIO(__PARSER *Self__EIO,__BOOLEAN is_section__FIO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *ts__JIO,*__tmp__WIO,*__tmp__AKO;
+  void *t__IIO;
+  __POSITION pos__IRXG,pos__KRXG,pos__MRXG;
+  void *lst__HIO,*result__M0HH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__N0HH,*Self__O0HH;
+  __BOOLEAN result__Q4IH;
+  __CHARACTER result__R4IH;
+  lst__HIO=NULL;
+  ts__JIO=NULL;
+  t__IIO=read_type__B4L(Self__EIO,FALSE__);
+  if (((void *)t__IIO != (void *)NULL)) {
+    if (is_section__FIO) {
+      if (t__IIO==NULL) {
+        __tmp__WIO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__IIO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__DNO=((void *)t__VMO);
+          __tmp__WIO=((void *)t__IIO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__DNO=((void *)t__VMO);
+          __tmp__WIO=((void *)t__IIO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__DNO=NULL;
+          __tmp__WIO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__DNO=((void *)t__VMO);
+          __tmp__WIO=((void *)t__IIO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__DNO=((void *)t__VMO);
+          __tmp__WIO=((void *)t__IIO);
         } break;
         }
       };
-      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)) {
+      ts__JIO=__tmp__WIO;
+      if (((void *)__tmp__WIO == (void *)NULL)) {
+        pos__IRXG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_277));
+        put_position__CMG(pos__IRXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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);
+    result__M0HH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP)->parent_arrayed_collection__EQP.upper__YQV <  0)) {
+      result__M0HH=create_with_capacity__DBR( 16);
     } else {
-      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);
+      Self__N0HH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+      result__M0HH=((void **)Self__N0HH->parent_arrayed_collection__EQP.storage__OVV)[Self__N0HH->parent_arrayed_collection__EQP.upper__YQV];
+      Self__O0HH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+      Self__O0HH->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(Self__O0HH->parent_arrayed_collection__EQP.upper__YQV -  1);
     };
-    lst__UMO=result__IPHH;
-    add_last__COV(result__IPHH,t__VMO);
-    while_do__EVP:
+    lst__HIO=result__M0HH;
+    add_last__NJV(result__M0HH,t__IIO);
+    while_do__XQP:
     {
-      result__BUIH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__BUIH=FALSE__;
+      result__Q4IH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__Q4IH=FALSE__;
       } else {
-        result__CUIH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__CUIH=((__CHARACTER )(( 0)));
+        result__R4IH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__R4IH=((__CHARACTER )(( 0)));
         } else {
-          result__CUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__R4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__CUIH == ',')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__BUIH=TRUE__;
+        if ((result__R4IH == ',')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__Q4IH=TRUE__;
         };
       };
-      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)) {
+      if (result__Q4IH) {
+        t__IIO=read_type__B4L(Self__EIO,FALSE__);
+        if (((void *)t__IIO == (void *)NULL)) {
+          pos__KRXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_265));
+          put_position__CMG(pos__KRXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__SMO) {
-          if (t__VMO==NULL) {
-            __tmp__NOO=NULL;
+        if (is_section__FIO) {
+          if (t__IIO==NULL) {
+            __tmp__AKO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__VMO)->__id) {
+            switch (((struct ___OBJ *)t__IIO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__NOO=((void *)t__VMO);
+              __tmp__AKO=((void *)t__IIO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__NOO=((void *)t__VMO);
+              __tmp__AKO=((void *)t__IIO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__NOO=NULL;
+              __tmp__AKO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__NOO=((void *)t__VMO);
+              __tmp__AKO=((void *)t__IIO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__NOO=((void *)t__VMO);
+              __tmp__AKO=((void *)t__IIO);
             } break;
             }
           };
-          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)) {
+          ts__JIO=__tmp__AKO;
+          if (((void *)__tmp__AKO == (void *)NULL)) {
+            pos__MRXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_277));
+            put_position__CMG(pos__MRXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__COV(lst__UMO,t__VMO);
-        goto while_do__EVP;
+        add_last__NJV(lst__HIO,t__IIO);
+        goto while_do__XQP;
       };
     };
-    lst__UMO=alias__OVP(result__IPHH);
+    lst__HIO=alias__BRP(result__M0HH);
   };
-  return(lst__UMO);
+  return(lst__HIO);
 }
 
-static __INTEGER hash_code__X50(__FAST_ARRAYoITM_TYPE_MONOo *Self__Y50)
+static __INTEGER hash_code__C10(__FAST_ARRAYoITM_TYPE_MONOo *Self__D10)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER result__F10,result__P0HH,__tmp__R0HH,Self__S0HH,__tmp__U10;
+  __INTEGER result__U0HH,__tmp__W0HH,Self__X0HH,result__Z0HH;
+  __INTEGER __tmp__10HH,Self__20HH,result__40HH,__tmp__A1HH,Self__B1HH;
+  __INTEGER result__D1HH,__tmp__F1HH,Self__G1HH,__tmp__D20,result__I1HH;
+  __INTEGER __tmp__K1HH,Self__L1HH,result__N1HH,__tmp__P1HH,Self__Q1HH;
+  __INTEGER result__S1HH,__tmp__U1HH,Self__V1HH;
+  void *__tmp__T10,*__tmp__C20;
+  __STRING_CONSTANT *Self__Q0HH,*Self__V0HH,*Self__00HH,*Self__50HH;
+  __STRING_CONSTANT *Self__E1HH,*Self__J1HH,*Self__O1HH,*Self__T1HH;
+  __BOOLEAN __tmp__W10;
+  result__F10= 0;
+  if ((! (Self__D10->parent_arrayed_collection__EYC.upper__3DV <  0))) {
+    if (((void *)((void **)Self__D10->parent_arrayed_collection__EYC.storage__EIV)[Self__D10->parent_arrayed_collection__EYC.upper__3DV] != (void *)NULL)) {
+      __tmp__T10=((void **)Self__D10->parent_arrayed_collection__EYC.storage__EIV)[Self__D10->parent_arrayed_collection__EYC.upper__3DV];
+      switch (((struct ___OBJ *)__tmp__T10)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        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;
+        Self__Q0HH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__T10)->parent_itm_type__LAE.name__FUP);
+        result__P0HH= 0;
+        __tmp__R0HH=Self__Q0HH->count__DD;
+        Self__S0HH= 1;
+        while ((Self__S0HH <= __tmp__R0HH)) {
+          result__P0HH=(__INTEGER)((__INTEGER)( 5 * result__P0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Q0HH->storage__QMO)[(__INTEGER)(Self__S0HH -  1)])));
+          Self__S0HH=(__INTEGER)(Self__S0HH +  1);
+        };
+        if ((result__P0HH <  0)) {
+          result__P0HH=(__INTEGER)(~ result__P0HH);
+        };
+        __tmp__U10=result__P0HH;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        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;
+        Self__V0HH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__T10)->name__FUP);
+        result__U0HH= 0;
+        __tmp__W0HH=Self__V0HH->count__DD;
+        Self__X0HH= 1;
+        while ((Self__X0HH <= __tmp__W0HH)) {
+          result__U0HH=(__INTEGER)((__INTEGER)( 5 * result__U0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__V0HH->storage__QMO)[(__INTEGER)(Self__X0HH -  1)])));
+          Self__X0HH=(__INTEGER)(Self__X0HH +  1);
+        };
+        if ((result__U0HH <  0)) {
+          result__U0HH=(__INTEGER)(~ result__U0HH);
+        };
+        __tmp__U10=result__U0HH;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        print__4HD((&__string_276));
+        print__DID((&__string_278));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__JA1= 0;
+        __tmp__U10= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        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;
+        Self__00HH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__T10)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP);
+        result__Z0HH= 0;
+        __tmp__10HH=Self__00HH->count__DD;
+        Self__20HH= 1;
+        while ((Self__20HH <= __tmp__10HH)) {
+          result__Z0HH=(__INTEGER)((__INTEGER)( 5 * result__Z0HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__00HH->storage__QMO)[(__INTEGER)(Self__20HH -  1)])));
+          Self__20HH=(__INTEGER)(Self__20HH +  1);
+        };
+        if ((result__Z0HH <  0)) {
+          result__Z0HH=(__INTEGER)(~ result__Z0HH);
+        };
+        __tmp__U10=result__Z0HH;
       } break;
       case __ITM_TYPE_STYLE__: {
-        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;
+        Self__50HH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__T10)->parent_itm_type_simple__2NN.name__FUP);
+        result__40HH= 0;
+        __tmp__A1HH=Self__50HH->count__DD;
+        Self__B1HH= 1;
+        while ((Self__B1HH <= __tmp__A1HH)) {
+          result__40HH=(__INTEGER)((__INTEGER)( 5 * result__40HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__50HH->storage__QMO)[(__INTEGER)(Self__B1HH -  1)])));
+          Self__B1HH=(__INTEGER)(Self__B1HH +  1);
+        };
+        if ((result__40HH <  0)) {
+          result__40HH=(__INTEGER)(~ result__40HH);
+        };
+        __tmp__U10=result__40HH;
       } break;
       };
-      result__050=__tmp__JA1;
-      __tmp__LA1=TRUE__;
+      result__F10=__tmp__U10;
+      __tmp__W10=TRUE__;
     } else {
-      __tmp__LA1=FALSE__;
+      __tmp__W10=FALSE__;
     };
-    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) {
+    if ((! __tmp__W10)) {
+      if (((void *)((void **)Self__D10->parent_arrayed_collection__EYC.storage__EIV)[ 0] != (void *)NULL)) {
+        __tmp__C20=((void **)Self__D10->parent_arrayed_collection__EYC.storage__EIV)[ 0];
+        switch (((struct ___OBJ *)__tmp__C20)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          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;
+          Self__E1HH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__C20)->parent_itm_type__LAE.name__FUP);
+          result__D1HH= 0;
+          __tmp__F1HH=Self__E1HH->count__DD;
+          Self__G1HH= 1;
+          while ((Self__G1HH <= __tmp__F1HH)) {
+            result__D1HH=(__INTEGER)((__INTEGER)( 5 * result__D1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__E1HH->storage__QMO)[(__INTEGER)(Self__G1HH -  1)])));
+            Self__G1HH=(__INTEGER)(Self__G1HH +  1);
+          };
+          if ((result__D1HH <  0)) {
+            result__D1HH=(__INTEGER)(~ result__D1HH);
+          };
+          __tmp__D20=result__D1HH;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          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;
+          Self__J1HH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__C20)->name__FUP);
+          result__I1HH= 0;
+          __tmp__K1HH=Self__J1HH->count__DD;
+          Self__L1HH= 1;
+          while ((Self__L1HH <= __tmp__K1HH)) {
+            result__I1HH=(__INTEGER)((__INTEGER)( 5 * result__I1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__J1HH->storage__QMO)[(__INTEGER)(Self__L1HH -  1)])));
+            Self__L1HH=(__INTEGER)(Self__L1HH +  1);
+          };
+          if ((result__I1HH <  0)) {
+            result__I1HH=(__INTEGER)(~ result__I1HH);
+          };
+          __tmp__D20=result__I1HH;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          print__4HD((&__string_276));
+          print__DID((&__string_278));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__YA1= 0;
+          __tmp__D20= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          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;
+          Self__O1HH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__C20)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP);
+          result__N1HH= 0;
+          __tmp__P1HH=Self__O1HH->count__DD;
+          Self__Q1HH= 1;
+          while ((Self__Q1HH <= __tmp__P1HH)) {
+            result__N1HH=(__INTEGER)((__INTEGER)( 5 * result__N1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__O1HH->storage__QMO)[(__INTEGER)(Self__Q1HH -  1)])));
+            Self__Q1HH=(__INTEGER)(Self__Q1HH +  1);
+          };
+          if ((result__N1HH <  0)) {
+            result__N1HH=(__INTEGER)(~ result__N1HH);
+          };
+          __tmp__D20=result__N1HH;
         } break;
         case __ITM_TYPE_STYLE__: {
-          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;
+          Self__T1HH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__C20)->parent_itm_type_simple__2NN.name__FUP);
+          result__S1HH= 0;
+          __tmp__U1HH=Self__T1HH->count__DD;
+          Self__V1HH= 1;
+          while ((Self__V1HH <= __tmp__U1HH)) {
+            result__S1HH=(__INTEGER)((__INTEGER)( 5 * result__S1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__T1HH->storage__QMO)[(__INTEGER)(Self__V1HH -  1)])));
+            Self__V1HH=(__INTEGER)(Self__V1HH +  1);
+          };
+          if ((result__S1HH <  0)) {
+            result__S1HH=(__INTEGER)(~ result__S1HH);
+          };
+          __tmp__D20=result__S1HH;
         } break;
         };
-        result__050=__tmp__YA1;
+        result__F10=__tmp__D20;
       };
     };
   };
-  return(result__050);
+  return(result__F10);
 }
 
-static __CHARACTER read_style__5RF()
+static __CHARACTER read_style__FPF()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __CHARACTER result__IPF,result__U4IH,result__X4IH;
+  __BOOLEAN result__T4IH,__tmp__VPF,result__W4IH;
+  result__IPF='\0';
+  result__T4IH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__T4IH=FALSE__;
   } else {
-    result__FUIH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__FUIH=((__CHARACTER )(( 0)));
+    result__U4IH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__U4IH=((__CHARACTER )(( 0)));
     } else {
-      result__FUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__U4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__FUIH == '-')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__EUIH=TRUE__;
+    if ((result__U4IH == '-')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__T4IH=TRUE__;
     };
   };
-  if (result__EUIH) {
-    result__CSF='-';
-    short__token__to__TBD((&__string_132),(__INTEGER)(position__0BC -  1),position__0BC);
-    __tmp__PSF=TRUE__;
+  if (result__T4IH) {
+    result__IPF='-';
+    short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
+    __tmp__VPF=TRUE__;
   } else {
-    __tmp__PSF=FALSE__;
+    __tmp__VPF=FALSE__;
   };
-  if ((! __tmp__PSF)) {
-    result__HUIH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__HUIH=FALSE__;
+  if ((! __tmp__VPF)) {
+    result__W4IH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__W4IH=FALSE__;
     } else {
-      result__IUIH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__IUIH=((__CHARACTER )(( 0)));
+      result__X4IH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__X4IH=((__CHARACTER )(( 0)));
       } else {
-        result__IUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__X4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__IUIH == '+')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__HUIH=TRUE__;
+      if ((result__X4IH == '+')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__W4IH=TRUE__;
       };
     };
-    if (result__HUIH) {
-      result__CSF='+';
-      short__token__to__TBD((&__string_132),(__INTEGER)(position__0BC -  1),position__0BC);
+    if (result__W4IH) {
+      result__IPF='+';
+      short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
     } else {
-      result__CSF=' ';
+      result__IPF=' ';
     };
   };
-  return(result__CSF);
+  return(result__IPF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__ZL5B(__INTEGER new_count__1L5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__GI5B(__INTEGER new_count__II5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__3Z5B,ptr_table__04IH,next__Z4IH,result__14IH;
+  __POINTER ptr_table__54IH,next__44IH,result__A5IH;
+  __INTEGER typ_id__C05B;
+  __UINTEGER_32 sz__5Z5B,a__V1FH,new_size__W1FH,t__01FH,a__Z1FH;
+  __UINTEGER_32 new_size__C5IH,lab_type__B5IH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__2Z5B,*Self__XQHC;
+  result__2Z5B=NULL;
+  ptr__3Z5B=((__POINTER )(NULL));
+  typ_id__C05B= 0;
+  sz__5Z5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__5Z5B ==  0)) {
+    result__2Z5B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    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);
+    typ_id__C05B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5Z5B);
+    if ((typ_id__C05B == (__INTEGER)(-  1))) {
+      a__V1FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W1FH=(__UINTEGER_32)((__UINTEGER_32)(sz__5Z5B + a__V1FH) & (__UINTEGER_32)(~ a__V1FH));
+      ptr_table__04IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W1FH / ((__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__QOJ(new_size__W1FH);
+        next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1FH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W1FH <<  1)) <=  4096)) {
+            next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W1FH)));
+          } else {
+            next__Z4IH=new_lab__QOJ(new_size__W1FH);
+          };
+          ((__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__3Z5B=result__14IH;
+    } else {
+      t__01FH=((__UINTEGER_32 )typ_id__C05B);
+      a__Z1FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__C5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__5Z5B + a__Z1FH) & (__UINTEGER_32)(~ a__Z1FH));
+      ptr_table__54IH=((__POINTER )(&(table_type[(t__01FH)])));
+      lab_type__B5IH=(__UINTEGER_32)(t__01FH |  1);
+      next__44IH=((__POINTER )(NULL));
+      result__A5IH=((__POINTER *)ptr_table__54IH)[ 0];
+      if ((result__A5IH == (void *)NULL)) {
+        result__A5IH=new_lab__QOJ(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__3SH)))) &  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__QOJ(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__3Z5B=result__A5IH;
+    };
+    result__2Z5B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__3Z5B);
+    *(result__2Z5B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+  };
+  Self__XQHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__2Z5B);
+  if ((Self__XQHC->parent_arrayed_collection__U4YB.capacity__X3GC < new_count__II5B)) {
+    Self__XQHC->parent_arrayed_collection__U4YB.storage__T4GC=create__QPBD(new_count__II5B);
+    Self__XQHC->parent_arrayed_collection__U4YB.capacity__X3GC=new_count__II5B;
+  };
+  Self__XQHC->parent_arrayed_collection__U4YB.upper__V3GC=(__INTEGER)(-  1);
+  return(result__2Z5B);
 }
 
-static void* read_loc_arg__with_self__QEHB(__PARSER *Self__REHB,__BOOLEAN mute__SEHB,__BOOLEAN self_first__TEHB)
+static void* read_loc_arg__with_self__25GB(__PARSER *Self__35GB,__BOOLEAN mute__45GB,__BOOLEAN self_first__55GB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__BAHB,*result__PZEE;
+  void *t__CAHB,*t__JZEE,*__tmp__I4EE,*t__VW5B;
+  __POSITION pos__DAHB,pos__YSXG,pos__0SXG,pos__2SXG,pos__4SXG;
+  __POSITION pos__ATXG,pos__NTXG,pos__PTXG,p__TW5B,p__3DMF,pos__ZVXG;
+  __POSITION pos__1VXG;
+  void *n__GAHB,*n__UW5B;
+  void *tb__HAHB,*__tmp__1CHB,*tb__QZEE,*__tmp__J4EE;
+  __ITM_ARG *result__I5IH,*Self__Q5IH,*result__TBAC,*Self__OYHC;
+  __POINTER ptr__J5IH,ptr_table__V5IH,next__U5IH,result__W5IH;
+  __POINTER ptr_table__05IH,next__Z5IH,result__15IH,ptr__UBAC;
+  __POINTER ptr_table__KAJH,next__JAJH,result__LAJH,ptr_table__PAJH;
+  __POINTER next__OAJH,result__QAJH,ptr__YF1F,ptr_table__YAJH;
+  __POINTER next__XAJH,result__ZAJH,ptr_table__3AJH,next__2AJH;
+  __POINTER result__4AJH,ptr__PVMF,ptr_table__CBJH,next__BBJH;
+  __POINTER result__DBJH,ptr_table__HBJH,next__GBJH,result__IBJH;
+  __INTEGER typ_id__K5IH,beg__NZEE,Self__5BTF,limit_up__ACTF;
+  __INTEGER typ_id__ZBAC,__tmp__MPIG,i__Q4NG,h__SDQF,idx__TDQF;
+  __INTEGER idx__5D2F,new_capacity__AE2F,i__4D2F,typ_id__3F1F;
+  __INTEGER typ_id__UVMF,__tmp__45EE,Self__GEMF;
+  __UINTEGER_32 sz__L5IH,a__M5IH,new_size__N5IH,t__O5IH,a__P5IH;
+  __UINTEGER_32 new_size__35IH,lab_type__25IH,sz__WBAC,a__X4FH;
+  __UINTEGER_32 new_size__Y4FH,t__24FH,a__14FH,new_size__SAJH;
+  __UINTEGER_32 lab_type__RAJH,sz__0F1F,a__W3FH,new_size__X3FH,t__13FH;
+  __UINTEGER_32 a__03FH,new_size__ABJH,lab_type__5AJH,sz__RVMF,a__B4FH;
+  __UINTEGER_32 new_size__C4FH,t__G4FH,a__F4FH,new_size__KBJH;
+  __UINTEGER_32 lab_type__JBJH;
+  void *tm__KZEE;
+  __ITM_ARGS *result__OVMF,*Self__HYPF;
+  __BOOLEAN result__E5IH,__tmp__SAHB,result__F5IH,__tmp__VBHB;
+  __BOOLEAN __tmp__4CHB,__tmp__CDHB,__tmp__HEHB,result__45IH,mute__OZEE;
+  __BOOLEAN result__CAJH,__tmp__1ZEE,result__DAJH,__tmp__Y1EE;
+  __BOOLEAN result__GAJH,__tmp__P4EE,__tmp__M4EE,__tmp__S4EE;
+  __BOOLEAN __tmp__WAQF,result__KOIG,result__LBJH;
+  __CHARACTER result__G5IH,result__HR5G,result__55IH,result__EAJH;
+  __CHARACTER result__MR5G,result__HAJH,result__MBJH;
+  void *type__LZEE,*result__5PP;
+  void *name__MZEE,*result__X1HH,*result__1CMF,*e__L5PF,*result__45PF;
+  void *e__LDQF,*e__UAJH,*e__3SRF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__Y1HH,*Self__Z1HH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__U4AB,*Self__K5AB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__K5PF,*Self__KDQF;
+  void *node__35PF,*node__VAJH,*node__GTRF,*node__UDQF,*node1__CE2F;
+  void *node2__DE2F,*__tmp__EFQF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__HOIG,*o__LOIG,*__tmp__XOIG;
+  void **__tmp__HPIG,**__tmp__JPIG,**Self__23NG;
+  void **old_buckets__BE2F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__XF1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__X54F;
+  result__BAHB=NULL;
+  t__CAHB=NULL;
+  pos__DAHB=((__POSITION ) 0);
+  n__GAHB=NULL;
+  tb__HAHB=NULL;
+  if (self_first__55GB) {
+    result__E5IH=read_word__4MF((&__string_58));
+    if (is_shorter__LZ) {
+      if (result__E5IH) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
-          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
-          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__GFHB=result__VUIH;
+    __tmp__SAHB=result__E5IH;
   } else {
-    __tmp__GFHB=FALSE__;
+    __tmp__SAHB=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__;
+  if ((__tmp__SAHB || ((! self_first__55GB) && read_identifier__12K()))) {
+    pos__DAHB=current_position__XUF();
+    n__GAHB=last_string__V0C;
+    result__F5IH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__F5IH=FALSE__;
     } else {
-      result__XUIH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__XUIH=((__CHARACTER )(( 0)));
+      result__G5IH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__G5IH=((__CHARACTER )(( 0)));
       } else {
-        result__XUIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__G5IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__XUIH == ':')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__WUIH=TRUE__;
+      if ((result__G5IH == ':')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__F5IH=TRUE__;
       };
     };
-    if (result__WUIH) {
-      result__KE5G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__KE5G=((__CHARACTER )(( 0)));
+    if (result__F5IH) {
+      result__HR5G='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__HR5G=((__CHARACTER )(( 0)));
       } else {
-        result__KE5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__HR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__JGHB=(result__KE5G != '=');
+      __tmp__VBHB=(result__HR5G != '=');
     } else {
-      __tmp__JGHB=FALSE__;
+      __tmp__VBHB=FALSE__;
     };
-    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)) {
+    if (__tmp__VBHB) {
+      t__CAHB=read_type__B4L(Self__35GB,TRUE__);
+      if (((void *)t__CAHB == (void *)NULL)) {
+        pos__YSXG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_279));
+        put_position__CMG(pos__YSXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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__;
+      if ((self_first__55GB && ((void *)t__CAHB != (void *)type_self__CQN))) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
+          __tmp__4CHB=TRUE__;
         } else {
-          if (t__WEHB==NULL) {
-            __tmp__PHHB=NULL;
+          if (t__CAHB==NULL) {
+            __tmp__1CHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__WEHB)->__id) {
+            switch (((struct ___OBJ *)t__CAHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__PHHB=NULL;
+              __tmp__1CHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__PHHB=NULL;
+              __tmp__1CHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__PHHB=((void *)t__WEHB);
+              __tmp__1CHB=((void *)t__CAHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__PHHB=NULL;
+              __tmp__1CHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__PHHB=NULL;
+              __tmp__1CHB=NULL;
             } break;
             }
           };
-          tb__1EHB=__tmp__PHHB;
-          __tmp__SHHB=((void *)__tmp__PHHB == (void *)NULL);
+          tb__HAHB=__tmp__1CHB;
+          __tmp__4CHB=((void *)__tmp__1CHB == (void *)NULL);
         };
-        __tmp__WHHB=__tmp__SHHB;
+        __tmp__CDHB=__tmp__4CHB;
       } else {
-        __tmp__WHHB=FALSE__;
+        __tmp__CDHB=FALSE__;
       };
-      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)) {
+      if (__tmp__CDHB) {
+        pos__0SXG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_280));
+        put_position__CMG(pos__0SXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      result__I5IH=NULL;
+      ptr__J5IH=((__POINTER )(NULL));
+      typ_id__K5IH= 0;
+      sz__L5IH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__L5IH ==  0)) {
+        result__I5IH=ITM_ARG__;
+      } else {
+        typ_id__K5IH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L5IH);
+        if ((typ_id__K5IH == (__INTEGER)(-  1))) {
+          a__M5IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__N5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__L5IH + a__M5IH) & (__UINTEGER_32)(~ a__M5IH));
+          ptr_table__V5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__N5IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__U5IH=((__POINTER )(NULL));
+          result__W5IH=((__POINTER *)ptr_table__V5IH)[ 0];
+          if ((result__W5IH == (void *)NULL)) {
+            result__W5IH=new_lab__QOJ(new_size__N5IH);
+            next__U5IH=(void *)((unsigned long)result__W5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N5IH)));
+            ((__POINTER *)next__U5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__V5IH)[ 0]=next__U5IH;
+          } else {
+            next__U5IH=((__POINTER *)result__W5IH)[ 0];
+            if ((next__U5IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W5IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__N5IH <<  1)) <=  4096)) {
+                next__U5IH=(void *)((unsigned long)result__W5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N5IH)));
               } else {
-                next__FVIH=new_lab__URJ(new_size__4UIH);
+                next__U5IH=new_lab__QOJ(new_size__N5IH);
               };
-              ((__POINTER *)next__FVIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GVIH)[ 0]=next__FVIH;
+              ((__POINTER *)next__U5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__V5IH)[ 0]=next__U5IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__W5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__W5IH=next__U5IH;
+            };
+          };
+          ptr__J5IH=result__W5IH;
+        } else {
+          t__O5IH=((__UINTEGER_32 )typ_id__K5IH);
+          a__P5IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__35IH=(__UINTEGER_32)((__UINTEGER_32)(sz__L5IH + a__P5IH) & (__UINTEGER_32)(~ a__P5IH));
+          ptr_table__05IH=((__POINTER )(&(table_type[(t__O5IH)])));
+          lab_type__25IH=(__UINTEGER_32)(t__O5IH |  1);
+          next__Z5IH=((__POINTER )(NULL));
+          result__15IH=((__POINTER *)ptr_table__05IH)[ 0];
+          if ((result__15IH == (void *)NULL)) {
+            result__15IH=new_lab__QOJ(lab_type__25IH);
+            next__Z5IH=(void *)((unsigned long)result__15IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__35IH)));
+            ((__POINTER *)next__Z5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__05IH)[ 0]=next__Z5IH;
+          } else {
+            next__Z5IH=((__POINTER *)result__15IH)[ 0];
+            if ((next__Z5IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__15IH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__35IH <<  1)) <=  4096)) {
+                next__Z5IH=(void *)((unsigned long)result__15IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__35IH)));
               } else {
-                next__KVIH=new_lab__URJ(lab_type__NVIH);
+                next__Z5IH=new_lab__QOJ(lab_type__25IH);
               };
-              ((__POINTER *)next__KVIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LVIH)[ 0]=next__KVIH;
+              ((__POINTER *)next__Z5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__05IH)[ 0]=next__Z5IH;
             } else {
-              ((__POINTER *)result__MVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MVIH=next__KVIH;
+              ((__POINTER *)result__15IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__15IH=next__Z5IH;
             };
           };
-          ptr__0UIH=result__MVIH;
+          ptr__J5IH=result__15IH;
         };
-        result__ZUIH=((__ITM_ARG *)ptr__0UIH);
-        *(result__ZUIH) = *(ITM_ARG__);
+        result__I5IH=((__ITM_ARG *)ptr__J5IH);
+        *(result__I5IH) = *(ITM_ARG__);
       };
-      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);
+      Self__Q5IH=((__ITM_ARG *)result__I5IH);
+      Self__Q5IH->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ=pos__DAHB;
+      Self__Q5IH->name__SYHC=n__GAHB;
+      Self__Q5IH->type__TYHC=t__CAHB;
+      result__BAHB=result__I5IH;
+      if (is_shorter__LZ) {
+        add__WHHB(short_local__XCC,n__GAHB);
       };
     } else {
-      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)) {
+      if ((! mute__45GB)) {
+        pos__2SXG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_281));
+        put_position__CMG(pos__2SXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__1IHB=TRUE__;
+    __tmp__HEHB=TRUE__;
   } else {
-    __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) {
+    __tmp__HEHB=FALSE__;
+  };
+  if ((! __tmp__HEHB)) {
+    result__45IH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__45IH=FALSE__;
+    } else {
+      result__55IH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__55IH=((__CHARACTER )(( 0)));
+      } else {
+        result__55IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      };
+      if ((result__55IH == '(')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__45IH=TRUE__;
+      };
+    };
+    if (result__45IH) {
+      t__JZEE=NULL;
+      tm__KZEE=NULL;
+      type__LZEE=NULL;
+      name__MZEE=NULL;
+      beg__NZEE= 0;
+      result__PZEE=NULL;
+      tb__QZEE=NULL;
+      mute__OZEE=mute__45GB;
+      if (self_first__55GB) {
+        result__CAJH=read_word__4MF((&__string_58));
+        if (is_shorter__LZ) {
+          if (result__CAJH) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
-              short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+              short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             } else {
-              short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+              short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             };
           };
         };
-        __tmp__K1EE=result__TVIH;
+        __tmp__1ZEE=result__CAJH;
       } else {
-        __tmp__K1EE=FALSE__;
+        __tmp__1ZEE=FALSE__;
       };
-      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);
+      if ((__tmp__1ZEE || read_identifier__12K())) {
+        result__X1HH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K)->parent_arrayed_collection__Z1K.upper__NOU <  0)) {
+          result__X1HH=create_with_capacity__UFRC( 16);
         } else {
-          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);
+          Self__Y1HH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K);
+          result__X1HH=((void **)Self__Y1HH->parent_arrayed_collection__Z1K.storage__3QU)[Self__Y1HH->parent_arrayed_collection__Z1K.upper__NOU];
+          Self__Z1HH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K);
+          Self__Z1HH->parent_arrayed_collection__Z1K.upper__NOU=(__INTEGER)(Self__Z1HH->parent_arrayed_collection__Z1K.upper__NOU -  1);
         };
-        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);
+        name__MZEE=result__X1HH;
+        result__5PP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP)->parent_arrayed_collection__EQP.upper__YQV <  0)) {
+          result__5PP=create_with_capacity__DBR( 16);
         } else {
-          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);
+          Self__U4AB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+          result__5PP=((void **)Self__U4AB->parent_arrayed_collection__EQP.storage__OVV)[Self__U4AB->parent_arrayed_collection__EQP.upper__YQV];
+          Self__K5AB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+          Self__K5AB->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(Self__K5AB->parent_arrayed_collection__EQP.upper__YQV -  1);
         };
-        type__00EE=result__MUP;
-        beg__20EE= 0;
+        type__LZEE=result__5PP;
+        beg__NZEE= 0;
         do {
-          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)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.upper__R4OD +  1) !=  0) && (! read_identifier__12K())) && (! mute__OZEE))) {
+            pos__4SXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_282));
+            put_position__CMG(pos__4SXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__ZBPD(name__10EE,last_string__Q0C);
-          result__UVIH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__UVIH=FALSE__;
+          add_last__HAPD(name__MZEE,last_string__V0C);
+          result__DAJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__DAJH=FALSE__;
           } else {
-            result__VVIH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__VVIH=((__CHARACTER )(( 0)));
+            result__EAJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__EAJH=((__CHARACTER )(( 0)));
             } else {
-              result__VVIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__EAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__VVIH == ':')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__UVIH=TRUE__;
+            if ((result__EAJH == ':')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__DAJH=TRUE__;
             };
           };
-          if (result__UVIH) {
-            result__PE5G='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__PE5G=((__CHARACTER )(( 0)));
+          if (result__DAJH) {
+            result__MR5G='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__MR5G=((__CHARACTER )(( 0)));
             } else {
-              result__PE5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__MR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__H3EE=(result__PE5G != '=');
+            __tmp__Y1EE=(result__MR5G != '=');
           } else {
-            __tmp__H3EE=FALSE__;
+            __tmp__Y1EE=FALSE__;
           };
-          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)) {
+          if (__tmp__Y1EE) {
+            mute__OZEE=FALSE__;
+            t__JZEE=read_type__B4L(Self__35GB,TRUE__);
+            if (((void *)t__JZEE == (void *)NULL)) {
+              pos__ATXG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_283));
+              put_position__CMG(pos__ATXG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 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);
+            Self__5BTF=beg__NZEE;
+            limit_up__ACTF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.upper__R4OD;
+            while ((Self__5BTF <= limit_up__ACTF)) {
+              add_last__NJV(type__LZEE,t__JZEE);
+              Self__5BTF=(__INTEGER)(Self__5BTF +  1);
             };
-            beg__20EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__10EE)->parent_arrayed_collection__P5I.upper__DAPD +  1);
+            beg__NZEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.upper__R4OD +  1);
           };
-          result__XVIH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__XVIH=FALSE__;
+          result__GAJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__GAJH=FALSE__;
           } else {
-            result__YVIH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__YVIH=((__CHARACTER )(( 0)));
+            result__HAJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__HAJH=((__CHARACTER )(( 0)));
             } else {
-              result__YVIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__HAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__YVIH == ',')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__XVIH=TRUE__;
+            if ((result__HAJH == ',')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__GAJH=TRUE__;
             };
           };
-        } 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)) {
+        } while (result__GAJH);
+        if ((beg__NZEE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__X1HH)->parent_arrayed_collection__L2I.upper__R4OD +  1))) {
+          if ((! mute__OZEE)) {
+            pos__NTXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_283));
+            put_position__CMG(pos__NTXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          free__CT5(result__TQHH);
-          free__ENQ(result__MUP);
+          free__NO5(result__X1HH);
+          free__XIQ(result__5PP);
         } else {
-          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__;
+          if (self_first__55GB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__5PP)->parent_arrayed_collection__EYC.storage__EIV)[ 0] != (void *)type_self__CQN)) {
+              __tmp__P4EE=TRUE__;
             } else {
-              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;
+              if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI == (void *)(&__string_40))) {
+                __tmp__I4EE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__5PP)->parent_arrayed_collection__EYC.storage__EIV)[ 0];
+                if (__tmp__I4EE==NULL) {
+                  __tmp__J4EE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__X5EE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__I4EE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__Y5EE=NULL;
+                    __tmp__J4EE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__Y5EE=NULL;
+                    __tmp__J4EE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__Y5EE=((void *)__tmp__X5EE);
+                    __tmp__J4EE=((void *)__tmp__I4EE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__Y5EE=NULL;
+                    __tmp__J4EE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__Y5EE=NULL;
+                    __tmp__J4EE=NULL;
                   } break;
                   }
                 };
-                tb__50EE=__tmp__Y5EE;
-                __tmp__15EE=((void *)__tmp__Y5EE == (void *)NULL);
+                tb__QZEE=__tmp__J4EE;
+                __tmp__M4EE=((void *)__tmp__J4EE == (void *)NULL);
               } else {
-                __tmp__15EE=FALSE__;
+                __tmp__M4EE=FALSE__;
               };
-              __tmp__45EE=__tmp__15EE;
+              __tmp__P4EE=__tmp__M4EE;
             };
-            __tmp__BAFE=__tmp__45EE;
+            __tmp__S4EE=__tmp__P4EE;
           } else {
-            __tmp__BAFE=FALSE__;
+            __tmp__S4EE=FALSE__;
           };
-          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)) {
+          if (__tmp__S4EE) {
+            pos__PTXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_280));
+            put_position__CMG(pos__PTXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__X1HH)->parent_arrayed_collection__L2I.upper__R4OD +  1) ==  1)) {
+            p__TW5B=current_position__XUF();
+            n__UW5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__X1HH)->parent_arrayed_collection__L2I.storage__HBPD)[ 0];
+            t__VW5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__5PP)->parent_arrayed_collection__EYC.storage__EIV)[ 0];
+            result__TBAC=NULL;
+            ptr__UBAC=((__POINTER )(NULL));
+            typ_id__ZBAC= 0;
+            sz__WBAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__WBAC ==  0)) {
+              result__TBAC=ITM_ARG__;
             } else {
-              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;
+              typ_id__ZBAC=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WBAC);
+              if ((typ_id__ZBAC == (__INTEGER)(-  1))) {
+                a__X4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__Y4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__WBAC + a__X4FH) & (__UINTEGER_32)(~ a__X4FH));
+                ptr_table__KAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y4FH / ((__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__QOJ(new_size__Y4FH);
+                  next__JAJH=(void *)((unsigned long)result__LAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4FH)));
+                  ((__POINTER *)next__JAJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KAJH)[ 0]=next__JAJH;
                 } else {
-                  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)));
+                  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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Y4FH <<  1)) <=  4096)) {
+                      next__JAJH=(void *)((unsigned long)result__LAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4FH)));
                     } else {
-                      next__0VIH=new_lab__URJ(new_size__FTFH);
+                      next__JAJH=new_lab__QOJ(new_size__Y4FH);
                     };
-                    ((__POINTER *)next__0VIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__1VIH)[ 0]=next__0VIH;
+                    ((__POINTER *)next__JAJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__KAJH)[ 0]=next__JAJH;
                   } else {
-                    ((__POINTER *)result__2VIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__2VIH=next__0VIH;
+                    ((__POINTER *)result__LAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__LAJH=next__JAJH;
                   };
                 };
-                ptr__VEAC=result__2VIH;
+                ptr__UBAC=result__LAJH;
               } else {
-                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;
+                t__24FH=((__UINTEGER_32 )typ_id__ZBAC);
+                a__14FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__SAJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WBAC + a__14FH) & (__UINTEGER_32)(~ a__14FH));
+                ptr_table__PAJH=((__POINTER )(&(table_type[(t__24FH)])));
+                lab_type__RAJH=(__UINTEGER_32)(t__24FH |  1);
+                next__OAJH=((__POINTER )(NULL));
+                result__QAJH=((__POINTER *)ptr_table__PAJH)[ 0];
+                if ((result__QAJH == (void *)NULL)) {
+                  result__QAJH=new_lab__QOJ(lab_type__RAJH);
+                  next__OAJH=(void *)((unsigned long)result__QAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAJH)));
+                  ((__POINTER *)next__OAJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PAJH)[ 0]=next__OAJH;
                 } else {
-                  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)));
+                  next__OAJH=((__POINTER *)result__QAJH)[ 0];
+                  if ((next__OAJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QAJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SAJH <<  1)) <=  4096)) {
+                      next__OAJH=(void *)((unsigned long)result__QAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAJH)));
                     } else {
-                      next__5VIH=new_lab__URJ(lab_type__CWIH);
+                      next__OAJH=new_lab__QOJ(lab_type__RAJH);
                     };
-                    ((__POINTER *)next__5VIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__AWIH)[ 0]=next__5VIH;
+                    ((__POINTER *)next__OAJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PAJH)[ 0]=next__OAJH;
                   } else {
-                    ((__POINTER *)result__BWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5VIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BWIH=next__5VIH;
+                    ((__POINTER *)result__QAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QAJH=next__OAJH;
                   };
                 };
-                ptr__VEAC=result__BWIH;
-              };
-              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;
+                ptr__UBAC=result__QAJH;
+              };
+              result__TBAC=((__ITM_ARG *)ptr__UBAC);
+              *(result__TBAC) = *(ITM_ARG__);
+            };
+            Self__OYHC=((__ITM_ARG *)result__TBAC);
+            Self__OYHC->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ=p__TW5B;
+            Self__OYHC->name__SYHC=n__UW5B;
+            Self__OYHC->type__TYHC=t__VW5B;
+            result__PZEE=result__TBAC;
+            free__NO5(result__X1HH);
+            free__XIQ(result__5PP);
+          } else {
+            result__1CMF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__X1HH)->parent_arrayed_collection__L2I.upper__R4OD <  0)) {
+              result__1CMF=empty_list__CDMF;
             } else {
-              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:
+              Self__K5PF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__MDMF);
+              e__L5PF=result__X1HH;
+              result__45PF=NULL;
+              node__35PF=((void **)Self__K5PF->buckets__FAQF)[(__INTEGER)(hash_code__BKRF(result__X1HH) % Self__K5PF->capacity__AAQF)];
+              until_do__JLRF:
               {
-                if (((void *)node__BVPF == (void *)NULL)) {
-                  __tmp__0VPF=TRUE__;
+                if (((void *)node__35PF == (void *)NULL)) {
+                  __tmp__WAQF=TRUE__;
                 } else {
-                  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__;
+                  Self__HOIG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__35PF)->item__RAQF);
+                  result__KOIG=FALSE__;
+                  o__LOIG=NULL;
+                  if (((void *)Self__HOIG == (void *)e__L5PF)) {
+                    result__KOIG=TRUE__;
                   } else {
-                    if (e__PUPF==NULL) {
-                      __tmp__0DIG=NULL;
+                    if (e__L5PF==NULL) {
+                      __tmp__XOIG=NULL;
                     } else {
-                      __tmp__0DIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__PUPF);
+                      __tmp__XOIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__L5PF);
                     };
-                    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);
+                    o__LOIG=__tmp__XOIG;
+                    if ((((void *)__tmp__XOIG != (void *)NULL) && (Self__HOIG->parent_arrayed_collection__L2I.upper__R4OD == __tmp__XOIG->parent_arrayed_collection__L2I.upper__R4OD))) {
+                      __tmp__HPIG=Self__HOIG->parent_arrayed_collection__L2I.storage__HBPD;
+                      __tmp__JPIG=__tmp__XOIG->parent_arrayed_collection__L2I.storage__HBPD;
+                      __tmp__MPIG=(__INTEGER)(Self__HOIG->parent_arrayed_collection__L2I.upper__R4OD +  1);
+                      Self__23NG=((void **)__tmp__HPIG);
+                      i__Q4NG=(__INTEGER)(__tmp__MPIG -  1);
+                      while (((i__Q4NG >=  0) && ((void *)Self__23NG[i__Q4NG] == (void *)((void **)__tmp__JPIG)[i__Q4NG]))) {
+                        i__Q4NG=(__INTEGER)(i__Q4NG -  1);
                       };
-                      result__NDIG=(i__XVNG <  0);
+                      result__KOIG=(i__Q4NG <  0);
                     };
                   };
-                  __tmp__0VPF=result__NDIG;
+                  __tmp__WAQF=result__KOIG;
                 };
-                if ((! __tmp__0VPF)) {
-                  node__BVPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__BVPF)->next__BWPF;
-                  goto until_do__NARF;
+                if ((! __tmp__WAQF)) {
+                  node__35PF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__35PF)->next__3AQF;
+                  goto until_do__JLRF;
                 };
               };
-              if (((void *)node__BVPF != (void *)NULL)) {
-                result__CVPF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__BVPF)->item__VVPF;
-              };
-              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;
+              if (((void *)node__35PF != (void *)NULL)) {
+                result__45PF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__35PF)->item__RAQF;
+              };
+              result__1CMF=result__45PF;
+              if (((void *)result__45PF == (void *)NULL)) {
+                result__1CMF=create_with_capacity__UFRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__X1HH)->parent_arrayed_collection__L2I.upper__R4OD +  1));
+                copy__W1RD(result__1CMF,result__X1HH);
+                Self__KDQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__MDMF);
+                e__LDQF=result__1CMF;
+                e__UAJH=result__1CMF;
+                node__VAJH=((void **)Self__KDQF->buckets__FAQF)[(__INTEGER)(hash_code__BKRF(result__1CMF) % Self__KDQF->capacity__AAQF)];
+                while ((! (((void *)node__VAJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__VAJH)->item__RAQF == (void *)e__UAJH)))) {
+                  node__VAJH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__VAJH)->next__3AQF;
                 };
-                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;
+                e__3SRF=result__1CMF;
+                node__GTRF=((void **)Self__KDQF->buckets__FAQF)[(__INTEGER)(hash_code__BKRF(result__1CMF) % Self__KDQF->capacity__AAQF)];
+                while ((! (((void *)node__GTRF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GTRF)->item__RAQF == (void *)e__3SRF)))) {
+                  node__GTRF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__GTRF)->next__3AQF;
                 };
-                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;
+                h__SDQF=hash_code__BKRF(result__1CMF);
+                idx__TDQF=(__INTEGER)(h__SDQF % Self__KDQF->capacity__AAQF);
+                node__UDQF=((void **)Self__KDQF->buckets__FAQF)[idx__TDQF];
+                while ((! (((void *)node__UDQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__UDQF)->item__RAQF == (void *)e__LDQF)))) {
+                  node__UDQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__UDQF)->next__3AQF;
                 };
-                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;
+                if (((void *)node__UDQF == (void *)NULL)) {
+                  if ((Self__KDQF->capacity__AAQF == Self__KDQF->count__XEQF)) {
+                    idx__5D2F= 0;
+                    node1__CE2F=NULL;
+                    node2__DE2F=NULL;
+                    new_capacity__AE2F=prime_number_ceiling__K01((__INTEGER)(Self__KDQF->capacity__AAQF +  1));
+                    old_buckets__BE2F=Self__KDQF->buckets__FAQF;
+                    Self__KDQF->buckets__FAQF=create__ZBUF(new_capacity__AE2F);
+                    i__4D2F=(__INTEGER)(Self__KDQF->capacity__AAQF -  1);
+                    Self__KDQF->capacity__AAQF=new_capacity__AE2F;
+                    while ((i__4D2F >=  0)) {
+                      node1__CE2F=((void **)old_buckets__BE2F)[i__4D2F];
+                      while (((void *)node1__CE2F != (void *)NULL)) {
+                        node2__DE2F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__CE2F)->next__3AQF;
+                        idx__5D2F=(__INTEGER)(hash_code__BKRF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__CE2F)->item__RAQF) % Self__KDQF->capacity__AAQF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__CE2F)->next__3AQF=((void **)Self__KDQF->buckets__FAQF)[idx__5D2F];
+                        ((void **)Self__KDQF->buckets__FAQF)[idx__5D2F]=node1__CE2F;
+                        node1__CE2F=node2__DE2F;
                       };
-                      i__CZ1F=(__INTEGER)(i__CZ1F -  1);
+                      i__4D2F=(__INTEGER)(i__4D2F -  1);
                     };
-                    idx__XYPF=(__INTEGER)(h__WYPF % Self__OYPF->capacity__EVPF);
+                    idx__TDQF=(__INTEGER)(h__SDQF % Self__KDQF->capacity__AAQF);
                   };
-                  __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__;
+                  __tmp__EFQF=((void **)Self__KDQF->buckets__FAQF)[idx__TDQF];
+                  result__XF1F=NULL;
+                  ptr__YF1F=((__POINTER )(NULL));
+                  typ_id__3F1F= 0;
+                  sz__0F1F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__0F1F ==  0)) {
+                    result__XF1F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    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;
+                    typ_id__3F1F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0F1F);
+                    if ((typ_id__3F1F == (__INTEGER)(-  1))) {
+                      a__W3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__X3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__0F1F + a__W3FH) & (__UINTEGER_32)(~ a__W3FH));
+                      ptr_table__YAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                      next__XAJH=((__POINTER )(NULL));
+                      result__ZAJH=((__POINTER *)ptr_table__YAJH)[ 0];
+                      if ((result__ZAJH == (void *)NULL)) {
+                        result__ZAJH=new_lab__QOJ(new_size__X3FH);
+                        next__XAJH=(void *)((unsigned long)result__ZAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3FH)));
+                        ((__POINTER *)next__XAJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YAJH)[ 0]=next__XAJH;
                       } 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__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)));
+                        next__XAJH=((__POINTER *)result__ZAJH)[ 0];
+                        if ((next__XAJH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZAJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__X3FH <<  1)) <=  4096)) {
+                            next__XAJH=(void *)((unsigned long)result__ZAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3FH)));
                           } else {
-                            next__IWIH=new_lab__URJ(new_size__ESFH);
+                            next__XAJH=new_lab__QOJ(new_size__X3FH);
                           };
-                          ((__POINTER *)next__IWIH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__JWIH)[ 0]=next__IWIH;
+                          ((__POINTER *)next__XAJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__YAJH)[ 0]=next__XAJH;
                         } else {
-                          ((__POINTER *)result__KWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__KWIH=next__IWIH;
+                          ((__POINTER *)result__ZAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__ZAJH=next__XAJH;
                         };
                       };
-                      ptr__200F=result__KWIH;
+                      ptr__YF1F=result__ZAJH;
                     } else {
-                      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;
+                      t__13FH=((__UINTEGER_32 )typ_id__3F1F);
+                      a__03FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__ABJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0F1F + a__03FH) & (__UINTEGER_32)(~ a__03FH));
+                      ptr_table__3AJH=((__POINTER )(&(table_type[(t__13FH)])));
+                      lab_type__5AJH=(__UINTEGER_32)(t__13FH |  1);
+                      next__2AJH=((__POINTER )(NULL));
+                      result__4AJH=((__POINTER *)ptr_table__3AJH)[ 0];
+                      if ((result__4AJH == (void *)NULL)) {
+                        result__4AJH=new_lab__QOJ(lab_type__5AJH);
+                        next__2AJH=(void *)((unsigned long)result__4AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABJH)));
+                        ((__POINTER *)next__2AJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
                       } else {
-                        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)));
+                        next__2AJH=((__POINTER *)result__4AJH)[ 0];
+                        if ((next__2AJH == (void *)NULL)) {
+                          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4AJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ABJH <<  1)) <=  4096)) {
+                            next__2AJH=(void *)((unsigned long)result__4AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ABJH)));
                           } else {
-                            next__NWIH=new_lab__URJ(lab_type__QWIH);
+                            next__2AJH=new_lab__QOJ(lab_type__5AJH);
                           };
-                          ((__POINTER *)next__NWIH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__OWIH)[ 0]=next__NWIH;
+                          ((__POINTER *)next__2AJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
                         } else {
-                          ((__POINTER *)result__PWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__PWIH=next__NWIH;
+                          ((__POINTER *)result__4AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__4AJH=next__2AJH;
                         };
                       };
-                      ptr__200F=result__PWIH;
+                      ptr__YF1F=result__4AJH;
                     };
-                    result__100F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__200F);
-                    *(result__100F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__XF1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__YF1F);
+                    *(result__XF1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  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);
+                  Self__X54F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__XF1F);
+                  Self__X54F->item__RAQF=result__1CMF;
+                  Self__X54F->next__3AQF=__tmp__EFQF;
+                  node__UDQF=result__XF1F;
+                  ((void **)Self__KDQF->buckets__FAQF)[idx__TDQF]=result__XF1F;
+                  Self__KDQF->count__XEQF=(__INTEGER)(Self__KDQF->count__XEQF +  1);
                 };
               };
             };
-            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__;
+            free__NO5(result__X1HH);
+            name__MZEE=result__1CMF;
+            type__LZEE=alias__BRP(result__5PP);
+            tm__KZEE=get__3EP(type__LZEE);
+            p__3DMF=current_position__XUF();
+            result__OVMF=NULL;
+            ptr__PVMF=((__POINTER )(NULL));
+            typ_id__UVMF= 0;
+            sz__RVMF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__RVMF ==  0)) {
+              result__OVMF=ITM_ARGS__;
             } else {
-              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;
+              typ_id__UVMF=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RVMF);
+              if ((typ_id__UVMF == (__INTEGER)(-  1))) {
+                a__B4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__C4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__RVMF + a__B4FH) & (__UINTEGER_32)(~ a__B4FH));
+                ptr_table__CBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__C4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__BBJH=((__POINTER )(NULL));
+                result__DBJH=((__POINTER *)ptr_table__CBJH)[ 0];
+                if ((result__DBJH == (void *)NULL)) {
+                  result__DBJH=new_lab__QOJ(new_size__C4FH);
+                  next__BBJH=(void *)((unsigned long)result__DBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C4FH)));
+                  ((__POINTER *)next__BBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
                 } else {
-                  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)));
+                  next__BBJH=((__POINTER *)result__DBJH)[ 0];
+                  if ((next__BBJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DBJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__C4FH <<  1)) <=  4096)) {
+                      next__BBJH=(void *)((unsigned long)result__DBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C4FH)));
                     } else {
-                      next__SWIH=new_lab__URJ(new_size__PSFH);
+                      next__BBJH=new_lab__QOJ(new_size__C4FH);
                     };
-                    ((__POINTER *)next__SWIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__TWIH)[ 0]=next__SWIH;
+                    ((__POINTER *)next__BBJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
                   } else {
-                    ((__POINTER *)result__UWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__UWIH=next__SWIH;
+                    ((__POINTER *)result__DBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__DBJH=next__BBJH;
                   };
                 };
-                ptr__PKMF=result__UWIH;
+                ptr__PVMF=result__DBJH;
               } else {
-                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;
+                t__G4FH=((__UINTEGER_32 )typ_id__UVMF);
+                a__F4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__KBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RVMF + a__F4FH) & (__UINTEGER_32)(~ a__F4FH));
+                ptr_table__HBJH=((__POINTER )(&(table_type[(t__G4FH)])));
+                lab_type__JBJH=(__UINTEGER_32)(t__G4FH |  1);
+                next__GBJH=((__POINTER )(NULL));
+                result__IBJH=((__POINTER *)ptr_table__HBJH)[ 0];
+                if ((result__IBJH == (void *)NULL)) {
+                  result__IBJH=new_lab__QOJ(lab_type__JBJH);
+                  next__GBJH=(void *)((unsigned long)result__IBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBJH)));
+                  ((__POINTER *)next__GBJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HBJH)[ 0]=next__GBJH;
                 } else {
-                  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)));
+                  next__GBJH=((__POINTER *)result__IBJH)[ 0];
+                  if ((next__GBJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IBJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__KBJH <<  1)) <=  4096)) {
+                      next__GBJH=(void *)((unsigned long)result__IBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBJH)));
                     } else {
-                      next__XWIH=new_lab__URJ(lab_type__0WIH);
+                      next__GBJH=new_lab__QOJ(lab_type__JBJH);
                     };
-                    ((__POINTER *)next__XWIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
+                    ((__POINTER *)next__GBJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__HBJH)[ 0]=next__GBJH;
                   } else {
-                    ((__POINTER *)result__ZWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__ZWIH=next__XWIH;
+                    ((__POINTER *)result__IBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__IBJH=next__GBJH;
                   };
                 };
-                ptr__PKMF=result__ZWIH;
+                ptr__PVMF=result__IBJH;
               };
-              result__OKMF=((__ITM_ARGS *)ptr__PKMF);
-              *(result__OKMF) = *(ITM_ARGS__);
+              result__OVMF=((__ITM_ARGS *)ptr__PVMF);
+              *(result__OVMF) = *(ITM_ARGS__);
             };
-            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;
+            Self__HYPF=((__ITM_ARGS *)result__OVMF);
+            Self__HYPF->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ=p__3DMF;
+            Self__HYPF->name__LYPF=result__1CMF;
+            Self__HYPF->type__MYPF=tm__KZEE;
+            result__PZEE=result__OVMF;
           };
-          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);
+          if (is_shorter__LZ) {
+            __tmp__45EE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.upper__R4OD;
+            Self__GEMF= 0;
+            while ((Self__GEMF <= __tmp__45EE)) {
+              add__WHHB(short_local__XCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.storage__HBPD)[Self__GEMF]);
+              Self__GEMF=(__INTEGER)(Self__GEMF +  1);
             };
           };
         };
       };
-      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)) {
+      result__BAHB=result__PZEE;
+      if (((void *)result__PZEE == (void *)NULL)) {
+        if ((! mute__45GB)) {
+          pos__ZVXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_284));
+          put_position__CMG(pos__ZVXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__2WIH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__2WIH=FALSE__;
+        result__LBJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__LBJH=FALSE__;
         } else {
-          result__3WIH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__3WIH=((__CHARACTER )(( 0)));
+          result__MBJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__MBJH=((__CHARACTER )(( 0)));
           } else {
-            result__3WIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__MBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__3WIH == ')')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__2WIH=TRUE__;
+          if ((result__MBJH == ')')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__LBJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__LBJH)) {
+          pos__1VXG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_262));
+          put_position__CMG(pos__1VXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__VEHB);
+  return(result__BAHB);
 }
 
-static void* read_slot_operator__NU5B(void *list_arg__PU5B)
+static void* read_slot_operator__MR5B(void *list_arg__OR5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *associativity__SR5B,*name__QR5B,*pretty_name__RR5B;
+  __INTEGER priority__TR5B,typ_id__DJAC;
+  void *arg__UR5B;
+  __POSITION pos__3VXG,pos__5VXG,pos__BWXG,pos__GWXG,pos__IWXG;
+  __POSITION pos__KWXG,__tmp__OW5B;
+  void *__tmp__PW5B;
+  __ITM_SLOT_OPERATOR *result__3IAC,*Self__G0HC,*Self__YXHC;
+  __POINTER ptr__4IAC,ptr_table__WBJH,next__VBJH,result__XBJH;
+  __POINTER ptr_table__1BJH,next__0BJH,result__2BJH;
+  __UINTEGER_32 sz__AJAC,a__P4FH,new_size__Q4FH,t__U4FH,a__T4FH;
+  __UINTEGER_32 new_size__4BJH,lab_type__3BJH;
+  __BOOLEAN result__OBJH,result__SBJH,__tmp__TT5B,result__UBJH;
+  __CHARACTER result__PBJH;
+  associativity__SR5B=NULL;
+  priority__TR5B= 0;
+  arg__UR5B=NULL;
+  if ((! read_operator__FJM())) {
+    pos__3VXG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_285));
+    put_position__CMG(pos__3VXG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((((void *)last_string__V0C == (void *)(&__string_16)) || ((void *)last_string__V0C == (void *)(&__string_17)))) {
+    pos__5VXG=current_position__XUF();
+    put_error__text__YKG( 0,(&__string_286));
+    put_position__CMG(pos__5VXG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  name__RU5B=last_string__Q0C;
-  pretty_name__SU5B=name__RU5B;
-  result__5WIH=FALSE__;
-  if ((! read_space__FSD())) {
-    result__5WIH=FALSE__;
+  name__QR5B=last_string__V0C;
+  pretty_name__RR5B=name__QR5B;
+  result__OBJH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__OBJH=FALSE__;
   } else {
-    result__AXIH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__AXIH=((__CHARACTER )(( 0)));
+    result__PBJH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__PBJH=((__CHARACTER )(( 0)));
     } else {
-      result__AXIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__PBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__AXIH == '\'')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__5WIH=TRUE__;
+    if ((result__PBJH == '\'')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__OBJH=TRUE__;
     };
   };
-  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)) {
+  if ((! result__OBJH)) {
+    pos__BWXG=current_position__XUF();
+    put_error__text__YKG( 2,(&__string_287));
+    put_position__CMG(pos__BWXG);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  result__DXIH=read_word__YPF((&__string_6));
-  if (is_shorter__FZ) {
-    if (result__DXIH) {
+  result__SBJH=read_word__4MF((&__string_6));
+  if (is_shorter__LZ) {
+    if (result__SBJH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
-        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
-        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       };
     };
   };
-  if (result__DXIH) {
-    __tmp__UW5B=TRUE__;
+  if (result__SBJH) {
+    __tmp__TT5B=TRUE__;
   } else {
-    result__FXIH=read_word__YPF((&__string_5));
-    if (is_shorter__FZ) {
-      if (result__FXIH) {
+    result__UBJH=read_word__4MF((&__string_5));
+    if (is_shorter__LZ) {
+      if (result__UBJH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
-          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
-          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         };
       };
     };
-    __tmp__UW5B=result__FXIH;
+    __tmp__TT5B=result__UBJH;
   };
-  if (__tmp__UW5B) {
-    associativity__TU5B=last_string__Q0C;
-    if (read_integer__I2P()) {
-      priority__UU5B=((__INTEGER )last_integer__BSO);
+  if (__tmp__TT5B) {
+    associativity__SR5B=last_string__V0C;
+    if (read_integer__1XP()) {
+      priority__TR5B=((__INTEGER )last_integer__UNO);
     };
   };
-  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)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__OR5B)->parent_arrayed_collection__U4YB.upper__V3GC <  0)) {
+    arg__UR5B=read_loc_arg__with_self__25GB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__UR5B == (void *)NULL)) {
+      pos__GWXG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_288));
+      put_position__CMG(pos__GWXG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    add_last__R3GC(list_arg__OR5B,arg__UR5B);
+    name__QR5B=operator__name__Y5N((&__string_83),name__QR5B);
+    if (((void *)associativity__SR5B != (void *)NULL)) {
+      pos__IWXG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_289));
+      put_position__CMG(pos__IWXG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    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)) {
+    arg__UR5B=read_loc_arg__with_self__25GB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__UR5B != (void *)NULL)) {
+      add_last__R3GC(list_arg__OR5B,arg__UR5B);
+      name__QR5B=operator__name__Y5N((&__string_81),name__QR5B);
+      if (((void *)associativity__SR5B == (void *)NULL)) {
+        associativity__SR5B=(&__string_6);
+      };
+    } else {
+      name__QR5B=operator__name__Y5N((&__string_82),name__QR5B);
+      if (((void *)associativity__SR5B != (void *)NULL)) {
+        pos__KWXG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_290));
+        put_position__CMG(pos__KWXG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __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__;
+  __tmp__OW5B=current_position__XUF();
+  __tmp__PW5B=last_section__E1C;
+  result__3IAC=NULL;
+  ptr__4IAC=((__POINTER )(NULL));
+  typ_id__DJAC= 0;
+  sz__AJAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__AJAC ==  0)) {
+    result__3IAC=ITM_SLOT_OPERATOR__;
   } else {
-    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;
+    typ_id__DJAC=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AJAC);
+    if ((typ_id__DJAC == (__INTEGER)(-  1))) {
+      a__P4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__Q4FH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJAC + a__P4FH) & (__UINTEGER_32)(~ a__P4FH));
+      ptr_table__WBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__VBJH=((__POINTER )(NULL));
+      result__XBJH=((__POINTER *)ptr_table__WBJH)[ 0];
+      if ((result__XBJH == (void *)NULL)) {
+        result__XBJH=new_lab__QOJ(new_size__Q4FH);
+        next__VBJH=(void *)((unsigned long)result__XBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q4FH)));
+        ((__POINTER *)next__VBJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WBJH)[ 0]=next__VBJH;
+      } else {
+        next__VBJH=((__POINTER *)result__XBJH)[ 0];
+        if ((next__VBJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XBJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Q4FH <<  1)) <=  4096)) {
+            next__VBJH=(void *)((unsigned long)result__XBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q4FH)));
+          } else {
+            next__VBJH=new_lab__QOJ(new_size__Q4FH);
+          };
+          ((__POINTER *)next__VBJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WBJH)[ 0]=next__VBJH;
+        } else {
+          ((__POINTER *)result__XBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XBJH=next__VBJH;
+        };
+      };
+      ptr__4IAC=result__XBJH;
+    } else {
+      t__U4FH=((__UINTEGER_32 )typ_id__DJAC);
+      a__T4FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4BJH=(__UINTEGER_32)((__UINTEGER_32)(sz__AJAC + a__T4FH) & (__UINTEGER_32)(~ a__T4FH));
+      ptr_table__1BJH=((__POINTER )(&(table_type[(t__U4FH)])));
+      lab_type__3BJH=(__UINTEGER_32)(t__U4FH |  1);
+      next__0BJH=((__POINTER )(NULL));
+      result__2BJH=((__POINTER *)ptr_table__1BJH)[ 0];
+      if ((result__2BJH == (void *)NULL)) {
+        result__2BJH=new_lab__QOJ(lab_type__3BJH);
+        next__0BJH=(void *)((unsigned long)result__2BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BJH)));
+        ((__POINTER *)next__0BJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1BJH)[ 0]=next__0BJH;
+      } else {
+        next__0BJH=((__POINTER *)result__2BJH)[ 0];
+        if ((next__0BJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2BJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4BJH <<  1)) <=  4096)) {
+            next__0BJH=(void *)((unsigned long)result__2BJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4BJH)));
+          } else {
+            next__0BJH=new_lab__QOJ(lab_type__3BJH);
+          };
+          ((__POINTER *)next__0BJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1BJH)[ 0]=next__0BJH;
+        } else {
+          ((__POINTER *)result__2BJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0BJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2BJH=next__0BJH;
+        };
+      };
+      ptr__4IAC=result__2BJH;
+    };
+    result__3IAC=((__ITM_SLOT_OPERATOR *)ptr__4IAC);
+    *(result__3IAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__G0HC=((__ITM_SLOT_OPERATOR *)result__3IAC);
+  Self__G0HC->parent_itm_slot__VR5B.parent_named__15.name__LI=name__QR5B;
+  Self__G0HC->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ=__tmp__OW5B;
+  Self__G0HC->parent_itm_slot__VR5B.id_section__F2C=__tmp__PW5B;
+  Self__YXHC=((__ITM_SLOT_OPERATOR *)result__3IAC);
+  if (((void *)associativity__SR5B == (void *)(&__string_6))) {
+    Self__YXHC->priority_and_level__BYHC=priority__TR5B;
   } else {
-    Self__J0HC->priority_and_level__S0HC=(__INTEGER)(- priority__UU5B);
+    Self__YXHC->priority_and_level__BYHC=(__INTEGER)(- priority__TR5B);
   };
-  ((__ITM_SLOT_OPERATOR *)result__4LAC)->pretty_name__30HC=pretty_name__SU5B;
-  return(result__4LAC);
+  ((__ITM_SLOT_OPERATOR *)result__3IAC)->pretty_name__MYHC=pretty_name__RR5B;
+  return(result__3IAC);
 }
 
-static void add_last__CAHC(__FAST_ARRAYoITM_ARGUMENTo *Self__DAHC,void *element__EAHC)
+static void add_last__R3GC(__FAST_ARRAYoITM_ARGUMENTo *Self__S3GC,void *element__T3GC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__U3GC,__tmp__34GC,__tmp__IGTD,Self__32XE;
+  __BOOLEAN __tmp__E4GC;
+  void **__tmp__24GC,**new__UFTD;
+  new_capacity__U3GC= 0;
+  if (((__INTEGER)(Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC +  1) <= (__INTEGER)(Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC -  1))) {
+    Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC=(__INTEGER)(Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC +  1);
+    __tmp__E4GC=TRUE__;
   } else {
-    __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;
+    __tmp__E4GC=FALSE__;
+  };
+  if ((! __tmp__E4GC)) {
+    if ((Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC ==  0)) {
+      Self__S3GC->parent_arrayed_collection__U4YB.storage__T4GC=create__QPBD( 2);
+      Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC= 2;
+      Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC= 0;
+    } else {
+      new_capacity__U3GC=(__INTEGER)(Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC <<  1);
+      __tmp__24GC=Self__S3GC->parent_arrayed_collection__U4YB.storage__T4GC;
+      __tmp__34GC=Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC;
+      new__UFTD=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__24GC)),((__UINTEGER_32 )(__INTEGER)(__tmp__34GC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__U3GC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__IGTD=(__INTEGER)(new_capacity__U3GC -  1);
+      Self__32XE=__tmp__34GC;
+      while ((Self__32XE <= __tmp__IGTD)) {
+        new__UFTD[Self__32XE]=NULL;
+        Self__32XE=(__INTEGER)(Self__32XE +  1);
+      };
+      Self__S3GC->parent_arrayed_collection__U4YB.storage__T4GC=new__UFTD;
+      Self__S3GC->parent_arrayed_collection__U4YB.capacity__X3GC=new_capacity__U3GC;
+      Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC=(__INTEGER)(Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC +  1);
+    };
+  };
+  ((void **)Self__S3GC->parent_arrayed_collection__U4YB.storage__T4GC)[Self__S3GC->parent_arrayed_collection__U4YB.upper__V3GC]=element__T3GC;
 }
 
-static void* read_slot_keyword__0Z5B(void *list_arg__2Z5B)
+static void* read_slot_keyword__ZW5B(void *list_arg__1W5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *n__3W5B,*result__1JP;
+  void *arg__4W5B;
+  void *result__5W5B;
+  __POSITION pos__GYXG,pos__IYXG,p__JCJH;
+  void *result__LMP;
+  void *sec__KCJH;
+  __ITM_SLOT *result__5BJH,*Self__HCJH;
+  __POINTER ptr__ACJH,ptr_table__MCJH,next__LCJH,result__NCJH;
+  __POINTER ptr_table__RCJH,next__QCJH,result__SCJH;
+  __INTEGER typ_id__BCJH;
+  __UINTEGER_32 sz__CCJH,a__DCJH,new_size__ECJH,t__FCJH,a__GCJH;
+  __UINTEGER_32 new_size__UCJH,lab_type__TCJH;
+  __FAST_ARRAYoSTRINGo *Self__VYAB,*Self__LZAB;
+  n__3W5B=NULL;
+  arg__4W5B=NULL;
+  result__5W5B=NULL;
+  if (read_identifier__12K()) {
+    short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+    result__1JP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__2JP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__1JP=create__ZBB( 128);
+    } else {
+      Self__VYAB=((__FAST_ARRAYoSTRINGo *)free__2JP);
+      result__1JP=((void **)Self__VYAB->parent_arrayed_collection__RKC.storage__SCT)[Self__VYAB->parent_arrayed_collection__RKC.upper__UKC];
+      Self__LZAB=((__FAST_ARRAYoSTRINGo *)free__2JP);
+      Self__LZAB->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__LZAB->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__3W5B=result__1JP;
+    copy__U4R(result__1JP,last_string__V0C);
+    arg__4W5B=read_loc_arg__with_self__25GB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__4W5B != (void *)NULL)) {
+      add_last__R3GC(list_arg__1W5B,arg__4W5B);
+      if (read_identifier__12K()) {
+        if (((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC == (void *)(&__string_30))) {
+          pos__GYXG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_291));
+          put_position__CMG(pos__GYXG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
         do {
-          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)) {
+          short__token__to__YBD((&__string_130),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+          append__2JS(n__3W5B,(&__string_112));
+          append__2JS(n__3W5B,last_string__V0C);
+          arg__4W5B=read_loc_arg__with_self__25GB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__4W5B == (void *)NULL)) {
+            pos__IYXG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_168));
+            put_position__CMG(pos__IYXG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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)));
+          add_last__R3GC(list_arg__1W5B,arg__4W5B);
+        } while (read_identifier__12K());
+      };
+    };
+    result__LMP=get__YWB(result__1JP);
+    add_last__TNV(free__2JP,result__1JP);
+    ((__STRING *)result__1JP)->count__EGC= 0;
+    p__JCJH=current_position__XUF();
+    sec__KCJH=last_section__E1C;
+    result__5BJH=NULL;
+    ptr__ACJH=((__POINTER )(NULL));
+    typ_id__BCJH= 0;
+    sz__CCJH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__CCJH ==  0)) {
+      result__5BJH=ITM_SLOT__;
+    } else {
+      typ_id__BCJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CCJH);
+      if ((typ_id__BCJH == (__INTEGER)(-  1))) {
+        a__DCJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ECJH=(__UINTEGER_32)((__UINTEGER_32)(sz__CCJH + a__DCJH) & (__UINTEGER_32)(~ a__DCJH));
+        ptr_table__MCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ECJH / ((__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__QOJ(new_size__ECJH);
+          next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECJH)));
+          ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ECJH <<  1)) <=  4096)) {
+              next__LCJH=(void *)((unsigned long)result__NCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ECJH)));
             } else {
-              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)));
+              next__LCJH=new_lab__QOJ(new_size__ECJH);
+            };
+            ((__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__ACJH=result__NCJH;
+      } else {
+        t__FCJH=((__UINTEGER_32 )typ_id__BCJH);
+        a__GCJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__CCJH + a__GCJH) & (__UINTEGER_32)(~ a__GCJH));
+        ptr_table__RCJH=((__POINTER )(&(table_type[(t__FCJH)])));
+        lab_type__TCJH=(__UINTEGER_32)(t__FCJH |  1);
+        next__QCJH=((__POINTER )(NULL));
+        result__SCJH=((__POINTER *)ptr_table__RCJH)[ 0];
+        if ((result__SCJH == (void *)NULL)) {
+          result__SCJH=new_lab__QOJ(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__3SH)))) &  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__BYIH=new_lab__URJ(lab_type__EYIH);
+              next__QCJH=new_lab__QOJ(lab_type__TCJH);
             };
-            ((__POINTER *)next__BYIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__CYIH)[ 0]=next__BYIH;
+            ((__POINTER *)next__QCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
           } else {
-            ((__POINTER *)result__DYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__DYIH=next__BYIH;
+            ((__POINTER *)result__SCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SCJH=next__QCJH;
           };
         };
-        ptr__RXIH=result__DYIH;
+        ptr__ACJH=result__SCJH;
       };
-      result__QXIH=((__ITM_SLOT *)ptr__RXIH);
-      *(result__QXIH) = *(ITM_SLOT__);
+      result__5BJH=((__ITM_SLOT *)ptr__ACJH);
+      *(result__5BJH) = *(ITM_SLOT__);
     };
-    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;
+    Self__HCJH=((__ITM_SLOT *)result__5BJH);
+    Self__HCJH->parent_named__15.name__LI=result__LMP;
+    Self__HCJH->parent_named__15.parent_itm_object__4.position__RAJ=p__JCJH;
+    Self__HCJH->id_section__F2C=sec__KCJH;
+    result__5W5B=result__5BJH;
   };
-  return(result__A05B);
+  return(result__5W5B);
 }
 
-static void** create__4PBD(__INTEGER nb_elements__AQBD)
+static void** create__QPBD(__INTEGER nb_elements__SPBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__43DH,a__D4DH,new_size__53DH,new_size2__A4DH,a__54FH;
+  __UINTEGER_32 new_size__A5FH;
+  __POINTER result__33DH,ptr_table__WCJH,next__VCJH,result__XCJH;
+  void *result__0CJH;
+  __INTEGER Self__GGXD;
+  void **Result__GDGD;
+  sz__43DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SPBD * ((__INTEGER )(sizeof(void *)))));
+  result__33DH=((__POINTER )(NULL));
+  a__D4DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__53DH=(__UINTEGER_32)((__UINTEGER_32)(sz__43DH + a__D4DH) & (__UINTEGER_32)(~ a__D4DH));
+  new_size2__A4DH=(__UINTEGER_32)(new_size__53DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__A4DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__54FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__A5FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__A4DH + a__54FH) & (__UINTEGER_32)(~ a__54FH));
+    ptr_table__WCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A5FH / ((__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__QOJ(new_size__A5FH);
+      next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5FH)));
+      ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__A5FH <<  1)) <=  4096)) {
+          next__VCJH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A5FH)));
+        } else {
+          next__VCJH=new_lab__QOJ(new_size__A5FH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__XCJH)[ 0]=((__POINTER ) 3);
+    result__33DH=(void *)((unsigned long)result__XCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__0CJH=first_free__VAVB;
+    while ((((void *)result__0CJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__0CJH)->map_size_and_id__YTB &  4294967292LU) < new_size__53DH))) {
+      result__0CJH=((__MEMORY *)result__0CJH)->map_next_free__ZTB;
     };
-    if (((void *)result__LYIH == (void *)NULL)) {
-      result__LYIH=new_page__WA5();
+    if (((void *)result__0CJH == (void *)NULL)) {
+      result__0CJH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__0CJH,new_size__53DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__0CJH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__33DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__0CJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__GDGD=((void **)result__33DH);
+  Self__GGXD=(__INTEGER)(nb_elements__SPBD -  1);
+  while ((Self__GGXD >=  0)) {
+    Result__GDGD[Self__GGXD]=NULL;
+    Self__GGXD=(__INTEGER)(Self__GGXD -  1);
   };
-  return(Result__0DGD);
+  return(Result__GDGD);
 }
 
-static void set_argument_list__3CHC(__ITM_SLOT *Self__4CHC,void *p__5CHC)
+static void set_argument_list__MAHC(__ITM_SLOT *Self__NAHC,void *p__OAHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  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__;
+  void *__tmp__WAHC,*__tmp__IBHC,*__tmp__VBHC;
+  __INTEGER __tmp__XAHC;
+  __POSITION __tmp__JBHC,__tmp__WBHC;
+  __SECTION_ *Self__MX1G;
+  __BOOLEAN __tmp__1AHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__F5FH,*Self__BXID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__OAHC)->parent_arrayed_collection__U4YB.upper__V3GC +  1) >  1)) {
+    __tmp__1AHC=TRUE__;
   } else {
-    __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;
+    __tmp__WAHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__OAHC)->parent_arrayed_collection__U4YB.storage__T4GC)[ 0];
+    if (((struct ___OBJ *)__tmp__WAHC)->__id==__ITM_ARG__) {
+      __tmp__XAHC= 1;
     } else {
-      __tmp__IDHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__HDHC)->name__PNPF)->parent_arrayed_collection__P5I.upper__DAPD +  1);
+      __tmp__XAHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__WAHC)->name__LYPF)->parent_arrayed_collection__L2I.upper__R4OD +  1);
     };
-    __tmp__MDHC=(__tmp__IDHC >  1);
+    __tmp__1AHC=(__tmp__XAHC >  1);
   };
-  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;
+  if (__tmp__1AHC) {
+    if (((void *)((__SECTION_ *)Self__NAHC->id_section__F2C)->name__ZWDC == (void *)(&__string_25))) {
+      Self__F5FH=((__FAST_ARRAYoITM_ARGUMENTo *)p__OAHC);
+      __tmp__IBHC=((void **)Self__F5FH->parent_arrayed_collection__U4YB.storage__T4GC)[Self__F5FH->parent_arrayed_collection__U4YB.upper__V3GC];
+      if (((struct ___OBJ *)__tmp__IBHC)->__id==__ITM_ARG__) {
+        __tmp__JBHC=((__ITM_ARG *)__tmp__IBHC)->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ;
       } else {
-        __tmp__0DHC=((__ITM_ARGS *)__tmp__ZDHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
+        __tmp__JBHC=((__ITM_ARGS *)__tmp__IBHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
       };
-      put_error__text__SNG( 1,(&__string_232));
-      put_position__2OG(__tmp__0DHC);
-      put_string__21F(msg_err__XNG);
-      if ((type_error__WNG !=  2)) {
+      put_error__text__YKG( 1,(&__string_234));
+      put_position__CMG(__tmp__JBHC);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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;
+    Self__MX1G=((__SECTION_ *)Self__NAHC->id_section__F2C);
+    if ((((void *)Self__MX1G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__MX1G->name__ZWDC == (void *)(&__string_24)))) {
+      Self__BXID=((__FAST_ARRAYoITM_ARGUMENTo *)p__OAHC);
+      __tmp__VBHC=((void **)Self__BXID->parent_arrayed_collection__U4YB.storage__T4GC)[Self__BXID->parent_arrayed_collection__U4YB.upper__V3GC];
+      if (((struct ___OBJ *)__tmp__VBHC)->__id==__ITM_ARG__) {
+        __tmp__WBHC=((__ITM_ARG *)__tmp__VBHC)->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ;
       } else {
-        __tmp__HEHC=((__ITM_ARGS *)__tmp__GEHC)->parent_itm_argument__ABFE.parent_itm_code__04M.position__VDJ;
+        __tmp__WBHC=((__ITM_ARGS *)__tmp__VBHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
       };
-      put_error__text__SNG( 1,(&__string_233));
-      put_position__2OG(__tmp__HEHC);
-      put_string__21F(msg_err__XNG);
-      if ((type_error__WNG !=  2)) {
+      put_error__text__YKG( 1,(&__string_235));
+      put_position__CMG(__tmp__WBHC);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__4CHC->argument_list__OEHC=p__5CHC;
+  Self__NAHC->argument_list__3BHC=p__OAHC;
 }
 
-static __ITM_TYPE_MULTI* get__KJP(void *lt__MJP)
+static __ITM_TYPE_MULTI* get__3EP(void *lt__5EP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __ITM_TYPE_MULTI *result__BFP,*__tmp__TGP,*result__LYHB;
+  __INTEGER idx__CFP,typ_id__RYHB,new_capacity__IVAB,__tmp__MWAB;
+  __INTEGER __tmp__HLFC,Self__VYVD;
+  void *__tmp__SGP;
+  __POINTER ptr__MYHB,ptr_table__4CJH,next__3CJH,result__5CJH;
+  __POINTER ptr_table__DDJH,next__CDJH,result__EDJH;
+  __UINTEGER_32 sz__OYHB,a__P5FH,new_size__Q5FH,t__U5FH,a__T5FH;
+  __UINTEGER_32 new_size__GDJH,lab_type__FDJH;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__GVAB;
+  __BOOLEAN __tmp__WVAB;
+  void **__tmp__LWAB,**new__TKFC;
+  result__BFP=NULL;
+  idx__CFP= 0;
+  while (((idx__CFP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__IFP)->parent_arrayed_collection__HFP.upper__RFP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__IFP)->parent_arrayed_collection__HFP.storage__1XV)[idx__CFP])->list_type__1FP != (void *)lt__5EP))) {
+    idx__CFP=(__INTEGER)(idx__CFP +  1);
+  };
+  if ((idx__CFP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__IFP)->parent_arrayed_collection__HFP.upper__RFP)) {
+    __tmp__SGP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__IFP)->parent_arrayed_collection__HFP.storage__1XV)[idx__CFP];
+    if (__tmp__SGP==NULL) {
+      __tmp__TGP=NULL;
+    } else {
+      __tmp__TGP=((__ITM_TYPE_MULTI *)__tmp__SGP);
+    };
+    result__BFP=__tmp__TGP;
   } else {
-    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)));
+    result__LYHB=NULL;
+    ptr__MYHB=((__POINTER )(NULL));
+    typ_id__RYHB= 0;
+    sz__OYHB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__OYHB ==  0)) {
+      result__LYHB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__RYHB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OYHB);
+      if ((typ_id__RYHB == (__INTEGER)(-  1))) {
+        a__P5FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Q5FH=(__UINTEGER_32)((__UINTEGER_32)(sz__OYHB + a__P5FH) & (__UINTEGER_32)(~ a__P5FH));
+        ptr_table__4CJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q5FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__3CJH=((__POINTER )(NULL));
+        result__5CJH=((__POINTER *)ptr_table__4CJH)[ 0];
+        if ((result__5CJH == (void *)NULL)) {
+          result__5CJH=new_lab__QOJ(new_size__Q5FH);
+          next__3CJH=(void *)((unsigned long)result__5CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5FH)));
+          ((__POINTER *)next__3CJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4CJH)[ 0]=next__3CJH;
+        } else {
+          next__3CJH=((__POINTER *)result__5CJH)[ 0];
+          if ((next__3CJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5CJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Q5FH <<  1)) <=  4096)) {
+              next__3CJH=(void *)((unsigned long)result__5CJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q5FH)));
             } else {
-              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)));
+              next__3CJH=new_lab__QOJ(new_size__Q5FH);
+            };
+            ((__POINTER *)next__3CJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4CJH)[ 0]=next__3CJH;
+          } else {
+            ((__POINTER *)result__5CJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5CJH=next__3CJH;
+          };
+        };
+        ptr__MYHB=result__5CJH;
+      } else {
+        t__U5FH=((__UINTEGER_32 )typ_id__RYHB);
+        a__T5FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OYHB + a__T5FH) & (__UINTEGER_32)(~ a__T5FH));
+        ptr_table__DDJH=((__POINTER )(&(table_type[(t__U5FH)])));
+        lab_type__FDJH=(__UINTEGER_32)(t__U5FH |  1);
+        next__CDJH=((__POINTER )(NULL));
+        result__EDJH=((__POINTER *)ptr_table__DDJH)[ 0];
+        if ((result__EDJH == (void *)NULL)) {
+          result__EDJH=new_lab__QOJ(lab_type__FDJH);
+          next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDJH)));
+          ((__POINTER *)next__CDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
+        } 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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GDJH <<  1)) <=  4096)) {
+              next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDJH)));
             } else {
-              next__TYIH=new_lab__URJ(lab_type__WYIH);
+              next__CDJH=new_lab__QOJ(lab_type__FDJH);
             };
-            ((__POINTER *)next__TYIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UYIH)[ 0]=next__TYIH;
+            ((__POINTER *)next__CDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
           } else {
-            ((__POINTER *)result__VYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VYIH=next__TYIH;
+            ((__POINTER *)result__EDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__EDJH=next__CDJH;
           };
         };
-        ptr__A3HB=result__VYIH;
+        ptr__MYHB=result__EDJH;
       };
-      result__52HB=((__ITM_TYPE_MULTI *)ptr__A3HB);
-      *(result__52HB) = *(ITM_TYPE_MULTI__);
+      result__LYHB=((__ITM_TYPE_MULTI *)ptr__MYHB);
+      *(result__LYHB) = *(ITM_TYPE_MULTI__);
     };
-    ((__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__;
+    ((__ITM_TYPE_MULTI *)result__LYHB)->list_type__1FP=lt__5EP;
+    result__BFP=result__LYHB;
+    Self__GVAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__IFP);
+    new_capacity__IVAB= 0;
+    if (((__INTEGER)(Self__GVAB->parent_arrayed_collection__HFP.upper__RFP +  1) <= (__INTEGER)(Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV -  1))) {
+      Self__GVAB->parent_arrayed_collection__HFP.upper__RFP=(__INTEGER)(Self__GVAB->parent_arrayed_collection__HFP.upper__RFP +  1);
+      __tmp__WVAB=TRUE__;
     } else {
-      __tmp__L0AB=FALSE__;
+      __tmp__WVAB=FALSE__;
     };
-    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;
+    if ((! __tmp__WVAB)) {
+      if ((Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV ==  0)) {
+        Self__GVAB->parent_arrayed_collection__HFP.storage__1XV=create__KIXB( 2);
+        Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV= 2;
+        Self__GVAB->parent_arrayed_collection__HFP.upper__RFP= 0;
       } else {
-        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);
+        new_capacity__IVAB=(__INTEGER)(Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV <<  1);
+        __tmp__LWAB=Self__GVAB->parent_arrayed_collection__HFP.storage__1XV;
+        __tmp__MWAB=Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV;
+        new__TKFC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__LWAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__MWAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__IVAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__HLFC=(__INTEGER)(new_capacity__IVAB -  1);
+        Self__VYVD=__tmp__MWAB;
+        while ((Self__VYVD <= __tmp__HLFC)) {
+          new__TKFC[Self__VYVD]=NULL;
+          Self__VYVD=(__INTEGER)(Self__VYVD +  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);
+        Self__GVAB->parent_arrayed_collection__HFP.storage__1XV=new__TKFC;
+        Self__GVAB->parent_arrayed_collection__HFP.capacity__QXV=new_capacity__IVAB;
+        Self__GVAB->parent_arrayed_collection__HFP.upper__RFP=(__INTEGER)(Self__GVAB->parent_arrayed_collection__HFP.upper__RFP +  1);
       };
     };
-    ((void **)Self__1ZAB->parent_arrayed_collection__UJP.storage__Q2V)[Self__1ZAB->parent_arrayed_collection__UJP.upper__4JP]=result__52HB;
+    ((void **)Self__GVAB->parent_arrayed_collection__HFP.storage__1XV)[Self__GVAB->parent_arrayed_collection__HFP.upper__RFP]=result__LYHB;
   };
-  return(result__OJP);
+  return(result__BFP);
 }
 
-static void* read_type__LCM(__PARSER *Self__MCM,__BOOLEAN is_local__NCM)
+static void* read_type__B4L(__PARSER *Self__C4L,__BOOLEAN is_local__D4L)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *style__F4L;
+  void *result__G4L;
+  void *typ_arg__I4L,*typ_res__J4L,*typ_arg__QHN,*typ_res__RHN;
+  __POSITION pos__X1XG,pos__Z1XG,pos__11XG,__tmp__MBM,pos__51XG;
+  __POSITION pos__43XG,pos__A4XG;
+  __ITM_TYPE_STYLE *Self__QAGH;
+  void *result__THN;
+  __INTEGER idx__UHN,typ_id__5WGB,new_capacity__MIAB,__tmp__QJAB;
+  __INTEGER __tmp__ZIFC,Self__WWVD;
+  __ITM_TYPE_BLOCK *result__ZWGB,*Self__YWCC;
+  __POINTER ptr__0WGB,ptr_table__0DJH,next__ZDJH,result__1DJH;
+  __POINTER ptr_table__5DJH,next__4DJH,result__AEJH;
+  __UINTEGER_32 sz__2WGB,a__ZAGH,new_size__0AGH,t__4AGH,a__3AGH;
+  __UINTEGER_32 new_size__CEJH,lab_type__BEJH;
+  void *lst__H4L;
+  __BOOLEAN result__HDJH,result__KDJH,result__NDJH,result__QDJH;
+  __BOOLEAN result__TDJH,result__WDJH,__tmp__0IAB,result__EEJH;
+  __BOOLEAN __tmp__LDM,result__GEJH;
+  __CHARACTER result__IDJH,result__LDJH,result__ODJH,result__RDJH;
+  __CHARACTER result__UDJH,result__XDJH;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__KIAB;
+  void **__tmp__PJAB,**new__FIFC;
+  style__F4L=NULL;
+  result__G4L=NULL;
+  lst__H4L=NULL;
+  typ_arg__I4L=NULL;
+  typ_res__J4L=NULL;
+  result__HDJH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__HDJH=FALSE__;
   } else {
-    result__ZYIH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__ZYIH=((__CHARACTER )(( 0)));
+    result__IDJH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__IDJH=((__CHARACTER )(( 0)));
     } else {
-      result__ZYIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__IDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__ZYIH == '{')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__YYIH=TRUE__;
+    if ((result__IDJH == '{')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__HDJH=TRUE__;
     };
   };
-  if (result__YYIH) {
-    result__1YIH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__1YIH=FALSE__;
+  if (result__HDJH) {
+    result__KDJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__KDJH=FALSE__;
     } else {
-      result__2YIH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__2YIH=((__CHARACTER )(( 0)));
+      result__LDJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__LDJH=((__CHARACTER )(( 0)));
       } else {
-        result__2YIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__LDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__2YIH == '(')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__1YIH=TRUE__;
+      if ((result__LDJH == '(')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__KDJH=TRUE__;
       };
     };
-    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)) {
+    if (result__KDJH) {
+      lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
+      if (((void *)lst__H4L == (void *)NULL)) {
+        pos__X1XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_265));
+        put_position__CMG(pos__X1XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.upper__3DV +  1) ==  1)) {
+        typ_arg__I4L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.storage__EIV)[ 0];
       } else {
-        typ_arg__SCM=get__KJP(lst__RCM);
+        typ_arg__I4L=get__3EP(lst__H4L);
       };
-      result__4YIH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__4YIH=FALSE__;
+      result__NDJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__NDJH=FALSE__;
       } else {
-        result__5YIH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__5YIH=((__CHARACTER )(( 0)));
+        result__ODJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__ODJH=((__CHARACTER )(( 0)));
         } else {
-          result__5YIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__ODJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__5YIH == ')')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__4YIH=TRUE__;
+        if ((result__ODJH == ')')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__NDJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__NDJH)) {
+        pos__Z1XG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_262));
+        put_position__CMG(pos__Z1XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      result__BZIH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__BZIH=FALSE__;
+      result__QDJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__QDJH=FALSE__;
       } else {
-        result__CZIH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__CZIH=((__CHARACTER )(( 0)));
+        result__RDJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__RDJH=((__CHARACTER )(( 0)));
         } else {
-          result__CZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__RDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__CZIH == ';')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__BZIH=TRUE__;
+        if ((result__RDJH == ';')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__QDJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__QDJH)) {
+        pos__11XG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_242));
+        put_position__CMG(pos__11XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
+      lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
     } else {
-      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__;
+      lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
+      if (((void *)lst__H4L != (void *)NULL)) {
+        result__TDJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__TDJH=FALSE__;
         } else {
-          result__FZIH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__FZIH=((__CHARACTER )(( 0)));
+          result__UDJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__UDJH=((__CHARACTER )(( 0)));
           } else {
-            result__FZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__UDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__FZIH == ';')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__EZIH=TRUE__;
+          if ((result__UDJH == ';')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__TDJH=TRUE__;
           };
         };
-        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];
+        if (result__TDJH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.upper__3DV +  1) ==  1)) {
+            typ_arg__I4L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.storage__EIV)[ 0];
           } else {
-            typ_arg__SCM=get__KJP(lst__RCM);
-            copy__BDS(string_tmp__VH,(&__string_290));
-            switch (((struct ___OBJ *)typ_arg__SCM)->__id) {
+            typ_arg__I4L=get__3EP(lst__H4L);
+            copy__U4R(string_tmp__VH,(&__string_292));
+            switch (((struct ___OBJ *)typ_arg__I4L)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__JOS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__SCM)->parent_itm_type__FEE.name__SYP);
+              append__2JS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__I4L)->parent_itm_type__LAE.name__FUP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__JOS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__SCM)->name__SYP);
+              append__2JS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__I4L)->name__FUP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__0IBC(typ_arg__SCM,string_tmp__VH);
+              append_in__BGBC(typ_arg__I4L,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__WGPD(typ_arg__SCM,string_tmp__VH);
+              append_in__EFPD(typ_arg__I4L,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__0HPD(typ_arg__SCM,string_tmp__VH);
+              append_in__IGPD(typ_arg__I4L,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              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,' ');
+              Self__QAGH=((__ITM_TYPE_STYLE *)typ_arg__I4L);
+              if (((void *)Self__QAGH->style__OUP != (void *)NULL)) {
+                append__2JS(string_tmp__VH,Self__QAGH->style__OUP);
+                add_last__UHT(string_tmp__VH,' ');
               };
-              append__JOS(string_tmp__VH,Self__3UFH->parent_itm_type_simple__JSN.name__SYP);
+              append__2JS(string_tmp__VH,Self__QAGH->parent_itm_type_simple__2NN.name__FUP);
             } break;
             };
-            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)) {
+            append__2JS(string_tmp__VH,(&__string_293));
+            __tmp__MBM=current_position__XUF();
+            put_error__text__YKG( 2,string_tmp__VH);
+            put_position__CMG(__tmp__MBM);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          lst__RCM=read_type_list__QMO(Self__MCM,FALSE__);
+          lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
         };
       };
     };
-    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];
+    if (((void *)lst__H4L != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.upper__3DV +  1) ==  1)) {
+        typ_res__J4L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__H4L)->parent_arrayed_collection__EYC.storage__EIV)[ 0];
       } else {
-        typ_res__TCM=get__KJP(lst__RCM);
+        typ_res__J4L=get__3EP(lst__H4L);
       };
     };
-    result__HZIH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__HZIH=FALSE__;
+    result__WDJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__WDJH=FALSE__;
     } else {
-      result__IZIH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__IZIH=((__CHARACTER )(( 0)));
+      result__XDJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__XDJH=((__CHARACTER )(( 0)));
       } else {
-        result__IZIH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__XDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__IZIH == '}')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__HZIH=TRUE__;
+      if ((result__XDJH == '}')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__WDJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__WDJH)) {
+      pos__51XG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_294));
+      put_position__CMG(pos__51XG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    typ_arg__QHN=typ_arg__I4L;
+    typ_res__RHN=typ_res__J4L;
+    result__THN=NULL;
+    idx__UHN= 0;
+    while (((idx__UHN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN)->parent_arrayed_collection__ZHN.upper__DIN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN)->parent_arrayed_collection__ZHN.storage__EGV)[idx__UHN])->type_argument__RIN != (void *)typ_arg__QHN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN)->parent_arrayed_collection__ZHN.storage__EGV)[idx__UHN])->type_result__1IN != (void *)typ_res__RHN)))) {
+      idx__UHN=(__INTEGER)(idx__UHN +  1);
+    };
+    if ((idx__UHN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN)->parent_arrayed_collection__ZHN.upper__DIN)) {
+      result__THN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN)->parent_arrayed_collection__ZHN.storage__EGV)[idx__UHN];
+    } else {
+      result__ZWGB=NULL;
+      ptr__0WGB=((__POINTER )(NULL));
+      typ_id__5WGB= 0;
+      sz__2WGB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__2WGB ==  0)) {
+        result__ZWGB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__5WGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2WGB);
+        if ((typ_id__5WGB == (__INTEGER)(-  1))) {
+          a__ZAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0AGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2WGB + a__ZAGH) & (__UINTEGER_32)(~ a__ZAGH));
+          ptr_table__0DJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0AGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ZDJH=((__POINTER )(NULL));
+          result__1DJH=((__POINTER *)ptr_table__0DJH)[ 0];
+          if ((result__1DJH == (void *)NULL)) {
+            result__1DJH=new_lab__QOJ(new_size__0AGH);
+            next__ZDJH=(void *)((unsigned long)result__1DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AGH)));
+            ((__POINTER *)next__ZDJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0DJH)[ 0]=next__ZDJH;
+          } else {
+            next__ZDJH=((__POINTER *)result__1DJH)[ 0];
+            if ((next__ZDJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1DJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0AGH <<  1)) <=  4096)) {
+                next__ZDJH=(void *)((unsigned long)result__1DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0AGH)));
               } else {
-                next__KZIH=new_lab__URJ(new_size__HVFH);
+                next__ZDJH=new_lab__QOJ(new_size__0AGH);
               };
-              ((__POINTER *)next__KZIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LZIH)[ 0]=next__KZIH;
+              ((__POINTER *)next__ZDJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0DJH)[ 0]=next__ZDJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__1DJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1DJH=next__ZDJH;
+            };
+          };
+          ptr__0WGB=result__1DJH;
+        } else {
+          t__4AGH=((__UINTEGER_32 )typ_id__5WGB);
+          a__3AGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2WGB + a__3AGH) & (__UINTEGER_32)(~ a__3AGH));
+          ptr_table__5DJH=((__POINTER )(&(table_type[(t__4AGH)])));
+          lab_type__BEJH=(__UINTEGER_32)(t__4AGH |  1);
+          next__4DJH=((__POINTER )(NULL));
+          result__AEJH=((__POINTER *)ptr_table__5DJH)[ 0];
+          if ((result__AEJH == (void *)NULL)) {
+            result__AEJH=new_lab__QOJ(lab_type__BEJH);
+            next__4DJH=(void *)((unsigned long)result__AEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEJH)));
+            ((__POINTER *)next__4DJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5DJH)[ 0]=next__4DJH;
+          } else {
+            next__4DJH=((__POINTER *)result__AEJH)[ 0];
+            if ((next__4DJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AEJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__CEJH <<  1)) <=  4096)) {
+                next__4DJH=(void *)((unsigned long)result__AEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEJH)));
               } else {
-                next__PZIH=new_lab__URJ(lab_type__SZIH);
+                next__4DJH=new_lab__QOJ(lab_type__BEJH);
               };
-              ((__POINTER *)next__PZIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__QZIH)[ 0]=next__PZIH;
+              ((__POINTER *)next__4DJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5DJH)[ 0]=next__4DJH;
             } else {
-              ((__POINTER *)result__RZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__RZIH=next__PZIH;
+              ((__POINTER *)result__AEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__AEJH=next__4DJH;
             };
           };
-          ptr__O1GB=result__RZIH;
+          ptr__0WGB=result__AEJH;
         };
-        result__N1GB=((__ITM_TYPE_BLOCK *)ptr__O1GB);
-        *(result__N1GB) = *(ITM_TYPE_BLOCK__);
+        result__ZWGB=((__ITM_TYPE_BLOCK *)ptr__0WGB);
+        *(result__ZWGB) = *(ITM_TYPE_BLOCK__);
       };
-      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__;
+      Self__YWCC=((__ITM_TYPE_BLOCK *)result__ZWGB);
+      Self__YWCC->type_argument__RIN=typ_arg__I4L;
+      Self__YWCC->type_result__1IN=typ_res__J4L;
+      result__THN=result__ZWGB;
+      Self__KIAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__0HN);
+      new_capacity__MIAB= 0;
+      if (((__INTEGER)(Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN +  1) <= (__INTEGER)(Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV -  1))) {
+        Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN=(__INTEGER)(Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN +  1);
+        __tmp__0IAB=TRUE__;
       } else {
-        __tmp__PNAB=FALSE__;
+        __tmp__0IAB=FALSE__;
       };
-      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;
+      if ((! __tmp__0IAB)) {
+        if ((Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV ==  0)) {
+          Self__KIAB->parent_arrayed_collection__ZHN.storage__EGV=create__FRWB( 2);
+          Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV= 2;
+          Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN= 0;
         } else {
-          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);
+          new_capacity__MIAB=(__INTEGER)(Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV <<  1);
+          __tmp__PJAB=Self__KIAB->parent_arrayed_collection__ZHN.storage__EGV;
+          __tmp__QJAB=Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV;
+          new__FIFC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__PJAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__QJAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__MIAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__ZIFC=(__INTEGER)(new_capacity__MIAB -  1);
+          Self__WWVD=__tmp__QJAB;
+          while ((Self__WWVD <= __tmp__ZIFC)) {
+            new__FIFC[Self__WWVD]=NULL;
+            Self__WWVD=(__INTEGER)(Self__WWVD +  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);
+          Self__KIAB->parent_arrayed_collection__ZHN.storage__EGV=new__FIFC;
+          Self__KIAB->parent_arrayed_collection__ZHN.capacity__ZFV=new_capacity__MIAB;
+          Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN=(__INTEGER)(Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN +  1);
         };
       };
-      ((void **)Self__5MAB->parent_arrayed_collection__GMN.storage__ZKV)[Self__5MAB->parent_arrayed_collection__GMN.upper__QMN]=result__N1GB;
+      ((void **)Self__KIAB->parent_arrayed_collection__ZHN.storage__EGV)[Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN]=result__ZWGB;
     };
-    result__QCM=result__AMN;
+    result__G4L=result__THN;
   } else {
-    result__VZIH=read_word__YPF((&__string_9));
-    if (is_shorter__FZ) {
-      if (result__VZIH) {
+    result__EEJH=read_word__4MF((&__string_9));
+    if (is_shorter__LZ) {
+      if (result__EEJH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
-          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
-          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__VZIH) {
-      __tmp__VHM=TRUE__;
+    if (result__EEJH) {
+      __tmp__LDM=TRUE__;
     } else {
-      result__XZIH=read_word__YPF((&__string_10));
-      if (is_shorter__FZ) {
-        if (result__XZIH) {
+      result__GEJH=read_word__4MF((&__string_10));
+      if (is_shorter__LZ) {
+        if (result__GEJH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
-            short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+            short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
           } else {
-            short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+            short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
           };
         };
       };
-      __tmp__VHM=result__XZIH;
+      __tmp__LDM=result__GEJH;
     };
-    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)) {
+    if (__tmp__LDM) {
+      style__F4L=last_string__V0C;
+      if ((is_local__D4L && ((void *)last_string__V0C == (void *)(&__string_9)))) {
+        pos__43XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_295));
+        put_position__CMG(pos__43XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)) {
+    result__G4L=read_prototype__CKN(Self__C4L,style__F4L);
+    if (((void *)read_contract__VQF(Self__C4L) != (void *)NULL)) {
+      pos__A4XG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_260));
+      put_position__CMG(pos__A4XG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__QCM);
+  return(result__G4L);
 }
 
-static void set_result_type__Y3FC(__ITM_SLOT *Self__Z3FC,void *t__03FC)
+static void set_result_type__D1FC(__ITM_SLOT *Self__E1FC,void *t__F1FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *tm__G1FC,*__tmp__P1FC;
+  __SECTION_ *Self__SX1G;
+  __POSITION pos__PZID;
+  tm__G1FC=NULL;
+  Self__SX1G=((__SECTION_ *)Self__E1FC->id_section__F2C);
+  if ((((void *)Self__SX1G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__SX1G->name__ZWDC == (void *)(&__string_24)))) {
+    if (t__F1FC==NULL) {
+      __tmp__P1FC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__F1FC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__E4FC=((void *)t__03FC);
+        __tmp__P1FC=((void *)t__F1FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__E4FC=((void *)t__03FC);
+        __tmp__P1FC=((void *)t__F1FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__E4FC=NULL;
+        __tmp__P1FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__E4FC=((void *)t__03FC);
+        __tmp__P1FC=((void *)t__F1FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__E4FC=((void *)t__03FC);
+        __tmp__P1FC=((void *)t__F1FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__E4FC=((void *)t__03FC);
+        __tmp__P1FC=((void *)t__F1FC);
       } break;
       }
     };
-    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)) {
+    tm__G1FC=__tmp__P1FC;
+    if (((((void *)__tmp__P1FC == (void *)NULL) || ((void *)__tmp__P1FC == (void *)type_self__CQN)) || ((void *)__tmp__P1FC == (void *)type_void__MTF))) {
+      pos__PZID=Self__E1FC->parent_named__15.parent_itm_object__4.position__RAJ;
+      put_error__text__YKG( 1,(&__string_239));
+      put_position__CMG(pos__PZID);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__Z3FC->result_type__C5FC=t__03FC;
+  Self__E1FC->result_type__N2FC=t__F1FC;
 }
 
-static void* read_contract__PTF(__PARSER *Self__QTF)
+static void* read_contract__VQF(__PARSER *Self__WQF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *e__ZQF;
+  void *result__0QF;
+  __POSITION p__SEJH,p__XTL,pos__I4XG,pos__K4XG,p__VFJH;
+  __ITM_LIST *result__KEJH;
+  __POINTER ptr__LEJH,ptr_table__UEJH,next__TEJH,result__VEJH;
+  __POINTER ptr_table__ZEJH,next__YEJH,result__0EJH,ptr__ZZL;
+  __POINTER ptr_table__4EJH,next__3EJH,result__5EJH,ptr_table__DFJH;
+  __POINTER next__CFJH,result__EFJH,ptr__OFJH,ptr_table__XFJH;
+  __POINTER next__WFJH,result__YFJH,ptr_table__2FJH,next__1FJH;
+  __POINTER result__3FJH;
+  __INTEGER typ_id__MEJH,typ_id__4ZL,typ_id__PFJH;
+  __UINTEGER_32 sz__NEJH,a__OEJH,new_size__PEJH,t__QEJH,a__REJH;
+  __UINTEGER_32 new_size__2EJH,lab_type__1EJH,sz__1ZL,a__HBGH;
+  __UINTEGER_32 new_size__IBGH,t__MBGH,a__LBGH,new_size__GFJH;
+  __UINTEGER_32 lab_type__FFJH,sz__QFJH,a__RFJH,new_size__SFJH,t__TFJH;
+  __UINTEGER_32 a__UFJH,new_size__5FJH,lab_type__4FJH;
+  __ITM_LDOTS *result__YZL;
+  __ITM_PROTOTYPE *result__NFJH;
+  __BOOLEAN continue__YQF,result__HEJH,result__HFJH,result__KFJH;
+  void *lst__ARF,*result__01HH;
+  __CHARACTER result__IEJH,result__IFJH,result__LFJH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__11HH,*Self__21HH;
+  continue__YQF=FALSE__;
+  e__ZQF=NULL;
+  result__0QF=NULL;
+  lst__ARF=NULL;
+  result__HEJH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__HEJH=FALSE__;
   } else {
-    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)));
+    result__IEJH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__IEJH=((__CHARACTER )(( 0)));
+    } else {
+      result__IEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    };
+    if ((result__IEJH == '[')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__HEJH=TRUE__;
+    };
+  };
+  if (result__HEJH) {
+    p__SEJH=current_position__XUF();
+    result__KEJH=NULL;
+    ptr__LEJH=((__POINTER )(NULL));
+    typ_id__MEJH= 0;
+    sz__NEJH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+    if ((sz__NEJH ==  0)) {
+      result__KEJH=ITM_LIST__;
+    } else {
+      typ_id__MEJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NEJH);
+      if ((typ_id__MEJH == (__INTEGER)(-  1))) {
+        a__OEJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NEJH + a__OEJH) & (__UINTEGER_32)(~ a__OEJH));
+        ptr_table__UEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PEJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TEJH=((__POINTER )(NULL));
+        result__VEJH=((__POINTER *)ptr_table__UEJH)[ 0];
+        if ((result__VEJH == (void *)NULL)) {
+          result__VEJH=new_lab__QOJ(new_size__PEJH);
+          next__TEJH=(void *)((unsigned long)result__VEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PEJH)));
+          ((__POINTER *)next__TEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UEJH)[ 0]=next__TEJH;
+        } else {
+          next__TEJH=((__POINTER *)result__VEJH)[ 0];
+          if ((next__TEJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VEJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__PEJH <<  1)) <=  4096)) {
+              next__TEJH=(void *)((unsigned long)result__VEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PEJH)));
             } else {
-              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)));
+              next__TEJH=new_lab__QOJ(new_size__PEJH);
+            };
+            ((__POINTER *)next__TEJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UEJH)[ 0]=next__TEJH;
+          } else {
+            ((__POINTER *)result__VEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VEJH=next__TEJH;
+          };
+        };
+        ptr__LEJH=result__VEJH;
+      } else {
+        t__QEJH=((__UINTEGER_32 )typ_id__MEJH);
+        a__REJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2EJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NEJH + a__REJH) & (__UINTEGER_32)(~ a__REJH));
+        ptr_table__ZEJH=((__POINTER )(&(table_type[(t__QEJH)])));
+        lab_type__1EJH=(__UINTEGER_32)(t__QEJH |  1);
+        next__YEJH=((__POINTER )(NULL));
+        result__0EJH=((__POINTER *)ptr_table__ZEJH)[ 0];
+        if ((result__0EJH == (void *)NULL)) {
+          result__0EJH=new_lab__QOJ(lab_type__1EJH);
+          next__YEJH=(void *)((unsigned long)result__0EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EJH)));
+          ((__POINTER *)next__YEJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZEJH)[ 0]=next__YEJH;
+        } else {
+          next__YEJH=((__POINTER *)result__0EJH)[ 0];
+          if ((next__YEJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0EJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2EJH <<  1)) <=  4096)) {
+              next__YEJH=(void *)((unsigned long)result__0EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EJH)));
             } else {
-              next__J0IH=new_lab__URJ(lab_type__M0IH);
+              next__YEJH=new_lab__QOJ(lab_type__1EJH);
             };
-            ((__POINTER *)next__J0IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__K0IH)[ 0]=next__J0IH;
+            ((__POINTER *)next__YEJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZEJH)[ 0]=next__YEJH;
           } else {
-            ((__POINTER *)result__L0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__L0IH=next__J0IH;
+            ((__POINTER *)result__0EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0EJH=next__YEJH;
           };
         };
-        ptr__2ZIH=result__L0IH;
+        ptr__LEJH=result__0EJH;
       };
-      result__1ZIH=((__ITM_LIST *)ptr__2ZIH);
-      *(result__1ZIH) = *(ITM_LIST__);
+      result__KEJH=((__ITM_LIST *)ptr__LEJH);
+      *(result__KEJH) = *(ITM_LIST__);
     };
-    ((__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);
+    ((__ITM_LIST *)result__KEJH)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ=p__SEJH;
+    last_group__JRF=result__KEJH;
+    result__0QF=result__KEJH;
+    read_def_local__LYH(Self__WQF);
+    result__01HH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H)->parent_arrayed_collection__O1H.upper__DST <  0)) {
+      result__01HH=create_with_capacity__WSI( 16);
     } else {
-      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);
+      Self__11HH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      result__01HH=((void **)Self__11HH->parent_arrayed_collection__O1H.storage__R2T)[Self__11HH->parent_arrayed_collection__O1H.upper__DST];
+      Self__21HH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      Self__21HH->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__21HH->parent_arrayed_collection__O1H.upper__DST -  1);
     };
-    lst__0TF=result__WQHH;
+    lst__ARF=result__01HH;
     do {
-      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;
+      e__ZQF=read_expr__C2I(Self__WQF);
+      if (((void *)e__ZQF == (void *)NULL)) {
+        continue__YQF=read_word__4MF((&__string_7));
+        if (continue__YQF) {
+          p__XTL=current_position__XUF();
+          result__YZL=NULL;
+          ptr__ZZL=((__POINTER )(NULL));
+          typ_id__4ZL= 0;
+          sz__1ZL=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__1ZL ==  0)) {
+            result__YZL=ITM_LDOTS__;
+          } else {
+            typ_id__4ZL=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1ZL);
+            if ((typ_id__4ZL == (__INTEGER)(-  1))) {
+              a__HBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__IBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__1ZL + a__HBGH) & (__UINTEGER_32)(~ a__HBGH));
+              ptr_table__4EJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__3EJH=((__POINTER )(NULL));
+              result__5EJH=((__POINTER *)ptr_table__4EJH)[ 0];
+              if ((result__5EJH == (void *)NULL)) {
+                result__5EJH=new_lab__QOJ(new_size__IBGH);
+                next__3EJH=(void *)((unsigned long)result__5EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBGH)));
+                ((__POINTER *)next__3EJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4EJH)[ 0]=next__3EJH;
               } else {
-                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)));
+                next__3EJH=((__POINTER *)result__5EJH)[ 0];
+                if ((next__3EJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5EJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IBGH <<  1)) <=  4096)) {
+                    next__3EJH=(void *)((unsigned long)result__5EJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IBGH)));
                   } else {
-                    next__O0IH=new_lab__URJ(new_size__VVFH);
+                    next__3EJH=new_lab__QOJ(new_size__IBGH);
                   };
-                  ((__POINTER *)next__O0IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__P0IH)[ 0]=next__O0IH;
+                  ((__POINTER *)next__3EJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__4EJH)[ 0]=next__3EJH;
                 } else {
-                  ((__POINTER *)result__Q0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__O0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Q0IH=next__O0IH;
+                  ((__POINTER *)result__5EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__5EJH=next__3EJH;
                 };
               };
-              ptr__Z3L=result__Q0IH;
+              ptr__ZZL=result__5EJH;
             } else {
-              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;
+              t__MBGH=((__UINTEGER_32 )typ_id__4ZL);
+              a__LBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__GFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1ZL + a__LBGH) & (__UINTEGER_32)(~ a__LBGH));
+              ptr_table__DFJH=((__POINTER )(&(table_type[(t__MBGH)])));
+              lab_type__FFJH=(__UINTEGER_32)(t__MBGH |  1);
+              next__CFJH=((__POINTER )(NULL));
+              result__EFJH=((__POINTER *)ptr_table__DFJH)[ 0];
+              if ((result__EFJH == (void *)NULL)) {
+                result__EFJH=new_lab__QOJ(lab_type__FFJH);
+                next__CFJH=(void *)((unsigned long)result__EFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFJH)));
+                ((__POINTER *)next__CFJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DFJH)[ 0]=next__CFJH;
               } else {
-                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)));
+                next__CFJH=((__POINTER *)result__EFJH)[ 0];
+                if ((next__CFJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EFJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GFJH <<  1)) <=  4096)) {
+                    next__CFJH=(void *)((unsigned long)result__EFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GFJH)));
                   } else {
-                    next__T0IH=new_lab__URJ(lab_type__W0IH);
+                    next__CFJH=new_lab__QOJ(lab_type__FFJH);
                   };
-                  ((__POINTER *)next__T0IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__U0IH)[ 0]=next__T0IH;
+                  ((__POINTER *)next__CFJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DFJH)[ 0]=next__CFJH;
                 } else {
-                  ((__POINTER *)result__V0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__V0IH=next__T0IH;
+                  ((__POINTER *)result__EFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__EFJH=next__CFJH;
                 };
               };
-              ptr__Z3L=result__V0IH;
+              ptr__ZZL=result__EFJH;
             };
-            result__Y3L=((__ITM_LDOTS *)ptr__Z3L);
-            *(result__Y3L) = *(ITM_LDOTS__);
+            result__YZL=((__ITM_LDOTS *)ptr__ZZL);
+            *(result__YZL) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__Y3L)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ=p__PXL;
-          add_last__25U(lst__0TF,result__Y3L);
+          ((__ITM_LDOTS *)result__YZL)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ=p__XTL;
+          add_last__H1U(lst__ARF,result__YZL);
         };
       } else {
-        add_last__25U(lst__0TF,e__TTF);
-        result__Y0IH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__Y0IH=FALSE__;
+        add_last__H1U(lst__ARF,e__ZQF);
+        result__HFJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__HFJH=FALSE__;
         } else {
-          result__Z0IH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__Z0IH=((__CHARACTER )(( 0)));
+          result__IFJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__IFJH=((__CHARACTER )(( 0)));
           } else {
-            result__Z0IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__IFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__Z0IH == ';')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__Y0IH=TRUE__;
+          if ((result__IFJH == ';')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__HFJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__HFJH)) {
+          pos__I4XG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_242));
+          put_position__CMG(pos__I4XG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        continue__STF=TRUE__;
+        continue__YQF=TRUE__;
       };
-    } while (continue__STF);
-    result__10IH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__10IH=FALSE__;
+    } while (continue__YQF);
+    result__KFJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__KFJH=FALSE__;
     } else {
-      result__20IH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__20IH=((__CHARACTER )(( 0)));
+      result__LFJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__LFJH=((__CHARACTER )(( 0)));
       } else {
-        result__20IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__LFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__20IH == ']')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__10IH=TRUE__;
+      if ((result__LFJH == ']')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__KFJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__KFJH)) {
+      pos__K4XG=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_296));
+      put_position__CMG(pos__K4XG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__VFJH=current_position__XUF();
+    result__NFJH=NULL;
+    ptr__OFJH=((__POINTER )(NULL));
+    typ_id__PFJH= 0;
+    sz__QFJH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__QFJH ==  0)) {
+      result__NFJH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__PFJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QFJH);
+      if ((typ_id__PFJH == (__INTEGER)(-  1))) {
+        a__RFJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFJH + a__RFJH) & (__UINTEGER_32)(~ a__RFJH));
+        ptr_table__XFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SFJH / ((__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__QOJ(new_size__SFJH);
+          next__WFJH=(void *)((unsigned long)result__YFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFJH)));
+          ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SFJH <<  1)) <=  4096)) {
+              next__WFJH=(void *)((unsigned long)result__YFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SFJH)));
             } else {
-              next__H1IH=new_lab__URJ(new_size__D1IH);
+              next__WFJH=new_lab__QOJ(new_size__SFJH);
             };
-            ((__POINTER *)next__H1IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__I1IH)[ 0]=next__H1IH;
+            ((__POINTER *)next__WFJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XFJH)[ 0]=next__WFJH;
           } 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)));
+            ((__POINTER *)result__YFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YFJH=next__WFJH;
+          };
+        };
+        ptr__OFJH=result__YFJH;
+      } else {
+        t__TFJH=((__UINTEGER_32 )typ_id__PFJH);
+        a__UFJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5FJH=(__UINTEGER_32)((__UINTEGER_32)(sz__QFJH + a__UFJH) & (__UINTEGER_32)(~ a__UFJH));
+        ptr_table__2FJH=((__POINTER )(&(table_type[(t__TFJH)])));
+        lab_type__4FJH=(__UINTEGER_32)(t__TFJH |  1);
+        next__1FJH=((__POINTER )(NULL));
+        result__3FJH=((__POINTER *)ptr_table__2FJH)[ 0];
+        if ((result__3FJH == (void *)NULL)) {
+          result__3FJH=new_lab__QOJ(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__3SH)))) &  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__M1IH=new_lab__URJ(lab_type__P1IH);
+              next__1FJH=new_lab__QOJ(lab_type__4FJH);
             };
-            ((__POINTER *)next__M1IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__N1IH)[ 0]=next__M1IH;
+            ((__POINTER *)next__1FJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2FJH)[ 0]=next__1FJH;
           } else {
-            ((__POINTER *)result__O1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__O1IH=next__M1IH;
+            ((__POINTER *)result__3FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3FJH=next__1FJH;
           };
         };
-        ptr__50IH=result__O1IH;
+        ptr__OFJH=result__3FJH;
       };
-      result__40IH=((__ITM_PROTOTYPE *)ptr__50IH);
-      *(result__40IH) = *(ITM_PROTOTYPE__);
+      result__NFJH=((__ITM_PROTOTYPE *)ptr__OFJH);
+      *(result__NFJH) = *(ITM_PROTOTYPE__);
     };
-    ((__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);
+    ((__ITM_PROTOTYPE *)result__NFJH)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=p__VFJH;
+    e__ZQF=result__NFJH;
+    add_last__H1U(result__01HH,result__NFJH);
+    copy__42H(result__01HH);
   };
-  return(result__UTF);
+  return(result__0QF);
 }
 
-static void* read_expr__G5I(__PARSER *Self__H5I)
+static void* read_expr__C2I(__PARSER *Self__D2I)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__F2I,*value__G2I,*result__RBL,*expr__SBL,*__tmp__YEL;
+  void *__tmp__5FL,*__tmp__FHL;
+  __INTEGER p__N2I,typ_id__M40C,typ_id__VGJH,typ_id__IHJH,typ_id__1HJH;
+  __INTEGER typ_id__JNJD,typ_id__H1JD,typ_id__2OJD,last_msg__WBL;
+  __INTEGER first_msg__XBL,typ_id__MJJH,typ_id__UOP,typ_id__LKJH;
+  __INTEGER index__ALJH,__tmp__4KJH,i__BLJH,typ_id__FLJH,__tmp__DE1C;
+  __INTEGER i__2GCD,typ_id__ITO,typ_id__1UO;
+  void *name__O2I,*n__UJJH,*n__LDP;
+  __POSITION p__JDRC,pos__T4XG,p__1GJH,pos__V4XG,pos__X4XG,__tmp__IBJ;
+  __POSITION p__BIJH,pos__14XG,__tmp__JEJ,__tmp__TEJ,__tmp__2EJ,p__TJJH;
+  __POSITION pos__G5XG,p__KDP,__tmp__2EL,__tmp__CGL,__tmp__JHL;
+  __ITM_LIST_IDF *result__G40C;
+  __POINTER ptr__H40C,ptr_table__KGJH,next__JGJH,result__LGJH;
+  __POINTER ptr_table__PGJH,next__OGJH,result__QGJH,ptr__UGJH;
+  __POINTER ptr_table__3GJH,next__2GJH,result__4GJH,ptr_table__CHJH;
+  __POINTER next__BHJH,result__DHJH,ptr__HHJH,ptr_table__QHJH;
+  __POINTER next__PHJH,result__RHJH,ptr_table__VHJH,next__UHJH;
+  __POINTER result__WHJH,ptr__0HJH,ptr_table__DIJH,next__CIJH;
+  __POINTER result__EIJH,ptr_table__IIJH,next__HIJH,result__JIJH;
+  __POINTER ptr__ENJD,ptr_table__NIJH,next__MIJH,result__OIJH;
+  __POINTER ptr_table__SIJH,next__RIJH,result__TIJH,ptr__C1JD;
+  __POINTER ptr_table__XIJH,next__WIJH,result__YIJH,ptr_table__2IJH;
+  __POINTER next__1IJH,result__3IJH,ptr__XOJD,ptr_table__BJJH;
+  __POINTER next__AJJH,result__CJJH,ptr_table__GJJH,next__FJJH;
+  __POINTER result__HJJH,ptr__LJJH,ptr_table__WJJH,next__VJJH;
+  __POINTER result__XJJH,ptr_table__1JJH,next__0JJH,result__2JJH;
+  __POINTER ptr__POP,ptr_table__AKJH,next__5JJH,result__BKJH;
+  __POINTER ptr_table__FKJH,next__EKJH,result__GKJH,ptr__KKJH;
+  __POINTER ptr_table__TKJH,next__SKJH,result__UKJH,ptr_table__YKJH;
+  __POINTER next__XKJH,result__ZKJH,ptr__ELJH,ptr_table__NLJH;
+  __POINTER next__MLJH,result__OLJH,ptr_table__SLJH,next__RLJH;
+  __POINTER result__TLJH,ptr__DTO,ptr_table__XLJH,next__WLJH;
+  __POINTER result__YLJH,ptr_table__2LJH,next__1LJH,result__3LJH;
+  __POINTER ptr__WUO,ptr_table__BMJH,next__AMJH,result__CMJH;
+  __POINTER ptr_table__GMJH,next__FMJH,result__HMJH;
+  __UINTEGER_32 sz__J40C,a__PBGH,new_size__QBGH,t__UBGH,a__TBGH;
+  __UINTEGER_32 new_size__SGJH,lab_type__RGJH,sz__WGJH,a__XGJH;
+  __UINTEGER_32 new_size__YGJH,t__ZGJH,a__0GJH,new_size__FHJH;
+  __UINTEGER_32 lab_type__EHJH,sz__JHJH,a__KHJH,new_size__LHJH,t__MHJH;
+  __UINTEGER_32 a__NHJH,new_size__YHJH,lab_type__XHJH,sz__2HJH,a__3HJH;
+  __UINTEGER_32 new_size__4HJH,t__5HJH,a__AIJH,new_size__LIJH;
+  __UINTEGER_32 lab_type__KIJH,sz__GNJD,a__QQGH,new_size__RQGH,t__VQGH;
+  __UINTEGER_32 a__UQGH,new_size__VIJH,lab_type__UIJH,sz__E1JD,a__XBGH;
+  __UINTEGER_32 new_size__YBGH,t__2BGH,a__1BGH,new_size__5IJH;
+  __UINTEGER_32 lab_type__4IJH,sz__ZOJD,a__YQGH,new_size__ZQGH,t__3QGH;
+  __UINTEGER_32 a__2QGH,new_size__JJJH,lab_type__IJJH,sz__NJJH,a__OJJH;
+  __UINTEGER_32 new_size__PJJH,t__QJJH,a__RJJH,new_size__4JJH;
+  __UINTEGER_32 lab_type__3JJH,sz__ROP,a__IRGH,new_size__JRGH,t__NRGH;
+  __UINTEGER_32 a__MRGH,new_size__IKJH,lab_type__HKJH,sz__MKJH,a__NKJH;
+  __UINTEGER_32 new_size__OKJH,t__PKJH,a__QKJH,new_size__1KJH;
+  __UINTEGER_32 lab_type__0KJH,sz__GLJH,a__HLJH,new_size__ILJH,t__JLJH;
+  __UINTEGER_32 a__KLJH,new_size__VLJH,lab_type__ULJH,sz__FTO,a__4RGH;
+  __UINTEGER_32 new_size__5RGH,t__DSGH,a__CSGH,new_size__5LJH;
+  __UINTEGER_32 lab_type__4LJH,sz__YUO,a__XDGH,new_size__YDGH,t__2DGH;
+  __UINTEGER_32 a__1DGH,new_size__JMJH,lab_type__IMJH;
+  __ITM_WRITE_VALUE *result__TGJH,*result__DNJD;
+  __ITM_WRITE_CAST *result__GHJH,*result__WOJD;
+  __ITM_READ *result__ZHJH;
+  __ITM_WRITE_CODE *result__B1JD;
+  void *itm_op__VBL,*__tmp__ZEL,*__tmp__AGL,*__tmp__GHL;
+  __ITM_OPERATOR *result__KJJH,*Self__SJJH,*result__OOP,*Self__KJV;
+  __ITM_READ_ARG1 *result__JKJH,*result__DLJH;
+  __ITM_READ_ARG2 *result__CTO;
+  __ITM_EXPRESSION *result__VUO;
+  __CHARACTER affect__H2I,result__BGJH,result__EGJH,result__HGJH;
+  __BOOLEAN again__I2I,result__AGJH,result__DGJH,result__GGJH;
+  __BOOLEAN __tmp__S5I,__tmp__UBJ,__tmp__YGL;
+  void *l_assignment__M2I,*result__U1K,*result__DDRC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__RR5,*Self__HS5;
+  void *result__J1H,*l_expr__TBL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__OJ4,*Self__EK4;
+  __FAST_ARRAYoITM_CODEo *Self__2KJH,*Self__ZD1C;
+  void **__tmp__3KJH,**Self__5KJH,**__tmp__CE1C,**Self__LGCD;
+  result__F2I=NULL;
+  value__G2I=NULL;
+  affect__H2I='\0';
+  again__I2I=FALSE__;
+  l_assignment__M2I=NULL;
+  p__N2I= 0;
+  name__O2I=NULL;
+  old_position__HOI=position__CCC;
+  old_pos_cur__JOI=pos_cur__FCC;
+  old_pos_line__LOI=pos_line__GCC;
+  old_pos_col__NOI=pos_col__HCC;
+  old_short_derive__POI=short_derive__PCC;
+  result__AGJH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__AGJH=FALSE__;
   } else {
-    result__S1IH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__S1IH=((__CHARACTER )(( 0)));
+    result__BGJH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__BGJH=((__CHARACTER )(( 0)));
     } else {
-      result__S1IH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__BGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__S1IH == '(')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__R1IH=TRUE__;
+    if ((result__BGJH == '(')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__AGJH=TRUE__;
     };
   };
-  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);
+  if (result__AGJH) {
+    result__U1K=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K)->parent_arrayed_collection__Z1K.upper__NOU <  0)) {
+      result__U1K=create_with_capacity__UFRC( 16);
     } else {
-      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);
+      Self__RR5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K);
+      result__U1K=((void **)Self__RR5->parent_arrayed_collection__Z1K.storage__3QU)[Self__RR5->parent_arrayed_collection__Z1K.upper__NOU];
+      Self__HS5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K);
+      Self__HS5->parent_arrayed_collection__Z1K.upper__NOU=(__INTEGER)(Self__HS5->parent_arrayed_collection__Z1K.upper__NOU -  1);
     };
-    l_assignment__Q5I=result__M5K;
+    l_assignment__M2I=result__U1K;
     do {
-      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)));
+      again__I2I=FALSE__;
+      if (read_identifier__12K()) {
+        p__N2I=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+        copy__U4R(string_tmp2__F3I,last_string__V0C);
+        while (read_identifier__12K()) {
+          append__2JS(string_tmp2__F3I,(&__string_112));
+          append__2JS(string_tmp2__F3I,last_string__V0C);
+        };
+        name__O2I=get__YWB(string_tmp2__F3I);
+        add_last__HAPD(l_assignment__M2I,name__O2I);
+        if (is_shorter__LZ) {
+          if ((! fast_has__Q5U(short_local__XCC,name__O2I))) {
+            short__token__to__YBD((&__string_131),p__N2I,position__CCC);
+          };
+        };
+        result__DGJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__DGJH=FALSE__;
+        } else {
+          result__EGJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__EGJH=((__CHARACTER )(( 0)));
+          } else {
+            result__EGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__EGJH == ',')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__DGJH=TRUE__;
+          };
+        };
+        if (result__DGJH) {
+          again__I2I=TRUE__;
+        };
+      };
+    } while (again__I2I);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__U1K)->parent_arrayed_collection__L2I.upper__R4OD <  0))) {
+      result__GGJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__GGJH=FALSE__;
+      } else {
+        result__HGJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__HGJH=((__CHARACTER )(( 0)));
+        } else {
+          result__HGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__HGJH == ')')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__GGJH=TRUE__;
+        };
+      };
+      __tmp__S5I=result__GGJH;
+    } else {
+      __tmp__S5I=FALSE__;
+    };
+    if ((__tmp__S5I && ((read_symbol__3TJ((&__string_12)) || read_symbol__3TJ((&__string_13))) || read_symbol__3TJ((&__string_14))))) {
+      result__DDRC=create_with_capacity__UFRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__U1K)->parent_arrayed_collection__L2I.upper__R4OD +  1));
+      copy__W1RD(result__DDRC,result__U1K);
+      free__NO5(result__U1K);
+      l_assignment__M2I=result__DDRC;
+      p__JDRC=current_position__XUF();
+      result__G40C=NULL;
+      ptr__H40C=((__POINTER )(NULL));
+      typ_id__M40C= 0;
+      sz__J40C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__J40C ==  0)) {
+        result__G40C=ITM_LIST_IDF__;
+      } else {
+        typ_id__M40C=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__J40C);
+        if ((typ_id__M40C == (__INTEGER)(-  1))) {
+          a__PBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__QBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__J40C + a__PBGH) & (__UINTEGER_32)(~ a__PBGH));
+          ptr_table__KGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__JGJH=((__POINTER )(NULL));
+          result__LGJH=((__POINTER *)ptr_table__KGJH)[ 0];
+          if ((result__LGJH == (void *)NULL)) {
+            result__LGJH=new_lab__QOJ(new_size__QBGH);
+            next__JGJH=(void *)((unsigned long)result__LGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBGH)));
+            ((__POINTER *)next__JGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KGJH)[ 0]=next__JGJH;
+          } else {
+            next__JGJH=((__POINTER *)result__LGJH)[ 0];
+            if ((next__JGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LGJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QBGH <<  1)) <=  4096)) {
+                next__JGJH=(void *)((unsigned long)result__LGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QBGH)));
               } else {
-                next__01IH=new_lab__URJ(new_size__3VFH);
+                next__JGJH=new_lab__QOJ(new_size__QBGH);
               };
-              ((__POINTER *)next__01IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__11IH)[ 0]=next__01IH;
+              ((__POINTER *)next__JGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KGJH)[ 0]=next__JGJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__LGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LGJH=next__JGJH;
+            };
+          };
+          ptr__H40C=result__LGJH;
+        } else {
+          t__UBGH=((__UINTEGER_32 )typ_id__M40C);
+          a__TBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__SGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__J40C + a__TBGH) & (__UINTEGER_32)(~ a__TBGH));
+          ptr_table__PGJH=((__POINTER )(&(table_type[(t__UBGH)])));
+          lab_type__RGJH=(__UINTEGER_32)(t__UBGH |  1);
+          next__OGJH=((__POINTER )(NULL));
+          result__QGJH=((__POINTER *)ptr_table__PGJH)[ 0];
+          if ((result__QGJH == (void *)NULL)) {
+            result__QGJH=new_lab__QOJ(lab_type__RGJH);
+            next__OGJH=(void *)((unsigned long)result__QGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGJH)));
+            ((__POINTER *)next__OGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PGJH)[ 0]=next__OGJH;
+          } else {
+            next__OGJH=((__POINTER *)result__QGJH)[ 0];
+            if ((next__OGJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QGJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SGJH <<  1)) <=  4096)) {
+                next__OGJH=(void *)((unsigned long)result__QGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SGJH)));
               } else {
-                next__51IH=new_lab__URJ(lab_type__C2IH);
+                next__OGJH=new_lab__QOJ(lab_type__RGJH);
               };
-              ((__POINTER *)next__51IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__A2IH)[ 0]=next__51IH;
+              ((__POINTER *)next__OGJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PGJH)[ 0]=next__OGJH;
             } else {
-              ((__POINTER *)result__B2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__B2IH=next__51IH;
+              ((__POINTER *)result__QGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QGJH=next__OGJH;
             };
           };
-          ptr__340C=result__B2IH;
+          ptr__H40C=result__QGJH;
         };
-        result__240C=((__ITM_LIST_IDF *)ptr__340C);
-        *(result__240C) = *(ITM_LIST_IDF__);
+        result__G40C=((__ITM_LIST_IDF *)ptr__H40C);
+        *(result__G40C) = *(ITM_LIST_IDF__);
       };
-      ((__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)) {
+      ((__ITM_LIST_IDF *)result__G40C)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ=p__JDRC;
+      result__F2I=result__G40C;
+      affect__H2I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[ 0];
+      value__G2I=read_expr__C2I(Self__D2I);
+      if (((void *)value__G2I == (void *)NULL)) {
+        pos__T4XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_240));
+        put_position__CMG(pos__T4XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      if ((affect__H2I == ':')) {
+        p__1GJH=result__G40C->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+        result__TGJH=NULL;
+        ptr__UGJH=((__POINTER )(NULL));
+        typ_id__VGJH= 0;
+        sz__WGJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__WGJH ==  0)) {
+          result__TGJH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__VGJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WGJH);
+          if ((typ_id__VGJH == (__INTEGER)(-  1))) {
+            a__XGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WGJH + a__XGJH) & (__UINTEGER_32)(~ a__XGJH));
+            ptr_table__3GJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YGJH / ((__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__QOJ(new_size__YGJH);
+              next__2GJH=(void *)((unsigned long)result__4GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGJH)));
+              ((__POINTER *)next__2GJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
             } else {
-              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)));
+              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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YGJH <<  1)) <=  4096)) {
+                  next__2GJH=(void *)((unsigned long)result__4GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YGJH)));
                 } else {
-                  next__N2IH=new_lab__URJ(new_size__J2IH);
+                  next__2GJH=new_lab__QOJ(new_size__YGJH);
                 };
-                ((__POINTER *)next__N2IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__O2IH)[ 0]=next__N2IH;
+                ((__POINTER *)next__2GJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
               } else {
-                ((__POINTER *)result__P2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__P2IH=next__N2IH;
-              };
-            };
-            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;
+                ((__POINTER *)result__4GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2GJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4GJH=next__2GJH;
+              };
+            };
+            ptr__UGJH=result__4GJH;
+          } else {
+            t__ZGJH=((__UINTEGER_32 )typ_id__VGJH);
+            a__0GJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WGJH + a__0GJH) & (__UINTEGER_32)(~ a__0GJH));
+            ptr_table__CHJH=((__POINTER )(&(table_type[(t__ZGJH)])));
+            lab_type__EHJH=(__UINTEGER_32)(t__ZGJH |  1);
+            next__BHJH=((__POINTER )(NULL));
+            result__DHJH=((__POINTER *)ptr_table__CHJH)[ 0];
+            if ((result__DHJH == (void *)NULL)) {
+              result__DHJH=new_lab__QOJ(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__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)));
+              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__3SH)))) &  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__S2IH=new_lab__URJ(lab_type__V2IH);
+                  next__BHJH=new_lab__QOJ(lab_type__EHJH);
                 };
-                ((__POINTER *)next__S2IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
+                ((__POINTER *)next__BHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CHJH)[ 0]=next__BHJH;
               } else {
-                ((__POINTER *)result__U2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__U2IH=next__S2IH;
+                ((__POINTER *)result__DHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__DHJH=next__BHJH;
               };
             };
-            ptr__F2IH=result__U2IH;
+            ptr__UGJH=result__DHJH;
           };
-          result__E2IH=((__ITM_WRITE_VALUE *)ptr__F2IH);
-          *(result__E2IH) = *(ITM_WRITE_VALUE__);
+          result__TGJH=((__ITM_WRITE_VALUE *)ptr__UGJH);
+          *(result__TGJH) = *(ITM_WRITE_VALUE__);
         };
-        ((__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;
+        ((__ITM_WRITE_VALUE *)result__TGJH)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ=p__1GJH;
+        result__F2I=result__TGJH;
       };
-      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)) {
+      if ((affect__H2I == '<')) {
+        pos__V4XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_297));
+        put_position__CMG(pos__V4XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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)) {
+      if ((affect__H2I == '?')) {
+        pos__X4XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_298));
+        put_position__CMG(pos__X4XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__J5I)->__id) {
+        switch (((struct ___OBJ *)result__F2I)->__id) {
         case __ITM_LIST__: {
-          __tmp__MEJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__MEJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__MEJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__MEJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__MEJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__MEJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_READ__: {
-          __tmp__MEJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__MEJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__MEJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__MEJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__MEJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__MEJ=position__ND5B(result__J5I);
+          __tmp__IBJ=position__054B(result__F2I);
         } break;
         case __ITM_OLD__: {
-          __tmp__MEJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__MEJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__MEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__MEJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__MEJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__MEJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__MEJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__MEJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__MEJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+          __tmp__IBJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__MEJ=position__NJHC(result__J5I);
+          __tmp__IBJ=position__2GHC(result__F2I);
         } break;
         };
-        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;
+        result__GHJH=NULL;
+        ptr__HHJH=((__POINTER )(NULL));
+        typ_id__IHJH= 0;
+        sz__JHJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__JHJH ==  0)) {
+          result__GHJH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__IHJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JHJH);
+          if ((typ_id__IHJH == (__INTEGER)(-  1))) {
+            a__KHJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JHJH + a__KHJH) & (__UINTEGER_32)(~ a__KHJH));
+            ptr_table__QHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LHJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__PHJH=((__POINTER )(NULL));
+            result__RHJH=((__POINTER *)ptr_table__QHJH)[ 0];
+            if ((result__RHJH == (void *)NULL)) {
+              result__RHJH=new_lab__QOJ(new_size__LHJH);
+              next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LHJH)));
+              ((__POINTER *)next__PHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
             } else {
-              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)));
+              next__PHJH=((__POINTER *)result__RHJH)[ 0];
+              if ((next__PHJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RHJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LHJH <<  1)) <=  4096)) {
+                  next__PHJH=(void *)((unsigned long)result__RHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LHJH)));
                 } else {
-                  next__A3IH=new_lab__URJ(new_size__22IH);
+                  next__PHJH=new_lab__QOJ(new_size__LHJH);
                 };
-                ((__POINTER *)next__A3IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__B3IH)[ 0]=next__A3IH;
+                ((__POINTER *)next__PHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
               } else {
-                ((__POINTER *)result__C3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__C3IH=next__A3IH;
-              };
-            };
-            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;
+                ((__POINTER *)result__RHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RHJH=next__PHJH;
+              };
+            };
+            ptr__HHJH=result__RHJH;
+          } else {
+            t__MHJH=((__UINTEGER_32 )typ_id__IHJH);
+            a__NHJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JHJH + a__NHJH) & (__UINTEGER_32)(~ a__NHJH));
+            ptr_table__VHJH=((__POINTER )(&(table_type[(t__MHJH)])));
+            lab_type__XHJH=(__UINTEGER_32)(t__MHJH |  1);
+            next__UHJH=((__POINTER )(NULL));
+            result__WHJH=((__POINTER *)ptr_table__VHJH)[ 0];
+            if ((result__WHJH == (void *)NULL)) {
+              result__WHJH=new_lab__QOJ(lab_type__XHJH);
+              next__UHJH=(void *)((unsigned long)result__WHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YHJH)));
+              ((__POINTER *)next__UHJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
             } else {
-              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)));
+              next__UHJH=((__POINTER *)result__WHJH)[ 0];
+              if ((next__UHJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WHJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YHJH <<  1)) <=  4096)) {
+                  next__UHJH=(void *)((unsigned long)result__WHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YHJH)));
                 } else {
-                  next__F3IH=new_lab__URJ(lab_type__I3IH);
+                  next__UHJH=new_lab__QOJ(lab_type__XHJH);
                 };
-                ((__POINTER *)next__F3IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__G3IH)[ 0]=next__F3IH;
+                ((__POINTER *)next__UHJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
               } else {
-                ((__POINTER *)result__H3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__H3IH=next__F3IH;
+                ((__POINTER *)result__WHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__WHJH=next__UHJH;
               };
             };
-            ptr__Y2IH=result__H3IH;
+            ptr__HHJH=result__WHJH;
           };
-          result__X2IH=((__ITM_WRITE_CAST *)ptr__Y2IH);
-          *(result__X2IH) = *(ITM_WRITE_CAST__);
+          result__GHJH=((__ITM_WRITE_CAST *)ptr__HHJH);
+          *(result__GHJH) = *(ITM_WRITE_CAST__);
         };
-        ((__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;
+        ((__ITM_WRITE_CAST *)result__GHJH)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ=__tmp__IBJ;
+        result__F2I=result__GHJH;
       };
     } else {
-      free__CT5(l_assignment__Q5I);
+      free__NO5(l_assignment__M2I);
     };
-    __tmp__YEJ=TRUE__;
+    __tmp__UBJ=TRUE__;
   } else {
-    __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;
+    __tmp__UBJ=FALSE__;
+  };
+  if ((! __tmp__UBJ)) {
+    if (read_identifier__12K()) {
+      p__N2I=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+      copy__U4R(string_tmp2__F3I,last_string__V0C);
+      while (read_identifier__12K()) {
+        append__2JS(string_tmp2__F3I,(&__string_112));
+        append__2JS(string_tmp2__F3I,last_string__V0C);
+      };
+      name__O2I=get__YWB(string_tmp2__F3I);
+      if (is_shorter__LZ) {
+        if ((! fast_has__Q5U(short_local__XCC,name__O2I))) {
+          short__token__to__YBD((&__string_131),p__N2I,position__CCC);
+        };
+      };
+      if (((read_symbol__3TJ((&__string_12)) || read_symbol__3TJ((&__string_13))) || read_symbol__3TJ((&__string_14)))) {
+        p__BIJH=current_position__XUF();
+        result__ZHJH=NULL;
+        ptr__0HJH=((__POINTER )(NULL));
+        typ_id__1HJH= 0;
+        sz__2HJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__2HJH ==  0)) {
+          result__ZHJH=ITM_READ__;
+        } else {
+          typ_id__1HJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2HJH);
+          if ((typ_id__1HJH == (__INTEGER)(-  1))) {
+            a__3HJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__4HJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2HJH + a__3HJH) & (__UINTEGER_32)(~ a__3HJH));
+            ptr_table__DIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4HJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__CIJH=((__POINTER )(NULL));
+            result__EIJH=((__POINTER *)ptr_table__DIJH)[ 0];
+            if ((result__EIJH == (void *)NULL)) {
+              result__EIJH=new_lab__QOJ(new_size__4HJH);
+              next__CIJH=(void *)((unsigned long)result__EIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HJH)));
+              ((__POINTER *)next__CIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
             } else {
-              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)));
+              next__CIJH=((__POINTER *)result__EIJH)[ 0];
+              if ((next__CIJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EIJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4HJH <<  1)) <=  4096)) {
+                  next__CIJH=(void *)((unsigned long)result__EIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4HJH)));
                 } else {
-                  next__T3IH=new_lab__URJ(new_size__P3IH);
+                  next__CIJH=new_lab__QOJ(new_size__4HJH);
                 };
-                ((__POINTER *)next__T3IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__U3IH)[ 0]=next__T3IH;
+                ((__POINTER *)next__CIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
               } else {
-                ((__POINTER *)result__V3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__V3IH=next__T3IH;
-              };
-            };
-            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;
+                ((__POINTER *)result__EIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__EIJH=next__CIJH;
+              };
+            };
+            ptr__0HJH=result__EIJH;
+          } else {
+            t__5HJH=((__UINTEGER_32 )typ_id__1HJH);
+            a__AIJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__2HJH + a__AIJH) & (__UINTEGER_32)(~ a__AIJH));
+            ptr_table__IIJH=((__POINTER )(&(table_type[(t__5HJH)])));
+            lab_type__KIJH=(__UINTEGER_32)(t__5HJH |  1);
+            next__HIJH=((__POINTER )(NULL));
+            result__JIJH=((__POINTER *)ptr_table__IIJH)[ 0];
+            if ((result__JIJH == (void *)NULL)) {
+              result__JIJH=new_lab__QOJ(lab_type__KIJH);
+              next__HIJH=(void *)((unsigned long)result__JIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIJH)));
+              ((__POINTER *)next__HIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IIJH)[ 0]=next__HIJH;
             } else {
-              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)));
+              next__HIJH=((__POINTER *)result__JIJH)[ 0];
+              if ((next__HIJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JIJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LIJH <<  1)) <=  4096)) {
+                  next__HIJH=(void *)((unsigned long)result__JIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIJH)));
                 } else {
-                  next__Y3IH=new_lab__URJ(lab_type__13IH);
+                  next__HIJH=new_lab__QOJ(lab_type__KIJH);
                 };
-                ((__POINTER *)next__Y3IH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__Z3IH)[ 0]=next__Y3IH;
+                ((__POINTER *)next__HIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IIJH)[ 0]=next__HIJH;
               } else {
-                ((__POINTER *)result__03IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__03IH=next__Y3IH;
+                ((__POINTER *)result__JIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__JIJH=next__HIJH;
               };
             };
-            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)) {
+            ptr__0HJH=result__JIJH;
+          };
+          result__ZHJH=((__ITM_READ *)ptr__0HJH);
+          *(result__ZHJH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__ZHJH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__BIJH;
+        result__F2I=result__ZHJH;
+        affect__H2I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[ 0];
+        value__G2I=read_expr__C2I(Self__D2I);
+        if (((void *)value__G2I == (void *)NULL)) {
+          pos__14XG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_240));
+          put_position__CMG(pos__14XG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if ((affect__H2I == ':')) {
+          __tmp__JEJ=result__ZHJH->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+          result__DNJD=NULL;
+          ptr__ENJD=((__POINTER )(NULL));
+          typ_id__JNJD= 0;
+          sz__GNJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__GNJD ==  0)) {
+            result__DNJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__JNJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GNJD);
+            if ((typ_id__JNJD == (__INTEGER)(-  1))) {
+              a__QQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GNJD + a__QQGH) & (__UINTEGER_32)(~ a__QQGH));
+              ptr_table__NIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__MIJH=((__POINTER )(NULL));
+              result__OIJH=((__POINTER *)ptr_table__NIJH)[ 0];
+              if ((result__OIJH == (void *)NULL)) {
+                result__OIJH=new_lab__QOJ(new_size__RQGH);
+                next__MIJH=(void *)((unsigned long)result__OIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQGH)));
+                ((__POINTER *)next__MIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NIJH)[ 0]=next__MIJH;
               } else {
-                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)));
+                next__MIJH=((__POINTER *)result__OIJH)[ 0];
+                if ((next__MIJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OIJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RQGH <<  1)) <=  4096)) {
+                    next__MIJH=(void *)((unsigned long)result__OIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RQGH)));
                   } else {
-                    next__33IH=new_lab__URJ(new_size__4EGH);
+                    next__MIJH=new_lab__QOJ(new_size__RQGH);
                   };
-                  ((__POINTER *)next__33IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
+                  ((__POINTER *)next__MIJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NIJH)[ 0]=next__MIJH;
                 } else {
-                  ((__POINTER *)result__53IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__53IH=next__33IH;
+                  ((__POINTER *)result__OIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__OIJH=next__MIJH;
                 };
               };
-              ptr__ANJD=result__53IH;
+              ptr__ENJD=result__OIJH;
             } else {
-              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;
+              t__VQGH=((__UINTEGER_32 )typ_id__JNJD);
+              a__UQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__VIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GNJD + a__UQGH) & (__UINTEGER_32)(~ a__UQGH));
+              ptr_table__SIJH=((__POINTER )(&(table_type[(t__VQGH)])));
+              lab_type__UIJH=(__UINTEGER_32)(t__VQGH |  1);
+              next__RIJH=((__POINTER )(NULL));
+              result__TIJH=((__POINTER *)ptr_table__SIJH)[ 0];
+              if ((result__TIJH == (void *)NULL)) {
+                result__TIJH=new_lab__QOJ(lab_type__UIJH);
+                next__RIJH=(void *)((unsigned long)result__TIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIJH)));
+                ((__POINTER *)next__RIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SIJH)[ 0]=next__RIJH;
               } else {
-                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)));
+                next__RIJH=((__POINTER *)result__TIJH)[ 0];
+                if ((next__RIJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TIJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VIJH <<  1)) <=  4096)) {
+                    next__RIJH=(void *)((unsigned long)result__TIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIJH)));
                   } else {
-                    next__C4IH=new_lab__URJ(lab_type__F4IH);
+                    next__RIJH=new_lab__QOJ(lab_type__UIJH);
                   };
-                  ((__POINTER *)next__C4IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
+                  ((__POINTER *)next__RIJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SIJH)[ 0]=next__RIJH;
                 } else {
-                  ((__POINTER *)result__E4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__E4IH=next__C4IH;
+                  ((__POINTER *)result__TIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TIJH=next__RIJH;
                 };
               };
-              ptr__ANJD=result__E4IH;
+              ptr__ENJD=result__TIJH;
             };
-            result__5MJD=((__ITM_WRITE_VALUE *)ptr__ANJD);
-            *(result__5MJD) = *(ITM_WRITE_VALUE__);
+            result__DNJD=((__ITM_WRITE_VALUE *)ptr__ENJD);
+            *(result__DNJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__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;
+          ((__ITM_WRITE_VALUE *)result__DNJD)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ=__tmp__JEJ;
+          result__F2I=result__DNJD;
         };
-        if ((affect__L5I == '<')) {
-          switch (((struct ___OBJ *)result__J5I)->__id) {
+        if ((affect__H2I == '<')) {
+          switch (((struct ___OBJ *)result__F2I)->__id) {
           case __ITM_LIST__: {
-            __tmp__XHJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__XHJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__XHJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__XHJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__XHJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__XHJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ__: {
-            __tmp__XHJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__XHJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__XHJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__XHJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__XHJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__XHJ=position__ND5B(result__J5I);
+            __tmp__TEJ=position__054B(result__F2I);
           } break;
           case __ITM_OLD__: {
-            __tmp__XHJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__XHJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__XHJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__XHJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__XHJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__XHJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__XHJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__XHJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__XHJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__TEJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__XHJ=position__NJHC(result__J5I);
+            __tmp__TEJ=position__2GHC(result__F2I);
           } break;
           };
-          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;
+          result__B1JD=NULL;
+          ptr__C1JD=((__POINTER )(NULL));
+          typ_id__H1JD= 0;
+          sz__E1JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__E1JD ==  0)) {
+            result__B1JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__H1JD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E1JD);
+            if ((typ_id__H1JD == (__INTEGER)(-  1))) {
+              a__XBGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__YBGH=(__UINTEGER_32)((__UINTEGER_32)(sz__E1JD + a__XBGH) & (__UINTEGER_32)(~ a__XBGH));
+              ptr_table__XIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YBGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__WIJH=((__POINTER )(NULL));
+              result__YIJH=((__POINTER *)ptr_table__XIJH)[ 0];
+              if ((result__YIJH == (void *)NULL)) {
+                result__YIJH=new_lab__QOJ(new_size__YBGH);
+                next__WIJH=(void *)((unsigned long)result__YIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YBGH)));
+                ((__POINTER *)next__WIJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XIJH)[ 0]=next__WIJH;
               } else {
-                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)));
+                next__WIJH=((__POINTER *)result__YIJH)[ 0];
+                if ((next__WIJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YIJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YBGH <<  1)) <=  4096)) {
+                    next__WIJH=(void *)((unsigned long)result__YIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YBGH)));
                   } else {
-                    next__H4IH=new_lab__URJ(new_size__FWFH);
+                    next__WIJH=new_lab__QOJ(new_size__YBGH);
                   };
-                  ((__POINTER *)next__H4IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__I4IH)[ 0]=next__H4IH;
+                  ((__POINTER *)next__WIJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XIJH)[ 0]=next__WIJH;
                 } else {
-                  ((__POINTER *)result__J4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__J4IH=next__H4IH;
+                  ((__POINTER *)result__YIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__YIJH=next__WIJH;
                 };
               };
-              ptr__40JD=result__J4IH;
+              ptr__C1JD=result__YIJH;
             } else {
-              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;
+              t__2BGH=((__UINTEGER_32 )typ_id__H1JD);
+              a__1BGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5IJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E1JD + a__1BGH) & (__UINTEGER_32)(~ a__1BGH));
+              ptr_table__2IJH=((__POINTER )(&(table_type[(t__2BGH)])));
+              lab_type__4IJH=(__UINTEGER_32)(t__2BGH |  1);
+              next__1IJH=((__POINTER )(NULL));
+              result__3IJH=((__POINTER *)ptr_table__2IJH)[ 0];
+              if ((result__3IJH == (void *)NULL)) {
+                result__3IJH=new_lab__QOJ(lab_type__4IJH);
+                next__1IJH=(void *)((unsigned long)result__3IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5IJH)));
+                ((__POINTER *)next__1IJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
               } else {
-                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)));
+                next__1IJH=((__POINTER *)result__3IJH)[ 0];
+                if ((next__1IJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3IJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5IJH <<  1)) <=  4096)) {
+                    next__1IJH=(void *)((unsigned long)result__3IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5IJH)));
                   } else {
-                    next__M4IH=new_lab__URJ(lab_type__P4IH);
+                    next__1IJH=new_lab__QOJ(lab_type__4IJH);
                   };
-                  ((__POINTER *)next__M4IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__N4IH)[ 0]=next__M4IH;
+                  ((__POINTER *)next__1IJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
                 } else {
-                  ((__POINTER *)result__O4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__O4IH=next__M4IH;
+                  ((__POINTER *)result__3IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__3IJH=next__1IJH;
                 };
               };
-              ptr__40JD=result__O4IH;
+              ptr__C1JD=result__3IJH;
             };
-            result__30JD=((__ITM_WRITE_CODE *)ptr__40JD);
-            *(result__30JD) = *(ITM_WRITE_CODE__);
+            result__B1JD=((__ITM_WRITE_CODE *)ptr__C1JD);
+            *(result__B1JD) = *(ITM_WRITE_CODE__);
           };
-          ((__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;
+          ((__ITM_WRITE_CODE *)result__B1JD)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ=__tmp__TEJ;
+          result__F2I=result__B1JD;
         };
-        if ((affect__L5I == '?')) {
-          switch (((struct ___OBJ *)result__J5I)->__id) {
+        if ((affect__H2I == '?')) {
+          switch (((struct ___OBJ *)result__F2I)->__id) {
           case __ITM_LIST__: {
-            __tmp__AIJ=((__ITM_LIST *)result__J5I)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__AIJ=((__ITM_LDOTS *)result__J5I)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__AIJ=((__ITM_PROTOTYPE *)result__J5I)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__AIJ=((__ITM_LIST_IDF *)result__J5I)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__AIJ=((__ITM_WRITE_VALUE *)result__J5I)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__AIJ=((__ITM_WRITE_CAST *)result__J5I)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ__: {
-            __tmp__AIJ=((__ITM_READ *)result__J5I)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__AIJ=((__ITM_WRITE_CODE *)result__J5I)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__AIJ=((__ITM_OPERATOR *)result__J5I)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__AIJ=((__ITM_READ_ARG1 *)result__J5I)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__AIJ=((__ITM_READ_ARG2 *)result__J5I)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__AIJ=position__ND5B(result__J5I);
+            __tmp__2EJ=position__054B(result__F2I);
           } break;
           case __ITM_OLD__: {
-            __tmp__AIJ=((__ITM_OLD *)result__J5I)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__AIJ=((__ITM_EXTERNAL_TYPE *)result__J5I)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__AIJ=((__ITM_LIST *)((__ITM_BLOCK *)result__J5I)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__AIJ=((__ITM_EXTERNAL *)result__J5I)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__AIJ=((__ITM_READ_ARGS *)result__J5I)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__AIJ=((__ITM_REAL *)result__J5I)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__AIJ=((__ITM_NUMBER *)result__J5I)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__AIJ=((__ITM_CHARACTER *)result__J5I)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__AIJ=((__ITM_STRING *)result__J5I)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+            __tmp__2EJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__AIJ=position__NJHC(result__J5I);
+            __tmp__2EJ=position__2GHC(result__F2I);
           } break;
           };
-          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;
+          result__WOJD=NULL;
+          ptr__XOJD=((__POINTER )(NULL));
+          typ_id__2OJD= 0;
+          sz__ZOJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__ZOJD ==  0)) {
+            result__WOJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__2OJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZOJD);
+            if ((typ_id__2OJD == (__INTEGER)(-  1))) {
+              a__YQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZOJD + a__YQGH) & (__UINTEGER_32)(~ a__YQGH));
+              ptr_table__BJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__AJJH=((__POINTER )(NULL));
+              result__CJJH=((__POINTER *)ptr_table__BJJH)[ 0];
+              if ((result__CJJH == (void *)NULL)) {
+                result__CJJH=new_lab__QOJ(new_size__ZQGH);
+                next__AJJH=(void *)((unsigned long)result__CJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQGH)));
+                ((__POINTER *)next__AJJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
               } else {
-                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)));
+                next__AJJH=((__POINTER *)result__CJJH)[ 0];
+                if ((next__AJJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CJJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZQGH <<  1)) <=  4096)) {
+                    next__AJJH=(void *)((unsigned long)result__CJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZQGH)));
                   } else {
-                    next__R4IH=new_lab__URJ(new_size__GFGH);
+                    next__AJJH=new_lab__QOJ(new_size__ZQGH);
                   };
-                  ((__POINTER *)next__R4IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__S4IH)[ 0]=next__R4IH;
+                  ((__POINTER *)next__AJJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
                 } else {
-                  ((__POINTER *)result__T4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__R4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__T4IH=next__R4IH;
+                  ((__POINTER *)result__CJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CJJH=next__AJJH;
                 };
               };
-              ptr__TOJD=result__T4IH;
+              ptr__XOJD=result__CJJH;
             } else {
-              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;
+              t__3QGH=((__UINTEGER_32 )typ_id__2OJD);
+              a__2QGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZOJD + a__2QGH) & (__UINTEGER_32)(~ a__2QGH));
+              ptr_table__GJJH=((__POINTER )(&(table_type[(t__3QGH)])));
+              lab_type__IJJH=(__UINTEGER_32)(t__3QGH |  1);
+              next__FJJH=((__POINTER )(NULL));
+              result__HJJH=((__POINTER *)ptr_table__GJJH)[ 0];
+              if ((result__HJJH == (void *)NULL)) {
+                result__HJJH=new_lab__QOJ(lab_type__IJJH);
+                next__FJJH=(void *)((unsigned long)result__HJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JJJH)));
+                ((__POINTER *)next__FJJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GJJH)[ 0]=next__FJJH;
               } else {
-                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)));
+                next__FJJH=((__POINTER *)result__HJJH)[ 0];
+                if ((next__FJJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HJJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JJJH <<  1)) <=  4096)) {
+                    next__FJJH=(void *)((unsigned long)result__HJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JJJH)));
                   } else {
-                    next__W4IH=new_lab__URJ(lab_type__Z4IH);
+                    next__FJJH=new_lab__QOJ(lab_type__IJJH);
                   };
-                  ((__POINTER *)next__W4IH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__X4IH)[ 0]=next__W4IH;
+                  ((__POINTER *)next__FJJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GJJH)[ 0]=next__FJJH;
                 } else {
-                  ((__POINTER *)result__Y4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__W4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__Y4IH=next__W4IH;
+                  ((__POINTER *)result__HJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HJJH=next__FJJH;
                 };
               };
-              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)));
+              ptr__XOJD=result__HJJH;
+            };
+            result__WOJD=((__ITM_WRITE_CAST *)ptr__XOJD);
+            *(result__WOJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__WOJD)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ=__tmp__2EJ;
+          result__F2I=result__WOJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__F2I == (void *)NULL)) {
+    restore_context__DAL();
+    result__RBL=NULL;
+    expr__SBL=NULL;
+    itm_op__VBL=NULL;
+    last_msg__WBL= 0;
+    first_msg__XBL= 0;
+    result__J1H=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H)->parent_arrayed_collection__O1H.upper__DST <  0)) {
+      result__J1H=create_with_capacity__WSI( 16);
+    } else {
+      Self__OJ4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      result__J1H=((void **)Self__OJ4->parent_arrayed_collection__O1H.storage__R2T)[Self__OJ4->parent_arrayed_collection__O1H.upper__DST];
+      Self__EK4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      Self__EK4->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__EK4->parent_arrayed_collection__O1H.upper__DST -  1);
+    };
+    l_expr__TBL=result__J1H;
+    while (read_operator__FJM()) {
+      p__TJJH=current_position__XUF();
+      n__UJJH=last_string__V0C;
+      result__KJJH=NULL;
+      ptr__LJJH=((__POINTER )(NULL));
+      typ_id__MJJH= 0;
+      sz__NJJH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__NJJH ==  0)) {
+        result__KJJH=ITM_OPERATOR__;
+      } else {
+        typ_id__MJJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NJJH);
+        if ((typ_id__MJJH == (__INTEGER)(-  1))) {
+          a__OJJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__PJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NJJH + a__OJJH) & (__UINTEGER_32)(~ a__OJJH));
+          ptr_table__WJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PJJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__VJJH=((__POINTER )(NULL));
+          result__XJJH=((__POINTER *)ptr_table__WJJH)[ 0];
+          if ((result__XJJH == (void *)NULL)) {
+            result__XJJH=new_lab__QOJ(new_size__PJJH);
+            next__VJJH=(void *)((unsigned long)result__XJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJJH)));
+            ((__POINTER *)next__VJJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WJJH)[ 0]=next__VJJH;
+          } else {
+            next__VJJH=((__POINTER *)result__XJJH)[ 0];
+            if ((next__VJJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XJJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__PJJH <<  1)) <=  4096)) {
+                next__VJJH=(void *)((unsigned long)result__XJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJJH)));
               } else {
-                next__G5IH=new_lab__URJ(new_size__A5IH);
+                next__VJJH=new_lab__QOJ(new_size__PJJH);
               };
-              ((__POINTER *)next__G5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__H5IH)[ 0]=next__G5IH;
+              ((__POINTER *)next__VJJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WJJH)[ 0]=next__VJJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__XJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__XJJH=next__VJJH;
+            };
+          };
+          ptr__LJJH=result__XJJH;
+        } else {
+          t__QJJH=((__UINTEGER_32 )typ_id__MJJH);
+          a__RJJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4JJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NJJH + a__RJJH) & (__UINTEGER_32)(~ a__RJJH));
+          ptr_table__1JJH=((__POINTER )(&(table_type[(t__QJJH)])));
+          lab_type__3JJH=(__UINTEGER_32)(t__QJJH |  1);
+          next__0JJH=((__POINTER )(NULL));
+          result__2JJH=((__POINTER *)ptr_table__1JJH)[ 0];
+          if ((result__2JJH == (void *)NULL)) {
+            result__2JJH=new_lab__QOJ(lab_type__3JJH);
+            next__0JJH=(void *)((unsigned long)result__2JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JJH)));
+            ((__POINTER *)next__0JJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1JJH)[ 0]=next__0JJH;
+          } else {
+            next__0JJH=((__POINTER *)result__2JJH)[ 0];
+            if ((next__0JJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2JJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4JJH <<  1)) <=  4096)) {
+                next__0JJH=(void *)((unsigned long)result__2JJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4JJH)));
               } else {
-                next__L5IH=new_lab__URJ(lab_type__O5IH);
+                next__0JJH=new_lab__QOJ(lab_type__3JJH);
               };
-              ((__POINTER *)next__L5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__M5IH)[ 0]=next__L5IH;
+              ((__POINTER *)next__0JJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1JJH)[ 0]=next__0JJH;
             } else {
-              ((__POINTER *)result__N5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__N5IH=next__L5IH;
+              ((__POINTER *)result__2JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__2JJH=next__0JJH;
             };
           };
-          ptr__24IH=result__N5IH;
+          ptr__LJJH=result__2JJH;
         };
-        result__14IH=((__ITM_OPERATOR *)ptr__24IH);
-        *(result__14IH) = *(ITM_OPERATOR__);
+        result__KJJH=((__ITM_OPERATOR *)ptr__LJJH);
+        *(result__KJJH) = *(ITM_OPERATOR__);
       };
-      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);
+      Self__SJJH=((__ITM_OPERATOR *)result__KJJH);
+      Self__SJJH->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ=p__TJJH;
+      Self__SJJH->name__5EL=n__UJJH;
+      expr__SBL=result__KJJH;
+      add_last__H1U(l_expr__TBL,result__KJJH);
     };
-    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)) {
+    expr__SBL=read_expr_message__KSL(Self__D2I);
+    if (((void *)expr__SBL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.upper__MEL <  0))) {
+        pos__G5XG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_240));
+        put_position__CMG(pos__G5XG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      free__AWI(result__D4H);
+      free__2SI(result__J1H);
     } else {
-      first_msg__PFL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__D4H)->parent_arrayed_collection__ZTF.upper__EIL +  1);
+      first_msg__XBL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.upper__MEL +  1);
       do {
-        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()) {
+        last_msg__WBL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.upper__MEL +  1);
+        add_last__H1U(l_expr__TBL,expr__SBL);
+        if (read_operator__FJM()) {
           do {
-            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__;
+            p__KDP=current_position__XUF();
+            n__LDP=last_string__V0C;
+            result__OOP=NULL;
+            ptr__POP=((__POINTER )(NULL));
+            typ_id__UOP= 0;
+            sz__ROP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__ROP ==  0)) {
+              result__OOP=ITM_OPERATOR__;
             } else {
-              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;
+              typ_id__UOP=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ROP);
+              if ((typ_id__UOP == (__INTEGER)(-  1))) {
+                a__IRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__JRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ROP + a__IRGH) & (__UINTEGER_32)(~ a__IRGH));
+                ptr_table__AKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__5JJH=((__POINTER )(NULL));
+                result__BKJH=((__POINTER *)ptr_table__AKJH)[ 0];
+                if ((result__BKJH == (void *)NULL)) {
+                  result__BKJH=new_lab__QOJ(new_size__JRGH);
+                  next__5JJH=(void *)((unsigned long)result__BKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JRGH)));
+                  ((__POINTER *)next__5JJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AKJH)[ 0]=next__5JJH;
                 } else {
-                  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)));
+                  next__5JJH=((__POINTER *)result__BKJH)[ 0];
+                  if ((next__5JJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BKJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JRGH <<  1)) <=  4096)) {
+                      next__5JJH=(void *)((unsigned long)result__BKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JRGH)));
                     } else {
-                      next__Q5IH=new_lab__URJ(new_size__WFGH);
+                      next__5JJH=new_lab__QOJ(new_size__JRGH);
                     };
-                    ((__POINTER *)next__Q5IH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
+                    ((__POINTER *)next__5JJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__AKJH)[ 0]=next__5JJH;
                   } else {
-                    ((__POINTER *)result__S5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__S5IH=next__Q5IH;
+                    ((__POINTER *)result__BKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__BKJH=next__5JJH;
                   };
                 };
-                ptr__2SP=result__S5IH;
+                ptr__POP=result__BKJH;
               } else {
-                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;
+                t__NRGH=((__UINTEGER_32 )typ_id__UOP);
+                a__MRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__IKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ROP + a__MRGH) & (__UINTEGER_32)(~ a__MRGH));
+                ptr_table__FKJH=((__POINTER )(&(table_type[(t__NRGH)])));
+                lab_type__HKJH=(__UINTEGER_32)(t__NRGH |  1);
+                next__EKJH=((__POINTER )(NULL));
+                result__GKJH=((__POINTER *)ptr_table__FKJH)[ 0];
+                if ((result__GKJH == (void *)NULL)) {
+                  result__GKJH=new_lab__QOJ(lab_type__HKJH);
+                  next__EKJH=(void *)((unsigned long)result__GKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IKJH)));
+                  ((__POINTER *)next__EKJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
                 } else {
-                  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)));
+                  next__EKJH=((__POINTER *)result__GKJH)[ 0];
+                  if ((next__EKJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GKJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IKJH <<  1)) <=  4096)) {
+                      next__EKJH=(void *)((unsigned long)result__GKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IKJH)));
                     } else {
-                      next__V5IH=new_lab__URJ(lab_type__Y5IH);
+                      next__EKJH=new_lab__QOJ(lab_type__HKJH);
                     };
-                    ((__POINTER *)next__V5IH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
+                    ((__POINTER *)next__EKJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
                   } else {
-                    ((__POINTER *)result__X5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__X5IH=next__V5IH;
+                    ((__POINTER *)result__GKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__GKJH=next__EKJH;
                   };
                 };
-                ptr__2SP=result__X5IH;
+                ptr__POP=result__GKJH;
               };
-              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) {
+              result__OOP=((__ITM_OPERATOR *)ptr__POP);
+              *(result__OOP) = *(ITM_OPERATOR__);
+            };
+            Self__KJV=((__ITM_OPERATOR *)result__OOP);
+            Self__KJV->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ=p__KDP;
+            Self__KJV->name__5EL=n__LDP;
+            expr__SBL=result__OOP;
+            add_last__H1U(l_expr__TBL,result__OOP);
+          } while (read_operator__FJM());
+          expr__SBL=read_expr_message__KSL(Self__D2I);
+        } else {
+          expr__SBL=NULL;
+        };
+      } while (((void *)expr__SBL != (void *)NULL));
+      while ((last_msg__WBL < ((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.upper__MEL)) {
+        __tmp__YEL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.storage__AUT)[(__INTEGER)(last_msg__WBL +  1)];
+        if (__tmp__YEL==NULL) {
+          __tmp__ZEL=NULL;
+        } else {
+          switch (((struct ___OBJ *)__tmp__YEL)->__id) {
           case __ITM_LIST__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__RIL=((void *)__tmp__QIL);
+            __tmp__ZEL=((void *)__tmp__YEL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__RIL=NULL;
+            __tmp__ZEL=NULL;
           } break;
           }
         };
-        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;
+        itm_op__VBL=__tmp__ZEL;
+        __tmp__2EL=((__ITM_OPERATOR *)__tmp__ZEL)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+        operator__name__Y5N((&__string_82),((__ITM_OPERATOR *)__tmp__ZEL)->name__5EL);
+        result__JKJH=NULL;
+        ptr__KKJH=((__POINTER )(NULL));
+        typ_id__LKJH= 0;
+        sz__MKJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__MKJH ==  0)) {
+          result__JKJH=ITM_READ_ARG1__;
+        } else {
+          typ_id__LKJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MKJH);
+          if ((typ_id__LKJH == (__INTEGER)(-  1))) {
+            a__NKJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MKJH + a__NKJH) & (__UINTEGER_32)(~ a__NKJH));
+            ptr_table__TKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OKJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__SKJH=((__POINTER )(NULL));
+            result__UKJH=((__POINTER *)ptr_table__TKJH)[ 0];
+            if ((result__UKJH == (void *)NULL)) {
+              result__UKJH=new_lab__QOJ(new_size__OKJH);
+              next__SKJH=(void *)((unsigned long)result__UKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OKJH)));
+              ((__POINTER *)next__SKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
             } else {
-              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)));
+              next__SKJH=((__POINTER *)result__UKJH)[ 0];
+              if ((next__SKJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UKJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OKJH <<  1)) <=  4096)) {
+                  next__SKJH=(void *)((unsigned long)result__UKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OKJH)));
                 } else {
-                  next__DAJH=new_lab__URJ(new_size__55IH);
+                  next__SKJH=new_lab__QOJ(new_size__OKJH);
                 };
-                ((__POINTER *)next__DAJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__EAJH)[ 0]=next__DAJH;
+                ((__POINTER *)next__SKJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
               } else {
-                ((__POINTER *)result__FAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__FAJH=next__DAJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__UKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__UKJH=next__SKJH;
+              };
+            };
+            ptr__KKJH=result__UKJH;
+          } else {
+            t__PKJH=((__UINTEGER_32 )typ_id__LKJH);
+            a__QKJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__1KJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MKJH + a__QKJH) & (__UINTEGER_32)(~ a__QKJH));
+            ptr_table__YKJH=((__POINTER )(&(table_type[(t__PKJH)])));
+            lab_type__0KJH=(__UINTEGER_32)(t__PKJH |  1);
+            next__XKJH=((__POINTER )(NULL));
+            result__ZKJH=((__POINTER *)ptr_table__YKJH)[ 0];
+            if ((result__ZKJH == (void *)NULL)) {
+              result__ZKJH=new_lab__QOJ(lab_type__0KJH);
+              next__XKJH=(void *)((unsigned long)result__ZKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1KJH)));
+              ((__POINTER *)next__XKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YKJH)[ 0]=next__XKJH;
             } else {
-              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)));
+              next__XKJH=((__POINTER *)result__ZKJH)[ 0];
+              if ((next__XKJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZKJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1KJH <<  1)) <=  4096)) {
+                  next__XKJH=(void *)((unsigned long)result__ZKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1KJH)));
                 } else {
-                  next__IAJH=new_lab__URJ(lab_type__LAJH);
+                  next__XKJH=new_lab__QOJ(lab_type__0KJH);
                 };
-                ((__POINTER *)next__IAJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JAJH)[ 0]=next__IAJH;
+                ((__POINTER *)next__XKJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__YKJH)[ 0]=next__XKJH;
               } else {
-                ((__POINTER *)result__KAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__KAJH=next__IAJH;
+                ((__POINTER *)result__ZKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__ZKJH=next__XKJH;
               };
             };
-            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) {
+            ptr__KKJH=result__ZKJH;
+          };
+          result__JKJH=((__ITM_READ_ARG1 *)ptr__KKJH);
+          *(result__JKJH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__JKJH)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__2EL;
+        expr__SBL=result__JKJH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.storage__AUT)[last_msg__WBL]=result__JKJH;
+        Self__2KJH=((__FAST_ARRAYoITM_CODEo *)l_expr__TBL);
+        index__ALJH=(__INTEGER)(last_msg__WBL +  1);
+        __tmp__3KJH=Self__2KJH->parent_arrayed_collection__5QF.storage__AUT;
+        __tmp__4KJH=Self__2KJH->parent_arrayed_collection__5QF.upper__MEL;
+        Self__5KJH=((void **)__tmp__3KJH);
+        i__BLJH=index__ALJH;
+        while ((i__BLJH != __tmp__4KJH)) {
+          Self__5KJH[i__BLJH]=Self__5KJH[(__INTEGER)(i__BLJH +  1)];
+          i__BLJH=(__INTEGER)(i__BLJH +  1);
+        };
+        Self__2KJH->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__2KJH->parent_arrayed_collection__5QF.upper__MEL -  1);
+      };
+      if (((__INTEGER)(last_msg__WBL - first_msg__XBL) <  3)) {
+        while ((first_msg__XBL !=  0)) {
+          __tmp__5FL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.storage__AUT)[(__INTEGER)(first_msg__XBL -  1)];
+          if (__tmp__5FL==NULL) {
+            __tmp__AGL=NULL;
+          } else {
+            switch (((struct ___OBJ *)__tmp__5FL)->__id) {
             case __ITM_LIST__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__YJL=((void *)__tmp__XJL);
+              __tmp__AGL=((void *)__tmp__5FL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__YJL=NULL;
+              __tmp__AGL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__VBL=__tmp__AGL;
+          __tmp__CGL=((__ITM_OPERATOR *)__tmp__AGL)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+          operator__name__Y5N((&__string_83),((__ITM_OPERATOR *)__tmp__AGL)->name__5EL);
+          result__DLJH=NULL;
+          ptr__ELJH=((__POINTER )(NULL));
+          typ_id__FLJH= 0;
+          sz__GLJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__GLJH ==  0)) {
+            result__DLJH=ITM_READ_ARG1__;
+          } else {
+            typ_id__FLJH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GLJH);
+            if ((typ_id__FLJH == (__INTEGER)(-  1))) {
+              a__HLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ILJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GLJH + a__HLJH) & (__UINTEGER_32)(~ a__HLJH));
+              ptr_table__NLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ILJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__MLJH=((__POINTER )(NULL));
+              result__OLJH=((__POINTER *)ptr_table__NLJH)[ 0];
+              if ((result__OLJH == (void *)NULL)) {
+                result__OLJH=new_lab__QOJ(new_size__ILJH);
+                next__MLJH=(void *)((unsigned long)result__OLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ILJH)));
+                ((__POINTER *)next__MLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NLJH)[ 0]=next__MLJH;
               } else {
-                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)));
+                next__MLJH=((__POINTER *)result__OLJH)[ 0];
+                if ((next__MLJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OLJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ILJH <<  1)) <=  4096)) {
+                    next__MLJH=(void *)((unsigned long)result__OLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ILJH)));
                   } else {
-                    next__3AJH=new_lab__URJ(new_size__ZAJH);
+                    next__MLJH=new_lab__QOJ(new_size__ILJH);
                   };
-                  ((__POINTER *)next__3AJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__4AJH)[ 0]=next__3AJH;
+                  ((__POINTER *)next__MLJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__NLJH)[ 0]=next__MLJH;
                 } else {
-                  ((__POINTER *)result__5AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__5AJH=next__3AJH;
+                  ((__POINTER *)result__OLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__OLJH=next__MLJH;
                 };
               };
-              ptr__VAJH=result__5AJH;
+              ptr__ELJH=result__OLJH;
             } else {
-              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;
+              t__JLJH=((__UINTEGER_32 )typ_id__FLJH);
+              a__KLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__VLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GLJH + a__KLJH) & (__UINTEGER_32)(~ a__KLJH));
+              ptr_table__SLJH=((__POINTER )(&(table_type[(t__JLJH)])));
+              lab_type__ULJH=(__UINTEGER_32)(t__JLJH |  1);
+              next__RLJH=((__POINTER )(NULL));
+              result__TLJH=((__POINTER *)ptr_table__SLJH)[ 0];
+              if ((result__TLJH == (void *)NULL)) {
+                result__TLJH=new_lab__QOJ(lab_type__ULJH);
+                next__RLJH=(void *)((unsigned long)result__TLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLJH)));
+                ((__POINTER *)next__RLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SLJH)[ 0]=next__RLJH;
               } else {
-                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)));
+                next__RLJH=((__POINTER *)result__TLJH)[ 0];
+                if ((next__RLJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TLJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__VLJH <<  1)) <=  4096)) {
+                    next__RLJH=(void *)((unsigned long)result__TLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VLJH)));
                   } else {
-                    next__CBJH=new_lab__URJ(lab_type__FBJH);
+                    next__RLJH=new_lab__QOJ(lab_type__ULJH);
                   };
-                  ((__POINTER *)next__CBJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DBJH)[ 0]=next__CBJH;
+                  ((__POINTER *)next__RLJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SLJH)[ 0]=next__RLJH;
                 } else {
-                  ((__POINTER *)result__EBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__EBJH=next__CBJH;
+                  ((__POINTER *)result__TLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TLJH=next__RLJH;
                 };
               };
-              ptr__VAJH=result__EBJH;
+              ptr__ELJH=result__TLJH;
             };
-            result__UAJH=((__ITM_READ_ARG1 *)ptr__VAJH);
-            *(result__UAJH) = *(ITM_READ_ARG1__);
+            result__DLJH=((__ITM_READ_ARG1 *)ptr__ELJH);
+            *(result__DLJH) = *(ITM_READ_ARG1__);
           };
-          ((__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);
+          ((__ITM_READ_ARG1 *)result__DLJH)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__CGL;
+          expr__SBL=result__DLJH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__TBL)->parent_arrayed_collection__5QF.storage__AUT)[first_msg__XBL]=result__DLJH;
+          first_msg__XBL=(__INTEGER)(first_msg__XBL -  1);
+          Self__ZD1C=((__FAST_ARRAYoITM_CODEo *)l_expr__TBL);
+          __tmp__CE1C=Self__ZD1C->parent_arrayed_collection__5QF.storage__AUT;
+          __tmp__DE1C=Self__ZD1C->parent_arrayed_collection__5QF.upper__MEL;
+          Self__LGCD=((void **)__tmp__CE1C);
+          i__2GCD=first_msg__XBL;
+          while ((i__2GCD != __tmp__DE1C)) {
+            Self__LGCD[i__2GCD]=Self__LGCD[(__INTEGER)(i__2GCD +  1)];
+            i__2GCD=(__INTEGER)(i__2GCD +  1);
           };
-          Self__PE1C->parent_arrayed_collection__ZTF.upper__EIL=(__INTEGER)(Self__PE1C->parent_arrayed_collection__ZTF.upper__EIL -  1);
+          Self__ZD1C->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__ZD1C->parent_arrayed_collection__5QF.upper__MEL -  1);
         };
       };
-      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__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.upper__MEL +  1) ==  1)) {
+        result__RBL=((void **)((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.storage__AUT)[ 0];
+        free__2SI(result__J1H);
+        __tmp__YGL=TRUE__;
       } else {
-        __tmp__QKL=FALSE__;
+        __tmp__YGL=FALSE__;
       };
-      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;
+      if ((! __tmp__YGL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.upper__MEL +  1) ==  3)) {
+          __tmp__FHL=((void **)((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.storage__AUT)[ 1];
+          if (__tmp__FHL==NULL) {
+            __tmp__GHL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__3KL)->__id) {
+            switch (((struct ___OBJ *)__tmp__FHL)->__id) {
             case __ITM_LIST__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__4KL=((void *)__tmp__3KL);
+              __tmp__GHL=((void *)__tmp__FHL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__4KL=NULL;
+              __tmp__GHL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__VBL=__tmp__GHL;
+          __tmp__JHL=((__ITM_OPERATOR *)__tmp__GHL)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+          operator__name__Y5N((&__string_81),((__ITM_OPERATOR *)__tmp__GHL)->name__5EL);
+          result__CTO=NULL;
+          ptr__DTO=((__POINTER )(NULL));
+          typ_id__ITO= 0;
+          sz__FTO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__FTO ==  0)) {
+            result__CTO=ITM_READ_ARG2__;
+          } else {
+            typ_id__ITO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FTO);
+            if ((typ_id__ITO == (__INTEGER)(-  1))) {
+              a__4RGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5RGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FTO + a__4RGH) & (__UINTEGER_32)(~ a__4RGH));
+              ptr_table__XLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5RGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__WLJH=((__POINTER )(NULL));
+              result__YLJH=((__POINTER *)ptr_table__XLJH)[ 0];
+              if ((result__YLJH == (void *)NULL)) {
+                result__YLJH=new_lab__QOJ(new_size__5RGH);
+                next__WLJH=(void *)((unsigned long)result__YLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RGH)));
+                ((__POINTER *)next__WLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XLJH)[ 0]=next__WLJH;
               } else {
-                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)));
+                next__WLJH=((__POINTER *)result__YLJH)[ 0];
+                if ((next__WLJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YLJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5RGH <<  1)) <=  4096)) {
+                    next__WLJH=(void *)((unsigned long)result__YLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5RGH)));
                   } else {
-                    next__HBJH=new_lab__URJ(new_size__MGGH);
+                    next__WLJH=new_lab__QOJ(new_size__5RGH);
                   };
-                  ((__POINTER *)next__HBJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__IBJH)[ 0]=next__HBJH;
+                  ((__POINTER *)next__WLJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XLJH)[ 0]=next__WLJH;
                 } else {
-                  ((__POINTER *)result__JBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__JBJH=next__HBJH;
+                  ((__POINTER *)result__YLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__YLJH=next__WLJH;
                 };
               };
-              ptr__QXO=result__JBJH;
+              ptr__DTO=result__YLJH;
             } else {
-              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;
+              t__DSGH=((__UINTEGER_32 )typ_id__ITO);
+              a__CSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5LJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FTO + a__CSGH) & (__UINTEGER_32)(~ a__CSGH));
+              ptr_table__2LJH=((__POINTER )(&(table_type[(t__DSGH)])));
+              lab_type__4LJH=(__UINTEGER_32)(t__DSGH |  1);
+              next__1LJH=((__POINTER )(NULL));
+              result__3LJH=((__POINTER *)ptr_table__2LJH)[ 0];
+              if ((result__3LJH == (void *)NULL)) {
+                result__3LJH=new_lab__QOJ(lab_type__4LJH);
+                next__1LJH=(void *)((unsigned long)result__3LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LJH)));
+                ((__POINTER *)next__1LJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2LJH)[ 0]=next__1LJH;
               } else {
-                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)));
+                next__1LJH=((__POINTER *)result__3LJH)[ 0];
+                if ((next__1LJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3LJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5LJH <<  1)) <=  4096)) {
+                    next__1LJH=(void *)((unsigned long)result__3LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5LJH)));
                   } else {
-                    next__MBJH=new_lab__URJ(lab_type__PBJH);
+                    next__1LJH=new_lab__QOJ(lab_type__4LJH);
                   };
-                  ((__POINTER *)next__MBJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
+                  ((__POINTER *)next__1LJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__2LJH)[ 0]=next__1LJH;
                 } else {
-                  ((__POINTER *)result__OBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__OBJH=next__MBJH;
+                  ((__POINTER *)result__3LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1LJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__3LJH=next__1LJH;
                 };
               };
-              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;
+              ptr__DTO=result__3LJH;
+            };
+            result__CTO=((__ITM_READ_ARG2 *)ptr__DTO);
+            *(result__CTO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__CTO)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__JHL;
+          result__RBL=result__CTO;
+          free__2SI(result__J1H);
+        } else {
+          l_expr__TBL=copy__42H(result__J1H);
+          result__VUO=NULL;
+          ptr__WUO=((__POINTER )(NULL));
+          typ_id__1UO= 0;
+          sz__YUO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__YUO ==  0)) {
+            result__VUO=ITM_EXPRESSION__;
+          } else {
+            typ_id__1UO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YUO);
+            if ((typ_id__1UO == (__INTEGER)(-  1))) {
+              a__XDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__YDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YUO + a__XDGH) & (__UINTEGER_32)(~ a__XDGH));
+              ptr_table__BMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__AMJH=((__POINTER )(NULL));
+              result__CMJH=((__POINTER *)ptr_table__BMJH)[ 0];
+              if ((result__CMJH == (void *)NULL)) {
+                result__CMJH=new_lab__QOJ(new_size__YDGH);
+                next__AMJH=(void *)((unsigned long)result__CMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDGH)));
+                ((__POINTER *)next__AMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BMJH)[ 0]=next__AMJH;
               } else {
-                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)));
+                next__AMJH=((__POINTER *)result__CMJH)[ 0];
+                if ((next__AMJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CMJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YDGH <<  1)) <=  4096)) {
+                    next__AMJH=(void *)((unsigned long)result__CMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDGH)));
                   } else {
-                    next__RBJH=new_lab__URJ(new_size__FYFH);
+                    next__AMJH=new_lab__QOJ(new_size__YDGH);
                   };
-                  ((__POINTER *)next__RBJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
+                  ((__POINTER *)next__AMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__BMJH)[ 0]=next__AMJH;
                 } else {
-                  ((__POINTER *)result__TBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TBJH=next__RBJH;
+                  ((__POINTER *)result__CMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__CMJH=next__AMJH;
                 };
               };
-              ptr__DZO=result__TBJH;
+              ptr__WUO=result__CMJH;
             } else {
-              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;
+              t__2DGH=((__UINTEGER_32 )typ_id__1UO);
+              a__1DGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__JMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YUO + a__1DGH) & (__UINTEGER_32)(~ a__1DGH));
+              ptr_table__GMJH=((__POINTER )(&(table_type[(t__2DGH)])));
+              lab_type__IMJH=(__UINTEGER_32)(t__2DGH |  1);
+              next__FMJH=((__POINTER )(NULL));
+              result__HMJH=((__POINTER *)ptr_table__GMJH)[ 0];
+              if ((result__HMJH == (void *)NULL)) {
+                result__HMJH=new_lab__QOJ(lab_type__IMJH);
+                next__FMJH=(void *)((unsigned long)result__HMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JMJH)));
+                ((__POINTER *)next__FMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GMJH)[ 0]=next__FMJH;
               } else {
-                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)));
+                next__FMJH=((__POINTER *)result__HMJH)[ 0];
+                if ((next__FMJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HMJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JMJH <<  1)) <=  4096)) {
+                    next__FMJH=(void *)((unsigned long)result__HMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JMJH)));
                   } else {
-                    next__WBJH=new_lab__URJ(lab_type__ZBJH);
+                    next__FMJH=new_lab__QOJ(lab_type__IMJH);
                   };
-                  ((__POINTER *)next__WBJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XBJH)[ 0]=next__WBJH;
+                  ((__POINTER *)next__FMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__GMJH)[ 0]=next__FMJH;
                 } else {
-                  ((__POINTER *)result__YBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YBJH=next__WBJH;
+                  ((__POINTER *)result__HMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__HMJH=next__FMJH;
                 };
               };
-              ptr__DZO=result__YBJH;
+              ptr__WUO=result__HMJH;
             };
-            result__CZO=((__ITM_EXPRESSION *)ptr__DZO);
-            *(result__CZO) = *(ITM_EXPRESSION__);
+            result__VUO=((__ITM_EXPRESSION *)ptr__WUO);
+            *(result__VUO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__CZO)->value_list__DKV=l_expr__LFL;
-          result__JFL=result__CZO;
+          ((__ITM_EXPRESSION *)result__VUO)->value_list__OFV=l_expr__TBL;
+          result__RBL=result__VUO;
         };
       };
     };
-    result__J5I=result__JFL;
+    result__F2I=result__RBL;
   };
-  return(result__J5I);
+  return(result__F2I);
 }
 
-static void set_value__type__BGHC(__ITM_SLOT *Self__CGHC,void *e__DGHC,void *p__EGHC)
+static void set_value__type__QDHC(__ITM_SLOT *Self__RDHC,void *e__SDHC,void *p__TDHC)
 // ({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__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) {
+  void *n__XBBD;
+  void *sec__YBBD;
+  __POSITION __tmp__ECBD,__tmp__MCBD,__tmp__ADBD,__tmp__JDBD;
+  __ITM_ARG *result__B2HH,*Self__J2HH;
+  __POINTER ptr__C2HH,ptr_table__LMJH,next__KMJH,result__MMJH;
+  __POINTER ptr_table__QMJH,next__PMJH,result__RMJH,ptr__TPAC;
+  __POINTER ptr_table__VMJH,next__UMJH,result__WMJH,ptr_table__0MJH;
+  __POINTER next__ZMJH,result__1MJH,ptr__NRI,ptr_table__5MJH,next__4MJH;
+  __POINTER result__ANJH,ptr_table__ENJH,next__DNJH,result__FNJH;
+  __POINTER ptr__HECD,ptr_table__JNJH,next__INJH,result__KNJH;
+  __POINTER ptr_table__ONJH,next__NNJH,result__PNJH;
+  __INTEGER typ_id__D2HH,typ_id__YPAC,typ_id__SRI,typ_id__MECD;
+  __UINTEGER_32 sz__E2HH,a__F2HH,new_size__G2HH,t__H2HH,a__I2HH;
+  __UINTEGER_32 new_size__TMJH,lab_type__SMJH,sz__VPAC,a__CEGH;
+  __UINTEGER_32 new_size__DEGH,t__HEGH,a__GEGH,new_size__3MJH;
+  __UINTEGER_32 lab_type__2MJH,sz__PRI,a__4EGH,new_size__5EGH,t__DFGH;
+  __UINTEGER_32 a__CFGH,new_size__HNJH,lab_type__GNJH,sz__JECD,a__GFGH;
+  __UINTEGER_32 new_size__HFGH,t__LFGH,a__KFGH,new_size__RNJH;
+  __UINTEGER_32 lab_type__QNJH;
+  __ITM_SLOT *result__SPAC,*Self__P0HC;
+  __ITM_PROTOTYPE *result__MRI;
+  __ITM_READ_ARG1 *result__GECD;
+  void *larg__ZBBD;
+  if ((Self__RDHC->affect__23FC != '<')) {
+    copy__U4R(string_tmp__VH,(&__string_241));
+    append__2JS(string_tmp__VH,Self__RDHC->parent_named__15.name__LI);
+    n__XBBD=get__YWB(string_tmp__VH);
+    sec__YBBD=get_name__OQOB((&__string_27));
+    larg__ZBBD=create_with_capacity__GI5B( 1);
+    switch (((struct ___OBJ *)e__SDHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__SCBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__SCBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__SCBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__SCBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__SCBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__SCBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ__: {
-      __tmp__SCBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__SCBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__SCBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__SCBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__SCBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__SCBD=position__ND5B(e__DGHC);
+      __tmp__ECBD=position__054B(e__SDHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__SCBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__SCBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__SCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__SCBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__SCBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__SCBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__SCBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__SCBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__SCBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ECBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__SCBD=position__NJHC(e__DGHC);
+      __tmp__ECBD=position__2GHC(e__SDHC);
     } break;
     };
-    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)));
+    result__B2HH=NULL;
+    ptr__C2HH=((__POINTER )(NULL));
+    typ_id__D2HH= 0;
+    sz__E2HH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__E2HH ==  0)) {
+      result__B2HH=ITM_ARG__;
+    } else {
+      typ_id__D2HH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E2HH);
+      if ((typ_id__D2HH == (__INTEGER)(-  1))) {
+        a__F2HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__G2HH=(__UINTEGER_32)((__UINTEGER_32)(sz__E2HH + a__F2HH) & (__UINTEGER_32)(~ a__F2HH));
+        ptr_table__LMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G2HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__KMJH=((__POINTER )(NULL));
+        result__MMJH=((__POINTER *)ptr_table__LMJH)[ 0];
+        if ((result__MMJH == (void *)NULL)) {
+          result__MMJH=new_lab__QOJ(new_size__G2HH);
+          next__KMJH=(void *)((unsigned long)result__MMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
+          ((__POINTER *)next__KMJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LMJH)[ 0]=next__KMJH;
+        } else {
+          next__KMJH=((__POINTER *)result__MMJH)[ 0];
+          if ((next__KMJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MMJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G2HH <<  1)) <=  4096)) {
+              next__KMJH=(void *)((unsigned long)result__MMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G2HH)));
             } else {
-              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)));
+              next__KMJH=new_lab__QOJ(new_size__G2HH);
+            };
+            ((__POINTER *)next__KMJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LMJH)[ 0]=next__KMJH;
+          } else {
+            ((__POINTER *)result__MMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MMJH=next__KMJH;
+          };
+        };
+        ptr__C2HH=result__MMJH;
+      } else {
+        t__H2HH=((__UINTEGER_32 )typ_id__D2HH);
+        a__I2HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E2HH + a__I2HH) & (__UINTEGER_32)(~ a__I2HH));
+        ptr_table__QMJH=((__POINTER )(&(table_type[(t__H2HH)])));
+        lab_type__SMJH=(__UINTEGER_32)(t__H2HH |  1);
+        next__PMJH=((__POINTER )(NULL));
+        result__RMJH=((__POINTER *)ptr_table__QMJH)[ 0];
+        if ((result__RMJH == (void *)NULL)) {
+          result__RMJH=new_lab__QOJ(lab_type__SMJH);
+          next__PMJH=(void *)((unsigned long)result__RMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMJH)));
+          ((__POINTER *)next__PMJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QMJH)[ 0]=next__PMJH;
+        } else {
+          next__PMJH=((__POINTER *)result__RMJH)[ 0];
+          if ((next__PMJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RMJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TMJH <<  1)) <=  4096)) {
+              next__PMJH=(void *)((unsigned long)result__RMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TMJH)));
             } else {
-              next__ACJH=new_lab__URJ(lab_type__DCJH);
+              next__PMJH=new_lab__QOJ(lab_type__SMJH);
             };
-            ((__POINTER *)next__ACJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__BCJH)[ 0]=next__ACJH;
+            ((__POINTER *)next__PMJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QMJH)[ 0]=next__PMJH;
           } else {
-            ((__POINTER *)result__CCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ACJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__CCJH=next__ACJH;
+            ((__POINTER *)result__RMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RMJH=next__PMJH;
           };
         };
-        ptr__4QHH=result__CCJH;
+        ptr__C2HH=result__RMJH;
       };
-      result__3QHH=((__ITM_ARG *)ptr__4QHH);
-      *(result__3QHH) = *(ITM_ARG__);
+      result__B2HH=((__ITM_ARG *)ptr__C2HH);
+      *(result__B2HH) = *(ITM_ARG__);
     };
-    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) {
+    Self__J2HH=((__ITM_ARG *)result__B2HH);
+    Self__J2HH->parent_itm_argument__NDHB.parent_itm_code__N0M.position__RAJ=__tmp__ECBD;
+    Self__J2HH->name__SYHC=(&__string_58);
+    Self__J2HH->type__TYHC=type_self__CQN;
+    add_last__R3GC(larg__ZBBD,result__B2HH);
+    switch (((struct ___OBJ *)e__SDHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__0CBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__0CBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__0CBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__0CBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__0CBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__0CBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ__: {
-      __tmp__0CBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__0CBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__0CBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__0CBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__0CBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__0CBD=position__ND5B(e__DGHC);
+      __tmp__MCBD=position__054B(e__SDHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__0CBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__0CBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__0CBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__0CBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__0CBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__0CBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__0CBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__0CBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__0CBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__MCBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__0CBD=position__NJHC(e__DGHC);
+      __tmp__MCBD=position__2GHC(e__SDHC);
     } break;
     };
-    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)));
+    result__SPAC=NULL;
+    ptr__TPAC=((__POINTER )(NULL));
+    typ_id__YPAC= 0;
+    sz__VPAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__VPAC ==  0)) {
+      result__SPAC=ITM_SLOT__;
+    } else {
+      typ_id__YPAC=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VPAC);
+      if ((typ_id__YPAC == (__INTEGER)(-  1))) {
+        a__CEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPAC + a__CEGH) & (__UINTEGER_32)(~ a__CEGH));
+        ptr_table__VMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__UMJH=((__POINTER )(NULL));
+        result__WMJH=((__POINTER *)ptr_table__VMJH)[ 0];
+        if ((result__WMJH == (void *)NULL)) {
+          result__WMJH=new_lab__QOJ(new_size__DEGH);
+          next__UMJH=(void *)((unsigned long)result__WMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DEGH)));
+          ((__POINTER *)next__UMJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VMJH)[ 0]=next__UMJH;
+        } else {
+          next__UMJH=((__POINTER *)result__WMJH)[ 0];
+          if ((next__UMJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WMJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DEGH <<  1)) <=  4096)) {
+              next__UMJH=(void *)((unsigned long)result__WMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DEGH)));
             } else {
-              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)));
+              next__UMJH=new_lab__QOJ(new_size__DEGH);
+            };
+            ((__POINTER *)next__UMJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VMJH)[ 0]=next__UMJH;
+          } else {
+            ((__POINTER *)result__WMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WMJH=next__UMJH;
+          };
+        };
+        ptr__TPAC=result__WMJH;
+      } else {
+        t__HEGH=((__UINTEGER_32 )typ_id__YPAC);
+        a__GEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3MJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPAC + a__GEGH) & (__UINTEGER_32)(~ a__GEGH));
+        ptr_table__0MJH=((__POINTER )(&(table_type[(t__HEGH)])));
+        lab_type__2MJH=(__UINTEGER_32)(t__HEGH |  1);
+        next__ZMJH=((__POINTER )(NULL));
+        result__1MJH=((__POINTER *)ptr_table__0MJH)[ 0];
+        if ((result__1MJH == (void *)NULL)) {
+          result__1MJH=new_lab__QOJ(lab_type__2MJH);
+          next__ZMJH=(void *)((unsigned long)result__1MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3MJH)));
+          ((__POINTER *)next__ZMJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0MJH)[ 0]=next__ZMJH;
+        } else {
+          next__ZMJH=((__POINTER *)result__1MJH)[ 0];
+          if ((next__ZMJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1MJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3MJH <<  1)) <=  4096)) {
+              next__ZMJH=(void *)((unsigned long)result__1MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3MJH)));
             } else {
-              next__KCJH=new_lab__URJ(lab_type__NCJH);
+              next__ZMJH=new_lab__QOJ(lab_type__2MJH);
             };
-            ((__POINTER *)next__KCJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__LCJH)[ 0]=next__KCJH;
+            ((__POINTER *)next__ZMJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0MJH)[ 0]=next__ZMJH;
           } else {
-            ((__POINTER *)result__MCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__MCJH=next__KCJH;
+            ((__POINTER *)result__1MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1MJH=next__ZMJH;
           };
         };
-        ptr__USAC=result__MCJH;
+        ptr__TPAC=result__1MJH;
       };
-      result__TSAC=((__ITM_SLOT *)ptr__USAC);
-      *(result__TSAC) = *(ITM_SLOT__);
+      result__SPAC=((__ITM_SLOT *)ptr__TPAC);
+      *(result__SPAC) = *(ITM_SLOT__);
     };
-    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) {
+    Self__P0HC=((__ITM_SLOT *)result__SPAC);
+    Self__P0HC->parent_named__15.name__LI=n__XBBD;
+    Self__P0HC->parent_named__15.parent_itm_object__4.position__RAJ=__tmp__MCBD;
+    Self__P0HC->id_section__F2C=sec__YBBD;
+    ((__ITM_SLOT *)result__SPAC)->affect__23FC='<';
+    set_value__type__QDHC(result__SPAC,e__SDHC,p__TDHC);
+    set_argument_list__MAHC(result__SPAC,larg__ZBBD);
+    set_result_type__D1FC(result__SPAC,Self__RDHC->result_type__N2FC);
+    fast_put__to__YLGC(((__PROTOTYPE *)p__TDHC)->slot_list__XQS,result__SPAC,result__SPAC->parent_named__15.name__LI);
+    switch (((struct ___OBJ *)e__SDHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__ODBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__ODBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__ODBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__ODBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__ODBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__ODBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ__: {
-      __tmp__ODBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__ODBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__ODBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__ODBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__ODBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__ODBD=position__ND5B(e__DGHC);
+      __tmp__ADBD=position__054B(e__SDHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__ODBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__ODBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__ODBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__ODBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__ODBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__ODBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__ODBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__ODBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__ODBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__ADBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__ODBD=position__NJHC(e__DGHC);
+      __tmp__ADBD=position__2GHC(e__SDHC);
     } break;
     };
-    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)));
+    get__HQI(((__PROTOTYPE *)p__TDHC)->parent_named__5.name__LI);
+    result__MRI=NULL;
+    ptr__NRI=((__POINTER )(NULL));
+    typ_id__SRI= 0;
+    sz__PRI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__PRI ==  0)) {
+      result__MRI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__SRI=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PRI);
+      if ((typ_id__SRI == (__INTEGER)(-  1))) {
+        a__4EGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__5EGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRI + a__4EGH) & (__UINTEGER_32)(~ a__4EGH));
+        ptr_table__5MJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5EGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__4MJH=((__POINTER )(NULL));
+        result__ANJH=((__POINTER *)ptr_table__5MJH)[ 0];
+        if ((result__ANJH == (void *)NULL)) {
+          result__ANJH=new_lab__QOJ(new_size__5EGH);
+          next__4MJH=(void *)((unsigned long)result__ANJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EGH)));
+          ((__POINTER *)next__4MJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5MJH)[ 0]=next__4MJH;
+        } else {
+          next__4MJH=((__POINTER *)result__ANJH)[ 0];
+          if ((next__4MJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ANJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5EGH <<  1)) <=  4096)) {
+              next__4MJH=(void *)((unsigned long)result__ANJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5EGH)));
             } else {
-              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)));
+              next__4MJH=new_lab__QOJ(new_size__5EGH);
+            };
+            ((__POINTER *)next__4MJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5MJH)[ 0]=next__4MJH;
+          } else {
+            ((__POINTER *)result__ANJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ANJH=next__4MJH;
+          };
+        };
+        ptr__NRI=result__ANJH;
+      } else {
+        t__DFGH=((__UINTEGER_32 )typ_id__SRI);
+        a__CFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PRI + a__CFGH) & (__UINTEGER_32)(~ a__CFGH));
+        ptr_table__ENJH=((__POINTER )(&(table_type[(t__DFGH)])));
+        lab_type__GNJH=(__UINTEGER_32)(t__DFGH |  1);
+        next__DNJH=((__POINTER )(NULL));
+        result__FNJH=((__POINTER *)ptr_table__ENJH)[ 0];
+        if ((result__FNJH == (void *)NULL)) {
+          result__FNJH=new_lab__QOJ(lab_type__GNJH);
+          next__DNJH=(void *)((unsigned long)result__FNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNJH)));
+          ((__POINTER *)next__DNJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ENJH)[ 0]=next__DNJH;
+        } else {
+          next__DNJH=((__POINTER *)result__FNJH)[ 0];
+          if ((next__DNJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FNJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HNJH <<  1)) <=  4096)) {
+              next__DNJH=(void *)((unsigned long)result__FNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HNJH)));
             } else {
-              next__UCJH=new_lab__URJ(lab_type__XCJH);
+              next__DNJH=new_lab__QOJ(lab_type__GNJH);
             };
-            ((__POINTER *)next__UCJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VCJH)[ 0]=next__UCJH;
+            ((__POINTER *)next__DNJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ENJH)[ 0]=next__DNJH;
           } else {
-            ((__POINTER *)result__WCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WCJH=next__UCJH;
+            ((__POINTER *)result__FNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FNJH=next__DNJH;
           };
         };
-        ptr__RUI=result__WCJH;
+        ptr__NRI=result__FNJH;
       };
-      result__QUI=((__ITM_PROTOTYPE *)ptr__RUI);
-      *(result__QUI) = *(ITM_PROTOTYPE__);
+      result__MRI=((__ITM_PROTOTYPE *)ptr__NRI);
+      *(result__MRI) = *(ITM_PROTOTYPE__);
     };
-    ((__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) {
+    ((__ITM_PROTOTYPE *)result__MRI)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__ADBD;
+    switch (((struct ___OBJ *)e__SDHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__XDBD=((__ITM_LIST *)e__DGHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__XDBD=((__ITM_LDOTS *)e__DGHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__XDBD=((__ITM_PROTOTYPE *)e__DGHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__XDBD=((__ITM_LIST_IDF *)e__DGHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__XDBD=((__ITM_WRITE_VALUE *)e__DGHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__XDBD=((__ITM_WRITE_CAST *)e__DGHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ__: {
-      __tmp__XDBD=((__ITM_READ *)e__DGHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__XDBD=((__ITM_WRITE_CODE *)e__DGHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__XDBD=((__ITM_OPERATOR *)e__DGHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__XDBD=((__ITM_READ_ARG1 *)e__DGHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__XDBD=((__ITM_READ_ARG2 *)e__DGHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__XDBD=position__ND5B(e__DGHC);
+      __tmp__JDBD=position__054B(e__SDHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__XDBD=((__ITM_OLD *)e__DGHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__XDBD=((__ITM_EXTERNAL_TYPE *)e__DGHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__XDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__DGHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__XDBD=((__ITM_EXTERNAL *)e__DGHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__XDBD=((__ITM_READ_ARGS *)e__DGHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__XDBD=((__ITM_REAL *)e__DGHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__XDBD=((__ITM_NUMBER *)e__DGHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__XDBD=((__ITM_CHARACTER *)e__DGHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__XDBD=((__ITM_STRING *)e__DGHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+      __tmp__JDBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__XDBD=position__NJHC(e__DGHC);
+      __tmp__JDBD=position__2GHC(e__SDHC);
     } break;
     };
-    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)));
+    result__GECD=NULL;
+    ptr__HECD=((__POINTER )(NULL));
+    typ_id__MECD= 0;
+    sz__JECD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__JECD ==  0)) {
+      result__GECD=ITM_READ_ARG1__;
+    } else {
+      typ_id__MECD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JECD);
+      if ((typ_id__MECD == (__INTEGER)(-  1))) {
+        a__GFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__JECD + a__GFGH) & (__UINTEGER_32)(~ a__GFGH));
+        ptr_table__JNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__INJH=((__POINTER )(NULL));
+        result__KNJH=((__POINTER *)ptr_table__JNJH)[ 0];
+        if ((result__KNJH == (void *)NULL)) {
+          result__KNJH=new_lab__QOJ(new_size__HFGH);
+          next__INJH=(void *)((unsigned long)result__KNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HFGH)));
+          ((__POINTER *)next__INJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JNJH)[ 0]=next__INJH;
+        } else {
+          next__INJH=((__POINTER *)result__KNJH)[ 0];
+          if ((next__INJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KNJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HFGH <<  1)) <=  4096)) {
+              next__INJH=(void *)((unsigned long)result__KNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HFGH)));
             } else {
-              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)));
+              next__INJH=new_lab__QOJ(new_size__HFGH);
+            };
+            ((__POINTER *)next__INJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JNJH)[ 0]=next__INJH;
+          } else {
+            ((__POINTER *)result__KNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__INJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KNJH=next__INJH;
+          };
+        };
+        ptr__HECD=result__KNJH;
+      } else {
+        t__LFGH=((__UINTEGER_32 )typ_id__MECD);
+        a__KFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__RNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JECD + a__KFGH) & (__UINTEGER_32)(~ a__KFGH));
+        ptr_table__ONJH=((__POINTER )(&(table_type[(t__LFGH)])));
+        lab_type__QNJH=(__UINTEGER_32)(t__LFGH |  1);
+        next__NNJH=((__POINTER )(NULL));
+        result__PNJH=((__POINTER *)ptr_table__ONJH)[ 0];
+        if ((result__PNJH == (void *)NULL)) {
+          result__PNJH=new_lab__QOJ(lab_type__QNJH);
+          next__NNJH=(void *)((unsigned long)result__PNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RNJH)));
+          ((__POINTER *)next__NNJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ONJH)[ 0]=next__NNJH;
+        } else {
+          next__NNJH=((__POINTER *)result__PNJH)[ 0];
+          if ((next__NNJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PNJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RNJH <<  1)) <=  4096)) {
+              next__NNJH=(void *)((unsigned long)result__PNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RNJH)));
             } else {
-              next__4CJH=new_lab__URJ(lab_type__BDJH);
+              next__NNJH=new_lab__QOJ(lab_type__QNJH);
             };
-            ((__POINTER *)next__4CJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5CJH)[ 0]=next__4CJH;
+            ((__POINTER *)next__NNJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ONJH)[ 0]=next__NNJH;
           } else {
-            ((__POINTER *)result__ADJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4CJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ADJH=next__4CJH;
+            ((__POINTER *)result__PNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PNJH=next__NNJH;
           };
         };
-        ptr__WFCD=result__ADJH;
+        ptr__HECD=result__PNJH;
       };
-      result__VFCD=((__ITM_READ_ARG1 *)ptr__WFCD);
-      *(result__VFCD) = *(ITM_READ_ARG1__);
+      result__GECD=((__ITM_READ_ARG1 *)ptr__HECD);
+      *(result__GECD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__VFCD)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=__tmp__XDBD;
+    ((__ITM_READ_ARG1 *)result__GECD)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__JDBD;
   };
 }
 
-static __POSITION position__ND5B(__ITM_EXPRESSION *Self__OD5B)
+static __POSITION position__054B(__ITM_EXPRESSION *Self__154B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__454B;
+  __POSITION __tmp__554B;
+  __tmp__454B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__154B->value_list__OFV)->parent_arrayed_collection__5QF.storage__AUT)[ 0];
+  switch (((struct ___OBJ *)__tmp__454B)->__id) {
   case __ITM_LIST__: {
-    __tmp__SD5B=((__ITM_LIST *)__tmp__RD5B)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_LIST *)__tmp__454B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__SD5B=((__ITM_LDOTS *)__tmp__RD5B)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_LDOTS *)__tmp__454B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__SD5B=((__ITM_PROTOTYPE *)__tmp__RD5B)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_PROTOTYPE *)__tmp__454B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__SD5B=((__ITM_LIST_IDF *)__tmp__RD5B)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_LIST_IDF *)__tmp__454B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__SD5B=((__ITM_WRITE_VALUE *)__tmp__RD5B)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_WRITE_VALUE *)__tmp__454B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__SD5B=((__ITM_WRITE_CAST *)__tmp__RD5B)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_WRITE_CAST *)__tmp__454B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ__: {
-    __tmp__SD5B=((__ITM_READ *)__tmp__RD5B)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_READ *)__tmp__454B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__SD5B=((__ITM_WRITE_CODE *)__tmp__RD5B)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_WRITE_CODE *)__tmp__454B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__SD5B=((__ITM_OPERATOR *)__tmp__RD5B)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_OPERATOR *)__tmp__454B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__SD5B=((__ITM_READ_ARG1 *)__tmp__RD5B)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_READ_ARG1 *)__tmp__454B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__SD5B=((__ITM_READ_ARG2 *)__tmp__RD5B)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_READ_ARG2 *)__tmp__454B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__SD5B=position__ND5B(__tmp__RD5B);
+    __tmp__554B=position__054B(__tmp__454B);
   } break;
   case __ITM_OLD__: {
-    __tmp__SD5B=((__ITM_OLD *)__tmp__RD5B)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_OLD *)__tmp__454B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__SD5B=((__ITM_EXTERNAL_TYPE *)__tmp__RD5B)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_EXTERNAL_TYPE *)__tmp__454B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__SD5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__RD5B)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__454B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__SD5B=((__ITM_EXTERNAL *)__tmp__RD5B)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_EXTERNAL *)__tmp__454B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__SD5B=((__ITM_READ_ARGS *)__tmp__RD5B)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_READ_ARGS *)__tmp__454B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__SD5B=((__ITM_REAL *)__tmp__RD5B)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_REAL *)__tmp__454B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__SD5B=((__ITM_NUMBER *)__tmp__RD5B)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_NUMBER *)__tmp__454B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__SD5B=((__ITM_CHARACTER *)__tmp__RD5B)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_CHARACTER *)__tmp__454B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__SD5B=((__ITM_STRING *)__tmp__RD5B)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__554B=((__ITM_STRING *)__tmp__454B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__SD5B=position__NJHC(__tmp__RD5B);
+    __tmp__554B=position__2GHC(__tmp__454B);
   } break;
   };
-  return(__tmp__SD5B);
+  return(__tmp__554B);
 }
 
-static __POSITION position__NJHC(__ITM_RESULT *Self__OJHC)
+static __POSITION position__2GHC(__ITM_RESULT *Self__3GHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__QJHC;
-  __POSITION __tmp__RJHC;
-  __tmp__QJHC=Self__OJHC->value__ULFC;
-  switch (((struct ___OBJ *)__tmp__QJHC)->__id) {
+  void *__tmp__5GHC;
+  __POSITION __tmp__AHHC;
+  __tmp__5GHC=Self__3GHC->value__DJFC;
+  switch (((struct ___OBJ *)__tmp__5GHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__RJHC=((__ITM_LIST *)__tmp__QJHC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_LIST *)__tmp__5GHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__RJHC=((__ITM_LDOTS *)__tmp__QJHC)->parent_itm_constant__YUF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_LDOTS *)__tmp__5GHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__RJHC=((__ITM_PROTOTYPE *)__tmp__QJHC)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_PROTOTYPE *)__tmp__5GHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__RJHC=((__ITM_LIST_IDF *)__tmp__QJHC)->parent_itm_code__4CJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_LIST_IDF *)__tmp__5GHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__RJHC=((__ITM_WRITE_VALUE *)__tmp__QJHC)->parent_itm_write__UDJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_WRITE_VALUE *)__tmp__5GHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__RJHC=((__ITM_WRITE_CAST *)__tmp__QJHC)->parent_itm_write__LEJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_WRITE_CAST *)__tmp__5GHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ__: {
-    __tmp__RJHC=((__ITM_READ *)__tmp__QJHC)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_READ *)__tmp__5GHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__RJHC=((__ITM_WRITE_CODE *)__tmp__QJHC)->parent_itm_write__WHJ.parent_itm_code__TDJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_WRITE_CODE *)__tmp__5GHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__RJHC=((__ITM_OPERATOR *)__tmp__QJHC)->parent_itm_code__MFL.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_OPERATOR *)__tmp__5GHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__RJHC=((__ITM_READ_ARG1 *)__tmp__QJHC)->parent_itm_read__SIL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_READ_ARG1 *)__tmp__5GHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__RJHC=((__ITM_READ_ARG2 *)__tmp__QJHC)->parent_itm_read__5KL.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_READ_ARG2 *)__tmp__5GHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__RJHC=position__ND5B(__tmp__QJHC);
+    __tmp__AHHC=position__054B(__tmp__5GHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__RJHC=((__ITM_OLD *)__tmp__QJHC)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_OLD *)__tmp__5GHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__RJHC=((__ITM_EXTERNAL_TYPE *)__tmp__QJHC)->parent_itm_extern__X4M.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_EXTERNAL_TYPE *)__tmp__5GHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__RJHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__QJHC)->list__INDC)->parent_itm_code__S5E.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__5GHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__RJHC=((__ITM_EXTERNAL *)__tmp__QJHC)->parent_itm_extern__2FN.parent_itm_code__W4M.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_EXTERNAL *)__tmp__5GHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__RJHC=((__ITM_READ_ARGS *)__tmp__QJHC)->parent_itm_read__SDO.parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_READ_ARGS *)__tmp__5GHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__RJHC=((__ITM_REAL *)__tmp__QJHC)->parent_itm_constant__NRO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_REAL *)__tmp__5GHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__RJHC=((__ITM_NUMBER *)__tmp__QJHC)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_NUMBER *)__tmp__5GHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__RJHC=((__ITM_CHARACTER *)__tmp__QJHC)->parent_itm_constant__RSO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_CHARACTER *)__tmp__5GHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__RJHC=((__ITM_STRING *)__tmp__QJHC)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ;
+    __tmp__AHHC=((__ITM_STRING *)__tmp__5GHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__RJHC=position__NJHC(__tmp__QJHC);
+    __tmp__AHHC=position__2GHC(__tmp__5GHC);
   } break;
   };
-  return(__tmp__RJHC);
+  return(__tmp__AHHC);
 }
 
-static void fast_put__to__JOGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__KOGC,void *v__LOGC,void *k__MOGC)
+static void fast_put__to__YLGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZLGC,void *v__0LGC,void *k__1LGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__O2HH,*Self__T2HH;
+  __INTEGER result__N2HH,__tmp__P2HH,Self__Q2HH,idx__DMGC,idx__FNID;
+  __INTEGER new_capacity__GNID,i__HNID,result__S2HH,__tmp__U2HH;
+  __INTEGER Self__V2HH,typ_id__UPID;
+  __POINTER ptr__PPID,ptr_table__TNJH,next__SNJH,result__UNJH;
+  __POINTER ptr_table__YNJH,next__XNJH,result__ZNJH;
+  __UINTEGER_32 sz__RPID,a__WEGH,new_size__XEGH,t__1EGH,a__0EGH;
+  __UINTEGER_32 new_size__1NJH,lab_type__0NJH;
+  void *node__EMGC,*node1__JNID,*node2__KNID,*__tmp__SNGC;
+  void **old_buckets__INID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__OPID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__4DTD;
+  Self__O2HH=((__STRING_CONSTANT *)k__1LGC);
+  result__N2HH= 0;
+  __tmp__P2HH=Self__O2HH->count__DD;
+  Self__Q2HH= 1;
+  while ((Self__Q2HH <= __tmp__P2HH)) {
+    result__N2HH=(__INTEGER)((__INTEGER)( 5 * result__N2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__O2HH->storage__QMO)[(__INTEGER)(Self__Q2HH -  1)])));
+    Self__Q2HH=(__INTEGER)(Self__Q2HH +  1);
+  };
+  if ((result__N2HH <  0)) {
+    result__N2HH=(__INTEGER)(~ result__N2HH);
+  };
+  idx__DMGC=(__INTEGER)(result__N2HH % Self__ZLGC->capacity__L2BC);
+  node__EMGC=((void **)Self__ZLGC->buckets__04FC)[idx__DMGC];
+  while ((! (((void *)node__EMGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EMGC)->key__G5FC == (void *)k__1LGC)))) {
+    node__EMGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EMGC)->next__R5FC;
+  };
+  if (((void *)node__EMGC == (void *)NULL)) {
+    if ((Self__ZLGC->capacity__L2BC == Self__ZLGC->count__FNGC)) {
+      idx__FNID= 0;
+      node1__JNID=NULL;
+      node2__KNID=NULL;
+      old_buckets__INID=Self__ZLGC->buckets__04FC;
+      new_capacity__GNID=prime_number_ceiling__K01((__INTEGER)(Self__ZLGC->capacity__L2BC +  1));
+      Self__ZLGC->buckets__04FC=create__QPSC(new_capacity__GNID);
+      i__HNID=(__INTEGER)(Self__ZLGC->capacity__L2BC -  1);
+      Self__ZLGC->capacity__L2BC=new_capacity__GNID;
+      while ((i__HNID >=  0)) {
+        node1__JNID=((void **)old_buckets__INID)[i__HNID];
+        while (((void *)node1__JNID != (void *)NULL)) {
+          node2__KNID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__JNID)->next__R5FC;
+          Self__T2HH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__JNID)->key__G5FC);
+          result__S2HH= 0;
+          __tmp__U2HH=Self__T2HH->count__DD;
+          Self__V2HH= 1;
+          while ((Self__V2HH <= __tmp__U2HH)) {
+            result__S2HH=(__INTEGER)((__INTEGER)( 5 * result__S2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__T2HH->storage__QMO)[(__INTEGER)(Self__V2HH -  1)])));
+            Self__V2HH=(__INTEGER)(Self__V2HH +  1);
+          };
+          if ((result__S2HH <  0)) {
+            result__S2HH=(__INTEGER)(~ result__S2HH);
+          };
+          idx__FNID=(__INTEGER)(result__S2HH % Self__ZLGC->capacity__L2BC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__JNID)->next__R5FC=((void **)Self__ZLGC->buckets__04FC)[idx__FNID];
+          ((void **)Self__ZLGC->buckets__04FC)[idx__FNID]=node1__JNID;
+          node1__JNID=node2__KNID;
+        };
+        i__HNID=(__INTEGER)(i__HNID -  1);
+      };
+      idx__DMGC=(__INTEGER)(result__N2HH % new_capacity__GNID);
+    };
+    __tmp__SNGC=((void **)Self__ZLGC->buckets__04FC)[idx__DMGC];
+    result__OPID=NULL;
+    ptr__PPID=((__POINTER )(NULL));
+    typ_id__UPID= 0;
+    sz__RPID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__RPID ==  0)) {
+      result__OPID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__UPID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RPID);
+      if ((typ_id__UPID == (__INTEGER)(-  1))) {
+        a__WEGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XEGH=(__UINTEGER_32)((__UINTEGER_32)(sz__RPID + a__WEGH) & (__UINTEGER_32)(~ a__WEGH));
+        ptr_table__TNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XEGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__SNJH=((__POINTER )(NULL));
+        result__UNJH=((__POINTER *)ptr_table__TNJH)[ 0];
+        if ((result__UNJH == (void *)NULL)) {
+          result__UNJH=new_lab__QOJ(new_size__XEGH);
+          next__SNJH=(void *)((unsigned long)result__UNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XEGH)));
+          ((__POINTER *)next__SNJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TNJH)[ 0]=next__SNJH;
+        } else {
+          next__SNJH=((__POINTER *)result__UNJH)[ 0];
+          if ((next__SNJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UNJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XEGH <<  1)) <=  4096)) {
+              next__SNJH=(void *)((unsigned long)result__UNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XEGH)));
             } else {
-              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)));
+              next__SNJH=new_lab__QOJ(new_size__XEGH);
+            };
+            ((__POINTER *)next__SNJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TNJH)[ 0]=next__SNJH;
+          } else {
+            ((__POINTER *)result__UNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UNJH=next__SNJH;
+          };
+        };
+        ptr__PPID=result__UNJH;
+      } else {
+        t__1EGH=((__UINTEGER_32 )typ_id__UPID);
+        a__0EGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1NJH=(__UINTEGER_32)((__UINTEGER_32)(sz__RPID + a__0EGH) & (__UINTEGER_32)(~ a__0EGH));
+        ptr_table__YNJH=((__POINTER )(&(table_type[(t__1EGH)])));
+        lab_type__0NJH=(__UINTEGER_32)(t__1EGH |  1);
+        next__XNJH=((__POINTER )(NULL));
+        result__ZNJH=((__POINTER *)ptr_table__YNJH)[ 0];
+        if ((result__ZNJH == (void *)NULL)) {
+          result__ZNJH=new_lab__QOJ(lab_type__0NJH);
+          next__XNJH=(void *)((unsigned long)result__ZNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NJH)));
+          ((__POINTER *)next__XNJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YNJH)[ 0]=next__XNJH;
+        } else {
+          next__XNJH=((__POINTER *)result__ZNJH)[ 0];
+          if ((next__XNJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZNJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1NJH <<  1)) <=  4096)) {
+              next__XNJH=(void *)((unsigned long)result__ZNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1NJH)));
             } else {
-              next__IDJH=new_lab__URJ(lab_type__LDJH);
+              next__XNJH=new_lab__QOJ(lab_type__0NJH);
             };
-            ((__POINTER *)next__IDJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JDJH)[ 0]=next__IDJH;
+            ((__POINTER *)next__XNJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YNJH)[ 0]=next__XNJH;
           } else {
-            ((__POINTER *)result__KDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KDJH=next__IDJH;
+            ((__POINTER *)result__ZNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZNJH=next__XNJH;
           };
         };
-        ptr__LPID=result__KDJH;
+        ptr__PPID=result__ZNJH;
       };
-      result__KPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__LPID);
-      *(result__KPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__OPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__PPID);
+      *(result__OPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    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);
+    Self__4DTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__OPID);
+    Self__4DTD->item__Z5FC=v__0LGC;
+    Self__4DTD->key__G5FC=k__1LGC;
+    Self__4DTD->next__R5FC=__tmp__SNGC;
+    node__EMGC=result__OPID;
+    ((void **)Self__ZLGC->buckets__04FC)[idx__DMGC]=result__OPID;
+    Self__ZLGC->count__FNGC=(__INTEGER)(Self__ZLGC->count__FNGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__VOGC)->item__KCGC=v__LOGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EMGC)->item__Z5FC=v__0LGC;
   };
 }
 
-static void* fast_reference_at__YAGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZAGC,void *k__0AGC)
+static void* fast_reference_at__H4FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__I4FC,void *k__J4FC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__U4FC;
+  __STRING_CONSTANT *Self__Y2HH;
+  __INTEGER result__X2HH,__tmp__Z2HH,Self__02HH;
+  void *node__T4FC;
+  result__U4FC=NULL;
+  Self__Y2HH=((__STRING_CONSTANT *)k__J4FC);
+  result__X2HH= 0;
+  __tmp__Z2HH=Self__Y2HH->count__DD;
+  Self__02HH= 1;
+  while ((Self__02HH <= __tmp__Z2HH)) {
+    result__X2HH=(__INTEGER)((__INTEGER)( 5 * result__X2HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Y2HH->storage__QMO)[(__INTEGER)(Self__02HH -  1)])));
+    Self__02HH=(__INTEGER)(Self__02HH +  1);
+  };
+  if ((result__X2HH <  0)) {
+    result__X2HH=(__INTEGER)(~ result__X2HH);
+  };
+  node__T4FC=((void **)Self__I4FC->buckets__04FC)[(__INTEGER)(result__X2HH % Self__I4FC->capacity__L2BC)];
+  while ((! (((void *)node__T4FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__T4FC)->key__G5FC == (void *)k__J4FC)))) {
+    node__T4FC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__T4FC)->next__R5FC;
+  };
+  if (((void *)node__T4FC != (void *)NULL)) {
+    result__U4FC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__T4FC)->item__Z5FC;
+  };
+  return(result__U4FC);
 }
 
-static void* fast_reference_at__EHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FHNE,void *k__GHNE)
+static void* fast_reference_at__HFNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IFNE,void *k__JFNE)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __STRING_CONSTANT *Self__32HH;
+  __INTEGER result__22HH,__tmp__42HH,Self__52HH;
+  void *result__TFNE;
+  void *node__SFNE;
+  result__TFNE=NULL;
+  Self__32HH=((__STRING_CONSTANT *)k__JFNE);
+  result__22HH= 0;
+  __tmp__42HH=Self__32HH->count__DD;
+  Self__52HH= 1;
+  while ((Self__52HH <= __tmp__42HH)) {
+    result__22HH=(__INTEGER)((__INTEGER)( 5 * result__22HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__32HH->storage__QMO)[(__INTEGER)(Self__52HH -  1)])));
+    Self__52HH=(__INTEGER)(Self__52HH +  1);
+  };
+  if ((result__22HH <  0)) {
+    result__22HH=(__INTEGER)(~ result__22HH);
+  };
+  node__SFNE=((void **)Self__IFNE->buckets__04S)[(__INTEGER)(result__22HH % Self__IFNE->capacity__V4S)];
+  while ((! (((void *)node__SFNE == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__SFNE)->key__G5S == (void *)k__JFNE)))) {
+    node__SFNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__SFNE)->next__R5S;
+  };
+  if (((void *)node__SFNE != (void *)NULL)) {
+    result__TFNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__SFNE)->item__0T3;
+  };
+  return(result__TFNE);
 }
 
-static void append_in__WGPD(__ITM_TYPE_BLOCK *Self__XGPD,void *buffer__YGPD)
+static void append_in__EFPD(__ITM_TYPE_BLOCK *Self__FFPD,void *buffer__GFPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__HFPD,*__tmp__ZFPD;
+  void *__tmp__OFPD,*__tmp__YFPD,*__tmp__5FPD;
+  __ITM_TYPE_STYLE *Self__TFGH,*Self__VFGH;
+  typ_mul__HFPD=NULL;
+  add_last__UHT(buffer__GFPD,'{');
+  if (((void *)Self__FFPD->type_argument__RIN != (void *)NULL)) {
+    __tmp__OFPD=Self__FFPD->type_argument__RIN;
+    switch (((struct ___OBJ *)__tmp__OFPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__JOS(buffer__YGPD,((__ITM_TYPE_PARAMETER *)__tmp__AHPD)->parent_itm_type__FEE.name__SYP);
+      append__2JS(buffer__GFPD,((__ITM_TYPE_PARAMETER *)__tmp__OFPD)->parent_itm_type__LAE.name__FUP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__JOS(buffer__YGPD,((__ITM_TYPE_SIMPLE *)__tmp__AHPD)->name__SYP);
+      append__2JS(buffer__GFPD,((__ITM_TYPE_SIMPLE *)__tmp__OFPD)->name__FUP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__0IBC(__tmp__AHPD,buffer__YGPD);
+      append_in__BGBC(__tmp__OFPD,buffer__GFPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__WGPD(__tmp__AHPD,buffer__YGPD);
+      append_in__EFPD(__tmp__OFPD,buffer__GFPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__0HPD(__tmp__AHPD,buffer__YGPD);
+      append_in__IGPD(__tmp__OFPD,buffer__GFPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__TFGH=((__ITM_TYPE_STYLE *)__tmp__OFPD);
+      if (((void *)Self__TFGH->style__OUP != (void *)NULL)) {
+        append__2JS(buffer__GFPD,Self__TFGH->style__OUP);
+        add_last__UHT(buffer__GFPD,' ');
       };
-      append__JOS(buffer__YGPD,Self__A0FH->parent_itm_type_simple__JSN.name__SYP);
+      append__2JS(buffer__GFPD,Self__TFGH->parent_itm_type_simple__2NN.name__FUP);
     } break;
     };
-    add_last__BMT(buffer__YGPD,';');
-    add_last__BMT(buffer__YGPD,' ');
+    add_last__UHT(buffer__GFPD,';');
+    add_last__UHT(buffer__GFPD,' ');
   };
-  if (((void *)Self__XGPD->type_result__INN != (void *)NULL)) {
-    __tmp__KHPD=Self__XGPD->type_result__INN;
-    if (__tmp__KHPD==NULL) {
-      __tmp__LHPD=NULL;
+  if (((void *)Self__FFPD->type_result__1IN != (void *)NULL)) {
+    __tmp__YFPD=Self__FFPD->type_result__1IN;
+    if (__tmp__YFPD==NULL) {
+      __tmp__ZFPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__KHPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__YFPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__LHPD=NULL;
+        __tmp__ZFPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__LHPD=NULL;
+        __tmp__ZFPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__LHPD=((void *)__tmp__KHPD);
+        __tmp__ZFPD=((void *)__tmp__YFPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__LHPD=NULL;
+        __tmp__ZFPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__LHPD=NULL;
+        __tmp__ZFPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__LHPD=NULL;
+        __tmp__ZFPD=NULL;
       } break;
       }
     };
-    typ_mul__ZGPD=__tmp__LHPD;
-    if (((void *)__tmp__LHPD == (void *)NULL)) {
-      __tmp__RHPD=Self__XGPD->type_result__INN;
-      switch (((struct ___OBJ *)__tmp__RHPD)->__id) {
+    typ_mul__HFPD=__tmp__ZFPD;
+    if (((void *)__tmp__ZFPD == (void *)NULL)) {
+      __tmp__5FPD=Self__FFPD->type_result__1IN;
+      switch (((struct ___OBJ *)__tmp__5FPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__JOS(buffer__YGPD,((__ITM_TYPE_PARAMETER *)__tmp__RHPD)->parent_itm_type__FEE.name__SYP);
+        append__2JS(buffer__GFPD,((__ITM_TYPE_PARAMETER *)__tmp__5FPD)->parent_itm_type__LAE.name__FUP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__JOS(buffer__YGPD,((__ITM_TYPE_SIMPLE *)__tmp__RHPD)->name__SYP);
+        append__2JS(buffer__GFPD,((__ITM_TYPE_SIMPLE *)__tmp__5FPD)->name__FUP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__0IBC(__tmp__RHPD,buffer__YGPD);
+        append_in__BGBC(__tmp__5FPD,buffer__GFPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__WGPD(__tmp__RHPD,buffer__YGPD);
+        append_in__EFPD(__tmp__5FPD,buffer__GFPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__0HPD(__tmp__RHPD,buffer__YGPD);
+        append_in__IGPD(__tmp__5FPD,buffer__GFPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__VFGH=((__ITM_TYPE_STYLE *)__tmp__5FPD);
+        if (((void *)Self__VFGH->style__OUP != (void *)NULL)) {
+          append__2JS(buffer__GFPD,Self__VFGH->style__OUP);
+          add_last__UHT(buffer__GFPD,' ');
         };
-        append__JOS(buffer__YGPD,Self__C0FH->parent_itm_type_simple__JSN.name__SYP);
+        append__2JS(buffer__GFPD,Self__VFGH->parent_itm_type_simple__2NN.name__FUP);
       } break;
       };
     } else {
-      display_raw__1LIC(__tmp__LHPD,buffer__YGPD);
+      display_raw__ZJIC(__tmp__ZFPD,buffer__GFPD);
     };
   };
-  add_last__BMT(buffer__YGPD,'}');
+  add_last__UHT(buffer__GFPD,'}');
 }
 
-static void append_in__0HPD(__ITM_TYPE_GENERIC *Self__1HPD,void *buffer__2HPD)
+static void append_in__IGPD(__ITM_TYPE_GENERIC *Self__JGPD,void *buffer__KGPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__1GPD,Self__RYUD;
+  void *__tmp__CHPD,*__tmp__FHPD;
+  __ITM_TYPE_STYLE *Self__0FGH,*Self__HHPD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__X5QB;
+  if (((void *)Self__JGPD->parent_itm_type_style__3NN.style__OUP != (void *)NULL)) {
+    append__2JS(buffer__KGPD,Self__JGPD->parent_itm_type_style__3NN.style__OUP);
+    add_last__UHT(buffer__KGPD,' ');
+  };
+  append__2JS(buffer__KGPD,Self__JGPD->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP);
+  add_last__UHT(buffer__KGPD,'(');
+  __tmp__1GPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__JGPD->list_type__YUP)->parent_arrayed_collection__EYC.upper__3DV -  1);
+  Self__RYUD= 0;
+  while ((Self__RYUD <= __tmp__1GPD)) {
+    __tmp__CHPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__JGPD->list_type__YUP)->parent_arrayed_collection__EYC.storage__EIV)[Self__RYUD];
+    switch (((struct ___OBJ *)__tmp__CHPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__JOS(buffer__2HPD,((__ITM_TYPE_PARAMETER *)__tmp__UIPD)->parent_itm_type__FEE.name__SYP);
+      append__2JS(buffer__KGPD,((__ITM_TYPE_PARAMETER *)__tmp__CHPD)->parent_itm_type__LAE.name__FUP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__JOS(buffer__2HPD,((__ITM_TYPE_SIMPLE *)__tmp__UIPD)->name__SYP);
+      append__2JS(buffer__KGPD,((__ITM_TYPE_SIMPLE *)__tmp__CHPD)->name__FUP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__WGPD(__tmp__UIPD,buffer__2HPD);
+      append_in__EFPD(__tmp__CHPD,buffer__KGPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__0HPD(__tmp__UIPD,buffer__2HPD);
+      append_in__IGPD(__tmp__CHPD,buffer__KGPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__0FGH=((__ITM_TYPE_STYLE *)__tmp__CHPD);
+      if (((void *)Self__0FGH->style__OUP != (void *)NULL)) {
+        append__2JS(buffer__KGPD,Self__0FGH->style__OUP);
+        add_last__UHT(buffer__KGPD,' ');
       };
-      append__JOS(buffer__2HPD,Self__H0FH->parent_itm_type_simple__JSN.name__SYP);
+      append__2JS(buffer__KGPD,Self__0FGH->parent_itm_type_simple__2NN.name__FUP);
     } break;
     };
-    add_last__BMT(buffer__2HPD,',');
-    Self__EYUD=(__INTEGER)(Self__EYUD +  1);
+    add_last__UHT(buffer__KGPD,',');
+    Self__RYUD=(__INTEGER)(Self__RYUD +  1);
   };
-  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) {
+  Self__X5QB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__JGPD->list_type__YUP);
+  __tmp__FHPD=((void **)Self__X5QB->parent_arrayed_collection__EYC.storage__EIV)[Self__X5QB->parent_arrayed_collection__EYC.upper__3DV];
+  switch (((struct ___OBJ *)__tmp__FHPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__JOS(buffer__2HPD,((__ITM_TYPE_PARAMETER *)__tmp__XIPD)->parent_itm_type__FEE.name__SYP);
+    append__2JS(buffer__KGPD,((__ITM_TYPE_PARAMETER *)__tmp__FHPD)->parent_itm_type__LAE.name__FUP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__JOS(buffer__2HPD,((__ITM_TYPE_SIMPLE *)__tmp__XIPD)->name__SYP);
+    append__2JS(buffer__KGPD,((__ITM_TYPE_SIMPLE *)__tmp__FHPD)->name__FUP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__WGPD(__tmp__XIPD,buffer__2HPD);
+    append_in__EFPD(__tmp__FHPD,buffer__KGPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__0HPD(__tmp__XIPD,buffer__2HPD);
+    append_in__IGPD(__tmp__FHPD,buffer__KGPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__HHPD=((__ITM_TYPE_STYLE *)__tmp__FHPD);
+    if (((void *)Self__HHPD->style__OUP != (void *)NULL)) {
+      append__2JS(buffer__KGPD,Self__HHPD->style__OUP);
+      add_last__UHT(buffer__KGPD,' ');
     };
-    append__JOS(buffer__2HPD,Self__ZIPD->parent_itm_type_simple__JSN.name__SYP);
+    append__2JS(buffer__KGPD,Self__HHPD->parent_itm_type_simple__2NN.name__FUP);
   } break;
   };
-  add_last__BMT(buffer__2HPD,')');
+  add_last__UHT(buffer__KGPD,')');
 }
 
-static void put__to__like__IUAG(void *tok__KUAG,void *buf__LUAG,void *key__MUAG)
+static void put__to__like__3BBG(void *tok__5BBG,void *buf__ACBG,void *key__BCBG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__SCBG,Self__4DHG;
+  void *lst__CCBG;
+  lst__CCBG=NULL;
+  if (((void *)key__BCBG != (void *)NULL)) {
+    lst__CCBG=fast_reference_at__HFNE(short_dico__QD,key__BCBG);
+    if (((void *)lst__CCBG != (void *)NULL)) {
+      __tmp__SCBG=((__LINKED_LISToSTRING_CONSTANTo *)lst__CCBG)->parent_linked_collection__LD.upper__MDD;
+      Self__4DHG= 1;
+      while ((Self__4DHG <= __tmp__SCBG)) {
+        if (((void *)item__MZND(lst__CCBG,Self__4DHG) == (void *)NULL)) {
+          append__2JS(buf__ACBG,tok__5BBG);
         } else {
-          append__JOS(buf__LUAG,item__A1ND(lst__NUAG,Self__3YGG));
+          append__2JS(buf__ACBG,item__MZND(lst__CCBG,Self__4DHG));
         };
-        Self__3YGG=(__INTEGER)(Self__3YGG +  1);
+        Self__4DHG=(__INTEGER)(Self__4DHG +  1);
       };
     };
   };
 }
 
-static void shorter_in__JRAG(__ITM_ARG *Self__KRAG,void *buf__LRAG)
+static void shorter_in__44AG(__ITM_ARG *Self__54AG,void *buf__A5AG)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  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));
+  void *__tmp__U5AG;
+  __ITM_TYPE_STYLE *Self__4FGH;
+  if (((void *)Self__54AG->name__SYHC == (void *)(&__string_58))) {
+    put__to__like__IGGG(Self__54AG->name__SYHC,buf__A5AG,(&__string_119));
   } else {
-    put__to__like__H1FG(Self__KRAG->name__D1HC,buf__LRAG,(&__string_134));
+    put__to__like__IGGG(Self__54AG->name__SYHC,buf__A5AG,(&__string_134));
   };
-  add_last__BMT(buf__LRAG,':');
-  __tmp__5RAG=Self__KRAG->type__E1HC;
-  switch (((struct ___OBJ *)__tmp__5RAG)->__id) {
+  add_last__UHT(buf__A5AG,':');
+  __tmp__U5AG=Self__54AG->type__TYHC;
+  switch (((struct ___OBJ *)__tmp__U5AG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__RVCG(__tmp__5RAG,buf__LRAG);
+    shorter_in__OIDG(__tmp__U5AG,buf__A5AG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__CWCG(__tmp__5RAG,buf__LRAG);
+    shorter_in__5IDG(__tmp__U5AG,buf__A5AG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__TWCG(__tmp__5RAG,buf__LRAG);
+    shorter_in__QJDG(__tmp__U5AG,buf__A5AG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__1XCG(__tmp__5RAG,buf__LRAG);
+    shorter_in__YKDG(__tmp__U5AG,buf__A5AG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__4FGH=((__ITM_TYPE_STYLE *)__tmp__U5AG);
+    if (((void *)Self__4FGH->style__OUP != (void *)NULL)) {
+      put__to__like__2OFG(Self__4FGH->style__OUP,buf__A5AG,(&__string_119));
+      add_last__UHT(buf__A5AG,' ');
     };
-    put__to__like__35EG(Self__L0FH->parent_itm_type_simple__JSN.name__SYP,buf__LRAG,(&__string_125));
+    put__to__like__2OFG(Self__4FGH->parent_itm_type_simple__2NN.name__FUP,buf__A5AG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__ASAG(__ITM_ARGS *Self__BSAG,void *buf__CSAG)
+static void shorter_in__V5AG(__ITM_ARGS *Self__W5AG,void *buf__X5AG)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__45AG,Self__PMDG;
+  void *__tmp__3ABG,*__tmp__FBBG;
+  __ITM_TYPE_STYLE *Self__SGGH,*Self__WGGH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__UMHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__UGGH;
+  add_last__UHT(buf__X5AG,'(');
+  __tmp__45AG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__W5AG->name__LYPF)->parent_arrayed_collection__L2I.upper__R4OD -  1);
+  Self__PMDG= 0;
+  while ((Self__PMDG <= __tmp__45AG)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__W5AG->name__LYPF)->parent_arrayed_collection__L2I.storage__HBPD)[Self__PMDG] == (void *)(&__string_58))) {
+      put__to__like__BNDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__W5AG->name__LYPF)->parent_arrayed_collection__L2I.storage__HBPD)[Self__PMDG],buf__X5AG,(&__string_119));
+    } else {
+      put__to__like__BNDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__W5AG->name__LYPF)->parent_arrayed_collection__L2I.storage__HBPD)[Self__PMDG],buf__X5AG,(&__string_134));
+    };
+    add_last__UHT(buf__X5AG,':');
+    __tmp__3ABG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__W5AG->type__MYPF)->list_type__1FP)->parent_arrayed_collection__EYC.storage__EIV)[Self__PMDG];
+    switch (((struct ___OBJ *)__tmp__3ABG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__ITAG,buf__CSAG);
+      shorter_in__OIDG(__tmp__3ABG,buf__X5AG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__ITAG,buf__CSAG);
+      shorter_in__5IDG(__tmp__3ABG,buf__X5AG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__ITAG,buf__CSAG);
+      shorter_in__QJDG(__tmp__3ABG,buf__X5AG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__ITAG,buf__CSAG);
+      shorter_in__YKDG(__tmp__3ABG,buf__X5AG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__SGGH=((__ITM_TYPE_STYLE *)__tmp__3ABG);
+      if (((void *)Self__SGGH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__SGGH->style__OUP,buf__X5AG,(&__string_119));
+        add_last__UHT(buf__X5AG,' ');
       };
-      put__to__like__35EG(Self__50FH->parent_itm_type_simple__JSN.name__SYP,buf__CSAG,(&__string_125));
+      put__to__like__2OFG(Self__SGGH->parent_itm_type_simple__2NN.name__FUP,buf__X5AG,(&__string_125));
     } break;
     };
-    add_last__BMT(buf__CSAG,',');
-    Self__SZCG=(__INTEGER)(Self__SZCG +  1);
+    add_last__UHT(buf__X5AG,',');
+    Self__PMDG=(__INTEGER)(Self__PMDG +  1);
   };
-  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) {
+  Self__UMHH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__W5AG->name__LYPF);
+  put__to__like__BNDG(((void **)Self__UMHH->parent_arrayed_collection__L2I.storage__HBPD)[Self__UMHH->parent_arrayed_collection__L2I.upper__R4OD],buf__X5AG,(&__string_134));
+  add_last__UHT(buf__X5AG,':');
+  Self__UGGH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__W5AG->type__MYPF)->list_type__1FP);
+  __tmp__FBBG=((void **)Self__UGGH->parent_arrayed_collection__EYC.storage__EIV)[Self__UGGH->parent_arrayed_collection__EYC.upper__3DV];
+  switch (((struct ___OBJ *)__tmp__FBBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__RVCG(__tmp__QTAG,buf__CSAG);
+    shorter_in__OIDG(__tmp__FBBG,buf__X5AG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__CWCG(__tmp__QTAG,buf__CSAG);
+    shorter_in__5IDG(__tmp__FBBG,buf__X5AG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__TWCG(__tmp__QTAG,buf__CSAG);
+    shorter_in__QJDG(__tmp__FBBG,buf__X5AG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__1XCG(__tmp__QTAG,buf__CSAG);
+    shorter_in__YKDG(__tmp__FBBG,buf__X5AG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__WGGH=((__ITM_TYPE_STYLE *)__tmp__FBBG);
+    if (((void *)Self__WGGH->style__OUP != (void *)NULL)) {
+      put__to__like__2OFG(Self__WGGH->style__OUP,buf__X5AG,(&__string_119));
+      add_last__UHT(buf__X5AG,' ');
     };
-    put__to__like__35EG(Self__D1FH->parent_itm_type_simple__JSN.name__SYP,buf__CSAG,(&__string_125));
+    put__to__like__2OFG(Self__WGGH->parent_itm_type_simple__2NN.name__FUP,buf__X5AG,(&__string_125));
   } break;
   };
-  add_last__BMT(buf__CSAG,')');
+  add_last__UHT(buf__X5AG,')');
 }
 
-static void shorter_in__RVCG(__ITM_TYPE_PARAMETER *Self__SVCG,void *buf__TVCG)
+static void shorter_in__OIDG(__ITM_TYPE_PARAMETER *Self__PIDG,void *buf__QIDG)
 // ({ITM_TYPE_PARAMETER},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__RXEG;
-  __INTEGER __tmp__EYEG,Self__1IHG;
-  void *lst__UXEG;
-  tok__RXEG=Self__SVCG->parent_itm_type__FEE.name__SYP;
-  lst__UXEG=NULL;
+  void *tok__QGFG;
+  __INTEGER __tmp__DHFG,Self__2THG;
+  void *lst__TGFG;
+  tok__QGFG=Self__PIDG->parent_itm_type__LAE.name__FUP;
+  lst__TGFG=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);
+    lst__TGFG=fast_reference_at__HFNE(short_dico__QD,(&__string_126));
+    if (((void *)lst__TGFG != (void *)NULL)) {
+      __tmp__DHFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__TGFG)->parent_linked_collection__LD.upper__MDD;
+      Self__2THG= 1;
+      while ((Self__2THG <= __tmp__DHFG)) {
+        if (((void *)item__MZND(lst__TGFG,Self__2THG) == (void *)NULL)) {
+          append__2JS(buf__QIDG,tok__QGFG);
         } else {
-          append__JOS(buf__TVCG,item__A1ND(lst__UXEG,Self__1IHG));
+          append__2JS(buf__QIDG,item__MZND(lst__TGFG,Self__2THG));
         };
-        Self__1IHG=(__INTEGER)(Self__1IHG +  1);
+        Self__2THG=(__INTEGER)(Self__2THG +  1);
       };
     };
   };
 }
 
-static void shorter_in__CWCG(__ITM_TYPE_SIMPLE *Self__DWCG,void *buf__EWCG)
+static void shorter_in__5IDG(__ITM_TYPE_SIMPLE *Self__AJDG,void *buf__BJDG)
 // ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__LZEG;
-  __INTEGER __tmp__4ZEG,Self__MJHG;
-  void *lst__OZEG;
-  tok__LZEG=Self__DWCG->name__SYP;
-  lst__OZEG=NULL;
+  void *tok__KIFG;
+  __INTEGER __tmp__3IFG,Self__NUHG;
+  void *lst__NIFG;
+  tok__KIFG=Self__AJDG->name__FUP;
+  lst__NIFG=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);
+    lst__NIFG=fast_reference_at__HFNE(short_dico__QD,(&__string_125));
+    if (((void *)lst__NIFG != (void *)NULL)) {
+      __tmp__3IFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__NIFG)->parent_linked_collection__LD.upper__MDD;
+      Self__NUHG= 1;
+      while ((Self__NUHG <= __tmp__3IFG)) {
+        if (((void *)item__MZND(lst__NIFG,Self__NUHG) == (void *)NULL)) {
+          append__2JS(buf__BJDG,tok__KIFG);
         } else {
-          append__JOS(buf__EWCG,item__A1ND(lst__OZEG,Self__MJHG));
+          append__2JS(buf__BJDG,item__MZND(lst__NIFG,Self__NUHG));
         };
-        Self__MJHG=(__INTEGER)(Self__MJHG +  1);
+        Self__NUHG=(__INTEGER)(Self__NUHG +  1);
       };
     };
   };
 }
 
-static void shorter_raw_in__BCFG(__ITM_TYPE_MULTI *Self__CCFG,void *buf__DCFG)
+static void shorter_raw_in__ARFG(__ITM_TYPE_MULTI *Self__BRFG,void *buf__CRFG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__JRFG,Self__XJGG;
+  void *__tmp__QRFG,*__tmp__TRFG;
+  __ITM_TYPE_STYLE *Self__1GGH,*Self__5GGH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__3GGH;
+  __tmp__JRFG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BRFG->list_type__1FP)->parent_arrayed_collection__EYC.upper__3DV -  1);
+  Self__XJGG= 0;
+  while ((Self__XJGG <= __tmp__JRFG)) {
+    __tmp__QRFG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BRFG->list_type__1FP)->parent_arrayed_collection__EYC.storage__EIV)[Self__XJGG];
+    switch (((struct ___OBJ *)__tmp__QRFG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__RCFG,buf__DCFG);
+      shorter_in__OIDG(__tmp__QRFG,buf__CRFG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__RCFG,buf__DCFG);
+      shorter_in__5IDG(__tmp__QRFG,buf__CRFG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__RCFG,buf__DCFG);
+      shorter_in__QJDG(__tmp__QRFG,buf__CRFG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__RCFG,buf__DCFG);
+      shorter_in__YKDG(__tmp__QRFG,buf__CRFG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__1GGH=((__ITM_TYPE_STYLE *)__tmp__QRFG);
+      if (((void *)Self__1GGH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__1GGH->style__OUP,buf__CRFG,(&__string_119));
+        add_last__UHT(buf__CRFG,' ');
       };
-      put__to__like__35EG(Self__I1FH->parent_itm_type_simple__JSN.name__SYP,buf__DCFG,(&__string_125));
+      put__to__like__2OFG(Self__1GGH->parent_itm_type_simple__2NN.name__FUP,buf__CRFG,(&__string_125));
     } break;
     };
-    add_last__BMT(buf__DCFG,',');
-    Self__W4FG=(__INTEGER)(Self__W4FG +  1);
+    add_last__UHT(buf__CRFG,',');
+    Self__XJGG=(__INTEGER)(Self__XJGG +  1);
   };
-  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) {
+  Self__3GGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__BRFG->list_type__1FP);
+  __tmp__TRFG=((void **)Self__3GGH->parent_arrayed_collection__EYC.storage__EIV)[Self__3GGH->parent_arrayed_collection__EYC.upper__3DV];
+  switch (((struct ___OBJ *)__tmp__TRFG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__RVCG(__tmp__UCFG,buf__DCFG);
+    shorter_in__OIDG(__tmp__TRFG,buf__CRFG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__CWCG(__tmp__UCFG,buf__DCFG);
+    shorter_in__5IDG(__tmp__TRFG,buf__CRFG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__TWCG(__tmp__UCFG,buf__DCFG);
+    shorter_in__QJDG(__tmp__TRFG,buf__CRFG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__1XCG(__tmp__UCFG,buf__DCFG);
+    shorter_in__YKDG(__tmp__TRFG,buf__CRFG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__5GGH=((__ITM_TYPE_STYLE *)__tmp__TRFG);
+    if (((void *)Self__5GGH->style__OUP != (void *)NULL)) {
+      put__to__like__2OFG(Self__5GGH->style__OUP,buf__CRFG,(&__string_119));
+      add_last__UHT(buf__CRFG,' ');
     };
-    put__to__like__35EG(Self__M1FH->parent_itm_type_simple__JSN.name__SYP,buf__DCFG,(&__string_125));
+    put__to__like__2OFG(Self__5GGH->parent_itm_type_simple__2NN.name__FUP,buf__CRFG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__TWCG(__ITM_TYPE_BLOCK *Self__UWCG,void *buf__VWCG)
+static void shorter_in__QJDG(__ITM_TYPE_BLOCK *Self__RJDG,void *buf__SJDG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__TJDG,*__tmp__HKDG;
+  void *__tmp__2JDG,*__tmp__GKDG,*__tmp__NKDG;
+  __ITM_TYPE_MULTI *Self__VGYG,*Self__XGYG;
+  __ITM_TYPE_STYLE *Self__BHGH,*Self__DHGH;
+  typ_mul__TJDG=NULL;
+  put__to__like__0JFG((&__string_299),buf__SJDG);
+  if (((void *)Self__RJDG->type_argument__RIN != (void *)NULL)) {
+    __tmp__2JDG=Self__RJDG->type_argument__RIN;
+    switch (((struct ___OBJ *)__tmp__2JDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__5WCG,buf__VWCG);
+      shorter_in__OIDG(__tmp__2JDG,buf__SJDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__5WCG,buf__VWCG);
+      shorter_in__5IDG(__tmp__2JDG,buf__SJDG);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__VGYG=((__ITM_TYPE_MULTI *)__tmp__2JDG);
+      add_last__UHT(buf__SJDG,'(');
+      shorter_raw_in__ARFG(Self__VGYG,buf__SJDG);
+      add_last__UHT(buf__SJDG,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__5WCG,buf__VWCG);
+      shorter_in__QJDG(__tmp__2JDG,buf__SJDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__5WCG,buf__VWCG);
+      shorter_in__YKDG(__tmp__2JDG,buf__SJDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__BHGH=((__ITM_TYPE_STYLE *)__tmp__2JDG);
+      if (((void *)Self__BHGH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__BHGH->style__OUP,buf__SJDG,(&__string_119));
+        add_last__UHT(buf__SJDG,' ');
       };
-      put__to__like__35EG(Self__O1FH->parent_itm_type_simple__JSN.name__SYP,buf__VWCG,(&__string_125));
+      put__to__like__2OFG(Self__BHGH->parent_itm_type_simple__2NN.name__FUP,buf__SJDG,(&__string_125));
     } break;
     };
-    add_last__BMT(buf__VWCG,';');
-    add_last__BMT(buf__VWCG,' ');
+    add_last__UHT(buf__SJDG,';');
+    add_last__UHT(buf__SJDG,' ');
   };
-  if (((void *)Self__UWCG->type_result__INN != (void *)NULL)) {
-    __tmp__JXCG=Self__UWCG->type_result__INN;
-    if (__tmp__JXCG==NULL) {
-      __tmp__KXCG=NULL;
+  if (((void *)Self__RJDG->type_result__1IN != (void *)NULL)) {
+    __tmp__GKDG=Self__RJDG->type_result__1IN;
+    if (__tmp__GKDG==NULL) {
+      __tmp__HKDG=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__JXCG)->__id) {
+      switch (((struct ___OBJ *)__tmp__GKDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__KXCG=NULL;
+        __tmp__HKDG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__KXCG=NULL;
+        __tmp__HKDG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__KXCG=((void *)__tmp__JXCG);
+        __tmp__HKDG=((void *)__tmp__GKDG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__KXCG=NULL;
+        __tmp__HKDG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__KXCG=NULL;
+        __tmp__HKDG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__KXCG=NULL;
+        __tmp__HKDG=NULL;
       } break;
       }
     };
-    typ_mul__WWCG=__tmp__KXCG;
-    if (((void *)__tmp__KXCG == (void *)NULL)) {
-      __tmp__QXCG=Self__UWCG->type_result__INN;
-      switch (((struct ___OBJ *)__tmp__QXCG)->__id) {
+    typ_mul__TJDG=__tmp__HKDG;
+    if (((void *)__tmp__HKDG == (void *)NULL)) {
+      __tmp__NKDG=Self__RJDG->type_result__1IN;
+      switch (((struct ___OBJ *)__tmp__NKDG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        shorter_in__RVCG(__tmp__QXCG,buf__VWCG);
+        shorter_in__OIDG(__tmp__NKDG,buf__SJDG);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        shorter_in__CWCG(__tmp__QXCG,buf__VWCG);
+        shorter_in__5IDG(__tmp__NKDG,buf__SJDG);
       } break;
       case __ITM_TYPE_MULTI__: {
-        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,')');
+        Self__XGYG=((__ITM_TYPE_MULTI *)__tmp__NKDG);
+        add_last__UHT(buf__SJDG,'(');
+        shorter_raw_in__ARFG(Self__XGYG,buf__SJDG);
+        add_last__UHT(buf__SJDG,')');
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__TWCG(__tmp__QXCG,buf__VWCG);
+        shorter_in__QJDG(__tmp__NKDG,buf__SJDG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__1XCG(__tmp__QXCG,buf__VWCG);
+        shorter_in__YKDG(__tmp__NKDG,buf__SJDG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__DHGH=((__ITM_TYPE_STYLE *)__tmp__NKDG);
+        if (((void *)Self__DHGH->style__OUP != (void *)NULL)) {
+          put__to__like__2OFG(Self__DHGH->style__OUP,buf__SJDG,(&__string_119));
+          add_last__UHT(buf__SJDG,' ');
         };
-        put__to__like__35EG(Self__Q1FH->parent_itm_type_simple__JSN.name__SYP,buf__VWCG,(&__string_125));
+        put__to__like__2OFG(Self__DHGH->parent_itm_type_simple__2NN.name__FUP,buf__SJDG,(&__string_125));
       } break;
       };
     } else {
-      shorter_raw_in__BCFG(__tmp__KXCG,buf__VWCG);
+      shorter_raw_in__ARFG(__tmp__HKDG,buf__SJDG);
     };
   };
-  put__to__like__10EG((&__string_298),buf__VWCG);
+  put__to__like__0JFG((&__string_300),buf__SJDG);
 }
 
-static void shorter_in__1XCG(__ITM_TYPE_GENERIC *Self__2XCG,void *buf__3XCG)
+static void shorter_in__YKDG(__ITM_TYPE_GENERIC *Self__ZKDG,void *buf__0KDG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__PLDG,Self__5NFG;
+  void *__tmp__WLDG,*__tmp__ZLDG;
+  __ITM_TYPE_STYLE *Self__IHGH,*Self__1LDG;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__KHGH;
+  if (((void *)Self__ZKDG->parent_itm_type_style__3NN.style__OUP != (void *)NULL)) {
+    put__to__like__NMFG(Self__ZKDG->parent_itm_type_style__3NN.style__OUP,buf__0KDG,(&__string_119));
+    add_last__UHT(buf__0KDG,' ');
+  };
+  put__to__like__NMFG(Self__ZKDG->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP,buf__0KDG,(&__string_125));
+  add_last__UHT(buf__0KDG,'(');
+  __tmp__PLDG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZKDG->list_type__YUP)->parent_arrayed_collection__EYC.upper__3DV -  1);
+  Self__5NFG= 0;
+  while ((Self__5NFG <= __tmp__PLDG)) {
+    __tmp__WLDG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZKDG->list_type__YUP)->parent_arrayed_collection__EYC.storage__EIV)[Self__5NFG];
+    switch (((struct ___OBJ *)__tmp__WLDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__RVCG(__tmp__ZYCG,buf__3XCG);
+      shorter_in__OIDG(__tmp__WLDG,buf__0KDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__CWCG(__tmp__ZYCG,buf__3XCG);
+      shorter_in__5IDG(__tmp__WLDG,buf__0KDG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__TWCG(__tmp__ZYCG,buf__3XCG);
+      shorter_in__QJDG(__tmp__WLDG,buf__0KDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__1XCG(__tmp__ZYCG,buf__3XCG);
+      shorter_in__YKDG(__tmp__WLDG,buf__0KDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__IHGH=((__ITM_TYPE_STYLE *)__tmp__WLDG);
+      if (((void *)Self__IHGH->style__OUP != (void *)NULL)) {
+        put__to__like__2OFG(Self__IHGH->style__OUP,buf__0KDG,(&__string_119));
+        add_last__UHT(buf__0KDG,' ');
       };
-      put__to__like__35EG(Self__V1FH->parent_itm_type_simple__JSN.name__SYP,buf__3XCG,(&__string_125));
+      put__to__like__2OFG(Self__IHGH->parent_itm_type_simple__2NN.name__FUP,buf__0KDG,(&__string_125));
     } break;
     };
-    add_last__BMT(buf__3XCG,',');
-    Self__A5EG=(__INTEGER)(Self__A5EG +  1);
+    add_last__UHT(buf__0KDG,',');
+    Self__5NFG=(__INTEGER)(Self__5NFG +  1);
   };
-  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) {
+  Self__KHGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__ZKDG->list_type__YUP);
+  __tmp__ZLDG=((void **)Self__KHGH->parent_arrayed_collection__EYC.storage__EIV)[Self__KHGH->parent_arrayed_collection__EYC.upper__3DV];
+  switch (((struct ___OBJ *)__tmp__ZLDG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__RVCG(__tmp__2YCG,buf__3XCG);
+    shorter_in__OIDG(__tmp__ZLDG,buf__0KDG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__CWCG(__tmp__2YCG,buf__3XCG);
+    shorter_in__5IDG(__tmp__ZLDG,buf__0KDG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__TWCG(__tmp__2YCG,buf__3XCG);
+    shorter_in__QJDG(__tmp__ZLDG,buf__0KDG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__1XCG(__tmp__2YCG,buf__3XCG);
+    shorter_in__YKDG(__tmp__ZLDG,buf__0KDG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__1LDG=((__ITM_TYPE_STYLE *)__tmp__ZLDG);
+    if (((void *)Self__1LDG->style__OUP != (void *)NULL)) {
+      put__to__like__2OFG(Self__1LDG->style__OUP,buf__0KDG,(&__string_119));
+      add_last__UHT(buf__0KDG,' ');
     };
-    put__to__like__35EG(Self__4YCG->parent_itm_type_simple__JSN.name__SYP,buf__3XCG,(&__string_125));
+    put__to__like__2OFG(Self__1LDG->parent_itm_type_simple__2NN.name__FUP,buf__0KDG,(&__string_125));
   } break;
   };
-  add_last__BMT(buf__3XCG,')');
+  add_last__UHT(buf__0KDG,')');
 }
 
-static void put__to__like__35EG(void *tok__55EG,void *buf__AAFG,void *key__BAFG)
+static void put__to__like__2OFG(void *tok__4OFG,void *buf__5OFG,void *key__APFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__RPFG,Self__AWHG;
+  void *lst__BPFG;
+  lst__BPFG=NULL;
+  if (((void *)key__APFG != (void *)NULL)) {
+    lst__BPFG=fast_reference_at__HFNE(short_dico__QD,key__APFG);
+    if (((void *)lst__BPFG != (void *)NULL)) {
+      __tmp__RPFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__BPFG)->parent_linked_collection__LD.upper__MDD;
+      Self__AWHG= 1;
+      while ((Self__AWHG <= __tmp__RPFG)) {
+        if (((void *)item__MZND(lst__BPFG,Self__AWHG) == (void *)NULL)) {
+          append__2JS(buf__5OFG,tok__4OFG);
         } else {
-          append__JOS(buf__AAFG,item__A1ND(lst__CAFG,Self__5KHG));
+          append__2JS(buf__5OFG,item__MZND(lst__BPFG,Self__AWHG));
         };
-        Self__5KHG=(__INTEGER)(Self__5KHG +  1);
+        Self__AWHG=(__INTEGER)(Self__AWHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__J2CG(void *tok__L2CG,void *buf__M2CG,void *key__N2CG)
+static void put__to__like__GPDG(void *tok__IPDG,void *buf__JPDG,void *key__KPDG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__1PDG,Self__HRHG;
+  void *lst__LPDG;
+  lst__LPDG=NULL;
+  if (((void *)key__KPDG != (void *)NULL)) {
+    lst__LPDG=fast_reference_at__HFNE(short_dico__QD,key__KPDG);
+    if (((void *)lst__LPDG != (void *)NULL)) {
+      __tmp__1PDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__LPDG)->parent_linked_collection__LD.upper__MDD;
+      Self__HRHG= 1;
+      while ((Self__HRHG <= __tmp__1PDG)) {
+        if (((void *)item__MZND(lst__LPDG,Self__HRHG) == (void *)NULL)) {
+          append__2JS(buf__JPDG,tok__IPDG);
         } else {
-          append__JOS(buf__M2CG,item__A1ND(lst__O2CG,Self__GGHG));
+          append__2JS(buf__JPDG,item__MZND(lst__LPDG,Self__HRHG));
         };
-        Self__GGHG=(__INTEGER)(Self__GGHG +  1);
+        Self__HRHG=(__INTEGER)(Self__HRHG +  1);
       };
     };
   };
 }
 
-static void set_path__WNT(__DIRECTORY_UNIX *Self__XNT,void *n__YNT)
+static void set_path__JJT(__DIRECTORY_UNIX *Self__KJT,void *n__LJT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__B3HH,*Self__QAEH,*Self__TAEH,*result__J3HH;
+  __STRING_CONSTANT *Self__MNSG;
+  __POINTER ptr__C3HH,ptr_table__3NJH,next__2NJH,result__4NJH;
+  __POINTER ptr_table__COJH,next__BOJH,result__DOJH,ptr__K3HH;
+  __POINTER ptr_table__HOJH,next__GOJH,result__IOJH,ptr_table__MOJH;
+  __POINTER next__LOJH,result__NOJH,ptr__3CAH;
+  __INTEGER typ_id__D3HH,c__SAEH,Self__DIGH,idx__XMHH,idx__MJT;
+  __INTEGER typ_id__L3HH,__tmp__CKT;
+  __UINTEGER_32 sz__E3HH,a__F3HH,new_size__G3HH,t__H3HH,a__I3HH;
+  __UINTEGER_32 new_size__FOJH,lab_type__EOJH,sz__M3HH,a__N3HH;
+  __UINTEGER_32 new_size__O3HH,t__P3HH,a__Q3HH,new_size__POJH;
+  __UINTEGER_32 lab_type__OOJH;
+  void *__tmp__0JT;
+  __CHARACTER *Self__EIGH,*model__FIGH,*Self__ZMHH,*__tmp__4JT;
+  result__B3HH=NULL;
+  ptr__C3HH=((__POINTER )(NULL));
+  typ_id__D3HH= 0;
+  sz__E3HH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__E3HH ==  0)) {
+    result__B3HH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__D3HH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E3HH);
+    if ((typ_id__D3HH == (__INTEGER)(-  1))) {
+      a__F3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__G3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__E3HH + a__F3HH) & (__UINTEGER_32)(~ a__F3HH));
+      ptr_table__3NJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G3HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2NJH=((__POINTER )(NULL));
+      result__4NJH=((__POINTER *)ptr_table__3NJH)[ 0];
+      if ((result__4NJH == (void *)NULL)) {
+        result__4NJH=new_lab__QOJ(new_size__G3HH);
+        next__2NJH=(void *)((unsigned long)result__4NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3HH)));
+        ((__POINTER *)next__2NJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3NJH)[ 0]=next__2NJH;
+      } else {
+        next__2NJH=((__POINTER *)result__4NJH)[ 0];
+        if ((next__2NJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4NJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G3HH <<  1)) <=  4096)) {
+            next__2NJH=(void *)((unsigned long)result__4NJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G3HH)));
+          } else {
+            next__2NJH=new_lab__QOJ(new_size__G3HH);
+          };
+          ((__POINTER *)next__2NJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3NJH)[ 0]=next__2NJH;
+        } else {
+          ((__POINTER *)result__4NJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2NJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4NJH=next__2NJH;
+        };
+      };
+      ptr__C3HH=result__4NJH;
+    } else {
+      t__H3HH=((__UINTEGER_32 )typ_id__D3HH);
+      a__I3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E3HH + a__I3HH) & (__UINTEGER_32)(~ a__I3HH));
+      ptr_table__COJH=((__POINTER )(&(table_type[(t__H3HH)])));
+      lab_type__EOJH=(__UINTEGER_32)(t__H3HH |  1);
+      next__BOJH=((__POINTER )(NULL));
+      result__DOJH=((__POINTER *)ptr_table__COJH)[ 0];
+      if ((result__DOJH == (void *)NULL)) {
+        result__DOJH=new_lab__QOJ(lab_type__EOJH);
+        next__BOJH=(void *)((unsigned long)result__DOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOJH)));
+        ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FOJH <<  1)) <=  4096)) {
+            next__BOJH=(void *)((unsigned long)result__DOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FOJH)));
+          } else {
+            next__BOJH=new_lab__QOJ(lab_type__EOJH);
+          };
+          ((__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__C3HH=result__DOJH;
+    };
+    result__B3HH=((__STRING_CONSTANT *)ptr__C3HH);
+    *(result__B3HH) = *(STRING_CONSTANT__);
+  };
+  Self__QAEH=((__STRING_CONSTANT *)result__B3HH);
+  c__SAEH=((__STRING *)n__LJT)->count__EGC;
+  if ((c__SAEH !=  0)) {
+    Self__QAEH->storage__QMO=create__UHEB((__INTEGER)(c__SAEH +  1));
+    Self__EIGH=((__CHARACTER *)Self__QAEH->storage__QMO);
+    model__FIGH=((__STRING *)n__LJT)->storage__23R;
+    Self__DIGH=(__INTEGER)(c__SAEH -  1);
+    while ((Self__DIGH >=  0)) {
+      Self__EIGH[Self__DIGH]=((__CHARACTER *)model__FIGH)[Self__DIGH];
+      Self__DIGH=(__INTEGER)(Self__DIGH -  1);
+    };
+    ((__CHARACTER *)Self__QAEH->storage__QMO)[c__SAEH]='\0';
+    Self__QAEH->count__DD=c__SAEH;
+  };
+  Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.path__BD=result__B3HH;
+  Self__TAEH=((__STRING_CONSTANT *)Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  Self__ZMHH=((__CHARACTER *)Self__TAEH->storage__QMO);
+  idx__XMHH=(__INTEGER)(Self__TAEH->count__DD -  1);
+  while ((! ((idx__XMHH <  0) || ('/' == Self__ZMHH[idx__XMHH])))) {
+    idx__XMHH=(__INTEGER)(idx__XMHH -  1);
+  };
+  idx__MJT=(__INTEGER)( 1 + idx__XMHH);
+  if (((void *)Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.name__QJT == (void *)NULL)) {
+    result__J3HH=NULL;
+    ptr__K3HH=((__POINTER )(NULL));
+    typ_id__L3HH= 0;
+    sz__M3HH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__M3HH ==  0)) {
+      result__J3HH=STRING_CONSTANT__;
+    } else {
+      typ_id__L3HH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__M3HH);
+      if ((typ_id__L3HH == (__INTEGER)(-  1))) {
+        a__N3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__O3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__M3HH + a__N3HH) & (__UINTEGER_32)(~ a__N3HH));
+        ptr_table__HOJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__O3HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__GOJH=((__POINTER )(NULL));
+        result__IOJH=((__POINTER *)ptr_table__HOJH)[ 0];
+        if ((result__IOJH == (void *)NULL)) {
+          result__IOJH=new_lab__QOJ(new_size__O3HH);
+          next__GOJH=(void *)((unsigned long)result__IOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O3HH)));
+          ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O3HH <<  1)) <=  4096)) {
+              next__GOJH=(void *)((unsigned long)result__IOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O3HH)));
             } else {
-              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)));
+              next__GOJH=new_lab__QOJ(new_size__O3HH);
+            };
+            ((__POINTER *)next__GOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HOJH)[ 0]=next__GOJH;
+          } else {
+            ((__POINTER *)result__IOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IOJH=next__GOJH;
+          };
+        };
+        ptr__K3HH=result__IOJH;
+      } else {
+        t__P3HH=((__UINTEGER_32 )typ_id__L3HH);
+        a__Q3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__POJH=(__UINTEGER_32)((__UINTEGER_32)(sz__M3HH + a__Q3HH) & (__UINTEGER_32)(~ a__Q3HH));
+        ptr_table__MOJH=((__POINTER )(&(table_type[(t__P3HH)])));
+        lab_type__OOJH=(__UINTEGER_32)(t__P3HH |  1);
+        next__LOJH=((__POINTER )(NULL));
+        result__NOJH=((__POINTER *)ptr_table__MOJH)[ 0];
+        if ((result__NOJH == (void *)NULL)) {
+          result__NOJH=new_lab__QOJ(lab_type__OOJH);
+          next__LOJH=(void *)((unsigned long)result__NOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POJH)));
+          ((__POINTER *)next__LOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MOJH)[ 0]=next__LOJH;
+        } else {
+          next__LOJH=((__POINTER *)result__NOJH)[ 0];
+          if ((next__LOJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NOJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__POJH <<  1)) <=  4096)) {
+              next__LOJH=(void *)((unsigned long)result__NOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__POJH)));
             } else {
-              next__2DJH=new_lab__URJ(lab_type__5DJH);
+              next__LOJH=new_lab__QOJ(lab_type__OOJH);
             };
-            ((__POINTER *)next__2DJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__3DJH)[ 0]=next__2DJH;
+            ((__POINTER *)next__LOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MOJH)[ 0]=next__LOJH;
           } else {
-            ((__POINTER *)result__4DJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__4DJH=next__2DJH;
+            ((__POINTER *)result__NOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NOJH=next__LOJH;
           };
         };
-        ptr__GSHH=result__4DJH;
+        ptr__K3HH=result__NOJH;
       };
-      result__FSHH=((__STRING_CONSTANT *)ptr__GSHH);
-      *(result__FSHH) = *(STRING_CONSTANT__);
+      result__J3HH=((__STRING_CONSTANT *)ptr__K3HH);
+      *(result__J3HH) = *(STRING_CONSTANT__);
     };
-    Self__XNT->parent_entry_unix__BFD.parent_entry__AFD.name__3NT=result__FSHH;
+    Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.name__QJT=result__J3HH;
   };
-  __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;
+  __tmp__0JT=Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.name__QJT;
+  ptr__3CAH=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->storage__QMO));
+  ptr__3CAH=(void *)((unsigned long)ptr__3CAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__MJT)));
+  __tmp__4JT=((__CHARACTER *)ptr__3CAH);
+  __tmp__CKT=(__INTEGER)(((__STRING_CONSTANT *)Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD - idx__MJT);
+  Self__MNSG=((__STRING_CONSTANT *)__tmp__0JT);
+  Self__MNSG->storage__QMO=__tmp__4JT;
+  Self__MNSG->count__DD=__tmp__CKT;
 }
 
-static void set_path__ROT(__FILE_UNIX *Self__SOT,void *n__TOT)
+static void set_path__EKT(__FILE_UNIX *Self__FKT,void *n__GKT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__R3HH,*Self__YAEH,*Self__1AEH,*result__Z3HH;
+  __STRING_CONSTANT *Self__RNSG;
+  __POINTER ptr__S3HH,ptr_table__ROJH,next__QOJH,result__SOJH;
+  __POINTER ptr_table__WOJH,next__VOJH,result__XOJH,ptr__03HH;
+  __POINTER ptr_table__1OJH,next__0OJH,result__2OJH,ptr_table__APJH;
+  __POINTER next__5OJH,result__BPJH,ptr__AKY;
+  __INTEGER typ_id__T3HH,c__0AEH,Self__OIGH,idx__2MHH,idx__HKT;
+  __INTEGER typ_id__13HH,__tmp__2KT;
+  __UINTEGER_32 sz__U3HH,a__V3HH,new_size__W3HH,t__X3HH,a__Y3HH;
+  __UINTEGER_32 new_size__ZOJH,lab_type__YOJH,sz__23HH,a__33HH;
+  __UINTEGER_32 new_size__43HH,t__53HH,a__A4HH,new_size__DPJH;
+  __UINTEGER_32 lab_type__CPJH;
+  void *__tmp__UKT;
+  __CHARACTER *Self__PIGH,*model__QIGH,*Self__4MHH,*__tmp__YKT;
+  result__R3HH=NULL;
+  ptr__S3HH=((__POINTER )(NULL));
+  typ_id__T3HH= 0;
+  sz__U3HH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__U3HH ==  0)) {
+    result__R3HH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__T3HH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U3HH);
+    if ((typ_id__T3HH == (__INTEGER)(-  1))) {
+      a__V3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__U3HH + a__V3HH) & (__UINTEGER_32)(~ a__V3HH));
+      ptr_table__ROJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__W3HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__QOJH=((__POINTER )(NULL));
+      result__SOJH=((__POINTER *)ptr_table__ROJH)[ 0];
+      if ((result__SOJH == (void *)NULL)) {
+        result__SOJH=new_lab__QOJ(new_size__W3HH);
+        next__QOJH=(void *)((unsigned long)result__SOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3HH)));
+        ((__POINTER *)next__QOJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ROJH)[ 0]=next__QOJH;
+      } else {
+        next__QOJH=((__POINTER *)result__SOJH)[ 0];
+        if ((next__QOJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SOJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__W3HH <<  1)) <=  4096)) {
+            next__QOJH=(void *)((unsigned long)result__SOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W3HH)));
+          } else {
+            next__QOJH=new_lab__QOJ(new_size__W3HH);
+          };
+          ((__POINTER *)next__QOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ROJH)[ 0]=next__QOJH;
+        } else {
+          ((__POINTER *)result__SOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SOJH=next__QOJH;
+        };
+      };
+      ptr__S3HH=result__SOJH;
+    } else {
+      t__X3HH=((__UINTEGER_32 )typ_id__T3HH);
+      a__Y3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__U3HH + a__Y3HH) & (__UINTEGER_32)(~ a__Y3HH));
+      ptr_table__WOJH=((__POINTER )(&(table_type[(t__X3HH)])));
+      lab_type__YOJH=(__UINTEGER_32)(t__X3HH |  1);
+      next__VOJH=((__POINTER )(NULL));
+      result__XOJH=((__POINTER *)ptr_table__WOJH)[ 0];
+      if ((result__XOJH == (void *)NULL)) {
+        result__XOJH=new_lab__QOJ(lab_type__YOJH);
+        next__VOJH=(void *)((unsigned long)result__XOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOJH)));
+        ((__POINTER *)next__VOJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WOJH)[ 0]=next__VOJH;
+      } else {
+        next__VOJH=((__POINTER *)result__XOJH)[ 0];
+        if ((next__VOJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XOJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZOJH <<  1)) <=  4096)) {
+            next__VOJH=(void *)((unsigned long)result__XOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZOJH)));
+          } else {
+            next__VOJH=new_lab__QOJ(lab_type__YOJH);
+          };
+          ((__POINTER *)next__VOJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WOJH)[ 0]=next__VOJH;
+        } else {
+          ((__POINTER *)result__XOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XOJH=next__VOJH;
+        };
+      };
+      ptr__S3HH=result__XOJH;
+    };
+    result__R3HH=((__STRING_CONSTANT *)ptr__S3HH);
+    *(result__R3HH) = *(STRING_CONSTANT__);
+  };
+  Self__YAEH=((__STRING_CONSTANT *)result__R3HH);
+  c__0AEH=((__STRING *)n__GKT)->count__EGC;
+  if ((c__0AEH !=  0)) {
+    Self__YAEH->storage__QMO=create__UHEB((__INTEGER)(c__0AEH +  1));
+    Self__PIGH=((__CHARACTER *)Self__YAEH->storage__QMO);
+    model__QIGH=((__STRING *)n__GKT)->storage__23R;
+    Self__OIGH=(__INTEGER)(c__0AEH -  1);
+    while ((Self__OIGH >=  0)) {
+      Self__PIGH[Self__OIGH]=((__CHARACTER *)model__QIGH)[Self__OIGH];
+      Self__OIGH=(__INTEGER)(Self__OIGH -  1);
+    };
+    ((__CHARACTER *)Self__YAEH->storage__QMO)[c__0AEH]='\0';
+    Self__YAEH->count__DD=c__0AEH;
+  };
+  Self__FKT->parent_entry_unix__05E.parent_entry__FFD.path__BD=result__R3HH;
+  Self__1AEH=((__STRING_CONSTANT *)Self__FKT->parent_entry_unix__05E.parent_entry__FFD.path__BD);
+  Self__4MHH=((__CHARACTER *)Self__1AEH->storage__QMO);
+  idx__2MHH=(__INTEGER)(Self__1AEH->count__DD -  1);
+  while ((! ((idx__2MHH <  0) || ('/' == Self__4MHH[idx__2MHH])))) {
+    idx__2MHH=(__INTEGER)(idx__2MHH -  1);
+  };
+  idx__HKT=(__INTEGER)( 1 + idx__2MHH);
+  if (((void *)Self__FKT->parent_entry_unix__05E.parent_entry__FFD.name__QJT == (void *)NULL)) {
+    result__Z3HH=NULL;
+    ptr__03HH=((__POINTER )(NULL));
+    typ_id__13HH= 0;
+    sz__23HH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__23HH ==  0)) {
+      result__Z3HH=STRING_CONSTANT__;
+    } else {
+      typ_id__13HH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__23HH);
+      if ((typ_id__13HH == (__INTEGER)(-  1))) {
+        a__33HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__43HH=(__UINTEGER_32)((__UINTEGER_32)(sz__23HH + a__33HH) & (__UINTEGER_32)(~ a__33HH));
+        ptr_table__1OJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__43HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__0OJH=((__POINTER )(NULL));
+        result__2OJH=((__POINTER *)ptr_table__1OJH)[ 0];
+        if ((result__2OJH == (void *)NULL)) {
+          result__2OJH=new_lab__QOJ(new_size__43HH);
+          next__0OJH=(void *)((unsigned long)result__2OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43HH)));
+          ((__POINTER *)next__0OJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1OJH)[ 0]=next__0OJH;
+        } else {
+          next__0OJH=((__POINTER *)result__2OJH)[ 0];
+          if ((next__0OJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2OJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__43HH <<  1)) <=  4096)) {
+              next__0OJH=(void *)((unsigned long)result__2OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__43HH)));
             } else {
-              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)));
+              next__0OJH=new_lab__QOJ(new_size__43HH);
+            };
+            ((__POINTER *)next__0OJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__1OJH)[ 0]=next__0OJH;
+          } else {
+            ((__POINTER *)result__2OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__2OJH=next__0OJH;
+          };
+        };
+        ptr__03HH=result__2OJH;
+      } else {
+        t__53HH=((__UINTEGER_32 )typ_id__13HH);
+        a__A4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__DPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__23HH + a__A4HH) & (__UINTEGER_32)(~ a__A4HH));
+        ptr_table__APJH=((__POINTER )(&(table_type[(t__53HH)])));
+        lab_type__CPJH=(__UINTEGER_32)(t__53HH |  1);
+        next__5OJH=((__POINTER )(NULL));
+        result__BPJH=((__POINTER *)ptr_table__APJH)[ 0];
+        if ((result__BPJH == (void *)NULL)) {
+          result__BPJH=new_lab__QOJ(lab_type__CPJH);
+          next__5OJH=(void *)((unsigned long)result__BPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPJH)));
+          ((__POINTER *)next__5OJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__APJH)[ 0]=next__5OJH;
+        } else {
+          next__5OJH=((__POINTER *)result__BPJH)[ 0];
+          if ((next__5OJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BPJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DPJH <<  1)) <=  4096)) {
+              next__5OJH=(void *)((unsigned long)result__BPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DPJH)));
             } else {
-              next__QEJH=new_lab__URJ(lab_type__TEJH);
+              next__5OJH=new_lab__QOJ(lab_type__CPJH);
             };
-            ((__POINTER *)next__QEJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__REJH)[ 0]=next__QEJH;
+            ((__POINTER *)next__5OJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__APJH)[ 0]=next__5OJH;
           } else {
-            ((__POINTER *)result__SEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SEJH=next__QEJH;
+            ((__POINTER *)result__BPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BPJH=next__5OJH;
           };
         };
-        ptr__WSHH=result__SEJH;
+        ptr__03HH=result__BPJH;
       };
-      result__VSHH=((__STRING_CONSTANT *)ptr__WSHH);
-      *(result__VSHH) = *(STRING_CONSTANT__);
+      result__Z3HH=((__STRING_CONSTANT *)ptr__03HH);
+      *(result__Z3HH) = *(STRING_CONSTANT__);
     };
-    Self__SOT->parent_entry_unix__EDF.parent_entry__AFD.name__3NT=result__VSHH;
+    Self__FKT->parent_entry_unix__05E.parent_entry__FFD.name__QJT=result__Z3HH;
   };
-  __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;
+  __tmp__UKT=Self__FKT->parent_entry_unix__05E.parent_entry__FFD.name__QJT;
+  ptr__AKY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__FKT->parent_entry_unix__05E.parent_entry__FFD.path__BD)->storage__QMO));
+  ptr__AKY=(void *)((unsigned long)ptr__AKY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__HKT)));
+  __tmp__YKT=((__CHARACTER *)ptr__AKY);
+  __tmp__2KT=(__INTEGER)(((__STRING_CONSTANT *)Self__FKT->parent_entry_unix__05E.parent_entry__FFD.path__BD)->count__DD - idx__HKT);
+  Self__RNSG=((__STRING_CONSTANT *)__tmp__UKT);
+  Self__RNSG->storage__QMO=__tmp__YKT;
+  Self__RNSG->count__DD=__tmp__2KT;
 }
 
-static void insert_string__to__CYU(__STRING *Self__DYU,void *s__EYU,__INTEGER i__FYU)
+static void insert_string__to__NTU(__STRING *Self__OTU,void *s__PTU,__INTEGER i__QTU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER j__RTU,__tmp__EUU,dest__DNHH,src_capacity__HNHH,i2__CNHH;
+  __INTEGER i1__ENHH;
+  __CHARACTER *__tmp__UUU,*__tmp__VUU,*Self__FNHH,*src__GNHH;
+  j__RTU=Self__OTU->count__EGC;
+  if (((struct ___OBJ *)s__PTU)->__id==__STRING_CONSTANT__) {
+    __tmp__EUU=((__STRING_CONSTANT *)s__PTU)->count__DD;
   } else {
-    __tmp__ZYU=((__STRING *)s__EYU)->count__4FC;
+    __tmp__EUU=((__STRING *)s__PTU)->count__EGC;
   };
-  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);
+  resize__LTZ(Self__OTU,(__INTEGER)(j__RTU + __tmp__EUU));
+  if ((i__QTU <= j__RTU)) {
+    move__to__by__YTCC(Self__OTU->storage__23R,(__INTEGER)(i__QTU -  1),(__INTEGER)(j__RTU -  1),__tmp__EUU);
   };
-  __tmp__JZU=Self__DYU->storage__JCS;
-  if (((struct ___OBJ *)s__EYU)->__id==__STRING_CONSTANT__) {
-    __tmp__KZU=((__STRING_CONSTANT *)s__EYU)->storage__3QO;
+  __tmp__UUU=Self__OTU->storage__23R;
+  if (((struct ___OBJ *)s__PTU)->__id==__STRING_CONSTANT__) {
+    __tmp__VUU=((__STRING_CONSTANT *)s__PTU)->storage__QMO;
   } else {
-    __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);
+    __tmp__VUU=((__STRING *)s__PTU)->storage__23R;
+  };
+  Self__FNHH=((__CHARACTER *)__tmp__UUU);
+  src__GNHH=__tmp__VUU;
+  dest__DNHH=(__INTEGER)(i__QTU -  1);
+  src_capacity__HNHH=__tmp__EUU;
+  i2__CNHH= 0;
+  i1__ENHH=dest__DNHH;
+  while ((i2__CNHH != src_capacity__HNHH)) {
+    Self__FNHH[i1__ENHH]=((__CHARACTER *)src__GNHH)[i2__CNHH];
+    i2__CNHH=(__INTEGER)(i2__CNHH +  1);
+    i1__ENHH=(__INTEGER)(i1__ENHH +  1);
   };
 }
 
-static void read_escape_character__YLKF()
+static void read_escape_character__JWKF()
 // () VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER val__MWKF;
+  __STRING *Self__YIGH;
+  __POSITION pos__WPYG,pos__DQYG,pos__QQYG,pos__SQYG;
+  __CHARACTER result__EGAH,result__JGAH,result__TGAH,result__YGAH;
+  __CHARACTER result__3GAH,result__GHAH,result__PHAH,result__UHAH;
+  __CHARACTER result__ZHAH,result__4HAH,result__DIAH,result__IIAH;
+  __CHARACTER result__NIAH,result__SIAH,result__XIAH,result__2IAH;
+  __CHARACTER result__BJAH,result__GJAH,result__LJAH,result__QJAH;
+  __CHARACTER result__YJAH,result__3JAH;
+  __BOOLEAN __tmp__FXKF,__tmp__ZXKF,__tmp__MYKF,__tmp__B1KF,__tmp__C1KF;
+  __BOOLEAN __tmp__D1KF,__tmp__E1KF,__tmp__F1KF,__tmp__G1KF,__tmp__H1KF;
+  __BOOLEAN __tmp__I1KF,__tmp__J1KF,__tmp__K1KF,__tmp__V1KF;
+  val__MWKF= 0;
+  result__EGAH='\0';
+  if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+    result__EGAH=((__CHARACTER )(( 0)));
   } else {
-    result__BZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+    result__EGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
   };
-  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:
+  if ((((((((result__EGAH == ' ') || (result__EGAH == '\t')) || (result__EGAH == '\n')) || (result__EGAH == '\r')) || (result__EGAH == '\0')) || (result__EGAH == '\f')) || (result__EGAH == '\v'))) {
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    until_do__KCNF:
     {
-      result__GZ5G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__GZ5G=((__CHARACTER )(( 0)));
+      result__JGAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__JGAH=((__CHARACTER )(( 0)));
       } else {
-        result__GZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__JGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__GZ5G == ((__CHARACTER )(( 0))))) {
-        __tmp__UMKF=TRUE__;
+      if ((result__JGAH == ((__CHARACTER )(( 0))))) {
+        __tmp__FXKF=TRUE__;
       } else {
-        result__QZ5G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__QZ5G=((__CHARACTER )(( 0)));
+        result__TGAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__TGAH=((__CHARACTER )(( 0)));
         } else {
-          result__QZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__TGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__UMKF=(! (((((((result__QZ5G == ' ') || (result__QZ5G == '\t')) || (result__QZ5G == '\n')) || (result__QZ5G == '\r')) || (result__QZ5G == '\0')) || (result__QZ5G == '\f')) || (result__QZ5G == '\v')));
+        __tmp__FXKF=(! (((((((result__TGAH == ' ') || (result__TGAH == '\t')) || (result__TGAH == '\n')) || (result__TGAH == '\r')) || (result__TGAH == '\0')) || (result__TGAH == '\f')) || (result__TGAH == '\v')));
       };
-      if ((! __tmp__UMKF)) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto until_do__KXMF;
+      if ((! __tmp__FXKF)) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto until_do__KCNF;
       };
     };
-    result__VZ5G='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__VZ5G=((__CHARACTER )(( 0)));
+    result__YGAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__YGAH=((__CHARACTER )(( 0)));
     } else {
-      result__VZ5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__YGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__VZ5G == '\\')) {
-      Self__F3FH=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__F3FH->count__4FC)) {
-        Self__F3FH->count__4FC= 0;
+    if ((result__YGAH == '\\')) {
+      Self__YIGH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__YIGH->count__EGC)) {
+        Self__YIGH->count__EGC= 0;
       } else {
-        Self__F3FH->count__4FC=(__INTEGER)(Self__F3FH->count__4FC -  1);
+        Self__YIGH->count__EGC=(__INTEGER)(Self__YIGH->count__EGC -  1);
       };
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      __tmp__INKF=TRUE__;
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      __tmp__ZXKF=TRUE__;
     } else {
-      __tmp__INKF=FALSE__;
+      __tmp__ZXKF=FALSE__;
     };
-    if ((! __tmp__INKF)) {
-      result__0Z5G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__0Z5G=((__CHARACTER )(( 0)));
+    if ((! __tmp__ZXKF)) {
+      result__3GAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__3GAH=((__CHARACTER )(( 0)));
       } else {
-        result__0Z5G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__3GAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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)) {
+      if ((result__3GAH != ((__CHARACTER )(( 0))))) {
+        pos__WPYG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_301));
+        put_position__CMG(pos__WPYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__1NKF=TRUE__;
+    __tmp__MYKF=TRUE__;
   } else {
-    __tmp__1NKF=FALSE__;
+    __tmp__MYKF=FALSE__;
   };
-  if ((! __tmp__1NKF)) {
-    result__D05G='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__D05G=((__CHARACTER )(( 0)));
+  if ((! __tmp__MYKF)) {
+    result__GHAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__GHAH=((__CHARACTER )(( 0)));
     } else {
-      result__D05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__GHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__D05G != ((__CHARACTER )(( 0))))) {
-      result__M05G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__M05G=((__CHARACTER )(( 0)));
+    if ((result__GHAH != ((__CHARACTER )(( 0))))) {
+      result__PHAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__PHAH=((__CHARACTER )(( 0)));
       } else {
-        result__M05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__PHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__M05G == 'a')) {
-        __tmp__QQKF=TRUE__;
+      if ((result__PHAH == 'a')) {
+        __tmp__B1KF=TRUE__;
       } else {
-        result__R05G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__R05G=((__CHARACTER )(( 0)));
+        result__UHAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__UHAH=((__CHARACTER )(( 0)));
         } else {
-          result__R05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__UHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__QQKF=(result__R05G == 'b');
+        __tmp__B1KF=(result__UHAH == 'b');
       };
-      if (__tmp__QQKF) {
-        __tmp__RQKF=TRUE__;
+      if (__tmp__B1KF) {
+        __tmp__C1KF=TRUE__;
       } else {
-        result__W05G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__W05G=((__CHARACTER )(( 0)));
+        result__ZHAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__ZHAH=((__CHARACTER )(( 0)));
         } else {
-          result__W05G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__ZHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__RQKF=(result__W05G == 'f');
+        __tmp__C1KF=(result__ZHAH == 'f');
       };
-      if (__tmp__RQKF) {
-        __tmp__SQKF=TRUE__;
+      if (__tmp__C1KF) {
+        __tmp__D1KF=TRUE__;
       } else {
-        result__105G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__105G=((__CHARACTER )(( 0)));
+        result__4HAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__4HAH=((__CHARACTER )(( 0)));
         } else {
-          result__105G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__4HAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__SQKF=(result__105G == 'n');
+        __tmp__D1KF=(result__4HAH == 'n');
       };
-      if (__tmp__SQKF) {
-        __tmp__TQKF=TRUE__;
+      if (__tmp__D1KF) {
+        __tmp__E1KF=TRUE__;
       } else {
-        result__A15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__A15G=((__CHARACTER )(( 0)));
+        result__DIAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__DIAH=((__CHARACTER )(( 0)));
         } else {
-          result__A15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__DIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__TQKF=(result__A15G == 'r');
+        __tmp__E1KF=(result__DIAH == 'r');
       };
-      if (__tmp__TQKF) {
-        __tmp__UQKF=TRUE__;
+      if (__tmp__E1KF) {
+        __tmp__F1KF=TRUE__;
       } else {
-        result__F15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__F15G=((__CHARACTER )(( 0)));
+        result__IIAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__IIAH=((__CHARACTER )(( 0)));
         } else {
-          result__F15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__IIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__UQKF=(result__F15G == 't');
+        __tmp__F1KF=(result__IIAH == 't');
       };
-      if (__tmp__UQKF) {
-        __tmp__VQKF=TRUE__;
+      if (__tmp__F1KF) {
+        __tmp__G1KF=TRUE__;
       } else {
-        result__K15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__K15G=((__CHARACTER )(( 0)));
+        result__NIAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__NIAH=((__CHARACTER )(( 0)));
         } else {
-          result__K15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__NIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__VQKF=(result__K15G == 'v');
+        __tmp__G1KF=(result__NIAH == 'v');
       };
-      if (__tmp__VQKF) {
-        __tmp__WQKF=TRUE__;
+      if (__tmp__G1KF) {
+        __tmp__H1KF=TRUE__;
       } else {
-        result__P15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__P15G=((__CHARACTER )(( 0)));
+        result__SIAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__SIAH=((__CHARACTER )(( 0)));
         } else {
-          result__P15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__SIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__WQKF=(result__P15G == '\\');
+        __tmp__H1KF=(result__SIAH == '\\');
       };
-      if (__tmp__WQKF) {
-        __tmp__XQKF=TRUE__;
+      if (__tmp__H1KF) {
+        __tmp__I1KF=TRUE__;
       } else {
-        result__U15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__U15G=((__CHARACTER )(( 0)));
+        result__XIAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__XIAH=((__CHARACTER )(( 0)));
         } else {
-          result__U15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__XIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__XQKF=(result__U15G == '?');
+        __tmp__I1KF=(result__XIAH == '?');
       };
-      if (__tmp__XQKF) {
-        __tmp__YQKF=TRUE__;
+      if (__tmp__I1KF) {
+        __tmp__J1KF=TRUE__;
       } else {
-        result__Z15G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__Z15G=((__CHARACTER )(( 0)));
+        result__2IAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__2IAH=((__CHARACTER )(( 0)));
         } else {
-          result__Z15G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__2IAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__YQKF=(result__Z15G == '\'');
+        __tmp__J1KF=(result__2IAH == '\'');
       };
-      if (__tmp__YQKF) {
-        __tmp__ZQKF=TRUE__;
+      if (__tmp__J1KF) {
+        __tmp__K1KF=TRUE__;
       } else {
-        result__415G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__415G=((__CHARACTER )(( 0)));
+        result__BJAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__BJAH=((__CHARACTER )(( 0)));
         } else {
-          result__415G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__BJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__ZQKF=(result__415G == '\"');
+        __tmp__K1KF=(result__BJAH == '\"');
       };
-      if (__tmp__ZQKF) {
-        result__D25G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__D25G=((__CHARACTER )(( 0)));
+      if (__tmp__K1KF) {
+        result__GJAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__GJAH=((__CHARACTER )(( 0)));
         } else {
-          result__D25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__GJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__BMT(string_tmp__VH,result__D25G);
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        __tmp__ERKF=TRUE__;
+        add_last__UHT(string_tmp__VH,result__GJAH);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        __tmp__V1KF=TRUE__;
       } else {
-        __tmp__ERKF=FALSE__;
+        __tmp__V1KF=FALSE__;
       };
-      if ((! __tmp__ERKF)) {
-        result__I25G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__I25G=((__CHARACTER )(( 0)));
+      if ((! __tmp__V1KF)) {
+        result__LJAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__LJAH=((__CHARACTER )(( 0)));
         } else {
-          result__I25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__LJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        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)));
+        if (((((__INTEGER_8 )result__LJAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__LJAH) <= ((__INTEGER_8 )'9')))) {
+          result__QJAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__QJAH=((__CHARACTER )(( 0)));
           } else {
-            result__N25G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__QJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          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)));
+          if ((((result__QJAH == '0') && (position__CCC < ((__STRING *)source__5BC)->count__EGC)) && (! is_hexadecimal_digit__3LJE(((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)])))) {
+            result__YJAH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__YJAH=((__CHARACTER )(( 0)));
             } else {
-              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)) {
+              result__YJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            };
+            add_last__UHT(string_tmp__VH,result__YJAH);
+            position__CCC=(__INTEGER)(position__CCC +  1);
+          } else {
+            copy__U4R(string_tmp2__F3I,string_tmp__VH);
+            read_integer__1XP();
+            copy__U4R(string_tmp__VH,string_tmp2__F3I);
+            if ((last_integer__UNO >  255)) {
+              pos__DQYG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_302));
+              put_position__CMG(pos__DQYG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            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)));
+            val__MWKF=((__INTEGER )last_integer__UNO);
+            add_last__UHT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__MWKF >>  6)) + ((__INTEGER_8 )'0'))))));
+            add_last__UHT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__MWKF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
+            add_last__UHT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__MWKF &  7)) + ((__INTEGER_8 )'0'))))));
+            result__3JAH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__3JAH=((__CHARACTER )(( 0)));
             } else {
-              result__025G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__3JAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__025G == '\\')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
+            if ((result__3JAH == '\\')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
             } else {
-              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)) {
+              pos__QQYG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_303));
+              put_position__CMG(pos__QQYG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          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)) {
+          pos__SQYG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_301));
+          put_position__CMG(pos__SQYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
@@ -27079,10056 +27101,10056 @@ static void read_escape_character__YLKF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__0ZJ()
+static __BOOLEAN read_cap_identifier__MWJ()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__PWJ,idx__QWJ;
+  __POSITION pos__FSYG;
+  __BOOLEAN result__RWJ,__tmp__5WJ,result__TEEH,__tmp__TYJ,result__CFEH;
+  __BOOLEAN result__JFEH,__tmp__PYJ,__tmp__QYJ,result__VFEH,__tmp__DZJ;
+  __CHARACTER result__5KAH,result__JLAH,result__OLAH,result__XLAH;
+  __CHARACTER result__2LAH,result__BMAH,result__GMAH;
+  posold__PWJ= 0;
+  idx__QWJ= 0;
+  result__RWJ=FALSE__;
+  if ((! read_space__KSD())) {
+    __tmp__5WJ=TRUE__;
   } else {
-    result__235G='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__235G=((__CHARACTER )(( 0)));
+    result__5KAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__5KAH=((__CHARACTER )(( 0)));
     } else {
-      result__235G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__5KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__DZDH=FALSE__;
-    if ((((__INTEGER_8 )result__235G) >= ((__INTEGER_8 )'A'))) {
-      result__DZDH=(((__INTEGER_8 )result__235G) <= ((__INTEGER_8 )'Z'));
+    result__TEEH=FALSE__;
+    if ((((__INTEGER_8 )result__5KAH) >= ((__INTEGER_8 )'A'))) {
+      result__TEEH=(((__INTEGER_8 )result__5KAH) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__N0J=(! result__DZDH);
+    __tmp__5WJ=(! result__TEEH);
   };
-  if (__tmp__N0J) {
-    result__5ZJ=FALSE__;
+  if (__tmp__5WJ) {
+    result__RWJ=FALSE__;
   } else {
-    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:
+    posold__PWJ=position__CCC;
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    result__JLAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__JLAH=((__CHARACTER )(( 0)));
+    } else {
+      result__JLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    };
+    add_last__UHT(string_tmp__VH,result__JLAH);
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    is_parameter_type__WGE=TRUE__;
+    until_do__HSZE:
     {
-      result__L45G='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__L45G=((__CHARACTER )(( 0)));
+      result__OLAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__OLAH=((__CHARACTER )(( 0)));
       } else {
-        result__L45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__OLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__L45G == ((__CHARACTER )(( 0))))) {
-        __tmp__B2J=TRUE__;
+      if ((result__OLAH == ((__CHARACTER )(( 0))))) {
+        __tmp__TYJ=TRUE__;
       } else {
-        result__U45G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__U45G=((__CHARACTER )(( 0)));
+        result__XLAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__XLAH=((__CHARACTER )(( 0)));
         } else {
-          result__U45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__XLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__SZDH=FALSE__;
-        if ((((__INTEGER_8 )result__U45G) >= ((__INTEGER_8 )'A'))) {
-          result__SZDH=(((__INTEGER_8 )result__U45G) <= ((__INTEGER_8 )'Z'));
+        result__CFEH=FALSE__;
+        if ((((__INTEGER_8 )result__XLAH) >= ((__INTEGER_8 )'A'))) {
+          result__CFEH=(((__INTEGER_8 )result__XLAH) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__SZDH)) {
-          result__Z45G='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__Z45G=((__CHARACTER )(( 0)));
+        if ((! result__CFEH)) {
+          result__2LAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__2LAH=((__CHARACTER )(( 0)));
           } else {
-            result__Z45G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__2LAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__ZZDH=FALSE__;
-          if ((((__INTEGER_8 )result__Z45G) >= ((__INTEGER_8 )'0'))) {
-            result__ZZDH=(((__INTEGER_8 )result__Z45G) <= ((__INTEGER_8 )'9'));
+          result__JFEH=FALSE__;
+          if ((((__INTEGER_8 )result__2LAH) >= ((__INTEGER_8 )'0'))) {
+            result__JFEH=(((__INTEGER_8 )result__2LAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__31J=(! result__ZZDH);
+          __tmp__PYJ=(! result__JFEH);
         } else {
-          __tmp__31J=FALSE__;
+          __tmp__PYJ=FALSE__;
         };
-        if (__tmp__31J) {
-          result__445G='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__445G=((__CHARACTER )(( 0)));
+        if (__tmp__PYJ) {
+          result__BMAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__BMAH=((__CHARACTER )(( 0)));
           } else {
-            result__445G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__BMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__41J=(result__445G != '_');
+          __tmp__QYJ=(result__BMAH != '_');
         } else {
-          __tmp__41J=FALSE__;
+          __tmp__QYJ=FALSE__;
         };
-        __tmp__B2J=__tmp__41J;
+        __tmp__TYJ=__tmp__QYJ;
       };
-      if ((! __tmp__B2J)) {
-        result__D55G='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__D55G=((__CHARACTER )(( 0)));
+      if ((! __tmp__TYJ)) {
+        result__GMAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__GMAH=((__CHARACTER )(( 0)));
         } else {
-          result__D55G=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__GMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        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'));
+        if (is_parameter_type__WGE) {
+          result__VFEH=FALSE__;
+          if ((((__INTEGER_8 )result__GMAH) >= ((__INTEGER_8 )'0'))) {
+            result__VFEH=(((__INTEGER_8 )result__GMAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__R2J=result__F0DH;
+          __tmp__DZJ=result__VFEH;
         } else {
-          __tmp__R2J=FALSE__;
+          __tmp__DZJ=FALSE__;
         };
-        is_parameter_type__QKE=__tmp__R2J;
-        add_last__BMT(string_tmp__VH,result__D55G);
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto until_do__4HZE;
+        is_parameter_type__WGE=__tmp__DZJ;
+        add_last__UHT(string_tmp__VH,result__GMAH);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto until_do__HSZE;
       };
     };
-    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)) {
+    idx__QWJ=first_substring_index__VSZE(string_tmp__VH);
+    if ((idx__QWJ !=  0)) {
+      position__CCC=(__INTEGER)(posold__PWJ + idx__QWJ);
+      pos__FSYG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_207));
+      put_position__CMG(pos__FSYG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    last_string__Q0C=get__QWB(string_tmp__VH);
-    result__5ZJ=TRUE__;
+    last_string__V0C=get__YWB(string_tmp__VH);
+    result__RWJ=TRUE__;
   };
-  return(result__5ZJ);
+  return(result__RWJ);
 }
 
-static void add_last__0BBC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__1BBC,void *element__2BBC)
+static void add_last__C5AC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__D5AC,void *element__E5AC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__F5AC,__tmp__OABC,__tmp__CZSD,Self__40XE;
+  __BOOLEAN __tmp__V5AC;
+  void **__tmp__NABC,**new__OYSD;
+  new_capacity__F5AC= 0;
+  if (((__INTEGER)(Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC +  1) <= (__INTEGER)(Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC -  1))) {
+    Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC=(__INTEGER)(Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC +  1);
+    __tmp__V5AC=TRUE__;
   } else {
-    __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;
+    __tmp__V5AC=FALSE__;
+  };
+  if ((! __tmp__V5AC)) {
+    if ((Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC ==  0)) {
+      Self__D5AC->parent_arrayed_collection__BJE.storage__EABC=create__HY1C( 2);
+      Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC= 2;
+      Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC= 0;
+    } else {
+      new_capacity__F5AC=(__INTEGER)(Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC <<  1);
+      __tmp__NABC=Self__D5AC->parent_arrayed_collection__BJE.storage__EABC;
+      __tmp__OABC=Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC;
+      new__OYSD=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__NABC)),((__UINTEGER_32 )(__INTEGER)(__tmp__OABC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__F5AC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__CZSD=(__INTEGER)(new_capacity__F5AC -  1);
+      Self__40XE=__tmp__OABC;
+      while ((Self__40XE <= __tmp__CZSD)) {
+        new__OYSD[Self__40XE]=NULL;
+        Self__40XE=(__INTEGER)(Self__40XE +  1);
+      };
+      Self__D5AC->parent_arrayed_collection__BJE.storage__EABC=new__OYSD;
+      Self__D5AC->parent_arrayed_collection__BJE.capacity__I5AC=new_capacity__F5AC;
+      Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC=(__INTEGER)(Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC +  1);
+    };
+  };
+  ((void **)Self__D5AC->parent_arrayed_collection__BJE.storage__EABC)[Self__D5AC->parent_arrayed_collection__BJE.upper__G5AC]=element__E5AC;
 }
 
-static __BOOLEAN read_external__ITO()
+static __BOOLEAN read_external__1OO()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER pos_old__5OO;
+  __BOOLEAN result__4OO,__tmp__KPO;
+  __CHARACTER result__1NAH,result__FOAH,result__OOAH,result__TOAH;
+  __CHARACTER result__YOAH,result__3OAH,result__CPAH,result__LPAH;
+  result__4OO=FALSE__;
+  pos_old__5OO= 0;
+  if ((! read_space__KSD())) {
+    __tmp__KPO=TRUE__;
   } else {
-    result__YAAH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__YAAH=((__CHARACTER )(( 0)));
+    result__1NAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__1NAH=((__CHARACTER )(( 0)));
     } else {
-      result__YAAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__1NAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__XTO=(result__YAAH != '`');
+    __tmp__KPO=(result__1NAH != '`');
   };
-  if (__tmp__XTO) {
-    result__LTO=FALSE__;
+  if (__tmp__KPO) {
+    result__4OO=FALSE__;
   } else {
-    pos_old__MTO=position__0BC;
-    position__0BC=(__INTEGER)(position__0BC +  1);
-    ((__STRING *)string_tmp__VH)->count__4FC= 0;
-    until_do__CIRC:
+    pos_old__5OO=position__CCC;
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    until_do__NGRC:
     {
-      result__CBAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__CBAH=((__CHARACTER )(( 0)));
+      result__FOAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__FOAH=((__CHARACTER )(( 0)));
       } else {
-        result__CBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__FOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__LBAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__LBAH=((__CHARACTER )(( 0)));
+      result__OOAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__OOAH=((__CHARACTER )(( 0)));
       } else {
-        result__LBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__OOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((! ((result__CBAH == ((__CHARACTER )(( 0)))) | (result__LBAH == '`')))) {
-        result__QBAH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__QBAH=((__CHARACTER )(( 0)));
+      if ((! ((result__FOAH == ((__CHARACTER )(( 0)))) | (result__OOAH == '`')))) {
+        result__TOAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__TOAH=((__CHARACTER )(( 0)));
         } else {
-          result__QBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__TOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__BMT(string_tmp__VH,result__QBAH);
-        result__VBAH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__VBAH=((__CHARACTER )(( 0)));
+        add_last__UHT(string_tmp__VH,result__TOAH);
+        result__YOAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__YOAH=((__CHARACTER )(( 0)));
         } else {
-          result__VBAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__YOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__VBAH == '\\')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__0BAH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__0BAH=((__CHARACTER )(( 0)));
+        if ((result__YOAH == '\\')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__3OAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__3OAH=((__CHARACTER )(( 0)));
           } else {
-            result__0BAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__3OAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__0BAH);
-          result__5BAH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__5BAH=((__CHARACTER )(( 0)));
+          add_last__UHT(string_tmp__VH,result__3OAH);
+          result__CPAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__CPAH=((__CHARACTER )(( 0)));
           } else {
-            result__5BAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__CPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5BAH != ((__CHARACTER )(( 0))))) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
+          if ((result__CPAH != ((__CHARACTER )(( 0))))) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
           };
         } else {
-          position__0BC=(__INTEGER)(position__0BC +  1);
+          position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__CIRC;
+        goto until_do__NGRC;
       };
     };
-    result__ICAH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__ICAH=((__CHARACTER )(( 0)));
+    result__LPAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__LPAH=((__CHARACTER )(( 0)));
     } else {
-      result__ICAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__LPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    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);
+    if ((result__LPAH != ((__CHARACTER )(( 0))))) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      last_string__V0C=get__YWB(string_tmp__VH);
+      result__4OO=TRUE__;
+      short__token__to__YBD((&__string_65),pos_old__5OO,position__CCC);
     } else {
-      result__LTO=FALSE__;
+      result__4OO=FALSE__;
     };
   };
-  return(result__LTO);
+  return(result__4OO);
 }
 
-static void* read_expr_primary__Q4M(__PARSER *Self__R4M)
+static void* read_expr_primary__D0M(__PARSER *Self__E0M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__G0M;
+  void *type__H0M;
+  void *group_sav__M0M,*lst__3FHB;
+  __POSITION p__OPJH,pos__PUYG,p__QHAB,p__J4HH,p__0QJH,pos__RUYG,p__HYH;
+  __POSITION pos__TUYG,pos__1UYG,__tmp__QBN,__tmp__YBN,pos__JVYG;
+  __POSITION pos__LVYG,pos__NVYG,pos__PVYG;
+  __ITM_READ *result__GPJH,*result__MUGB;
+  __POINTER ptr__HPJH,ptr_table__QPJH,next__PPJH,result__RPJH;
+  __POINTER ptr_table__VPJH,next__UPJH,result__WPJH,ptr__NUGB;
+  __POINTER ptr_table__2PJH,next__1PJH,result__3PJH,ptr_table__BQJH;
+  __POINTER next__AQJH,result__CQJH,ptr__C4HH,ptr_table__GQJH;
+  __POINTER next__FQJH,result__HQJH,ptr_table__LQJH,next__KQJH;
+  __POINTER result__MQJH,ptr__TQJH,ptr_table__2QJH,next__1QJH;
+  __POINTER result__3QJH,ptr_table__BRJH,next__ARJH,result__CRJH;
+  __POINTER ptr__1MI,ptr_table__MRJH,next__LRJH,result__NRJH;
+  __POINTER ptr_table__RRJH,next__QRJH,result__SRJH,ptr__VDMB;
+  __POINTER ptr_table__ZRJH,next__YRJH,result__0RJH,ptr_table__4RJH;
+  __POINTER next__3RJH,result__5RJH,ptr__YSTB,ptr_table__JSJH;
+  __POINTER next__ISJH,result__KSJH,ptr_table__OSJH,next__NSJH;
+  __POINTER result__PSJH,ptr__MUTB,ptr_table__WSJH,next__VSJH;
+  __POINTER result__XSJH,ptr_table__1SJH,next__0SJH,result__2SJH;
+  __INTEGER typ_id__IPJH,typ_id__SUGB,typ_id__D4HH,typ_id__UQJH;
+  __INTEGER typ_id__ANI,typ_id__0DMB,typ_id__3STB,typ_id__RUTB;
+  __UINTEGER_32 sz__JPJH,a__KPJH,new_size__LPJH,t__MPJH,a__NPJH;
+  __UINTEGER_32 new_size__YPJH,lab_type__XPJH,sz__PUGB,a__ARGH;
+  __UINTEGER_32 new_size__BRGH,t__FRGH,a__ERGH,new_size__EQJH;
+  __UINTEGER_32 lab_type__DQJH,sz__E4HH,a__F4HH,new_size__G4HH,t__H4HH;
+  __UINTEGER_32 a__I4HH,new_size__OQJH,lab_type__NQJH,sz__VQJH,a__WQJH;
+  __UINTEGER_32 new_size__XQJH,t__YQJH,a__ZQJH,new_size__ERJH;
+  __UINTEGER_32 lab_type__DRJH,sz__3MI,a__IPGH,new_size__JPGH,t__NPGH;
+  __UINTEGER_32 a__MPGH,new_size__URJH,lab_type__TRJH,sz__XDMB,a__CJGH;
+  __UINTEGER_32 new_size__DJGH,t__HJGH,a__GJGH,new_size__BSJH;
+  __UINTEGER_32 lab_type__ASJH,sz__0STB,a__KJGH,new_size__LJGH,t__PJGH;
+  __UINTEGER_32 a__OJGH,new_size__RSJH,lab_type__QSJH,sz__OUTB,a__SJGH;
+  __UINTEGER_32 new_size__TJGH,t__XJGH,a__WJGH,new_size__4SJH;
+  __UINTEGER_32 lab_type__3SJH;
+  __ITM_PROTOTYPE *result__B4HH;
+  __ITM_LIST *result__SQJH,*result__0MI;
+  __ITM_BLOCK *result__UDMB;
+  __ITM_EXTERNAL *result__XSTB;
+  __ITM_EXTERNAL_TYPE *result__LUTB,*Self__WXEC;
+  __BOOLEAN result__FPJH,__tmp__20M,__tmp__52M,result__0PJH;
+  __BOOLEAN result__BHEH,__tmp__O3M,result__2VN,__tmp__23M,__tmp__Z4M;
+  __BOOLEAN result__PQJH,result__FRJH,__tmp__2AN,result__IRJH;
+  __BOOLEAN result__VRJH,result__CSJH,result__FSJH,result__SSJH;
+  __BOOLEAN result__5SJH,result__CTJH,result__FTJH,__tmp__SDN;
+  __CHARACTER result__UPAH,result__ZPAH,result__4PAH,result__QQJH;
+  __CHARACTER result__GRJH,result__JRJH,result__WRJH,result__DSJH;
+  __CHARACTER result__GSJH,result__TSJH,result__ATJH,result__DTJH;
+  __CHARACTER result__GTJH;
+  result__G0M=NULL;
+  type__H0M=NULL;
+  group_sav__M0M=NULL;
+  result__FPJH=read_word__4MF((&__string_58));
+  if (is_shorter__LZ) {
+    if (result__FPJH) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
-        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)));
+        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+      } else {
+        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+      };
+    };
+  };
+  if (result__FPJH) {
+    p__OPJH=current_position__XUF();
+    result__GPJH=NULL;
+    ptr__HPJH=((__POINTER )(NULL));
+    typ_id__IPJH= 0;
+    sz__JPJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__JPJH ==  0)) {
+      result__GPJH=ITM_READ__;
+    } else {
+      typ_id__IPJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JPJH);
+      if ((typ_id__IPJH == (__INTEGER)(-  1))) {
+        a__KPJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__LPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JPJH + a__KPJH) & (__UINTEGER_32)(~ a__KPJH));
+        ptr_table__QPJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LPJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__PPJH=((__POINTER )(NULL));
+        result__RPJH=((__POINTER *)ptr_table__QPJH)[ 0];
+        if ((result__RPJH == (void *)NULL)) {
+          result__RPJH=new_lab__QOJ(new_size__LPJH);
+          next__PPJH=(void *)((unsigned long)result__RPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPJH)));
+          ((__POINTER *)next__PPJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QPJH)[ 0]=next__PPJH;
+        } else {
+          next__PPJH=((__POINTER *)result__RPJH)[ 0];
+          if ((next__PPJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RPJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LPJH <<  1)) <=  4096)) {
+              next__PPJH=(void *)((unsigned long)result__RPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LPJH)));
             } else {
-              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)));
+              next__PPJH=new_lab__QOJ(new_size__LPJH);
+            };
+            ((__POINTER *)next__PPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QPJH)[ 0]=next__PPJH;
+          } else {
+            ((__POINTER *)result__RPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RPJH=next__PPJH;
+          };
+        };
+        ptr__HPJH=result__RPJH;
+      } else {
+        t__MPJH=((__UINTEGER_32 )typ_id__IPJH);
+        a__NPJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__JPJH + a__NPJH) & (__UINTEGER_32)(~ a__NPJH));
+        ptr_table__VPJH=((__POINTER )(&(table_type[(t__MPJH)])));
+        lab_type__XPJH=(__UINTEGER_32)(t__MPJH |  1);
+        next__UPJH=((__POINTER )(NULL));
+        result__WPJH=((__POINTER *)ptr_table__VPJH)[ 0];
+        if ((result__WPJH == (void *)NULL)) {
+          result__WPJH=new_lab__QOJ(lab_type__XPJH);
+          next__UPJH=(void *)((unsigned long)result__WPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YPJH)));
+          ((__POINTER *)next__UPJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VPJH)[ 0]=next__UPJH;
+        } else {
+          next__UPJH=((__POINTER *)result__WPJH)[ 0];
+          if ((next__UPJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WPJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YPJH <<  1)) <=  4096)) {
+              next__UPJH=(void *)((unsigned long)result__WPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YPJH)));
             } else {
-              next__FFJH=new_lab__URJ(lab_type__IFJH);
+              next__UPJH=new_lab__QOJ(lab_type__XPJH);
             };
-            ((__POINTER *)next__FFJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GFJH)[ 0]=next__FFJH;
+            ((__POINTER *)next__UPJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VPJH)[ 0]=next__UPJH;
           } else {
-            ((__POINTER *)result__HFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__HFJH=next__FFJH;
+            ((__POINTER *)result__WPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WPJH=next__UPJH;
           };
         };
-        ptr__YEJH=result__HFJH;
+        ptr__HPJH=result__WPJH;
       };
-      result__XEJH=((__ITM_READ *)ptr__YEJH);
-      *(result__XEJH) = *(ITM_READ__);
+      result__GPJH=((__ITM_READ *)ptr__HPJH);
+      *(result__GPJH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__XEJH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__5EJH;
-    result__T4M=result__XEJH;
-    __tmp__J5M=TRUE__;
+    ((__ITM_READ *)result__GPJH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__OPJH;
+    result__G0M=result__GPJH;
+    __tmp__20M=TRUE__;
   } else {
-    __tmp__J5M=FALSE__;
+    __tmp__20M=FALSE__;
   };
-  if (__tmp__J5M) {
-    __tmp__MBN=TRUE__;
+  if (__tmp__20M) {
+    __tmp__52M=TRUE__;
   } else {
-    result__LFJH=read_word__YPF((&__string_11));
-    if (is_shorter__FZ) {
-      if (result__LFJH) {
+    result__0PJH=read_word__4MF((&__string_11));
+    if (is_shorter__LZ) {
+      if (result__0PJH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
-          short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
-          short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+          short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         };
       };
     };
-    if (result__LFJH) {
-      result__RCAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__RCAH=((__CHARACTER )(( 0)));
+    if (result__0PJH) {
+      result__UPAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__UPAH=((__CHARACTER )(( 0)));
       } else {
-        result__RCAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__UPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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:
+      if ((result__UPAH == '_')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        copy__U4R(string_tmp__VH,(&__string_11));
+        add_last__UHT(string_tmp__VH,'_');
+        while_do__CTQB:
         {
-          result__WCAH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__WCAH=((__CHARACTER )(( 0)));
+          result__ZPAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__ZPAH=((__CHARACTER )(( 0)));
           } else {
-            result__WCAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__ZPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__R1DH=FALSE__;
-          if ((((__INTEGER_8 )result__WCAH) >= ((__INTEGER_8 )'0'))) {
-            result__R1DH=(((__INTEGER_8 )result__WCAH) <= ((__INTEGER_8 )'9'));
+          result__BHEH=FALSE__;
+          if ((((__INTEGER_8 )result__ZPAH) >= ((__INTEGER_8 )'0'))) {
+            result__BHEH=(((__INTEGER_8 )result__ZPAH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__R1DH) {
-            result__1CAH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__1CAH=((__CHARACTER )(( 0)));
+          if (result__BHEH) {
+            result__4PAH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__4PAH=((__CHARACTER )(( 0)));
             } else {
-              result__1CAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__4PAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__BMT(string_tmp__VH,result__1CAH);
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            goto while_do__MWQB;
+            add_last__UHT(string_tmp__VH,result__4PAH);
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            goto while_do__CTQB;
           };
         };
-        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)) {
+        if ((((__STRING *)string_tmp__VH)->count__EGC ==  0)) {
+          pos__PUYG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_304));
+          put_position__CMG(pos__PUYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)));
+        get__YWB(string_tmp__VH);
+      };
+      p__QHAB=current_position__XUF();
+      result__MUGB=NULL;
+      ptr__NUGB=((__POINTER )(NULL));
+      typ_id__SUGB= 0;
+      sz__PUGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__PUGB ==  0)) {
+        result__MUGB=ITM_READ__;
+      } else {
+        typ_id__SUGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PUGB);
+        if ((typ_id__SUGB == (__INTEGER)(-  1))) {
+          a__ARGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PUGB + a__ARGH) & (__UINTEGER_32)(~ a__ARGH));
+          ptr_table__2PJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__1PJH=((__POINTER )(NULL));
+          result__3PJH=((__POINTER *)ptr_table__2PJH)[ 0];
+          if ((result__3PJH == (void *)NULL)) {
+            result__3PJH=new_lab__QOJ(new_size__BRGH);
+            next__1PJH=(void *)((unsigned long)result__3PJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRGH)));
+            ((__POINTER *)next__1PJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2PJH)[ 0]=next__1PJH;
+          } else {
+            next__1PJH=((__POINTER *)result__3PJH)[ 0];
+            if ((next__1PJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3PJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BRGH <<  1)) <=  4096)) {
+                next__1PJH=(void *)((unsigned long)result__3PJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BRGH)));
               } else {
-                next__MFJH=new_lab__URJ(new_size__OFGH);
+                next__1PJH=new_lab__QOJ(new_size__BRGH);
               };
-              ((__POINTER *)next__MFJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NFJH)[ 0]=next__MFJH;
+              ((__POINTER *)next__1PJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2PJH)[ 0]=next__1PJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__3PJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3PJH=next__1PJH;
+            };
+          };
+          ptr__NUGB=result__3PJH;
+        } else {
+          t__FRGH=((__UINTEGER_32 )typ_id__SUGB);
+          a__ERGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__EQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PUGB + a__ERGH) & (__UINTEGER_32)(~ a__ERGH));
+          ptr_table__BQJH=((__POINTER )(&(table_type[(t__FRGH)])));
+          lab_type__DQJH=(__UINTEGER_32)(t__FRGH |  1);
+          next__AQJH=((__POINTER )(NULL));
+          result__CQJH=((__POINTER *)ptr_table__BQJH)[ 0];
+          if ((result__CQJH == (void *)NULL)) {
+            result__CQJH=new_lab__QOJ(lab_type__DQJH);
+            next__AQJH=(void *)((unsigned long)result__CQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQJH)));
+            ((__POINTER *)next__AQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BQJH)[ 0]=next__AQJH;
+          } else {
+            next__AQJH=((__POINTER *)result__CQJH)[ 0];
+            if ((next__AQJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CQJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EQJH <<  1)) <=  4096)) {
+                next__AQJH=(void *)((unsigned long)result__CQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EQJH)));
               } else {
-                next__RFJH=new_lab__URJ(lab_type__UFJH);
+                next__AQJH=new_lab__QOJ(lab_type__DQJH);
               };
-              ((__POINTER *)next__RFJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SFJH)[ 0]=next__RFJH;
+              ((__POINTER *)next__AQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BQJH)[ 0]=next__AQJH;
             } else {
-              ((__POINTER *)result__TFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TFJH=next__RFJH;
+              ((__POINTER *)result__CQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__CQJH=next__AQJH;
             };
           };
-          ptr__BZGB=result__TFJH;
+          ptr__NUGB=result__CQJH;
         };
-        result__AZGB=((__ITM_READ *)ptr__BZGB);
-        *(result__AZGB) = *(ITM_READ__);
+        result__MUGB=((__ITM_READ *)ptr__NUGB);
+        *(result__MUGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__AZGB)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__FMAB;
-      result__T4M=result__AZGB;
+      ((__ITM_READ *)result__MUGB)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__QHAB;
+      result__G0M=result__MUGB;
     };
-    __tmp__MBN=result__LFJH;
+    __tmp__52M=result__0PJH;
   };
-  if (__tmp__MBN) {
-    __tmp__1BN=TRUE__;
+  if (__tmp__52M) {
+    __tmp__O3M=TRUE__;
   } else {
-    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)));
+    type__H0M=read_prototype__CKN(Self__E0M,NULL);
+    result__2VN=((void *)type__H0M != (void *)NULL);
+    if (result__2VN) {
+      p__J4HH=current_position__XUF();
+      result__B4HH=NULL;
+      ptr__C4HH=((__POINTER )(NULL));
+      typ_id__D4HH= 0;
+      sz__E4HH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__E4HH ==  0)) {
+        result__B4HH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__D4HH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E4HH);
+        if ((typ_id__D4HH == (__INTEGER)(-  1))) {
+          a__F4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__G4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__E4HH + a__F4HH) & (__UINTEGER_32)(~ a__F4HH));
+          ptr_table__GQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G4HH / ((__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__QOJ(new_size__G4HH);
+            next__FQJH=(void *)((unsigned long)result__HQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4HH)));
+            ((__POINTER *)next__FQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
+          } else {
+            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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G4HH <<  1)) <=  4096)) {
+                next__FQJH=(void *)((unsigned long)result__HQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4HH)));
               } else {
-                next__WFJH=new_lab__URJ(new_size__CTHH);
+                next__FQJH=new_lab__QOJ(new_size__G4HH);
               };
-              ((__POINTER *)next__WFJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XFJH)[ 0]=next__WFJH;
+              ((__POINTER *)next__FQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__HQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__HQJH=next__FQJH;
+            };
+          };
+          ptr__C4HH=result__HQJH;
+        } else {
+          t__H4HH=((__UINTEGER_32 )typ_id__D4HH);
+          a__I4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__OQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E4HH + a__I4HH) & (__UINTEGER_32)(~ a__I4HH));
+          ptr_table__LQJH=((__POINTER )(&(table_type[(t__H4HH)])));
+          lab_type__NQJH=(__UINTEGER_32)(t__H4HH |  1);
+          next__KQJH=((__POINTER )(NULL));
+          result__MQJH=((__POINTER *)ptr_table__LQJH)[ 0];
+          if ((result__MQJH == (void *)NULL)) {
+            result__MQJH=new_lab__QOJ(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__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__3SH)))) &  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__1FJH=new_lab__URJ(lab_type__4FJH);
+                next__KQJH=new_lab__QOJ(lab_type__NQJH);
               };
-              ((__POINTER *)next__1FJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2FJH)[ 0]=next__1FJH;
+              ((__POINTER *)next__KQJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LQJH)[ 0]=next__KQJH;
             } else {
-              ((__POINTER *)result__3FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__3FJH=next__1FJH;
+              ((__POINTER *)result__MQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__MQJH=next__KQJH;
             };
           };
-          ptr__4SHH=result__3FJH;
+          ptr__C4HH=result__MQJH;
         };
-        result__3SHH=((__ITM_PROTOTYPE *)ptr__4SHH);
-        *(result__3SHH) = *(ITM_PROTOTYPE__);
+        result__B4HH=((__ITM_PROTOTYPE *)ptr__C4HH);
+        *(result__B4HH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__3SHH)->parent_itm_constant__EWF.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=p__FTHH;
-      result__T4M=result__3SHH;
+      ((__ITM_PROTOTYPE *)result__B4HH)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=p__J4HH;
+      result__G0M=result__B4HH;
     };
-    __tmp__1BN=result__J0N;
+    __tmp__O3M=result__2VN;
   };
-  if (__tmp__1BN) {
-    __tmp__JCN=TRUE__;
+  if (__tmp__O3M) {
+    __tmp__23M=TRUE__;
   } else {
-    result__T4M=read_constant__DRO();
-    __tmp__JCN=((void *)result__T4M != (void *)NULL);
+    result__G0M=read_constant__WMO();
+    __tmp__23M=((void *)result__G0M != (void *)NULL);
   };
-  if (__tmp__JCN) {
-    __tmp__GDN=TRUE__;
+  if (__tmp__23M) {
+    __tmp__Z4M=TRUE__;
   } else {
-    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)));
+    result__PQJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__PQJH=FALSE__;
+    } else {
+      result__QQJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__QQJH=((__CHARACTER )(( 0)));
+      } else {
+        result__QQJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      };
+      if ((result__QQJH == '(')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__PQJH=TRUE__;
+      };
+    };
+    if (result__PQJH) {
+      group_sav__M0M=last_group__JRF;
+      p__0QJH=current_position__XUF();
+      result__SQJH=NULL;
+      ptr__TQJH=((__POINTER )(NULL));
+      typ_id__UQJH= 0;
+      sz__VQJH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__VQJH ==  0)) {
+        result__SQJH=ITM_LIST__;
+      } else {
+        typ_id__UQJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VQJH);
+        if ((typ_id__UQJH == (__INTEGER)(-  1))) {
+          a__WQJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VQJH + a__WQJH) & (__UINTEGER_32)(~ a__WQJH));
+          ptr_table__2QJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XQJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__1QJH=((__POINTER )(NULL));
+          result__3QJH=((__POINTER *)ptr_table__2QJH)[ 0];
+          if ((result__3QJH == (void *)NULL)) {
+            result__3QJH=new_lab__QOJ(new_size__XQJH);
+            next__1QJH=(void *)((unsigned long)result__3QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQJH)));
+            ((__POINTER *)next__1QJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2QJH)[ 0]=next__1QJH;
+          } else {
+            next__1QJH=((__POINTER *)result__3QJH)[ 0];
+            if ((next__1QJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3QJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XQJH <<  1)) <=  4096)) {
+                next__1QJH=(void *)((unsigned long)result__3QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XQJH)));
               } else {
-                next__MGJH=new_lab__URJ(new_size__IGJH);
+                next__1QJH=new_lab__QOJ(new_size__XQJH);
               };
-              ((__POINTER *)next__MGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NGJH)[ 0]=next__MGJH;
+              ((__POINTER *)next__1QJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2QJH)[ 0]=next__1QJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__3QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1QJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3QJH=next__1QJH;
+            };
+          };
+          ptr__TQJH=result__3QJH;
+        } else {
+          t__YQJH=((__UINTEGER_32 )typ_id__UQJH);
+          a__ZQJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ERJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VQJH + a__ZQJH) & (__UINTEGER_32)(~ a__ZQJH));
+          ptr_table__BRJH=((__POINTER )(&(table_type[(t__YQJH)])));
+          lab_type__DRJH=(__UINTEGER_32)(t__YQJH |  1);
+          next__ARJH=((__POINTER )(NULL));
+          result__CRJH=((__POINTER *)ptr_table__BRJH)[ 0];
+          if ((result__CRJH == (void *)NULL)) {
+            result__CRJH=new_lab__QOJ(lab_type__DRJH);
+            next__ARJH=(void *)((unsigned long)result__CRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ERJH)));
+            ((__POINTER *)next__ARJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BRJH)[ 0]=next__ARJH;
+          } else {
+            next__ARJH=((__POINTER *)result__CRJH)[ 0];
+            if ((next__ARJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CRJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ERJH <<  1)) <=  4096)) {
+                next__ARJH=(void *)((unsigned long)result__CRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ERJH)));
               } else {
-                next__RGJH=new_lab__URJ(lab_type__UGJH);
+                next__ARJH=new_lab__QOJ(lab_type__DRJH);
               };
-              ((__POINTER *)next__RGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SGJH)[ 0]=next__RGJH;
+              ((__POINTER *)next__ARJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BRJH)[ 0]=next__ARJH;
             } else {
-              ((__POINTER *)result__TGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TGJH=next__RGJH;
+              ((__POINTER *)result__CRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ARJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__CRJH=next__ARJH;
             };
           };
-          ptr__EGJH=result__TGJH;
+          ptr__TQJH=result__CRJH;
         };
-        result__DGJH=((__ITM_LIST *)ptr__EGJH);
-        *(result__DGJH) = *(ITM_LIST__);
+        result__SQJH=((__ITM_LIST *)ptr__TQJH);
+        *(result__SQJH) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__SQJH)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ=p__0QJH;
+      last_group__JRF=result__SQJH;
+      result__G0M=result__SQJH;
+      read_group__32GB(Self__E0M);
+      result__FRJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__FRJH=FALSE__;
       } else {
-        result__XGJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__XGJH=((__CHARACTER )(( 0)));
+        result__GRJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__GRJH=((__CHARACTER )(( 0)));
         } else {
-          result__XGJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__GRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__XGJH == ')')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__WGJH=TRUE__;
+        if ((result__GRJH == ')')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__FRJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__FRJH)) {
+        pos__RUYG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_262));
+        put_position__CMG(pos__RUYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__DUF=group_sav__Z4M;
+      last_group__JRF=group_sav__M0M;
     };
-    __tmp__GDN=result__AGJH;
+    __tmp__Z4M=result__PQJH;
   };
-  if (__tmp__GDN) {
-    __tmp__JFN=TRUE__;
+  if (__tmp__Z4M) {
+    __tmp__2AN=TRUE__;
   } else {
-    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)));
+    result__IRJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__IRJH=FALSE__;
+    } else {
+      result__JRJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__JRJH=((__CHARACTER )(( 0)));
+      } else {
+        result__JRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      };
+      if ((result__JRJH == '{')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__IRJH=TRUE__;
+      };
+    };
+    if (result__IRJH) {
+      short__token__to__YBD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      group_sav__M0M=last_group__JRF;
+      p__HYH=current_position__XUF();
+      result__0MI=NULL;
+      ptr__1MI=((__POINTER )(NULL));
+      typ_id__ANI= 0;
+      sz__3MI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__3MI ==  0)) {
+        result__0MI=ITM_LIST__;
+      } else {
+        typ_id__ANI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3MI);
+        if ((typ_id__ANI == (__INTEGER)(-  1))) {
+          a__IPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__JPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__3MI + a__IPGH) & (__UINTEGER_32)(~ a__IPGH));
+          ptr_table__MRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__LRJH=((__POINTER )(NULL));
+          result__NRJH=((__POINTER *)ptr_table__MRJH)[ 0];
+          if ((result__NRJH == (void *)NULL)) {
+            result__NRJH=new_lab__QOJ(new_size__JPGH);
+            next__LRJH=(void *)((unsigned long)result__NRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPGH)));
+            ((__POINTER *)next__LRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MRJH)[ 0]=next__LRJH;
+          } else {
+            next__LRJH=((__POINTER *)result__NRJH)[ 0];
+            if ((next__LRJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NRJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JPGH <<  1)) <=  4096)) {
+                next__LRJH=(void *)((unsigned long)result__NRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JPGH)));
               } else {
-                next__2GJH=new_lab__URJ(new_size__WDGH);
+                next__LRJH=new_lab__QOJ(new_size__JPGH);
               };
-              ((__POINTER *)next__2GJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
+              ((__POINTER *)next__LRJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MRJH)[ 0]=next__LRJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__NRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__NRJH=next__LRJH;
+            };
+          };
+          ptr__1MI=result__NRJH;
+        } else {
+          t__NPGH=((__UINTEGER_32 )typ_id__ANI);
+          a__MPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__URJH=(__UINTEGER_32)((__UINTEGER_32)(sz__3MI + a__MPGH) & (__UINTEGER_32)(~ a__MPGH));
+          ptr_table__RRJH=((__POINTER )(&(table_type[(t__NPGH)])));
+          lab_type__TRJH=(__UINTEGER_32)(t__NPGH |  1);
+          next__QRJH=((__POINTER )(NULL));
+          result__SRJH=((__POINTER *)ptr_table__RRJH)[ 0];
+          if ((result__SRJH == (void *)NULL)) {
+            result__SRJH=new_lab__QOJ(lab_type__TRJH);
+            next__QRJH=(void *)((unsigned long)result__SRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URJH)));
+            ((__POINTER *)next__QRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RRJH)[ 0]=next__QRJH;
+          } else {
+            next__QRJH=((__POINTER *)result__SRJH)[ 0];
+            if ((next__QRJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SRJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__URJH <<  1)) <=  4096)) {
+                next__QRJH=(void *)((unsigned long)result__SRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__URJH)));
               } else {
-                next__BHJH=new_lab__URJ(lab_type__EHJH);
+                next__QRJH=new_lab__QOJ(lab_type__TRJH);
               };
-              ((__POINTER *)next__BHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__CHJH)[ 0]=next__BHJH;
+              ((__POINTER *)next__QRJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RRJH)[ 0]=next__QRJH;
             } else {
-              ((__POINTER *)result__DHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__DHJH=next__BHJH;
+              ((__POINTER *)result__SRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__SRJH=next__QRJH;
             };
           };
-          ptr__5PI=result__DHJH;
+          ptr__1MI=result__SRJH;
         };
-        result__4PI=((__ITM_LIST *)ptr__5PI);
-        *(result__4PI) = *(ITM_LIST__);
+        result__0MI=((__ITM_LIST *)ptr__1MI);
+        *(result__0MI) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__0MI)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ=p__HYH;
+      last_group__JRF=result__0MI;
+      old_position__HOI=position__CCC;
+      old_pos_cur__JOI=pos_cur__FCC;
+      old_pos_line__LOI=pos_line__GCC;
+      old_pos_col__NOI=pos_col__HCC;
+      old_short_derive__POI=short_derive__PCC;
+      if (((void *)read_loc_arg__with_self__25GB(Self__E0M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__VRJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__VRJH=FALSE__;
         } else {
-          result__HHJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__HHJH=((__CHARACTER )(( 0)));
+          result__WRJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__WRJH=((__CHARACTER )(( 0)));
           } else {
-            result__HHJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__WRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HHJH == ';')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__GHJH=TRUE__;
+          if ((result__WRJH == ';')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__VRJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__VRJH)) {
+          pos__TUYG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_242));
+          put_position__CMG(pos__TUYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        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)));
+        restore_context__DAL();
+      };
+      lst__3FHB=last_group__JRF;
+      result__UDMB=NULL;
+      ptr__VDMB=((__POINTER )(NULL));
+      typ_id__0DMB= 0;
+      sz__XDMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__XDMB ==  0)) {
+        result__UDMB=ITM_BLOCK__;
+      } else {
+        typ_id__0DMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XDMB);
+        if ((typ_id__0DMB == (__INTEGER)(-  1))) {
+          a__CJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__DJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__XDMB + a__CJGH) & (__UINTEGER_32)(~ a__CJGH));
+          ptr_table__ZRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__YRJH=((__POINTER )(NULL));
+          result__0RJH=((__POINTER *)ptr_table__ZRJH)[ 0];
+          if ((result__0RJH == (void *)NULL)) {
+            result__0RJH=new_lab__QOJ(new_size__DJGH);
+            next__YRJH=(void *)((unsigned long)result__0RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJGH)));
+            ((__POINTER *)next__YRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZRJH)[ 0]=next__YRJH;
+          } else {
+            next__YRJH=((__POINTER *)result__0RJH)[ 0];
+            if ((next__YRJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0RJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DJGH <<  1)) <=  4096)) {
+                next__YRJH=(void *)((unsigned long)result__0RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DJGH)));
               } else {
-                next__JHJH=new_lab__URJ(new_size__Q3FH);
+                next__YRJH=new_lab__QOJ(new_size__DJGH);
               };
-              ((__POINTER *)next__JHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KHJH)[ 0]=next__JHJH;
+              ((__POINTER *)next__YRJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZRJH)[ 0]=next__YRJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__0RJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__0RJH=next__YRJH;
+            };
+          };
+          ptr__VDMB=result__0RJH;
+        } else {
+          t__HJGH=((__UINTEGER_32 )typ_id__0DMB);
+          a__GJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__XDMB + a__GJGH) & (__UINTEGER_32)(~ a__GJGH));
+          ptr_table__4RJH=((__POINTER )(&(table_type[(t__HJGH)])));
+          lab_type__ASJH=(__UINTEGER_32)(t__HJGH |  1);
+          next__3RJH=((__POINTER )(NULL));
+          result__5RJH=((__POINTER *)ptr_table__4RJH)[ 0];
+          if ((result__5RJH == (void *)NULL)) {
+            result__5RJH=new_lab__QOJ(lab_type__ASJH);
+            next__3RJH=(void *)((unsigned long)result__5RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSJH)));
+            ((__POINTER *)next__3RJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4RJH)[ 0]=next__3RJH;
+          } else {
+            next__3RJH=((__POINTER *)result__5RJH)[ 0];
+            if ((next__3RJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5RJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BSJH <<  1)) <=  4096)) {
+                next__3RJH=(void *)((unsigned long)result__5RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BSJH)));
               } else {
-                next__OHJH=new_lab__URJ(lab_type__RHJH);
+                next__3RJH=new_lab__QOJ(lab_type__ASJH);
               };
-              ((__POINTER *)next__OHJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PHJH)[ 0]=next__OHJH;
+              ((__POINTER *)next__3RJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4RJH)[ 0]=next__3RJH;
             } else {
-              ((__POINTER *)result__QHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QHJH=next__OHJH;
+              ((__POINTER *)result__5RJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3RJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5RJH=next__3RJH;
             };
           };
-          ptr__JIMB=result__QHJH;
+          ptr__VDMB=result__5RJH;
         };
-        result__IIMB=((__ITM_BLOCK *)ptr__JIMB);
-        *(result__IIMB) = *(ITM_BLOCK__);
+        result__UDMB=((__ITM_BLOCK *)ptr__VDMB);
+        *(result__UDMB) = *(ITM_BLOCK__);
       };
-      ((__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__;
+      ((__ITM_BLOCK *)result__UDMB)->list__XKDC=lst__3FHB;
+      result__G0M=result__UDMB;
+      read_group__32GB(Self__E0M);
+      result__CSJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__CSJH=FALSE__;
       } else {
-        result__UHJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__UHJH=((__CHARACTER )(( 0)));
+        result__DSJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__DSJH=((__CHARACTER )(( 0)));
         } else {
-          result__UHJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__DSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__UHJH == '}')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__THJH=TRUE__;
+        if ((result__DSJH == '}')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__CSJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__CSJH)) {
+        pos__1UYG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_294));
+        put_position__CMG(pos__1UYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      short__token__to__YBD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
+      last_group__JRF=group_sav__M0M;
+    };
+    __tmp__2AN=result__IRJH;
+  };
+  if ((! __tmp__2AN)) {
+    if (read_external__1OO()) {
+      result__FSJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__FSJH=FALSE__;
+      } else {
+        result__GSJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__GSJH=((__CHARACTER )(( 0)));
+        } else {
+          result__GSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__GSJH == ':')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__FSJH=TRUE__;
+        };
+      };
+      if ((! result__FSJH)) {
+        __tmp__QBN=current_position__XUF();
+        result__XSTB=NULL;
+        ptr__YSTB=((__POINTER )(NULL));
+        typ_id__3STB= 0;
+        sz__0STB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__0STB ==  0)) {
+          result__XSTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__3STB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0STB);
+          if ((typ_id__3STB == (__INTEGER)(-  1))) {
+            a__KJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__LJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0STB + a__KJGH) & (__UINTEGER_32)(~ a__KJGH));
+            ptr_table__JSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ISJH=((__POINTER )(NULL));
+            result__KSJH=((__POINTER *)ptr_table__JSJH)[ 0];
+            if ((result__KSJH == (void *)NULL)) {
+              result__KSJH=new_lab__QOJ(new_size__LJGH);
+              next__ISJH=(void *)((unsigned long)result__KSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJGH)));
+              ((__POINTER *)next__ISJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JSJH)[ 0]=next__ISJH;
             } else {
-              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)));
+              next__ISJH=((__POINTER *)result__KSJH)[ 0];
+              if ((next__ISJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KSJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LJGH <<  1)) <=  4096)) {
+                  next__ISJH=(void *)((unsigned long)result__KSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LJGH)));
                 } else {
-                  next__ZHJH=new_lab__URJ(new_size__Y3FH);
+                  next__ISJH=new_lab__QOJ(new_size__LJGH);
                 };
-                ((__POINTER *)next__ZHJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0HJH)[ 0]=next__ZHJH;
+                ((__POINTER *)next__ISJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JSJH)[ 0]=next__ISJH;
               } else {
-                ((__POINTER *)result__1HJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1HJH=next__ZHJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__KSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ISJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KSJH=next__ISJH;
+              };
+            };
+            ptr__YSTB=result__KSJH;
+          } else {
+            t__PJGH=((__UINTEGER_32 )typ_id__3STB);
+            a__OJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0STB + a__OJGH) & (__UINTEGER_32)(~ a__OJGH));
+            ptr_table__OSJH=((__POINTER )(&(table_type[(t__PJGH)])));
+            lab_type__QSJH=(__UINTEGER_32)(t__PJGH |  1);
+            next__NSJH=((__POINTER )(NULL));
+            result__PSJH=((__POINTER *)ptr_table__OSJH)[ 0];
+            if ((result__PSJH == (void *)NULL)) {
+              result__PSJH=new_lab__QOJ(lab_type__QSJH);
+              next__NSJH=(void *)((unsigned long)result__PSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RSJH)));
+              ((__POINTER *)next__NSJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OSJH)[ 0]=next__NSJH;
             } else {
-              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)));
+              next__NSJH=((__POINTER *)result__PSJH)[ 0];
+              if ((next__NSJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PSJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RSJH <<  1)) <=  4096)) {
+                  next__NSJH=(void *)((unsigned long)result__PSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RSJH)));
                 } else {
-                  next__4HJH=new_lab__URJ(lab_type__BIJH);
+                  next__NSJH=new_lab__QOJ(lab_type__QSJH);
                 };
-                ((__POINTER *)next__4HJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5HJH)[ 0]=next__4HJH;
+                ((__POINTER *)next__NSJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OSJH)[ 0]=next__NSJH;
               } else {
-                ((__POINTER *)result__AIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4HJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__AIJH=next__4HJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__PSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__PSJH=next__NSJH;
+              };
+            };
+            ptr__YSTB=result__PSJH;
+          };
+          result__XSTB=((__ITM_EXTERNAL *)ptr__YSTB);
+          *(result__XSTB) = *(ITM_EXTERNAL__);
+        };
+        ((__ITM_EXTERNAL *)result__XSTB)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ=__tmp__QBN;
+        result__G0M=result__XSTB;
+      } else {
+        __tmp__YBN=current_position__XUF();
+        result__SSJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__SSJH=FALSE__;
+        } else {
+          result__TSJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__TSJH=((__CHARACTER )(( 0)));
+          } else {
+            result__TSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__TSJH == '(')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__SSJH=TRUE__;
+          };
+        };
+        result__LUTB=NULL;
+        ptr__MUTB=((__POINTER )(NULL));
+        typ_id__RUTB= 0;
+        sz__OUTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__OUTB ==  0)) {
+          result__LUTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__RUTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OUTB);
+          if ((typ_id__RUTB == (__INTEGER)(-  1))) {
+            a__SJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__TJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUTB + a__SJGH) & (__UINTEGER_32)(~ a__SJGH));
+            ptr_table__WSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__VSJH=((__POINTER )(NULL));
+            result__XSJH=((__POINTER *)ptr_table__WSJH)[ 0];
+            if ((result__XSJH == (void *)NULL)) {
+              result__XSJH=new_lab__QOJ(new_size__TJGH);
+              next__VSJH=(void *)((unsigned long)result__XSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJGH)));
+              ((__POINTER *)next__VSJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WSJH)[ 0]=next__VSJH;
             } else {
-              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)));
+              next__VSJH=((__POINTER *)result__XSJH)[ 0];
+              if ((next__VSJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XSJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__TJGH <<  1)) <=  4096)) {
+                  next__VSJH=(void *)((unsigned long)result__XSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TJGH)));
                 } else {
-                  next__GIJH=new_lab__URJ(new_size__A4FH);
+                  next__VSJH=new_lab__QOJ(new_size__TJGH);
                 };
-                ((__POINTER *)next__GIJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HIJH)[ 0]=next__GIJH;
+                ((__POINTER *)next__VSJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WSJH)[ 0]=next__VSJH;
               } else {
-                ((__POINTER *)result__IIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IIJH=next__GIJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__XSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XSJH=next__VSJH;
+              };
+            };
+            ptr__MUTB=result__XSJH;
+          } else {
+            t__XJGH=((__UINTEGER_32 )typ_id__RUTB);
+            a__WJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__4SJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUTB + a__WJGH) & (__UINTEGER_32)(~ a__WJGH));
+            ptr_table__1SJH=((__POINTER )(&(table_type[(t__XJGH)])));
+            lab_type__3SJH=(__UINTEGER_32)(t__XJGH |  1);
+            next__0SJH=((__POINTER )(NULL));
+            result__2SJH=((__POINTER *)ptr_table__1SJH)[ 0];
+            if ((result__2SJH == (void *)NULL)) {
+              result__2SJH=new_lab__QOJ(lab_type__3SJH);
+              next__0SJH=(void *)((unsigned long)result__2SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SJH)));
+              ((__POINTER *)next__0SJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1SJH)[ 0]=next__0SJH;
             } else {
-              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)));
+              next__0SJH=((__POINTER *)result__2SJH)[ 0];
+              if ((next__0SJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2SJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4SJH <<  1)) <=  4096)) {
+                  next__0SJH=(void *)((unsigned long)result__2SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4SJH)));
                 } else {
-                  next__LIJH=new_lab__URJ(lab_type__OIJH);
+                  next__0SJH=new_lab__QOJ(lab_type__3SJH);
                 };
-                ((__POINTER *)next__LIJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MIJH)[ 0]=next__LIJH;
+                ((__POINTER *)next__0SJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1SJH)[ 0]=next__0SJH;
               } else {
-                ((__POINTER *)result__NIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NIJH=next__LIJH;
+                ((__POINTER *)result__2SJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0SJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2SJH=next__0SJH;
               };
             };
-            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)) {
+            ptr__MUTB=result__2SJH;
+          };
+          result__LUTB=((__ITM_EXTERNAL_TYPE *)ptr__MUTB);
+          *(result__LUTB) = *(ITM_EXTERNAL_TYPE__);
+        };
+        Self__WXEC=((__ITM_EXTERNAL_TYPE *)result__LUTB);
+        Self__WXEC->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ=__tmp__YBN;
+        Self__WXEC->is_persistant__HDN=result__SSJH;
+        type__H0M=read_type__B4L(Self__E0M,FALSE__);
+        if (((void *)type__H0M == (void *)NULL)) {
+          pos__JVYG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_279));
+          put_position__CMG(pos__JVYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__QIJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__QIJH=FALSE__;
+        result__5SJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__5SJH=FALSE__;
         } else {
-          result__RIJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__RIJH=((__CHARACTER )(( 0)));
+          result__ATJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__ATJH=((__CHARACTER )(( 0)));
           } else {
-            result__RIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__ATJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__RIJH == '{')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__QIJH=TRUE__;
+          if ((result__ATJH == '{')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__5SJH=TRUE__;
           };
         };
-        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)) {
+        if (result__5SJH) {
+          if (((void *)read_type_list__DIO(Self__E0M,FALSE__) == (void *)NULL)) {
+            pos__LVYG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_305));
+            put_position__CMG(pos__LVYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          result__TIJH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__TIJH=FALSE__;
+          result__CTJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__CTJH=FALSE__;
           } else {
-            result__UIJH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__UIJH=((__CHARACTER )(( 0)));
+            result__DTJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__DTJH=((__CHARACTER )(( 0)));
             } else {
-              result__UIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__DTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__UIJH == '}')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__TIJH=TRUE__;
+            if ((result__DTJH == '}')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__CTJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__CTJH)) {
+            pos__NVYG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_294));
+            put_position__CMG(pos__NVYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__VXTB->is_persistant__UHN) {
-          result__WIJH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__WIJH=FALSE__;
+        if (result__LUTB->is_persistant__HDN) {
+          result__FTJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__FTJH=FALSE__;
           } else {
-            result__XIJH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__XIJH=((__CHARACTER )(( 0)));
+            result__GTJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__GTJH=((__CHARACTER )(( 0)));
             } else {
-              result__XIJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__GTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__XIJH == ')')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__WIJH=TRUE__;
+            if ((result__GTJH == ')')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__FTJH=TRUE__;
             };
           };
-          __tmp__5HN=(! result__WIJH);
+          __tmp__SDN=(! result__FTJH);
         } else {
-          __tmp__5HN=FALSE__;
+          __tmp__SDN=FALSE__;
         };
-        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)) {
+        if (__tmp__SDN) {
+          pos__PVYG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_262));
+          put_position__CMG(pos__PVYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__T4M=result__VXTB;
+        result__G0M=result__LUTB;
       };
     };
   };
-  return(result__T4M);
+  return(result__G0M);
 }
 
-static __BOOLEAN read_integer__I2P()
+static __BOOLEAN read_integer__1XP()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER_64 result__5NJE,__tmp__ROJE,result__GQPE,result__PKRE;
+  __INTEGER pos_old__5XP,__tmp__KOJE,Self__OEOE,result__EJSE,j__XOPE;
+  __INTEGER __tmp__RQPE,Self__2MQE,i__ZIRE,__tmp__0KRE,Self__AOSE;
+  __INTEGER state__2LRE,value__3LRE,i__1LRE,state__XTRE,result__0TRE;
+  __INTEGER i__WTRE;
+  __STRING *Self__3NJE,*Self__NIEH,*Self__YJGH,*Self__UOPE,*Self__EQPE;
+  __STRING *Self__XIRE,*Self__NKRE,*Self__ZLRE,*Self__UTRE;
+  __POSITION pos__WWYG,pos__JXYG,pos__YXYG;
+  __BOOLEAN result__4XP,result__NHEH,__tmp__KYP,__tmp__EZP,__tmp__1JSE;
+  __BOOLEAN result__WOPE,__tmp__PPPE,result__TVTE,__tmp__M1P;
+  __BOOLEAN result__0IRE,negative__4LRE,result__5LRE,__tmp__NNRE;
+  __BOOLEAN result__SXPG,__tmp__ZNRE,result__5XPG,result__VQEH;
+  __BOOLEAN __tmp__NORE,__tmp__MPRE,result__P0FF,result__ZQEH;
+  __BOOLEAN __tmp__ASRE,result__B1FF,result__3QEH,__tmp__NRRE;
+  __BOOLEAN negative__ZTRE,__tmp__GVRE,result__BZPG,__tmp__ZVRE;
+  __BOOLEAN __tmp__OWRE,result__P2FF,__tmp__VXRE,result__B3FF;
+  __BOOLEAN result__JJEH;
+  __CHARACTER result__DQAH,result__NQAH,result__SQAH,result__XQAH;
+  __CHARACTER result__2QAH,result__BRAH,result__GRAH,Self__CJSE;
+  __CHARACTER result__JSAH,Self__RVTE,result__ETAH,Self__5YFF;
+  __CHARACTER result__OTAH,cc__AMRE,cc__YTRE;
+  result__4XP=FALSE__;
+  pos_old__5XP= 0;
+  if (read_space__KSD()) {
+    result__DQAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__DQAH=((__CHARACTER )(( 0)));
+    } else {
+      result__DQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    };
+    result__NHEH=FALSE__;
+    if ((((__INTEGER_8 )result__DQAH) >= ((__INTEGER_8 )'0'))) {
+      result__NHEH=(((__INTEGER_8 )result__DQAH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__KYP=result__NHEH;
   } else {
-    __tmp__X2P=FALSE__;
+    __tmp__KYP=FALSE__;
   };
-  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)));
+  if (__tmp__KYP) {
+    result__4XP=TRUE__;
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    result__NQAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__NQAH=((__CHARACTER )(( 0)));
     } else {
-      result__KDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__NQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__BMT(string_tmp__VH,result__KDAH);
-    pos_old__M2P=position__0BC;
-    position__0BC=(__INTEGER)(position__0BC +  1);
-    while_do__PB0D:
+    add_last__UHT(string_tmp__VH,result__NQAH);
+    pos_old__5XP=position__CCC;
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    while_do__CB0D:
     {
-      result__PDAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__PDAH=((__CHARACTER )(( 0)));
+      result__SQAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__SQAH=((__CHARACTER )(( 0)));
       } else {
-        result__PDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__SQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if (is_hexadecimal_digit__0NJE(result__PDAH)) {
-        __tmp__R3P=TRUE__;
+      if (is_hexadecimal_digit__3LJE(result__SQAH)) {
+        __tmp__EZP=TRUE__;
       } else {
-        result__UDAH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__UDAH=((__CHARACTER )(( 0)));
+        result__XQAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__XQAH=((__CHARACTER )(( 0)));
         } else {
-          result__UDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__XQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__R3P=(result__UDAH == '_');
+        __tmp__EZP=(result__XQAH == '_');
       };
-      if (__tmp__R3P) {
-        result__ZDAH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__ZDAH=((__CHARACTER )(( 0)));
+      if (__tmp__EZP) {
+        result__2QAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__2QAH=((__CHARACTER )(( 0)));
         } else {
-          result__ZDAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__2QAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__ZDAH != '_')) {
-          result__4DAH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__4DAH=((__CHARACTER )(( 0)));
+        if ((result__2QAH != '_')) {
+          result__BRAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__BRAH=((__CHARACTER )(( 0)));
           } else {
-            result__4DAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__BRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__4DAH);
+          add_last__UHT(string_tmp__VH,result__BRAH);
         };
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto while_do__PB0D;
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto while_do__CB0D;
       };
     };
-    result__DEAH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__DEAH=((__CHARACTER )(( 0)));
+    result__GRAH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__GRAH=((__CHARACTER )(( 0)));
     } else {
-      result__DEAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__GRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    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__;
+    if ((result__GRAH == 'h')) {
+      Self__3NJE=((__STRING *)string_tmp__VH);
+      result__5NJE= 0;
+      __tmp__KOJE=Self__3NJE->count__EGC;
+      Self__OEOE= 1;
+      while ((Self__OEOE <= __tmp__KOJE)) {
+        __tmp__ROJE=(__INTEGER_64)(result__5NJE <<  4);
+        Self__CJSE=((__CHARACTER *)Self__3NJE->storage__23R)[(__INTEGER)(Self__OEOE -  1)];
+        result__EJSE= 0;
+        if ((((__INTEGER_8 )Self__CJSE) < ((__INTEGER_8 )'A'))) {
+          result__EJSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CJSE) -  48));
+          __tmp__1JSE=TRUE__;
         } else {
-          __tmp__0BSE=FALSE__;
+          __tmp__1JSE=FALSE__;
         };
-        if ((! __tmp__0BSE)) {
-          if ((((__INTEGER_8 )Self__BBSE) < ((__INTEGER_8 )'a'))) {
-            result__DBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__BBSE) -  55));
+        if ((! __tmp__1JSE)) {
+          if ((((__INTEGER_8 )Self__CJSE) < ((__INTEGER_8 )'a'))) {
+            result__EJSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CJSE) -  55));
           } else {
-            result__DBSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__BBSE) -  87));
+            result__EJSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CJSE) -  87));
           };
         };
-        result__2PJE=(__INTEGER_64)(__tmp__OQJE | ((__INTEGER_64 )result__DBSE));
-        Self__1GOE=(__INTEGER)(Self__1GOE +  1);
+        result__5NJE=(__INTEGER_64)(__tmp__ROJE | ((__INTEGER_64 )result__EJSE));
+        Self__OEOE=(__INTEGER)(Self__OEOE +  1);
       };
-      last_integer__BSO=result__2PJE;
-      position__0BC=(__INTEGER)(position__0BC +  1);
+      last_integer__UNO=result__5NJE;
+      position__CCC=(__INTEGER)(position__CCC +  1);
     } else {
-      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;
+      Self__NIEH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__NIEH->storage__23R)[(__INTEGER)(Self__NIEH->count__EGC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__YJGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__YJGH->count__EGC)) {
+          Self__YJGH->count__EGC= 0;
         } else {
-          Self__F4FH->count__4FC=(__INTEGER)(Self__F4FH->count__4FC -  1);
+          Self__YJGH->count__EGC=(__INTEGER)(Self__YJGH->count__EGC -  1);
         };
-        position__0BC=(__INTEGER)(position__0BC -  1);
+        position__CCC=(__INTEGER)(position__CCC -  1);
       };
-      result__GFAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__GFAH=((__CHARACTER )(( 0)));
+      result__JSAH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__JSAH=((__CHARACTER )(( 0)));
       } else {
-        result__GFAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__JSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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 ((result__JSAH == 'o')) {
+        Self__UOPE=((__STRING *)string_tmp__VH);
+        result__WOPE=FALSE__;
+        j__XOPE= 0;
+        if ((Self__UOPE->count__EGC !=  0)) {
+          j__XOPE= 1;
+          until_do__PLSE:
           {
-            if ((j__0PPE > Self__XPPE->count__4FC)) {
-              __tmp__SQPE=TRUE__;
+            if ((j__XOPE > Self__UOPE->count__EGC)) {
+              __tmp__PPPE=TRUE__;
             } else {
-              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'));
+              Self__RVTE=((__CHARACTER *)Self__UOPE->storage__23R)[(__INTEGER)(j__XOPE -  1)];
+              result__TVTE=FALSE__;
+              if ((((__INTEGER_8 )Self__RVTE) >= ((__INTEGER_8 )'0'))) {
+                result__TVTE=(((__INTEGER_8 )Self__RVTE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__SQPE=(! result__4LTE);
+              __tmp__PPPE=(! result__TVTE);
             };
-            if ((! __tmp__SQPE)) {
-              j__0PPE=(__INTEGER)(j__0PPE +  1);
-              goto until_do__ODSE;
+            if ((! __tmp__PPPE)) {
+              j__XOPE=(__INTEGER)(j__XOPE +  1);
+              goto until_do__PLSE;
             };
           };
-          result__ZPPE=(j__0PPE > Self__XPPE->count__4FC);
+          result__WOPE=(j__XOPE > Self__UOPE->count__EGC);
         };
-        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)) {
+        if ((! result__WOPE)) {
+          pos__WWYG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_306));
+          put_position__CMG(pos__WWYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        Self__EQPE=((__STRING *)string_tmp__VH);
+        result__GQPE= 0;
+        __tmp__RQPE=Self__EQPE->count__EGC;
+        Self__2MQE= 1;
+        while ((Self__2MQE <= __tmp__RQPE)) {
+          result__GQPE=(__INTEGER_64)((__INTEGER_64)(result__GQPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__EQPE->storage__23R)[(__INTEGER)(Self__2MQE -  1)]) -  48))));
+          Self__2MQE=(__INTEGER)(Self__2MQE +  1);
+        };
+        last_integer__UNO=result__GQPE;
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        __tmp__M1P=TRUE__;
+      } else {
+        __tmp__M1P=FALSE__;
+      };
+      if ((! __tmp__M1P)) {
+        result__ETAH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__ETAH=((__CHARACTER )(( 0)));
+        } else {
+          result__ETAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__ETAH == 'b')) {
+          Self__XIRE=((__STRING *)string_tmp__VH);
+          i__ZIRE=Self__XIRE->count__EGC;
+          result__0IRE=TRUE__;
+          while ((! ((! result__0IRE) || (i__ZIRE ==  0)))) {
+            Self__5YFF=((__CHARACTER *)Self__XIRE->storage__23R)[(__INTEGER)(i__ZIRE -  1)];
+            result__0IRE=((Self__5YFF == '0') || (Self__5YFF == '1'));
+            i__ZIRE=(__INTEGER)(i__ZIRE -  1);
+          };
+          if ((! result__0IRE)) {
+            pos__JXYG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_307));
+            put_position__CMG(pos__JXYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          Self__NKRE=((__STRING *)string_tmp__VH);
+          result__PKRE= 0;
+          __tmp__0KRE=Self__NKRE->count__EGC;
+          Self__AOSE= 1;
+          while ((Self__AOSE <= __tmp__0KRE)) {
+            result__PKRE=(__INTEGER_64)(result__PKRE <<  1);
+            if ((((__CHARACTER *)Self__NKRE->storage__23R)[(__INTEGER)(Self__AOSE -  1)] == '1')) {
+              result__PKRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__PKRE) &  -2));
+            };
+            Self__AOSE=(__INTEGER)(Self__AOSE +  1);
+          };
+          last_integer__UNO=result__PKRE;
+          position__CCC=(__INTEGER)(position__CCC +  1);
+        } else {
+          result__OTAH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__OTAH=((__CHARACTER )(( 0)));
+          } else {
+            result__OTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__OTAH == 'd')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+          };
+          Self__ZLRE=((__STRING *)string_tmp__VH);
+          state__2LRE= 0;
+          value__3LRE= 0;
+          negative__4LRE=FALSE__;
+          result__5LRE=FALSE__;
+          cc__AMRE='\0';
+          i__1LRE= 1;
+          while ((! ((state__2LRE ==  4) || (i__1LRE > Self__ZLRE->count__EGC)))) {
+            cc__AMRE=((__CHARACTER *)Self__ZLRE->storage__23R)[(__INTEGER)(i__1LRE -  1)];
+            if ((state__2LRE ==  0)) {
+              if ((((((((cc__AMRE == ' ') || (cc__AMRE == '\t')) || (cc__AMRE == '\n')) || (cc__AMRE == '\r')) || (cc__AMRE == '\0')) || (cc__AMRE == '\f')) || (cc__AMRE == '\v'))) {
+                __tmp__NNRE=TRUE__;
               } else {
-                result__5KPG=(cc__CFRE == '+');
-                if (result__5KPG) {
-                  state__4ERE= 1;
+                result__SXPG=(cc__AMRE == '+');
+                if (result__SXPG) {
+                  state__2LRE= 1;
                 };
-                __tmp__PGRE=result__5KPG;
+                __tmp__NNRE=result__SXPG;
               };
-              if (__tmp__PGRE) {
-                __tmp__1GRE=TRUE__;
+              if (__tmp__NNRE) {
+                __tmp__ZNRE=TRUE__;
               } else {
-                result__MLPG=(cc__CFRE == '-');
-                if (result__MLPG) {
-                  negative__AFRE=TRUE__;
-                  state__4ERE= 1;
+                result__5XPG=(cc__AMRE == '-');
+                if (result__5XPG) {
+                  negative__4LRE=TRUE__;
+                  state__2LRE= 1;
                 };
-                __tmp__1GRE=result__MLPG;
+                __tmp__ZNRE=result__5XPG;
               };
-              if ((! __tmp__1GRE)) {
-                result__FFEH=FALSE__;
-                if ((((__INTEGER_8 )cc__CFRE) >= ((__INTEGER_8 )'0'))) {
-                  result__FFEH=(((__INTEGER_8 )cc__CFRE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__ZNRE)) {
+                result__VQEH=FALSE__;
+                if ((((__INTEGER_8 )cc__AMRE) >= ((__INTEGER_8 )'0'))) {
+                  result__VQEH=(((__INTEGER_8 )cc__AMRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__FFEH) {
-                  value__5ERE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48);
-                  state__4ERE= 2;
+                if (result__VQEH) {
+                  value__3LRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48);
+                  state__2LRE= 2;
                 } else {
-                  state__4ERE= 4;
+                  state__2LRE= 4;
                 };
               };
-              __tmp__PHRE=TRUE__;
+              __tmp__NORE=TRUE__;
             } else {
-              __tmp__PHRE=FALSE__;
+              __tmp__NORE=FALSE__;
             };
-            if (__tmp__PHRE) {
-              __tmp__OIRE=TRUE__;
+            if (__tmp__NORE) {
+              __tmp__MPRE=TRUE__;
             } else {
-              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'));
+              result__P0FF=(state__2LRE ==  1);
+              if (result__P0FF) {
+                result__ZQEH=FALSE__;
+                if ((((__INTEGER_8 )cc__AMRE) >= ((__INTEGER_8 )'0'))) {
+                  result__ZQEH=(((__INTEGER_8 )cc__AMRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__JFEH) {
-                  value__5ERE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48);
-                  if (negative__AFRE) {
-                    value__5ERE=(__INTEGER)(- value__5ERE);
+                if (result__ZQEH) {
+                  value__3LRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48);
+                  if (negative__4LRE) {
+                    value__3LRE=(__INTEGER)(- value__3LRE);
                   };
-                  state__4ERE= 2;
+                  state__2LRE= 2;
                 } else {
-                  state__4ERE= 4;
+                  state__2LRE= 4;
                 };
               };
-              __tmp__OIRE=result__TRFF;
+              __tmp__MPRE=result__P0FF;
             };
-            if (__tmp__OIRE) {
-              __tmp__CLRE=TRUE__;
+            if (__tmp__MPRE) {
+              __tmp__ASRE=TRUE__;
             } else {
-              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'));
+              result__B1FF=(state__2LRE ==  2);
+              if (result__B1FF) {
+                result__3QEH=FALSE__;
+                if ((((__INTEGER_8 )cc__AMRE) >= ((__INTEGER_8 )'0'))) {
+                  result__3QEH=(((__INTEGER_8 )cc__AMRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__NFEH) {
-                  if (negative__AFRE) {
-                    value__5ERE=(__INTEGER)((__INTEGER)( 10 * value__5ERE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48));
+                if (result__3QEH) {
+                  if (negative__4LRE) {
+                    value__3LRE=(__INTEGER)((__INTEGER)( 10 * value__3LRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48));
                   } else {
-                    value__5ERE=(__INTEGER)((__INTEGER)( 10 * value__5ERE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CFRE)) -  48));
+                    value__3LRE=(__INTEGER)((__INTEGER)( 10 * value__3LRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48));
                   };
-                  if (((negative__AFRE && (value__5ERE >  0)) || ((! negative__AFRE) && (value__5ERE <  0)))) {
-                    state__4ERE= 4;
+                  if (((negative__4LRE && (value__3LRE >  0)) || ((! negative__4LRE) && (value__3LRE <  0)))) {
+                    state__2LRE= 4;
                   };
-                  __tmp__PKRE=TRUE__;
+                  __tmp__NRRE=TRUE__;
                 } else {
-                  __tmp__PKRE=FALSE__;
+                  __tmp__NRRE=FALSE__;
                 };
-                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;
+                if ((! __tmp__NRRE)) {
+                  if ((((((((cc__AMRE == ' ') || (cc__AMRE == '\t')) || (cc__AMRE == '\n')) || (cc__AMRE == '\r')) || (cc__AMRE == '\0')) || (cc__AMRE == '\f')) || (cc__AMRE == '\v'))) {
+                    state__2LRE= 3;
                   } else {
-                    state__4ERE= 4;
+                    state__2LRE= 4;
                   };
                 };
               };
-              __tmp__CLRE=result__FSFF;
+              __tmp__ASRE=result__B1FF;
             };
-            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;
+            if ((! __tmp__ASRE)) {
+              if ((state__2LRE ==  3)) {
+                if ((! (((((((cc__AMRE == ' ') || (cc__AMRE == '\t')) || (cc__AMRE == '\n')) || (cc__AMRE == '\r')) || (cc__AMRE == '\0')) || (cc__AMRE == '\f')) || (cc__AMRE == '\v')))) {
+                  state__2LRE= 4;
                 };
               };
             };
-            i__3ERE=(__INTEGER)(i__3ERE +  1);
+            i__1LRE=(__INTEGER)(i__1LRE +  1);
           };
-          if (((state__4ERE !=  0) && (state__4ERE !=  4))) {
-            result__BFRE=TRUE__;
+          if (((state__2LRE !=  0) && (state__2LRE !=  4))) {
+            result__5LRE=TRUE__;
           };
-          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)) {
+          if ((! result__5LRE)) {
+            pos__YXYG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_308));
+            put_position__CMG(pos__YXYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          Self__UTRE=((__STRING *)string_tmp__VH);
+          state__XTRE= 0;
+          cc__YTRE='\0';
+          negative__ZTRE=FALSE__;
+          result__0TRE= 0;
+          i__WTRE= 1;
+          while ((i__WTRE <= Self__UTRE->count__EGC)) {
+            cc__YTRE=((__CHARACTER *)Self__UTRE->storage__23R)[(__INTEGER)(i__WTRE -  1)];
+            if ((state__XTRE ==  0)) {
+              if ((((((((cc__YTRE == ' ') || (cc__YTRE == '\t')) || (cc__YTRE == '\n')) || (cc__YTRE == '\r')) || (cc__YTRE == '\0')) || (cc__YTRE == '\f')) || (cc__YTRE == '\v'))) {
+                __tmp__GVRE=TRUE__;
               } else {
-                result__OMPG=(cc__0MRE == '+');
-                if (result__OMPG) {
-                  state__ZMRE= 1;
+                result__BZPG=(cc__YTRE == '+');
+                if (result__BZPG) {
+                  state__XTRE= 1;
                 };
-                __tmp__IORE=result__OMPG;
+                __tmp__GVRE=result__BZPG;
               };
-              if ((! __tmp__IORE)) {
-                if ((cc__0MRE == '-')) {
-                  negative__1MRE=TRUE__;
-                  state__ZMRE= 1;
+              if ((! __tmp__GVRE)) {
+                if ((cc__YTRE == '-')) {
+                  negative__ZTRE=TRUE__;
+                  state__XTRE= 1;
                 } else {
-                  result__2MRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48);
-                  state__ZMRE= 2;
+                  result__0TRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48);
+                  state__XTRE= 2;
                 };
               };
-              __tmp__1ORE=TRUE__;
+              __tmp__ZVRE=TRUE__;
             } else {
-              __tmp__1ORE=FALSE__;
+              __tmp__ZVRE=FALSE__;
             };
-            if (__tmp__1ORE) {
-              __tmp__QPRE=TRUE__;
+            if (__tmp__ZVRE) {
+              __tmp__OWRE=TRUE__;
             } else {
-              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);
+              result__P2FF=(state__XTRE ==  1);
+              if (result__P2FF) {
+                result__0TRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48);
+                if (negative__ZTRE) {
+                  result__0TRE=(__INTEGER)(- result__0TRE);
                 };
-                state__ZMRE= 2;
+                state__XTRE= 2;
               };
-              __tmp__QPRE=result__TTFF;
+              __tmp__OWRE=result__P2FF;
             };
-            if (__tmp__QPRE) {
-              __tmp__XQRE=TRUE__;
+            if (__tmp__OWRE) {
+              __tmp__VXRE=TRUE__;
             } else {
-              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'));
+              result__B3FF=(state__XTRE ==  2);
+              if (result__B3FF) {
+                result__JJEH=FALSE__;
+                if ((((__INTEGER_8 )cc__YTRE) >= ((__INTEGER_8 )'0'))) {
+                  result__JJEH=(((__INTEGER_8 )cc__YTRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__Z3DH) {
-                  if (negative__1MRE) {
-                    result__2MRE=(__INTEGER)((__INTEGER)( 10 * result__2MRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48));
+                if (result__JJEH) {
+                  if (negative__ZTRE) {
+                    result__0TRE=(__INTEGER)((__INTEGER)( 10 * result__0TRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48));
                   } else {
-                    result__2MRE=(__INTEGER)((__INTEGER)( 10 * result__2MRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0MRE)) -  48));
+                    result__0TRE=(__INTEGER)((__INTEGER)( 10 * result__0TRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48));
                   };
                 } else {
-                  state__ZMRE= 3;
+                  state__XTRE= 3;
                 };
               };
-              __tmp__XQRE=result__FUFF;
+              __tmp__VXRE=result__B3FF;
             };
-            if ((! __tmp__XQRE)) {
-              if ((state__ZMRE ==  3)) {
-                i__YMRE=Self__WMRE->count__4FC;
+            if ((! __tmp__VXRE)) {
+              if ((state__XTRE ==  3)) {
+                i__WTRE=Self__UTRE->count__EGC;
               };
             };
-            i__YMRE=(__INTEGER)(i__YMRE +  1);
+            i__WTRE=(__INTEGER)(i__WTRE +  1);
           };
-          last_integer__BSO=((__INTEGER_64 )result__2MRE);
+          last_integer__UNO=((__INTEGER_64 )result__0TRE);
         };
       };
     };
   };
-  if (result__L2P) {
-    short__token__to__TBD((&__string_121),pos_old__M2P,position__0BC);
+  if (result__4XP) {
+    short__token__to__YBD((&__string_121),pos_old__5XP,position__CCC);
   };
-  return(result__L2P);
+  return(result__4XP);
 }
 
-static void* readlip_expr__RTPB()
+static void* readlip_expr__PQPB()
 // () With resultRecursive, No inlinable.
 {
-  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)) {
+  void *result__SQPB,*val__TQPB,*result__0KYC,*val__CLYC;
+  void *nam__UQPB;
+  __POSITION pos__DYYG,p__MK3B,pos__LYYG,pos__NYYG,pos__PYYG,pos__RYYG;
+  __POSITION pos__TYYG,pos__VYYG,p__GMID,p__DVHE,pos__DZYG;
+  __LIP_AFFECT *result__JV4B,*Self__AGHC;
+  __POINTER ptr__KV4B,ptr_table__JTJH,next__ITJH,result__KTJH;
+  __POINTER ptr_table__OTJH,next__NTJH,result__PTJH,ptr__2RKD;
+  __POINTER ptr_table__IUJH,next__HUJH,result__JUJH,ptr_table__NUJH;
+  __POINTER next__MUJH,result__OUJH,ptr__T5ME,ptr_table__SUJH;
+  __POINTER next__RUJH,result__TUJH,ptr_table__XUJH,next__WUJH;
+  __POINTER result__YUJH;
+  __INTEGER typ_id__PV4B,typ_id__BSKD,typ_id__Y5ME;
+  __UINTEGER_32 sz__MV4B,a__2JGH,new_size__3JGH,t__BKGH,a__AKGH;
+  __UINTEGER_32 new_size__RTJH,lab_type__QTJH,sz__4RKD,a__EKGH;
+  __UINTEGER_32 new_size__FKGH,t__JKGH,a__IKGH,new_size__QUJH;
+  __UINTEGER_32 lab_type__PUJH,sz__V5ME,a__MKGH,new_size__NKGH,t__RKGH;
+  __UINTEGER_32 a__QKGH,new_size__0UJH,lab_type__ZUJH;
+  __LIP_IF *result__1RKD,*Self__IRTD;
+  __LIP_PRINT *result__S5ME,*Self__ZLWE;
+  __BOOLEAN result__STJH,__tmp__ISPB,result__VTJH,result__YTJH;
+  __BOOLEAN result__1TJH,result__4TJH,result__BUJH,result__EUJH;
+  __BOOLEAN __tmp__UOYC;
+  __CHARACTER result__TTJH,result__WTJH,result__ZTJH,result__2TJH;
+  __CHARACTER result__5TJH,result__CUJH,result__FUJH;
+  void *the__ALYC,*els__BLYC,*result__K4HH,*result__MKID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__L4HH,*Self__M4HH,*Self__NG5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__DH5D;
+  result__SQPB=NULL;
+  val__TQPB=NULL;
+  nam__UQPB=NULL;
+  old_position__HOI=position__CCC;
+  old_pos_cur__JOI=pos_cur__FCC;
+  old_pos_line__LOI=pos_line__GCC;
+  old_pos_col__NOI=pos_col__HCC;
+  old_short_derive__POI=short_derive__PCC;
+  if (read_identifier__12K()) {
+    nam__UQPB=last_string__V0C;
+    if (read_symbol__3TJ((&__string_12))) {
+      val__TQPB=readlip_expr_operator__BLZB(PARSER__);
+      if (((void *)val__TQPB == (void *)NULL)) {
+        pos__DYYG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_240));
+        put_position__CMG(pos__DYYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      p__MK3B=current_position__XUF();
+      result__JV4B=NULL;
+      ptr__KV4B=((__POINTER )(NULL));
+      typ_id__PV4B= 0;
+      sz__MV4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__MV4B ==  0)) {
+        result__JV4B=LIP_AFFECT__;
+      } else {
+        typ_id__PV4B=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MV4B);
+        if ((typ_id__PV4B == (__INTEGER)(-  1))) {
+          a__2JGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__3JGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MV4B + a__2JGH) & (__UINTEGER_32)(~ a__2JGH));
+          ptr_table__JTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3JGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__ITJH=((__POINTER )(NULL));
+          result__KTJH=((__POINTER *)ptr_table__JTJH)[ 0];
+          if ((result__KTJH == (void *)NULL)) {
+            result__KTJH=new_lab__QOJ(new_size__3JGH);
+            next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3JGH)));
+            ((__POINTER *)next__ITJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
+          } else {
+            next__ITJH=((__POINTER *)result__KTJH)[ 0];
+            if ((next__ITJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KTJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__3JGH <<  1)) <=  4096)) {
+                next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3JGH)));
               } else {
-                next__ZIJH=new_lab__URJ(new_size__K4FH);
+                next__ITJH=new_lab__QOJ(new_size__3JGH);
               };
-              ((__POINTER *)next__ZIJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0IJH)[ 0]=next__ZIJH;
+              ((__POINTER *)next__ITJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__KTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__KTJH=next__ITJH;
+            };
+          };
+          ptr__KV4B=result__KTJH;
+        } else {
+          t__BKGH=((__UINTEGER_32 )typ_id__PV4B);
+          a__AKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__RTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MV4B + a__AKGH) & (__UINTEGER_32)(~ a__AKGH));
+          ptr_table__OTJH=((__POINTER )(&(table_type[(t__BKGH)])));
+          lab_type__QTJH=(__UINTEGER_32)(t__BKGH |  1);
+          next__NTJH=((__POINTER )(NULL));
+          result__PTJH=((__POINTER *)ptr_table__OTJH)[ 0];
+          if ((result__PTJH == (void *)NULL)) {
+            result__PTJH=new_lab__QOJ(lab_type__QTJH);
+            next__NTJH=(void *)((unsigned long)result__PTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTJH)));
+            ((__POINTER *)next__NTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OTJH)[ 0]=next__NTJH;
+          } else {
+            next__NTJH=((__POINTER *)result__PTJH)[ 0];
+            if ((next__NTJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RTJH <<  1)) <=  4096)) {
+                next__NTJH=(void *)((unsigned long)result__PTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RTJH)));
               } else {
-                next__4IJH=new_lab__URJ(lab_type__BJJH);
+                next__NTJH=new_lab__QOJ(lab_type__QTJH);
               };
-              ((__POINTER *)next__4IJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5IJH)[ 0]=next__4IJH;
+              ((__POINTER *)next__NTJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OTJH)[ 0]=next__NTJH;
             } else {
-              ((__POINTER *)result__AJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AJJH=next__4IJH;
+              ((__POINTER *)result__PTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__PTJH=next__NTJH;
             };
           };
-          ptr__3Y4B=result__AJJH;
+          ptr__KV4B=result__PTJH;
         };
-        result__2Y4B=((__LIP_AFFECT *)ptr__3Y4B);
-        *(result__2Y4B) = *(LIP_AFFECT__);
+        result__JV4B=((__LIP_AFFECT *)ptr__KV4B);
+        *(result__JV4B) = *(LIP_AFFECT__);
       };
-      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;
+      Self__AGHC=((__LIP_AFFECT *)result__JV4B);
+      Self__AGHC->parent_lip_code__PRPB.parent_itm_object__NAE.position__RAJ=p__MK3B;
+      Self__AGHC->name__NEFC=nam__UQPB;
+      Self__AGHC->value__5EFC=val__TQPB;
+      result__SQPB=result__JV4B;
     } else {
-      restore_context__1DL();
+      restore_context__DAL();
     };
   };
-  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__;
+  if (((void *)result__SQPB == (void *)NULL)) {
+    result__SQPB=readlip_expr_operator__BLZB(PARSER__);
+    if (((void *)result__SQPB != (void *)NULL)) {
+      result__STJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__STJH=FALSE__;
       } else {
-        result__EJJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__EJJH=((__CHARACTER )(( 0)));
+        result__TTJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__TTJH=((__CHARACTER )(( 0)));
         } else {
-          result__EJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__TTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__EJJH == '.')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__DJJH=TRUE__;
+        if ((result__TTJH == '.')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__STJH=TRUE__;
         };
       };
-      __tmp__KVPB=result__DJJH;
+      __tmp__ISPB=result__STJH;
     } else {
-      __tmp__KVPB=FALSE__;
+      __tmp__ISPB=FALSE__;
     };
-    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);
+    if (__tmp__ISPB) {
+      result__0KYC=NULL;
+      the__ALYC=NULL;
+      els__BLYC=NULL;
+      val__CLYC=NULL;
+      if (read_word__4MF((&__string_89))) {
+        result__K4HH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID)->parent_arrayed_collection__RKID.upper__IPTD <  0)) {
+          result__K4HH=create_with_capacity__IRKD( 16);
         } else {
-          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);
+          Self__L4HH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID);
+          result__K4HH=((void **)Self__L4HH->parent_arrayed_collection__RKID.storage__FCUD)[Self__L4HH->parent_arrayed_collection__RKID.upper__IPTD];
+          Self__M4HH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID);
+          Self__M4HH->parent_arrayed_collection__RKID.upper__IPTD=(__INTEGER)(Self__M4HH->parent_arrayed_collection__RKID.upper__IPTD -  1);
         };
-        the__WLYC=result__GTHH;
-        result__GJJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__GJJH=FALSE__;
+        the__ALYC=result__K4HH;
+        result__VTJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__VTJH=FALSE__;
         } else {
-          result__HJJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__HJJH=((__CHARACTER )(( 0)));
+          result__WTJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__WTJH=((__CHARACTER )(( 0)));
           } else {
-            result__HJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__WTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HJJH == '{')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__GJJH=TRUE__;
+          if ((result__WTJH == '{')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__VTJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__VTJH)) {
+          pos__LYYG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_273));
+          put_position__CMG(pos__LYYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__DLID:
+        while_do__HLID:
         {
-          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__;
+          val__CLYC=readlip_expr__PQPB();
+          if (((void *)val__CLYC != (void *)NULL)) {
+            add_last__CKUD(the__ALYC,val__CLYC);
+            result__YTJH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__YTJH=FALSE__;
             } else {
-              result__KJJH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__KJJH=((__CHARACTER )(( 0)));
+              result__ZTJH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__ZTJH=((__CHARACTER )(( 0)));
               } else {
-                result__KJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__ZTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__KJJH == ';')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__JJJH=TRUE__;
+              if ((result__ZTJH == ';')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__YTJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__YTJH)) {
+              pos__NYYG=current_position__XUF();
+              put_error__text__YKG( 2,(&__string_167));
+              put_position__CMG(pos__NYYG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__DLID;
+            goto while_do__HLID;
           };
         };
-        result__MJJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__MJJH=FALSE__;
+        result__1TJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__1TJH=FALSE__;
         } else {
-          result__NJJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__NJJH=((__CHARACTER )(( 0)));
+          result__2TJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__2TJH=((__CHARACTER )(( 0)));
           } else {
-            result__NJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__2TJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__NJJH == '}')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__MJJH=TRUE__;
+          if ((result__2TJH == '}')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__1TJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__1TJH)) {
+          pos__PYYG=current_position__XUF();
+          put_error__text__YKG( 2,(&__string_273));
+          put_position__CMG(pos__PYYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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);
+        the__ALYC=copy__ULID(result__K4HH);
+        if (read_word__4MF((&__string_90))) {
+          result__MKID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID)->parent_arrayed_collection__RKID.upper__IPTD <  0)) {
+            result__MKID=create_with_capacity__IRKD( 16);
           } else {
-            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);
+            Self__NG5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID);
+            result__MKID=((void **)Self__NG5D->parent_arrayed_collection__RKID.storage__FCUD)[Self__NG5D->parent_arrayed_collection__RKID.upper__IPTD];
+            Self__DH5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID);
+            Self__DH5D->parent_arrayed_collection__RKID.upper__IPTD=(__INTEGER)(Self__DH5D->parent_arrayed_collection__RKID.upper__IPTD -  1);
           };
-          els__XLYC=result__IKID;
-          result__PJJH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__PJJH=FALSE__;
+          els__BLYC=result__MKID;
+          result__4TJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__4TJH=FALSE__;
           } else {
-            result__QJJH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__QJJH=((__CHARACTER )(( 0)));
+            result__5TJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__5TJH=((__CHARACTER )(( 0)));
             } else {
-              result__QJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__5TJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__QJJH == '{')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__PJJH=TRUE__;
+            if ((result__5TJH == '{')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__4TJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__4TJH)) {
+            pos__RYYG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_273));
+            put_position__CMG(pos__RYYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__G3LD:
+          while_do__Z3LD:
           {
-            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__;
+            val__CLYC=readlip_expr__PQPB();
+            if (((void *)val__CLYC != (void *)NULL)) {
+              add_last__CKUD(els__BLYC,val__CLYC);
+              result__BUJH=FALSE__;
+              if ((! read_space__KSD())) {
+                result__BUJH=FALSE__;
               } else {
-                result__TJJH='\0';
-                if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                  result__TJJH=((__CHARACTER )(( 0)));
+                result__CUJH='\0';
+                if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                  result__CUJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__TJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                  result__CUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__TJJH == ';')) {
-                  position__0BC=(__INTEGER)(position__0BC +  1);
-                  result__SJJH=TRUE__;
+                if ((result__CUJH == ';')) {
+                  position__CCC=(__INTEGER)(position__CCC +  1);
+                  result__BUJH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__BUJH)) {
+                pos__TYYG=current_position__XUF();
+                put_error__text__YKG( 2,(&__string_167));
+                put_position__CMG(pos__TYYG);
+                put_string__CZF(msg_err__3KG);
+                if ((type_error__2KG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__G3LD;
+              goto while_do__Z3LD;
             };
           };
-          result__VJJH=FALSE__;
-          if ((! read_space__FSD())) {
-            result__VJJH=FALSE__;
+          result__EUJH=FALSE__;
+          if ((! read_space__KSD())) {
+            result__EUJH=FALSE__;
           } else {
-            result__WJJH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__WJJH=((__CHARACTER )(( 0)));
+            result__FUJH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__FUJH=((__CHARACTER )(( 0)));
             } else {
-              result__WJJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__FUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__WJJH == '}')) {
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              result__VJJH=TRUE__;
+            if ((result__FUJH == '}')) {
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              result__EUJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__EUJH)) {
+            pos__VYYG=current_position__XUF();
+            put_error__text__YKG( 2,(&__string_273));
+            put_position__CMG(pos__VYYG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          els__BLYC=copy__ULID(result__MKID);
+        };
+        p__GMID=current_position__XUF();
+        result__1RKD=NULL;
+        ptr__2RKD=((__POINTER )(NULL));
+        typ_id__BSKD= 0;
+        sz__4RKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__4RKD ==  0)) {
+          result__1RKD=LIP_IF__;
+        } else {
+          typ_id__BSKD=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4RKD);
+          if ((typ_id__BSKD == (__INTEGER)(-  1))) {
+            a__EKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FKGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RKD + a__EKGH) & (__UINTEGER_32)(~ a__EKGH));
+            ptr_table__IUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FKGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__HUJH=((__POINTER )(NULL));
+            result__JUJH=((__POINTER *)ptr_table__IUJH)[ 0];
+            if ((result__JUJH == (void *)NULL)) {
+              result__JUJH=new_lab__QOJ(new_size__FKGH);
+              next__HUJH=(void *)((unsigned long)result__JUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKGH)));
+              ((__POINTER *)next__HUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IUJH)[ 0]=next__HUJH;
             } else {
-              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)));
+              next__HUJH=((__POINTER *)result__JUJH)[ 0];
+              if ((next__HUJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JUJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__FKGH <<  1)) <=  4096)) {
+                  next__HUJH=(void *)((unsigned long)result__JUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FKGH)));
                 } else {
-                  next__YJJH=new_lab__URJ(new_size__S4FH);
+                  next__HUJH=new_lab__QOJ(new_size__FKGH);
                 };
-                ((__POINTER *)next__YJJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZJJH)[ 0]=next__YJJH;
+                ((__POINTER *)next__HUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__IUJH)[ 0]=next__HUJH;
               } else {
-                ((__POINTER *)result__0JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__0JJH=next__YJJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__JUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__JUJH=next__HUJH;
+              };
+            };
+            ptr__2RKD=result__JUJH;
+          } else {
+            t__JKGH=((__UINTEGER_32 )typ_id__BSKD);
+            a__IKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__QUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4RKD + a__IKGH) & (__UINTEGER_32)(~ a__IKGH));
+            ptr_table__NUJH=((__POINTER )(&(table_type[(t__JKGH)])));
+            lab_type__PUJH=(__UINTEGER_32)(t__JKGH |  1);
+            next__MUJH=((__POINTER )(NULL));
+            result__OUJH=((__POINTER *)ptr_table__NUJH)[ 0];
+            if ((result__OUJH == (void *)NULL)) {
+              result__OUJH=new_lab__QOJ(lab_type__PUJH);
+              next__MUJH=(void *)((unsigned long)result__OUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUJH)));
+              ((__POINTER *)next__MUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NUJH)[ 0]=next__MUJH;
             } else {
-              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)));
+              next__MUJH=((__POINTER *)result__OUJH)[ 0];
+              if ((next__MUJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OUJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QUJH <<  1)) <=  4096)) {
+                  next__MUJH=(void *)((unsigned long)result__OUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QUJH)));
                 } else {
-                  next__3JJH=new_lab__URJ(lab_type__AKJH);
+                  next__MUJH=new_lab__QOJ(lab_type__PUJH);
                 };
-                ((__POINTER *)next__3JJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__4JJH)[ 0]=next__3JJH;
+                ((__POINTER *)next__MUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__NUJH)[ 0]=next__MUJH;
               } else {
-                ((__POINTER *)result__5JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__5JJH=next__3JJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__OUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__OUJH=next__MUJH;
+              };
+            };
+            ptr__2RKD=result__OUJH;
+          };
+          result__1RKD=((__LIP_IF *)ptr__2RKD);
+          *(result__1RKD) = *(LIP_IF__);
+        };
+        Self__IRTD=((__LIP_IF *)result__1RKD);
+        Self__IRTD->parent_lip_code__QOYC.parent_itm_object__NAE.position__RAJ=p__GMID;
+        Self__IRTD->condition__WBQD=result__SQPB;
+        Self__IRTD->then__MCQD=the__ALYC;
+        Self__IRTD->else__DDQD=els__BLYC;
+        result__0KYC=result__1RKD;
+        __tmp__UOYC=TRUE__;
+      } else {
+        __tmp__UOYC=FALSE__;
+      };
+      if ((! __tmp__UOYC)) {
+        if (read_word__4MF((&__string_91))) {
+          p__DVHE=current_position__XUF();
+          result__S5ME=NULL;
+          ptr__T5ME=((__POINTER )(NULL));
+          typ_id__Y5ME= 0;
+          sz__V5ME=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__V5ME ==  0)) {
+            result__S5ME=LIP_PRINT__;
+          } else {
+            typ_id__Y5ME=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V5ME);
+            if ((typ_id__Y5ME == (__INTEGER)(-  1))) {
+              a__MKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__NKGH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5ME + a__MKGH) & (__UINTEGER_32)(~ a__MKGH));
+              ptr_table__SUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NKGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__RUJH=((__POINTER )(NULL));
+              result__TUJH=((__POINTER *)ptr_table__SUJH)[ 0];
+              if ((result__TUJH == (void *)NULL)) {
+                result__TUJH=new_lab__QOJ(new_size__NKGH);
+                next__RUJH=(void *)((unsigned long)result__TUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NKGH)));
+                ((__POINTER *)next__RUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SUJH)[ 0]=next__RUJH;
               } else {
-                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)));
+                next__RUJH=((__POINTER *)result__TUJH)[ 0];
+                if ((next__RUJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TUJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NKGH <<  1)) <=  4096)) {
+                    next__RUJH=(void *)((unsigned long)result__TUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NKGH)));
                   } else {
-                    next__CKJH=new_lab__URJ(new_size__04FH);
+                    next__RUJH=new_lab__QOJ(new_size__NKGH);
                   };
-                  ((__POINTER *)next__CKJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DKJH)[ 0]=next__CKJH;
+                  ((__POINTER *)next__RUJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__SUJH)[ 0]=next__RUJH;
                 } else {
-                  ((__POINTER *)result__EKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__EKJH=next__CKJH;
+                  ((__POINTER *)result__TUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__TUJH=next__RUJH;
                 };
               };
-              ptr__QBNE=result__EKJH;
+              ptr__T5ME=result__TUJH;
             } else {
-              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;
+              t__RKGH=((__UINTEGER_32 )typ_id__Y5ME);
+              a__QKGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0UJH=(__UINTEGER_32)((__UINTEGER_32)(sz__V5ME + a__QKGH) & (__UINTEGER_32)(~ a__QKGH));
+              ptr_table__XUJH=((__POINTER )(&(table_type[(t__RKGH)])));
+              lab_type__ZUJH=(__UINTEGER_32)(t__RKGH |  1);
+              next__WUJH=((__POINTER )(NULL));
+              result__YUJH=((__POINTER *)ptr_table__XUJH)[ 0];
+              if ((result__YUJH == (void *)NULL)) {
+                result__YUJH=new_lab__QOJ(lab_type__ZUJH);
+                next__WUJH=(void *)((unsigned long)result__YUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UJH)));
+                ((__POINTER *)next__WUJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XUJH)[ 0]=next__WUJH;
               } else {
-                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)));
+                next__WUJH=((__POINTER *)result__YUJH)[ 0];
+                if ((next__WUJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YUJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0UJH <<  1)) <=  4096)) {
+                    next__WUJH=(void *)((unsigned long)result__YUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UJH)));
                   } else {
-                    next__HKJH=new_lab__URJ(lab_type__KKJH);
+                    next__WUJH=new_lab__QOJ(lab_type__ZUJH);
                   };
-                  ((__POINTER *)next__HKJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__IKJH)[ 0]=next__HKJH;
+                  ((__POINTER *)next__WUJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__XUJH)[ 0]=next__WUJH;
                 } else {
-                  ((__POINTER *)result__JKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__JKJH=next__HKJH;
+                  ((__POINTER *)result__YUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__YUJH=next__WUJH;
                 };
               };
-              ptr__QBNE=result__JKJH;
+              ptr__T5ME=result__YUJH;
             };
-            result__PBNE=((__LIP_PRINT *)ptr__QBNE);
-            *(result__PBNE) = *(LIP_PRINT__);
+            result__S5ME=((__LIP_PRINT *)ptr__T5ME);
+            *(result__S5ME) = *(LIP_PRINT__);
           };
-          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;
+          Self__ZLWE=((__LIP_PRINT *)result__S5ME);
+          Self__ZLWE->parent_lip_code__CPYC.parent_itm_object__NAE.position__RAJ=p__DVHE;
+          Self__ZLWE->message__IOUE=result__SQPB;
+          result__0KYC=result__S5ME;
         };
       };
-      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)) {
+      result__SQPB=result__0KYC;
+      if (((void *)result__0KYC == (void *)NULL)) {
+        pos__DZYG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_276));
+        put_position__CMG(pos__DZYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__UTPB);
+  return(result__SQPB);
 }
 
-static void run__YGFC(__LIP_AFFECT *Self__ZGFC)
+static void run__HEFC(__LIP_AFFECT *Self__IEFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __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)) {
+  __POSITION pos__Y01G,pos__PI5C;
+  void *__tmp__AFFC;
+  void *__tmp__BFFC,*__tmp__2UJH,*__tmp__3UJH;
+  __LIP_INTEGER *Self__4UJH;
+  __LIP_STRING *Self__5UJH;
+  if (((void *)fast_reference_at__ETRD(list_data__UMNC,Self__IEFC->name__NEFC) == (void *)NULL)) {
+    copy__U4R(string_tmp__VH,(&__string_309));
+    append__2JS(string_tmp__VH,Self__IEFC->name__NEFC);
+    append__2JS(string_tmp__VH,(&__string_310));
+    pos__Y01G=Self__IEFC->parent_lip_code__PRPB.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,string_tmp__VH);
+    put_position__CMG(pos__Y01G);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__RHFC=Self__ZGFC->value__QHFC;
-  switch (((struct ___OBJ *)__tmp__RHFC)->__id) {
+  __tmp__AFFC=Self__IEFC->value__5EFC;
+  switch (((struct ___OBJ *)__tmp__AFFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__SHFC=run_expr__OZQD(__tmp__RHFC);
+    __tmp__BFFC=run_expr__2XQD(__tmp__AFFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__SHFC=run_expr__N2QD(__tmp__RHFC);
+    __tmp__BFFC=run_expr__10QD(__tmp__AFFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__SHFC=run_expr__IGUE(__tmp__RHFC);
+    __tmp__BFFC=run_expr__DQUE(__tmp__AFFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__NKJH=((__LIP_VALUE *)__tmp__RHFC)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__NKJH)->__id) {
+    __tmp__2UJH=((__LIP_VALUE *)__tmp__AFFC)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__2UJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__OKJH=((__LIP_BOOLEAN *)__tmp__NKJH);
+      __tmp__3UJH=((__LIP_BOOLEAN *)__tmp__2UJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__PKJH=((__LIP_INTEGER *)__tmp__NKJH);
-      __tmp__OKJH=get__KJSE(Self__PKJH,Self__PKJH->value__3Y3F);
+      Self__4UJH=((__LIP_INTEGER *)__tmp__2UJH);
+      __tmp__3UJH=get__LRSE(Self__4UJH,Self__4UJH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__QKJH=((__LIP_STRING *)__tmp__NKJH);
-      __tmp__OKJH=get__TMFF(Self__QKJH,Self__QKJH->value__WBUE);
+      Self__5UJH=((__LIP_STRING *)__tmp__2UJH);
+      __tmp__3UJH=get__PVFF(Self__5UJH,Self__5UJH->value__RLUE);
     } break;
     };
-    __tmp__SHFC=__tmp__OKJH;
+    __tmp__BFFC=__tmp__3UJH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  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)) {
+  pos__PI5C=Self__IEFC->parent_lip_code__PRPB.parent_itm_object__NAE.position__RAJ;
+  put_error__text__YKG( 1,(&__string_279));
+  put_position__CMG(pos__PI5C);
+  put_string__CZF(msg_err__3KG);
+  if ((type_error__2KG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__SHFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__BFFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__VN3F(__tmp__SHFC);
+    free__RY3F(__tmp__BFFC);
   } break;
   case __LIP_STRING__: {
-    free__4RHG(__tmp__SHFC);
+    free__52HG(__tmp__BFFC);
   } break;
   };
 }
 
-static void run__W5TE(__LIP_CALL *Self__X5TE)
+static void run__RJUE(__LIP_CALL *Self__SJUE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *val__VJUE,*__tmp__BKUE,*__tmp__BVJH,*__tmp__CVJH;
+  void *str__WJUE,*__tmp__GLUE,*__tmp__OMUE;
+  void *path__XJUE,*n__DSKF;
+  void *__tmp__AKUE;
+  __LIP_INTEGER *Self__DVJH;
+  __LIP_STRING *Self__EVJH;
+  __POSITION pos__KRKF,pos__101G,pos__401G,pos__B11G,pos__E11G;
+  __STRING_CONSTANT *Self__SKGH;
+  __STRING *Self__TKGH,*Self__VKGH;
+  void *result__GSKF;
+  __INTEGER j__FSKF;
+  __BOOLEAN is_rec__YJUE,__tmp__YKUE,__tmp__AMUE,result__HNXE;
+  __BOOLEAN __tmp__DTKF;
+  val__VJUE=NULL;
+  str__WJUE=NULL;
+  path__XJUE=NULL;
+  is_rec__YJUE=FALSE__;
+  if (((void *)Self__SJUE->argument__ZJUE != (void *)NULL)) {
+    __tmp__AKUE=Self__SJUE->argument__ZJUE;
+    switch (((struct ___OBJ *)__tmp__AKUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__GAUE=run_expr__OZQD(__tmp__FAUE);
+      __tmp__BKUE=run_expr__2XQD(__tmp__AKUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__GAUE=run_expr__N2QD(__tmp__FAUE);
+      __tmp__BKUE=run_expr__10QD(__tmp__AKUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__GAUE=run_expr__IGUE(__tmp__FAUE);
+      __tmp__BKUE=run_expr__DQUE(__tmp__AKUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__SKJH=((__LIP_VALUE *)__tmp__FAUE)->value__IKUE;
-      switch (((struct ___OBJ *)__tmp__SKJH)->__id) {
+      __tmp__BVJH=((__LIP_VALUE *)__tmp__AKUE)->value__DUUE;
+      switch (((struct ___OBJ *)__tmp__BVJH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__TKJH=((__LIP_BOOLEAN *)__tmp__SKJH);
+        __tmp__CVJH=((__LIP_BOOLEAN *)__tmp__BVJH);
       } break;
       case __LIP_INTEGER__: {
-        Self__UKJH=((__LIP_INTEGER *)__tmp__SKJH);
-        __tmp__TKJH=get__KJSE(Self__UKJH,Self__UKJH->value__3Y3F);
+        Self__DVJH=((__LIP_INTEGER *)__tmp__BVJH);
+        __tmp__CVJH=get__LRSE(Self__DVJH,Self__DVJH->value__ZD4F);
       } break;
       case __LIP_STRING__: {
-        Self__VKJH=((__LIP_STRING *)__tmp__SKJH);
-        __tmp__TKJH=get__TMFF(Self__VKJH,Self__VKJH->value__WBUE);
+        Self__EVJH=((__LIP_STRING *)__tmp__BVJH);
+        __tmp__CVJH=get__PVFF(Self__EVJH,Self__EVJH->value__RLUE);
       } break;
       };
-      __tmp__GAUE=__tmp__TKJH;
+      __tmp__BKUE=__tmp__CVJH;
     } break;
     };
-    val__05TE=__tmp__GAUE;
+    val__VJUE=__tmp__BKUE;
   };
-  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)) {
+  if (((void *)Self__SJUE->name__EKUE == (void *)(&__string_92))) {
+    if (((void *)val__VJUE != (void *)NULL)) {
+      pos__KRKF=Self__SJUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+      put_error__text__YKG( 2,(&__string_311));
+      put_position__CMG(pos__KRKF);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__3AUE=TRUE__;
+    __tmp__YKUE=TRUE__;
   } else {
-    __tmp__3AUE=FALSE__;
+    __tmp__YKUE=FALSE__;
   };
-  if (__tmp__3AUE) {
-    __tmp__FCUE=TRUE__;
+  if (__tmp__YKUE) {
+    __tmp__AMUE=TRUE__;
   } else {
-    result__4CXE=((void *)Self__X5TE->name__JAUE == (void *)(&__string_94));
-    if (result__4CXE) {
-      if (val__05TE==NULL) {
-        __tmp__LBUE=NULL;
+    result__HNXE=((void *)Self__SJUE->name__EKUE == (void *)(&__string_94));
+    if (result__HNXE) {
+      if (val__VJUE==NULL) {
+        __tmp__GLUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__05TE)->__id) {
+        switch (((struct ___OBJ *)val__VJUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LBUE=NULL;
+          __tmp__GLUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LBUE=NULL;
+          __tmp__GLUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__LBUE=((void *)val__05TE);
+          __tmp__GLUE=((void *)val__VJUE);
         } break;
         }
       };
-      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)) {
+      str__WJUE=__tmp__GLUE;
+      if (((void *)__tmp__GLUE == (void *)NULL)) {
+        pos__101G=Self__SJUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 1,(&__string_312));
+        put_position__CMG(pos__101G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      path__XJUE=((__LIP_STRING *)__tmp__GLUE)->value__RLUE;
+      Self__SKGH=((__STRING_CONSTANT *)path__XJUE);
+      if ((((__CHARACTER *)Self__SKGH->storage__QMO)[(__INTEGER)(Self__SKGH->count__DD -  1)] == '*')) {
+        copy__U4R(string_tmp__VH,path__XJUE);
+        Self__TKGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__TKGH->count__EGC)) {
+          Self__TKGH->count__EGC= 0;
         } else {
-          Self__A5FH->count__4FC=(__INTEGER)(Self__A5FH->count__4FC -  1);
+          Self__TKGH->count__EGC=(__INTEGER)(Self__TKGH->count__EGC -  1);
         };
-        path__25TE=get__QWB(string_tmp__VH);
-        is_rec__35TE=TRUE__;
+        path__XJUE=get__YWB(string_tmp__VH);
+        is_rec__YJUE=TRUE__;
       };
-      load_directory__is_recursive__DOWF(Self__X5TE,path__25TE,is_rec__35TE);
+      load_directory__is_recursive__5YWF(Self__SJUE,path__XJUE,is_rec__YJUE);
     };
-    __tmp__FCUE=result__4CXE;
+    __tmp__AMUE=result__HNXE;
   };
-  if ((! __tmp__FCUE)) {
-    if (((void *)Self__X5TE->name__JAUE == (void *)(&__string_93))) {
-      if (val__05TE==NULL) {
-        __tmp__TCUE=NULL;
+  if ((! __tmp__AMUE)) {
+    if (((void *)Self__SJUE->name__EKUE == (void *)(&__string_93))) {
+      if (val__VJUE==NULL) {
+        __tmp__OMUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__05TE)->__id) {
+        switch (((struct ___OBJ *)val__VJUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TCUE=NULL;
+          __tmp__OMUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TCUE=NULL;
+          __tmp__OMUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__TCUE=((void *)val__05TE);
+          __tmp__OMUE=((void *)val__VJUE);
         } break;
         }
       };
-      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)) {
+      str__WJUE=__tmp__OMUE;
+      if (((void *)__tmp__OMUE == (void *)NULL)) {
+        pos__401G=Self__SJUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 1,(&__string_312));
+        put_position__CMG(pos__401G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      ((__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';
+      ((__STRING *)string_tmp__VH)->count__EGC= 0;
+      append_in__ZDIG(__tmp__OMUE,string_tmp__VH);
+      Self__VKGH=((__STRING *)string_tmp__VH);
+      if ((Self__VKGH->capacity__T3R > Self__VKGH->count__EGC)) {
+        ((__CHARACTER *)Self__VKGH->storage__23R)[Self__VKGH->count__EGC]='\0';
       } else {
-        add_last__BMT(Self__C5FH,'\0');
-        Self__C5FH->count__4FC=(__INTEGER)(Self__C5FH->count__4FC -  1);
+        add_last__UHT(Self__VKGH,'\0');
+        Self__VKGH->count__EGC=(__INTEGER)(Self__VKGH->count__EGC -  1);
       };
-      system(((char*)((Self__C5FH->storage__JCS))));
+      system(((char*)((Self__VKGH->storage__23R))));
     } else {
-      n__SHKF=Self__X5TE->name__JAUE;
-      result__VHKF=NULL;
-      j__UHKF= 0;
-      while_do__OPLF:
+      n__DSKF=Self__SJUE->name__EKUE;
+      result__GSKF=NULL;
+      j__FSKF= 0;
+      while_do__4ZLF:
       {
-        if ((j__UHKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__1HKF)->parent_arrayed_collection__0HKF.upper__EIKF)) {
+        if ((j__FSKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__MSKF)->parent_arrayed_collection__LSKF.upper__VSKF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__SIKF=((void *)NULL != (void *)n__SHKF);
+          __tmp__DTKF=((void *)NULL != (void *)n__DSKF);
         } else {
-          __tmp__SIKF=FALSE__;
+          __tmp__DTKF=FALSE__;
         };
-        if (__tmp__SIKF) {
-          j__UHKF=(__INTEGER)(j__UHKF +  1);
-          goto while_do__OPLF;
+        if (__tmp__DTKF) {
+          j__FSKF=(__INTEGER)(j__FSKF +  1);
+          goto while_do__4ZLF;
         };
       };
-      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 ((j__FSKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__MSKF)->parent_arrayed_collection__LSKF.upper__VSKF)) {
+        result__GSKF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__MSKF)->parent_arrayed_collection__LSKF.storage__HZPF)[j__FSKF];
       };
-      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)) {
+      if (((void *)result__GSKF == (void *)NULL)) {
+        copy__U4R(string_tmp__VH,(&__string_309));
+        append__2JS(string_tmp__VH,Self__SJUE->name__EKUE);
+        append__2JS(string_tmp__VH,(&__string_310));
+        pos__B11G=Self__SJUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 1,string_tmp__VH);
+        put_position__CMG(pos__B11G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      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)) {
+      pos__E11G=Self__SJUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+      put_error__text__YKG( 1,(&__string_313));
+      put_position__CMG(pos__E11G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__05TE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__05TE)->__id) {
+  if (((void *)val__VJUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__VJUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__VN3F(val__05TE);
+      free__RY3F(val__VJUE);
     } break;
     case __LIP_STRING__: {
-      free__4RHG(val__05TE);
+      free__52HG(val__VJUE);
     } break;
     };
   };
 }
 
-static void run__EDQD(__LIP_IF *Self__FDQD)
+static void run__SBQD(__LIP_IF *Self__TBQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__XBQD,*__tmp__1CQD,*__tmp__XDQD;
+  __POSITION __tmp__3TAH,pos__I11G,pos__M11G,pos__P11G,__tmp__PZYG;
+  __POSITION __tmp__RZYG,__tmp__S11G,__tmp__YZYG,__tmp__0ZYG;
+  __POSITION __tmp__YOUE;
+  void *__tmp__YBQD,*__tmp__GVJH,*__tmp__HVJH;
+  __LIP_INTEGER *Self__IVJH;
+  __LIP_STRING *Self__JVJH;
+  void *__tmp__0BQD,*val__VBQD;
+  __INTEGER __tmp__UCQD,Self__0SAG,__tmp__QDQD,Self__ICEF;
+  __BOOLEAN __tmp__4CQD;
+  __tmp__XBQD=Self__TBQD->condition__WBQD;
+  switch (((struct ___OBJ *)__tmp__XBQD)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__3TAH=((__LIP_AFFECT *)__tmp__XBQD)->parent_lip_code__PRPB.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(__tmp__3TAH);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__KDQD=NULL;
+    __tmp__YBQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__KDQD=run_expr__OZQD(__tmp__JDQD);
+    __tmp__YBQD=run_expr__2XQD(__tmp__XBQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__KDQD=run_expr__N2QD(__tmp__JDQD);
+    __tmp__YBQD=run_expr__10QD(__tmp__XBQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__KDQD=run_expr__IGUE(__tmp__JDQD);
+    __tmp__YBQD=run_expr__DQUE(__tmp__XBQD);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__I11G=((__LIP_IF *)__tmp__XBQD)->parent_lip_code__QOYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(pos__I11G);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__KDQD=NULL;
+    __tmp__YBQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__M11G=((__LIP_PRINT *)__tmp__XBQD)->parent_lip_code__CPYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(pos__M11G);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__KDQD=NULL;
+    __tmp__YBQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__XKJH=((__LIP_VALUE *)__tmp__JDQD)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__XKJH)->__id) {
+    __tmp__GVJH=((__LIP_VALUE *)__tmp__XBQD)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__GVJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__YKJH=((__LIP_BOOLEAN *)__tmp__XKJH);
+      __tmp__HVJH=((__LIP_BOOLEAN *)__tmp__GVJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__ZKJH=((__LIP_INTEGER *)__tmp__XKJH);
-      __tmp__YKJH=get__KJSE(Self__ZKJH,Self__ZKJH->value__3Y3F);
+      Self__IVJH=((__LIP_INTEGER *)__tmp__GVJH);
+      __tmp__HVJH=get__LRSE(Self__IVJH,Self__IVJH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__0KJH=((__LIP_STRING *)__tmp__XKJH);
-      __tmp__YKJH=get__TMFF(Self__0KJH,Self__0KJH->value__WBUE);
+      Self__JVJH=((__LIP_STRING *)__tmp__GVJH);
+      __tmp__HVJH=get__PVFF(Self__JVJH,Self__JVJH->value__RLUE);
     } break;
     };
-    __tmp__KDQD=__tmp__YKJH;
+    __tmp__YBQD=__tmp__HVJH;
   } break;
   };
-  if (__tmp__KDQD==NULL) {
-    __tmp__MDQD=NULL;
+  if (__tmp__YBQD==NULL) {
+    __tmp__0BQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__KDQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__YBQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__MDQD=((void *)__tmp__KDQD);
+      __tmp__0BQD=((void *)__tmp__YBQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__MDQD=NULL;
+      __tmp__0BQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__MDQD=NULL;
+      __tmp__0BQD=NULL;
     } break;
     }
   };
-  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)) {
+  val__VBQD=__tmp__0BQD;
+  if (((void *)__tmp__0BQD == (void *)NULL)) {
+    pos__P11G=Self__TBQD->parent_lip_code__QOYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_315));
+    put_position__CMG(pos__P11G);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  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) {
+  if (((__LIP_BOOLEAN *)__tmp__0BQD)->value__FCQD) {
+    __tmp__UCQD=((__FAST_ARRAYoLIP_CODEo *)Self__TBQD->then__MCQD)->parent_arrayed_collection__5KYC.upper__SCQD;
+    Self__0SAG= 0;
+    while ((Self__0SAG <= __tmp__UCQD)) {
+      __tmp__1CQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__TBQD->then__MCQD)->parent_arrayed_collection__5KYC.storage__5QTD)[Self__0SAG];
+      switch (((struct ___OBJ *)__tmp__1CQD)->__id) {
       case __LIP_AFFECT__: {
-        run__YGFC(__tmp__NEQD);
+        run__HEFC(__tmp__1CQD);
       } break;
       case __LIP_BINARY__: {
-        __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)) {
+        __tmp__PZYG=((__LIP_BINARY *)__tmp__1CQD)->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 2,(&__string_274));
+        put_position__CMG(__tmp__PZYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __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)) {
+        __tmp__RZYG=((__LIP_UNARY *)__tmp__1CQD)->parent_lip_code__AY4B.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 2,(&__string_274));
+        put_position__CMG(__tmp__RZYG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__W5TE(__tmp__NEQD);
+        run__RJUE(__tmp__1CQD);
       } break;
       case __LIP_IF__: {
-        run__EDQD(__tmp__NEQD);
+        run__SBQD(__tmp__1CQD);
       } break;
       case __LIP_PRINT__: {
-        run__KEUE(__tmp__NEQD);
+        run__FOUE(__tmp__1CQD);
       } break;
       case __LIP_VALUE__: {
-        __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)) {
+        __tmp__S11G=((__LIP_VALUE *)__tmp__1CQD)->parent_lip_code__KEFE.parent_itm_object__NAE.position__RAJ;
+        put_error__text__YKG( 2,(&__string_274));
+        put_position__CMG(__tmp__S11G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__ZHAG=(__INTEGER)(Self__ZHAG +  1);
+      Self__0SAG=(__INTEGER)(Self__0SAG +  1);
     };
-    __tmp__QEQD=TRUE__;
+    __tmp__4CQD=TRUE__;
   } else {
-    __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) {
+    __tmp__4CQD=FALSE__;
+  };
+  if ((! __tmp__4CQD)) {
+    if (((void *)Self__TBQD->else__DDQD != (void *)NULL)) {
+      __tmp__QDQD=((__FAST_ARRAYoLIP_CODEo *)Self__TBQD->else__DDQD)->parent_arrayed_collection__5KYC.upper__SCQD;
+      Self__ICEF= 0;
+      while ((Self__ICEF <= __tmp__QDQD)) {
+        __tmp__XDQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__TBQD->else__DDQD)->parent_arrayed_collection__5KYC.storage__5QTD)[Self__ICEF];
+        switch (((struct ___OBJ *)__tmp__XDQD)->__id) {
         case __LIP_AFFECT__: {
-          run__YGFC(__tmp__JFQD);
+          run__HEFC(__tmp__XDQD);
         } break;
         case __LIP_BINARY__: {
-          __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)) {
+          __tmp__YZYG=((__LIP_BINARY *)__tmp__XDQD)->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ;
+          put_error__text__YKG( 2,(&__string_274));
+          put_position__CMG(__tmp__YZYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __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)) {
+          __tmp__0ZYG=((__LIP_UNARY *)__tmp__XDQD)->parent_lip_code__AY4B.parent_itm_object__NAE.position__RAJ;
+          put_error__text__YKG( 2,(&__string_274));
+          put_position__CMG(__tmp__0ZYG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__W5TE(__tmp__JFQD);
+          run__RJUE(__tmp__XDQD);
         } break;
         case __LIP_IF__: {
-          run__EDQD(__tmp__JFQD);
+          run__SBQD(__tmp__XDQD);
         } break;
         case __LIP_PRINT__: {
-          run__KEUE(__tmp__JFQD);
+          run__FOUE(__tmp__XDQD);
         } break;
         case __LIP_VALUE__: {
-          __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)) {
+          __tmp__YOUE=((__LIP_VALUE *)__tmp__XDQD)->parent_lip_code__KEFE.parent_itm_object__NAE.position__RAJ;
+          put_error__text__YKG( 2,(&__string_274));
+          put_position__CMG(__tmp__YOUE);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__5XDF=(__INTEGER)(Self__5XDF +  1);
+        Self__ICEF=(__INTEGER)(Self__ICEF +  1);
       };
     };
   };
 }
 
-static void run__KEUE(__LIP_PRINT *Self__LEUE)
+static void run__FOUE(__LIP_PRINT *Self__GOUE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *__tmp__JOUE;
+  __POSITION __tmp__RXVE,pos__CXDE,pos__U11G,pos__PYXE;
+  void *__tmp__KOUE,*__tmp__LVJH,*__tmp__MVJH;
+  __LIP_INTEGER *Self__NVJH;
+  __LIP_STRING *Self__OVJH,*Self__QDIG;
+  __INTEGER Self__IR5F;
+  __BOOLEAN __tmp__PR5F;
+  __tmp__JOUE=Self__GOUE->message__IOUE;
+  switch (((struct ___OBJ *)__tmp__JOUE)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__RXVE=((__LIP_AFFECT *)__tmp__JOUE)->parent_lip_code__PRPB.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(__tmp__RXVE);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__PEUE=NULL;
+    __tmp__KOUE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__PEUE=run_expr__OZQD(__tmp__OEUE);
+    __tmp__KOUE=run_expr__2XQD(__tmp__JOUE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__PEUE=run_expr__N2QD(__tmp__OEUE);
+    __tmp__KOUE=run_expr__10QD(__tmp__JOUE);
   } break;
   case __LIP_CALL__: {
-    __tmp__PEUE=run_expr__IGUE(__tmp__OEUE);
+    __tmp__KOUE=run_expr__DQUE(__tmp__JOUE);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__CXDE=((__LIP_IF *)__tmp__JOUE)->parent_lip_code__QOYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(pos__CXDE);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__PEUE=NULL;
+    __tmp__KOUE=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__U11G=((__LIP_PRINT *)__tmp__JOUE)->parent_lip_code__CPYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_314));
+    put_position__CMG(pos__U11G);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
-    __tmp__PEUE=NULL;
+    __tmp__KOUE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__2KJH=((__LIP_VALUE *)__tmp__OEUE)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__2KJH)->__id) {
+    __tmp__LVJH=((__LIP_VALUE *)__tmp__JOUE)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__LVJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__3KJH=((__LIP_BOOLEAN *)__tmp__2KJH);
+      __tmp__MVJH=((__LIP_BOOLEAN *)__tmp__LVJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__4KJH=((__LIP_INTEGER *)__tmp__2KJH);
-      __tmp__3KJH=get__KJSE(Self__4KJH,Self__4KJH->value__3Y3F);
+      Self__NVJH=((__LIP_INTEGER *)__tmp__LVJH);
+      __tmp__MVJH=get__LRSE(Self__NVJH,Self__NVJH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__5KJH=((__LIP_STRING *)__tmp__2KJH);
-      __tmp__3KJH=get__TMFF(Self__5KJH,Self__5KJH->value__WBUE);
+      Self__OVJH=((__LIP_STRING *)__tmp__LVJH);
+      __tmp__MVJH=get__PVFF(Self__OVJH,Self__OVJH->value__RLUE);
     } break;
     };
-    __tmp__PEUE=__tmp__3KJH;
+    __tmp__KOUE=__tmp__MVJH;
   } break;
   };
-  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)) {
+  if (((void *)__tmp__KOUE == (void *)NULL)) {
+    pos__PYXE=Self__GOUE->parent_lip_code__CPYC.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_279));
+    put_position__CMG(pos__PYXE);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__PEUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__KOUE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__PEUE)->value__XDQD) {
-      print__4HD((&__string_42));
+    if (((__LIP_BOOLEAN *)__tmp__KOUE)->value__FCQD) {
+      print__DID((&__string_42));
     } else {
-      print__4HD((&__string_43));
+      print__DID((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__HG5F=((__LIP_INTEGER *)__tmp__PEUE)->value__3Y3F;
-    if ((Self__HG5F ==  0)) {
+    Self__IR5F=((__LIP_INTEGER *)__tmp__KOUE)->value__ZD4F;
+    if ((Self__IR5F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__OG5F=TRUE__;
+      __tmp__PR5F=TRUE__;
     } else {
-      __tmp__OG5F=FALSE__;
+      __tmp__PR5F=FALSE__;
     };
-    if ((! __tmp__OG5F)) {
-      if ((Self__HG5F <  0)) {
+    if ((! __tmp__PR5F)) {
+      if ((Self__IR5F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__C1KG((__INTEGER)(- Self__HG5F));
+        print_positif__J2KG((__INTEGER)(- Self__IR5F));
       } else {
-        print_positif__C1KG(Self__HG5F);
+        print_positif__J2KG(Self__IR5F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    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));
+    Self__QDIG=((__LIP_STRING *)__tmp__KOUE);
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    append_in__ZDIG(Self__QDIG,string_tmp__VH);
+    put_string__WEF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__PEUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__KOUE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__VN3F(__tmp__PEUE);
+    free__RY3F(__tmp__KOUE);
   } break;
   case __LIP_STRING__: {
-    free__4RHG(__tmp__PEUE);
+    free__52HG(__tmp__KOUE);
   } break;
   };
 }
 
-static void add_last__COV(__FAST_ARRAYoITM_TYPE_MONOo *Self__DOV,void *element__EOV)
+static void add_last__NJV(__FAST_ARRAYoITM_TYPE_MONOo *Self__OJV,void *element__PJV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__QJV,__tmp__VKV,__tmp__MEEC,Self__BKVD;
+  __BOOLEAN __tmp__5JV;
+  void **__tmp__UKV,**new__YDEC;
+  new_capacity__QJV= 0;
+  if (((__INTEGER)(Self__OJV->parent_arrayed_collection__EYC.upper__3DV +  1) <= (__INTEGER)(Self__OJV->parent_arrayed_collection__EYC.capacity__SJV -  1))) {
+    Self__OJV->parent_arrayed_collection__EYC.upper__3DV=(__INTEGER)(Self__OJV->parent_arrayed_collection__EYC.upper__3DV +  1);
+    __tmp__5JV=TRUE__;
   } else {
-    __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;
+    __tmp__5JV=FALSE__;
+  };
+  if ((! __tmp__5JV)) {
+    if ((Self__OJV->parent_arrayed_collection__EYC.capacity__SJV ==  0)) {
+      Self__OJV->parent_arrayed_collection__EYC.storage__EIV=create__R4QB( 2);
+      Self__OJV->parent_arrayed_collection__EYC.capacity__SJV= 2;
+      Self__OJV->parent_arrayed_collection__EYC.upper__3DV= 0;
+    } else {
+      new_capacity__QJV=(__INTEGER)(Self__OJV->parent_arrayed_collection__EYC.capacity__SJV <<  1);
+      __tmp__UKV=Self__OJV->parent_arrayed_collection__EYC.storage__EIV;
+      __tmp__VKV=Self__OJV->parent_arrayed_collection__EYC.capacity__SJV;
+      new__YDEC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__UKV)),((__UINTEGER_32 )(__INTEGER)(__tmp__VKV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__QJV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__MEEC=(__INTEGER)(new_capacity__QJV -  1);
+      Self__BKVD=__tmp__VKV;
+      while ((Self__BKVD <= __tmp__MEEC)) {
+        new__YDEC[Self__BKVD]=NULL;
+        Self__BKVD=(__INTEGER)(Self__BKVD +  1);
+      };
+      Self__OJV->parent_arrayed_collection__EYC.storage__EIV=new__YDEC;
+      Self__OJV->parent_arrayed_collection__EYC.capacity__SJV=new_capacity__QJV;
+      Self__OJV->parent_arrayed_collection__EYC.upper__3DV=(__INTEGER)(Self__OJV->parent_arrayed_collection__EYC.upper__3DV +  1);
+    };
+  };
+  ((void **)Self__OJV->parent_arrayed_collection__EYC.storage__EIV)[Self__OJV->parent_arrayed_collection__EYC.upper__3DV]=element__PJV;
 }
 
-static void* alias__OVP(void *tmp__QVP)
+static void* alias__BRP(void *tmp__DRP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__K3PD,i__GL2E,new_capacity__SBW,other_upper__RBW;
+  __INTEGER Self__RLKC,h__TCW,idx__UCW,idx__XRRB,new_capacity__YRRB;
+  __INTEGER i__WRRB,typ_id__VHNB;
+  __POINTER ptr__QHNB,ptr_table__UVJH,next__TVJH,result__VVJH;
+  __POINTER ptr_table__ZVJH,next__YVJH,result__0VJH;
+  __UINTEGER_32 sz__SHNB,a__GMGH,new_size__HMGH,t__LMGH,a__KMGH;
+  __UINTEGER_32 new_size__2VJH,lab_type__1VJH;
+  void *result__FRP,*result__C1V,*e__MCW,*e__QVJH,*e__NI1;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__O0V,*Self__LCW;
+  void *node__B1V,*node__RVJH,*node__WI1,*node__VCW,*node1__0RRB;
+  void *node2__1RRB,*__tmp__FEW;
+  __BOOLEAN __tmp__01V,result__I2PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__F2PD,*o__J2PD,*__tmp__V2PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__PBW;
+  void **__tmp__F3PD,**__tmp__H3PD,**Self__SK2E,**__tmp__FCW,**__tmp__HCW;
+  void **Self__P1CC;
+  void **old_buckets__ZRRB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__PHNB,*Self__KQDC;
+  result__FRP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__DRP)->parent_arrayed_collection__EYC.upper__3DV <  0)) {
+    result__FRP=empty_list__MRP;
   } else {
-    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:
+    Self__O0V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__XRP);
+    result__C1V=NULL;
+    node__B1V=((void **)Self__O0V->buckets__J1V)[(__INTEGER)(hash_code__C10(tmp__DRP) % Self__O0V->capacity__E1V)];
+    until_do__K20:
     {
-      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;
+      if (((void *)node__B1V == (void *)NULL)) {
+        __tmp__01V=TRUE__;
+      } else {
+        Self__F2PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__B1V)->item__V1V);
+        result__I2PD=FALSE__;
+        o__J2PD=NULL;
+        if (((void *)Self__F2PD == (void *)tmp__DRP)) {
+          result__I2PD=TRUE__;
+        } else {
+          if (tmp__DRP==NULL) {
+            __tmp__V2PD=NULL;
+          } else {
+            __tmp__V2PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__DRP);
+          };
+          o__J2PD=__tmp__V2PD;
+          if ((((void *)__tmp__V2PD != (void *)NULL) && (Self__F2PD->parent_arrayed_collection__EYC.upper__3DV == __tmp__V2PD->parent_arrayed_collection__EYC.upper__3DV))) {
+            __tmp__F3PD=Self__F2PD->parent_arrayed_collection__EYC.storage__EIV;
+            __tmp__H3PD=__tmp__V2PD->parent_arrayed_collection__EYC.storage__EIV;
+            __tmp__K3PD=(__INTEGER)(Self__F2PD->parent_arrayed_collection__EYC.upper__3DV +  1);
+            Self__SK2E=((void **)__tmp__F3PD);
+            i__GL2E=(__INTEGER)(__tmp__K3PD -  1);
+            while (((i__GL2E >=  0) && ((void *)Self__SK2E[i__GL2E] == (void *)((void **)__tmp__H3PD)[i__GL2E]))) {
+              i__GL2E=(__INTEGER)(i__GL2E -  1);
+            };
+            result__I2PD=(i__GL2E <  0);
+          };
+        };
+        __tmp__01V=result__I2PD;
+      };
+      if ((! __tmp__01V)) {
+        node__B1V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__B1V)->next__B2V;
+        goto until_do__K20;
+      };
+    };
+    if (((void *)node__B1V != (void *)NULL)) {
+      result__C1V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__B1V)->item__V1V;
+    };
+    result__FRP=result__C1V;
+    if (((void *)result__C1V == (void *)NULL)) {
+      result__FRP=create_with_capacity__DBR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__DRP)->parent_arrayed_collection__EYC.upper__3DV +  1));
+      Self__PBW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__FRP);
+      new_capacity__SBW= 0;
+      other_upper__RBW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__DRP)->parent_arrayed_collection__EYC.upper__3DV;
+      if ((other_upper__RBW >=  0)) {
+        new_capacity__SBW=(__INTEGER)(other_upper__RBW +  1);
+        if ((Self__PBW->parent_arrayed_collection__EYC.capacity__SJV < new_capacity__SBW)) {
+          Self__PBW->parent_arrayed_collection__EYC.storage__EIV=create__R4QB(new_capacity__SBW);
+          Self__PBW->parent_arrayed_collection__EYC.capacity__SJV=new_capacity__SBW;
+        };
+        __tmp__FCW=Self__PBW->parent_arrayed_collection__EYC.storage__EIV;
+        __tmp__HCW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__DRP)->parent_arrayed_collection__EYC.storage__EIV;
+        Self__P1CC=((void **)__tmp__FCW);
+        Self__RLKC=other_upper__RBW;
+        while ((Self__RLKC >=  0)) {
+          Self__P1CC[Self__RLKC]=((void **)__tmp__HCW)[Self__RLKC];
+          Self__RLKC=(__INTEGER)(Self__RLKC -  1);
+        };
+      };
+      Self__PBW->parent_arrayed_collection__EYC.upper__3DV=other_upper__RBW;
+      Self__LCW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__XRP);
+      e__MCW=result__FRP;
+      e__QVJH=result__FRP;
+      node__RVJH=((void **)Self__LCW->buckets__J1V)[(__INTEGER)(hash_code__C10(result__FRP) % Self__LCW->capacity__E1V)];
+      while ((! (((void *)node__RVJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__RVJH)->item__V1V == (void *)e__QVJH)))) {
+        node__RVJH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__RVJH)->next__B2V;
+      };
+      e__NI1=result__FRP;
+      node__WI1=((void **)Self__LCW->buckets__J1V)[(__INTEGER)(hash_code__C10(result__FRP) % Self__LCW->capacity__E1V)];
+      while ((! (((void *)node__WI1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__WI1)->item__V1V == (void *)e__NI1)))) {
+        node__WI1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__WI1)->next__B2V;
+      };
+      h__TCW=hash_code__C10(result__FRP);
+      idx__UCW=(__INTEGER)(h__TCW % Self__LCW->capacity__E1V);
+      node__VCW=((void **)Self__LCW->buckets__J1V)[idx__UCW];
+      while ((! (((void *)node__VCW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__VCW)->item__V1V == (void *)e__MCW)))) {
+        node__VCW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__VCW)->next__B2V;
+      };
+      if (((void *)node__VCW == (void *)NULL)) {
+        if ((Self__LCW->capacity__E1V == Self__LCW->count__YDW)) {
+          idx__XRRB= 0;
+          node1__0RRB=NULL;
+          node2__1RRB=NULL;
+          new_capacity__YRRB=prime_number_ceiling__K01((__INTEGER)(Self__LCW->capacity__E1V +  1));
+          old_buckets__ZRRB=Self__LCW->buckets__J1V;
+          Self__LCW->buckets__J1V=create__OVBB(new_capacity__YRRB);
+          i__WRRB=(__INTEGER)(Self__LCW->capacity__E1V -  1);
+          Self__LCW->capacity__E1V=new_capacity__YRRB;
+          while ((i__WRRB >=  0)) {
+            node1__0RRB=((void **)old_buckets__ZRRB)[i__WRRB];
+            while (((void *)node1__0RRB != (void *)NULL)) {
+              node2__1RRB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0RRB)->next__B2V;
+              idx__XRRB=(__INTEGER)(hash_code__C10(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0RRB)->item__V1V) % Self__LCW->capacity__E1V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__0RRB)->next__B2V=((void **)Self__LCW->buckets__J1V)[idx__XRRB];
+              ((void **)Self__LCW->buckets__J1V)[idx__XRRB]=node1__0RRB;
+              node1__0RRB=node2__1RRB;
+            };
+            i__WRRB=(__INTEGER)(i__WRRB -  1);
+          };
+          idx__UCW=(__INTEGER)(h__TCW % Self__LCW->capacity__E1V);
+        };
+        __tmp__FEW=((void **)Self__LCW->buckets__J1V)[idx__UCW];
+        result__PHNB=NULL;
+        ptr__QHNB=((__POINTER )(NULL));
+        typ_id__VHNB= 0;
+        sz__SHNB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__SHNB ==  0)) {
+          result__PHNB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__VHNB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SHNB);
+          if ((typ_id__VHNB == (__INTEGER)(-  1))) {
+            a__GMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__HMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SHNB + a__GMGH) & (__UINTEGER_32)(~ a__GMGH));
+            ptr_table__UVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HMGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__TVJH=((__POINTER )(NULL));
+            result__VVJH=((__POINTER *)ptr_table__UVJH)[ 0];
+            if ((result__VVJH == (void *)NULL)) {
+              result__VVJH=new_lab__QOJ(new_size__HMGH);
+              next__TVJH=(void *)((unsigned long)result__VVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMGH)));
+              ((__POINTER *)next__TVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UVJH)[ 0]=next__TVJH;
             } else {
-              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)));
+              next__TVJH=((__POINTER *)result__VVJH)[ 0];
+              if ((next__TVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VVJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HMGH <<  1)) <=  4096)) {
+                  next__TVJH=(void *)((unsigned long)result__VVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMGH)));
                 } else {
-                  next__ELJH=new_lab__URJ(new_size__UAGH);
+                  next__TVJH=new_lab__QOJ(new_size__HMGH);
                 };
-                ((__POINTER *)next__ELJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__FLJH)[ 0]=next__ELJH;
+                ((__POINTER *)next__TVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__UVJH)[ 0]=next__TVJH;
               } else {
-                ((__POINTER *)result__GLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ELJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__GLJH=next__ELJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__VVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__VVJH=next__TVJH;
+              };
+            };
+            ptr__QHNB=result__VVJH;
+          } else {
+            t__LMGH=((__UINTEGER_32 )typ_id__VHNB);
+            a__KMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__2VJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SHNB + a__KMGH) & (__UINTEGER_32)(~ a__KMGH));
+            ptr_table__ZVJH=((__POINTER )(&(table_type[(t__LMGH)])));
+            lab_type__1VJH=(__UINTEGER_32)(t__LMGH |  1);
+            next__YVJH=((__POINTER )(NULL));
+            result__0VJH=((__POINTER *)ptr_table__ZVJH)[ 0];
+            if ((result__0VJH == (void *)NULL)) {
+              result__0VJH=new_lab__QOJ(lab_type__1VJH);
+              next__YVJH=(void *)((unsigned long)result__0VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2VJH)));
+              ((__POINTER *)next__YVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZVJH)[ 0]=next__YVJH;
             } else {
-              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)));
+              next__YVJH=((__POINTER *)result__0VJH)[ 0];
+              if ((next__YVJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0VJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__2VJH <<  1)) <=  4096)) {
+                  next__YVJH=(void *)((unsigned long)result__0VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2VJH)));
                 } else {
-                  next__JLJH=new_lab__URJ(lab_type__MLJH);
+                  next__YVJH=new_lab__QOJ(lab_type__1VJH);
                 };
-                ((__POINTER *)next__JLJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KLJH)[ 0]=next__JLJH;
+                ((__POINTER *)next__YVJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZVJH)[ 0]=next__YVJH;
               } else {
-                ((__POINTER *)result__LLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LLJH=next__JLJH;
+                ((__POINTER *)result__0VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0VJH=next__YVJH;
               };
             };
-            ptr__EMNB=result__LLJH;
+            ptr__QHNB=result__0VJH;
           };
-          result__DMNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__EMNB);
-          *(result__DMNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__PHNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__QHNB);
+          *(result__PHNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        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);
+        Self__KQDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__PHNB);
+        Self__KQDC->item__V1V=result__FRP;
+        Self__KQDC->next__B2V=__tmp__FEW;
+        node__VCW=result__PHNB;
+        ((void **)Self__LCW->buckets__J1V)[idx__UCW]=result__PHNB;
+        Self__LCW->count__YDW=(__INTEGER)(Self__LCW->count__YDW +  1);
       };
     };
   };
-  free__ENQ(tmp__QVP);
-  return(result__SVP);
+  free__XIQ(tmp__DRP);
+  return(result__FRP);
 }
 
-static void add__KMHB(__HASHED_SEToSTRING_CONSTANTo *Self__LMHB,void *e__MMHB)
+static void add__WHHB(__HASHED_SEToSTRING_CONSTANTo *Self__XHHB,void *e__YHHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__O4HH,*Self__T4HH;
+  __INTEGER result__N4HH,__tmp__P4HH,Self__Q4HH,idx__AIHB,idx__0M0B;
+  __INTEGER new_capacity__1M0B,i__ZM0B,result__S4HH,__tmp__U4HH;
+  __INTEGER Self__V4HH,typ_id__L0WB;
+  __POINTER ptr__G0WB,ptr_table__4VJH,next__3VJH,result__5VJH;
+  __POINTER ptr_table__DWJH,next__CWJH,result__EWJH;
+  __UINTEGER_32 sz__I0WB,a__ANGH,new_size__BNGH,t__FNGH,a__ENGH;
+  __UINTEGER_32 new_size__GWJH,lab_type__FWJH;
+  void *node__BIHB,*node1__3M0B,*node2__4M0B,*__tmp__QJHB;
+  void **old_buckets__2M0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__F0WB,*Self__JJFC;
+  has__HHMB(Self__XHHB,e__YHHB);
+  has__HHMB(Self__XHHB,e__YHHB);
+  Self__O4HH=((__STRING_CONSTANT *)e__YHHB);
+  result__N4HH= 0;
+  __tmp__P4HH=Self__O4HH->count__DD;
+  Self__Q4HH= 1;
+  while ((Self__Q4HH <= __tmp__P4HH)) {
+    result__N4HH=(__INTEGER)((__INTEGER)( 5 * result__N4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__O4HH->storage__QMO)[(__INTEGER)(Self__Q4HH -  1)])));
+    Self__Q4HH=(__INTEGER)(Self__Q4HH +  1);
+  };
+  if ((result__N4HH <  0)) {
+    result__N4HH=(__INTEGER)(~ result__N4HH);
+  };
+  idx__AIHB=(__INTEGER)(result__N4HH % Self__XHHB->capacity__FET);
+  node__BIHB=((void **)Self__XHHB->buckets__CAV)[idx__AIHB];
+  while ((! (((void *)node__BIHB == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__BIHB)->item__OAV,e__YHHB)))) {
+    node__BIHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__BIHB)->next__ZAV;
+  };
+  if (((void *)node__BIHB == (void *)NULL)) {
+    if ((Self__XHHB->capacity__FET == Self__XHHB->count__LDY)) {
+      idx__0M0B= 0;
+      node1__3M0B=NULL;
+      node2__4M0B=NULL;
+      new_capacity__1M0B=prime_number_ceiling__K01((__INTEGER)(Self__XHHB->capacity__FET +  1));
+      old_buckets__2M0B=Self__XHHB->buckets__CAV;
+      Self__XHHB->buckets__CAV=create__GY3(new_capacity__1M0B);
+      i__ZM0B=(__INTEGER)(Self__XHHB->capacity__FET -  1);
+      Self__XHHB->capacity__FET=new_capacity__1M0B;
+      while ((i__ZM0B >=  0)) {
+        node1__3M0B=((void **)old_buckets__2M0B)[i__ZM0B];
+        while (((void *)node1__3M0B != (void *)NULL)) {
+          node2__4M0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__3M0B)->next__ZAV;
+          Self__T4HH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__3M0B)->item__OAV);
+          result__S4HH= 0;
+          __tmp__U4HH=Self__T4HH->count__DD;
+          Self__V4HH= 1;
+          while ((Self__V4HH <= __tmp__U4HH)) {
+            result__S4HH=(__INTEGER)((__INTEGER)( 5 * result__S4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__T4HH->storage__QMO)[(__INTEGER)(Self__V4HH -  1)])));
+            Self__V4HH=(__INTEGER)(Self__V4HH +  1);
+          };
+          if ((result__S4HH <  0)) {
+            result__S4HH=(__INTEGER)(~ result__S4HH);
+          };
+          idx__0M0B=(__INTEGER)(result__S4HH % Self__XHHB->capacity__FET);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__3M0B)->next__ZAV=((void **)Self__XHHB->buckets__CAV)[idx__0M0B];
+          ((void **)Self__XHHB->buckets__CAV)[idx__0M0B]=node1__3M0B;
+          node1__3M0B=node2__4M0B;
+        };
+        i__ZM0B=(__INTEGER)(i__ZM0B -  1);
+      };
+      idx__AIHB=(__INTEGER)(result__N4HH % new_capacity__1M0B);
+    };
+    __tmp__QJHB=((void **)Self__XHHB->buckets__CAV)[idx__AIHB];
+    result__F0WB=NULL;
+    ptr__G0WB=((__POINTER )(NULL));
+    typ_id__L0WB= 0;
+    sz__I0WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__I0WB ==  0)) {
+      result__F0WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__L0WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__I0WB);
+      if ((typ_id__L0WB == (__INTEGER)(-  1))) {
+        a__ANGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__I0WB + a__ANGH) & (__UINTEGER_32)(~ a__ANGH));
+        ptr_table__4VJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__3VJH=((__POINTER )(NULL));
+        result__5VJH=((__POINTER *)ptr_table__4VJH)[ 0];
+        if ((result__5VJH == (void *)NULL)) {
+          result__5VJH=new_lab__QOJ(new_size__BNGH);
+          next__3VJH=(void *)((unsigned long)result__5VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNGH)));
+          ((__POINTER *)next__3VJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4VJH)[ 0]=next__3VJH;
+        } else {
+          next__3VJH=((__POINTER *)result__5VJH)[ 0];
+          if ((next__3VJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5VJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BNGH <<  1)) <=  4096)) {
+              next__3VJH=(void *)((unsigned long)result__5VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BNGH)));
             } else {
-              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)));
+              next__3VJH=new_lab__QOJ(new_size__BNGH);
+            };
+            ((__POINTER *)next__3VJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4VJH)[ 0]=next__3VJH;
+          } else {
+            ((__POINTER *)result__5VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5VJH=next__3VJH;
+          };
+        };
+        ptr__G0WB=result__5VJH;
+      } else {
+        t__FNGH=((__UINTEGER_32 )typ_id__L0WB);
+        a__ENGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__I0WB + a__ENGH) & (__UINTEGER_32)(~ a__ENGH));
+        ptr_table__DWJH=((__POINTER )(&(table_type[(t__FNGH)])));
+        lab_type__FWJH=(__UINTEGER_32)(t__FNGH |  1);
+        next__CWJH=((__POINTER )(NULL));
+        result__EWJH=((__POINTER *)ptr_table__DWJH)[ 0];
+        if ((result__EWJH == (void *)NULL)) {
+          result__EWJH=new_lab__QOJ(lab_type__FWJH);
+          next__CWJH=(void *)((unsigned long)result__EWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GWJH)));
+          ((__POINTER *)next__CWJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DWJH)[ 0]=next__CWJH;
+        } else {
+          next__CWJH=((__POINTER *)result__EWJH)[ 0];
+          if ((next__CWJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EWJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GWJH <<  1)) <=  4096)) {
+              next__CWJH=(void *)((unsigned long)result__EWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GWJH)));
             } else {
-              next__TLJH=new_lab__URJ(lab_type__WLJH);
+              next__CWJH=new_lab__QOJ(lab_type__FWJH);
             };
-            ((__POINTER *)next__TLJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ULJH)[ 0]=next__TLJH;
+            ((__POINTER *)next__CWJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DWJH)[ 0]=next__CWJH;
           } else {
-            ((__POINTER *)result__VLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VLJH=next__TLJH;
+            ((__POINTER *)result__EWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__EWJH=next__CWJH;
           };
         };
-        ptr__Z3WB=result__VLJH;
+        ptr__G0WB=result__EWJH;
       };
-      result__Y3WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__Z3WB);
-      *(result__Y3WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__F0WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__G0WB);
+      *(result__F0WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    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);
+    Self__JJFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__F0WB);
+    Self__JJFC->item__OAV=e__YHHB;
+    Self__JJFC->next__ZAV=__tmp__QJHB;
+    node__BIHB=result__F0WB;
+    ((void **)Self__XHHB->buckets__CAV)[idx__AIHB]=result__F0WB;
+    Self__XHHB->count__LDY=(__INTEGER)(Self__XHHB->count__LDY +  1);
   };
 }
 
-static void add_last__ZBPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__0BPD,void *element__1BPD)
+static void add_last__HAPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__IAPD,void *element__JAPD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__KAPD,__tmp__RBPD,__tmp__EPWE,Self__1MQF;
+  __BOOLEAN __tmp__ZAPD;
+  void **__tmp__QBPD,**new__QOWE;
+  new_capacity__KAPD= 0;
+  if (((__INTEGER)(Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD +  1) <= (__INTEGER)(Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD -  1))) {
+    Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD=(__INTEGER)(Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD +  1);
+    __tmp__ZAPD=TRUE__;
   } else {
-    __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;
+    __tmp__ZAPD=FALSE__;
+  };
+  if ((! __tmp__ZAPD)) {
+    if ((Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD ==  0)) {
+      Self__IAPD->parent_arrayed_collection__L2I.storage__HBPD=create__5HHE( 2);
+      Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD= 2;
+      Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD= 0;
+    } else {
+      new_capacity__KAPD=(__INTEGER)(Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD <<  1);
+      __tmp__QBPD=Self__IAPD->parent_arrayed_collection__L2I.storage__HBPD;
+      __tmp__RBPD=Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD;
+      new__QOWE=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__QBPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__RBPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__KAPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__EPWE=(__INTEGER)(new_capacity__KAPD -  1);
+      Self__1MQF=__tmp__RBPD;
+      while ((Self__1MQF <= __tmp__EPWE)) {
+        new__QOWE[Self__1MQF]=NULL;
+        Self__1MQF=(__INTEGER)(Self__1MQF +  1);
+      };
+      Self__IAPD->parent_arrayed_collection__L2I.storage__HBPD=new__QOWE;
+      Self__IAPD->parent_arrayed_collection__L2I.capacity__MAPD=new_capacity__KAPD;
+      Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD=(__INTEGER)(Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD +  1);
+    };
+  };
+  ((void **)Self__IAPD->parent_arrayed_collection__L2I.storage__HBPD)[Self__IAPD->parent_arrayed_collection__L2I.upper__R4OD]=element__JAPD;
 }
 
-static void free__CT5(void *tmp__ET5)
+static void free__NO5(void *tmp__PO5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__ICGB,__tmp__MDGB,__tmp__AFGC,Self__K5VD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__GCGB;
+  __BOOLEAN __tmp__WCGB;
+  void **__tmp__LDGB,**new__MEGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__PO5)->parent_arrayed_collection__L2I.upper__R4OD=(__INTEGER)(-  1);
+  Self__GCGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__01K);
+  new_capacity__ICGB= 0;
+  if (((__INTEGER)(Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU +  1) <= (__INTEGER)(Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU -  1))) {
+    Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU=(__INTEGER)(Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU +  1);
+    __tmp__WCGB=TRUE__;
   } else {
-    __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;
+    __tmp__WCGB=FALSE__;
+  };
+  if ((! __tmp__WCGB)) {
+    if ((Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU ==  0)) {
+      Self__GCGB->parent_arrayed_collection__Z1K.storage__3QU=create__U0ZB( 2);
+      Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU= 2;
+      Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU= 0;
+    } else {
+      new_capacity__ICGB=(__INTEGER)(Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU <<  1);
+      __tmp__LDGB=Self__GCGB->parent_arrayed_collection__Z1K.storage__3QU;
+      __tmp__MDGB=Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU;
+      new__MEGC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__LDGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__MDGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ICGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__AFGC=(__INTEGER)(new_capacity__ICGB -  1);
+      Self__K5VD=__tmp__MDGB;
+      while ((Self__K5VD <= __tmp__AFGC)) {
+        new__MEGC[Self__K5VD]=NULL;
+        Self__K5VD=(__INTEGER)(Self__K5VD +  1);
+      };
+      Self__GCGB->parent_arrayed_collection__Z1K.storage__3QU=new__MEGC;
+      Self__GCGB->parent_arrayed_collection__Z1K.capacity__SQU=new_capacity__ICGB;
+      Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU=(__INTEGER)(Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU +  1);
+    };
+  };
+  ((void **)Self__GCGB->parent_arrayed_collection__Z1K.storage__3QU)[Self__GCGB->parent_arrayed_collection__Z1K.upper__NOU]=tmp__PO5;
 }
 
-static void free__ENQ(void *tmp__GNQ)
+static void free__XIQ(void *tmp__ZIQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__RUV,__tmp__YVV,__tmp__2HEC,Self__5NVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__PUV;
+  __BOOLEAN __tmp__AVV;
+  void **__tmp__XVV,**new__IHEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__ZIQ)->parent_arrayed_collection__EYC.upper__3DV=(__INTEGER)(-  1);
+  Self__PUV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+  new_capacity__RUV= 0;
+  if (((__INTEGER)(Self__PUV->parent_arrayed_collection__EQP.upper__YQV +  1) <= (__INTEGER)(Self__PUV->parent_arrayed_collection__EQP.capacity__TUV -  1))) {
+    Self__PUV->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(Self__PUV->parent_arrayed_collection__EQP.upper__YQV +  1);
+    __tmp__AVV=TRUE__;
   } else {
-    __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;
+    __tmp__AVV=FALSE__;
+  };
+  if ((! __tmp__AVV)) {
+    if ((Self__PUV->parent_arrayed_collection__EQP.capacity__TUV ==  0)) {
+      Self__PUV->parent_arrayed_collection__EQP.storage__OVV=create__KGRB( 2);
+      Self__PUV->parent_arrayed_collection__EQP.capacity__TUV= 2;
+      Self__PUV->parent_arrayed_collection__EQP.upper__YQV= 0;
+    } else {
+      new_capacity__RUV=(__INTEGER)(Self__PUV->parent_arrayed_collection__EQP.capacity__TUV <<  1);
+      __tmp__XVV=Self__PUV->parent_arrayed_collection__EQP.storage__OVV;
+      __tmp__YVV=Self__PUV->parent_arrayed_collection__EQP.capacity__TUV;
+      new__IHEC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__XVV)),((__UINTEGER_32 )(__INTEGER)(__tmp__YVV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RUV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__2HEC=(__INTEGER)(new_capacity__RUV -  1);
+      Self__5NVD=__tmp__YVV;
+      while ((Self__5NVD <= __tmp__2HEC)) {
+        new__IHEC[Self__5NVD]=NULL;
+        Self__5NVD=(__INTEGER)(Self__5NVD +  1);
+      };
+      Self__PUV->parent_arrayed_collection__EQP.storage__OVV=new__IHEC;
+      Self__PUV->parent_arrayed_collection__EQP.capacity__TUV=new_capacity__RUV;
+      Self__PUV->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(Self__PUV->parent_arrayed_collection__EQP.upper__YQV +  1);
+    };
+  };
+  ((void **)Self__PUV->parent_arrayed_collection__EQP.storage__OVV)[Self__PUV->parent_arrayed_collection__EQP.upper__YQV]=tmp__ZIQ;
 }
 
-static __INTEGER hash_code__F5QF(__FAST_ARRAYoSTRING_CONSTANTo *Self__G5QF)
+static __INTEGER hash_code__BKRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__CKRF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__EKRF,result__X4HH,__tmp__Z4HH,Self__04HH;
+  __INTEGER result__24HH,__tmp__44HH,Self__54HH;
+  __STRING_CONSTANT *Self__Y4HH,*Self__34HH;
+  __BOOLEAN __tmp__VKRF;
+  result__EKRF= 0;
+  if ((! (Self__CKRF->parent_arrayed_collection__L2I.upper__R4OD <  0))) {
+    if (((void *)((void **)Self__CKRF->parent_arrayed_collection__L2I.storage__HBPD)[Self__CKRF->parent_arrayed_collection__L2I.upper__R4OD] != (void *)NULL)) {
+      Self__Y4HH=((__STRING_CONSTANT *)((void **)Self__CKRF->parent_arrayed_collection__L2I.storage__HBPD)[Self__CKRF->parent_arrayed_collection__L2I.upper__R4OD]);
+      result__X4HH= 0;
+      __tmp__Z4HH=Self__Y4HH->count__DD;
+      Self__04HH= 1;
+      while ((Self__04HH <= __tmp__Z4HH)) {
+        result__X4HH=(__INTEGER)((__INTEGER)( 5 * result__X4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Y4HH->storage__QMO)[(__INTEGER)(Self__04HH -  1)])));
+        Self__04HH=(__INTEGER)(Self__04HH +  1);
+      };
+      if ((result__X4HH <  0)) {
+        result__X4HH=(__INTEGER)(~ result__X4HH);
+      };
+      result__EKRF=result__X4HH;
+      __tmp__VKRF=TRUE__;
+    } else {
+      __tmp__VKRF=FALSE__;
+    };
+    if ((! __tmp__VKRF)) {
+      if (((void *)((void **)Self__CKRF->parent_arrayed_collection__L2I.storage__HBPD)[ 0] != (void *)NULL)) {
+        Self__34HH=((__STRING_CONSTANT *)((void **)Self__CKRF->parent_arrayed_collection__L2I.storage__HBPD)[ 0]);
+        result__24HH= 0;
+        __tmp__44HH=Self__34HH->count__DD;
+        Self__54HH= 1;
+        while ((Self__54HH <= __tmp__44HH)) {
+          result__24HH=(__INTEGER)((__INTEGER)( 5 * result__24HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__34HH->storage__QMO)[(__INTEGER)(Self__54HH -  1)])));
+          Self__54HH=(__INTEGER)(Self__54HH +  1);
+        };
+        if ((result__24HH <  0)) {
+          result__24HH=(__INTEGER)(~ result__24HH);
+        };
+        result__EKRF=result__24HH;
+      };
+    };
+  };
+  return(result__EKRF);
 }
 
-static void copy__E3RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__F3RD,void *other__G3RD)
+static void copy__W1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__X1RD,void *other__Y1RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER new_capacity__01RD,other_upper__Z1RD,Self__2FYE;
+  void **__tmp__N2RD,**__tmp__P2RD,**Self__GGWE;
+  new_capacity__01RD= 0;
+  other_upper__Z1RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__Y1RD)->parent_arrayed_collection__L2I.upper__R4OD;
+  if ((other_upper__Z1RD >=  0)) {
+    new_capacity__01RD=(__INTEGER)(other_upper__Z1RD +  1);
+    if ((Self__X1RD->parent_arrayed_collection__L2I.capacity__MAPD < new_capacity__01RD)) {
+      Self__X1RD->parent_arrayed_collection__L2I.storage__HBPD=create__5HHE(new_capacity__01RD);
+      Self__X1RD->parent_arrayed_collection__L2I.capacity__MAPD=new_capacity__01RD;
+    };
+    __tmp__N2RD=Self__X1RD->parent_arrayed_collection__L2I.storage__HBPD;
+    __tmp__P2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__Y1RD)->parent_arrayed_collection__L2I.storage__HBPD;
+    Self__GGWE=((void **)__tmp__N2RD);
+    Self__2FYE=other_upper__Z1RD;
+    while ((Self__2FYE >=  0)) {
+      Self__GGWE[Self__2FYE]=((void **)__tmp__P2RD)[Self__2FYE];
+      Self__2FYE=(__INTEGER)(Self__2FYE -  1);
+    };
+  };
+  Self__X1RD->parent_arrayed_collection__L2I.upper__R4OD=other_upper__Z1RD;
 }
 
-static __BOOLEAN read_operator__PNM()
+static __BOOLEAN read_operator__FJM()
 // () With resultNo recursive, No inlinable.
 {
-  __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:
+  __INTEGER old_pos__JJM,__tmp__UMO,i__O0O;
+  __POSITION pos__GGZG;
+  __BOOLEAN result__IJM,__tmp__EKM;
+  __CHARACTER result__Y4AH,result__B5AH,ch__OMO,result__G5AH;
+  __CHARACTER *__tmp__RMO,*Self__C0O;
+  result__IJM=FALSE__;
+  read_space__KSD();
+  old_pos__JJM=position__CCC;
+  ((__STRING *)string_tmp__VH)->count__EGC= 0;
+  until_do__WUM:
   {
-    result__VRAH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__VRAH=((__CHARACTER )(( 0)));
+    result__Y4AH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__Y4AH=((__CHARACTER )(( 0)));
     } else {
-      result__VRAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__Y4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__VRAH == ((__CHARACTER )(( 0))))) {
-      __tmp__OOM=TRUE__;
+    if ((result__Y4AH == ((__CHARACTER )(( 0))))) {
+      __tmp__EKM=TRUE__;
     } else {
-      result__4RAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__4RAH=((__CHARACTER )(( 0)));
+      result__B5AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__B5AH=((__CHARACTER )(( 0)));
       } else {
-        result__4RAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__B5AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  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);
+      ch__OMO=result__B5AH;
+      __tmp__RMO=((__STRING_CONSTANT *)(&__string_316))->storage__QMO;
+      __tmp__UMO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_316))->count__DD -  1);
+      Self__C0O=((__CHARACTER *)__tmp__RMO);
+      i__O0O=__tmp__UMO;
+      while ((! ((i__O0O <  0) || (ch__OMO == Self__C0O[i__O0O])))) {
+        i__O0O=(__INTEGER)(i__O0O -  1);
       };
-      __tmp__OOM=(i__14O <  0);
+      __tmp__EKM=(i__O0O <  0);
     };
-    if ((! __tmp__OOM)) {
-      result__DSAH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__DSAH=((__CHARACTER )(( 0)));
+    if ((! __tmp__EKM)) {
+      result__G5AH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__G5AH=((__CHARACTER )(( 0)));
       } else {
-        result__DSAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__G5AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      add_last__BMT(string_tmp__VH,result__DSAH);
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      goto until_do__DZM;
+      add_last__UHT(string_tmp__VH,result__G5AH);
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      goto until_do__WUM;
     };
   };
-  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)) {
+  if ((((__STRING *)string_tmp__VH)->count__EGC !=  0)) {
+    last_string__V0C=get__YWB(string_tmp__VH);
+    if (((((void *)last_string__V0C == (void *)(&__string_12)) || ((void *)last_string__V0C == (void *)(&__string_14))) || ((void *)last_string__V0C == (void *)(&__string_13)))) {
+      pos__GGZG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_286));
+      put_position__CMG(pos__GGZG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__TBD((&__string_124),old_pos__TNM,position__0BC);
-    result__SNM=TRUE__;
+    short__token__to__YBD((&__string_124),old_pos__JJM,position__CCC);
+    result__IJM=TRUE__;
   };
-  return(result__SNM);
+  return(result__IJM);
 }
 
-static void* operator__name__FEO(void *typ__HEO,void *op__IEO)
+static void* operator__name__Y5N(void *typ__05N,void *op__15N)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER __tmp__CAO,Self__JSO;
+  __CHARACTER c__35N;
+  __BOOLEAN __tmp__QAO,__tmp__3AO,result__XLHB,__tmp__KBO,result__JMHB;
+  __BOOLEAN __tmp__XBO,result__1MHB,__tmp__ECO,result__NNHB,__tmp__RCO;
+  __BOOLEAN result__5NHB,__tmp__4CO,result__ROHB,__tmp__LDO;
+  __BOOLEAN result__DPHB,__tmp__YDO,result__VPHB,__tmp__FEO;
+  __BOOLEAN result__HQHB,__tmp__SEO,result__ZQHB,__tmp__5EO;
+  __BOOLEAN result__LRHB,__tmp__MFO,result__3RHB,__tmp__ZFO;
+  __BOOLEAN result__PSHB,__tmp__GGO,result__BTHB,__tmp__TGO;
+  __BOOLEAN result__TTHB,__tmp__AHO,result__FUHB;
+  c__35N='\0';
+  copy__U4R(string_tmp__VH,typ__05N);
+  __tmp__CAO=((__STRING_CONSTANT *)op__15N)->count__DD;
+  Self__JSO= 1;
+  while ((Self__JSO <= __tmp__CAO)) {
+    c__35N=((__CHARACTER *)((__STRING_CONSTANT *)op__15N)->storage__QMO)[(__INTEGER)(Self__JSO -  1)];
+    if ((c__35N == '+')) {
+      append__2JS(string_tmp__VH,(&__string_188));
+      __tmp__QAO=TRUE__;
     } else {
-      __tmp__3EO=FALSE__;
+      __tmp__QAO=FALSE__;
     };
-    if (__tmp__3EO) {
-      __tmp__KFO=TRUE__;
+    if (__tmp__QAO) {
+      __tmp__3AO=TRUE__;
     } else {
-      result__LQHB=(c__KEO == '-');
-      if (result__LQHB) {
-        append__JOS(string_tmp__VH,(&__string_187));
+      result__XLHB=(c__35N == '-');
+      if (result__XLHB) {
+        append__2JS(string_tmp__VH,(&__string_189));
       };
-      __tmp__KFO=result__LQHB;
+      __tmp__3AO=result__XLHB;
     };
-    if (__tmp__KFO) {
-      __tmp__XFO=TRUE__;
+    if (__tmp__3AO) {
+      __tmp__KBO=TRUE__;
     } else {
-      result__3QHB=(c__KEO == '~');
-      if (result__3QHB) {
-        append__JOS(string_tmp__VH,(&__string_188));
+      result__JMHB=(c__35N == '~');
+      if (result__JMHB) {
+        append__2JS(string_tmp__VH,(&__string_190));
       };
-      __tmp__XFO=result__3QHB;
+      __tmp__KBO=result__JMHB;
     };
-    if (__tmp__XFO) {
-      __tmp__EGO=TRUE__;
+    if (__tmp__KBO) {
+      __tmp__XBO=TRUE__;
     } else {
-      result__PRHB=(c__KEO == '!');
-      if (result__PRHB) {
-        append__JOS(string_tmp__VH,(&__string_189));
+      result__1MHB=(c__35N == '!');
+      if (result__1MHB) {
+        append__2JS(string_tmp__VH,(&__string_191));
       };
-      __tmp__EGO=result__PRHB;
+      __tmp__XBO=result__1MHB;
     };
-    if (__tmp__EGO) {
-      __tmp__RGO=TRUE__;
+    if (__tmp__XBO) {
+      __tmp__ECO=TRUE__;
     } else {
-      result__BSHB=(c__KEO == '/');
-      if (result__BSHB) {
-        append__JOS(string_tmp__VH,(&__string_190));
+      result__NNHB=(c__35N == '/');
+      if (result__NNHB) {
+        append__2JS(string_tmp__VH,(&__string_192));
       };
-      __tmp__RGO=result__BSHB;
+      __tmp__ECO=result__NNHB;
     };
-    if (__tmp__RGO) {
-      __tmp__4GO=TRUE__;
+    if (__tmp__ECO) {
+      __tmp__RCO=TRUE__;
     } else {
-      result__TSHB=(c__KEO == '*');
-      if (result__TSHB) {
-        append__JOS(string_tmp__VH,(&__string_191));
+      result__5NHB=(c__35N == '*');
+      if (result__5NHB) {
+        append__2JS(string_tmp__VH,(&__string_193));
       };
-      __tmp__4GO=result__TSHB;
+      __tmp__RCO=result__5NHB;
     };
-    if (__tmp__4GO) {
-      __tmp__LHO=TRUE__;
+    if (__tmp__RCO) {
+      __tmp__4CO=TRUE__;
     } else {
-      result__FTHB=(c__KEO == '^');
-      if (result__FTHB) {
-        append__JOS(string_tmp__VH,(&__string_192));
+      result__ROHB=(c__35N == '^');
+      if (result__ROHB) {
+        append__2JS(string_tmp__VH,(&__string_194));
       };
-      __tmp__LHO=result__FTHB;
+      __tmp__4CO=result__ROHB;
     };
-    if (__tmp__LHO) {
-      __tmp__YHO=TRUE__;
+    if (__tmp__4CO) {
+      __tmp__LDO=TRUE__;
     } else {
-      result__XTHB=(c__KEO == '%');
-      if (result__XTHB) {
-        append__JOS(string_tmp__VH,(&__string_193));
+      result__DPHB=(c__35N == '%');
+      if (result__DPHB) {
+        append__2JS(string_tmp__VH,(&__string_195));
       };
-      __tmp__YHO=result__XTHB;
+      __tmp__LDO=result__DPHB;
     };
-    if (__tmp__YHO) {
-      __tmp__FIO=TRUE__;
+    if (__tmp__LDO) {
+      __tmp__YDO=TRUE__;
     } else {
-      result__JUHB=(c__KEO == '>');
-      if (result__JUHB) {
-        append__JOS(string_tmp__VH,(&__string_194));
+      result__VPHB=(c__35N == '>');
+      if (result__VPHB) {
+        append__2JS(string_tmp__VH,(&__string_196));
       };
-      __tmp__FIO=result__JUHB;
+      __tmp__YDO=result__VPHB;
     };
-    if (__tmp__FIO) {
-      __tmp__SIO=TRUE__;
+    if (__tmp__YDO) {
+      __tmp__FEO=TRUE__;
     } else {
-      result__1UHB=(c__KEO == '<');
-      if (result__1UHB) {
-        append__JOS(string_tmp__VH,(&__string_195));
+      result__HQHB=(c__35N == '<');
+      if (result__HQHB) {
+        append__2JS(string_tmp__VH,(&__string_197));
       };
-      __tmp__SIO=result__1UHB;
+      __tmp__FEO=result__HQHB;
     };
-    if (__tmp__SIO) {
-      __tmp__5IO=TRUE__;
+    if (__tmp__FEO) {
+      __tmp__SEO=TRUE__;
     } else {
-      result__NVHB=(c__KEO == '=');
-      if (result__NVHB) {
-        append__JOS(string_tmp__VH,(&__string_196));
+      result__ZQHB=(c__35N == '=');
+      if (result__ZQHB) {
+        append__2JS(string_tmp__VH,(&__string_198));
       };
-      __tmp__5IO=result__NVHB;
+      __tmp__SEO=result__ZQHB;
     };
-    if (__tmp__5IO) {
-      __tmp__MJO=TRUE__;
+    if (__tmp__SEO) {
+      __tmp__5EO=TRUE__;
     } else {
-      result__5VHB=(c__KEO == '\\');
-      if (result__5VHB) {
-        append__JOS(string_tmp__VH,(&__string_197));
+      result__LRHB=(c__35N == '\\');
+      if (result__LRHB) {
+        append__2JS(string_tmp__VH,(&__string_199));
       };
-      __tmp__MJO=result__5VHB;
+      __tmp__5EO=result__LRHB;
     };
-    if (__tmp__MJO) {
-      __tmp__ZJO=TRUE__;
+    if (__tmp__5EO) {
+      __tmp__MFO=TRUE__;
     } else {
-      result__RWHB=(c__KEO == '|');
-      if (result__RWHB) {
-        append__JOS(string_tmp__VH,(&__string_198));
+      result__3RHB=(c__35N == '|');
+      if (result__3RHB) {
+        append__2JS(string_tmp__VH,(&__string_200));
       };
-      __tmp__ZJO=result__RWHB;
+      __tmp__MFO=result__3RHB;
     };
-    if (__tmp__ZJO) {
-      __tmp__GKO=TRUE__;
+    if (__tmp__MFO) {
+      __tmp__ZFO=TRUE__;
     } else {
-      result__DXHB=(c__KEO == '&');
-      if (result__DXHB) {
-        append__JOS(string_tmp__VH,(&__string_199));
+      result__PSHB=(c__35N == '&');
+      if (result__PSHB) {
+        append__2JS(string_tmp__VH,(&__string_201));
       };
-      __tmp__GKO=result__DXHB;
+      __tmp__ZFO=result__PSHB;
     };
-    if (__tmp__GKO) {
-      __tmp__TKO=TRUE__;
+    if (__tmp__ZFO) {
+      __tmp__GGO=TRUE__;
     } else {
-      result__VXHB=(c__KEO == '$');
-      if (result__VXHB) {
-        append__JOS(string_tmp__VH,(&__string_200));
+      result__BTHB=(c__35N == '$');
+      if (result__BTHB) {
+        append__2JS(string_tmp__VH,(&__string_202));
       };
-      __tmp__TKO=result__VXHB;
+      __tmp__GGO=result__BTHB;
     };
-    if (__tmp__TKO) {
-      __tmp__ALO=TRUE__;
+    if (__tmp__GGO) {
+      __tmp__TGO=TRUE__;
     } else {
-      result__HYHB=(c__KEO == '#');
-      if (result__HYHB) {
-        append__JOS(string_tmp__VH,(&__string_201));
+      result__TTHB=(c__35N == '#');
+      if (result__TTHB) {
+        append__2JS(string_tmp__VH,(&__string_203));
       };
-      __tmp__ALO=result__HYHB;
+      __tmp__TGO=result__TTHB;
     };
-    if (__tmp__ALO) {
-      __tmp__NLO=TRUE__;
+    if (__tmp__TGO) {
+      __tmp__AHO=TRUE__;
     } else {
-      result__ZYHB=(c__KEO == '@');
-      if (result__ZYHB) {
-        append__JOS(string_tmp__VH,(&__string_202));
+      result__FUHB=(c__35N == '@');
+      if (result__FUHB) {
+        append__2JS(string_tmp__VH,(&__string_204));
       };
-      __tmp__NLO=result__ZYHB;
+      __tmp__AHO=result__FUHB;
     };
-    if ((! __tmp__NLO)) {
-      if ((c__KEO == '?')) {
-        append__JOS(string_tmp__VH,(&__string_203));
+    if ((! __tmp__AHO)) {
+      if ((c__35N == '?')) {
+        append__2JS(string_tmp__VH,(&__string_205));
       };
     };
-    Self__WWO=(__INTEGER)(Self__WWO +  1);
+    Self__JSO=(__INTEGER)(Self__JSO +  1);
   };
-  return(get__QWB(string_tmp__VH));
+  return(get__YWB(string_tmp__VH));
 }
 
-static void append_in__0IBC(__ITM_TYPE_MULTI *Self__1IBC,void *buffer__2IBC)
+static void append_in__BGBC(__ITM_TYPE_MULTI *Self__CGBC,void *buffer__DGBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__BMT(buffer__2IBC,'(');
-  display_raw__1LIC(Self__1IBC,buffer__2IBC);
-  add_last__BMT(buffer__2IBC,')');
+  add_last__UHT(buffer__DGBC,'(');
+  display_raw__ZJIC(Self__CGBC,buffer__DGBC);
+  add_last__UHT(buffer__DGBC,')');
 }
 
-static void* read_prototype__PON(__PARSER *Self__QON,void *styl__RON)
+static void* read_prototype__CKN(__PARSER *Self__DKN,void *styl__EKN)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *nam__GKN,*n__HTP,*n__XJR;
+  void *result__IKN,*result__JQQ;
+  __INTEGER old_pos__KKN,old_derive__LKN,sav_derive__MKN;
+  __INTEGER pos_before__NKN,idx__MTP,typ_id__OKIB,new_capacity__0BBB;
+  __INTEGER __tmp__4CBB,__tmp__1MFC,Self__U0VD,typ_id__D5HH,idx__1JR;
+  __INTEGER typ_id__Z1IB,new_capacity__BACB,__tmp__FBCB,__tmp__XQFC;
+  __INTEGER Self__T2VD;
+  __POSITION pos__LHZG,pos__NHZG,pos__PHZG,pos__RHZG,pos__QJZG;
+  __POSITION __tmp__3ON,__tmp__5PN;
+  __ITM_TYPE_GENERIC *result__LTP,*__tmp__UVP,*result__IKIB,*Self__0ZCC;
+  void *__tmp__TVP;
+  __POINTER ptr__JKIB,ptr_table__RWJH,next__QWJH,result__SWJH;
+  __POINTER ptr_table__WWJH,next__VWJH,result__XWJH,ptr__C5HH;
+  __POINTER ptr_table__4WJH,next__3WJH,result__5WJH,ptr_table__DXJH;
+  __POINTER next__CXJH,result__EXJH,ptr__U1IB,ptr_table__IXJH;
+  __POINTER next__HXJH,result__JXJH,ptr_table__NXJH,next__MXJH;
+  __POINTER result__OXJH;
+  __UINTEGER_32 sz__LKIB,a__MOGH,new_size__NOGH,t__ROGH,a__QOGH;
+  __UINTEGER_32 new_size__ZWJH,lab_type__YWJH,sz__E5HH,a__F5HH;
+  __UINTEGER_32 new_size__G5HH,t__H5HH,a__I5HH,new_size__GXJH;
+  __UINTEGER_32 lab_type__FXJH,sz__W1IB,a__0OGH,new_size__1OGH,t__5OGH;
+  __UINTEGER_32 a__4OGH,new_size__QXJH,lab_type__PXJH;
+  void *result__GLEH;
+  __ITM_TYPE_PARAMETER *result__B5HH,*Self__J5HH;
+  __ITM_TYPE_STYLE *result__0JR,*__tmp__WLR,*result__T1IB,*Self__M3CC;
+  void *__tmp__VLR;
+  void *genericity__HKN,*result__SNHH,*lt__JTP;
+  __BOOLEAN continue__OKN,result__HWJH,result__KWJH,__tmp__1QQ;
+  __BOOLEAN result__NWJH,__tmp__ICBB,result__0WJH,__tmp__EPN;
+  __BOOLEAN __tmp__PACB;
+  __CHARACTER result__IWJH,result__LWJH,result__OWJH,result__1WJH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__TNHH,*Self__UNHH;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__YBBB;
+  void **__tmp__3CBB,**new__HMFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__55BB;
+  void **__tmp__EBCB,**new__DQFC;
+  nam__GKN=NULL;
+  genericity__HKN=NULL;
+  result__IKN=NULL;
+  old_pos__KKN= 0;
+  old_derive__LKN= 0;
+  sav_derive__MKN= 0;
+  pos_before__NKN= 0;
+  continue__OKN=FALSE__;
+  if (read_cap_identifier__MWJ()) {
+    old_pos__KKN=position__CCC;
+    old_derive__LKN=short_derive__PCC;
+    copy__U4R(string_tmp2__F3I,last_string__V0C);
     do {
-      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)) {
+      continue__OKN=read_word__4MF((&__string_7));
+      if (continue__OKN) {
+        if ((! read_cap_identifier__MWJ())) {
+          pos__LHZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_317));
+          put_position__CMG(pos__LHZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        append__JOS(string_tmp2__JAJ,(&__string_7));
-        append__JOS(string_tmp2__JAJ,last_string__Q0C);
+        append__2JS(string_tmp2__F3I,(&__string_7));
+        append__2JS(string_tmp2__F3I,last_string__V0C);
       } else {
-        pos_before__0ON=position__0BC;
-        result__YLJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__YLJH=FALSE__;
+        pos_before__NKN=position__CCC;
+        result__HWJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__HWJH=FALSE__;
         } else {
-          result__ZLJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__ZLJH=((__CHARACTER )(( 0)));
+          result__IWJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__IWJH=((__CHARACTER )(( 0)));
           } else {
-            result__ZLJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__IWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__ZLJH == '.')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__YLJH=TRUE__;
+          if ((result__IWJH == '.')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__HWJH=TRUE__;
           };
         };
-        if ((result__YLJH && read_cap_identifier__0ZJ())) {
-          continue__1ON=TRUE__;
-          add_last__BMT(string_tmp2__JAJ,'.');
-          append__JOS(string_tmp2__JAJ,last_string__Q0C);
+        if ((result__HWJH && read_cap_identifier__MWJ())) {
+          continue__OKN=TRUE__;
+          add_last__UHT(string_tmp2__F3I,'.');
+          append__2JS(string_tmp2__F3I,last_string__V0C);
         } else {
-          position__0BC=pos_before__0ON;
+          position__CCC=pos_before__NKN;
         };
       };
-    } while (continue__1ON);
-    nam__TON=get__QWB(string_tmp2__JAJ);
-    result__1LJH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__1LJH=FALSE__;
+    } while (continue__OKN);
+    nam__GKN=get__YWB(string_tmp2__F3I);
+    result__KWJH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__KWJH=FALSE__;
     } else {
-      result__2LJH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__2LJH=((__CHARACTER )(( 0)));
+      result__LWJH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__LWJH=((__CHARACTER )(( 0)));
       } else {
-        result__2LJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__LWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__2LJH == '(')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__1LJH=TRUE__;
+      if ((result__LWJH == '(')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__KWJH=TRUE__;
       };
     };
-    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);
+    if (result__KWJH) {
+      result__SNHH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP)->parent_arrayed_collection__EQP.upper__YQV <  0)) {
+        result__SNHH=create_with_capacity__DBR( 16);
       } else {
-        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);
+        Self__TNHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+        result__SNHH=((void **)Self__TNHH->parent_arrayed_collection__EQP.storage__OVV)[Self__TNHH->parent_arrayed_collection__EQP.upper__YQV];
+        Self__UNHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__FQP);
+        Self__UNHH->parent_arrayed_collection__EQP.upper__YQV=(__INTEGER)(Self__UNHH->parent_arrayed_collection__EQP.upper__YQV -  1);
       };
-      genericity__UON=result__5BHH;
+      genericity__HKN=result__SNHH;
       do {
-        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)) {
+        result__JQQ=read_type__B4L(Self__DKN,FALSE__);
+        if (((void *)result__JQQ == (void *)NULL)) {
+          if (((void *)read_constant__WMO() != (void *)NULL)) {
+            pos__NHZG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_318));
+            put_position__CMG(pos__NHZG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
-            __tmp__IVQ=TRUE__;
+            __tmp__1QQ=TRUE__;
           } else {
-            __tmp__IVQ=FALSE__;
+            __tmp__1QQ=FALSE__;
           };
-          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)) {
+          if ((! __tmp__1QQ)) {
+            if (read_identifier__12K()) {
+              pos__PHZG=current_position__XUF();
+              put_error__text__YKG( 0,(&__string_319));
+              put_position__CMG(pos__PHZG);
+              put_string__CZF(msg_err__3KG);
+              if ((type_error__2KG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        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)) {
+        if (((void *)result__JQQ == (void *)NULL)) {
+          pos__RHZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_259));
+          put_position__CMG(pos__RHZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        add_last__NJV(genericity__HKN,result__JQQ);
+        result__NWJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__NWJH=FALSE__;
+        } else {
+          result__OWJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__OWJH=((__CHARACTER )(( 0)));
+          } else {
+            result__OWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__OWJH == ',')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__NWJH=TRUE__;
+          };
+        };
+      } while (result__NWJH);
+      genericity__HKN=alias__BRP(result__SNHH);
+      n__HTP=nam__GKN;
+      lt__JTP=genericity__HKN;
+      result__LTP=NULL;
+      idx__MTP= 0;
+      while (((idx__MTP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.upper__1TP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.storage__R3V)[idx__MTP])->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP != (void *)n__HTP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.storage__R3V)[idx__MTP])->parent_itm_type_style__3NN.style__OUP != (void *)styl__EKN)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.storage__R3V)[idx__MTP])->list_type__YUP != (void *)lt__JTP)))) {
+        idx__MTP=(__INTEGER)(idx__MTP +  1);
+      };
+      if ((idx__MTP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.upper__1TP)) {
+        __tmp__TVP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP)->parent_arrayed_collection__RTP.storage__R3V)[idx__MTP];
+        if (__tmp__TVP==NULL) {
+          __tmp__UVP=NULL;
+        } else {
+          __tmp__UVP=((__ITM_TYPE_GENERIC *)__tmp__TVP);
+        };
+        result__LTP=__tmp__UVP;
+      } else {
+        result__IKIB=NULL;
+        ptr__JKIB=((__POINTER )(NULL));
+        typ_id__OKIB= 0;
+        sz__LKIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__LKIB ==  0)) {
+          result__IKIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__OKIB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LKIB);
+          if ((typ_id__OKIB == (__INTEGER)(-  1))) {
+            a__MOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKIB + a__MOGH) & (__UINTEGER_32)(~ a__MOGH));
+            ptr_table__RWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__QWJH=((__POINTER )(NULL));
+            result__SWJH=((__POINTER *)ptr_table__RWJH)[ 0];
+            if ((result__SWJH == (void *)NULL)) {
+              result__SWJH=new_lab__QOJ(new_size__NOGH);
+              next__QWJH=(void *)((unsigned long)result__SWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NOGH)));
+              ((__POINTER *)next__QWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RWJH)[ 0]=next__QWJH;
             } else {
-              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)));
+              next__QWJH=((__POINTER *)result__SWJH)[ 0];
+              if ((next__QWJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SWJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NOGH <<  1)) <=  4096)) {
+                  next__QWJH=(void *)((unsigned long)result__SWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NOGH)));
                 } else {
-                  next__BMJH=new_lab__URJ(new_size__0CGH);
+                  next__QWJH=new_lab__QOJ(new_size__NOGH);
                 };
-                ((__POINTER *)next__BMJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CMJH)[ 0]=next__BMJH;
+                ((__POINTER *)next__QWJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RWJH)[ 0]=next__QWJH;
               } else {
-                ((__POINTER *)result__DMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DMJH=next__BMJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__SWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SWJH=next__QWJH;
+              };
+            };
+            ptr__JKIB=result__SWJH;
+          } else {
+            t__ROGH=((__UINTEGER_32 )typ_id__OKIB);
+            a__QOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ZWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__LKIB + a__QOGH) & (__UINTEGER_32)(~ a__QOGH));
+            ptr_table__WWJH=((__POINTER )(&(table_type[(t__ROGH)])));
+            lab_type__YWJH=(__UINTEGER_32)(t__ROGH |  1);
+            next__VWJH=((__POINTER )(NULL));
+            result__XWJH=((__POINTER *)ptr_table__WWJH)[ 0];
+            if ((result__XWJH == (void *)NULL)) {
+              result__XWJH=new_lab__QOJ(lab_type__YWJH);
+              next__VWJH=(void *)((unsigned long)result__XWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWJH)));
+              ((__POINTER *)next__VWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__WWJH)[ 0]=next__VWJH;
             } else {
-              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)));
+              next__VWJH=((__POINTER *)result__XWJH)[ 0];
+              if ((next__VWJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XWJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZWJH <<  1)) <=  4096)) {
+                  next__VWJH=(void *)((unsigned long)result__XWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZWJH)));
                 } else {
-                  next__GMJH=new_lab__URJ(lab_type__JMJH);
+                  next__VWJH=new_lab__QOJ(lab_type__YWJH);
                 };
-                ((__POINTER *)next__GMJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HMJH)[ 0]=next__GMJH;
+                ((__POINTER *)next__VWJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WWJH)[ 0]=next__VWJH;
               } else {
-                ((__POINTER *)result__IMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IMJH=next__GMJH;
+                ((__POINTER *)result__XWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XWJH=next__VWJH;
               };
             };
-            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)) {
+            ptr__JKIB=result__XWJH;
+          };
+          result__IKIB=((__ITM_TYPE_GENERIC *)ptr__JKIB);
+          *(result__IKIB) = *(ITM_TYPE_GENERIC__);
+        };
+        Self__0ZCC=((__ITM_TYPE_GENERIC *)result__IKIB);
+        Self__0ZCC->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP=nam__GKN;
+        Self__0ZCC->parent_itm_type_style__3NN.style__OUP=styl__EKN;
+        Self__0ZCC->list_type__YUP=genericity__HKN;
+        result__LTP=result__IKIB;
+        Self__YBBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__STP);
+        new_capacity__0BBB= 0;
+        if (((__INTEGER)(Self__YBBB->parent_arrayed_collection__RTP.upper__1TP +  1) <= (__INTEGER)(Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V -  1))) {
+          Self__YBBB->parent_arrayed_collection__RTP.upper__1TP=(__INTEGER)(Self__YBBB->parent_arrayed_collection__RTP.upper__1TP +  1);
+          __tmp__ICBB=TRUE__;
+        } else {
+          __tmp__ICBB=FALSE__;
+        };
+        if ((! __tmp__ICBB)) {
+          if ((Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V ==  0)) {
+            Self__YBBB->parent_arrayed_collection__RTP.storage__R3V=create__EPXB( 2);
+            Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V= 2;
+            Self__YBBB->parent_arrayed_collection__RTP.upper__1TP= 0;
+          } else {
+            new_capacity__0BBB=(__INTEGER)(Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V <<  1);
+            __tmp__3CBB=Self__YBBB->parent_arrayed_collection__RTP.storage__R3V;
+            __tmp__4CBB=Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V;
+            new__HMFC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__3CBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__4CBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0BBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__1MFC=(__INTEGER)(new_capacity__0BBB -  1);
+            Self__U0VD=__tmp__4CBB;
+            while ((Self__U0VD <= __tmp__1MFC)) {
+              new__HMFC[Self__U0VD]=NULL;
+              Self__U0VD=(__INTEGER)(Self__U0VD +  1);
+            };
+            Self__YBBB->parent_arrayed_collection__RTP.storage__R3V=new__HMFC;
+            Self__YBBB->parent_arrayed_collection__RTP.capacity__G3V=new_capacity__0BBB;
+            Self__YBBB->parent_arrayed_collection__RTP.upper__1TP=(__INTEGER)(Self__YBBB->parent_arrayed_collection__RTP.upper__1TP +  1);
+          };
+        };
+        ((void **)Self__YBBB->parent_arrayed_collection__RTP.storage__R3V)[Self__YBBB->parent_arrayed_collection__RTP.upper__1TP]=result__IKIB;
+      };
+      result__IKN=result__LTP;
+      result__0WJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__0WJH=FALSE__;
+      } else {
+        result__1WJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__1WJH=((__CHARACTER )(( 0)));
+        } else {
+          result__1WJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__1WJH == ')')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__0WJH=TRUE__;
+        };
+      };
+      if ((! result__0WJH)) {
+        pos__QJZG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_262));
+        put_position__CMG(pos__QJZG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      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)) {
+      if (is_parameter_type__WGE) {
+        if (((void *)styl__EKN != (void *)NULL)) {
+          copy__U4R(string_tmp__VH,(&__string_320));
+          append__2JS(string_tmp__VH,styl__EKN);
+          append__2JS(string_tmp__VH,(&__string_321));
+          __tmp__3ON=current_position__XUF();
+          put_error__text__YKG( 2,string_tmp__VH);
+          put_position__CMG(__tmp__3ON);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__GLEH=fast_reference_at__TXT(dico__WQI,nam__GKN);
+        if (((void *)result__GLEH == (void *)NULL)) {
+          result__B5HH=NULL;
+          ptr__C5HH=((__POINTER )(NULL));
+          typ_id__D5HH= 0;
+          sz__E5HH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__E5HH ==  0)) {
+            result__B5HH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__D5HH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E5HH);
+            if ((typ_id__D5HH == (__INTEGER)(-  1))) {
+              a__F5HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__G5HH=(__UINTEGER_32)((__UINTEGER_32)(sz__E5HH + a__F5HH) & (__UINTEGER_32)(~ a__F5HH));
+              ptr_table__4WJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G5HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__3WJH=((__POINTER )(NULL));
+              result__5WJH=((__POINTER *)ptr_table__4WJH)[ 0];
+              if ((result__5WJH == (void *)NULL)) {
+                result__5WJH=new_lab__QOJ(new_size__G5HH);
+                next__3WJH=(void *)((unsigned long)result__5WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5HH)));
+                ((__POINTER *)next__3WJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4WJH)[ 0]=next__3WJH;
               } else {
-                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)));
+                next__3WJH=((__POINTER *)result__5WJH)[ 0];
+                if ((next__3WJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5WJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__G5HH <<  1)) <=  4096)) {
+                    next__3WJH=(void *)((unsigned long)result__5WJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G5HH)));
                   } else {
-                    next__OMJH=new_lab__URJ(new_size__CUHH);
+                    next__3WJH=new_lab__QOJ(new_size__G5HH);
                   };
-                  ((__POINTER *)next__OMJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PMJH)[ 0]=next__OMJH;
+                  ((__POINTER *)next__3WJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__4WJH)[ 0]=next__3WJH;
                 } else {
-                  ((__POINTER *)result__QMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QMJH=next__OMJH;
+                  ((__POINTER *)result__5WJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__5WJH=next__3WJH;
                 };
               };
-              ptr__4THH=result__QMJH;
+              ptr__C5HH=result__5WJH;
             } else {
-              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;
+              t__H5HH=((__UINTEGER_32 )typ_id__D5HH);
+              a__I5HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__GXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E5HH + a__I5HH) & (__UINTEGER_32)(~ a__I5HH));
+              ptr_table__DXJH=((__POINTER )(&(table_type[(t__H5HH)])));
+              lab_type__FXJH=(__UINTEGER_32)(t__H5HH |  1);
+              next__CXJH=((__POINTER )(NULL));
+              result__EXJH=((__POINTER *)ptr_table__DXJH)[ 0];
+              if ((result__EXJH == (void *)NULL)) {
+                result__EXJH=new_lab__QOJ(lab_type__FXJH);
+                next__CXJH=(void *)((unsigned long)result__EXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXJH)));
+                ((__POINTER *)next__CXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DXJH)[ 0]=next__CXJH;
               } else {
-                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)));
+                next__CXJH=((__POINTER *)result__EXJH)[ 0];
+                if ((next__CXJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EXJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GXJH <<  1)) <=  4096)) {
+                    next__CXJH=(void *)((unsigned long)result__EXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GXJH)));
                   } else {
-                    next__TMJH=new_lab__URJ(lab_type__WMJH);
+                    next__CXJH=new_lab__QOJ(lab_type__FXJH);
                   };
-                  ((__POINTER *)next__TMJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UMJH)[ 0]=next__TMJH;
+                  ((__POINTER *)next__CXJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DXJH)[ 0]=next__CXJH;
                 } else {
-                  ((__POINTER *)result__VMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__VMJH=next__TMJH;
+                  ((__POINTER *)result__EXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__EXJH=next__CXJH;
                 };
               };
-              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)) {
+              ptr__C5HH=result__EXJH;
+            };
+            result__B5HH=((__ITM_TYPE_PARAMETER *)ptr__C5HH);
+            *(result__B5HH) = *(ITM_TYPE_PARAMETER__);
+          };
+          Self__J5HH=((__ITM_TYPE_PARAMETER *)result__B5HH);
+          Self__J5HH->parent_itm_type__LAE.name__FUP=nam__GKN;
+          fast_put__to__GKZ(dico__WQI,Self__J5HH,nam__GKN);
+          result__GLEH=result__B5HH;
+        };
+        result__IKN=result__GLEH;
+        __tmp__EPN=TRUE__;
+      } else {
+        __tmp__EPN=FALSE__;
+      };
+      if ((! __tmp__EPN)) {
+        if (((void *)styl__EKN == (void *)NULL)) {
+          result__IKN=get__HQI(nam__GKN);
+        } else {
+          if (((void *)nam__GKN == (void *)(&__string_1))) {
+            copy__U4R(string_tmp__VH,(&__string_320));
+            append__2JS(string_tmp__VH,styl__EKN);
+            append__2JS(string_tmp__VH,(&__string_322));
+            __tmp__5PN=current_position__XUF();
+            put_error__text__YKG( 2,string_tmp__VH);
+            put_position__CMG(__tmp__5PN);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
-            result__VON=type_self__PUN;
+            result__IKN=type_self__CQN;
           } else {
-            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);
+            n__XJR=nam__GKN;
+            result__0JR=NULL;
+            idx__1JR= 0;
+            while (((idx__1JR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR)->parent_arrayed_collection__AKR.upper__KKR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR)->parent_arrayed_collection__AKR.storage__ZHW)[idx__1JR])->parent_itm_type_simple__2NN.name__FUP != (void *)n__XJR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR)->parent_arrayed_collection__AKR.storage__ZHW)[idx__1JR])->style__OUP != (void *)styl__EKN)))) {
+              idx__1JR=(__INTEGER)(idx__1JR +  1);
             };
-            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;
+            if ((idx__1JR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR)->parent_arrayed_collection__AKR.upper__KKR)) {
+              __tmp__VLR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR)->parent_arrayed_collection__AKR.storage__ZHW)[idx__1JR];
+              if (__tmp__VLR==NULL) {
+                __tmp__WLR=NULL;
               } else {
-                __tmp__DQR=((__ITM_TYPE_STYLE *)__tmp__CQR);
+                __tmp__WLR=((__ITM_TYPE_STYLE *)__tmp__VLR);
               };
-              result__HOR=__tmp__DQR;
+              result__0JR=__tmp__WLR;
             } else {
-              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__;
+              result__T1IB=NULL;
+              ptr__U1IB=((__POINTER )(NULL));
+              typ_id__Z1IB= 0;
+              sz__W1IB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__W1IB ==  0)) {
+                result__T1IB=ITM_TYPE_STYLE__;
               } else {
-                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;
+                typ_id__Z1IB=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__W1IB);
+                if ((typ_id__Z1IB == (__INTEGER)(-  1))) {
+                  a__0OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__1OGH=(__UINTEGER_32)((__UINTEGER_32)(sz__W1IB + a__0OGH) & (__UINTEGER_32)(~ a__0OGH));
+                  ptr_table__IXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1OGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__HXJH=((__POINTER )(NULL));
+                  result__JXJH=((__POINTER *)ptr_table__IXJH)[ 0];
+                  if ((result__JXJH == (void *)NULL)) {
+                    result__JXJH=new_lab__QOJ(new_size__1OGH);
+                    next__HXJH=(void *)((unsigned long)result__JXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OGH)));
+                    ((__POINTER *)next__HXJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__IXJH)[ 0]=next__HXJH;
                   } else {
-                    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)));
+                    next__HXJH=((__POINTER *)result__JXJH)[ 0];
+                    if ((next__HXJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JXJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1OGH <<  1)) <=  4096)) {
+                        next__HXJH=(void *)((unsigned long)result__JXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1OGH)));
                       } else {
-                        next__YMJH=new_lab__URJ(new_size__IDGH);
+                        next__HXJH=new_lab__QOJ(new_size__1OGH);
                       };
-                      ((__POINTER *)next__YMJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__ZMJH)[ 0]=next__YMJH;
+                      ((__POINTER *)next__HXJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__IXJH)[ 0]=next__HXJH;
                     } else {
-                      ((__POINTER *)result__0MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__0MJH=next__YMJH;
+                      ((__POINTER *)result__JXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__JXJH=next__HXJH;
                     };
                   };
-                  ptr__IAJB=result__0MJH;
+                  ptr__U1IB=result__JXJH;
                 } else {
-                  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;
+                  t__5OGH=((__UINTEGER_32 )typ_id__Z1IB);
+                  a__4OGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__QXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__W1IB + a__4OGH) & (__UINTEGER_32)(~ a__4OGH));
+                  ptr_table__NXJH=((__POINTER )(&(table_type[(t__5OGH)])));
+                  lab_type__PXJH=(__UINTEGER_32)(t__5OGH |  1);
+                  next__MXJH=((__POINTER )(NULL));
+                  result__OXJH=((__POINTER *)ptr_table__NXJH)[ 0];
+                  if ((result__OXJH == (void *)NULL)) {
+                    result__OXJH=new_lab__QOJ(lab_type__PXJH);
+                    next__MXJH=(void *)((unsigned long)result__OXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXJH)));
+                    ((__POINTER *)next__MXJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__NXJH)[ 0]=next__MXJH;
                   } else {
-                    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)));
+                    next__MXJH=((__POINTER *)result__OXJH)[ 0];
+                    if ((next__MXJH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OXJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QXJH <<  1)) <=  4096)) {
+                        next__MXJH=(void *)((unsigned long)result__OXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QXJH)));
                       } else {
-                        next__3MJH=new_lab__URJ(lab_type__ANJH);
+                        next__MXJH=new_lab__QOJ(lab_type__PXJH);
                       };
-                      ((__POINTER *)next__3MJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__4MJH)[ 0]=next__3MJH;
+                      ((__POINTER *)next__MXJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__NXJH)[ 0]=next__MXJH;
                     } else {
-                      ((__POINTER *)result__5MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__5MJH=next__3MJH;
+                      ((__POINTER *)result__OXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__OXJH=next__MXJH;
                     };
                   };
-                  ptr__IAJB=result__5MJH;
+                  ptr__U1IB=result__OXJH;
                 };
-                result__HAJB=((__ITM_TYPE_STYLE *)ptr__IAJB);
-                *(result__HAJB) = *(ITM_TYPE_STYLE__);
-              };
-              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__;
+                result__T1IB=((__ITM_TYPE_STYLE *)ptr__U1IB);
+                *(result__T1IB) = *(ITM_TYPE_STYLE__);
+              };
+              Self__M3CC=((__ITM_TYPE_STYLE *)result__T1IB);
+              Self__M3CC->parent_itm_type_simple__2NN.name__FUP=nam__GKN;
+              Self__M3CC->style__OUP=styl__EKN;
+              result__0JR=result__T1IB;
+              Self__55BB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__BKR);
+              new_capacity__BACB= 0;
+              if (((__INTEGER)(Self__55BB->parent_arrayed_collection__AKR.upper__KKR +  1) <= (__INTEGER)(Self__55BB->parent_arrayed_collection__AKR.capacity__OHW -  1))) {
+                Self__55BB->parent_arrayed_collection__AKR.upper__KKR=(__INTEGER)(Self__55BB->parent_arrayed_collection__AKR.upper__KKR +  1);
+                __tmp__PACB=TRUE__;
               } else {
-                __tmp__EFCB=FALSE__;
+                __tmp__PACB=FALSE__;
               };
-              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;
+              if ((! __tmp__PACB)) {
+                if ((Self__55BB->parent_arrayed_collection__AKR.capacity__OHW ==  0)) {
+                  Self__55BB->parent_arrayed_collection__AKR.storage__ZHW=create__QEYB( 2);
+                  Self__55BB->parent_arrayed_collection__AKR.capacity__OHW= 2;
+                  Self__55BB->parent_arrayed_collection__AKR.upper__KKR= 0;
                 } else {
-                  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);
+                  new_capacity__BACB=(__INTEGER)(Self__55BB->parent_arrayed_collection__AKR.capacity__OHW <<  1);
+                  __tmp__EBCB=Self__55BB->parent_arrayed_collection__AKR.storage__ZHW;
+                  __tmp__FBCB=Self__55BB->parent_arrayed_collection__AKR.capacity__OHW;
+                  new__DQFC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__EBCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__FBCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__BACB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__XQFC=(__INTEGER)(new_capacity__BACB -  1);
+                  Self__T2VD=__tmp__FBCB;
+                  while ((Self__T2VD <= __tmp__XQFC)) {
+                    new__DQFC[Self__T2VD]=NULL;
+                    Self__T2VD=(__INTEGER)(Self__T2VD +  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);
+                  Self__55BB->parent_arrayed_collection__AKR.storage__ZHW=new__DQFC;
+                  Self__55BB->parent_arrayed_collection__AKR.capacity__OHW=new_capacity__BACB;
+                  Self__55BB->parent_arrayed_collection__AKR.upper__KKR=(__INTEGER)(Self__55BB->parent_arrayed_collection__AKR.upper__KKR +  1);
                 };
               };
-              ((void **)Self__UECB->parent_arrayed_collection__NOR.storage__OMW)[Self__UECB->parent_arrayed_collection__NOR.upper__XOR]=result__HAJB;
+              ((void **)Self__55BB->parent_arrayed_collection__AKR.storage__ZHW)[Self__55BB->parent_arrayed_collection__AKR.upper__KKR]=result__T1IB;
             };
-            result__VON=result__HOR;
+            result__IKN=result__0JR;
           };
         };
       };
     };
-    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);
+    if (is_shorter__LZ) {
+      sav_derive__MKN=short_derive__PCC;
+      short_derive__PCC=old_derive__LKN;
+      if ((((void *)result__IKN == (void *)type_self__CQN) || ((void *)result__IKN == (void *)type_null__0QN))) {
+        short__token__to__YBD((&__string_126),(__INTEGER)(old_pos__KKN - ((__STRING_CONSTANT *)nam__GKN)->count__DD),old_pos__KKN);
       } else {
-        short__token__to__TBD((&__string_125),(__INTEGER)(old_pos__XON - ((__STRING_CONSTANT *)nam__TON)->count__DD),old_pos__XON);
+        short__token__to__YBD((&__string_125),(__INTEGER)(old_pos__KKN - ((__STRING_CONSTANT *)nam__GKN)->count__DD),old_pos__KKN);
       };
-      short_derive__JCC=(__INTEGER)(sav_derive__ZON + (__INTEGER)(short_derive__JCC - old_derive__YON));
+      short_derive__PCC=(__INTEGER)(sav_derive__MKN + (__INTEGER)(short_derive__PCC - old_derive__LKN));
     };
   };
-  return(result__VON);
+  return(result__IKN);
 }
 
-static void read_def_local__F1H(__PARSER *Self__G1H)
+static void read_def_local__LYH(__PARSER *Self__MYH)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER beg__CVK,typ_id__SSN,Self__NBAB,limit_up__OBAB,__tmp__GZK;
+  __INTEGER Self__CZN,__tmp__S5HH,Self__T5HH,__tmp__S5OD,Self__FRUD;
+  __POSITION pos__2LZG,__tmp__OWK,pos__EMZG,pos__RMZG,pos__YMZG;
+  void *__tmp__PWK;
+  __ITM_LOCAL *result__MSN,*Self__N5U;
+  __POINTER ptr__NSN,ptr_table__SXJH,next__RXJH,result__TXJH;
+  __POINTER ptr_table__XXJH,next__WXJH,result__YXJH;
+  __UINTEGER_32 sz__PSN,a__QPGH,new_size__RPGH,t__VPGH,a__UPGH;
+  __UINTEGER_32 new_size__0XJH,lab_type__ZXJH;
+  __CHARACTER styl__WYH,result__2XJH,result__0CBH,result__5XJH;
+  __CHARACTER result__CYJH;
+  void *result__L5HH,*local_list__UYH,*result__O5HH,*static_list__VYH;
+  void *result__BVK,*result__TOI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__M5HH,*Self__N5HH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__P5HH,*Self__Q5HH,*Self__XM4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__NN4;
+  __BOOLEAN mute__DVK,result__1XJH,__tmp__0WK,result__4XJH,result__BYJH;
+  __FAST_ARRAYoITM_LOCALo *Self__U5HH,*Self__H5OD;
+  void *other__R5HH,*other__I5OD;
+  old_position__HOI=position__CCC;
+  old_pos_cur__JOI=pos_cur__FCC;
+  old_pos_line__LOI=pos_line__GCC;
+  old_pos_col__NOI=pos_col__HCC;
+  old_short_derive__POI=short_derive__PCC;
+  styl__WYH=read_style__FPF();
+  result__L5HH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI)->parent_arrayed_collection__YOI.upper__EXT <  0)) {
+    result__L5HH=create_with_capacity__KGK( 16);
   } else {
-    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);
+    Self__M5HH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+    result__L5HH=((void **)Self__M5HH->parent_arrayed_collection__YOI.storage__0EU)[Self__M5HH->parent_arrayed_collection__YOI.upper__EXT];
+    Self__N5HH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+    Self__N5HH->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(Self__N5HH->parent_arrayed_collection__YOI.upper__EXT -  1);
+  };
+  local_list__UYH=result__L5HH;
+  result__O5HH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI)->parent_arrayed_collection__YOI.upper__EXT <  0)) {
+    result__O5HH=create_with_capacity__KGK( 16);
   } else {
-    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;
+    Self__P5HH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+    result__O5HH=((void **)Self__P5HH->parent_arrayed_collection__YOI.storage__0EU)[Self__P5HH->parent_arrayed_collection__YOI.upper__EXT];
+    Self__Q5HH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+    Self__Q5HH->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(Self__Q5HH->parent_arrayed_collection__YOI.upper__EXT -  1);
+  };
+  static_list__VYH=result__O5HH;
+  while ((styl__WYH != ' ')) {
+    result__BVK=NULL;
+    beg__CVK= 0;
+    mute__DVK=TRUE__;
+    if (read_identifier__12K()) {
+      result__TOI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI)->parent_arrayed_collection__YOI.upper__EXT <  0)) {
+        result__TOI=create_with_capacity__KGK( 16);
+      } else {
+        Self__XM4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+        result__TOI=((void **)Self__XM4->parent_arrayed_collection__YOI.storage__0EU)[Self__XM4->parent_arrayed_collection__YOI.upper__EXT];
+        Self__NN4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+        Self__NN4->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(Self__NN4->parent_arrayed_collection__YOI.upper__EXT -  1);
+      };
+      result__BVK=result__TOI;
+      beg__CVK= 0;
       do {
-        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)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK +  1) !=  0) && (! read_identifier__12K())) && (! mute__DVK))) {
+          pos__2LZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_323));
+          put_position__CMG(pos__2LZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        __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;
+        __tmp__OWK=current_position__XUF();
+        __tmp__PWK=last_string__V0C;
+        result__MSN=NULL;
+        ptr__NSN=((__POINTER )(NULL));
+        typ_id__SSN= 0;
+        sz__PSN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__PSN ==  0)) {
+          result__MSN=ITM_LOCAL__;
+        } else {
+          typ_id__SSN=__ITM_LOCAL__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PSN);
+          if ((typ_id__SSN == (__INTEGER)(-  1))) {
+            a__QPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RPGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSN + a__QPGH) & (__UINTEGER_32)(~ a__QPGH));
+            ptr_table__SXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RPGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__RXJH=((__POINTER )(NULL));
+            result__TXJH=((__POINTER *)ptr_table__SXJH)[ 0];
+            if ((result__TXJH == (void *)NULL)) {
+              result__TXJH=new_lab__QOJ(new_size__RPGH);
+              next__RXJH=(void *)((unsigned long)result__TXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RPGH)));
+              ((__POINTER *)next__RXJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
             } else {
-              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)));
+              next__RXJH=((__POINTER *)result__TXJH)[ 0];
+              if ((next__RXJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TXJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RPGH <<  1)) <=  4096)) {
+                  next__RXJH=(void *)((unsigned long)result__TXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RPGH)));
                 } else {
-                  next__CNJH=new_lab__URJ(new_size__4DGH);
+                  next__RXJH=new_lab__QOJ(new_size__RPGH);
                 };
-                ((__POINTER *)next__CNJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DNJH)[ 0]=next__CNJH;
+                ((__POINTER *)next__RXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
               } else {
-                ((__POINTER *)result__ENJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ENJH=next__CNJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__TXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TXJH=next__RXJH;
+              };
+            };
+            ptr__NSN=result__TXJH;
+          } else {
+            t__VPGH=((__UINTEGER_32 )typ_id__SSN);
+            a__UPGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0XJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PSN + a__UPGH) & (__UINTEGER_32)(~ a__UPGH));
+            ptr_table__XXJH=((__POINTER )(&(table_type[(t__VPGH)])));
+            lab_type__ZXJH=(__UINTEGER_32)(t__VPGH |  1);
+            next__WXJH=((__POINTER )(NULL));
+            result__YXJH=((__POINTER *)ptr_table__XXJH)[ 0];
+            if ((result__YXJH == (void *)NULL)) {
+              result__YXJH=new_lab__QOJ(lab_type__ZXJH);
+              next__WXJH=(void *)((unsigned long)result__YXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XJH)));
+              ((__POINTER *)next__WXJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XXJH)[ 0]=next__WXJH;
             } else {
-              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)));
+              next__WXJH=((__POINTER *)result__YXJH)[ 0];
+              if ((next__WXJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YXJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0XJH <<  1)) <=  4096)) {
+                  next__WXJH=(void *)((unsigned long)result__YXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0XJH)));
                 } else {
-                  next__HNJH=new_lab__URJ(lab_type__KNJH);
+                  next__WXJH=new_lab__QOJ(lab_type__ZXJH);
                 };
-                ((__POINTER *)next__HNJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__INJH)[ 0]=next__HNJH;
+                ((__POINTER *)next__WXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XXJH)[ 0]=next__WXJH;
               } else {
-                ((__POINTER *)result__JNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JNJH=next__HNJH;
+                ((__POINTER *)result__YXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YXJH=next__WXJH;
               };
             };
-            ptr__0WN=result__JNJH;
+            ptr__NSN=result__YXJH;
           };
-          result__ZWN=((__ITM_LOCAL *)ptr__0WN);
-          *(result__ZWN) = *(ITM_LOCAL__);
+          result__MSN=((__ITM_LOCAL *)ptr__NSN);
+          *(result__MSN) = *(ITM_LOCAL__);
         };
-        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__;
+        Self__N5U=((__ITM_LOCAL *)result__MSN);
+        Self__N5U->name__OZK=__tmp__PWK;
+        Self__N5U->parent_itm_object__NYH.position__RAJ=__tmp__OWK;
+        add_last__YXU(result__BVK,result__MSN);
+        result__1XJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__1XJH=FALSE__;
         } else {
-          result__NNJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__NNJH=((__CHARACTER )(( 0)));
+          result__2XJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__2XJH=((__CHARACTER )(( 0)));
           } else {
-            result__NNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__2XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__NNJH == ':')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__MNJH=TRUE__;
+          if ((result__2XJH == ':')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__1XJH=TRUE__;
           };
         };
-        if (result__MNJH) {
-          result__XVAH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__XVAH=((__CHARACTER )(( 0)));
+        if (result__1XJH) {
+          result__0CBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__0CBH=((__CHARACTER )(( 0)));
           } else {
-            result__XVAH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__0CBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__S0K=(result__XVAH != '=');
+          __tmp__0WK=(result__0CBH != '=');
         } else {
-          __tmp__S0K=FALSE__;
+          __tmp__0WK=FALSE__;
         };
-        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)) {
+        if (__tmp__0WK) {
+          mute__DVK=FALSE__;
+          if (((void *)read_type__B4L(Self__MYH,TRUE__) == (void *)NULL)) {
+            pos__EMZG=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_324));
+            put_position__CMG(pos__EMZG);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 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);
+          Self__NBAB=beg__CVK;
+          limit_up__OBAB=((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK;
+          while ((Self__NBAB <= limit_up__OBAB)) {
+            Self__NBAB=(__INTEGER)(Self__NBAB +  1);
           };
-          beg__0YK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__ZYK)->parent_arrayed_collection__M1H.upper__D1K +  1);
+          beg__CVK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK +  1);
         };
-        result__PNJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__PNJH=FALSE__;
+        result__4XJH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__4XJH=FALSE__;
         } else {
-          result__QNJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__QNJH=((__CHARACTER )(( 0)));
+          result__5XJH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__5XJH=((__CHARACTER )(( 0)));
           } else {
-            result__QNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__5XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__QNJH == ',')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__PNJH=TRUE__;
+          if ((result__5XJH == ',')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__4XJH=TRUE__;
           };
         };
-      } 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;
+      } while (result__4XJH);
+      if ((beg__CVK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__TOI)->parent_arrayed_collection__SYH.upper__LXK +  1))) {
+        if (mute__DVK) {
+          free__QGK(result__TOI);
+          result__BVK=NULL;
         } else {
-          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)) {
+          pos__RMZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_324));
+          put_position__CMG(pos__RMZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        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);
+        result__BVK=copy__Z0J(result__BVK);
+        if (is_shorter__LZ) {
+          __tmp__GZK=((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK;
+          Self__CZN= 0;
+          while ((Self__CZN <= __tmp__GZK)) {
+            add__WHHB(short_local__XCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.storage__VGU)[Self__CZN])->name__OZK);
+            Self__CZN=(__INTEGER)(Self__CZN +  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);
+    if (((void *)result__BVK != (void *)NULL)) {
+      if ((styl__WYH == '+')) {
+        Self__U5HH=((__FAST_ARRAYoITM_LOCALo *)local_list__UYH);
+        other__R5HH=result__BVK;
+        __tmp__S5HH=((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK;
+        Self__T5HH= 0;
+        while ((Self__T5HH <= __tmp__S5HH)) {
+          add_last__YXU(Self__U5HH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__R5HH)->parent_arrayed_collection__SYH.storage__VGU)[Self__T5HH]);
+          Self__T5HH=(__INTEGER)(Self__T5HH +  1);
         };
       } else {
-        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);
+        Self__H5OD=((__FAST_ARRAYoITM_LOCALo *)static_list__VYH);
+        other__I5OD=result__BVK;
+        __tmp__S5OD=((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK;
+        Self__FRUD= 0;
+        while ((Self__FRUD <= __tmp__S5OD)) {
+          add_last__YXU(Self__H5OD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__I5OD)->parent_arrayed_collection__SYH.storage__VGU)[Self__FRUD]);
+          Self__FRUD=(__INTEGER)(Self__FRUD +  1);
         };
       };
-      result__SNJH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__SNJH=FALSE__;
+      result__BYJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__BYJH=FALSE__;
       } else {
-        result__TNJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__TNJH=((__CHARACTER )(( 0)));
+        result__CYJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__CYJH=((__CHARACTER )(( 0)));
         } else {
-          result__TNJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__CYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__TNJH == ';')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__SNJH=TRUE__;
+        if ((result__CYJH == ';')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__BYJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__BYJH)) {
+        pos__YMZG=current_position__XUF();
+        put_error__text__YKG( 2,(&__string_242));
+        put_position__CMG(pos__YMZG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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();
+      old_position__HOI=position__CCC;
+      old_pos_cur__JOI=pos_cur__FCC;
+      old_pos_line__LOI=pos_line__GCC;
+      old_pos_col__NOI=pos_col__HCC;
+      old_short_derive__POI=short_derive__PCC;
+      styl__WYH=read_style__FPF();
     } else {
-      restore_context__1DL();
-      styl__Q1H=' ';
+      restore_context__DAL();
+      styl__WYH=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__HUHH)->parent_arrayed_collection__M1H.upper__D1K <  0)) {
-    free__4JK(result__HUHH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__L5HH)->parent_arrayed_collection__SYH.upper__LXK <  0)) {
+    free__QGK(result__L5HH);
   } else {
-    copy__H4J(result__HUHH);
+    copy__Z0J(result__L5HH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__KUHH)->parent_arrayed_collection__M1H.upper__D1K <  0)) {
-    free__4JK(result__KUHH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__O5HH)->parent_arrayed_collection__SYH.upper__LXK <  0)) {
+    free__QGK(result__O5HH);
   } else {
-    copy__H4J(result__KUHH);
+    copy__Z0J(result__O5HH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__0VI(__INTEGER new_count__2VI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__WSI(__INTEGER new_count__YSI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__UHJ,ptr_table__FYJH,next__EYJH,result__GYJH;
+  __POINTER ptr_table__KYJH,next__JYJH,result__LYJH;
+  __INTEGER typ_id__ZHJ;
+  __UINTEGER_32 sz__WHJ,a__ZUGH,new_size__0UGH,t__4UGH,a__3UGH;
+  __UINTEGER_32 new_size__NYJH,lab_type__MYJH;
+  __FAST_ARRAYoITM_CODEo *result__THJ,*Self__0ZT;
+  result__THJ=NULL;
+  ptr__UHJ=((__POINTER )(NULL));
+  typ_id__ZHJ= 0;
+  sz__WHJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__WHJ ==  0)) {
+    result__THJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    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);
+    typ_id__ZHJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WHJ);
+    if ((typ_id__ZHJ == (__INTEGER)(-  1))) {
+      a__ZUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0UGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHJ + a__ZUGH) & (__UINTEGER_32)(~ a__ZUGH));
+      ptr_table__FYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0UGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__EYJH=((__POINTER )(NULL));
+      result__GYJH=((__POINTER *)ptr_table__FYJH)[ 0];
+      if ((result__GYJH == (void *)NULL)) {
+        result__GYJH=new_lab__QOJ(new_size__0UGH);
+        next__EYJH=(void *)((unsigned long)result__GYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UGH)));
+        ((__POINTER *)next__EYJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FYJH)[ 0]=next__EYJH;
+      } else {
+        next__EYJH=((__POINTER *)result__GYJH)[ 0];
+        if ((next__EYJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GYJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0UGH <<  1)) <=  4096)) {
+            next__EYJH=(void *)((unsigned long)result__GYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UGH)));
+          } else {
+            next__EYJH=new_lab__QOJ(new_size__0UGH);
+          };
+          ((__POINTER *)next__EYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FYJH)[ 0]=next__EYJH;
+        } else {
+          ((__POINTER *)result__GYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GYJH=next__EYJH;
+        };
+      };
+      ptr__UHJ=result__GYJH;
+    } else {
+      t__4UGH=((__UINTEGER_32 )typ_id__ZHJ);
+      a__3UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WHJ + a__3UGH) & (__UINTEGER_32)(~ a__3UGH));
+      ptr_table__KYJH=((__POINTER )(&(table_type[(t__4UGH)])));
+      lab_type__MYJH=(__UINTEGER_32)(t__4UGH |  1);
+      next__JYJH=((__POINTER )(NULL));
+      result__LYJH=((__POINTER *)ptr_table__KYJH)[ 0];
+      if ((result__LYJH == (void *)NULL)) {
+        result__LYJH=new_lab__QOJ(lab_type__MYJH);
+        next__JYJH=(void *)((unsigned long)result__LYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYJH)));
+        ((__POINTER *)next__JYJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KYJH)[ 0]=next__JYJH;
+      } else {
+        next__JYJH=((__POINTER *)result__LYJH)[ 0];
+        if ((next__JYJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LYJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NYJH <<  1)) <=  4096)) {
+            next__JYJH=(void *)((unsigned long)result__LYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NYJH)));
+          } else {
+            next__JYJH=new_lab__QOJ(lab_type__MYJH);
+          };
+          ((__POINTER *)next__JYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KYJH)[ 0]=next__JYJH;
+        } else {
+          ((__POINTER *)result__LYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LYJH=next__JYJH;
+        };
+      };
+      ptr__UHJ=result__LYJH;
+    };
+    result__THJ=((__FAST_ARRAYoITM_CODEo *)ptr__UHJ);
+    *(result__THJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__0ZT=((__FAST_ARRAYoITM_CODEo *)result__THJ);
+  if ((Self__0ZT->parent_arrayed_collection__5QF.capacity__VTT < new_count__YSI)) {
+    Self__0ZT->parent_arrayed_collection__5QF.storage__AUT=create__FQQB(new_count__YSI);
+    Self__0ZT->parent_arrayed_collection__5QF.capacity__VTT=new_count__YSI;
+  };
+  Self__0ZT->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(-  1);
+  return(result__THJ);
 }
 
-static void add_last__25U(__FAST_ARRAYoITM_CODEo *Self__35U,void *element__45U)
+static void add_last__H1U(__FAST_ARRAYoITM_CODEo *Self__I1U,void *element__J1U)
 // ({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__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__;
+  __INTEGER new_capacity__K1U,__tmp__O2U,__tmp__1BEC,Self__CIVD;
+  __BOOLEAN __tmp__Y1U;
+  void **__tmp__N2U,**new__HBEC;
+  new_capacity__K1U= 0;
+  if (((__INTEGER)(Self__I1U->parent_arrayed_collection__5QF.upper__MEL +  1) <= (__INTEGER)(Self__I1U->parent_arrayed_collection__5QF.capacity__VTT -  1))) {
+    Self__I1U->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__I1U->parent_arrayed_collection__5QF.upper__MEL +  1);
+    __tmp__Y1U=TRUE__;
   } else {
-    __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;
+    __tmp__Y1U=FALSE__;
+  };
+  if ((! __tmp__Y1U)) {
+    if ((Self__I1U->parent_arrayed_collection__5QF.capacity__VTT ==  0)) {
+      Self__I1U->parent_arrayed_collection__5QF.storage__AUT=create__FQQB( 2);
+      Self__I1U->parent_arrayed_collection__5QF.capacity__VTT= 2;
+      Self__I1U->parent_arrayed_collection__5QF.upper__MEL= 0;
+    } else {
+      new_capacity__K1U=(__INTEGER)(Self__I1U->parent_arrayed_collection__5QF.capacity__VTT <<  1);
+      __tmp__N2U=Self__I1U->parent_arrayed_collection__5QF.storage__AUT;
+      __tmp__O2U=Self__I1U->parent_arrayed_collection__5QF.capacity__VTT;
+      new__HBEC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__N2U)),((__UINTEGER_32 )(__INTEGER)(__tmp__O2U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__K1U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__1BEC=(__INTEGER)(new_capacity__K1U -  1);
+      Self__CIVD=__tmp__O2U;
+      while ((Self__CIVD <= __tmp__1BEC)) {
+        new__HBEC[Self__CIVD]=NULL;
+        Self__CIVD=(__INTEGER)(Self__CIVD +  1);
+      };
+      Self__I1U->parent_arrayed_collection__5QF.storage__AUT=new__HBEC;
+      Self__I1U->parent_arrayed_collection__5QF.capacity__VTT=new_capacity__K1U;
+      Self__I1U->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__I1U->parent_arrayed_collection__5QF.upper__MEL +  1);
+    };
+  };
+  ((void **)Self__I1U->parent_arrayed_collection__5QF.storage__AUT)[Self__I1U->parent_arrayed_collection__5QF.upper__MEL]=element__J1U;
 }
 
-static void* copy__Y5H(void *tmp__05H)
+static void* copy__42H(void *tmp__A3H)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__MTT,other_upper__LTT,Self__31JC;
+  void *result__C3H;
+  __FAST_ARRAYoITM_CODEo *Self__JTT;
+  void **__tmp__DUT,**__tmp__FUT,**Self__XOCC;
+  result__C3H=create_with_capacity__WSI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__A3H)->parent_arrayed_collection__5QF.upper__MEL +  1));
+  Self__JTT=((__FAST_ARRAYoITM_CODEo *)result__C3H);
+  new_capacity__MTT= 0;
+  other_upper__LTT=((__FAST_ARRAYoITM_CODEo *)tmp__A3H)->parent_arrayed_collection__5QF.upper__MEL;
+  if ((other_upper__LTT >=  0)) {
+    new_capacity__MTT=(__INTEGER)(other_upper__LTT +  1);
+    if ((Self__JTT->parent_arrayed_collection__5QF.capacity__VTT < new_capacity__MTT)) {
+      Self__JTT->parent_arrayed_collection__5QF.storage__AUT=create__FQQB(new_capacity__MTT);
+      Self__JTT->parent_arrayed_collection__5QF.capacity__VTT=new_capacity__MTT;
+    };
+    __tmp__DUT=Self__JTT->parent_arrayed_collection__5QF.storage__AUT;
+    __tmp__FUT=((__FAST_ARRAYoITM_CODEo *)tmp__A3H)->parent_arrayed_collection__5QF.storage__AUT;
+    Self__XOCC=((void **)__tmp__DUT);
+    Self__31JC=other_upper__LTT;
+    while ((Self__31JC >=  0)) {
+      Self__XOCC[Self__31JC]=((void **)__tmp__FUT)[Self__31JC];
+      Self__31JC=(__INTEGER)(Self__31JC -  1);
+    };
+  };
+  Self__JTT->parent_arrayed_collection__5QF.upper__MEL=other_upper__LTT;
+  free__2SI(tmp__A3H);
+  return(result__C3H);
 }
 
-static __BOOLEAN fast_has__FEV(__HASHED_SEToSTRING_CONSTANTo *Self__GEV,void *e__HEV)
+static __BOOLEAN fast_has__Q5U(__HASHED_SEToSTRING_CONSTANTo *Self__R5U,void *e__S5U)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__X5HH;
+  __INTEGER result__W5HH,__tmp__Y5HH,Self__Z5HH;
+  void *node__25U;
+  Self__X5HH=((__STRING_CONSTANT *)e__S5U);
+  result__W5HH= 0;
+  __tmp__Y5HH=Self__X5HH->count__DD;
+  Self__Z5HH= 1;
+  while ((Self__Z5HH <= __tmp__Y5HH)) {
+    result__W5HH=(__INTEGER)((__INTEGER)( 5 * result__W5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__X5HH->storage__QMO)[(__INTEGER)(Self__Z5HH -  1)])));
+    Self__Z5HH=(__INTEGER)(Self__Z5HH +  1);
+  };
+  if ((result__W5HH <  0)) {
+    result__W5HH=(__INTEGER)(~ result__W5HH);
+  };
+  node__25U=((void **)Self__R5U->buckets__CAV)[(__INTEGER)(result__W5HH % Self__R5U->capacity__FET)];
+  while ((! (((void *)node__25U == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__25U)->item__OAV == (void *)e__S5U)))) {
+    node__25U=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__25U)->next__ZAV;
+  };
+  return(((void *)node__25U != (void *)NULL));
 }
 
-static void restore_context__1DL()
+static void restore_context__DAL()
 // () VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER beg__FAL,end__15HH,len__35HH,__tmp__45HH,__tmp__AAIH;
+  __INTEGER Self__BAIH,__tmp__XAL,__tmp__0AL,Self__XIM;
+  __STRING *Self__55HH;
+  beg__FAL= 0;
+  if (is_shorter__LZ) {
+    ((__STRING *)token__TCD)->count__EGC= 0;
+    beg__FAL=(__INTEGER)(old_position__HOI + old_short_derive__POI);
+    Self__55HH=((__STRING *)output_code__SI);
+    end__15HH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+    len__35HH=(__INTEGER)((__INTEGER)(end__15HH - beg__FAL) +  1);
+    if ((len__35HH >  0)) {
+      __tmp__45HH=(__INTEGER)(end__15HH +  1);
+      __tmp__AAIH=Self__55HH->count__EGC;
+      Self__BAIH=__tmp__45HH;
+      while ((Self__BAIH <= __tmp__AAIH)) {
+        ((__CHARACTER *)Self__55HH->storage__23R)[(__INTEGER)((__INTEGER)(Self__BAIH - len__35HH) -  1)]=((__CHARACTER *)Self__55HH->storage__23R)[(__INTEGER)(Self__BAIH -  1)];
+        Self__BAIH=(__INTEGER)(Self__BAIH +  1);
+      };
+      Self__55HH->count__EGC=(__INTEGER)(Self__55HH->count__EGC - len__35HH);
+    };
+    __tmp__XAL=old_position__HOI;
+    __tmp__0AL=(__INTEGER)(position__CCC -  1);
+    Self__XIM=__tmp__XAL;
+    while ((Self__XIM <= __tmp__0AL)) {
+      add_last__UHT(token__TCD,((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(Self__XIM -  1)]);
+      Self__XIM=(__INTEGER)(Self__XIM +  1);
+    };
+    insert_string__to__NTU(output_code__SI,token__TCD,beg__FAL);
+    short_derive__PCC=old_short_derive__POI;
+  };
+  position__CCC=old_position__HOI;
+  pos_cur__FCC=old_pos_cur__JOI;
+  pos_line__GCC=old_pos_line__LOI;
+  pos_col__HCC=old_pos_col__NOI;
 }
 
-static void* read_expr_message__CWL(__PARSER *Self__DWL)
+static void* read_expr_message__KSL(__PARSER *Self__LSL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *result__AYL,*result__NSL;
+  __POSITION pos__IQZG,p__Q25,pos__QQZG;
+  __ITM_OLD *result__FPGB;
+  __POINTER ptr__GPGB,ptr_table__RYJH,next__QYJH,result__SYJH;
+  __POINTER ptr_table__WYJH,next__VYJH,result__XYJH;
+  __INTEGER typ_id__LPGB;
+  __UINTEGER_32 sz__IPGB,a__QRGH,new_size__RRGH,t__VRGH,a__URGH;
+  __UINTEGER_32 new_size__ZYJH,lab_type__YYJH;
+  __BOOLEAN result__PYJH,result__0YJH;
+  __CHARACTER result__1YJH;
+  result__AYL=NULL;
+  result__PYJH=read_word__4MF((&__string_8));
+  if (is_shorter__LZ) {
+    if (result__PYJH) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
-        short__token__to__TBD((&__string_120),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
-        short__token__to__TBD((&__string_119),(__INTEGER)(position__0BC - ((__STRING_CONSTANT *)last_string__Q0C)->count__DD),position__0BC);
+        short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       };
     };
   };
-  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)) {
+  if (result__PYJH) {
+    if (((void *)read_expr__C2I(Self__LSL) == (void *)NULL)) {
+      pos__IQZG=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_325));
+      put_position__CMG(pos__IQZG);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__Q25=current_position__XUF();
+    result__FPGB=NULL;
+    ptr__GPGB=((__POINTER )(NULL));
+    typ_id__LPGB= 0;
+    sz__IPGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__IPGB ==  0)) {
+      result__FPGB=ITM_OLD__;
+    } else {
+      typ_id__LPGB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IPGB);
+      if ((typ_id__LPGB == (__INTEGER)(-  1))) {
+        a__QRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__RRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__IPGB + a__QRGH) & (__UINTEGER_32)(~ a__QRGH));
+        ptr_table__RYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__QYJH=((__POINTER )(NULL));
+        result__SYJH=((__POINTER *)ptr_table__RYJH)[ 0];
+        if ((result__SYJH == (void *)NULL)) {
+          result__SYJH=new_lab__QOJ(new_size__RRGH);
+          next__QYJH=(void *)((unsigned long)result__SYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRGH)));
+          ((__POINTER *)next__QYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RYJH)[ 0]=next__QYJH;
+        } else {
+          next__QYJH=((__POINTER *)result__SYJH)[ 0];
+          if ((next__QYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SYJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RRGH <<  1)) <=  4096)) {
+              next__QYJH=(void *)((unsigned long)result__SYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RRGH)));
             } else {
-              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)));
+              next__QYJH=new_lab__QOJ(new_size__RRGH);
+            };
+            ((__POINTER *)next__QYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RYJH)[ 0]=next__QYJH;
+          } else {
+            ((__POINTER *)result__SYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__SYJH=next__QYJH;
+          };
+        };
+        ptr__GPGB=result__SYJH;
+      } else {
+        t__VRGH=((__UINTEGER_32 )typ_id__LPGB);
+        a__URGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__IPGB + a__URGH) & (__UINTEGER_32)(~ a__URGH));
+        ptr_table__WYJH=((__POINTER )(&(table_type[(t__VRGH)])));
+        lab_type__YYJH=(__UINTEGER_32)(t__VRGH |  1);
+        next__VYJH=((__POINTER )(NULL));
+        result__XYJH=((__POINTER *)ptr_table__WYJH)[ 0];
+        if ((result__XYJH == (void *)NULL)) {
+          result__XYJH=new_lab__QOJ(lab_type__YYJH);
+          next__VYJH=(void *)((unsigned long)result__XYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYJH)));
+          ((__POINTER *)next__VYJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WYJH)[ 0]=next__VYJH;
+        } else {
+          next__VYJH=((__POINTER *)result__XYJH)[ 0];
+          if ((next__VYJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XYJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZYJH <<  1)) <=  4096)) {
+              next__VYJH=(void *)((unsigned long)result__XYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYJH)));
             } else {
-              next__GOJH=new_lab__URJ(lab_type__JOJH);
+              next__VYJH=new_lab__QOJ(lab_type__YYJH);
             };
-            ((__POINTER *)next__GOJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__HOJH)[ 0]=next__GOJH;
+            ((__POINTER *)next__VYJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__WYJH)[ 0]=next__VYJH;
           } else {
-            ((__POINTER *)result__IOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__IOJH=next__GOJH;
+            ((__POINTER *)result__XYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__XYJH=next__VYJH;
           };
         };
-        ptr__0TGB=result__IOJH;
+        ptr__GPGB=result__XYJH;
       };
-      result__ZTGB=((__ITM_OLD *)ptr__0TGB);
-      *(result__ZTGB) = *(ITM_OLD__);
+      result__FPGB=((__ITM_OLD *)ptr__GPGB);
+      *(result__FPGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__ZTGB)->parent_itm_code__V2L.parent_itm_object__5DE.position__VDJ=p__FBAB;
-    result__A2L=result__ZTGB;
+    ((__ITM_OLD *)result__FPGB)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ=p__Q25;
+    result__AYL=result__FPGB;
   } else {
-    result__A2L=read_expr_primary__Q4M(Self__DWL);
-    if (((void *)result__A2L == (void *)NULL)) {
-      result__A2L=read_send_msg__U4N(Self__DWL,NULL);
+    result__AYL=read_expr_primary__D0M(Self__LSL);
+    if (((void *)result__AYL == (void *)NULL)) {
+      result__AYL=read_send_msg__H0N(Self__LSL,NULL);
     };
   };
-  result__FWL=result__A2L;
-  if (((void *)result__A2L != (void *)NULL)) {
-    while_do__QZM:
+  result__NSL=result__AYL;
+  if (((void *)result__AYL != (void *)NULL)) {
+    while_do__DVM:
     {
-      result__LOJH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__LOJH=FALSE__;
+      result__0YJH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__0YJH=FALSE__;
       } else {
-        result__MOJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__MOJH=((__CHARACTER )(( 0)));
+        result__1YJH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__1YJH=((__CHARACTER )(( 0)));
         } else {
-          result__MOJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__1YJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__MOJH == '.')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__LOJH=TRUE__;
+        if ((result__1YJH == '.')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__0YJH=TRUE__;
         };
       };
-      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)) {
+      if (result__0YJH) {
+        result__NSL=read_send_msg__H0N(Self__LSL,result__NSL);
+        if (((void *)result__NSL == (void *)NULL)) {
+          pos__QQZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_326));
+          put_position__CMG(pos__QQZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__QZM;
+        goto while_do__DVM;
       };
     };
   };
-  return(result__FWL);
+  return(result__NSL);
 }
 
-static void free__AWI(void *tmp__CWI)
+static void free__2SI(void *tmp__4SI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__T1T,__tmp__12T,__tmp__11DC,Self__FCVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__R1T;
+  __BOOLEAN __tmp__C2T;
+  void **__tmp__02T,**new__H1DC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__4SI)->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(-  1);
+  Self__R1T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+  new_capacity__T1T= 0;
+  if (((__INTEGER)(Self__R1T->parent_arrayed_collection__O1H.upper__DST +  1) <= (__INTEGER)(Self__R1T->parent_arrayed_collection__O1H.capacity__V1T -  1))) {
+    Self__R1T->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__R1T->parent_arrayed_collection__O1H.upper__DST +  1);
+    __tmp__C2T=TRUE__;
   } else {
-    __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;
+    __tmp__C2T=FALSE__;
+  };
+  if ((! __tmp__C2T)) {
+    if ((Self__R1T->parent_arrayed_collection__O1H.capacity__V1T ==  0)) {
+      Self__R1T->parent_arrayed_collection__O1H.storage__R2T=create__SYPB( 2);
+      Self__R1T->parent_arrayed_collection__O1H.capacity__V1T= 2;
+      Self__R1T->parent_arrayed_collection__O1H.upper__DST= 0;
+    } else {
+      new_capacity__T1T=(__INTEGER)(Self__R1T->parent_arrayed_collection__O1H.capacity__V1T <<  1);
+      __tmp__02T=Self__R1T->parent_arrayed_collection__O1H.storage__R2T;
+      __tmp__12T=Self__R1T->parent_arrayed_collection__O1H.capacity__V1T;
+      new__H1DC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__02T)),((__UINTEGER_32 )(__INTEGER)(__tmp__12T * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__T1T * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__11DC=(__INTEGER)(new_capacity__T1T -  1);
+      Self__FCVD=__tmp__12T;
+      while ((Self__FCVD <= __tmp__11DC)) {
+        new__H1DC[Self__FCVD]=NULL;
+        Self__FCVD=(__INTEGER)(Self__FCVD +  1);
+      };
+      Self__R1T->parent_arrayed_collection__O1H.storage__R2T=new__H1DC;
+      Self__R1T->parent_arrayed_collection__O1H.capacity__V1T=new_capacity__T1T;
+      Self__R1T->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__R1T->parent_arrayed_collection__O1H.upper__DST +  1);
+    };
+  };
+  ((void **)Self__R1T->parent_arrayed_collection__O1H.storage__R2T)[Self__R1T->parent_arrayed_collection__O1H.upper__DST]=tmp__4SI;
 }
 
-static void display_raw__1LIC(__ITM_TYPE_MULTI *Self__2LIC,void *buffer__3LIC)
+static void display_raw__ZJIC(__ITM_TYPE_MULTI *Self__0JIC,void *buffer__1JIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__CKIC,Self__KJRC;
+  void *__tmp__JKIC,*__tmp__MKIC;
+  __ITM_TYPE_STYLE *Self__5LEH,*Self__BMEH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__ESGH;
+  __tmp__CKIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__0JIC->list_type__1FP)->parent_arrayed_collection__EYC.upper__3DV -  1);
+  Self__KJRC= 0;
+  while ((Self__KJRC <= __tmp__CKIC)) {
+    __tmp__JKIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__0JIC->list_type__1FP)->parent_arrayed_collection__EYC.storage__EIV)[Self__KJRC];
+    switch (((struct ___OBJ *)__tmp__JKIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__JOS(buffer__3LIC,((__ITM_TYPE_PARAMETER *)__tmp__LMIC)->parent_itm_type__FEE.name__SYP);
+      append__2JS(buffer__1JIC,((__ITM_TYPE_PARAMETER *)__tmp__JKIC)->parent_itm_type__LAE.name__FUP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__JOS(buffer__3LIC,((__ITM_TYPE_SIMPLE *)__tmp__LMIC)->name__SYP);
+      append__2JS(buffer__1JIC,((__ITM_TYPE_SIMPLE *)__tmp__JKIC)->name__FUP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__WGPD(__tmp__LMIC,buffer__3LIC);
+      append_in__EFPD(__tmp__JKIC,buffer__1JIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__0HPD(__tmp__LMIC,buffer__3LIC);
+      append_in__IGPD(__tmp__JKIC,buffer__1JIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__5LEH=((__ITM_TYPE_STYLE *)__tmp__JKIC);
+      if (((void *)Self__5LEH->style__OUP != (void *)NULL)) {
+        append__2JS(buffer__1JIC,Self__5LEH->style__OUP);
+        add_last__UHT(buffer__1JIC,' ');
       };
-      append__JOS(buffer__3LIC,Self__PAEH->parent_itm_type_simple__JSN.name__SYP);
+      append__2JS(buffer__1JIC,Self__5LEH->parent_itm_type_simple__2NN.name__FUP);
     } break;
     };
-    add_last__BMT(buffer__3LIC,',');
-    Self__5KRC=(__INTEGER)(Self__5KRC +  1);
+    add_last__UHT(buffer__1JIC,',');
+    Self__KJRC=(__INTEGER)(Self__KJRC +  1);
   };
-  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) {
+  Self__ESGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__0JIC->list_type__1FP);
+  __tmp__MKIC=((void **)Self__ESGH->parent_arrayed_collection__EYC.storage__EIV)[Self__ESGH->parent_arrayed_collection__EYC.upper__3DV];
+  switch (((struct ___OBJ *)__tmp__MKIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__JOS(buffer__3LIC,((__ITM_TYPE_PARAMETER *)__tmp__OMIC)->parent_itm_type__FEE.name__SYP);
+    append__2JS(buffer__1JIC,((__ITM_TYPE_PARAMETER *)__tmp__MKIC)->parent_itm_type__LAE.name__FUP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__JOS(buffer__3LIC,((__ITM_TYPE_SIMPLE *)__tmp__OMIC)->name__SYP);
+    append__2JS(buffer__1JIC,((__ITM_TYPE_SIMPLE *)__tmp__MKIC)->name__FUP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__WGPD(__tmp__OMIC,buffer__3LIC);
+    append_in__EFPD(__tmp__MKIC,buffer__1JIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__0HPD(__tmp__OMIC,buffer__3LIC);
+    append_in__IGPD(__tmp__MKIC,buffer__1JIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__BMEH=((__ITM_TYPE_STYLE *)__tmp__MKIC);
+    if (((void *)Self__BMEH->style__OUP != (void *)NULL)) {
+      append__2JS(buffer__1JIC,Self__BMEH->style__OUP);
+      add_last__UHT(buffer__1JIC,' ');
     };
-    append__JOS(buffer__3LIC,Self__RAEH->parent_itm_type_simple__JSN.name__SYP);
+    append__2JS(buffer__1JIC,Self__BMEH->parent_itm_type_simple__2NN.name__FUP);
   } break;
   };
 }
 
-static void put__to__like__H1FG(void *tok__J1FG,void *buf__K1FG,void *key__L1FG)
+static void put__to__like__IGGG(void *tok__KGGG,void *buf__LGGG,void *key__MGGG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__3GGG,Self__TXHG;
+  void *lst__NGGG;
+  lst__NGGG=NULL;
+  if (((void *)key__MGGG != (void *)NULL)) {
+    lst__NGGG=fast_reference_at__HFNE(short_dico__QD,key__MGGG);
+    if (((void *)lst__NGGG != (void *)NULL)) {
+      __tmp__3GGG=((__LINKED_LISToSTRING_CONSTANTo *)lst__NGGG)->parent_linked_collection__LD.upper__MDD;
+      Self__TXHG= 1;
+      while ((Self__TXHG <= __tmp__3GGG)) {
+        if (((void *)item__MZND(lst__NGGG,Self__TXHG) == (void *)NULL)) {
+          append__2JS(buf__LGGG,tok__KGGG);
         } else {
-          append__JOS(buf__K1FG,item__A1ND(lst__M1FG,Self__SMHG));
+          append__2JS(buf__LGGG,item__MZND(lst__NGGG,Self__TXHG));
         };
-        Self__SMHG=(__INTEGER)(Self__SMHG +  1);
+        Self__TXHG=(__INTEGER)(Self__TXHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__E0CG(void *tok__G0CG,void *buf__H0CG,void *key__I0CG)
+static void put__to__like__BNDG(void *tok__DNDG,void *buf__ENDG,void *key__FNDG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__WNDG,Self__LQHG;
+  void *lst__GNDG;
+  lst__GNDG=NULL;
+  if (((void *)key__FNDG != (void *)NULL)) {
+    lst__GNDG=fast_reference_at__HFNE(short_dico__QD,key__FNDG);
+    if (((void *)lst__GNDG != (void *)NULL)) {
+      __tmp__WNDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__GNDG)->parent_linked_collection__LD.upper__MDD;
+      Self__LQHG= 1;
+      while ((Self__LQHG <= __tmp__WNDG)) {
+        if (((void *)item__MZND(lst__GNDG,Self__LQHG) == (void *)NULL)) {
+          append__2JS(buf__ENDG,tok__DNDG);
         } else {
-          append__JOS(buf__H0CG,item__A1ND(lst__J0CG,Self__KFHG));
+          append__2JS(buf__ENDG,item__MZND(lst__GNDG,Self__LQHG));
         };
-        Self__KFHG=(__INTEGER)(Self__KFHG +  1);
+        Self__LQHG=(__INTEGER)(Self__LQHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__10EG(void *tok__30EG,void *buf__40EG)
+static void put__to__like__0JFG(void *tok__2JFG,void *buf__3JFG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__Q1EG,Self__3JHG;
-  void *lst__A1EG;
-  lst__A1EG=NULL;
+  __INTEGER __tmp__PKFG,Self__4UHG;
+  void *lst__5JFG;
+  lst__5JFG=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);
+    lst__5JFG=fast_reference_at__HFNE(short_dico__QD,(&__string_133));
+    if (((void *)lst__5JFG != (void *)NULL)) {
+      __tmp__PKFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__5JFG)->parent_linked_collection__LD.upper__MDD;
+      Self__4UHG= 1;
+      while ((Self__4UHG <= __tmp__PKFG)) {
+        if (((void *)item__MZND(lst__5JFG,Self__4UHG) == (void *)NULL)) {
+          append__2JS(buf__3JFG,tok__2JFG);
         } else {
-          append__JOS(buf__40EG,item__A1ND(lst__A1EG,Self__3JHG));
+          append__2JS(buf__3JFG,item__MZND(lst__5JFG,Self__4UHG));
         };
-        Self__3JHG=(__INTEGER)(Self__3JHG +  1);
+        Self__4UHG=(__INTEGER)(Self__4UHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__O3EG(void *tok__Q3EG,void *buf__R3EG,void *key__S3EG)
+static void put__to__like__NMFG(void *tok__PMFG,void *buf__QMFG,void *key__RMFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__CNFG,Self__PVHG;
+  void *lst__SMFG;
+  lst__SMFG=NULL;
+  if (((void *)key__RMFG != (void *)NULL)) {
+    lst__SMFG=fast_reference_at__HFNE(short_dico__QD,key__RMFG);
+    if (((void *)lst__SMFG != (void *)NULL)) {
+      __tmp__CNFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__SMFG)->parent_linked_collection__LD.upper__MDD;
+      Self__PVHG= 1;
+      while ((Self__PVHG <= __tmp__CNFG)) {
+        if (((void *)item__MZND(lst__SMFG,Self__PVHG) == (void *)NULL)) {
+          append__2JS(buf__QMFG,tok__PMFG);
         } else {
-          append__JOS(buf__R3EG,item__A1ND(lst__T3EG,Self__OKHG));
+          append__2JS(buf__QMFG,item__MZND(lst__SMFG,Self__PVHG));
         };
-        Self__OKHG=(__INTEGER)(Self__OKHG +  1);
+        Self__PVHG=(__INTEGER)(Self__PVHG +  1);
       };
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__0NJE(__CHARACTER Self__1NJE)
+static __BOOLEAN is_hexadecimal_digit__3LJE(__CHARACTER Self__4LJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __BOOLEAN result__AMJE,result__FMEH,__tmp__IMJE,__tmp__XMJE;
+  __BOOLEAN result__4BOE;
+  result__AMJE=FALSE__;
+  result__FMEH=FALSE__;
+  if ((((__INTEGER_8 )Self__4LJE) >= ((__INTEGER_8 )'0'))) {
+    result__FMEH=(((__INTEGER_8 )Self__4LJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__FMEH) {
+    result__AMJE=TRUE__;
+    __tmp__IMJE=TRUE__;
   } else {
-    __tmp__FOJE=FALSE__;
+    __tmp__IMJE=FALSE__;
   };
-  if (__tmp__FOJE) {
-    __tmp__UOJE=TRUE__;
+  if (__tmp__IMJE) {
+    __tmp__XMJE=TRUE__;
   } else {
-    result__LEOE=(((__INTEGER_8 )Self__1NJE) >= ((__INTEGER_8 )'a'));
-    if (result__LEOE) {
-      result__3NJE=(((__INTEGER_8 )Self__1NJE) <= ((__INTEGER_8 )'f'));
+    result__4BOE=(((__INTEGER_8 )Self__4LJE) >= ((__INTEGER_8 )'a'));
+    if (result__4BOE) {
+      result__AMJE=(((__INTEGER_8 )Self__4LJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__UOJE=result__LEOE;
+    __tmp__XMJE=result__4BOE;
   };
-  if ((! __tmp__UOJE)) {
-    if ((((__INTEGER_8 )Self__1NJE) >= ((__INTEGER_8 )'A'))) {
-      result__3NJE=(((__INTEGER_8 )Self__1NJE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__XMJE)) {
+    if ((((__INTEGER_8 )Self__4LJE) >= ((__INTEGER_8 )'A'))) {
+      result__AMJE=(((__INTEGER_8 )Self__4LJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__3NJE);
+  return(result__AMJE);
 }
 
-static void* read_constant__DRO()
+static void* read_constant__WMO()
 // () With resultNo recursive, No inlinable.
 {
-  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;
+  void *result__ZMO;
+  __INTEGER pos_old__K1O,typ_id__ZLQ,typ_id__KMMB,old_pos__13P;
+  __INTEGER count__23P,typ_id__4NMB,typ_id__SPMB;
+  __POSITION pos__NXZG,__tmp__BNO,__tmp__TNO,pos__NYZG,pos__PYZG;
+  __POSITION __tmp__FOO,__tmp__WOO;
+  __ITM_REAL *result__TLQ;
+  __POINTER ptr__ULQ,ptr_table__4YJH,next__3YJH,result__5YJH;
+  __POINTER ptr_table__DZJH,next__CZJH,result__EZJH,ptr__FMMB;
+  __POINTER ptr_table__IZJH,next__HZJH,result__JZJH,ptr_table__NZJH;
+  __POINTER next__MZJH,result__OZJH,ptr__ZNMB,ptr_table__SZJH;
+  __POINTER next__RZJH,result__TZJH,ptr_table__XZJH,next__WZJH;
+  __POINTER result__YZJH,ptr__NPMB,ptr_table__2ZJH,next__1ZJH;
+  __POINTER result__3ZJH,ptr_table__B0JH,next__A0JH,result__C0JH;
+  __UINTEGER_32 sz__WLQ,a__ISGH,new_size__JSGH,t__NSGH,a__MSGH;
+  __UINTEGER_32 new_size__GZJH,lab_type__FZJH,sz__HMMB,a__QSGH;
+  __UINTEGER_32 new_size__RSGH,t__VSGH,a__USGH,new_size__QZJH;
+  __UINTEGER_32 lab_type__PZJH,sz__1NMB,a__YSGH,new_size__ZSGH,t__3SGH;
+  __UINTEGER_32 a__2SGH,new_size__0ZJH,lab_type__ZZJH,sz__PPMB,a__ATGH;
+  __UINTEGER_32 new_size__BTGH,t__FTGH,a__ETGH,new_size__E0JH;
+  __UINTEGER_32 lab_type__D0JH;
+  __ITM_NUMBER *result__EMMB;
+  __ITM_CHARACTER *result__YNMB;
+  __ITM_STRING *result__MPMB;
+  __BOOLEAN result__J1O,result__NMEH,__tmp__V1O,result__ZMEH,__tmp__P2O;
+  __BOOLEAN result__RNEH,result__3NEH,__tmp__24O,result__ZOEH;
+  __BOOLEAN result__FPEH,__tmp__GNO,__tmp__YNO,result__2BP,__tmp__JOO;
+  __BOOLEAN result__03P,__tmp__G4P,__tmp__F5P,__tmp__G5P;
+  __CHARACTER result__BKBH,result__LKBH,result__QKBH,result__VKBH;
+  __CHARACTER result__0KBH,result__5KBH,result__ELBH,result__JLBH;
+  __CHARACTER result__OLBH,result__TLBH,result__YLBH,result__3LBH;
+  __CHARACTER result__CMBH,result__HMBH,result__MMBH,result__RMBH;
+  __CHARACTER result__WMBH,result__1MBH,result__ANBH,result__FNBH;
+  __CHARACTER result__PNBH,result__YNBH,result__3NBH,result__COBH;
+  __CHARACTER result__HOBH,result__MOBH;
+  result__ZMO=NULL;
+  result__J1O=FALSE__;
+  pos_old__K1O= 0;
+  if (read_space__KSD()) {
+    result__BKBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__BKBH=((__CHARACTER )(( 0)));
+    } else {
+      result__BKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    };
+    result__NMEH=FALSE__;
+    if ((((__INTEGER_8 )result__BKBH) >= ((__INTEGER_8 )'0'))) {
+      result__NMEH=(((__INTEGER_8 )result__BKBH) <= ((__INTEGER_8 )'9'));
+    };
+    __tmp__V1O=result__NMEH;
   } else {
-    __tmp__CAP=FALSE__;
+    __tmp__V1O=FALSE__;
   };
-  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)));
+  if (__tmp__V1O) {
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    result__LKBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__LKBH=((__CHARACTER )(( 0)));
     } else {
-      result__I3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__LKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__BMT(string_tmp__VH,result__I3AH);
-    pos_old__X5O=position__0BC;
-    position__0BC=(__INTEGER)(position__0BC +  1);
-    while_do__MA0D:
+    add_last__UHT(string_tmp__VH,result__LKBH);
+    pos_old__K1O=position__CCC;
+    position__CCC=(__INTEGER)(position__CCC +  1);
+    while_do__55ZD:
     {
-      result__N3AH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__N3AH=((__CHARACTER )(( 0)));
+      result__QKBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__QKBH=((__CHARACTER )(( 0)));
       } else {
-        result__N3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__QKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__JBEH=FALSE__;
-      if ((((__INTEGER_8 )result__N3AH) >= ((__INTEGER_8 )'0'))) {
-        result__JBEH=(((__INTEGER_8 )result__N3AH) <= ((__INTEGER_8 )'9'));
+      result__ZMEH=FALSE__;
+      if ((((__INTEGER_8 )result__QKBH) >= ((__INTEGER_8 )'0'))) {
+        result__ZMEH=(((__INTEGER_8 )result__QKBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__JBEH) {
-        __tmp__2AP=TRUE__;
+      if (result__ZMEH) {
+        __tmp__P2O=TRUE__;
       } else {
-        result__S3AH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__S3AH=((__CHARACTER )(( 0)));
+        result__VKBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__VKBH=((__CHARACTER )(( 0)));
         } else {
-          result__S3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__VKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__2AP=(result__S3AH == '_');
+        __tmp__P2O=(result__VKBH == '_');
       };
-      if (__tmp__2AP) {
-        result__X3AH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__X3AH=((__CHARACTER )(( 0)));
+      if (__tmp__P2O) {
+        result__0KBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__0KBH=((__CHARACTER )(( 0)));
         } else {
-          result__X3AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__0KBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__X3AH != '_')) {
-          result__23AH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__23AH=((__CHARACTER )(( 0)));
+        if ((result__0KBH != '_')) {
+          result__5KBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__5KBH=((__CHARACTER )(( 0)));
           } else {
-            result__23AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__5KBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__23AH);
+          add_last__UHT(string_tmp__VH,result__5KBH);
         };
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        goto while_do__MA0D;
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        goto while_do__55ZD;
       };
     };
-    result__B4AH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__B4AH=((__CHARACTER )(( 0)));
+    result__ELBH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__ELBH=((__CHARACTER )(( 0)));
     } else {
-      result__B4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__ELBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    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)));
+    if ((result__ELBH == '.')) {
+      add_last__UHT(string_tmp__VH,'.');
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__JLBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__JLBH=((__CHARACTER )(( 0)));
       } else {
-        result__G4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__JLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__BCEH=FALSE__;
-      if ((((__INTEGER_8 )result__G4AH) >= ((__INTEGER_8 )'0'))) {
-        result__BCEH=(((__INTEGER_8 )result__G4AH) <= ((__INTEGER_8 )'9'));
+      result__RNEH=FALSE__;
+      if ((((__INTEGER_8 )result__JLBH) >= ((__INTEGER_8 )'0'))) {
+        result__RNEH=(((__INTEGER_8 )result__JLBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__BCEH) {
-        result__W5O=TRUE__;
-        result__L4AH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__L4AH=((__CHARACTER )(( 0)));
+      if (result__RNEH) {
+        result__J1O=TRUE__;
+        result__OLBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__OLBH=((__CHARACTER )(( 0)));
         } else {
-          result__L4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__OLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__BMT(string_tmp__VH,result__L4AH);
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        while_do__UMPE:
+        add_last__UHT(string_tmp__VH,result__OLBH);
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        while_do__RLPE:
         {
-          result__Q4AH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__Q4AH=((__CHARACTER )(( 0)));
+          result__TLBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__TLBH=((__CHARACTER )(( 0)));
           } else {
-            result__Q4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__TLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__NCEH=FALSE__;
-          if ((((__INTEGER_8 )result__Q4AH) >= ((__INTEGER_8 )'0'))) {
-            result__NCEH=(((__INTEGER_8 )result__Q4AH) <= ((__INTEGER_8 )'9'));
+          result__3NEH=FALSE__;
+          if ((((__INTEGER_8 )result__TLBH) >= ((__INTEGER_8 )'0'))) {
+            result__3NEH=(((__INTEGER_8 )result__TLBH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__NCEH) {
-            result__V4AH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__V4AH=((__CHARACTER )(( 0)));
+          if (result__3NEH) {
+            result__YLBH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__YLBH=((__CHARACTER )(( 0)));
             } else {
-              result__V4AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__YLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__BMT(string_tmp__VH,result__V4AH);
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            goto while_do__UMPE;
+            add_last__UHT(string_tmp__VH,result__YLBH);
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            goto while_do__RLPE;
           };
         };
       };
-      result__04AH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__04AH=((__CHARACTER )(( 0)));
+      result__3LBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__3LBH=((__CHARACTER )(( 0)));
       } else {
-        result__04AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__3LBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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)));
+      if ((result__3LBH == 'E')) {
+        result__J1O=TRUE__;
+        add_last__UHT(string_tmp__VH,'E');
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__CMBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__CMBH=((__CHARACTER )(( 0)));
         } else {
-          result__54AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__CMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__54AH == '+')) {
-          __tmp__JDP=TRUE__;
+        if ((result__CMBH == '+')) {
+          __tmp__24O=TRUE__;
         } else {
-          result__E5AH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__E5AH=((__CHARACTER )(( 0)));
+          result__HMBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__HMBH=((__CHARACTER )(( 0)));
           } else {
-            result__E5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__HMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__JDP=(result__E5AH == '-');
+          __tmp__24O=(result__HMBH == '-');
         };
-        if (__tmp__JDP) {
-          result__J5AH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__J5AH=((__CHARACTER )(( 0)));
+        if (__tmp__24O) {
+          result__MMBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__MMBH=((__CHARACTER )(( 0)));
           } else {
-            result__J5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__MMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__J5AH);
-          position__0BC=(__INTEGER)(position__0BC +  1);
+          add_last__UHT(string_tmp__VH,result__MMBH);
+          position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        result__O5AH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__O5AH=((__CHARACTER )(( 0)));
+        result__RMBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__RMBH=((__CHARACTER )(( 0)));
         } else {
-          result__O5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__RMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__JDEH=FALSE__;
-        if ((((__INTEGER_8 )result__O5AH) >= ((__INTEGER_8 )'0'))) {
-          result__JDEH=(((__INTEGER_8 )result__O5AH) <= ((__INTEGER_8 )'9'));
+        result__ZOEH=FALSE__;
+        if ((((__INTEGER_8 )result__RMBH) >= ((__INTEGER_8 )'0'))) {
+          result__ZOEH=(((__INTEGER_8 )result__RMBH) <= ((__INTEGER_8 )'9'));
         };
-        if (result__JDEH) {
-          result__T5AH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__T5AH=((__CHARACTER )(( 0)));
+        if (result__ZOEH) {
+          result__WMBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__WMBH=((__CHARACTER )(( 0)));
           } else {
-            result__T5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__WMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__T5AH);
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          while_do__JARE:
+          add_last__UHT(string_tmp__VH,result__WMBH);
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          while_do__HHRE:
           {
-            result__Y5AH='\0';
-            if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-              result__Y5AH=((__CHARACTER )(( 0)));
+            result__1MBH='\0';
+            if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+              result__1MBH=((__CHARACTER )(( 0)));
             } else {
-              result__Y5AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+              result__1MBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
             };
-            result__VDEH=FALSE__;
-            if ((((__INTEGER_8 )result__Y5AH) >= ((__INTEGER_8 )'0'))) {
-              result__VDEH=(((__INTEGER_8 )result__Y5AH) <= ((__INTEGER_8 )'9'));
+            result__FPEH=FALSE__;
+            if ((((__INTEGER_8 )result__1MBH) >= ((__INTEGER_8 )'0'))) {
+              result__FPEH=(((__INTEGER_8 )result__1MBH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__VDEH) {
-              result__35AH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__35AH=((__CHARACTER )(( 0)));
+            if (result__FPEH) {
+              result__ANBH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__ANBH=((__CHARACTER )(( 0)));
               } else {
-                result__35AH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__ANBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__BMT(string_tmp__VH,result__35AH);
-              position__0BC=(__INTEGER)(position__0BC +  1);
-              goto while_do__JARE;
+              add_last__UHT(string_tmp__VH,result__ANBH);
+              position__CCC=(__INTEGER)(position__CCC +  1);
+              goto while_do__HHRE;
             };
           };
         } else {
-          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)) {
+          pos__NXZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_327));
+          put_position__CMG(pos__NXZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__W5O) {
-      get__QWB(string_tmp__VH);
+    if (result__J1O) {
+      get__YWB(string_tmp__VH);
     } else {
-      position__0BC=pos_old__X5O;
+      position__CCC=pos_old__K1O;
     };
   };
-  if (result__W5O) {
-    short__token__to__TBD((&__string_121),pos_old__X5O,position__0BC);
+  if (result__J1O) {
+    short__token__to__YBD((&__string_121),pos_old__K1O,position__CCC);
   };
-  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__;
+  if (result__J1O) {
+    __tmp__BNO=current_position__XUF();
+    result__TLQ=NULL;
+    ptr__ULQ=((__POINTER )(NULL));
+    typ_id__ZLQ= 0;
+    sz__WLQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__WLQ ==  0)) {
+      result__TLQ=ITM_REAL__;
     } else {
-      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;
+      typ_id__ZLQ=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WLQ);
+      if ((typ_id__ZLQ == (__INTEGER)(-  1))) {
+        a__ISGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__JSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WLQ + a__ISGH) & (__UINTEGER_32)(~ a__ISGH));
+        ptr_table__4YJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__3YJH=((__POINTER )(NULL));
+        result__5YJH=((__POINTER *)ptr_table__4YJH)[ 0];
+        if ((result__5YJH == (void *)NULL)) {
+          result__5YJH=new_lab__QOJ(new_size__JSGH);
+          next__3YJH=(void *)((unsigned long)result__5YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSGH)));
+          ((__POINTER *)next__3YJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4YJH)[ 0]=next__3YJH;
         } else {
-          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)));
+          next__3YJH=((__POINTER *)result__5YJH)[ 0];
+          if ((next__3YJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5YJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__JSGH <<  1)) <=  4096)) {
+              next__3YJH=(void *)((unsigned long)result__5YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JSGH)));
             } else {
-              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)));
+              next__3YJH=new_lab__QOJ(new_size__JSGH);
+            };
+            ((__POINTER *)next__3YJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4YJH)[ 0]=next__3YJH;
+          } else {
+            ((__POINTER *)result__5YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5YJH=next__3YJH;
+          };
+        };
+        ptr__ULQ=result__5YJH;
+      } else {
+        t__NSGH=((__UINTEGER_32 )typ_id__ZLQ);
+        a__MSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WLQ + a__MSGH) & (__UINTEGER_32)(~ a__MSGH));
+        ptr_table__DZJH=((__POINTER )(&(table_type[(t__NSGH)])));
+        lab_type__FZJH=(__UINTEGER_32)(t__NSGH |  1);
+        next__CZJH=((__POINTER )(NULL));
+        result__EZJH=((__POINTER *)ptr_table__DZJH)[ 0];
+        if ((result__EZJH == (void *)NULL)) {
+          result__EZJH=new_lab__QOJ(lab_type__FZJH);
+          next__CZJH=(void *)((unsigned long)result__EZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZJH)));
+          ((__POINTER *)next__CZJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DZJH)[ 0]=next__CZJH;
+        } else {
+          next__CZJH=((__POINTER *)result__EZJH)[ 0];
+          if ((next__CZJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__GZJH <<  1)) <=  4096)) {
+              next__CZJH=(void *)((unsigned long)result__EZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GZJH)));
             } else {
-              next__TOJH=new_lab__URJ(lab_type__WOJH);
+              next__CZJH=new_lab__QOJ(lab_type__FZJH);
             };
-            ((__POINTER *)next__TOJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__UOJH)[ 0]=next__TOJH;
+            ((__POINTER *)next__CZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DZJH)[ 0]=next__CZJH;
           } else {
-            ((__POINTER *)result__VOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__VOJH=next__TOJH;
+            ((__POINTER *)result__EZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__EZJH=next__CZJH;
           };
         };
-        ptr__BQQ=result__VOJH;
+        ptr__ULQ=result__EZJH;
       };
-      result__AQQ=((__ITM_REAL *)ptr__BQQ);
-      *(result__AQQ) = *(ITM_REAL__);
+      result__TLQ=((__ITM_REAL *)ptr__ULQ);
+      *(result__TLQ) = *(ITM_REAL__);
     };
-    ((__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__;
+    ((__ITM_REAL *)result__TLQ)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__BNO;
+    result__ZMO=result__TLQ;
+    __tmp__GNO=TRUE__;
   } else {
-    __tmp__TRO=FALSE__;
+    __tmp__GNO=FALSE__;
   };
-  if (__tmp__TRO) {
-    __tmp__FSO=TRUE__;
+  if (__tmp__GNO) {
+    __tmp__YNO=TRUE__;
   } else {
-    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)));
+    result__2BP=read_integer__1XP();
+    if (result__2BP) {
+      __tmp__TNO=current_position__XUF();
+      result__EMMB=NULL;
+      ptr__FMMB=((__POINTER )(NULL));
+      typ_id__KMMB= 0;
+      sz__HMMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__HMMB ==  0)) {
+        result__EMMB=ITM_NUMBER__;
+      } else {
+        typ_id__KMMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HMMB);
+        if ((typ_id__KMMB == (__INTEGER)(-  1))) {
+          a__QSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__RSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMMB + a__QSGH) & (__UINTEGER_32)(~ a__QSGH));
+          ptr_table__IZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__HZJH=((__POINTER )(NULL));
+          result__JZJH=((__POINTER *)ptr_table__IZJH)[ 0];
+          if ((result__JZJH == (void *)NULL)) {
+            result__JZJH=new_lab__QOJ(new_size__RSGH);
+            next__HZJH=(void *)((unsigned long)result__JZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RSGH)));
+            ((__POINTER *)next__HZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IZJH)[ 0]=next__HZJH;
+          } else {
+            next__HZJH=((__POINTER *)result__JZJH)[ 0];
+            if ((next__HZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RSGH <<  1)) <=  4096)) {
+                next__HZJH=(void *)((unsigned long)result__JZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RSGH)));
               } else {
-                next__YOJH=new_lab__URJ(new_size__4GGH);
+                next__HZJH=new_lab__QOJ(new_size__RSGH);
               };
-              ((__POINTER *)next__YOJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZOJH)[ 0]=next__YOJH;
+              ((__POINTER *)next__HZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IZJH)[ 0]=next__HZJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__JZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JZJH=next__HZJH;
+            };
+          };
+          ptr__FMMB=result__JZJH;
+        } else {
+          t__VSGH=((__UINTEGER_32 )typ_id__KMMB);
+          a__USGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__QZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__HMMB + a__USGH) & (__UINTEGER_32)(~ a__USGH));
+          ptr_table__NZJH=((__POINTER )(&(table_type[(t__VSGH)])));
+          lab_type__PZJH=(__UINTEGER_32)(t__VSGH |  1);
+          next__MZJH=((__POINTER )(NULL));
+          result__OZJH=((__POINTER *)ptr_table__NZJH)[ 0];
+          if ((result__OZJH == (void *)NULL)) {
+            result__OZJH=new_lab__QOJ(lab_type__PZJH);
+            next__MZJH=(void *)((unsigned long)result__OZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZJH)));
+            ((__POINTER *)next__MZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NZJH)[ 0]=next__MZJH;
+          } else {
+            next__MZJH=((__POINTER *)result__OZJH)[ 0];
+            if ((next__MZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QZJH <<  1)) <=  4096)) {
+                next__MZJH=(void *)((unsigned long)result__OZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZJH)));
               } else {
-                next__3OJH=new_lab__URJ(lab_type__APJH);
+                next__MZJH=new_lab__QOJ(lab_type__PZJH);
               };
-              ((__POINTER *)next__3OJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4OJH)[ 0]=next__3OJH;
+              ((__POINTER *)next__MZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__NZJH)[ 0]=next__MZJH;
             } else {
-              ((__POINTER *)result__5OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5OJH=next__3OJH;
+              ((__POINTER *)result__OZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__OZJH=next__MZJH;
             };
           };
-          ptr__ZQMB=result__5OJH;
+          ptr__FMMB=result__OZJH;
         };
-        result__YQMB=((__ITM_NUMBER *)ptr__ZQMB);
-        *(result__YQMB) = *(ITM_NUMBER__);
+        result__EMMB=((__ITM_NUMBER *)ptr__FMMB);
+        *(result__EMMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__YQMB)->parent_itm_constant__5RO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__ASO;
-      result__GRO=result__YQMB;
+      ((__ITM_NUMBER *)result__EMMB)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__TNO;
+      result__ZMO=result__EMMB;
     };
-    __tmp__FSO=result__JGP;
+    __tmp__YNO=result__2BP;
   };
-  if (__tmp__FSO) {
-    __tmp__WSO=TRUE__;
+  if (__tmp__YNO) {
+    __tmp__JOO=TRUE__;
   } else {
-    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)));
+    result__03P=FALSE__;
+    old_pos__13P= 0;
+    count__23P= 0;
+    if (read_space__KSD()) {
+      result__FNBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__FNBH=((__CHARACTER )(( 0)));
       } else {
-        result__CABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__FNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__TCQ=(result__CABH == '\'');
+      __tmp__G4P=(result__FNBH == '\'');
     } else {
-      __tmp__TCQ=FALSE__;
+      __tmp__G4P=FALSE__;
     };
-    if (__tmp__TCQ) {
-      old_pos__ICQ=position__0BC;
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      ((__STRING *)string_tmp__VH)->count__4FC= 0;
-      until_do__QJRC:
+    if (__tmp__G4P) {
+      old_pos__13P=position__CCC;
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      ((__STRING *)string_tmp__VH)->count__EGC= 0;
+      until_do__1HRC:
       {
-        result__MABH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__MABH=((__CHARACTER )(( 0)));
+        result__PNBH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__PNBH=((__CHARACTER )(( 0)));
         } else {
-          result__MABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__PNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__MABH == ((__CHARACTER )(( 0))))) {
-          __tmp__SDQ=TRUE__;
+        if ((result__PNBH == ((__CHARACTER )(( 0))))) {
+          __tmp__F5P=TRUE__;
         } else {
-          result__VABH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__VABH=((__CHARACTER )(( 0)));
+          result__YNBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__YNBH=((__CHARACTER )(( 0)));
           } else {
-            result__VABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__YNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__SDQ=(result__VABH == '\n');
+          __tmp__F5P=(result__YNBH == '\n');
         };
-        if (__tmp__SDQ) {
-          __tmp__TDQ=TRUE__;
+        if (__tmp__F5P) {
+          __tmp__G5P=TRUE__;
         } else {
-          result__0ABH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__0ABH=((__CHARACTER )(( 0)));
+          result__3NBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__3NBH=((__CHARACTER )(( 0)));
           } else {
-            result__0ABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__3NBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__TDQ=(result__0ABH == '\'');
+          __tmp__G5P=(result__3NBH == '\'');
         };
-        if ((! __tmp__TDQ)) {
-          result__5ABH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__5ABH=((__CHARACTER )(( 0)));
+        if ((! __tmp__G5P)) {
+          result__COBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__COBH=((__CHARACTER )(( 0)));
           } else {
-            result__5ABH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__COBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__BMT(string_tmp__VH,result__5ABH);
-          result__EBBH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__EBBH=((__CHARACTER )(( 0)));
+          add_last__UHT(string_tmp__VH,result__COBH);
+          result__HOBH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__HOBH=((__CHARACTER )(( 0)));
           } else {
-            result__EBBH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__HOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EBBH == '\\')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            read_escape_character__YLKF();
-            count__JCQ=(__INTEGER)(count__JCQ +  1);
+          if ((result__HOBH == '\\')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            read_escape_character__JWKF();
+            count__23P=(__INTEGER)(count__23P +  1);
           } else {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            count__JCQ=(__INTEGER)(count__JCQ +  1);
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            count__23P=(__INTEGER)(count__23P +  1);
           };
-          goto until_do__QJRC;
+          goto until_do__1HRC;
         };
       };
-      result__JBBH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__JBBH=((__CHARACTER )(( 0)));
+      result__MOBH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__MOBH=((__CHARACTER )(( 0)));
       } else {
-        result__JBBH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__MOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      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)) {
+      if ((result__MOBH == '\'')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        last_string__V0C=get__YWB(string_tmp__VH);
+        if ((count__23P !=  1)) {
+          position__CCC=begin_position__53D;
+          pos__NYZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_328));
+          put_position__CMG(pos__NYZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        result__HCQ=TRUE__;
-        short__token__to__TBD((&__string_122),old_pos__ICQ,position__0BC);
+        result__03P=TRUE__;
+        short__token__to__YBD((&__string_122),old_pos__13P,position__CCC);
       } else {
-        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)) {
+        position__CCC=begin_position__53D;
+        pos__PYZG=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_329));
+        put_position__CMG(pos__PYZG);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)));
+    if (result__03P) {
+      __tmp__FOO=current_position__XUF();
+      result__YNMB=NULL;
+      ptr__ZNMB=((__POINTER )(NULL));
+      typ_id__4NMB= 0;
+      sz__1NMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__1NMB ==  0)) {
+        result__YNMB=ITM_CHARACTER__;
+      } else {
+        typ_id__4NMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1NMB);
+        if ((typ_id__4NMB == (__INTEGER)(-  1))) {
+          a__YSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__1NMB + a__YSGH) & (__UINTEGER_32)(~ a__YSGH));
+          ptr_table__SZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__RZJH=((__POINTER )(NULL));
+          result__TZJH=((__POINTER *)ptr_table__SZJH)[ 0];
+          if ((result__TZJH == (void *)NULL)) {
+            result__TZJH=new_lab__QOJ(new_size__ZSGH);
+            next__RZJH=(void *)((unsigned long)result__TZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSGH)));
+            ((__POINTER *)next__RZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SZJH)[ 0]=next__RZJH;
+          } else {
+            next__RZJH=((__POINTER *)result__TZJH)[ 0];
+            if ((next__RZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__ZSGH <<  1)) <=  4096)) {
+                next__RZJH=(void *)((unsigned long)result__TZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZSGH)));
               } else {
-                next__CPJH=new_lab__URJ(new_size__GHGH);
+                next__RZJH=new_lab__QOJ(new_size__ZSGH);
               };
-              ((__POINTER *)next__CPJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DPJH)[ 0]=next__CPJH;
+              ((__POINTER *)next__RZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SZJH)[ 0]=next__RZJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__TZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TZJH=next__RZJH;
+            };
+          };
+          ptr__ZNMB=result__TZJH;
+        } else {
+          t__3SGH=((__UINTEGER_32 )typ_id__4NMB);
+          a__2SGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0ZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__1NMB + a__2SGH) & (__UINTEGER_32)(~ a__2SGH));
+          ptr_table__XZJH=((__POINTER )(&(table_type[(t__3SGH)])));
+          lab_type__ZZJH=(__UINTEGER_32)(t__3SGH |  1);
+          next__WZJH=((__POINTER )(NULL));
+          result__YZJH=((__POINTER *)ptr_table__XZJH)[ 0];
+          if ((result__YZJH == (void *)NULL)) {
+            result__YZJH=new_lab__QOJ(lab_type__ZZJH);
+            next__WZJH=(void *)((unsigned long)result__YZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZJH)));
+            ((__POINTER *)next__WZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XZJH)[ 0]=next__WZJH;
+          } else {
+            next__WZJH=((__POINTER *)result__YZJH)[ 0];
+            if ((next__WZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__0ZJH <<  1)) <=  4096)) {
+                next__WZJH=(void *)((unsigned long)result__YZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0ZJH)));
               } else {
-                next__HPJH=new_lab__URJ(lab_type__KPJH);
+                next__WZJH=new_lab__QOJ(lab_type__ZZJH);
               };
-              ((__POINTER *)next__HPJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IPJH)[ 0]=next__HPJH;
+              ((__POINTER *)next__WZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XZJH)[ 0]=next__WZJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__YZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YZJH=next__WZJH;
+            };
+          };
+          ptr__ZNMB=result__YZJH;
+        };
+        result__YNMB=((__ITM_CHARACTER *)ptr__ZNMB);
+        *(result__YNMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__YNMB)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__FOO;
+      result__ZMO=result__YNMB;
+    };
+    __tmp__JOO=result__03P;
+  };
+  if ((! __tmp__JOO)) {
+    if (read_string__GBQ()) {
+      __tmp__WOO=current_position__XUF();
+      result__MPMB=NULL;
+      ptr__NPMB=((__POINTER )(NULL));
+      typ_id__SPMB= 0;
+      sz__PPMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__PPMB ==  0)) {
+        result__MPMB=ITM_STRING__;
+      } else {
+        typ_id__SPMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PPMB);
+        if ((typ_id__SPMB == (__INTEGER)(-  1))) {
+          a__ATGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__BTGH=(__UINTEGER_32)((__UINTEGER_32)(sz__PPMB + a__ATGH) & (__UINTEGER_32)(~ a__ATGH));
+          ptr_table__2ZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BTGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__1ZJH=((__POINTER )(NULL));
+          result__3ZJH=((__POINTER *)ptr_table__2ZJH)[ 0];
+          if ((result__3ZJH == (void *)NULL)) {
+            result__3ZJH=new_lab__QOJ(new_size__BTGH);
+            next__1ZJH=(void *)((unsigned long)result__3ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTGH)));
+            ((__POINTER *)next__1ZJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2ZJH)[ 0]=next__1ZJH;
+          } else {
+            next__1ZJH=((__POINTER *)result__3ZJH)[ 0];
+            if ((next__1ZJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3ZJH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BTGH <<  1)) <=  4096)) {
+                next__1ZJH=(void *)((unsigned long)result__3ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTGH)));
               } else {
-                next__MPJH=new_lab__URJ(new_size__OHGH);
+                next__1ZJH=new_lab__QOJ(new_size__BTGH);
               };
-              ((__POINTER *)next__MPJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NPJH)[ 0]=next__MPJH;
+              ((__POINTER *)next__1ZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2ZJH)[ 0]=next__1ZJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__3ZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1ZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3ZJH=next__1ZJH;
+            };
+          };
+          ptr__NPMB=result__3ZJH;
+        } else {
+          t__FTGH=((__UINTEGER_32 )typ_id__SPMB);
+          a__ETGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__E0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__PPMB + a__ETGH) & (__UINTEGER_32)(~ a__ETGH));
+          ptr_table__B0JH=((__POINTER )(&(table_type[(t__FTGH)])));
+          lab_type__D0JH=(__UINTEGER_32)(t__FTGH |  1);
+          next__A0JH=((__POINTER )(NULL));
+          result__C0JH=((__POINTER *)ptr_table__B0JH)[ 0];
+          if ((result__C0JH == (void *)NULL)) {
+            result__C0JH=new_lab__QOJ(lab_type__D0JH);
+            next__A0JH=(void *)((unsigned long)result__C0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E0JH)));
+            ((__POINTER *)next__A0JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B0JH)[ 0]=next__A0JH;
+          } else {
+            next__A0JH=((__POINTER *)result__C0JH)[ 0];
+            if ((next__A0JH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C0JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__E0JH <<  1)) <=  4096)) {
+                next__A0JH=(void *)((unsigned long)result__C0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E0JH)));
               } else {
-                next__RPJH=new_lab__URJ(lab_type__UPJH);
+                next__A0JH=new_lab__QOJ(lab_type__D0JH);
               };
-              ((__POINTER *)next__RPJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SPJH)[ 0]=next__RPJH;
+              ((__POINTER *)next__A0JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__B0JH)[ 0]=next__A0JH;
             } else {
-              ((__POINTER *)result__TPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__TPJH=next__RPJH;
+              ((__POINTER *)result__C0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__C0JH=next__A0JH;
             };
           };
-          ptr__BUMB=result__TPJH;
+          ptr__NPMB=result__C0JH;
         };
-        result__AUMB=((__ITM_STRING *)ptr__BUMB);
-        *(result__AUMB) = *(ITM_STRING__);
+        result__MPMB=((__ITM_STRING *)ptr__NPMB);
+        *(result__MPMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__AUMB)->parent_itm_constant__CTO.parent_itm_code__DWF.parent_itm_object__5DE.position__VDJ=__tmp__DTO;
-      result__GRO=result__AUMB;
+      ((__ITM_STRING *)result__MPMB)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__WOO;
+      result__ZMO=result__MPMB;
     };
   };
-  return(result__GRO);
+  return(result__ZMO);
 }
 
-static void* read_group__RBHB(__PARSER *Self__SBHB)
+static void* read_group__32GB(__PARSER *Self__42GB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *e__A3GB;
+  __ITM_RESULT *result__L0JH,*result__1UWB;
+  __POINTER ptr__M0JH,ptr_table__V0JH,next__U0JH,result__W0JH;
+  __POINTER ptr_table__00JH,next__Z0JH,result__10JH,ptr__2UWB;
+  __POINTER ptr_table__F1JH,next__E1JH,result__G1JH,ptr_table__K1JH;
+  __POINTER next__J1JH,result__L1JH;
+  __INTEGER typ_id__N0JH,typ_id__BVWB;
+  __UINTEGER_32 sz__O0JH,a__P0JH,new_size__Q0JH,t__R0JH,a__S0JH;
+  __UINTEGER_32 new_size__30JH,lab_type__20JH,sz__4UWB,a__PWGH;
+  __UINTEGER_32 new_size__QWGH,t__UWGH,a__TWGH,new_size__N1JH;
+  __UINTEGER_32 lab_type__M1JH;
+  __POSITION pos__3YZG;
+  void *result__LOHH,*result__B3GB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__MOHH,*Self__NOHH;
+  __BOOLEAN result__F0JH,__tmp__Q3GB,result__I0JH,result__40JH;
+  __BOOLEAN __tmp__X4GB,result__B1JH;
+  __CHARACTER result__G0JH,result__J0JH,result__50JH,result__C1JH;
+  read_def_local__LYH(Self__42GB);
+  result__LOHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H)->parent_arrayed_collection__O1H.upper__DST <  0)) {
+    result__LOHH=create_with_capacity__WSI( 16);
   } else {
-    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:
+    Self__MOHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+    result__LOHH=((void **)Self__MOHH->parent_arrayed_collection__O1H.storage__R2T)[Self__MOHH->parent_arrayed_collection__O1H.upper__DST];
+    Self__NOHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+    Self__NOHH->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__NOHH->parent_arrayed_collection__O1H.upper__DST -  1);
+  };
+  result__B3GB=result__LOHH;
+  e__A3GB=read_expr__C2I(Self__42GB);
+  while_do__QCMB:
   {
-    if (((void *)e__UBHB != (void *)NULL)) {
-      result__WPJH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__WPJH=FALSE__;
+    if (((void *)e__A3GB != (void *)NULL)) {
+      result__F0JH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__F0JH=FALSE__;
       } else {
-        result__XPJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__XPJH=((__CHARACTER )(( 0)));
+        result__G0JH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__G0JH=((__CHARACTER )(( 0)));
         } else {
-          result__XPJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__G0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__XPJH == ';')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__WPJH=TRUE__;
+        if ((result__G0JH == ';')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__F0JH=TRUE__;
         };
       };
-      __tmp__ECHB=result__WPJH;
+      __tmp__Q3GB=result__F0JH;
     } else {
-      __tmp__ECHB=FALSE__;
+      __tmp__Q3GB=FALSE__;
     };
-    if (__tmp__ECHB) {
-      add_last__25U(result__VBHB,e__UBHB);
-      e__UBHB=read_expr__G5I(Self__SBHB);
-      goto while_do__EHMB;
+    if (__tmp__Q3GB) {
+      add_last__H1U(result__B3GB,e__A3GB);
+      e__A3GB=read_expr__C2I(Self__42GB);
+      goto while_do__QCMB;
     };
   };
-  if (((void *)e__UBHB != (void *)NULL)) {
-    result__ZPJH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__ZPJH=FALSE__;
+  if (((void *)e__A3GB != (void *)NULL)) {
+    result__I0JH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__I0JH=FALSE__;
     } else {
-      result__0PJH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__0PJH=((__CHARACTER )(( 0)));
+      result__J0JH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__J0JH=((__CHARACTER )(( 0)));
       } else {
-        result__0PJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__J0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__0PJH == ',')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__ZPJH=TRUE__;
+      if ((result__J0JH == ',')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__I0JH=TRUE__;
       };
     };
-    if (result__ZPJH) {
+    if (result__I0JH) {
       do {
-        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;
+        result__L0JH=NULL;
+        ptr__M0JH=((__POINTER )(NULL));
+        typ_id__N0JH= 0;
+        sz__O0JH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__O0JH ==  0)) {
+          result__L0JH=ITM_RESULT__;
+        } else {
+          typ_id__N0JH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O0JH);
+          if ((typ_id__N0JH == (__INTEGER)(-  1))) {
+            a__P0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__Q0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__O0JH + a__P0JH) & (__UINTEGER_32)(~ a__P0JH));
+            ptr_table__V0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q0JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__U0JH=((__POINTER )(NULL));
+            result__W0JH=((__POINTER *)ptr_table__V0JH)[ 0];
+            if ((result__W0JH == (void *)NULL)) {
+              result__W0JH=new_lab__QOJ(new_size__Q0JH);
+              next__U0JH=(void *)((unsigned long)result__W0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0JH)));
+              ((__POINTER *)next__U0JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__V0JH)[ 0]=next__U0JH;
             } else {
-              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)));
+              next__U0JH=((__POINTER *)result__W0JH)[ 0];
+              if ((next__U0JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W0JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Q0JH <<  1)) <=  4096)) {
+                  next__U0JH=(void *)((unsigned long)result__W0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q0JH)));
                 } else {
-                  next__FQJH=new_lab__URJ(new_size__BQJH);
+                  next__U0JH=new_lab__QOJ(new_size__Q0JH);
                 };
-                ((__POINTER *)next__FQJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
+                ((__POINTER *)next__U0JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__V0JH)[ 0]=next__U0JH;
               } else {
-                ((__POINTER *)result__HQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__HQJH=next__FQJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__W0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__W0JH=next__U0JH;
+              };
+            };
+            ptr__M0JH=result__W0JH;
+          } else {
+            t__R0JH=((__UINTEGER_32 )typ_id__N0JH);
+            a__S0JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__30JH=(__UINTEGER_32)((__UINTEGER_32)(sz__O0JH + a__S0JH) & (__UINTEGER_32)(~ a__S0JH));
+            ptr_table__00JH=((__POINTER )(&(table_type[(t__R0JH)])));
+            lab_type__20JH=(__UINTEGER_32)(t__R0JH |  1);
+            next__Z0JH=((__POINTER )(NULL));
+            result__10JH=((__POINTER *)ptr_table__00JH)[ 0];
+            if ((result__10JH == (void *)NULL)) {
+              result__10JH=new_lab__QOJ(lab_type__20JH);
+              next__Z0JH=(void *)((unsigned long)result__10JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__30JH)));
+              ((__POINTER *)next__Z0JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
             } else {
-              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)));
+              next__Z0JH=((__POINTER *)result__10JH)[ 0];
+              if ((next__Z0JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__10JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__30JH <<  1)) <=  4096)) {
+                  next__Z0JH=(void *)((unsigned long)result__10JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__30JH)));
                 } else {
-                  next__KQJH=new_lab__URJ(lab_type__NQJH);
+                  next__Z0JH=new_lab__QOJ(lab_type__20JH);
                 };
-                ((__POINTER *)next__KQJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__LQJH)[ 0]=next__KQJH;
+                ((__POINTER *)next__Z0JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
               } else {
-                ((__POINTER *)result__MQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__MQJH=next__KQJH;
+                ((__POINTER *)result__10JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__10JH=next__Z0JH;
               };
             };
-            ptr__3PJH=result__MQJH;
+            ptr__M0JH=result__10JH;
           };
-          result__2PJH=((__ITM_RESULT *)ptr__3PJH);
-          *(result__2PJH) = *(ITM_RESULT__);
+          result__L0JH=((__ITM_RESULT *)ptr__M0JH);
+          *(result__L0JH) = *(ITM_RESULT__);
         };
-        ((__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:
+        ((__ITM_RESULT *)result__L0JH)->value__DJFC=e__A3GB;
+        add_last__H1U(result__B3GB,result__L0JH);
+        e__A3GB=read_expr__C2I(Self__42GB);
+        while_do__PX3B:
         {
-          if (((void *)e__UBHB != (void *)NULL)) {
-            result__PQJH=FALSE__;
-            if ((! read_space__FSD())) {
-              result__PQJH=FALSE__;
+          if (((void *)e__A3GB != (void *)NULL)) {
+            result__40JH=FALSE__;
+            if ((! read_space__KSD())) {
+              result__40JH=FALSE__;
             } else {
-              result__QQJH='\0';
-              if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-                result__QQJH=((__CHARACTER )(( 0)));
+              result__50JH='\0';
+              if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+                result__50JH=((__CHARACTER )(( 0)));
               } else {
-                result__QQJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+                result__50JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__QQJH == ';')) {
-                position__0BC=(__INTEGER)(position__0BC +  1);
-                result__PQJH=TRUE__;
+              if ((result__50JH == ';')) {
+                position__CCC=(__INTEGER)(position__CCC +  1);
+                result__40JH=TRUE__;
               };
             };
-            __tmp__LDHB=result__PQJH;
+            __tmp__X4GB=result__40JH;
           } else {
-            __tmp__LDHB=FALSE__;
+            __tmp__X4GB=FALSE__;
           };
-          if (__tmp__LDHB) {
-            add_last__25U(result__VBHB,e__UBHB);
-            e__UBHB=read_expr__G5I(Self__SBHB);
-            goto while_do__C13B;
+          if (__tmp__X4GB) {
+            add_last__H1U(result__B3GB,e__A3GB);
+            e__A3GB=read_expr__C2I(Self__42GB);
+            goto while_do__PX3B;
           };
         };
-        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)) {
+        if (((void *)e__A3GB == (void *)NULL)) {
+          pos__3YZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_330));
+          put_position__CMG(pos__3YZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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)));
+        result__B1JH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__B1JH=FALSE__;
+        } else {
+          result__C1JH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__C1JH=((__CHARACTER )(( 0)));
+          } else {
+            result__C1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          };
+          if ((result__C1JH == ',')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__B1JH=TRUE__;
+          };
+        };
+      } while (result__B1JH);
+    };
+    result__1UWB=NULL;
+    ptr__2UWB=((__POINTER )(NULL));
+    typ_id__BVWB= 0;
+    sz__4UWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__4UWB ==  0)) {
+      result__1UWB=ITM_RESULT__;
+    } else {
+      typ_id__BVWB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4UWB);
+      if ((typ_id__BVWB == (__INTEGER)(-  1))) {
+        a__PWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UWB + a__PWGH) & (__UINTEGER_32)(~ a__PWGH));
+        ptr_table__F1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__E1JH=((__POINTER )(NULL));
+        result__G1JH=((__POINTER *)ptr_table__F1JH)[ 0];
+        if ((result__G1JH == (void *)NULL)) {
+          result__G1JH=new_lab__QOJ(new_size__QWGH);
+          next__E1JH=(void *)((unsigned long)result__G1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWGH)));
+          ((__POINTER *)next__E1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__F1JH)[ 0]=next__E1JH;
+        } else {
+          next__E1JH=((__POINTER *)result__G1JH)[ 0];
+          if ((next__E1JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__G1JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__QWGH <<  1)) <=  4096)) {
+              next__E1JH=(void *)((unsigned long)result__G1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QWGH)));
             } else {
-              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)));
+              next__E1JH=new_lab__QOJ(new_size__QWGH);
+            };
+            ((__POINTER *)next__E1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__F1JH)[ 0]=next__E1JH;
+          } else {
+            ((__POINTER *)result__G1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__G1JH=next__E1JH;
+          };
+        };
+        ptr__2UWB=result__G1JH;
+      } else {
+        t__UWGH=((__UINTEGER_32 )typ_id__BVWB);
+        a__TWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__N1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UWB + a__TWGH) & (__UINTEGER_32)(~ a__TWGH));
+        ptr_table__K1JH=((__POINTER )(&(table_type[(t__UWGH)])));
+        lab_type__M1JH=(__UINTEGER_32)(t__UWGH |  1);
+        next__J1JH=((__POINTER )(NULL));
+        result__L1JH=((__POINTER *)ptr_table__K1JH)[ 0];
+        if ((result__L1JH == (void *)NULL)) {
+          result__L1JH=new_lab__QOJ(lab_type__M1JH);
+          next__J1JH=(void *)((unsigned long)result__L1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N1JH)));
+          ((__POINTER *)next__J1JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__K1JH)[ 0]=next__J1JH;
+        } else {
+          next__J1JH=((__POINTER *)result__L1JH)[ 0];
+          if ((next__J1JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__L1JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__N1JH <<  1)) <=  4096)) {
+              next__J1JH=(void *)((unsigned long)result__L1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N1JH)));
             } else {
-              next__0QJH=new_lab__URJ(lab_type__3QJH);
+              next__J1JH=new_lab__QOJ(lab_type__M1JH);
             };
-            ((__POINTER *)next__0QJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__1QJH)[ 0]=next__0QJH;
+            ((__POINTER *)next__J1JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__K1JH)[ 0]=next__J1JH;
           } else {
-            ((__POINTER *)result__2QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0QJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__2QJH=next__0QJH;
+            ((__POINTER *)result__L1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__L1JH=next__J1JH;
           };
         };
-        ptr__PYWB=result__2QJH;
+        ptr__2UWB=result__L1JH;
       };
-      result__OYWB=((__ITM_RESULT *)ptr__PYWB);
-      *(result__OYWB) = *(ITM_RESULT__);
+      result__1UWB=((__ITM_RESULT *)ptr__2UWB);
+      *(result__1UWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__OYWB)->value__ULFC=e__UBHB;
-    e__UBHB=result__OYWB;
-    add_last__25U(result__YCHH,result__OYWB);
+    ((__ITM_RESULT *)result__1UWB)->value__DJFC=e__A3GB;
+    e__A3GB=result__1UWB;
+    add_last__H1U(result__LOHH,result__1UWB);
   };
-  return(copy__Y5H(result__YCHH));
+  return(copy__42H(result__LOHH));
 }
 
-static void* readlip_expr_operator__UOZB(__PARSER *Self__VOZB)
+static void* readlip_expr_operator__BLZB(__PARSER *Self__CLZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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:
+  void *right__FLZB,*result__ELZB;
+  __POSITION pos__TZZG,p__31JH,p__U2JH;
+  __LIP_BINARY *result__U1JH,*Self__21JH,*result__L2JH,*Self__T2JH;
+  __POINTER ptr__V1JH,ptr_table__C2JH,next__B2JH,result__D2JH;
+  __POINTER ptr_table__H2JH,next__G2JH,result__I2JH,ptr__M2JH;
+  __POINTER ptr_table__Z2JH,next__Y2JH,result__02JH,ptr_table__42JH;
+  __POINTER next__32JH,result__52JH;
+  __INTEGER typ_id__W1JH,typ_id__N2JH;
+  __UINTEGER_32 sz__X1JH,a__Y1JH,new_size__Z1JH,t__01JH,a__11JH;
+  __UINTEGER_32 new_size__K2JH,lab_type__J2JH,sz__O2JH,a__P2JH;
+  __UINTEGER_32 new_size__Q2JH,t__R2JH,a__S2JH,new_size__B3JH;
+  __UINTEGER_32 lab_type__A3JH;
+  __BOOLEAN result__O1JH,__tmp__0LZB,result__R1JH;
+  __CHARACTER result__P1JH,result__S1JH;
+  right__FLZB=NULL;
+  result__ELZB=readlip_expr_cmp__VX1B(Self__CLZB);
+  if (((void *)result__ELZB != (void *)NULL)) {
+    while_do__EZ4B:
     {
-      result__5QJH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__5QJH=FALSE__;
+      result__O1JH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__O1JH=FALSE__;
       } else {
-        result__ARJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__ARJH=((__CHARACTER )(( 0)));
+        result__P1JH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__P1JH=((__CHARACTER )(( 0)));
         } else {
-          result__ARJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__P1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__ARJH == '|')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__5QJH=TRUE__;
+        if ((result__P1JH == '|')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__O1JH=TRUE__;
         };
       };
-      if (result__5QJH) {
-        __tmp__NPZB=TRUE__;
+      if (result__O1JH) {
+        __tmp__0LZB=TRUE__;
       } else {
-        result__CRJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__CRJH=FALSE__;
+        result__R1JH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__R1JH=FALSE__;
         } else {
-          result__DRJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__DRJH=((__CHARACTER )(( 0)));
+          result__S1JH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__S1JH=((__CHARACTER )(( 0)));
           } else {
-            result__DRJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__S1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__DRJH == '&')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__CRJH=TRUE__;
+          if ((result__S1JH == '&')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__R1JH=TRUE__;
           };
         };
-        __tmp__NPZB=result__CRJH;
+        __tmp__0LZB=result__R1JH;
       };
-      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)) {
+      if (__tmp__0LZB) {
+        right__FLZB=readlip_expr_cmp__VX1B(Self__CLZB);
+        if (((void *)right__FLZB == (void *)NULL)) {
+          pos__TZZG=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_240));
+          put_position__CMG(pos__TZZG);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__O1JH) {
+          p__31JH=current_position__XUF();
+          result__U1JH=NULL;
+          ptr__V1JH=((__POINTER )(NULL));
+          typ_id__W1JH= 0;
+          sz__X1JH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__X1JH ==  0)) {
+            result__U1JH=LIP_BINARY__;
+          } else {
+            typ_id__W1JH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__X1JH);
+            if ((typ_id__W1JH == (__INTEGER)(-  1))) {
+              a__Y1JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__Z1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1JH + a__Y1JH) & (__UINTEGER_32)(~ a__Y1JH));
+              ptr_table__C2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z1JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__B2JH=((__POINTER )(NULL));
+              result__D2JH=((__POINTER *)ptr_table__C2JH)[ 0];
+              if ((result__D2JH == (void *)NULL)) {
+                result__D2JH=new_lab__QOJ(new_size__Z1JH);
+                next__B2JH=(void *)((unsigned long)result__D2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1JH)));
+                ((__POINTER *)next__B2JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__C2JH)[ 0]=next__B2JH;
               } else {
-                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)));
+                next__B2JH=((__POINTER *)result__D2JH)[ 0];
+                if ((next__B2JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D2JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Z1JH <<  1)) <=  4096)) {
+                    next__B2JH=(void *)((unsigned long)result__D2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1JH)));
                   } else {
-                    next__SRJH=new_lab__URJ(new_size__KRJH);
+                    next__B2JH=new_lab__QOJ(new_size__Z1JH);
                   };
-                  ((__POINTER *)next__SRJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__TRJH)[ 0]=next__SRJH;
+                  ((__POINTER *)next__B2JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__C2JH)[ 0]=next__B2JH;
                 } else {
-                  ((__POINTER *)result__URJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__URJH=next__SRJH;
+                  ((__POINTER *)result__D2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__D2JH=next__B2JH;
                 };
               };
-              ptr__GRJH=result__URJH;
+              ptr__V1JH=result__D2JH;
             } else {
-              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;
+              t__01JH=((__UINTEGER_32 )typ_id__W1JH);
+              a__11JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__K2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__X1JH + a__11JH) & (__UINTEGER_32)(~ a__11JH));
+              ptr_table__H2JH=((__POINTER )(&(table_type[(t__01JH)])));
+              lab_type__J2JH=(__UINTEGER_32)(t__01JH |  1);
+              next__G2JH=((__POINTER )(NULL));
+              result__I2JH=((__POINTER *)ptr_table__H2JH)[ 0];
+              if ((result__I2JH == (void *)NULL)) {
+                result__I2JH=new_lab__QOJ(lab_type__J2JH);
+                next__G2JH=(void *)((unsigned long)result__I2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K2JH)));
+                ((__POINTER *)next__G2JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__H2JH)[ 0]=next__G2JH;
               } else {
-                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)));
+                next__G2JH=((__POINTER *)result__I2JH)[ 0];
+                if ((next__G2JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I2JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__K2JH <<  1)) <=  4096)) {
+                    next__G2JH=(void *)((unsigned long)result__I2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__K2JH)));
                   } else {
-                    next__XRJH=new_lab__URJ(lab_type__0RJH);
+                    next__G2JH=new_lab__QOJ(lab_type__J2JH);
                   };
-                  ((__POINTER *)next__XRJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__YRJH)[ 0]=next__XRJH;
+                  ((__POINTER *)next__G2JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__H2JH)[ 0]=next__G2JH;
                 } else {
-                  ((__POINTER *)result__ZRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ZRJH=next__XRJH;
+                  ((__POINTER *)result__I2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__I2JH=next__G2JH;
                 };
               };
-              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;
+              ptr__V1JH=result__I2JH;
+            };
+            result__U1JH=((__LIP_BINARY *)ptr__V1JH);
+            *(result__U1JH) = *(LIP_BINARY__);
+          };
+          Self__21JH=((__LIP_BINARY *)result__U1JH);
+          Self__21JH->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ=p__31JH;
+          Self__21JH->left__CYQD=result__ELZB;
+          Self__21JH->right__FYQD=right__FLZB;
+          Self__21JH->operator__IYQD='|';
+          result__ELZB=result__U1JH;
+        } else {
+          p__U2JH=current_position__XUF();
+          result__L2JH=NULL;
+          ptr__M2JH=((__POINTER )(NULL));
+          typ_id__N2JH= 0;
+          sz__O2JH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__O2JH ==  0)) {
+            result__L2JH=LIP_BINARY__;
+          } else {
+            typ_id__N2JH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__O2JH);
+            if ((typ_id__N2JH == (__INTEGER)(-  1))) {
+              a__P2JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__Q2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__O2JH + a__P2JH) & (__UINTEGER_32)(~ a__P2JH));
+              ptr_table__Z2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q2JH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__Y2JH=((__POINTER )(NULL));
+              result__02JH=((__POINTER *)ptr_table__Z2JH)[ 0];
+              if ((result__02JH == (void *)NULL)) {
+                result__02JH=new_lab__QOJ(new_size__Q2JH);
+                next__Y2JH=(void *)((unsigned long)result__02JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2JH)));
+                ((__POINTER *)next__Y2JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__Z2JH)[ 0]=next__Y2JH;
               } else {
-                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)));
+                next__Y2JH=((__POINTER *)result__02JH)[ 0];
+                if ((next__Y2JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__02JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Q2JH <<  1)) <=  4096)) {
+                    next__Y2JH=(void *)((unsigned long)result__02JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2JH)));
                   } else {
-                    next__JSJH=new_lab__URJ(new_size__BSJH);
+                    next__Y2JH=new_lab__QOJ(new_size__Q2JH);
                   };
-                  ((__POINTER *)next__JSJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KSJH)[ 0]=next__JSJH;
+                  ((__POINTER *)next__Y2JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__Z2JH)[ 0]=next__Y2JH;
                 } else {
-                  ((__POINTER *)result__LSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LSJH=next__JSJH;
+                  ((__POINTER *)result__02JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__02JH=next__Y2JH;
                 };
               };
-              ptr__3RJH=result__LSJH;
+              ptr__M2JH=result__02JH;
             } else {
-              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;
+              t__R2JH=((__UINTEGER_32 )typ_id__N2JH);
+              a__S2JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__B3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__O2JH + a__S2JH) & (__UINTEGER_32)(~ a__S2JH));
+              ptr_table__42JH=((__POINTER )(&(table_type[(t__R2JH)])));
+              lab_type__A3JH=(__UINTEGER_32)(t__R2JH |  1);
+              next__32JH=((__POINTER )(NULL));
+              result__52JH=((__POINTER *)ptr_table__42JH)[ 0];
+              if ((result__52JH == (void *)NULL)) {
+                result__52JH=new_lab__QOJ(lab_type__A3JH);
+                next__32JH=(void *)((unsigned long)result__52JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3JH)));
+                ((__POINTER *)next__32JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__42JH)[ 0]=next__32JH;
               } else {
-                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)));
+                next__32JH=((__POINTER *)result__52JH)[ 0];
+                if ((next__32JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__52JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__B3JH <<  1)) <=  4096)) {
+                    next__32JH=(void *)((unsigned long)result__52JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B3JH)));
                   } else {
-                    next__OSJH=new_lab__URJ(lab_type__RSJH);
+                    next__32JH=new_lab__QOJ(lab_type__A3JH);
                   };
-                  ((__POINTER *)next__OSJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PSJH)[ 0]=next__OSJH;
+                  ((__POINTER *)next__32JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__42JH)[ 0]=next__32JH;
                 } else {
-                  ((__POINTER *)result__QSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QSJH=next__OSJH;
+                  ((__POINTER *)result__52JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__32JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__52JH=next__32JH;
                 };
               };
-              ptr__3RJH=result__QSJH;
+              ptr__M2JH=result__52JH;
             };
-            result__2RJH=((__LIP_BINARY *)ptr__3RJH);
-            *(result__2RJH) = *(LIP_BINARY__);
+            result__L2JH=((__LIP_BINARY *)ptr__M2JH);
+            *(result__L2JH) = *(LIP_BINARY__);
           };
-          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;
+          Self__T2JH=((__LIP_BINARY *)result__L2JH);
+          Self__T2JH->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ=p__U2JH;
+          Self__T2JH->left__CYQD=result__ELZB;
+          Self__T2JH->right__FYQD=right__FLZB;
+          Self__T2JH->operator__IYQD='&';
+          result__ELZB=result__L2JH;
         };
-        goto while_do__X24B;
+        goto while_do__EZ4B;
       };
     };
   };
-  return(result__XOZB);
+  return(result__ELZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__ERKD(__INTEGER new_count__GRKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__IRKD(__INTEGER new_count__KRKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__N2LD,ptr_table__D3JH,next__C3JH,result__E3JH;
+  __POINTER ptr_table__I3JH,next__H3JH,result__J3JH;
+  __INTEGER typ_id__S2LD;
+  __UINTEGER_32 sz__P2LD,a__5WGH,new_size__AXGH,t__EXGH,a__DXGH;
+  __UINTEGER_32 new_size__L3JH,lab_type__K3JH;
+  __FAST_ARRAYoLIP_CODEo *result__M2LD,*Self__O5TD;
+  result__M2LD=NULL;
+  ptr__N2LD=((__POINTER )(NULL));
+  typ_id__S2LD= 0;
+  sz__P2LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__P2LD ==  0)) {
+    result__M2LD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    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);
+    typ_id__S2LD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__P2LD);
+    if ((typ_id__S2LD == (__INTEGER)(-  1))) {
+      a__5WGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__P2LD + a__5WGH) & (__UINTEGER_32)(~ a__5WGH));
+      ptr_table__D3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__C3JH=((__POINTER )(NULL));
+      result__E3JH=((__POINTER *)ptr_table__D3JH)[ 0];
+      if ((result__E3JH == (void *)NULL)) {
+        result__E3JH=new_lab__QOJ(new_size__AXGH);
+        next__C3JH=(void *)((unsigned long)result__E3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXGH)));
+        ((__POINTER *)next__C3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__D3JH)[ 0]=next__C3JH;
+      } else {
+        next__C3JH=((__POINTER *)result__E3JH)[ 0];
+        if ((next__C3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__E3JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__AXGH <<  1)) <=  4096)) {
+            next__C3JH=(void *)((unsigned long)result__E3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AXGH)));
+          } else {
+            next__C3JH=new_lab__QOJ(new_size__AXGH);
+          };
+          ((__POINTER *)next__C3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__D3JH)[ 0]=next__C3JH;
+        } else {
+          ((__POINTER *)result__E3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__E3JH=next__C3JH;
+        };
+      };
+      ptr__N2LD=result__E3JH;
+    } else {
+      t__EXGH=((__UINTEGER_32 )typ_id__S2LD);
+      a__DXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__L3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__P2LD + a__DXGH) & (__UINTEGER_32)(~ a__DXGH));
+      ptr_table__I3JH=((__POINTER )(&(table_type[(t__EXGH)])));
+      lab_type__K3JH=(__UINTEGER_32)(t__EXGH |  1);
+      next__H3JH=((__POINTER )(NULL));
+      result__J3JH=((__POINTER *)ptr_table__I3JH)[ 0];
+      if ((result__J3JH == (void *)NULL)) {
+        result__J3JH=new_lab__QOJ(lab_type__K3JH);
+        next__H3JH=(void *)((unsigned long)result__J3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L3JH)));
+        ((__POINTER *)next__H3JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__I3JH)[ 0]=next__H3JH;
+      } else {
+        next__H3JH=((__POINTER *)result__J3JH)[ 0];
+        if ((next__H3JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__J3JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__L3JH <<  1)) <=  4096)) {
+            next__H3JH=(void *)((unsigned long)result__J3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__L3JH)));
+          } else {
+            next__H3JH=new_lab__QOJ(lab_type__K3JH);
+          };
+          ((__POINTER *)next__H3JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__I3JH)[ 0]=next__H3JH;
+        } else {
+          ((__POINTER *)result__J3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__H3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__J3JH=next__H3JH;
+        };
+      };
+      ptr__N2LD=result__J3JH;
+    };
+    result__M2LD=((__FAST_ARRAYoLIP_CODEo *)ptr__N2LD);
+    *(result__M2LD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__O5TD=((__FAST_ARRAYoLIP_CODEo *)result__M2LD);
+  if ((Self__O5TD->parent_arrayed_collection__5KYC.capacity__UQTD < new_count__KRKD)) {
+    Self__O5TD->parent_arrayed_collection__5KYC.storage__5QTD=create__XSIE(new_count__KRKD);
+    Self__O5TD->parent_arrayed_collection__5KYC.capacity__UQTD=new_count__KRKD;
+  };
+  Self__O5TD->parent_arrayed_collection__5KYC.upper__SCQD=(__INTEGER)(-  1);
+  return(result__M2LD);
 }
 
-static void add_last__RJUD(__FAST_ARRAYoLIP_CODEo *Self__SJUD,void *element__TJUD)
+static void add_last__CKUD(__FAST_ARRAYoLIP_CODEo *Self__DKUD,void *element__EKUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__FKUD,__tmp__JLUD,__tmp__OTWE,Self__RRQF;
+  __BOOLEAN __tmp__TKUD;
+  void **__tmp__ILUD,**new__0SWE;
+  new_capacity__FKUD= 0;
+  if (((__INTEGER)(Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD +  1) <= (__INTEGER)(Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD -  1))) {
+    Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD=(__INTEGER)(Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD +  1);
+    __tmp__TKUD=TRUE__;
   } else {
-    __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;
+    __tmp__TKUD=FALSE__;
+  };
+  if ((! __tmp__TKUD)) {
+    if ((Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD ==  0)) {
+      Self__DKUD->parent_arrayed_collection__5KYC.storage__5QTD=create__XSIE( 2);
+      Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD= 2;
+      Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD= 0;
+    } else {
+      new_capacity__FKUD=(__INTEGER)(Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD <<  1);
+      __tmp__ILUD=Self__DKUD->parent_arrayed_collection__5KYC.storage__5QTD;
+      __tmp__JLUD=Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD;
+      new__0SWE=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__ILUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__JLUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FKUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__OTWE=(__INTEGER)(new_capacity__FKUD -  1);
+      Self__RRQF=__tmp__JLUD;
+      while ((Self__RRQF <= __tmp__OTWE)) {
+        new__0SWE[Self__RRQF]=NULL;
+        Self__RRQF=(__INTEGER)(Self__RRQF +  1);
+      };
+      Self__DKUD->parent_arrayed_collection__5KYC.storage__5QTD=new__0SWE;
+      Self__DKUD->parent_arrayed_collection__5KYC.capacity__UQTD=new_capacity__FKUD;
+      Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD=(__INTEGER)(Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD +  1);
+    };
+  };
+  ((void **)Self__DKUD->parent_arrayed_collection__5KYC.storage__5QTD)[Self__DKUD->parent_arrayed_collection__5KYC.upper__SCQD]=element__EKUD;
 }
 
-static void* copy__QLID(void *tmp__SLID)
+static void* copy__ULID(void *tmp__WLID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__LQTD,other_upper__KQTD,Self__4KYE;
+  __INTEGER new_capacity__HBUD,__tmp__PCUD,__tmp__0RWE,Self__SPQF;
+  void *result__YLID;
+  __FAST_ARRAYoLIP_CODEo *Self__IQTD;
+  void **__tmp__CRTD,**__tmp__ERTD,**Self__DJWE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__FBUD;
+  __BOOLEAN __tmp__WBUD;
+  void **__tmp__OCUD,**new__GRWE;
+  result__YLID=create_with_capacity__IRKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__WLID)->parent_arrayed_collection__5KYC.upper__SCQD +  1));
+  Self__IQTD=((__FAST_ARRAYoLIP_CODEo *)result__YLID);
+  new_capacity__LQTD= 0;
+  other_upper__KQTD=((__FAST_ARRAYoLIP_CODEo *)tmp__WLID)->parent_arrayed_collection__5KYC.upper__SCQD;
+  if ((other_upper__KQTD >=  0)) {
+    new_capacity__LQTD=(__INTEGER)(other_upper__KQTD +  1);
+    if ((Self__IQTD->parent_arrayed_collection__5KYC.capacity__UQTD < new_capacity__LQTD)) {
+      Self__IQTD->parent_arrayed_collection__5KYC.storage__5QTD=create__XSIE(new_capacity__LQTD);
+      Self__IQTD->parent_arrayed_collection__5KYC.capacity__UQTD=new_capacity__LQTD;
+    };
+    __tmp__CRTD=Self__IQTD->parent_arrayed_collection__5KYC.storage__5QTD;
+    __tmp__ERTD=((__FAST_ARRAYoLIP_CODEo *)tmp__WLID)->parent_arrayed_collection__5KYC.storage__5QTD;
+    Self__DJWE=((void **)__tmp__CRTD);
+    Self__4KYE=other_upper__KQTD;
+    while ((Self__4KYE >=  0)) {
+      Self__DJWE[Self__4KYE]=((void **)__tmp__ERTD)[Self__4KYE];
+      Self__4KYE=(__INTEGER)(Self__4KYE -  1);
+    };
+  };
+  Self__IQTD->parent_arrayed_collection__5KYC.upper__SCQD=other_upper__KQTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__WLID)->parent_arrayed_collection__5KYC.upper__SCQD=(__INTEGER)(-  1);
+  Self__FBUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__SKID);
+  new_capacity__HBUD= 0;
+  if (((__INTEGER)(Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD +  1) <= (__INTEGER)(Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD -  1))) {
+    Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD=(__INTEGER)(Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD +  1);
+    __tmp__WBUD=TRUE__;
   } else {
-    __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);
+    __tmp__WBUD=FALSE__;
+  };
+  if ((! __tmp__WBUD)) {
+    if ((Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD ==  0)) {
+      Self__FBUD->parent_arrayed_collection__RKID.storage__FCUD=create__LYIE( 2);
+      Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD= 2;
+      Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD= 0;
+    } else {
+      new_capacity__HBUD=(__INTEGER)(Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD <<  1);
+      __tmp__OCUD=Self__FBUD->parent_arrayed_collection__RKID.storage__FCUD;
+      __tmp__PCUD=Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD;
+      new__GRWE=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__OCUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__PCUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__HBUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__0RWE=(__INTEGER)(new_capacity__HBUD -  1);
+      Self__SPQF=__tmp__PCUD;
+      while ((Self__SPQF <= __tmp__0RWE)) {
+        new__GRWE[Self__SPQF]=NULL;
+        Self__SPQF=(__INTEGER)(Self__SPQF +  1);
+      };
+      Self__FBUD->parent_arrayed_collection__RKID.storage__FCUD=new__GRWE;
+      Self__FBUD->parent_arrayed_collection__RKID.capacity__JBUD=new_capacity__HBUD;
+      Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD=(__INTEGER)(Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD +  1);
+    };
+  };
+  ((void **)Self__FBUD->parent_arrayed_collection__RKID.storage__FCUD)[Self__FBUD->parent_arrayed_collection__RKID.upper__IPTD]=tmp__WLID;
+  return(result__YLID);
 }
 
-static void* fast_reference_at__WURD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__XURD,void *k__YURD)
+static void* fast_reference_at__ETRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__FTRD,void *k__GTRD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __STRING_CONSTANT *Self__EAIH;
+  __INTEGER result__DAIH,__tmp__FAIH,Self__GAIH;
+  void *node__QTRD;
+  __BOOLEAN __tmp__IURD;
+  Self__EAIH=((__STRING_CONSTANT *)k__GTRD);
+  result__DAIH= 0;
+  __tmp__FAIH=Self__EAIH->count__DD;
+  Self__GAIH= 1;
+  while ((Self__GAIH <= __tmp__FAIH)) {
+    result__DAIH=(__INTEGER)((__INTEGER)( 5 * result__DAIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EAIH->storage__QMO)[(__INTEGER)(Self__GAIH -  1)])));
+    Self__GAIH=(__INTEGER)(Self__GAIH +  1);
+  };
+  if ((result__DAIH <  0)) {
+    result__DAIH=(__INTEGER)(~ result__DAIH);
+  };
+  node__QTRD=((void **)Self__FTRD->buckets__YTRD)[(__INTEGER)(result__DAIH % Self__FTRD->capacity__TTRD)];
+  until_do__UGWD:
   {
-    if (((void *)node__CVRD == (void *)NULL)) {
-      __tmp__0VRD=TRUE__;
+    if (((void *)node__QTRD == (void *)NULL)) {
+      __tmp__IURD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__0VRD=((void *)NULL == (void *)k__YURD);
+      __tmp__IURD=((void *)NULL == (void *)k__GTRD);
     };
-    if ((! __tmp__0VRD)) {
+    if ((! __tmp__IURD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__CVRD=NULL;
-      goto until_do__HGWD;
+      node__QTRD=NULL;
+      goto until_do__UGWD;
     };
   };
-  if (((void *)node__CVRD != (void *)NULL)) {
+  if (((void *)node__QTRD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__OZQD(__LIP_BINARY *Self__PZQD)
+static void* run_expr__2XQD(__LIP_BINARY *Self__3XQD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *result__5XQD,*__tmp__EYQD,*__tmp__N3JH,*__tmp__O3JH,*__tmp__HYQD;
+  void *__tmp__S3JH,*__tmp__T3JH,*result__EZ3F,*__tmp__PYQD;
+  void *result__UZ3F,*result__G03F,*__tmp__WYQD,*result__W03F;
+  void *result__I13F,*__tmp__3YQD,*result__Y13F,*result__L4HG;
+  void *result__K23F,*__tmp__EZQD,*result__023F,*result__24HG;
+  void *__tmp__LZQD,*result__233F,*__tmp__SZQD,*result__443F;
+  void *__tmp__ZZQD,*result__AA4F,*__tmp__A0QD,*result__CB4F;
+  void *__tmp__H0QD,*result__EC4F,*result__RBIG,*__tmp__O0QD;
+  void *result__GD4F;
+  void *__tmp__DYQD,*__tmp__GYQD;
+  __LIP_INTEGER *Self__P3JH,*Self__U3JH,*Self__RZ3F,*__tmp__XZ3F;
+  __LIP_INTEGER *s__VZ3F,*Self__T03F,*__tmp__Z03F,*s__X03F,*Self__V13F;
+  __LIP_INTEGER *__tmp__113F,*s__Z13F,*Self__X23F,*__tmp__323F,*s__123F;
+  __LIP_INTEGER *Self__Z33F,*__tmp__533F,*s__333F,*Self__143F;
+  __LIP_INTEGER *__tmp__B53F,*s__543F,*Self__353F,*__tmp__DA4F,*s__BA4F;
+  __LIP_INTEGER *Self__5A4F,*__tmp__FB4F,*s__DB4F,*Self__BC4F;
+  __LIP_INTEGER *__tmp__HC4F,*s__FC4F,*Self__DD4F,*__tmp__JD4F,*s__HD4F;
+  __LIP_STRING *Self__Q3JH,*Self__V3JH,*__tmp__M3HG,*s__K3HG;
+  __LIP_STRING *__tmp__33HG,*s__13HG,*Self__I4HG,*__tmp__O4HG,*s__M4HG;
+  __LIP_STRING *Self__Z4HG,*__tmp__54HG,*s__34HG,*__tmp__Q5HG,*s__O5HG;
+  __LIP_STRING *__tmp__BAIG,*s__55HG,*__tmp__SAIG,*s__QAIG,*__tmp__DBIG;
+  __LIP_STRING *s__BBIG,*Self__OBIG,*__tmp__UBIG,*s__SBIG,*__tmp__FCIG;
+  __LIP_STRING *s__DCIG;
+  __LIP_BOOLEAN *Self__BZ3F,*__tmp__HZ3F,*s__FZ3F,*Self__D03F;
+  __LIP_BOOLEAN *__tmp__J03F,*s__H03F,*Self__F13F,*__tmp__L13F,*s__J13F;
+  __LIP_BOOLEAN *Self__H23F,*__tmp__N23F,*s__L23F,*__tmp__P33F,*s__N33F;
+  __LIP_BOOLEAN *__tmp__R43F,*s__P43F,*__tmp__T53F,*s__R53F,*__tmp__VA4F;
+  __LIP_BOOLEAN *s__TA4F,*__tmp__XB4F,*s__VB4F,*__tmp__ZC4F,*s__XC4F;
+  void *result__HREH,*result__JREH,*result__LREH,*result__NREH;
+  void *result__PREH,*result__RREH,*result__TREH,*result__VREH;
+  void *result__XREH,*result__ZREH,*result__1REH,*result__3REH;
+  __POSITION __tmp__X0QD;
+  __CHARACTER Self__5RVD;
+  __BOOLEAN b__IREH,b__KREH,b__MREH,b__OREH,b__QREH,b__SREH,b__UREH;
+  __BOOLEAN b__WREH,b__YREH,b__0REH,b__2REH,b__4REH;
+  result__5XQD=NULL;
+  __tmp__DYQD=Self__3XQD->left__CYQD;
+  switch (((struct ___OBJ *)__tmp__DYQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__WZQD=run_expr__OZQD(__tmp__VZQD);
+    __tmp__EYQD=run_expr__2XQD(__tmp__DYQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__WZQD=run_expr__N2QD(__tmp__VZQD);
+    __tmp__EYQD=run_expr__10QD(__tmp__DYQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__WZQD=run_expr__IGUE(__tmp__VZQD);
+    __tmp__EYQD=run_expr__DQUE(__tmp__DYQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__4SJH=((__LIP_VALUE *)__tmp__VZQD)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__4SJH)->__id) {
+    __tmp__N3JH=((__LIP_VALUE *)__tmp__DYQD)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__N3JH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__5SJH=((__LIP_BOOLEAN *)__tmp__4SJH);
+      __tmp__O3JH=((__LIP_BOOLEAN *)__tmp__N3JH);
     } break;
     case __LIP_INTEGER__: {
-      Self__ATJH=((__LIP_INTEGER *)__tmp__4SJH);
-      __tmp__5SJH=get__KJSE(Self__ATJH,Self__ATJH->value__3Y3F);
+      Self__P3JH=((__LIP_INTEGER *)__tmp__N3JH);
+      __tmp__O3JH=get__LRSE(Self__P3JH,Self__P3JH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__BTJH=((__LIP_STRING *)__tmp__4SJH);
-      __tmp__5SJH=get__TMFF(Self__BTJH,Self__BTJH->value__WBUE);
+      Self__Q3JH=((__LIP_STRING *)__tmp__N3JH);
+      __tmp__O3JH=get__PVFF(Self__Q3JH,Self__Q3JH->value__RLUE);
     } break;
     };
-    __tmp__WZQD=__tmp__5SJH;
+    __tmp__EYQD=__tmp__O3JH;
   } break;
   };
-  __tmp__YZQD=Self__PZQD->right__XZQD;
-  switch (((struct ___OBJ *)__tmp__YZQD)->__id) {
+  __tmp__GYQD=Self__3XQD->right__FYQD;
+  switch (((struct ___OBJ *)__tmp__GYQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__ZZQD=run_expr__OZQD(__tmp__YZQD);
+    __tmp__HYQD=run_expr__2XQD(__tmp__GYQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__ZZQD=run_expr__N2QD(__tmp__YZQD);
+    __tmp__HYQD=run_expr__10QD(__tmp__GYQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__ZZQD=run_expr__IGUE(__tmp__YZQD);
+    __tmp__HYQD=run_expr__DQUE(__tmp__GYQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__DTJH=((__LIP_VALUE *)__tmp__YZQD)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__DTJH)->__id) {
+    __tmp__S3JH=((__LIP_VALUE *)__tmp__GYQD)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__S3JH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__ETJH=((__LIP_BOOLEAN *)__tmp__DTJH);
+      __tmp__T3JH=((__LIP_BOOLEAN *)__tmp__S3JH);
     } break;
     case __LIP_INTEGER__: {
-      Self__FTJH=((__LIP_INTEGER *)__tmp__DTJH);
-      __tmp__ETJH=get__KJSE(Self__FTJH,Self__FTJH->value__3Y3F);
+      Self__U3JH=((__LIP_INTEGER *)__tmp__S3JH);
+      __tmp__T3JH=get__LRSE(Self__U3JH,Self__U3JH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__GTJH=((__LIP_STRING *)__tmp__DTJH);
-      __tmp__ETJH=get__TMFF(Self__GTJH,Self__GTJH->value__WBUE);
+      Self__V3JH=((__LIP_STRING *)__tmp__S3JH);
+      __tmp__T3JH=get__PVFF(Self__V3JH,Self__V3JH->value__RLUE);
     } break;
     };
-    __tmp__ZZQD=__tmp__ETJH;
+    __tmp__HYQD=__tmp__T3JH;
   } break;
   };
-  Self__SRVD=Self__PZQD->operator__0ZQD;
-  if ((Self__SRVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  Self__5RVD=Self__3XQD->operator__IYQD;
+  if ((Self__5RVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__FO3F=((__LIP_BOOLEAN *)__tmp__WZQD);
-      result__IO3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__LO3F=NULL;
+      Self__BZ3F=((__LIP_BOOLEAN *)__tmp__EYQD);
+      result__EZ3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__HZ3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LO3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__HZ3F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LO3F=NULL;
+          __tmp__HZ3F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__LO3F=NULL;
+          __tmp__HZ3F=NULL;
         } break;
         }
       };
-      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;
+      s__FZ3F=__tmp__HZ3F;
+      if (((void *)__tmp__HZ3F != (void *)NULL)) {
+        b__IREH=(Self__BZ3F->value__FCQD | __tmp__HZ3F->value__FCQD);
+        result__HREH=NULL;
+        if (b__IREH) {
+          result__HREH=true__OOLF;
         } else {
-          result__XFEH=LIP_BOOLEAN__;
+          result__HREH=LIP_BOOLEAN__;
         };
-        result__IO3F=result__XFEH;
+        result__EZ3F=result__HREH;
       };
-      __tmp__B0QD=result__IO3F;
+      __tmp__PYQD=result__EZ3F;
     } break;
     case __LIP_INTEGER__: {
-      Self__VO3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__YO3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__1O3F=NULL;
+      Self__RZ3F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__UZ3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__XZ3F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__1O3F=NULL;
+          __tmp__XZ3F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__1O3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__XZ3F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__1O3F=NULL;
+          __tmp__XZ3F=NULL;
         } break;
         }
       };
-      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;
+      s__VZ3F=__tmp__XZ3F;
+      if (((void *)__tmp__XZ3F != (void *)NULL)) {
+        Self__RZ3F->value__ZD4F=(__INTEGER)(Self__RZ3F->value__ZD4F | __tmp__XZ3F->value__ZD4F);
+        free__RY3F(__tmp__XZ3F);
+        result__UZ3F=Self__RZ3F;
       };
-      __tmp__B0QD=result__YO3F;
+      __tmp__PYQD=result__UZ3F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__LSHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__M3HG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LSHG=NULL;
+          __tmp__M3HG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LSHG=NULL;
+          __tmp__M3HG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__LSHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__M3HG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__JSHG=__tmp__LSHG;
-      __tmp__B0QD=NULL;
+      s__K3HG=__tmp__M3HG;
+      __tmp__PYQD=NULL;
     } break;
     };
-    result__RZQD=__tmp__B0QD;
+    result__5XQD=__tmp__PYQD;
   };
-  if ((Self__SRVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__HP3F=((__LIP_BOOLEAN *)__tmp__WZQD);
-      result__KP3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__NP3F=NULL;
+      Self__D03F=((__LIP_BOOLEAN *)__tmp__EYQD);
+      result__G03F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__J03F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__NP3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__J03F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__NP3F=NULL;
+          __tmp__J03F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__NP3F=NULL;
+          __tmp__J03F=NULL;
         } break;
         }
       };
-      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;
+      s__H03F=__tmp__J03F;
+      if (((void *)__tmp__J03F != (void *)NULL)) {
+        b__KREH=(Self__D03F->value__FCQD & __tmp__J03F->value__FCQD);
+        result__JREH=NULL;
+        if (b__KREH) {
+          result__JREH=true__OOLF;
         } else {
-          result__ZFEH=LIP_BOOLEAN__;
+          result__JREH=LIP_BOOLEAN__;
         };
-        result__KP3F=result__ZFEH;
+        result__G03F=result__JREH;
       };
-      __tmp__I0QD=result__KP3F;
+      __tmp__WYQD=result__G03F;
     } break;
     case __LIP_INTEGER__: {
-      Self__XP3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__0P3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__3P3F=NULL;
+      Self__T03F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__W03F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__Z03F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__3P3F=NULL;
+          __tmp__Z03F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__3P3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__Z03F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__3P3F=NULL;
+          __tmp__Z03F=NULL;
         } break;
         }
       };
-      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;
+      s__X03F=__tmp__Z03F;
+      if (((void *)__tmp__Z03F != (void *)NULL)) {
+        Self__T03F->value__ZD4F=(__INTEGER)(Self__T03F->value__ZD4F & __tmp__Z03F->value__ZD4F);
+        free__RY3F(__tmp__Z03F);
+        result__W03F=Self__T03F;
       };
-      __tmp__I0QD=result__0P3F;
+      __tmp__WYQD=result__W03F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__2SHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__33HG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__2SHG=NULL;
+          __tmp__33HG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__2SHG=NULL;
+          __tmp__33HG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__2SHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__33HG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__0SHG=__tmp__2SHG;
-      __tmp__I0QD=NULL;
+      s__13HG=__tmp__33HG;
+      __tmp__WYQD=NULL;
     } break;
     };
-    result__RZQD=__tmp__I0QD;
+    result__5XQD=__tmp__WYQD;
   };
-  if ((Self__SRVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__JQ3F=((__LIP_BOOLEAN *)__tmp__WZQD);
-      result__MQ3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__PQ3F=NULL;
+      Self__F13F=((__LIP_BOOLEAN *)__tmp__EYQD);
+      result__I13F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__L13F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__PQ3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__L13F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__PQ3F=NULL;
+          __tmp__L13F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__PQ3F=NULL;
+          __tmp__L13F=NULL;
         } break;
         }
       };
-      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;
+      s__J13F=__tmp__L13F;
+      if (((void *)__tmp__L13F != (void *)NULL)) {
+        b__MREH=(Self__F13F->value__FCQD == __tmp__L13F->value__FCQD);
+        result__LREH=NULL;
+        if (b__MREH) {
+          result__LREH=true__OOLF;
         } else {
-          result__1FEH=LIP_BOOLEAN__;
+          result__LREH=LIP_BOOLEAN__;
         };
-        result__MQ3F=result__1FEH;
+        result__I13F=result__LREH;
       };
-      __tmp__P0QD=result__MQ3F;
+      __tmp__3YQD=result__I13F;
     } break;
     case __LIP_INTEGER__: {
-      Self__ZQ3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__2Q3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__5Q3F=NULL;
+      Self__V13F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__Y13F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__113F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__5Q3F=NULL;
+          __tmp__113F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__5Q3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__113F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__5Q3F=NULL;
+          __tmp__113F=NULL;
         } break;
         }
       };
-      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;
+      s__Z13F=__tmp__113F;
+      if (((void *)__tmp__113F != (void *)NULL)) {
+        free__RY3F(__tmp__113F);
+        free__RY3F(Self__V13F);
+        b__OREH=(Self__V13F->value__ZD4F == __tmp__113F->value__ZD4F);
+        result__NREH=NULL;
+        if (b__OREH) {
+          result__NREH=true__OOLF;
         } else {
-          result__3FEH=LIP_BOOLEAN__;
+          result__NREH=LIP_BOOLEAN__;
         };
-        result__2Q3F=result__3FEH;
+        result__Y13F=result__NREH;
       };
-      __tmp__P0QD=result__2Q3F;
+      __tmp__3YQD=result__Y13F;
     } break;
     case __LIP_STRING__: {
-      Self__HTHG=((__LIP_STRING *)__tmp__WZQD);
-      result__KTHG=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__NTHG=NULL;
+      Self__I4HG=((__LIP_STRING *)__tmp__EYQD);
+      result__L4HG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__O4HG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__NTHG=NULL;
+          __tmp__O4HG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__NTHG=NULL;
+          __tmp__O4HG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__NTHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__O4HG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      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;
+      s__M4HG=__tmp__O4HG;
+      if (((void *)__tmp__O4HG != (void *)NULL)) {
+        free__52HG(__tmp__O4HG);
+        free__52HG(Self__I4HG);
+        b__QREH=((void *)Self__I4HG->value__RLUE == (void *)__tmp__O4HG->value__RLUE);
+        result__PREH=NULL;
+        if (b__QREH) {
+          result__PREH=true__OOLF;
         } else {
-          result__5FEH=LIP_BOOLEAN__;
+          result__PREH=LIP_BOOLEAN__;
         };
-        result__KTHG=result__5FEH;
+        result__L4HG=result__PREH;
       };
-      __tmp__P0QD=result__KTHG;
+      __tmp__3YQD=result__L4HG;
     } break;
     };
-    result__RZQD=__tmp__P0QD;
+    result__5XQD=__tmp__3YQD;
   };
-  if ((Self__SRVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__LR3F=((__LIP_BOOLEAN *)__tmp__WZQD);
-      result__OR3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__RR3F=NULL;
+      Self__H23F=((__LIP_BOOLEAN *)__tmp__EYQD);
+      result__K23F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__N23F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__RR3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__N23F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__RR3F=NULL;
+          __tmp__N23F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__RR3F=NULL;
+          __tmp__N23F=NULL;
         } break;
         }
       };
-      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;
+      s__L23F=__tmp__N23F;
+      if (((void *)__tmp__N23F != (void *)NULL)) {
+        b__SREH=(Self__H23F->value__FCQD != __tmp__N23F->value__FCQD);
+        result__RREH=NULL;
+        if (b__SREH) {
+          result__RREH=true__OOLF;
         } else {
-          result__BGEH=LIP_BOOLEAN__;
+          result__RREH=LIP_BOOLEAN__;
         };
-        result__OR3F=result__BGEH;
+        result__K23F=result__RREH;
       };
-      __tmp__W0QD=result__OR3F;
+      __tmp__EZQD=result__K23F;
     } break;
     case __LIP_INTEGER__: {
-      Self__1R3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__4R3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__BS3F=NULL;
+      Self__X23F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__023F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__323F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__BS3F=NULL;
+          __tmp__323F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__BS3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__323F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__BS3F=NULL;
+          __tmp__323F=NULL;
         } break;
         }
       };
-      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;
+      s__123F=__tmp__323F;
+      if (((void *)__tmp__323F != (void *)NULL)) {
+        free__RY3F(__tmp__323F);
+        free__RY3F(Self__X23F);
+        b__UREH=(Self__X23F->value__ZD4F != __tmp__323F->value__ZD4F);
+        result__TREH=NULL;
+        if (b__UREH) {
+          result__TREH=true__OOLF;
         } else {
-          result__DGEH=LIP_BOOLEAN__;
+          result__TREH=LIP_BOOLEAN__;
         };
-        result__4R3F=result__DGEH;
+        result__023F=result__TREH;
       };
-      __tmp__W0QD=result__4R3F;
+      __tmp__EZQD=result__023F;
     } break;
     case __LIP_STRING__: {
-      Self__YTHG=((__LIP_STRING *)__tmp__WZQD);
-      result__1THG=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__4THG=NULL;
+      Self__Z4HG=((__LIP_STRING *)__tmp__EYQD);
+      result__24HG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__54HG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__4THG=NULL;
+          __tmp__54HG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__4THG=NULL;
+          __tmp__54HG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__4THG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__54HG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      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;
+      s__34HG=__tmp__54HG;
+      if (((void *)__tmp__54HG != (void *)NULL)) {
+        free__52HG(__tmp__54HG);
+        free__52HG(Self__Z4HG);
+        b__WREH=((void *)Self__Z4HG->value__RLUE != (void *)__tmp__54HG->value__RLUE);
+        result__VREH=NULL;
+        if (b__WREH) {
+          result__VREH=true__OOLF;
         } else {
-          result__FGEH=LIP_BOOLEAN__;
+          result__VREH=LIP_BOOLEAN__;
         };
-        result__1THG=result__FGEH;
+        result__24HG=result__VREH;
       };
-      __tmp__W0QD=result__1THG;
+      __tmp__EZQD=result__24HG;
     } break;
     };
-    result__RZQD=__tmp__W0QD;
+    result__5XQD=__tmp__EZQD;
   };
-  if ((Self__SRVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__TS3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__P33F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TS3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__P33F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TS3F=NULL;
+          __tmp__P33F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__TS3F=NULL;
+          __tmp__P33F=NULL;
         } break;
         }
       };
-      s__RS3F=__tmp__TS3F;
-      __tmp__30QD=NULL;
+      s__N33F=__tmp__P33F;
+      __tmp__LZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__3S3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__AT3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__DT3F=NULL;
+      Self__Z33F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__233F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__533F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__DT3F=NULL;
+          __tmp__533F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__DT3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__533F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__DT3F=NULL;
+          __tmp__533F=NULL;
         } break;
         }
       };
-      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;
+      s__333F=__tmp__533F;
+      if (((void *)__tmp__533F != (void *)NULL)) {
+        free__RY3F(__tmp__533F);
+        free__RY3F(Self__Z33F);
+        b__YREH=(Self__Z33F->value__ZD4F > __tmp__533F->value__ZD4F);
+        result__XREH=NULL;
+        if (b__YREH) {
+          result__XREH=true__OOLF;
         } else {
-          result__HGEH=LIP_BOOLEAN__;
+          result__XREH=LIP_BOOLEAN__;
         };
-        result__AT3F=result__HGEH;
+        result__233F=result__XREH;
       };
-      __tmp__30QD=result__AT3F;
+      __tmp__LZQD=result__233F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__PUHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__Q5HG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__PUHG=NULL;
+          __tmp__Q5HG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__PUHG=NULL;
+          __tmp__Q5HG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__PUHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__Q5HG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__NUHG=__tmp__PUHG;
-      __tmp__30QD=NULL;
+      s__O5HG=__tmp__Q5HG;
+      __tmp__LZQD=NULL;
     } break;
     };
-    result__RZQD=__tmp__30QD;
+    result__5XQD=__tmp__LZQD;
   };
-  if ((Self__SRVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__VT3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__R43F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__VT3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__R43F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__VT3F=NULL;
+          __tmp__R43F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__VT3F=NULL;
+          __tmp__R43F=NULL;
         } break;
         }
       };
-      s__TT3F=__tmp__VT3F;
-      __tmp__E1QD=NULL;
+      s__P43F=__tmp__R43F;
+      __tmp__SZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__5T3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__CU3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__FU3F=NULL;
+      Self__143F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__443F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__B53F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FU3F=NULL;
+          __tmp__B53F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FU3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__B53F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__FU3F=NULL;
+          __tmp__B53F=NULL;
         } break;
         }
       };
-      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;
+      s__543F=__tmp__B53F;
+      if (((void *)__tmp__B53F != (void *)NULL)) {
+        free__RY3F(__tmp__B53F);
+        free__RY3F(Self__143F);
+        b__0REH=(Self__143F->value__ZD4F < __tmp__B53F->value__ZD4F);
+        result__ZREH=NULL;
+        if (b__0REH) {
+          result__ZREH=true__OOLF;
         } else {
-          result__JGEH=LIP_BOOLEAN__;
+          result__ZREH=LIP_BOOLEAN__;
         };
-        result__CU3F=result__JGEH;
+        result__443F=result__ZREH;
       };
-      __tmp__E1QD=result__CU3F;
+      __tmp__SZQD=result__443F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__AVHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__BAIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__AVHG=NULL;
+          __tmp__BAIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__AVHG=NULL;
+          __tmp__BAIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__AVHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__BAIG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__4UHG=__tmp__AVHG;
-      __tmp__E1QD=NULL;
+      s__55HG=__tmp__BAIG;
+      __tmp__SZQD=NULL;
     } break;
     };
-    result__RZQD=__tmp__E1QD;
+    result__5XQD=__tmp__SZQD;
   };
-  if ((Self__SRVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__XU3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__T53F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XU3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__T53F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XU3F=NULL;
+          __tmp__T53F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__XU3F=NULL;
+          __tmp__T53F=NULL;
         } break;
         }
       };
-      s__VU3F=__tmp__XU3F;
-      __tmp__L1QD=NULL;
+      s__R53F=__tmp__T53F;
+      __tmp__ZZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__BV3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__EV3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__HV3F=NULL;
+      Self__353F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__AA4F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__DA4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HV3F=NULL;
+          __tmp__DA4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HV3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__DA4F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__HV3F=NULL;
+          __tmp__DA4F=NULL;
         } break;
         }
       };
-      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;
+      s__BA4F=__tmp__DA4F;
+      if (((void *)__tmp__DA4F != (void *)NULL)) {
+        free__RY3F(__tmp__DA4F);
+        free__RY3F(Self__353F);
+        b__2REH=(Self__353F->value__ZD4F >= __tmp__DA4F->value__ZD4F);
+        result__1REH=NULL;
+        if (b__2REH) {
+          result__1REH=true__OOLF;
         } else {
-          result__LGEH=LIP_BOOLEAN__;
+          result__1REH=LIP_BOOLEAN__;
         };
-        result__EV3F=result__LGEH;
+        result__AA4F=result__1REH;
       };
-      __tmp__L1QD=result__EV3F;
+      __tmp__ZZQD=result__AA4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__RVHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__SAIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__RVHG=NULL;
+          __tmp__SAIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__RVHG=NULL;
+          __tmp__SAIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__RVHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__SAIG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__PVHG=__tmp__RVHG;
-      __tmp__L1QD=NULL;
+      s__QAIG=__tmp__SAIG;
+      __tmp__ZZQD=NULL;
     } break;
     };
-    result__RZQD=__tmp__L1QD;
+    result__5XQD=__tmp__ZZQD;
   };
-  if ((Self__SRVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__ZV3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__VA4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZV3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__VA4F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZV3F=NULL;
+          __tmp__VA4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ZV3F=NULL;
+          __tmp__VA4F=NULL;
         } break;
         }
       };
-      s__XV3F=__tmp__ZV3F;
-      __tmp__S1QD=NULL;
+      s__TA4F=__tmp__VA4F;
+      __tmp__A0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__DW3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__GW3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__JW3F=NULL;
+      Self__5A4F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__CB4F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__FB4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JW3F=NULL;
+          __tmp__FB4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JW3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__FB4F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__JW3F=NULL;
+          __tmp__FB4F=NULL;
         } break;
         }
       };
-      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;
+      s__DB4F=__tmp__FB4F;
+      if (((void *)__tmp__FB4F != (void *)NULL)) {
+        free__RY3F(__tmp__FB4F);
+        free__RY3F(Self__5A4F);
+        b__4REH=(Self__5A4F->value__ZD4F <= __tmp__FB4F->value__ZD4F);
+        result__3REH=NULL;
+        if (b__4REH) {
+          result__3REH=true__OOLF;
         } else {
-          result__NGEH=LIP_BOOLEAN__;
+          result__3REH=LIP_BOOLEAN__;
         };
-        result__GW3F=result__NGEH;
+        result__CB4F=result__3REH;
       };
-      __tmp__S1QD=result__GW3F;
+      __tmp__A0QD=result__CB4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__CWHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__DBIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__CWHG=NULL;
+          __tmp__DBIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__CWHG=NULL;
+          __tmp__DBIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__CWHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__DBIG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__AWHG=__tmp__CWHG;
-      __tmp__S1QD=NULL;
+      s__BBIG=__tmp__DBIG;
+      __tmp__A0QD=NULL;
     } break;
     };
-    result__RZQD=__tmp__S1QD;
+    result__5XQD=__tmp__A0QD;
   };
-  if ((Self__SRVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__1W3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__XB4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__1W3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__XB4F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__1W3F=NULL;
+          __tmp__XB4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__1W3F=NULL;
+          __tmp__XB4F=NULL;
         } break;
         }
       };
-      s__ZW3F=__tmp__1W3F;
-      __tmp__Z1QD=NULL;
+      s__VB4F=__tmp__XB4F;
+      __tmp__H0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__FX3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__IX3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__LX3F=NULL;
+      Self__BC4F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__EC4F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__HC4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__LX3F=NULL;
+          __tmp__HC4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__LX3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__HC4F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__LX3F=NULL;
+          __tmp__HC4F=NULL;
         } break;
         }
       };
-      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;
+      s__FC4F=__tmp__HC4F;
+      if (((void *)__tmp__HC4F != (void *)NULL)) {
+        Self__BC4F->value__ZD4F=(__INTEGER)(Self__BC4F->value__ZD4F + __tmp__HC4F->value__ZD4F);
+        free__RY3F(__tmp__HC4F);
+        result__EC4F=Self__BC4F;
       };
-      __tmp__Z1QD=result__IX3F;
+      __tmp__H0QD=result__EC4F;
     } break;
     case __LIP_STRING__: {
-      Self__NWHG=((__LIP_STRING *)__tmp__WZQD);
-      result__QWHG=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__TWHG=NULL;
+      Self__OBIG=((__LIP_STRING *)__tmp__EYQD);
+      result__RBIG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__UBIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__TWHG=NULL;
+          __tmp__UBIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__TWHG=NULL;
+          __tmp__UBIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__TWHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__UBIG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      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;
+      s__SBIG=__tmp__UBIG;
+      if (((void *)__tmp__UBIG != (void *)NULL)) {
+        copy__U4R(string_tmp__VH,Self__OBIG->value__RLUE);
+        append__2JS(string_tmp__VH,__tmp__UBIG->value__RLUE);
+        Self__OBIG->value__RLUE=get__YWB(string_tmp__VH);
+        free__52HG(__tmp__UBIG);
+        result__RBIG=Self__OBIG;
       };
-      __tmp__Z1QD=result__QWHG;
+      __tmp__H0QD=result__RBIG;
     } break;
     };
-    result__RZQD=__tmp__Z1QD;
+    result__5XQD=__tmp__H0QD;
   };
-  if ((Self__SRVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__WZQD)->__id) {
+  if ((Self__5RVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__3X3F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__ZC4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__3X3F=((__LIP_BOOLEAN *)__tmp__ZZQD);
+          __tmp__ZC4F=((__LIP_BOOLEAN *)__tmp__HYQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__3X3F=NULL;
+          __tmp__ZC4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__3X3F=NULL;
+          __tmp__ZC4F=NULL;
         } break;
         }
       };
-      s__1X3F=__tmp__3X3F;
-      __tmp__A2QD=NULL;
+      s__XC4F=__tmp__ZC4F;
+      __tmp__O0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__HY3F=((__LIP_INTEGER *)__tmp__WZQD);
-      result__KY3F=NULL;
-      if (__tmp__ZZQD==NULL) {
-        __tmp__NY3F=NULL;
+      Self__DD4F=((__LIP_INTEGER *)__tmp__EYQD);
+      result__GD4F=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__JD4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__NY3F=NULL;
+          __tmp__JD4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__NY3F=((__LIP_INTEGER *)__tmp__ZZQD);
+          __tmp__JD4F=((__LIP_INTEGER *)__tmp__HYQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__NY3F=NULL;
+          __tmp__JD4F=NULL;
         } break;
         }
       };
-      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;
+      s__HD4F=__tmp__JD4F;
+      if (((void *)__tmp__JD4F != (void *)NULL)) {
+        Self__DD4F->value__ZD4F=(__INTEGER)(Self__DD4F->value__ZD4F - __tmp__JD4F->value__ZD4F);
+        free__RY3F(__tmp__JD4F);
+        result__GD4F=Self__DD4F;
       };
-      __tmp__A2QD=result__KY3F;
+      __tmp__O0QD=result__GD4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__ZZQD==NULL) {
-        __tmp__EXHG=NULL;
+      if (__tmp__HYQD==NULL) {
+        __tmp__FCIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZZQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__EXHG=NULL;
+          __tmp__FCIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__EXHG=NULL;
+          __tmp__FCIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__EXHG=((__LIP_STRING *)__tmp__ZZQD);
+          __tmp__FCIG=((__LIP_STRING *)__tmp__HYQD);
         } break;
         }
       };
-      s__CXHG=__tmp__EXHG;
-      __tmp__A2QD=NULL;
+      s__DCIG=__tmp__FCIG;
+      __tmp__O0QD=NULL;
     } break;
     };
-    result__RZQD=__tmp__A2QD;
+    result__5XQD=__tmp__O0QD;
   };
-  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)) {
+  if (((void *)result__5XQD == (void *)NULL)) {
+    __tmp__X0QD=Self__3XQD->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_279));
+    put_position__CMG(__tmp__X0QD);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__RZQD);
+  return(result__5XQD);
 }
 
-static void* run_expr__N2QD(__LIP_UNARY *Self__O2QD)
+static void* run_expr__10QD(__LIP_UNARY *Self__20QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__A1QD;
+  void *__tmp__B1QD,*__tmp__X3JH,*__tmp__Y3JH,*result__40QD,*__tmp__J1QD;
+  void *__tmp__Q1QD;
+  __LIP_INTEGER *Self__Z3JH,*Self__XD4F,*Self__EE4F;
+  __LIP_STRING *Self__03JH;
+  void *result__JOLF;
+  __POSITION __tmp__Z1QD;
+  __CHARACTER Self__PUVD;
+  __BOOLEAN b__HOLF;
+  __tmp__A1QD=Self__20QD->value__50QD;
+  switch (((struct ___OBJ *)__tmp__A1QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__T2QD=run_expr__OZQD(__tmp__S2QD);
+    __tmp__B1QD=run_expr__2XQD(__tmp__A1QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__T2QD=run_expr__N2QD(__tmp__S2QD);
+    __tmp__B1QD=run_expr__10QD(__tmp__A1QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__T2QD=run_expr__IGUE(__tmp__S2QD);
+    __tmp__B1QD=run_expr__DQUE(__tmp__A1QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__ITJH=((__LIP_VALUE *)__tmp__S2QD)->value__IKUE;
-    switch (((struct ___OBJ *)__tmp__ITJH)->__id) {
+    __tmp__X3JH=((__LIP_VALUE *)__tmp__A1QD)->value__DUUE;
+    switch (((struct ___OBJ *)__tmp__X3JH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__JTJH=((__LIP_BOOLEAN *)__tmp__ITJH);
+      __tmp__Y3JH=((__LIP_BOOLEAN *)__tmp__X3JH);
     } break;
     case __LIP_INTEGER__: {
-      Self__KTJH=((__LIP_INTEGER *)__tmp__ITJH);
-      __tmp__JTJH=get__KJSE(Self__KTJH,Self__KTJH->value__3Y3F);
+      Self__Z3JH=((__LIP_INTEGER *)__tmp__X3JH);
+      __tmp__Y3JH=get__LRSE(Self__Z3JH,Self__Z3JH->value__ZD4F);
     } break;
     case __LIP_STRING__: {
-      Self__LTJH=((__LIP_STRING *)__tmp__ITJH);
-      __tmp__JTJH=get__TMFF(Self__LTJH,Self__LTJH->value__WBUE);
+      Self__03JH=((__LIP_STRING *)__tmp__X3JH);
+      __tmp__Y3JH=get__PVFF(Self__03JH,Self__03JH->value__RLUE);
     } break;
     };
-    __tmp__T2QD=__tmp__JTJH;
+    __tmp__B1QD=__tmp__Y3JH;
   } break;
   };
-  result__Q2QD=__tmp__T2QD;
-  Self__CUVD=Self__O2QD->operator__U2QD;
-  if ((Self__CUVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__T2QD)->__id) {
+  result__40QD=__tmp__B1QD;
+  Self__PUVD=Self__20QD->operator__C1QD;
+  if ((Self__PUVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__B1QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__12QD=NULL;
+      __tmp__J1QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__1Y3F=((__LIP_INTEGER *)__tmp__T2QD);
-      Self__1Y3F->value__3Y3F=(__INTEGER)(- Self__1Y3F->value__3Y3F);
-      __tmp__12QD=Self__1Y3F;
+      Self__XD4F=((__LIP_INTEGER *)__tmp__B1QD);
+      Self__XD4F->value__ZD4F=(__INTEGER)(- Self__XD4F->value__ZD4F);
+      __tmp__J1QD=Self__XD4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__12QD=NULL;
+      __tmp__J1QD=NULL;
     } break;
     };
-    result__Q2QD=__tmp__12QD;
+    result__40QD=__tmp__J1QD;
   };
-  if ((Self__CUVD == '!')) {
-    switch (((struct ___OBJ *)result__Q2QD)->__id) {
+  if ((Self__PUVD == '!')) {
+    switch (((struct ___OBJ *)result__40QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__LELF=(! ((__LIP_BOOLEAN *)result__Q2QD)->value__XDQD);
-      result__NELF=NULL;
-      if (b__LELF) {
-        result__NELF=true__SELF;
+      b__HOLF=(! ((__LIP_BOOLEAN *)result__40QD)->value__FCQD);
+      result__JOLF=NULL;
+      if (b__HOLF) {
+        result__JOLF=true__OOLF;
       } else {
-        result__NELF=LIP_BOOLEAN__;
+        result__JOLF=LIP_BOOLEAN__;
       };
-      __tmp__C3QD=result__NELF;
+      __tmp__Q1QD=result__JOLF;
     } break;
     case __LIP_INTEGER__: {
-      Self__IZ3F=((__LIP_INTEGER *)result__Q2QD);
-      Self__IZ3F->value__3Y3F=(__INTEGER)(~ Self__IZ3F->value__3Y3F);
-      __tmp__C3QD=Self__IZ3F;
+      Self__EE4F=((__LIP_INTEGER *)result__40QD);
+      Self__EE4F->value__ZD4F=(__INTEGER)(~ Self__EE4F->value__ZD4F);
+      __tmp__Q1QD=Self__EE4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__C3QD=NULL;
+      __tmp__Q1QD=NULL;
     } break;
     };
-    result__Q2QD=__tmp__C3QD;
+    result__40QD=__tmp__Q1QD;
   };
-  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)) {
+  if (((void *)result__40QD == (void *)NULL)) {
+    __tmp__Z1QD=Self__20QD->parent_lip_code__AY4B.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 1,(&__string_279));
+    put_position__CMG(__tmp__Z1QD);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__Q2QD);
+  return(result__40QD);
 }
 
-static void* run_expr__IGUE(__LIP_CALL *Self__JGUE)
+static void* run_expr__DQUE(__LIP_CALL *Self__EQUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *str__HQUE,*__tmp__3QUE;
+  void *val__IQUE,*result__JQUE,*__tmp__SQUE,*__tmp__EUUE,*__tmp__FUUE;
+  void *__tmp__RQUE;
+  __LIP_INTEGER *Self__EH4F;
+  __LIP_STRING *Self__VDIG;
+  __POSITION pos__B31G,pos__KUKF;
+  __STRING *Self__STGH;
+  __INTEGER state__41WF,Self__COGG;
+  __BOOLEAN __tmp__ORUE,__tmp__ASUE,result__XPXE,sign__51WF,__tmp__R3WF;
+  __BOOLEAN result__5REH,__tmp__43WF,result__J1PG,__tmp__R4WF;
+  __BOOLEAN result__DSEH,result__HSEH,result__LSEH,result__MSEH;
+  __CHARACTER Self__GTBH,Self__ASEH,Self__HTBH,Self__ESEH,Self__ISEH;
+  __CHARACTER mem__V1LF;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__KXPF;
+  str__HQUE=NULL;
+  val__IQUE=NULL;
+  result__JQUE=NULL;
+  if (((void *)Self__EQUE->argument__ZJUE != (void *)NULL)) {
+    __tmp__RQUE=Self__EQUE->argument__ZJUE;
+    switch (((struct ___OBJ *)__tmp__RQUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__XGUE=run_expr__OZQD(__tmp__WGUE);
+      __tmp__SQUE=run_expr__2XQD(__tmp__RQUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__XGUE=run_expr__N2QD(__tmp__WGUE);
+      __tmp__SQUE=run_expr__10QD(__tmp__RQUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__XGUE=run_expr__IGUE(__tmp__WGUE);
+      __tmp__SQUE=run_expr__DQUE(__tmp__RQUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__JKUE=((__LIP_VALUE *)__tmp__WGUE)->value__IKUE;
-      switch (((struct ___OBJ *)__tmp__JKUE)->__id) {
+      __tmp__EUUE=((__LIP_VALUE *)__tmp__RQUE)->value__DUUE;
+      switch (((struct ___OBJ *)__tmp__EUUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__KKUE=((__LIP_BOOLEAN *)__tmp__JKUE);
+        __tmp__FUUE=((__LIP_BOOLEAN *)__tmp__EUUE);
       } break;
       case __LIP_INTEGER__: {
-        Self__H23F=((__LIP_INTEGER *)__tmp__JKUE);
-        __tmp__KKUE=get__KJSE(Self__H23F,Self__H23F->value__3Y3F);
+        Self__EH4F=((__LIP_INTEGER *)__tmp__EUUE);
+        __tmp__FUUE=get__LRSE(Self__EH4F,Self__EH4F->value__ZD4F);
       } break;
       case __LIP_STRING__: {
-        Self__YYHG=((__LIP_STRING *)__tmp__JKUE);
-        __tmp__KKUE=get__TMFF(Self__YYHG,Self__YYHG->value__WBUE);
+        Self__VDIG=((__LIP_STRING *)__tmp__EUUE);
+        __tmp__FUUE=get__PVFF(Self__VDIG,Self__VDIG->value__RLUE);
       } break;
       };
-      __tmp__XGUE=__tmp__KKUE;
+      __tmp__SQUE=__tmp__FUUE;
     } break;
     };
-    val__NGUE=__tmp__XGUE;
+    val__IQUE=__tmp__SQUE;
   };
-  if (((void *)Self__JGUE->name__JAUE == (void *)(&__string_93))) {
-    if (val__NGUE==NULL) {
-      __tmp__CHUE=NULL;
+  if (((void *)Self__EQUE->name__EKUE == (void *)(&__string_93))) {
+    if (val__IQUE==NULL) {
+      __tmp__3QUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__NGUE)->__id) {
+      switch (((struct ___OBJ *)val__IQUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__CHUE=NULL;
+        __tmp__3QUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__CHUE=NULL;
+        __tmp__3QUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__CHUE=((void *)val__NGUE);
+        __tmp__3QUE=((void *)val__IQUE);
       } break;
       }
     };
-    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)) {
+    str__HQUE=__tmp__3QUE;
+    if (((void *)__tmp__3QUE == (void *)NULL)) {
+      pos__B31G=Self__EQUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+      put_error__text__YKG( 1,(&__string_312));
+      put_position__CMG(pos__B31G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    ((__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';
+    ((__STRING *)string_tmp__VH)->count__EGC= 0;
+    append_in__ZDIG(__tmp__3QUE,string_tmp__VH);
+    Self__STGH=((__STRING *)string_tmp__VH);
+    if ((Self__STGH->capacity__T3R > Self__STGH->count__EGC)) {
+      ((__CHARACTER *)Self__STGH->storage__23R)[Self__STGH->count__EGC]='\0';
     } else {
-      add_last__BMT(Self__5HGH,'\0');
-      Self__5HGH->count__4FC=(__INTEGER)(Self__5HGH->count__4FC -  1);
+      add_last__UHT(Self__STGH,'\0');
+      Self__STGH->count__EGC=(__INTEGER)(Self__STGH->count__EGC -  1);
     };
-    result__OGUE=get__KJSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__5HGH->storage__JCS)))))));
-    __tmp__THUE=TRUE__;
+    result__JQUE=get__LRSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__STGH->storage__23R)))))));
+    __tmp__ORUE=TRUE__;
   } else {
-    __tmp__THUE=FALSE__;
+    __tmp__ORUE=FALSE__;
   };
-  if (__tmp__THUE) {
-    __tmp__FIUE=TRUE__;
+  if (__tmp__ORUE) {
+    __tmp__ASUE=TRUE__;
   } else {
-    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__;
+    result__XPXE=((void *)Self__EQUE->name__EKUE == (void *)(&__string_106));
+    if (result__XPXE) {
+      state__41WF= 0;
+      sign__51WF=FALSE__;
+      while ((state__41WF <=  2)) {
+        if (push_back_flag__JPMF) {
+          push_back_flag__JPMF=FALSE__;
         } else {
-          memory__NRLF=((__CHARACTER )(fgetc(stdin)));
+          memory__31LF=((__CHARACTER )(fgetc(stdin)));
         };
-        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__;
+        if ((state__41WF ==  0)) {
+          Self__GTBH=memory__31LF;
+          if ((((((((Self__GTBH == ' ') || (Self__GTBH == '\t')) || (Self__GTBH == '\n')) || (Self__GTBH == '\r')) || (Self__GTBH == '\0')) || (Self__GTBH == '\f')) || (Self__GTBH == '\v'))) {
+            __tmp__R3WF=TRUE__;
           } else {
-            Self__QGEH=memory__NRLF;
-            result__PGEH=FALSE__;
-            if ((((__INTEGER_8 )Self__QGEH) >= ((__INTEGER_8 )'0'))) {
-              result__PGEH=(((__INTEGER_8 )Self__QGEH) <= ((__INTEGER_8 )'9'));
+            Self__ASEH=memory__31LF;
+            result__5REH=FALSE__;
+            if ((((__INTEGER_8 )Self__ASEH) >= ((__INTEGER_8 )'0'))) {
+              result__5REH=(((__INTEGER_8 )Self__ASEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__PGEH) {
-              last_integer__AIUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48);
-              state__CRWF= 2;
+            if (result__5REH) {
+              last_integer__1RUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48);
+              state__41WF= 2;
             };
-            __tmp__VSWF=result__PGEH;
+            __tmp__R3WF=result__5REH;
           };
-          if (__tmp__VSWF) {
-            __tmp__CTWF=TRUE__;
+          if (__tmp__R3WF) {
+            __tmp__43WF=TRUE__;
           } else {
-            result__WOPG=(memory__NRLF == '-');
-            if (result__WOPG) {
-              sign__DRWF=TRUE__;
-              state__CRWF= 1;
+            result__J1PG=(memory__31LF == '-');
+            if (result__J1PG) {
+              sign__51WF=TRUE__;
+              state__41WF= 1;
             };
-            __tmp__CTWF=result__WOPG;
+            __tmp__43WF=result__J1PG;
           };
-          if ((! __tmp__CTWF)) {
-            if ((memory__NRLF == '+')) {
-              state__CRWF= 1;
+          if ((! __tmp__43WF)) {
+            if ((memory__31LF == '+')) {
+              state__41WF= 1;
             } else {
-              state__CRWF= 4;
+              state__41WF= 4;
             };
           };
-          __tmp__VTWF=TRUE__;
+          __tmp__R4WF=TRUE__;
         } else {
-          __tmp__VTWF=FALSE__;
+          __tmp__R4WF=FALSE__;
         };
-        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 ((! __tmp__R4WF)) {
+          if ((state__41WF ==  1)) {
+            Self__HTBH=memory__31LF;
+            if ((! (((((((Self__HTBH == ' ') || (Self__HTBH == '\t')) || (Self__HTBH == '\n')) || (Self__HTBH == '\r')) || (Self__HTBH == '\0')) || (Self__HTBH == '\f')) || (Self__HTBH == '\v')))) {
+              Self__ESEH=memory__31LF;
+              result__DSEH=FALSE__;
+              if ((((__INTEGER_8 )Self__ESEH) >= ((__INTEGER_8 )'0'))) {
+                result__DSEH=(((__INTEGER_8 )Self__ESEH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__TGEH) {
-                last_integer__AIUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48);
-                state__CRWF= 2;
+              if (result__DSEH) {
+                last_integer__1RUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48);
+                state__41WF= 2;
               } else {
-                state__CRWF= 4;
+                state__41WF= 4;
               };
             };
           } else {
-            Self__YGEH=memory__NRLF;
-            result__XGEH=FALSE__;
-            if ((((__INTEGER_8 )Self__YGEH) >= ((__INTEGER_8 )'0'))) {
-              result__XGEH=(((__INTEGER_8 )Self__YGEH) <= ((__INTEGER_8 )'9'));
+            Self__ISEH=memory__31LF;
+            result__HSEH=FALSE__;
+            if ((((__INTEGER_8 )Self__ISEH) >= ((__INTEGER_8 )'0'))) {
+              result__HSEH=(((__INTEGER_8 )Self__ISEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__XGEH) {
-              last_integer__AIUE=(__INTEGER)((__INTEGER)(last_integer__AIUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__NRLF)) -  48));
+            if (result__HSEH) {
+              last_integer__1RUE=(__INTEGER)((__INTEGER)(last_integer__1RUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48));
             } else {
-              state__CRWF= 3;
+              state__41WF= 3;
             };
           };
         };
-        result__1GEH=FALSE__;
-        if ((! push_back_flag__JEMF)) {
-          result__1GEH=(memory__NRLF == ((__CHARACTER )(EOF)));
+        result__LSEH=FALSE__;
+        if ((! push_back_flag__JPMF)) {
+          result__LSEH=(memory__31LF == ((__CHARACTER )(EOF)));
         };
-        if (result__1GEH) {
-          Self__BDGG=state__CRWF;
-          if (((state__CRWF >=  0) && (state__CRWF <=  1))) {
-            state__CRWF= 4;
+        if (result__LSEH) {
+          Self__COGG=state__41WF;
+          if (((state__41WF >=  0) && (state__41WF <=  1))) {
+            state__41WF= 4;
           };
-          if (((Self__BDGG >=  2) && (Self__BDGG <=  3))) {
-            state__CRWF= 3;
+          if (((Self__COGG >=  2) && (Self__COGG <=  3))) {
+            state__41WF= 3;
           };
         };
       };
-      result__2GEH=FALSE__;
-      if ((! push_back_flag__JEMF)) {
-        result__2GEH=(memory__NRLF == ((__CHARACTER )(EOF)));
+      result__MSEH=FALSE__;
+      if ((! push_back_flag__JPMF)) {
+        result__MSEH=(memory__31LF == ((__CHARACTER )(EOF)));
       };
-      if (result__2GEH) {
-        push_back_flag__JEMF=TRUE__;
+      if (result__MSEH) {
+        push_back_flag__JPMF=TRUE__;
       };
-      if ((state__CRWF ==  4)) {
-        print__4HD((&__string_329));
-        print__4HD((&__string_218));
+      if ((state__41WF ==  4)) {
+        print__DID((&__string_331));
+        print__DID((&__string_220));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__DRWF) {
-        last_integer__AIUE=(__INTEGER)(- last_integer__AIUE);
+      if (sign__51WF) {
+        last_integer__1RUE=(__INTEGER)(- last_integer__1RUE);
       };
-      result__OGUE=get__KJSE(LIP_INTEGER__,last_integer__AIUE);
+      result__JQUE=get__LRSE(LIP_INTEGER__,last_integer__1RUE);
     };
-    __tmp__FIUE=result__OFXE;
+    __tmp__ASUE=result__XPXE;
   };
-  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__;
+  if ((! __tmp__ASUE)) {
+    if (((void *)Self__EQUE->name__EKUE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__NSUE)->count__EGC= 0;
+      mem__V1LF='\0';
+      if (push_back_flag__JPMF) {
+        push_back_flag__JPMF=FALSE__;
       } else {
-        memory__NRLF=((__CHARACTER )(fgetc(stdin)));
+        memory__31LF=((__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)));
+      if (((memory__31LF != '\n') && (memory__31LF != ((__CHARACTER )(EOF))))) {
+        add_last__UHT(((__STRING *)last_string__NSUE),memory__31LF);
+        mem__V1LF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__V1LF == ((__CHARACTER )(EOF))) || (mem__V1LF == '\n')))) {
+          add_last__UHT(((__STRING *)last_string__NSUE),mem__V1LF);
+          mem__V1LF=((__CHARACTER )(fgetc(stdin)));
         };
-        memory__NRLF=mem__FRLF;
+        memory__31LF=mem__V1LF;
       };
-      result__OGUE=get__TMFF(LIP_STRING__,get__QWB(last_string__SIUE));
+      result__JQUE=get__PVFF(LIP_STRING__,get__YWB(last_string__NSUE));
     } else {
-      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)) {
+      if (((void *)fast_reference_at__ETRD(list_data__UMNC,Self__EQUE->name__EKUE) == (void *)NULL)) {
+        Self__KXPF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__DTUE);
+        if (((void *)((void **)Self__KXPF->parent_arrayed_collection__CTUE.storage__G4PF)[Self__KXPF->parent_arrayed_collection__CTUE.upper__UXPF] == (void *)NULL)) {
+          copy__U4R(string_tmp__VH,(&__string_309));
+          append__2JS(string_tmp__VH,Self__EQUE->name__EKUE);
+          append__2JS(string_tmp__VH,(&__string_310));
+          pos__KUKF=Self__EQUE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+          put_error__text__YKG( 1,string_tmp__VH);
+          put_position__CMG(pos__KUKF);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__OGUE=NULL;
+      result__JQUE=NULL;
     };
   };
-  if (((void *)val__NGUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__NGUE)->__id) {
+  if (((void *)val__IQUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__IQUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__VN3F(val__NGUE);
+      free__RY3F(val__IQUE);
     } break;
     case __LIP_STRING__: {
-      free__4RHG(val__NGUE);
+      free__52HG(val__IQUE);
     } break;
     };
   };
-  return(result__OGUE);
+  return(result__JQUE);
 }
 
-static void* get__KJSE(__LIP_INTEGER *Self__LJSE,__INTEGER i__MJSE)
+static void* get__LRSE(__LIP_INTEGER *Self__MRSE,__INTEGER i__NRSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__PRSE;
+  __LIP_INTEGER *result__2PSF;
+  __POINTER ptr__3PSF,ptr_table__23JH,next__13JH,result__33JH;
+  __POINTER ptr_table__B4JH,next__A4JH,result__C4JH;
+  __INTEGER typ_id__CQSF;
+  __UINTEGER_32 sz__5PSF,a__OXGH,new_size__PXGH,t__TXGH,a__SXGH;
+  __UINTEGER_32 new_size__E4JH,lab_type__D4JH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__Q03E,*Self__G13E;
+  result__PRSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__VRSE)->parent_arrayed_collection__URSE.upper__FAXE <  0)) {
+    result__2PSF=NULL;
+    ptr__3PSF=((__POINTER )(NULL));
+    typ_id__CQSF= 0;
+    sz__5PSF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__5PSF ==  0)) {
+      result__2PSF=Self__MRSE;
+    } else {
+      typ_id__CQSF=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5PSF);
+      if ((typ_id__CQSF == (__INTEGER)(-  1))) {
+        a__OXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PSF + a__OXGH) & (__UINTEGER_32)(~ a__OXGH));
+        ptr_table__23JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__13JH=((__POINTER )(NULL));
+        result__33JH=((__POINTER *)ptr_table__23JH)[ 0];
+        if ((result__33JH == (void *)NULL)) {
+          result__33JH=new_lab__QOJ(new_size__PXGH);
+          next__13JH=(void *)((unsigned long)result__33JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXGH)));
+          ((__POINTER *)next__13JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__23JH)[ 0]=next__13JH;
+        } else {
+          next__13JH=((__POINTER *)result__33JH)[ 0];
+          if ((next__13JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__33JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__PXGH <<  1)) <=  4096)) {
+              next__13JH=(void *)((unsigned long)result__33JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PXGH)));
             } else {
-              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)));
+              next__13JH=new_lab__QOJ(new_size__PXGH);
+            };
+            ((__POINTER *)next__13JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__23JH)[ 0]=next__13JH;
+          } else {
+            ((__POINTER *)result__33JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__13JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__33JH=next__13JH;
+          };
+        };
+        ptr__3PSF=result__33JH;
+      } else {
+        t__TXGH=((__UINTEGER_32 )typ_id__CQSF);
+        a__SXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__E4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__5PSF + a__SXGH) & (__UINTEGER_32)(~ a__SXGH));
+        ptr_table__B4JH=((__POINTER )(&(table_type[(t__TXGH)])));
+        lab_type__D4JH=(__UINTEGER_32)(t__TXGH |  1);
+        next__A4JH=((__POINTER )(NULL));
+        result__C4JH=((__POINTER *)ptr_table__B4JH)[ 0];
+        if ((result__C4JH == (void *)NULL)) {
+          result__C4JH=new_lab__QOJ(lab_type__D4JH);
+          next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4JH)));
+          ((__POINTER *)next__A4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
+        } else {
+          next__A4JH=((__POINTER *)result__C4JH)[ 0];
+          if ((next__A4JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C4JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__E4JH <<  1)) <=  4096)) {
+              next__A4JH=(void *)((unsigned long)result__C4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__E4JH)));
             } else {
-              next__RTJH=new_lab__URJ(lab_type__UTJH);
+              next__A4JH=new_lab__QOJ(lab_type__D4JH);
             };
-            ((__POINTER *)next__RTJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__STJH)[ 0]=next__RTJH;
+            ((__POINTER *)next__A4JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
           } else {
-            ((__POINTER *)result__TTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__TTJH=next__RTJH;
+            ((__POINTER *)result__C4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__C4JH=next__A4JH;
           };
         };
-        ptr__BFSF=result__TTJH;
+        ptr__3PSF=result__C4JH;
       };
-      result__AFSF=((__LIP_INTEGER *)ptr__BFSF);
-      *(result__AFSF) = *(Self__LJSE);
+      result__2PSF=((__LIP_INTEGER *)ptr__3PSF);
+      *(result__2PSF) = *(Self__MRSE);
     };
-    result__OJSE=result__AFSF;
+    result__PRSE=result__2PSF;
   } else {
-    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);
+    Self__Q03E=((__FAST_ARRAYoLIP_INTEGERo *)storage__VRSE);
+    result__PRSE=((void **)Self__Q03E->parent_arrayed_collection__URSE.storage__SEXE)[Self__Q03E->parent_arrayed_collection__URSE.upper__FAXE];
+    Self__G13E=((__FAST_ARRAYoLIP_INTEGERo *)storage__VRSE);
+    Self__G13E->parent_arrayed_collection__URSE.upper__FAXE=(__INTEGER)(Self__G13E->parent_arrayed_collection__URSE.upper__FAXE -  1);
   };
-  ((__LIP_INTEGER *)result__OJSE)->value__3Y3F=i__MJSE;
-  return(result__OJSE);
+  ((__LIP_INTEGER *)result__PRSE)->value__ZD4F=i__NRSE;
+  return(result__PRSE);
 }
 
-static void* get__TMFF(__LIP_STRING *Self__UMFF,void *str__VMFF)
+static void* get__PVFF(__LIP_STRING *Self__QVFF,void *str__RVFF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__TVFF;
+  __LIP_STRING *result__VGBG;
+  __POINTER ptr__WGBG,ptr_table__G4JH,next__F4JH,result__H4JH;
+  __POINTER ptr_table__L4JH,next__K4JH,result__M4JH;
+  __INTEGER typ_id__1GBG;
+  __UINTEGER_32 sz__YGBG,a__WXGH,new_size__XXGH,t__1XGH,a__0XGH;
+  __UINTEGER_32 new_size__O4JH,lab_type__N4JH;
+  __FAST_ARRAYoLIP_STRINGo *Self__2DTF,*Self__SETF;
+  result__TVFF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__ZVFF)->parent_arrayed_collection__YVFF.upper__OOPF <  0)) {
+    result__VGBG=NULL;
+    ptr__WGBG=((__POINTER )(NULL));
+    typ_id__1GBG= 0;
+    sz__YGBG=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__YGBG ==  0)) {
+      result__VGBG=Self__QVFF;
+    } else {
+      typ_id__1GBG=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YGBG);
+      if ((typ_id__1GBG == (__INTEGER)(-  1))) {
+        a__WXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGBG + a__WXGH) & (__UINTEGER_32)(~ a__WXGH));
+        ptr_table__G4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__F4JH=((__POINTER )(NULL));
+        result__H4JH=((__POINTER *)ptr_table__G4JH)[ 0];
+        if ((result__H4JH == (void *)NULL)) {
+          result__H4JH=new_lab__QOJ(new_size__XXGH);
+          next__F4JH=(void *)((unsigned long)result__H4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XXGH)));
+          ((__POINTER *)next__F4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__G4JH)[ 0]=next__F4JH;
+        } else {
+          next__F4JH=((__POINTER *)result__H4JH)[ 0];
+          if ((next__F4JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H4JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XXGH <<  1)) <=  4096)) {
+              next__F4JH=(void *)((unsigned long)result__H4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XXGH)));
             } else {
-              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)));
+              next__F4JH=new_lab__QOJ(new_size__XXGH);
+            };
+            ((__POINTER *)next__F4JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__G4JH)[ 0]=next__F4JH;
+          } else {
+            ((__POINTER *)result__H4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__H4JH=next__F4JH;
+          };
+        };
+        ptr__WGBG=result__H4JH;
+      } else {
+        t__1XGH=((__UINTEGER_32 )typ_id__1GBG);
+        a__0XGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__O4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__YGBG + a__0XGH) & (__UINTEGER_32)(~ a__0XGH));
+        ptr_table__L4JH=((__POINTER )(&(table_type[(t__1XGH)])));
+        lab_type__N4JH=(__UINTEGER_32)(t__1XGH |  1);
+        next__K4JH=((__POINTER )(NULL));
+        result__M4JH=((__POINTER *)ptr_table__L4JH)[ 0];
+        if ((result__M4JH == (void *)NULL)) {
+          result__M4JH=new_lab__QOJ(lab_type__N4JH);
+          next__K4JH=(void *)((unsigned long)result__M4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4JH)));
+          ((__POINTER *)next__K4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__L4JH)[ 0]=next__K4JH;
+        } else {
+          next__K4JH=((__POINTER *)result__M4JH)[ 0];
+          if ((next__K4JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M4JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__O4JH <<  1)) <=  4096)) {
+              next__K4JH=(void *)((unsigned long)result__M4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__O4JH)));
             } else {
-              next__1TJH=new_lab__URJ(lab_type__4TJH);
+              next__K4JH=new_lab__QOJ(lab_type__N4JH);
             };
-            ((__POINTER *)next__1TJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2TJH)[ 0]=next__1TJH;
+            ((__POINTER *)next__K4JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__L4JH)[ 0]=next__K4JH;
           } else {
-            ((__POINTER *)result__3TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3TJH=next__1TJH;
+            ((__POINTER *)result__M4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__M4JH=next__K4JH;
           };
         };
-        ptr__V1AG=result__3TJH;
+        ptr__WGBG=result__M4JH;
       };
-      result__U1AG=((__LIP_STRING *)ptr__V1AG);
-      *(result__U1AG) = *(Self__UMFF);
+      result__VGBG=((__LIP_STRING *)ptr__WGBG);
+      *(result__VGBG) = *(Self__QVFF);
     };
-    result__XMFF=result__U1AG;
+    result__TVFF=result__VGBG;
   } else {
-    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);
+    Self__2DTF=((__FAST_ARRAYoLIP_STRINGo *)storage__ZVFF);
+    result__TVFF=((void **)Self__2DTF->parent_arrayed_collection__YVFF.storage__3VPF)[Self__2DTF->parent_arrayed_collection__YVFF.upper__OOPF];
+    Self__SETF=((__FAST_ARRAYoLIP_STRINGo *)storage__ZVFF);
+    Self__SETF->parent_arrayed_collection__YVFF.upper__OOPF=(__INTEGER)(Self__SETF->parent_arrayed_collection__YVFF.upper__OOPF -  1);
   };
-  ((__LIP_STRING *)result__XMFF)->value__WBUE=str__VMFF;
-  return(result__XMFF);
+  ((__LIP_STRING *)result__TVFF)->value__RLUE=str__RVFF;
+  return(result__TVFF);
 }
 
-static void free__VN3F(__LIP_INTEGER *Self__WN3F)
+static void free__RY3F(__LIP_INTEGER *Self__SY3F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__OJ5F,__tmp__SK5F,__tmp__ATGG,Self__33IG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__MJ5F;
+  __BOOLEAN __tmp__2J5F;
+  void **__tmp__RK5F,**new__MSGG;
+  Self__MJ5F=((__FAST_ARRAYoLIP_INTEGERo *)storage__VRSE);
+  new_capacity__OJ5F= 0;
+  if (((__INTEGER)(Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE +  1) <= (__INTEGER)(Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE -  1))) {
+    Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE=(__INTEGER)(Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE +  1);
+    __tmp__2J5F=TRUE__;
   } else {
-    __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;
+    __tmp__2J5F=FALSE__;
+  };
+  if ((! __tmp__2J5F)) {
+    if ((Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE ==  0)) {
+      Self__MJ5F->parent_arrayed_collection__URSE.storage__SEXE=create__1FGF( 2);
+      Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE= 2;
+      Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE= 0;
+    } else {
+      new_capacity__OJ5F=(__INTEGER)(Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE <<  1);
+      __tmp__RK5F=Self__MJ5F->parent_arrayed_collection__URSE.storage__SEXE;
+      __tmp__SK5F=Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE;
+      new__MSGG=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__RK5F)),((__UINTEGER_32 )(__INTEGER)(__tmp__SK5F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OJ5F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__ATGG=(__INTEGER)(new_capacity__OJ5F -  1);
+      Self__33IG=__tmp__SK5F;
+      while ((Self__33IG <= __tmp__ATGG)) {
+        new__MSGG[Self__33IG]=NULL;
+        Self__33IG=(__INTEGER)(Self__33IG +  1);
+      };
+      Self__MJ5F->parent_arrayed_collection__URSE.storage__SEXE=new__MSGG;
+      Self__MJ5F->parent_arrayed_collection__URSE.capacity__HEXE=new_capacity__OJ5F;
+      Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE=(__INTEGER)(Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE +  1);
+    };
+  };
+  ((void **)Self__MJ5F->parent_arrayed_collection__URSE.storage__SEXE)[Self__MJ5F->parent_arrayed_collection__URSE.upper__FAXE]=Self__SY3F;
 }
 
-static void free__4RHG(__LIP_STRING *Self__5RHG)
+static void free__52HG(__LIP_STRING *Self__A3HG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__ZVIG,__tmp__3WIG,__tmp__Q4LG,Self__DKNG;
+  __FAST_ARRAYoLIP_STRINGo *Self__XVIG;
+  __BOOLEAN __tmp__HWIG;
+  void **__tmp__2WIG,**new__23LG;
+  Self__XVIG=((__FAST_ARRAYoLIP_STRINGo *)storage__ZVFF);
+  new_capacity__ZVIG= 0;
+  if (((__INTEGER)(Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF +  1) <= (__INTEGER)(Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF -  1))) {
+    Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF=(__INTEGER)(Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF +  1);
+    __tmp__HWIG=TRUE__;
   } else {
-    __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;
+    __tmp__HWIG=FALSE__;
+  };
+  if ((! __tmp__HWIG)) {
+    if ((Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF ==  0)) {
+      Self__XVIG->parent_arrayed_collection__YVFF.storage__3VPF=create__UFYF( 2);
+      Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF= 2;
+      Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF= 0;
+    } else {
+      new_capacity__ZVIG=(__INTEGER)(Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF <<  1);
+      __tmp__2WIG=Self__XVIG->parent_arrayed_collection__YVFF.storage__3VPF;
+      __tmp__3WIG=Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF;
+      new__23LG=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__2WIG)),((__UINTEGER_32 )(__INTEGER)(__tmp__3WIG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZVIG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__Q4LG=(__INTEGER)(new_capacity__ZVIG -  1);
+      Self__DKNG=__tmp__3WIG;
+      while ((Self__DKNG <= __tmp__Q4LG)) {
+        new__23LG[Self__DKNG]=NULL;
+        Self__DKNG=(__INTEGER)(Self__DKNG +  1);
+      };
+      Self__XVIG->parent_arrayed_collection__YVFF.storage__3VPF=new__23LG;
+      Self__XVIG->parent_arrayed_collection__YVFF.capacity__SVPF=new_capacity__ZVIG;
+      Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF=(__INTEGER)(Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF +  1);
+    };
+  };
+  ((void **)Self__XVIG->parent_arrayed_collection__YVFF.storage__3VPF)[Self__XVIG->parent_arrayed_collection__YVFF.upper__OOPF]=Self__A3HG;
 }
 
-static void load_directory__is_recursive__DOWF(__LIP_CALL *Self__EOWF,void *path__FOWF,__BOOLEAN is_rec__GOWF)
+static void load_directory__is_recursive__5YWF(__LIP_CALL *Self__AZWF,void *path__BZWF,__BOOLEAN is_rec__CZWF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *dir__EZWF,*__tmp__3ZWF;
+  void *entry__DZWF;
+  __FILE_UNIX *Self__UWBH;
+  __INTEGER __tmp__B0WF,Self__WVNG,i1__Q4JH,i2__R4JH;
+  void *__tmp__I0WF,*__tmp__R0WF,*__tmp__I1WF;
+  __STRING_CONSTANT *Self__S4JH;
+  __POSITION __tmp__W1WF;
+  __BOOLEAN __tmp__LZWF,__tmp__VZWF,__tmp__SZWF,__tmp__WZWF;
+  __BOOLEAN result__P4JH,__tmp__U0WF,__tmp__40WF,__tmp__B1WF;
+  dir__EZWF=NULL;
+  if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
-    parent_directory__WED();
+    parent_directory__1ED();
   };
-  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);
+  entry__DZWF=get_entry__0XAC(path__BZWF);
+  if (((void *)entry__DZWF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__LZWF=((void *)((__DIRECTORY_UNIX *)entry__DZWF) != (void *)NULL);
     } else {
-      __tmp__POWF=FALSE__;
+      __tmp__LZWF=FALSE__;
     };
-    __tmp__ZOWF=__tmp__POWF;
+    __tmp__VZWF=__tmp__LZWF;
   } else {
-    __tmp__ZOWF=FALSE__;
+    __tmp__VZWF=FALSE__;
   };
-  if (__tmp__ZOWF) {
-    if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__WOWF=open__BFRD(entry__HOWF);
+  if (__tmp__VZWF) {
+    if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__SZWF=open__PDRD(entry__DZWF);
     } else {
-      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);
+      Self__UWBH=((__FILE_UNIX *)entry__DZWF);
+      Self__UWBH->stream__0HRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__UWBH->parent_entry_unix__05E.parent_entry__FFD.path__BD)->storage__QMO),"r+b")));
+      __tmp__SZWF=(Self__UWBH->stream__0HRD != (void *)NULL);
     };
-    __tmp__0OWF=__tmp__WOWF;
+    __tmp__WZWF=__tmp__SZWF;
   } else {
-    __tmp__0OWF=FALSE__;
+    __tmp__WZWF=FALSE__;
   };
-  if (__tmp__0OWF) {
-    if (entry__HOWF==NULL) {
-      __tmp__BPWF=NULL;
+  if (__tmp__WZWF) {
+    if (entry__DZWF==NULL) {
+      __tmp__3ZWF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__HOWF)->__id) {
+      switch (((struct ___OBJ *)entry__DZWF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__BPWF=((void *)entry__HOWF);
+        __tmp__3ZWF=((void *)entry__DZWF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__BPWF=NULL;
+        __tmp__3ZWF=NULL;
       } break;
       }
     };
-    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;
+    dir__EZWF=__tmp__3ZWF;
+    __tmp__B0WF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__3ZWF)->parent_directory__HFD.list__4DRD)->parent_linked_collection__3DRD.upper__EM3D;
+    Self__WVNG= 1;
+    while ((Self__WVNG <= __tmp__B0WF)) {
+      entry__DZWF=item__YVPE(dir__EZWF,Self__WVNG);
+      if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__I0WF=((__DIRECTORY_UNIX *)entry__DZWF)->parent_entry_unix__GFD.parent_entry__FFD.name__QJT;
       } else {
-        __tmp__MPWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.name__3NT;
+        __tmp__I0WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.name__QJT;
       };
-      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);
+      Self__S4JH=((__STRING_CONSTANT *)__tmp__I0WF);
+      result__P4JH=FALSE__;
+      i1__Q4JH= 0;
+      i2__R4JH= 0;
+      if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__S4JH->count__DD)) {
+        i1__Q4JH=(__INTEGER)((__INTEGER)(Self__S4JH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+        i2__R4JH= 1;
+        while ((! (((i1__Q4JH > Self__S4JH->count__DD) || (i2__R4JH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__S4JH->storage__QMO)[(__INTEGER)(i1__Q4JH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__QMO)[(__INTEGER)(i2__R4JH -  1)])))) {
+          i1__Q4JH=(__INTEGER)(i1__Q4JH +  1);
+          i2__R4JH=(__INTEGER)(i2__R4JH +  1);
         };
-        result__AUJH=(i1__BUJH > Self__DUJH->count__DD);
+        result__P4JH=(i1__Q4JH > Self__S4JH->count__DD);
       };
-      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;
+      if (result__P4JH) {
+        if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__R0WF=((__DIRECTORY_UNIX *)entry__DZWF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
         } else {
-          __tmp__VPWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+          __tmp__R0WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
         };
-        add_last__ZBPD(path_file__TPWF,__tmp__VPWF);
-        __tmp__YPWF=TRUE__;
+        add_last__HAPD(path_file__P0WF,__tmp__R0WF);
+        __tmp__U0WF=TRUE__;
       } else {
-        __tmp__YPWF=FALSE__;
+        __tmp__U0WF=FALSE__;
       };
-      if ((! __tmp__YPWF)) {
-        if (is_rec__GOWF) {
-          if (((struct ___OBJ *)entry__HOWF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__CQWF=((void *)((__DIRECTORY_UNIX *)entry__HOWF) != (void *)NULL);
+      if ((! __tmp__U0WF)) {
+        if (is_rec__CZWF) {
+          if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__40WF=((void *)((__DIRECTORY_UNIX *)entry__DZWF) != (void *)NULL);
           } else {
-            __tmp__CQWF=FALSE__;
+            __tmp__40WF=FALSE__;
           };
-          __tmp__FQWF=__tmp__CQWF;
+          __tmp__B1WF=__tmp__40WF;
         } else {
-          __tmp__FQWF=FALSE__;
+          __tmp__B1WF=FALSE__;
         };
-        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;
+        if (__tmp__B1WF) {
+          if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__I1WF=((__DIRECTORY_UNIX *)entry__DZWF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
           } else {
-            __tmp__MQWF=((__FILE_UNIX *)entry__HOWF)->parent_entry_unix__EDF.parent_entry__AFD.path__BD;
+            __tmp__I1WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
           };
-          load_directory__is_recursive__DOWF(Self__EOWF,__tmp__MQWF,TRUE__);
+          load_directory__is_recursive__5YWF(Self__AZWF,__tmp__I1WF,TRUE__);
         };
       };
-      Self__3MNG=(__INTEGER)(Self__3MNG +  1);
+      Self__WVNG=(__INTEGER)(Self__WVNG +  1);
     };
   } else {
-    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)) {
+    copy__U4R(string_tmp__VH,(&__string_332));
+    append__2JS(string_tmp__VH,path__BZWF);
+    append__2JS(string_tmp__VH,(&__string_293));
+    __tmp__W1WF=Self__AZWF->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ;
+    put_error__text__YKG( 2,string_tmp__VH);
+    put_position__CMG(__tmp__W1WF);
+    put_string__CZF(msg_err__3KG);
+    if ((type_error__2KG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__2YHG(__LIP_STRING *Self__3YHG,void *str__4YHG)
+static void append_in__ZDIG(__LIP_STRING *Self__0DIG,void *str__1DIG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __INTEGER i__2DIG;
+  __CHARACTER car__3DIG;
+  car__3DIG='\0';
+  i__2DIG= 1;
+  while ((i__2DIG <= ((__STRING_CONSTANT *)Self__0DIG->value__RLUE)->count__DD)) {
+    car__3DIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__0DIG->value__RLUE)->storage__QMO)[(__INTEGER)(i__2DIG -  1)];
+    if ((car__3DIG == '\\')) {
+      i__2DIG=(__INTEGER)(i__2DIG +  1);
+      if ((i__2DIG <= ((__STRING_CONSTANT *)Self__0DIG->value__RLUE)->count__DD)) {
+        car__3DIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__0DIG->value__RLUE)->storage__QMO)[(__INTEGER)(i__2DIG -  1)];
+        if ((car__3DIG == 'a')) {
+          add_last__UHT(str__1DIG,'\a');
         };
-        if ((car__AZHG == 'b')) {
-          add_last__BMT(str__4YHG,'\b');
+        if ((car__3DIG == 'b')) {
+          add_last__UHT(str__1DIG,'\b');
         };
-        if ((car__AZHG == 'f')) {
-          add_last__BMT(str__4YHG,'\f');
+        if ((car__3DIG == 'f')) {
+          add_last__UHT(str__1DIG,'\f');
         };
-        if ((car__AZHG == 'n')) {
-          add_last__BMT(str__4YHG,'\n');
+        if ((car__3DIG == 'n')) {
+          add_last__UHT(str__1DIG,'\n');
         };
-        if ((car__AZHG == 'r')) {
-          add_last__BMT(str__4YHG,'\r');
+        if ((car__3DIG == 'r')) {
+          add_last__UHT(str__1DIG,'\r');
         };
-        if ((car__AZHG == 't')) {
-          add_last__BMT(str__4YHG,'\t');
+        if ((car__3DIG == 't')) {
+          add_last__UHT(str__1DIG,'\t');
         };
-        if ((car__AZHG == 'v')) {
-          add_last__BMT(str__4YHG,'\v');
+        if ((car__3DIG == 'v')) {
+          add_last__UHT(str__1DIG,'\v');
         };
-        if ((car__AZHG == '\\')) {
-          add_last__BMT(str__4YHG,'\\');
+        if ((car__3DIG == '\\')) {
+          add_last__UHT(str__1DIG,'\\');
         };
-        if ((car__AZHG == '?')) {
-          add_last__BMT(str__4YHG,'\?');
+        if ((car__3DIG == '?')) {
+          add_last__UHT(str__1DIG,'\?');
         };
-        if ((car__AZHG == '\'')) {
-          add_last__BMT(str__4YHG,'\'');
+        if ((car__3DIG == '\'')) {
+          add_last__UHT(str__1DIG,'\'');
         };
-        if ((car__AZHG == '\"')) {
-          add_last__BMT(str__4YHG,'\"');
+        if ((car__3DIG == '\"')) {
+          add_last__UHT(str__1DIG,'\"');
         };
       } else {
-        add_last__BMT(str__4YHG,car__AZHG);
+        add_last__UHT(str__1DIG,car__3DIG);
       };
     } else {
-      add_last__BMT(str__4YHG,car__AZHG);
+      add_last__UHT(str__1DIG,car__3DIG);
     };
-    i__5YHG=(__INTEGER)(i__5YHG +  1);
+    i__2DIG=(__INTEGER)(i__2DIG +  1);
   };
 }
 
-static void print_positif__C1KG(__INTEGER Self__D1KG)
+static void print_positif__J2KG(__INTEGER Self__K2KG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __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);
+  __INTEGER val__T2KG;
+  __CHARACTER char__S2KG;
+  char__S2KG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__K2KG %  10)) + ((__INTEGER_8 )'0')))));
+  val__T2KG=(__INTEGER)(Self__K2KG /  10);
+  if ((val__T2KG !=  0)) {
+    print_positif__J2KG(val__T2KG);
+  };
+  fputc((int)(char__S2KG),stdout);
 }
 
-static __BOOLEAN has__1LMB(__HASHED_SEToSTRING_CONSTANTo *Self__2LMB,void *e__3LMB)
+static __BOOLEAN has__HHMB(__HASHED_SEToSTRING_CONSTANTo *Self__IHMB,void *e__JHMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__JAIH;
+  __INTEGER result__IAIH,__tmp__KAIH,Self__LAIH;
+  void *node__SHMB;
+  Self__JAIH=((__STRING_CONSTANT *)e__JHMB);
+  result__IAIH= 0;
+  __tmp__KAIH=Self__JAIH->count__DD;
+  Self__LAIH= 1;
+  while ((Self__LAIH <= __tmp__KAIH)) {
+    result__IAIH=(__INTEGER)((__INTEGER)( 5 * result__IAIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JAIH->storage__QMO)[(__INTEGER)(Self__LAIH -  1)])));
+    Self__LAIH=(__INTEGER)(Self__LAIH +  1);
+  };
+  if ((result__IAIH <  0)) {
+    result__IAIH=(__INTEGER)(~ result__IAIH);
+  };
+  node__SHMB=((void **)Self__IHMB->buckets__CAV)[(__INTEGER)(result__IAIH % Self__IHMB->capacity__FET)];
+  while ((! (((void *)node__SHMB == (void *)NULL) || __infix_equal_equal__R1DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__SHMB)->item__OAV,e__JHMB)))) {
+    node__SHMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__SHMB)->next__ZAV;
+  };
+  return(((void *)node__SHMB != (void *)NULL));
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__YJK(__INTEGER new_count__0JK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__KGK(__INTEGER new_count__MGK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__I0K,ptr_table__V4JH,next__U4JH,result__W4JH;
+  __POINTER ptr_table__04JH,next__Z4JH,result__14JH;
+  __INTEGER typ_id__N0K;
+  __UINTEGER_32 sz__K0K,a__4XGH,new_size__5XGH,t__DYGH,a__CYGH;
+  __UINTEGER_32 new_size__34JH,lab_type__24JH;
+  __FAST_ARRAYoITM_LOCALo *result__H0K,*Self__MIU;
+  result__H0K=NULL;
+  ptr__I0K=((__POINTER )(NULL));
+  typ_id__N0K= 0;
+  sz__K0K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__K0K ==  0)) {
+    result__H0K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    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);
+    typ_id__N0K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__K0K);
+    if ((typ_id__N0K == (__INTEGER)(-  1))) {
+      a__4XGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5XGH=(__UINTEGER_32)((__UINTEGER_32)(sz__K0K + a__4XGH) & (__UINTEGER_32)(~ a__4XGH));
+      ptr_table__V4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5XGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__U4JH=((__POINTER )(NULL));
+      result__W4JH=((__POINTER *)ptr_table__V4JH)[ 0];
+      if ((result__W4JH == (void *)NULL)) {
+        result__W4JH=new_lab__QOJ(new_size__5XGH);
+        next__U4JH=(void *)((unsigned long)result__W4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5XGH)));
+        ((__POINTER *)next__U4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__V4JH)[ 0]=next__U4JH;
+      } else {
+        next__U4JH=((__POINTER *)result__W4JH)[ 0];
+        if ((next__U4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__5XGH <<  1)) <=  4096)) {
+            next__U4JH=(void *)((unsigned long)result__W4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5XGH)));
+          } else {
+            next__U4JH=new_lab__QOJ(new_size__5XGH);
+          };
+          ((__POINTER *)next__U4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__V4JH)[ 0]=next__U4JH;
+        } else {
+          ((__POINTER *)result__W4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__W4JH=next__U4JH;
+        };
+      };
+      ptr__I0K=result__W4JH;
+    } else {
+      t__DYGH=((__UINTEGER_32 )typ_id__N0K);
+      a__CYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__34JH=(__UINTEGER_32)((__UINTEGER_32)(sz__K0K + a__CYGH) & (__UINTEGER_32)(~ a__CYGH));
+      ptr_table__04JH=((__POINTER )(&(table_type[(t__DYGH)])));
+      lab_type__24JH=(__UINTEGER_32)(t__DYGH |  1);
+      next__Z4JH=((__POINTER )(NULL));
+      result__14JH=((__POINTER *)ptr_table__04JH)[ 0];
+      if ((result__14JH == (void *)NULL)) {
+        result__14JH=new_lab__QOJ(lab_type__24JH);
+        next__Z4JH=(void *)((unsigned long)result__14JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34JH)));
+        ((__POINTER *)next__Z4JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__04JH)[ 0]=next__Z4JH;
+      } else {
+        next__Z4JH=((__POINTER *)result__14JH)[ 0];
+        if ((next__Z4JH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__14JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__34JH <<  1)) <=  4096)) {
+            next__Z4JH=(void *)((unsigned long)result__14JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__34JH)));
+          } else {
+            next__Z4JH=new_lab__QOJ(lab_type__24JH);
+          };
+          ((__POINTER *)next__Z4JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__04JH)[ 0]=next__Z4JH;
+        } else {
+          ((__POINTER *)result__14JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__14JH=next__Z4JH;
+        };
+      };
+      ptr__I0K=result__14JH;
+    };
+    result__H0K=((__FAST_ARRAYoITM_LOCALo *)ptr__I0K);
+    *(result__H0K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__MIU=((__FAST_ARRAYoITM_LOCALo *)result__H0K);
+  if ((Self__MIU->parent_arrayed_collection__SYH.capacity__KGU < new_count__MGK)) {
+    Self__MIU->parent_arrayed_collection__SYH.storage__VGU=create__FOQB(new_count__MGK);
+    Self__MIU->parent_arrayed_collection__SYH.capacity__KGU=new_count__MGK;
+  };
+  Self__MIU->parent_arrayed_collection__SYH.upper__LXK=(__INTEGER)(-  1);
+  return(result__H0K);
 }
 
-static void add_last__N2U(__FAST_ARRAYoITM_LOCALo *Self__O2U,void *element__P2U)
+static void add_last__YXU(__FAST_ARRAYoITM_LOCALo *Self__ZXU,void *element__0XU)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__1XU,__tmp__5YU,__tmp__HAEC,Self__DGVD;
+  __BOOLEAN __tmp__JYU;
+  void **__tmp__4YU,**new__T5DC;
+  new_capacity__1XU= 0;
+  if (((__INTEGER)(Self__ZXU->parent_arrayed_collection__SYH.upper__LXK +  1) <= (__INTEGER)(Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU -  1))) {
+    Self__ZXU->parent_arrayed_collection__SYH.upper__LXK=(__INTEGER)(Self__ZXU->parent_arrayed_collection__SYH.upper__LXK +  1);
+    __tmp__JYU=TRUE__;
   } else {
-    __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;
+    __tmp__JYU=FALSE__;
+  };
+  if ((! __tmp__JYU)) {
+    if ((Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU ==  0)) {
+      Self__ZXU->parent_arrayed_collection__SYH.storage__VGU=create__FOQB( 2);
+      Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU= 2;
+      Self__ZXU->parent_arrayed_collection__SYH.upper__LXK= 0;
+    } else {
+      new_capacity__1XU=(__INTEGER)(Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU <<  1);
+      __tmp__4YU=Self__ZXU->parent_arrayed_collection__SYH.storage__VGU;
+      __tmp__5YU=Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU;
+      new__T5DC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__4YU)),((__UINTEGER_32 )(__INTEGER)(__tmp__5YU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__1XU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__HAEC=(__INTEGER)(new_capacity__1XU -  1);
+      Self__DGVD=__tmp__5YU;
+      while ((Self__DGVD <= __tmp__HAEC)) {
+        new__T5DC[Self__DGVD]=NULL;
+        Self__DGVD=(__INTEGER)(Self__DGVD +  1);
+      };
+      Self__ZXU->parent_arrayed_collection__SYH.storage__VGU=new__T5DC;
+      Self__ZXU->parent_arrayed_collection__SYH.capacity__KGU=new_capacity__1XU;
+      Self__ZXU->parent_arrayed_collection__SYH.upper__LXK=(__INTEGER)(Self__ZXU->parent_arrayed_collection__SYH.upper__LXK +  1);
+    };
+  };
+  ((void **)Self__ZXU->parent_arrayed_collection__SYH.storage__VGU)[Self__ZXU->parent_arrayed_collection__SYH.upper__LXK]=element__0XU;
 }
 
-static void free__4JK(void *tmp__AKK)
+static void free__QGK(void *tmp__SGK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__FKU,__tmp__JLU,__tmp__13DC,Self__EEVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__DKU;
+  __BOOLEAN __tmp__TKU;
+  void **__tmp__ILU,**new__H3DC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__SGK)->parent_arrayed_collection__SYH.upper__LXK=(__INTEGER)(-  1);
+  Self__DKU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__ZOI);
+  new_capacity__FKU= 0;
+  if (((__INTEGER)(Self__DKU->parent_arrayed_collection__YOI.upper__EXT +  1) <= (__INTEGER)(Self__DKU->parent_arrayed_collection__YOI.capacity__PEU -  1))) {
+    Self__DKU->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(Self__DKU->parent_arrayed_collection__YOI.upper__EXT +  1);
+    __tmp__TKU=TRUE__;
   } else {
-    __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;
+    __tmp__TKU=FALSE__;
+  };
+  if ((! __tmp__TKU)) {
+    if ((Self__DKU->parent_arrayed_collection__YOI.capacity__PEU ==  0)) {
+      Self__DKU->parent_arrayed_collection__YOI.storage__0EU=create__CEQB( 2);
+      Self__DKU->parent_arrayed_collection__YOI.capacity__PEU= 2;
+      Self__DKU->parent_arrayed_collection__YOI.upper__EXT= 0;
+    } else {
+      new_capacity__FKU=(__INTEGER)(Self__DKU->parent_arrayed_collection__YOI.capacity__PEU <<  1);
+      __tmp__ILU=Self__DKU->parent_arrayed_collection__YOI.storage__0EU;
+      __tmp__JLU=Self__DKU->parent_arrayed_collection__YOI.capacity__PEU;
+      new__H3DC=((void **)realloc_dynamic__old_size__new_size__XCLC(((__POINTER )((void **)__tmp__ILU)),((__UINTEGER_32 )(__INTEGER)(__tmp__JLU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__FKU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__13DC=(__INTEGER)(new_capacity__FKU -  1);
+      Self__EEVD=__tmp__JLU;
+      while ((Self__EEVD <= __tmp__13DC)) {
+        new__H3DC[Self__EEVD]=NULL;
+        Self__EEVD=(__INTEGER)(Self__EEVD +  1);
+      };
+      Self__DKU->parent_arrayed_collection__YOI.storage__0EU=new__H3DC;
+      Self__DKU->parent_arrayed_collection__YOI.capacity__PEU=new_capacity__FKU;
+      Self__DKU->parent_arrayed_collection__YOI.upper__EXT=(__INTEGER)(Self__DKU->parent_arrayed_collection__YOI.upper__EXT +  1);
+    };
+  };
+  ((void **)Self__DKU->parent_arrayed_collection__YOI.storage__0EU)[Self__DKU->parent_arrayed_collection__YOI.upper__EXT]=tmp__SGK;
 }
 
-static void* copy__H4J(void *tmp__J4J)
+static void* copy__Z0J(void *tmp__10J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__BGU,other_upper__AGU,Self__M3JC;
+  void *result__30J;
+  __FAST_ARRAYoITM_LOCALo *Self__4FU;
+  void **__tmp__YGU,**__tmp__0GU,**Self__CRCC;
+  result__30J=create_with_capacity__KGK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__10J)->parent_arrayed_collection__SYH.upper__LXK +  1));
+  Self__4FU=((__FAST_ARRAYoITM_LOCALo *)result__30J);
+  new_capacity__BGU= 0;
+  other_upper__AGU=((__FAST_ARRAYoITM_LOCALo *)tmp__10J)->parent_arrayed_collection__SYH.upper__LXK;
+  if ((other_upper__AGU >=  0)) {
+    new_capacity__BGU=(__INTEGER)(other_upper__AGU +  1);
+    if ((Self__4FU->parent_arrayed_collection__SYH.capacity__KGU < new_capacity__BGU)) {
+      Self__4FU->parent_arrayed_collection__SYH.storage__VGU=create__FOQB(new_capacity__BGU);
+      Self__4FU->parent_arrayed_collection__SYH.capacity__KGU=new_capacity__BGU;
+    };
+    __tmp__YGU=Self__4FU->parent_arrayed_collection__SYH.storage__VGU;
+    __tmp__0GU=((__FAST_ARRAYoITM_LOCALo *)tmp__10J)->parent_arrayed_collection__SYH.storage__VGU;
+    Self__CRCC=((void **)__tmp__YGU);
+    Self__M3JC=other_upper__AGU;
+    while ((Self__M3JC >=  0)) {
+      Self__CRCC[Self__M3JC]=((void **)__tmp__0GU)[Self__M3JC];
+      Self__M3JC=(__INTEGER)(Self__M3JC -  1);
+    };
+  };
+  Self__4FU->parent_arrayed_collection__SYH.upper__LXK=other_upper__AGU;
+  free__QGK(tmp__10J);
+  return(result__30J);
 }
 
-static void** create__PTQB(__INTEGER nb_elements__RTQB)
+static void** create__FQQB(__INTEGER nb_elements__HQQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__UTEH,a__ZTEH,new_size__VTEH,new_size2__WTEH,a__BVGH;
+  __UINTEGER_32 new_size__CVGH;
+  __POINTER result__TTEH,ptr_table__54JH,next__44JH,result__A5JH;
+  void *result__D5JH;
+  __INTEGER Self__A0MC;
+  void **Result__KLTB;
+  sz__UTEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HQQB * ((__INTEGER )(sizeof(void *)))));
+  result__TTEH=((__POINTER )(NULL));
+  a__ZTEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__VTEH=(__UINTEGER_32)((__UINTEGER_32)(sz__UTEH + a__ZTEH) & (__UINTEGER_32)(~ a__ZTEH));
+  new_size2__WTEH=(__UINTEGER_32)(new_size__VTEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__WTEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CVGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__WTEH + a__BVGH) & (__UINTEGER_32)(~ a__BVGH));
+    ptr_table__54JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__44JH=((__POINTER )(NULL));
+    result__A5JH=((__POINTER *)ptr_table__54JH)[ 0];
+    if ((result__A5JH == (void *)NULL)) {
+      result__A5JH=new_lab__QOJ(new_size__CVGH);
+      next__44JH=(void *)((unsigned long)result__A5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVGH)));
+      ((__POINTER *)next__44JH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__54JH)[ 0]=next__44JH;
+    } else {
+      next__44JH=((__POINTER *)result__A5JH)[ 0];
+      if ((next__44JH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A5JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__CVGH <<  1)) <=  4096)) {
+          next__44JH=(void *)((unsigned long)result__A5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVGH)));
+        } else {
+          next__44JH=new_lab__QOJ(new_size__CVGH);
+        };
+        ((__POINTER *)next__44JH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__54JH)[ 0]=next__44JH;
+      } else {
+        ((__POINTER *)result__A5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__A5JH=next__44JH;
+      };
+    };
+    ((__POINTER *)result__A5JH)[ 0]=((__POINTER ) 3);
+    result__TTEH=(void *)((unsigned long)result__A5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__D5JH=first_free__VAVB;
+    while ((((void *)result__D5JH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__D5JH)->map_size_and_id__YTB &  4294967292LU) < new_size__VTEH))) {
+      result__D5JH=((__MEMORY *)result__D5JH)->map_next_free__ZTB;
     };
-    if (((void *)result__UUJH == (void *)NULL)) {
-      result__UUJH=new_page__WA5();
+    if (((void *)result__D5JH == (void *)NULL)) {
+      result__D5JH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__D5JH,new_size__VTEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__D5JH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__TTEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__D5JH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__KLTB=((void **)result__TTEH);
+  Self__A0MC=(__INTEGER)(nb_elements__HQQB -  1);
+  while ((Self__A0MC >=  0)) {
+    Result__KLTB[Self__A0MC]=NULL;
+    Self__A0MC=(__INTEGER)(Self__A0MC -  1);
   };
-  return(Result__UOTB);
+  return(Result__KLTB);
 }
 
-static void* read_send_msg__U4N(__PARSER *Self__V4N,void *first_arg__W4N)
+static void* read_send_msg__H0N(__PARSER *Self__I0N,void *first_arg__J0N)
 // ({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__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)) {
+  void *result__L0N,*arg__P0N,*tmp__JLRB;
+  void *n__N0N,*result__GVGH;
+  __INTEGER p1__Q0N,p2__R0N,old_derive__S0N,sav_derive__T0N;
+  __INTEGER typ_id__PAIH,typ_id__YAIH,typ_id__BBIH,Self__F0YC;
+  __INTEGER typ_id__L4Q;
+  __POSITION pos__1K0G,p__VAIH,p__4AIH,p__HBIH,p__Y0Q;
+  __ITM_READ *result__NAIH;
+  __POINTER ptr__OAIH,ptr_table__H5JH,next__G5JH,result__I5JH;
+  __POINTER ptr_table__M5JH,next__L5JH,result__N5JH,ptr__XAIH;
+  __POINTER ptr_table__R5JH,next__Q5JH,result__S5JH,ptr_table__W5JH;
+  __POINTER next__V5JH,result__X5JH,ptr__ABIH,ptr_table__15JH;
+  __POINTER next__05JH,result__25JH,ptr_table__AAKH,next__55JH;
+  __POINTER result__BAKH,ptr__G4Q,ptr_table__FAKH,next__EAKH;
+  __POINTER result__GAKH,ptr_table__KAKH,next__JAKH,result__LAKH;
+  __UINTEGER_32 sz__QAIH,a__RAIH,new_size__SAIH,t__TAIH,a__UAIH;
+  __UINTEGER_32 new_size__P5JH,lab_type__O5JH,sz__ZAIH,a__0AIH;
+  __UINTEGER_32 new_size__1AIH,t__2AIH,a__3AIH,new_size__Z5JH;
+  __UINTEGER_32 lab_type__Y5JH,sz__CBIH,a__DBIH,new_size__EBIH,t__FBIH;
+  __UINTEGER_32 a__GBIH,new_size__DAKH,lab_type__CAKH,sz__I4Q,a__HWGH;
+  __UINTEGER_32 new_size__IWGH,t__MWGH,a__LWGH,new_size__NAKH;
+  __UINTEGER_32 lab_type__MAKH;
+  __ITM_READ_ARG1 *result__WAIH;
+  __ITM_READ_ARG2 *result__5AIH;
+  __ITM_READ_ARGS *result__F4Q;
+  void *l_arg__O0N,*result__APHH;
+  __FAST_ARRAYoSTRINGo *Self__HVGH,*Self__JVGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__BPHH,*Self__CPHH;
+  __BOOLEAN __tmp__N4N;
+  __FAST_ARRAYoITM_CODEo *Self__Q4V;
+  result__L0N=NULL;
+  n__N0N=NULL;
+  l_arg__O0N=NULL;
+  arg__P0N=NULL;
+  p1__Q0N= 0;
+  p2__R0N= 0;
+  old_derive__S0N= 0;
+  sav_derive__T0N= 0;
+  if (read_identifier__12K()) {
+    p1__Q0N=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+    p2__R0N=position__CCC;
+    old_derive__S0N=short_derive__PCC;
+    result__GVGH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__2JP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__GVGH=create__ZBB( 128);
+    } else {
+      Self__HVGH=((__FAST_ARRAYoSTRINGo *)free__2JP);
+      result__GVGH=((void **)Self__HVGH->parent_arrayed_collection__RKC.storage__SCT)[Self__HVGH->parent_arrayed_collection__RKC.upper__UKC];
+      Self__JVGH=((__FAST_ARRAYoSTRINGo *)free__2JP);
+      Self__JVGH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__JVGH->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__N0N=result__GVGH;
+    copy__U4R(result__GVGH,last_string__V0C);
+    result__APHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H)->parent_arrayed_collection__O1H.upper__DST <  0)) {
+      result__APHH=create_with_capacity__WSI( 16);
+    } else {
+      Self__BPHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      result__APHH=((void **)Self__BPHH->parent_arrayed_collection__O1H.storage__R2T)[Self__BPHH->parent_arrayed_collection__O1H.upper__DST];
+      Self__CPHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__P1H);
+      Self__CPHH->parent_arrayed_collection__O1H.upper__DST=(__INTEGER)(Self__CPHH->parent_arrayed_collection__O1H.upper__DST -  1);
+    };
+    l_arg__O0N=result__APHH;
+    arg__P0N=read_argument__OKP(Self__I0N);
+    if (((void *)arg__P0N != (void *)NULL)) {
+      add_last__H1U(result__APHH,arg__P0N);
+      while (read_identifier__12K()) {
+        short__token__to__YBD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+        append__2JS(n__N0N,(&__string_112));
+        append__2JS(n__N0N,last_string__V0C);
+        arg__P0N=read_argument__OKP(Self__I0N);
+        if (((void *)arg__P0N == (void *)NULL)) {
+          pos__1K0G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_333));
+          put_position__CMG(pos__1K0G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        add_last__H1U(l_arg__O0N,arg__P0N);
+      };
+    };
+    get__YWB(result__GVGH);
+    add_last__TNV(free__2JP,result__GVGH);
+    ((__STRING *)result__GVGH)->count__EGC= 0;
+    if (is_shorter__LZ) {
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__APHH)->parent_arrayed_collection__5QF.upper__MEL <  0)) || ((void *)first_arg__J0N != (void *)NULL)) || (! fast_has__Q5U(short_local__XCC,last_string__V0C)))) {
+        sav_derive__T0N=short_derive__PCC;
+        short_derive__PCC=old_derive__S0N;
+        short__token__to__YBD((&__string_131),p1__Q0N,p2__R0N);
+        short_derive__PCC=(__INTEGER)(sav_derive__T0N + (__INTEGER)(short_derive__PCC - old_derive__S0N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__APHH)->parent_arrayed_collection__5QF.upper__MEL <  0)) {
+      if (((void *)first_arg__J0N == (void *)NULL)) {
+        p__VAIH=current_position__XUF();
+        result__NAIH=NULL;
+        ptr__OAIH=((__POINTER )(NULL));
+        typ_id__PAIH= 0;
+        sz__QAIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__QAIH ==  0)) {
+          result__NAIH=ITM_READ__;
+        } else {
+          typ_id__PAIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QAIH);
+          if ((typ_id__PAIH == (__INTEGER)(-  1))) {
+            a__RAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__SAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__QAIH + a__RAIH) & (__UINTEGER_32)(~ a__RAIH));
+            ptr_table__H5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SAIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__G5JH=((__POINTER )(NULL));
+            result__I5JH=((__POINTER *)ptr_table__H5JH)[ 0];
+            if ((result__I5JH == (void *)NULL)) {
+              result__I5JH=new_lab__QOJ(new_size__SAIH);
+              next__G5JH=(void *)((unsigned long)result__I5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAIH)));
+              ((__POINTER *)next__G5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H5JH)[ 0]=next__G5JH;
             } else {
-              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)));
+              next__G5JH=((__POINTER *)result__I5JH)[ 0];
+              if ((next__G5JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I5JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__SAIH <<  1)) <=  4096)) {
+                  next__G5JH=(void *)((unsigned long)result__I5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SAIH)));
                 } else {
-                  next__XUJH=new_lab__URJ(new_size__PVHH);
+                  next__G5JH=new_lab__QOJ(new_size__SAIH);
                 };
-                ((__POINTER *)next__XUJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YUJH)[ 0]=next__XUJH;
+                ((__POINTER *)next__G5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__H5JH)[ 0]=next__G5JH;
               } else {
-                ((__POINTER *)result__ZUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ZUJH=next__XUJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__I5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__I5JH=next__G5JH;
+              };
+            };
+            ptr__OAIH=result__I5JH;
+          } else {
+            t__TAIH=((__UINTEGER_32 )typ_id__PAIH);
+            a__UAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__P5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__QAIH + a__UAIH) & (__UINTEGER_32)(~ a__UAIH));
+            ptr_table__M5JH=((__POINTER )(&(table_type[(t__TAIH)])));
+            lab_type__O5JH=(__UINTEGER_32)(t__TAIH |  1);
+            next__L5JH=((__POINTER )(NULL));
+            result__N5JH=((__POINTER *)ptr_table__M5JH)[ 0];
+            if ((result__N5JH == (void *)NULL)) {
+              result__N5JH=new_lab__QOJ(lab_type__O5JH);
+              next__L5JH=(void *)((unsigned long)result__N5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5JH)));
+              ((__POINTER *)next__L5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__M5JH)[ 0]=next__L5JH;
             } else {
-              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)));
+              next__L5JH=((__POINTER *)result__N5JH)[ 0];
+              if ((next__L5JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N5JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__P5JH <<  1)) <=  4096)) {
+                  next__L5JH=(void *)((unsigned long)result__N5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5JH)));
                 } else {
-                  next__2UJH=new_lab__URJ(lab_type__5UJH);
+                  next__L5JH=new_lab__QOJ(lab_type__O5JH);
                 };
-                ((__POINTER *)next__2UJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3UJH)[ 0]=next__2UJH;
+                ((__POINTER *)next__L5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__M5JH)[ 0]=next__L5JH;
               } else {
-                ((__POINTER *)result__4UJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__4UJH=next__2UJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__N5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__N5JH=next__L5JH;
+              };
+            };
+            ptr__OAIH=result__N5JH;
+          };
+          result__NAIH=((__ITM_READ *)ptr__OAIH);
+          *(result__NAIH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__NAIH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__VAIH;
+        result__L0N=result__NAIH;
+      } else {
+        p__4AIH=current_position__XUF();
+        result__WAIH=NULL;
+        ptr__XAIH=((__POINTER )(NULL));
+        typ_id__YAIH= 0;
+        sz__ZAIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__ZAIH ==  0)) {
+          result__WAIH=ITM_READ_ARG1__;
+        } else {
+          typ_id__YAIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZAIH);
+          if ((typ_id__YAIH == (__INTEGER)(-  1))) {
+            a__0AIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__1AIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZAIH + a__0AIH) & (__UINTEGER_32)(~ a__0AIH));
+            ptr_table__R5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1AIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__Q5JH=((__POINTER )(NULL));
+            result__S5JH=((__POINTER *)ptr_table__R5JH)[ 0];
+            if ((result__S5JH == (void *)NULL)) {
+              result__S5JH=new_lab__QOJ(new_size__1AIH);
+              next__Q5JH=(void *)((unsigned long)result__S5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1AIH)));
+              ((__POINTER *)next__Q5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
             } else {
-              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)));
+              next__Q5JH=((__POINTER *)result__S5JH)[ 0];
+              if ((next__Q5JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S5JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1AIH <<  1)) <=  4096)) {
+                  next__Q5JH=(void *)((unsigned long)result__S5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1AIH)));
                 } else {
-                  next__BVJH=new_lab__URJ(new_size__YVHH);
+                  next__Q5JH=new_lab__QOJ(new_size__1AIH);
                 };
-                ((__POINTER *)next__BVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CVJH)[ 0]=next__BVJH;
+                ((__POINTER *)next__Q5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
               } else {
-                ((__POINTER *)result__DVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DVJH=next__BVJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__S5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__S5JH=next__Q5JH;
+              };
+            };
+            ptr__XAIH=result__S5JH;
+          } else {
+            t__2AIH=((__UINTEGER_32 )typ_id__YAIH);
+            a__3AIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__Z5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZAIH + a__3AIH) & (__UINTEGER_32)(~ a__3AIH));
+            ptr_table__W5JH=((__POINTER )(&(table_type[(t__2AIH)])));
+            lab_type__Y5JH=(__UINTEGER_32)(t__2AIH |  1);
+            next__V5JH=((__POINTER )(NULL));
+            result__X5JH=((__POINTER *)ptr_table__W5JH)[ 0];
+            if ((result__X5JH == (void *)NULL)) {
+              result__X5JH=new_lab__QOJ(lab_type__Y5JH);
+              next__V5JH=(void *)((unsigned long)result__X5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5JH)));
+              ((__POINTER *)next__V5JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
             } else {
-              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)));
+              next__V5JH=((__POINTER *)result__X5JH)[ 0];
+              if ((next__V5JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X5JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__Z5JH <<  1)) <=  4096)) {
+                  next__V5JH=(void *)((unsigned long)result__X5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5JH)));
                 } else {
-                  next__GVJH=new_lab__URJ(lab_type__JVJH);
+                  next__V5JH=new_lab__QOJ(lab_type__Y5JH);
                 };
-                ((__POINTER *)next__GVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__HVJH)[ 0]=next__GVJH;
+                ((__POINTER *)next__V5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
               } else {
-                ((__POINTER *)result__IVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__IVJH=next__GVJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__X5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__X5JH=next__V5JH;
+              };
+            };
+            ptr__XAIH=result__X5JH;
+          };
+          result__WAIH=((__ITM_READ_ARG1 *)ptr__XAIH);
+          *(result__WAIH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__WAIH)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__4AIH;
+        result__L0N=result__WAIH;
+      };
+      free__2SI(result__APHH);
+      __tmp__N4N=TRUE__;
+    } else {
+      __tmp__N4N=FALSE__;
+    };
+    if ((! __tmp__N4N)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__APHH)->parent_arrayed_collection__5QF.upper__MEL +  1) ==  1)) {
+        p__HBIH=current_position__XUF();
+        result__5AIH=NULL;
+        ptr__ABIH=((__POINTER )(NULL));
+        typ_id__BBIH= 0;
+        sz__CBIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__CBIH ==  0)) {
+          result__5AIH=ITM_READ_ARG2__;
+        } else {
+          typ_id__BBIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CBIH);
+          if ((typ_id__BBIH == (__INTEGER)(-  1))) {
+            a__DBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__EBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CBIH + a__DBIH) & (__UINTEGER_32)(~ a__DBIH));
+            ptr_table__15JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EBIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__05JH=((__POINTER )(NULL));
+            result__25JH=((__POINTER *)ptr_table__15JH)[ 0];
+            if ((result__25JH == (void *)NULL)) {
+              result__25JH=new_lab__QOJ(new_size__EBIH);
+              next__05JH=(void *)((unsigned long)result__25JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EBIH)));
+              ((__POINTER *)next__05JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__15JH)[ 0]=next__05JH;
             } else {
-              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)));
+              next__05JH=((__POINTER *)result__25JH)[ 0];
+              if ((next__05JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__25JH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__EBIH <<  1)) <=  4096)) {
+                  next__05JH=(void *)((unsigned long)result__25JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EBIH)));
                 } else {
-                  next__LVJH=new_lab__URJ(new_size__BWHH);
+                  next__05JH=new_lab__QOJ(new_size__EBIH);
                 };
-                ((__POINTER *)next__LVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__MVJH)[ 0]=next__LVJH;
+                ((__POINTER *)next__05JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__15JH)[ 0]=next__05JH;
               } else {
-                ((__POINTER *)result__NVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__NVJH=next__LVJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__25JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__05JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__25JH=next__05JH;
+              };
+            };
+            ptr__ABIH=result__25JH;
+          } else {
+            t__FBIH=((__UINTEGER_32 )typ_id__BBIH);
+            a__GBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__CBIH + a__GBIH) & (__UINTEGER_32)(~ a__GBIH));
+            ptr_table__AAKH=((__POINTER )(&(table_type[(t__FBIH)])));
+            lab_type__CAKH=(__UINTEGER_32)(t__FBIH |  1);
+            next__55JH=((__POINTER )(NULL));
+            result__BAKH=((__POINTER *)ptr_table__AAKH)[ 0];
+            if ((result__BAKH == (void *)NULL)) {
+              result__BAKH=new_lab__QOJ(lab_type__CAKH);
+              next__55JH=(void *)((unsigned long)result__BAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DAKH)));
+              ((__POINTER *)next__55JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AAKH)[ 0]=next__55JH;
             } else {
-              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)));
+              next__55JH=((__POINTER *)result__BAKH)[ 0];
+              if ((next__55JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BAKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DAKH <<  1)) <=  4096)) {
+                  next__55JH=(void *)((unsigned long)result__BAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DAKH)));
                 } else {
-                  next__QVJH=new_lab__URJ(lab_type__TVJH);
+                  next__55JH=new_lab__QOJ(lab_type__CAKH);
                 };
-                ((__POINTER *)next__QVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RVJH)[ 0]=next__QVJH;
+                ((__POINTER *)next__55JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AAKH)[ 0]=next__55JH;
               } else {
-                ((__POINTER *)result__SVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__SVJH=next__QVJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__BAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__55JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BAKH=next__55JH;
+              };
+            };
+            ptr__ABIH=result__BAKH;
+          };
+          result__5AIH=((__ITM_READ_ARG2 *)ptr__ABIH);
+          *(result__5AIH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__5AIH)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__HBIH;
+        result__L0N=result__5AIH;
+        free__2SI(result__APHH);
+      } else {
+        Self__Q4V=((__FAST_ARRAYoITM_CODEo *)result__APHH);
+        add_last__H1U(Self__Q4V,first_arg__J0N);
+        if ((Self__Q4V->parent_arrayed_collection__5QF.upper__MEL !=  0)) {
+          if ((Self__Q4V->parent_arrayed_collection__5QF.upper__MEL ==  1)) {
+            tmp__JLRB=((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[ 0];
+            ((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[ 0]=((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[ 1];
+            ((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[ 1]=tmp__JLRB;
+          } else {
+            Self__F0YC=(__INTEGER)(Self__Q4V->parent_arrayed_collection__5QF.upper__MEL -  1);
+            while ((Self__F0YC >=  0)) {
+              ((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[(__INTEGER)(Self__F0YC +  1)]=((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[Self__F0YC];
+              ((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[Self__F0YC]=NULL;
+              Self__F0YC=(__INTEGER)(Self__F0YC -  1);
+            };
+            ((void **)Self__Q4V->parent_arrayed_collection__5QF.storage__AUT)[ 0]=first_arg__J0N;
+          };
+        };
+        l_arg__O0N=copy__42H(result__APHH);
+        p__Y0Q=current_position__XUF();
+        result__F4Q=NULL;
+        ptr__G4Q=((__POINTER )(NULL));
+        typ_id__L4Q= 0;
+        sz__I4Q=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__I4Q ==  0)) {
+          result__F4Q=ITM_READ_ARGS__;
+        } else {
+          typ_id__L4Q=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__I4Q);
+          if ((typ_id__L4Q == (__INTEGER)(-  1))) {
+            a__HWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__IWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__I4Q + a__HWGH) & (__UINTEGER_32)(~ a__HWGH));
+            ptr_table__FAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__EAKH=((__POINTER )(NULL));
+            result__GAKH=((__POINTER *)ptr_table__FAKH)[ 0];
+            if ((result__GAKH == (void *)NULL)) {
+              result__GAKH=new_lab__QOJ(new_size__IWGH);
+              next__EAKH=(void *)((unsigned long)result__GAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWGH)));
+              ((__POINTER *)next__EAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FAKH)[ 0]=next__EAKH;
             } else {
-              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)));
+              next__EAKH=((__POINTER *)result__GAKH)[ 0];
+              if ((next__EAKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GAKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IWGH <<  1)) <=  4096)) {
+                  next__EAKH=(void *)((unsigned long)result__GAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWGH)));
                 } else {
-                  next__VVJH=new_lab__URJ(new_size__VKGH);
+                  next__EAKH=new_lab__QOJ(new_size__IWGH);
                 };
-                ((__POINTER *)next__VVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WVJH)[ 0]=next__VVJH;
+                ((__POINTER *)next__EAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FAKH)[ 0]=next__EAKH;
               } else {
-                ((__POINTER *)result__XVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__XVJH=next__VVJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__GAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__GAKH=next__EAKH;
+              };
+            };
+            ptr__G4Q=result__GAKH;
+          } else {
+            t__MWGH=((__UINTEGER_32 )typ_id__L4Q);
+            a__LWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__I4Q + a__LWGH) & (__UINTEGER_32)(~ a__LWGH));
+            ptr_table__KAKH=((__POINTER )(&(table_type[(t__MWGH)])));
+            lab_type__MAKH=(__UINTEGER_32)(t__MWGH |  1);
+            next__JAKH=((__POINTER )(NULL));
+            result__LAKH=((__POINTER *)ptr_table__KAKH)[ 0];
+            if ((result__LAKH == (void *)NULL)) {
+              result__LAKH=new_lab__QOJ(lab_type__MAKH);
+              next__JAKH=(void *)((unsigned long)result__LAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NAKH)));
+              ((__POINTER *)next__JAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KAKH)[ 0]=next__JAKH;
             } else {
-              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)));
+              next__JAKH=((__POINTER *)result__LAKH)[ 0];
+              if ((next__JAKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LAKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NAKH <<  1)) <=  4096)) {
+                  next__JAKH=(void *)((unsigned long)result__LAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NAKH)));
                 } else {
-                  next__0VJH=new_lab__URJ(lab_type__3VJH);
+                  next__JAKH=new_lab__QOJ(lab_type__MAKH);
                 };
-                ((__POINTER *)next__0VJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1VJH)[ 0]=next__0VJH;
+                ((__POINTER *)next__JAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KAKH)[ 0]=next__JAKH;
               } else {
-                ((__POINTER *)result__2VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0VJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__2VJH=next__0VJH;
+                ((__POINTER *)result__LAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__LAKH=next__JAKH;
               };
             };
-            ptr__TCR=result__2VJH;
+            ptr__G4Q=result__LAKH;
           };
-          result__SCR=((__ITM_READ_ARGS *)ptr__TCR);
-          *(result__SCR) = *(ITM_READ_ARGS__);
+          result__F4Q=((__ITM_READ_ARGS *)ptr__G4Q);
+          *(result__F4Q) = *(ITM_READ_ARGS__);
         };
-        ((__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;
+        ((__ITM_READ_ARGS *)result__F4Q)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__Y0Q;
+        result__L0N=result__F4Q;
       };
     };
   };
-  return(result__Y4N);
+  return(result__L0N);
 }
 
-static void* readlip_expr_cmp__I11B(__PARSER *Self__J11B)
+static void* readlip_expr_cmp__VX1B(__PARSER *Self__WX1B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *right__ZX1B,*result__YX1B;
+  void *op__0X1B;
+  __POSITION pos__YN0G,p__XTBD;
+  __STRING_CONSTANT *Self__HSBD;
+  __LIP_BINARY *result__HHGD,*Self__ZVSD;
+  __POINTER ptr__IHGD,ptr_table__PAKH,next__OAKH,result__QAKH;
+  __POINTER ptr_table__UAKH,next__TAKH,result__VAKH;
+  __INTEGER typ_id__NHGD;
+  __UINTEGER_32 sz__KHGD,a__XWGH,new_size__YWGH,t__2WGH,a__1WGH;
+  __UINTEGER_32 new_size__XAKH,lab_type__WAKH;
+  __CHARACTER type__1X1B;
+  right__ZX1B=NULL;
+  op__0X1B=NULL;
+  type__1X1B='\0';
+  result__YX1B=readlip_expr_binary__SK3B(Self__WX1B);
+  if (((void *)result__YX1B != (void *)NULL)) {
+    while ((((((read_symbol__3TJ((&__string_19)) || read_symbol__3TJ((&__string_21))) || read_symbol__3TJ((&__string_17))) || read_symbol__3TJ((&__string_16))) || read_symbol__3TJ((&__string_18))) || read_symbol__3TJ((&__string_20)))) {
+      op__0X1B=last_string__V0C;
+      right__ZX1B=readlip_expr_binary__SK3B(Self__WX1B);
+      if (((void *)right__ZX1B == (void *)NULL)) {
+        pos__YN0G=current_position__XUF();
+        put_error__text__YKG( 0,(&__string_240));
+        put_position__CMG(pos__YN0G);
+        put_string__CZF(msg_err__3KG);
+        if ((type_error__2KG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      Self__HSBD=((__STRING_CONSTANT *)op__0X1B);
+      if (((void *)Self__HSBD == (void *)(&__string_19))) {
+        type__1X1B='S';
+      };
+      if (((void *)Self__HSBD == (void *)(&__string_21))) {
+        type__1X1B='I';
+      };
+      if (((void *)Self__HSBD == (void *)(&__string_17))) {
+        type__1X1B='E';
+      };
+      if (((void *)Self__HSBD == (void *)(&__string_16))) {
+        type__1X1B='=';
+      };
+      if (((void *)Self__HSBD == (void *)(&__string_18))) {
+        type__1X1B='>';
+      };
+      if (((void *)Self__HSBD == (void *)(&__string_20))) {
+        type__1X1B='<';
+      };
+      p__XTBD=current_position__XUF();
+      result__HHGD=NULL;
+      ptr__IHGD=((__POINTER )(NULL));
+      typ_id__NHGD= 0;
+      sz__KHGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__KHGD ==  0)) {
+        result__HHGD=LIP_BINARY__;
+      } else {
+        typ_id__NHGD=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KHGD);
+        if ((typ_id__NHGD == (__INTEGER)(-  1))) {
+          a__XWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__KHGD + a__XWGH) & (__UINTEGER_32)(~ a__XWGH));
+          ptr_table__PAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OAKH=((__POINTER )(NULL));
+          result__QAKH=((__POINTER *)ptr_table__PAKH)[ 0];
+          if ((result__QAKH == (void *)NULL)) {
+            result__QAKH=new_lab__QOJ(new_size__YWGH);
+            next__OAKH=(void *)((unsigned long)result__QAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YWGH)));
+            ((__POINTER *)next__OAKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PAKH)[ 0]=next__OAKH;
+          } else {
+            next__OAKH=((__POINTER *)result__QAKH)[ 0];
+            if ((next__OAKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QAKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__YWGH <<  1)) <=  4096)) {
+                next__OAKH=(void *)((unsigned long)result__QAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YWGH)));
               } else {
-                next__5VJH=new_lab__URJ(new_size__FLGH);
+                next__OAKH=new_lab__QOJ(new_size__YWGH);
               };
-              ((__POINTER *)next__5VJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__AWJH)[ 0]=next__5VJH;
+              ((__POINTER *)next__OAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PAKH)[ 0]=next__OAKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__QAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QAKH=next__OAKH;
+            };
+          };
+          ptr__IHGD=result__QAKH;
+        } else {
+          t__2WGH=((__UINTEGER_32 )typ_id__NHGD);
+          a__1WGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KHGD + a__1WGH) & (__UINTEGER_32)(~ a__1WGH));
+          ptr_table__UAKH=((__POINTER )(&(table_type[(t__2WGH)])));
+          lab_type__WAKH=(__UINTEGER_32)(t__2WGH |  1);
+          next__TAKH=((__POINTER )(NULL));
+          result__VAKH=((__POINTER *)ptr_table__UAKH)[ 0];
+          if ((result__VAKH == (void *)NULL)) {
+            result__VAKH=new_lab__QOJ(lab_type__WAKH);
+            next__TAKH=(void *)((unsigned long)result__VAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XAKH)));
+            ((__POINTER *)next__TAKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UAKH)[ 0]=next__TAKH;
+          } else {
+            next__TAKH=((__POINTER *)result__VAKH)[ 0];
+            if ((next__TAKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VAKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__XAKH <<  1)) <=  4096)) {
+                next__TAKH=(void *)((unsigned long)result__VAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XAKH)));
               } else {
-                next__EWJH=new_lab__URJ(lab_type__HWJH);
+                next__TAKH=new_lab__QOJ(lab_type__WAKH);
               };
-              ((__POINTER *)next__EWJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__FWJH)[ 0]=next__EWJH;
+              ((__POINTER *)next__TAKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UAKH)[ 0]=next__TAKH;
             } else {
-              ((__POINTER *)result__GWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__GWJH=next__EWJH;
+              ((__POINTER *)result__VAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VAKH=next__TAKH;
             };
           };
-          ptr__2HGD=result__GWJH;
+          ptr__IHGD=result__VAKH;
         };
-        result__1HGD=((__LIP_BINARY *)ptr__2HGD);
-        *(result__1HGD) = *(LIP_BINARY__);
+        result__HHGD=((__LIP_BINARY *)ptr__IHGD);
+        *(result__HHGD) = *(LIP_BINARY__);
       };
-      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;
+      Self__ZVSD=((__LIP_BINARY *)result__HHGD);
+      Self__ZVSD->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ=p__XTBD;
+      Self__ZVSD->left__CYQD=result__YX1B;
+      Self__ZVSD->right__FYQD=right__ZX1B;
+      Self__ZVSD->operator__IYQD=type__1X1B;
+      result__YX1B=result__HHGD;
     };
   };
-  return(result__L11B);
+  return(result__YX1B);
 }
 
-static void** create__OUIE(__INTEGER nb_elements__QUIE)
+static void** create__XSIE(__INTEGER nb_elements__ZSIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TVEH,a__YVEH,new_size__UVEH,new_size2__VVEH,a__HXGH;
+  __UINTEGER_32 new_size__IXGH;
+  __POINTER result__SVEH,ptr_table__ZAKH,next__YAKH,result__0AKH;
+  void *result__3AKH;
+  __INTEGER Self__APYE;
+  void **Result__LUNE;
+  sz__TVEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZSIE * ((__INTEGER )(sizeof(void *)))));
+  result__SVEH=((__POINTER )(NULL));
+  a__YVEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UVEH=(__UINTEGER_32)((__UINTEGER_32)(sz__TVEH + a__YVEH) & (__UINTEGER_32)(~ a__YVEH));
+  new_size2__VVEH=(__UINTEGER_32)(new_size__UVEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VVEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__HXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__IXGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VVEH + a__HXGH) & (__UINTEGER_32)(~ a__HXGH));
+    ptr_table__ZAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__YAKH=((__POINTER )(NULL));
+    result__0AKH=((__POINTER *)ptr_table__ZAKH)[ 0];
+    if ((result__0AKH == (void *)NULL)) {
+      result__0AKH=new_lab__QOJ(new_size__IXGH);
+      next__YAKH=(void *)((unsigned long)result__0AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IXGH)));
+      ((__POINTER *)next__YAKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ZAKH)[ 0]=next__YAKH;
+    } else {
+      next__YAKH=((__POINTER *)result__0AKH)[ 0];
+      if ((next__YAKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0AKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__IXGH <<  1)) <=  4096)) {
+          next__YAKH=(void *)((unsigned long)result__0AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IXGH)));
+        } else {
+          next__YAKH=new_lab__QOJ(new_size__IXGH);
+        };
+        ((__POINTER *)next__YAKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZAKH)[ 0]=next__YAKH;
+      } else {
+        ((__POINTER *)result__0AKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__0AKH=next__YAKH;
+      };
+    };
+    ((__POINTER *)result__0AKH)[ 0]=((__POINTER ) 3);
+    result__SVEH=(void *)((unsigned long)result__0AKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__3AKH=first_free__VAVB;
+    while ((((void *)result__3AKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__3AKH)->map_size_and_id__YTB &  4294967292LU) < new_size__UVEH))) {
+      result__3AKH=((__MEMORY *)result__3AKH)->map_next_free__ZTB;
     };
-    if (((void *)result__OWJH == (void *)NULL)) {
-      result__OWJH=new_page__WA5();
+    if (((void *)result__3AKH == (void *)NULL)) {
+      result__3AKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__3AKH,new_size__UVEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__3AKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__SVEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__3AKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LUNE=((void **)result__SVEH);
+  Self__APYE=(__INTEGER)(nb_elements__ZSIE -  1);
+  while ((Self__APYE >=  0)) {
+    Result__LUNE[Self__APYE]=NULL;
+    Self__APYE=(__INTEGER)(Self__APYE -  1);
   };
-  return(Result__GWNE);
+  return(Result__LUNE);
 }
 
-static void** create__PRQB(__INTEGER nb_elements__RRQB)
+static void** create__FOQB(__INTEGER nb_elements__HOQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__EWEH,a__JWEH,new_size__FWEH,new_size2__GWEH,a__GYGH;
+  __UINTEGER_32 new_size__HYGH;
+  __POINTER result__DWEH,ptr_table__BBKH,next__ABKH,result__CBKH;
+  void *result__FBKH;
+  __INTEGER Self__ZYMC;
+  void **Result__BITB;
+  sz__EWEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__HOQB * ((__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__GYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__HYGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__GWEH + a__GYGH) & (__UINTEGER_32)(~ a__GYGH));
+    ptr_table__BBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HYGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ABKH=((__POINTER )(NULL));
+    result__CBKH=((__POINTER *)ptr_table__BBKH)[ 0];
+    if ((result__CBKH == (void *)NULL)) {
+      result__CBKH=new_lab__QOJ(new_size__HYGH);
+      next__ABKH=(void *)((unsigned long)result__CBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HYGH)));
+      ((__POINTER *)next__ABKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__BBKH)[ 0]=next__ABKH;
+    } else {
+      next__ABKH=((__POINTER *)result__CBKH)[ 0];
+      if ((next__ABKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CBKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__HYGH <<  1)) <=  4096)) {
+          next__ABKH=(void *)((unsigned long)result__CBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HYGH)));
+        } else {
+          next__ABKH=new_lab__QOJ(new_size__HYGH);
+        };
+        ((__POINTER *)next__ABKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BBKH)[ 0]=next__ABKH;
+      } else {
+        ((__POINTER *)result__CBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ABKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CBKH=next__ABKH;
+      };
+    };
+    ((__POINTER *)result__CBKH)[ 0]=((__POINTER ) 3);
+    result__DWEH=(void *)((unsigned long)result__CBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__FBKH=first_free__VAVB;
+    while ((((void *)result__FBKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__FBKH)->map_size_and_id__YTB &  4294967292LU) < new_size__FWEH))) {
+      result__FBKH=((__MEMORY *)result__FBKH)->map_next_free__ZTB;
     };
-    if (((void *)result__WWJH == (void *)NULL)) {
-      result__WWJH=new_page__WA5();
+    if (((void *)result__FBKH == (void *)NULL)) {
+      result__FBKH=new_page__B24();
     };
-    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)));
+    to_busy__index__KRFC(result__FBKH,new_size__FWEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBKH)) - (unsigned long)begin_memory__3SH)))) >>  26));
+    result__DWEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__FBKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__BITB=((void **)result__DWEH);
+  Self__ZYMC=(__INTEGER)(nb_elements__HOQB -  1);
+  while ((Self__ZYMC >=  0)) {
+    Result__BITB[Self__ZYMC]=NULL;
+    Self__ZYMC=(__INTEGER)(Self__ZYMC -  1);
   };
-  return(Result__LLTB);
+  return(Result__BITB);
 }
 
-static void* read_argument__1OP(__PARSER *Self__2OP)
+static void* read_argument__OKP(__PARSER *Self__PKP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__RKP;
+  __POSITION p__QBIH;
+  __ITM_READ *result__IBIH;
+  __POINTER ptr__JBIH,ptr_table__JBKH,next__IBKH,result__KBKH;
+  __POINTER ptr_table__OBKH,next__NBKH,result__PBKH;
+  __INTEGER typ_id__KBIH;
+  __UINTEGER_32 sz__LBIH,a__MBIH,new_size__NBIH,t__OBIH,a__PBIH;
+  __UINTEGER_32 new_size__RBKH,lab_type__QBKH;
+  result__RKP=read_expr_primary__D0M(Self__PKP);
+  if ((((void *)result__RKP == (void *)NULL) && read_identifier__12K())) {
+    if (is_shorter__LZ) {
+      if ((! fast_has__Q5U(short_local__XCC,last_string__V0C))) {
+        short__token__to__YBD((&__string_131),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
+      };
+    };
+    p__QBIH=current_position__XUF();
+    result__IBIH=NULL;
+    ptr__JBIH=((__POINTER )(NULL));
+    typ_id__KBIH= 0;
+    sz__LBIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__LBIH ==  0)) {
+      result__IBIH=ITM_READ__;
+    } else {
+      typ_id__KBIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LBIH);
+      if ((typ_id__KBIH == (__INTEGER)(-  1))) {
+        a__MBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__LBIH + a__MBIH) & (__UINTEGER_32)(~ a__MBIH));
+        ptr_table__JBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NBIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__IBKH=((__POINTER )(NULL));
+        result__KBKH=((__POINTER *)ptr_table__JBKH)[ 0];
+        if ((result__KBKH == (void *)NULL)) {
+          result__KBKH=new_lab__QOJ(new_size__NBIH);
+          next__IBKH=(void *)((unsigned long)result__KBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NBIH)));
+          ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__NBIH <<  1)) <=  4096)) {
+              next__IBKH=(void *)((unsigned long)result__KBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NBIH)));
             } else {
-              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)));
+              next__IBKH=new_lab__QOJ(new_size__NBIH);
+            };
+            ((__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__JBIH=result__KBKH;
+      } else {
+        t__OBIH=((__UINTEGER_32 )typ_id__KBIH);
+        a__PBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__RBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LBIH + a__PBIH) & (__UINTEGER_32)(~ a__PBIH));
+        ptr_table__OBKH=((__POINTER )(&(table_type[(t__OBIH)])));
+        lab_type__QBKH=(__UINTEGER_32)(t__OBIH |  1);
+        next__NBKH=((__POINTER )(NULL));
+        result__PBKH=((__POINTER *)ptr_table__OBKH)[ 0];
+        if ((result__PBKH == (void *)NULL)) {
+          result__PBKH=new_lab__QOJ(lab_type__QBKH);
+          next__NBKH=(void *)((unsigned long)result__PBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RBKH)));
+          ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RBKH <<  1)) <=  4096)) {
+              next__NBKH=(void *)((unsigned long)result__PBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RBKH)));
             } else {
-              next__4WJH=new_lab__URJ(lab_type__BXJH);
+              next__NBKH=new_lab__QOJ(lab_type__QBKH);
             };
-            ((__POINTER *)next__4WJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
+            ((__POINTER *)next__NBKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OBKH)[ 0]=next__NBKH;
           } else {
-            ((__POINTER *)result__AXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__AXJH=next__4WJH;
+            ((__POINTER *)result__PBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PBKH=next__NBKH;
           };
         };
-        ptr__GWHH=result__AXJH;
+        ptr__JBIH=result__PBKH;
       };
-      result__FWHH=((__ITM_READ *)ptr__GWHH);
-      *(result__FWHH) = *(ITM_READ__);
+      result__IBIH=((__ITM_READ *)ptr__JBIH);
+      *(result__IBIH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__FWHH)->parent_itm_code__YGJ.parent_itm_object__5DE.position__VDJ=p__NWHH;
-    result__4OP=result__FWHH;
+    ((__ITM_READ *)result__IBIH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__QBIH;
+    result__RKP=result__IBIH;
   };
-  return(result__4OP);
+  return(result__RKP);
 }
 
-static void* readlip_expr_binary__FO3B(__PARSER *Self__GO3B)
+static void* readlip_expr_binary__SK3B(__PARSER *Self__TK3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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:
+  void *right__WK3B,*result__VK3B;
+  __POSITION pos__2T0G,p__0BIH,p__HCIH;
+  __LIP_BINARY *result__RBIH,*Self__ZBIH,*result__4BIH,*Self__GCIH;
+  __POINTER ptr__SBIH,ptr_table__ZBKH,next__YBKH,result__0BKH;
+  __POINTER ptr_table__4BKH,next__3BKH,result__5BKH,ptr__5BIH;
+  __POINTER ptr_table__DCKH,next__CCKH,result__ECKH,ptr_table__ICKH;
+  __POINTER next__HCKH,result__JCKH;
+  __INTEGER typ_id__TBIH,typ_id__ACIH;
+  __UINTEGER_32 sz__UBIH,a__VBIH,new_size__WBIH,t__XBIH,a__YBIH;
+  __UINTEGER_32 new_size__BCKH,lab_type__ACKH,sz__BCIH,a__CCIH;
+  __UINTEGER_32 new_size__DCIH,t__ECIH,a__FCIH,new_size__LCKH;
+  __UINTEGER_32 lab_type__KCKH;
+  __BOOLEAN result__SBKH,__tmp__LL3B,result__VBKH;
+  __CHARACTER result__TBKH,result__WBKH;
+  right__WK3B=NULL;
+  result__VK3B=readlip_expr_unary__TW4B(Self__TK3B);
+  if (((void *)result__VK3B != (void *)NULL)) {
+    while_do__J15B:
     {
-      result__DXJH=FALSE__;
-      if ((! read_space__FSD())) {
-        result__DXJH=FALSE__;
+      result__SBKH=FALSE__;
+      if ((! read_space__KSD())) {
+        result__SBKH=FALSE__;
       } else {
-        result__EXJH='\0';
-        if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-          result__EXJH=((__CHARACTER )(( 0)));
+        result__TBKH='\0';
+        if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+          result__TBKH=((__CHARACTER )(( 0)));
         } else {
-          result__EXJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+          result__TBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__EXJH == '-')) {
-          position__0BC=(__INTEGER)(position__0BC +  1);
-          result__DXJH=TRUE__;
+        if ((result__TBKH == '-')) {
+          position__CCC=(__INTEGER)(position__CCC +  1);
+          result__SBKH=TRUE__;
         };
       };
-      if (result__DXJH) {
-        __tmp__4O3B=TRUE__;
+      if (result__SBKH) {
+        __tmp__LL3B=TRUE__;
       } else {
-        result__GXJH=FALSE__;
-        if ((! read_space__FSD())) {
-          result__GXJH=FALSE__;
+        result__VBKH=FALSE__;
+        if ((! read_space__KSD())) {
+          result__VBKH=FALSE__;
         } else {
-          result__HXJH='\0';
-          if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-            result__HXJH=((__CHARACTER )(( 0)));
+          result__WBKH='\0';
+          if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+            result__WBKH=((__CHARACTER )(( 0)));
           } else {
-            result__HXJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+            result__WBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HXJH == '+')) {
-            position__0BC=(__INTEGER)(position__0BC +  1);
-            result__GXJH=TRUE__;
+          if ((result__WBKH == '+')) {
+            position__CCC=(__INTEGER)(position__CCC +  1);
+            result__VBKH=TRUE__;
           };
         };
-        __tmp__4O3B=result__GXJH;
+        __tmp__LL3B=result__VBKH;
       };
-      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)) {
+      if (__tmp__LL3B) {
+        right__WK3B=readlip_expr_unary__TW4B(Self__TK3B);
+        if (((void *)right__WK3B == (void *)NULL)) {
+          pos__2T0G=current_position__XUF();
+          put_error__text__YKG( 0,(&__string_240));
+          put_position__CMG(pos__2T0G);
+          put_string__CZF(msg_err__3KG);
+          if ((type_error__2KG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__SBKH) {
+          p__0BIH=current_position__XUF();
+          result__RBIH=NULL;
+          ptr__SBIH=((__POINTER )(NULL));
+          typ_id__TBIH= 0;
+          sz__UBIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__UBIH ==  0)) {
+            result__RBIH=LIP_BINARY__;
+          } else {
+            typ_id__TBIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UBIH);
+            if ((typ_id__TBIH == (__INTEGER)(-  1))) {
+              a__VBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__WBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UBIH + a__VBIH) & (__UINTEGER_32)(~ a__VBIH));
+              ptr_table__ZBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WBIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__YBKH=((__POINTER )(NULL));
+              result__0BKH=((__POINTER *)ptr_table__ZBKH)[ 0];
+              if ((result__0BKH == (void *)NULL)) {
+                result__0BKH=new_lab__QOJ(new_size__WBIH);
+                next__YBKH=(void *)((unsigned long)result__0BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBIH)));
+                ((__POINTER *)next__YBKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZBKH)[ 0]=next__YBKH;
               } else {
-                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)));
+                next__YBKH=((__POINTER *)result__0BKH)[ 0];
+                if ((next__YBKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0BKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__WBIH <<  1)) <=  4096)) {
+                    next__YBKH=(void *)((unsigned long)result__0BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WBIH)));
                   } else {
-                    next__JXJH=new_lab__URJ(new_size__TWHH);
+                    next__YBKH=new_lab__QOJ(new_size__WBIH);
                   };
-                  ((__POINTER *)next__JXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KXJH)[ 0]=next__JXJH;
+                  ((__POINTER *)next__YBKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__ZBKH)[ 0]=next__YBKH;
                 } else {
-                  ((__POINTER *)result__LXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LXJH=next__JXJH;
+                  ((__POINTER *)result__0BKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__0BKH=next__YBKH;
                 };
               };
-              ptr__PWHH=result__LXJH;
+              ptr__SBIH=result__0BKH;
             } else {
-              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;
+              t__XBIH=((__UINTEGER_32 )typ_id__TBIH);
+              a__YBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UBIH + a__YBIH) & (__UINTEGER_32)(~ a__YBIH));
+              ptr_table__4BKH=((__POINTER )(&(table_type[(t__XBIH)])));
+              lab_type__ACKH=(__UINTEGER_32)(t__XBIH |  1);
+              next__3BKH=((__POINTER )(NULL));
+              result__5BKH=((__POINTER *)ptr_table__4BKH)[ 0];
+              if ((result__5BKH == (void *)NULL)) {
+                result__5BKH=new_lab__QOJ(lab_type__ACKH);
+                next__3BKH=(void *)((unsigned long)result__5BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCKH)));
+                ((__POINTER *)next__3BKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4BKH)[ 0]=next__3BKH;
               } else {
-                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)));
+                next__3BKH=((__POINTER *)result__5BKH)[ 0];
+                if ((next__3BKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5BKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BCKH <<  1)) <=  4096)) {
+                    next__3BKH=(void *)((unsigned long)result__5BKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BCKH)));
                   } else {
-                    next__OXJH=new_lab__URJ(lab_type__RXJH);
+                    next__3BKH=new_lab__QOJ(lab_type__ACKH);
                   };
-                  ((__POINTER *)next__OXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__PXJH)[ 0]=next__OXJH;
+                  ((__POINTER *)next__3BKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__4BKH)[ 0]=next__3BKH;
                 } else {
-                  ((__POINTER *)result__QXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__QXJH=next__OXJH;
+                  ((__POINTER *)result__5BKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3BKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__5BKH=next__3BKH;
                 };
               };
-              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;
+              ptr__SBIH=result__5BKH;
+            };
+            result__RBIH=((__LIP_BINARY *)ptr__SBIH);
+            *(result__RBIH) = *(LIP_BINARY__);
+          };
+          Self__ZBIH=((__LIP_BINARY *)result__RBIH);
+          Self__ZBIH->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ=p__0BIH;
+          Self__ZBIH->left__CYQD=result__VK3B;
+          Self__ZBIH->right__FYQD=right__WK3B;
+          Self__ZBIH->operator__IYQD='-';
+          result__VK3B=result__RBIH;
+        } else {
+          p__HCIH=current_position__XUF();
+          result__4BIH=NULL;
+          ptr__5BIH=((__POINTER )(NULL));
+          typ_id__ACIH= 0;
+          sz__BCIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__BCIH ==  0)) {
+            result__4BIH=LIP_BINARY__;
+          } else {
+            typ_id__ACIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BCIH);
+            if ((typ_id__ACIH == (__INTEGER)(-  1))) {
+              a__CCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__DCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__BCIH + a__CCIH) & (__UINTEGER_32)(~ a__CCIH));
+              ptr_table__DCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DCIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__CCKH=((__POINTER )(NULL));
+              result__ECKH=((__POINTER *)ptr_table__DCKH)[ 0];
+              if ((result__ECKH == (void *)NULL)) {
+                result__ECKH=new_lab__QOJ(new_size__DCIH);
+                next__CCKH=(void *)((unsigned long)result__ECKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DCIH)));
+                ((__POINTER *)next__CCKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__DCKH)[ 0]=next__CCKH;
               } else {
-                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)));
+                next__CCKH=((__POINTER *)result__ECKH)[ 0];
+                if ((next__CCKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ECKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__DCIH <<  1)) <=  4096)) {
+                    next__CCKH=(void *)((unsigned long)result__ECKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DCIH)));
                   } else {
-                    next__TXJH=new_lab__URJ(new_size__AXHH);
+                    next__CCKH=new_lab__QOJ(new_size__DCIH);
                   };
-                  ((__POINTER *)next__TXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__UXJH)[ 0]=next__TXJH;
+                  ((__POINTER *)next__CCKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__DCKH)[ 0]=next__CCKH;
                 } else {
-                  ((__POINTER *)result__VXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__VXJH=next__TXJH;
+                  ((__POINTER *)result__ECKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__ECKH=next__CCKH;
                 };
               };
-              ptr__2WHH=result__VXJH;
+              ptr__5BIH=result__ECKH;
             } else {
-              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;
+              t__ECIH=((__UINTEGER_32 )typ_id__ACIH);
+              a__FCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__LCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__BCIH + a__FCIH) & (__UINTEGER_32)(~ a__FCIH));
+              ptr_table__ICKH=((__POINTER )(&(table_type[(t__ECIH)])));
+              lab_type__KCKH=(__UINTEGER_32)(t__ECIH |  1);
+              next__HCKH=((__POINTER )(NULL));
+              result__JCKH=((__POINTER *)ptr_table__ICKH)[ 0];
+              if ((result__JCKH == (void *)NULL)) {
+                result__JCKH=new_lab__QOJ(lab_type__KCKH);
+                next__HCKH=(void *)((unsigned long)result__JCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCKH)));
+                ((__POINTER *)next__HCKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ICKH)[ 0]=next__HCKH;
               } else {
-                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)));
+                next__HCKH=((__POINTER *)result__JCKH)[ 0];
+                if ((next__HCKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JCKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LCKH <<  1)) <=  4096)) {
+                    next__HCKH=(void *)((unsigned long)result__JCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCKH)));
                   } else {
-                    next__YXJH=new_lab__URJ(lab_type__1XJH);
+                    next__HCKH=new_lab__QOJ(lab_type__KCKH);
                   };
-                  ((__POINTER *)next__YXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ZXJH)[ 0]=next__YXJH;
+                  ((__POINTER *)next__HCKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__ICKH)[ 0]=next__HCKH;
                 } else {
-                  ((__POINTER *)result__0XJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__0XJH=next__YXJH;
+                  ((__POINTER *)result__JCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__JCKH=next__HCKH;
                 };
               };
-              ptr__2WHH=result__0XJH;
+              ptr__5BIH=result__JCKH;
             };
-            result__1WHH=((__LIP_BINARY *)ptr__2WHH);
-            *(result__1WHH) = *(LIP_BINARY__);
+            result__4BIH=((__LIP_BINARY *)ptr__5BIH);
+            *(result__4BIH) = *(LIP_BINARY__);
           };
-          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;
+          Self__GCIH=((__LIP_BINARY *)result__4BIH);
+          Self__GCIH->parent_lip_code__RMZB.parent_itm_object__NAE.position__RAJ=p__HCIH;
+          Self__GCIH->left__CYQD=result__VK3B;
+          Self__GCIH->right__FYQD=right__WK3B;
+          Self__GCIH->operator__IYQD='+';
+          result__VK3B=result__4BIH;
         };
-        goto while_do__K45B;
+        goto while_do__J15B;
       };
     };
   };
-  return(result__IO3B);
+  return(result__VK3B);
 }
 
-static void* readlip_expr_unary__G04B(__PARSER *Self__H04B)
+static void* readlip_expr_unary__TW4B(__PARSER *Self__UW4B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__WW4B,*result__GCFE;
+  void *nam__ZW4B,*n__GDKH;
+  __POSITION pos__OV0G,p__Y4ZC,p__FDKH,p__ZCFE;
+  __LIP_UNARY *result__WNBD,*Self__SGSD;
+  __POINTER ptr__XNBD,ptr_table__TCKH,next__SCKH,result__UCKH;
+  __POINTER ptr_table__YCKH,next__XCKH,result__ZCKH,ptr__3CKH;
+  __POINTER ptr_table__JDKH,next__IDKH,result__KDKH,ptr_table__ODKH;
+  __POINTER next__NDKH,result__PDKH,ptr__RRLE,ptr_table__TDKH;
+  __POINTER next__SDKH,result__UDKH,ptr_table__YDKH,next__XDKH;
+  __POINTER result__ZDKH;
+  __INTEGER typ_id__2NBD,typ_id__4CKH,typ_id__WRLE;
+  __UINTEGER_32 sz__ZNBD,a__NYGH,new_size__OYGH,t__SYGH,a__RYGH;
+  __UINTEGER_32 new_size__1CKH,lab_type__0CKH,sz__5CKH,a__ADKH;
+  __UINTEGER_32 new_size__BDKH,t__CDKH,a__DDKH,new_size__RDKH;
+  __UINTEGER_32 lab_type__QDKH,sz__TRLE,a__VYGH,new_size__WYGH,t__0YGH;
+  __UINTEGER_32 a__ZYGH,new_size__1DKH,lab_type__0DKH;
+  __LIP_CALL *result__2CKH,*Self__EDKH,*result__QRLE,*Self__LKWE;
+  __CHARACTER type__YW4B,result__NCKH,result__QCKH;
+  __BOOLEAN result__MCKH,__tmp__EX4B,result__PCKH,__tmp__EY4B;
+  result__WW4B=NULL;
+  type__YW4B='\0';
+  nam__ZW4B=NULL;
+  result__MCKH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__MCKH=FALSE__;
   } else {
-    result__4XJH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__4XJH=((__CHARACTER )(( 0)));
+    result__NCKH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__NCKH=((__CHARACTER )(( 0)));
     } else {
-      result__4XJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__NCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__4XJH == '-')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__3XJH=TRUE__;
+    if ((result__NCKH == '-')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__MCKH=TRUE__;
     };
   };
-  if (result__3XJH) {
-    __tmp__X04B=TRUE__;
+  if (result__MCKH) {
+    __tmp__EX4B=TRUE__;
   } else {
-    result__AYJH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__AYJH=FALSE__;
+    result__PCKH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__PCKH=FALSE__;
     } else {
-      result__BYJH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__BYJH=((__CHARACTER )(( 0)));
+      result__QCKH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__QCKH=((__CHARACTER )(( 0)));
       } else {
-        result__BYJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__QCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__BYJH == '!')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__AYJH=TRUE__;
+      if ((result__QCKH == '!')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__PCKH=TRUE__;
       };
     };
-    __tmp__X04B=result__AYJH;
+    __tmp__EX4B=result__PCKH;
   };
-  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)) {
+  if (__tmp__EX4B) {
+    result__WW4B=readlip_expr_unary__TW4B(Self__UW4B);
+    if (((void *)result__WW4B == (void *)NULL)) {
+      pos__OV0G=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_240));
+      put_position__CMG(pos__OV0G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    if (result__MCKH) {
+      type__YW4B='-';
+    } else {
+      type__YW4B='!';
+    };
+    p__Y4ZC=current_position__XUF();
+    result__WNBD=NULL;
+    ptr__XNBD=((__POINTER )(NULL));
+    typ_id__2NBD= 0;
+    sz__ZNBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__ZNBD ==  0)) {
+      result__WNBD=LIP_UNARY__;
+    } else {
+      typ_id__2NBD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZNBD);
+      if ((typ_id__2NBD == (__INTEGER)(-  1))) {
+        a__NYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZNBD + a__NYGH) & (__UINTEGER_32)(~ a__NYGH));
+        ptr_table__TCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OYGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__SCKH=((__POINTER )(NULL));
+        result__UCKH=((__POINTER *)ptr_table__TCKH)[ 0];
+        if ((result__UCKH == (void *)NULL)) {
+          result__UCKH=new_lab__QOJ(new_size__OYGH);
+          next__SCKH=(void *)((unsigned long)result__UCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYGH)));
+          ((__POINTER *)next__SCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TCKH)[ 0]=next__SCKH;
+        } else {
+          next__SCKH=((__POINTER *)result__UCKH)[ 0];
+          if ((next__SCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UCKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__OYGH <<  1)) <=  4096)) {
+              next__SCKH=(void *)((unsigned long)result__UCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OYGH)));
             } else {
-              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)));
+              next__SCKH=new_lab__QOJ(new_size__OYGH);
+            };
+            ((__POINTER *)next__SCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TCKH)[ 0]=next__SCKH;
+          } else {
+            ((__POINTER *)result__UCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UCKH=next__SCKH;
+          };
+        };
+        ptr__XNBD=result__UCKH;
+      } else {
+        t__SYGH=((__UINTEGER_32 )typ_id__2NBD);
+        a__RYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1CKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZNBD + a__RYGH) & (__UINTEGER_32)(~ a__RYGH));
+        ptr_table__YCKH=((__POINTER )(&(table_type[(t__SYGH)])));
+        lab_type__0CKH=(__UINTEGER_32)(t__SYGH |  1);
+        next__XCKH=((__POINTER )(NULL));
+        result__ZCKH=((__POINTER *)ptr_table__YCKH)[ 0];
+        if ((result__ZCKH == (void *)NULL)) {
+          result__ZCKH=new_lab__QOJ(lab_type__0CKH);
+          next__XCKH=(void *)((unsigned long)result__ZCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CKH)));
+          ((__POINTER *)next__XCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YCKH)[ 0]=next__XCKH;
+        } else {
+          next__XCKH=((__POINTER *)result__ZCKH)[ 0];
+          if ((next__XCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZCKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1CKH <<  1)) <=  4096)) {
+              next__XCKH=(void *)((unsigned long)result__ZCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1CKH)));
             } else {
-              next__IYJH=new_lab__URJ(lab_type__LYJH);
+              next__XCKH=new_lab__QOJ(lab_type__0CKH);
             };
-            ((__POINTER *)next__IYJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__JYJH)[ 0]=next__IYJH;
+            ((__POINTER *)next__XCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YCKH)[ 0]=next__XCKH;
           } else {
-            ((__POINTER *)result__KYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__KYJH=next__IYJH;
+            ((__POINTER *)result__ZCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZCKH=next__XCKH;
           };
         };
-        ptr__FOBD=result__KYJH;
+        ptr__XNBD=result__ZCKH;
       };
-      result__EOBD=((__LIP_UNARY *)ptr__FOBD);
-      *(result__EOBD) = *(LIP_UNARY__);
+      result__WNBD=((__LIP_UNARY *)ptr__XNBD);
+      *(result__WNBD) = *(LIP_UNARY__);
     };
-    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__;
+    Self__SGSD=((__LIP_UNARY *)result__WNBD);
+    Self__SGSD->parent_lip_code__AY4B.parent_itm_object__NAE.position__RAJ=p__Y4ZC;
+    Self__SGSD->operator__C1QD=type__YW4B;
+    Self__SGSD->value__50QD=result__WW4B;
+    result__WW4B=result__WNBD;
+    __tmp__EY4B=TRUE__;
   } else {
-    __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;
+    __tmp__EY4B=FALSE__;
+  };
+  if ((! __tmp__EY4B)) {
+    if (read_identifier__12K()) {
+      nam__ZW4B=last_string__V0C;
+      result__GCFE=NULL;
+      if (read_identifier__12K()) {
+        p__FDKH=current_position__XUF();
+        n__GDKH=last_string__V0C;
+        result__2CKH=NULL;
+        ptr__3CKH=((__POINTER )(NULL));
+        typ_id__4CKH= 0;
+        sz__5CKH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__5CKH ==  0)) {
+          result__2CKH=LIP_CALL__;
+        } else {
+          typ_id__4CKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5CKH);
+          if ((typ_id__4CKH == (__INTEGER)(-  1))) {
+            a__ADKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5CKH + a__ADKH) & (__UINTEGER_32)(~ a__ADKH));
+            ptr_table__JDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BDKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__IDKH=((__POINTER )(NULL));
+            result__KDKH=((__POINTER *)ptr_table__JDKH)[ 0];
+            if ((result__KDKH == (void *)NULL)) {
+              result__KDKH=new_lab__QOJ(new_size__BDKH);
+              next__IDKH=(void *)((unsigned long)result__KDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDKH)));
+              ((__POINTER *)next__IDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JDKH)[ 0]=next__IDKH;
             } else {
-              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)));
+              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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__BDKH <<  1)) <=  4096)) {
+                  next__IDKH=(void *)((unsigned long)result__KDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDKH)));
                 } else {
-                  next__ZYJH=new_lab__URJ(new_size__SYJH);
+                  next__IDKH=new_lab__QOJ(new_size__BDKH);
                 };
-                ((__POINTER *)next__ZYJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__0YJH)[ 0]=next__ZYJH;
+                ((__POINTER *)next__IDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JDKH)[ 0]=next__IDKH;
               } else {
-                ((__POINTER *)result__1YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__1YJH=next__ZYJH;
-              };
-            };
-            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;
+                ((__POINTER *)result__KDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KDKH=next__IDKH;
+              };
+            };
+            ptr__3CKH=result__KDKH;
+          } else {
+            t__CDKH=((__UINTEGER_32 )typ_id__4CKH);
+            a__DDKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__RDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5CKH + a__DDKH) & (__UINTEGER_32)(~ a__DDKH));
+            ptr_table__ODKH=((__POINTER )(&(table_type[(t__CDKH)])));
+            lab_type__QDKH=(__UINTEGER_32)(t__CDKH |  1);
+            next__NDKH=((__POINTER )(NULL));
+            result__PDKH=((__POINTER *)ptr_table__ODKH)[ 0];
+            if ((result__PDKH == (void *)NULL)) {
+              result__PDKH=new_lab__QOJ(lab_type__QDKH);
+              next__NDKH=(void *)((unsigned long)result__PDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RDKH)));
+              ((__POINTER *)next__NDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ODKH)[ 0]=next__NDKH;
             } else {
-              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)));
+              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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__RDKH <<  1)) <=  4096)) {
+                  next__NDKH=(void *)((unsigned long)result__PDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RDKH)));
                 } else {
-                  next__4YJH=new_lab__URJ(lab_type__BZJH);
+                  next__NDKH=new_lab__QOJ(lab_type__QDKH);
                 };
-                ((__POINTER *)next__4YJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__5YJH)[ 0]=next__4YJH;
+                ((__POINTER *)next__NDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ODKH)[ 0]=next__NDKH;
               } else {
-                ((__POINTER *)result__AZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__AZJH=next__4YJH;
-              };
-            };
-            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)));
+                ((__POINTER *)result__PDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__PDKH=next__NDKH;
+              };
+            };
+            ptr__3CKH=result__PDKH;
+          };
+          result__2CKH=((__LIP_CALL *)ptr__3CKH);
+          *(result__2CKH) = *(LIP_CALL__);
+        };
+        Self__EDKH=((__LIP_CALL *)result__2CKH);
+        Self__EDKH->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ=p__FDKH;
+        Self__EDKH->name__EKUE=n__GDKH;
+        Self__EDKH->argument__ZJUE=NULL;
+        result__GCFE=result__2CKH;
+      } else {
+        result__GCFE=readlip_expr_base__5CFE(Self__UW4B);
+      };
+      p__ZCFE=current_position__XUF();
+      result__QRLE=NULL;
+      ptr__RRLE=((__POINTER )(NULL));
+      typ_id__WRLE= 0;
+      sz__TRLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__TRLE ==  0)) {
+        result__QRLE=LIP_CALL__;
+      } else {
+        typ_id__WRLE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TRLE);
+        if ((typ_id__WRLE == (__INTEGER)(-  1))) {
+          a__VYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WYGH=(__UINTEGER_32)((__UINTEGER_32)(sz__TRLE + a__VYGH) & (__UINTEGER_32)(~ a__VYGH));
+          ptr_table__TDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WYGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__SDKH=((__POINTER )(NULL));
+          result__UDKH=((__POINTER *)ptr_table__TDKH)[ 0];
+          if ((result__UDKH == (void *)NULL)) {
+            result__UDKH=new_lab__QOJ(new_size__WYGH);
+            next__SDKH=(void *)((unsigned long)result__UDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WYGH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__WYGH <<  1)) <=  4096)) {
+                next__SDKH=(void *)((unsigned long)result__UDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WYGH)));
               } else {
-                next__DZJH=new_lab__URJ(new_size__DNGH);
+                next__SDKH=new_lab__QOJ(new_size__WYGH);
               };
-              ((__POINTER *)next__DZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__EZJH)[ 0]=next__DZJH;
+              ((__POINTER *)next__SDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TDKH)[ 0]=next__SDKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__UDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__UDKH=next__SDKH;
+            };
+          };
+          ptr__RRLE=result__UDKH;
+        } else {
+          t__0YGH=((__UINTEGER_32 )typ_id__WRLE);
+          a__ZYGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__1DKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TRLE + a__ZYGH) & (__UINTEGER_32)(~ a__ZYGH));
+          ptr_table__YDKH=((__POINTER )(&(table_type[(t__0YGH)])));
+          lab_type__0DKH=(__UINTEGER_32)(t__0YGH |  1);
+          next__XDKH=((__POINTER )(NULL));
+          result__ZDKH=((__POINTER *)ptr_table__YDKH)[ 0];
+          if ((result__ZDKH == (void *)NULL)) {
+            result__ZDKH=new_lab__QOJ(lab_type__0DKH);
+            next__XDKH=(void *)((unsigned long)result__ZDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1DKH)));
+            ((__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__3SH)))) &  4095) + (__UINTEGER_32)(new_size__1DKH <<  1)) <=  4096)) {
+                next__XDKH=(void *)((unsigned long)result__ZDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1DKH)));
               } else {
-                next__IZJH=new_lab__URJ(lab_type__LZJH);
+                next__XDKH=new_lab__QOJ(lab_type__0DKH);
               };
-              ((__POINTER *)next__IZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JZJH)[ 0]=next__IZJH;
+              ((__POINTER *)next__XDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YDKH)[ 0]=next__XDKH;
             } else {
-              ((__POINTER *)result__KZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__KZJH=next__IZJH;
+              ((__POINTER *)result__ZDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZDKH=next__XDKH;
             };
           };
-          ptr__OTLE=result__KZJH;
+          ptr__RRLE=result__ZDKH;
         };
-        result__NTLE=((__LIP_CALL *)ptr__OTLE);
-        *(result__NTLE) = *(LIP_CALL__);
+        result__QRLE=((__LIP_CALL *)ptr__RRLE);
+        *(result__QRLE) = *(LIP_CALL__);
       };
-      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;
+      Self__LKWE=((__LIP_CALL *)result__QRLE);
+      Self__LKWE->parent_lip_code__SY4B.parent_itm_object__NAE.position__RAJ=p__ZCFE;
+      Self__LKWE->name__EKUE=nam__ZW4B;
+      Self__LKWE->argument__ZJUE=result__GCFE;
+      result__WW4B=result__QRLE;
     } else {
-      result__J04B=readlip_expr_base__OEFE(Self__H04B);
+      result__WW4B=readlip_expr_base__5CFE(Self__UW4B);
     };
   };
-  return(result__J04B);
+  return(result__WW4B);
 }
 
-static void* readlip_expr_base__OEFE(__PARSER *Self__PEFE)
+static void* readlip_expr_base__5CFE(__PARSER *Self__ADFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *result__CDFE;
+  __POSITION pos__4V0G,pos__AW0G,pos__CW0G,p__A0RE;
+  void *result__4RPE;
+  __LIP_VALUE *result__QSSE,*Self__T4WE;
+  __POINTER ptr__RSSE,ptr_table__DEKH,next__CEKH,result__EEKH;
+  __POINTER ptr_table__IEKH,next__HEKH,result__JEKH;
+  __INTEGER typ_id__WSSE;
+  __UINTEGER_32 sz__TSSE,a__3YGH,new_size__4YGH,t__CZGH,a__BZGH;
+  __UINTEGER_32 new_size__LEKH,lab_type__KEKH;
+  __BOOLEAN result__2DKH,result__5DKH,__tmp__LSPE,__tmp__1SPE;
+  __BOOLEAN result__JPQE,__tmp__QTPE;
+  __CHARACTER result__3DKH,result__AEKH;
+  result__CDFE=NULL;
+  result__2DKH=FALSE__;
+  if ((! read_space__KSD())) {
+    result__2DKH=FALSE__;
   } else {
-    result__OZJH='\0';
-    if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-      result__OZJH=((__CHARACTER )(( 0)));
+    result__3DKH='\0';
+    if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+      result__3DKH=((__CHARACTER )(( 0)));
     } else {
-      result__OZJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+      result__3DKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__OZJH == '(')) {
-      position__0BC=(__INTEGER)(position__0BC +  1);
-      result__NZJH=TRUE__;
+    if ((result__3DKH == '(')) {
+      position__CCC=(__INTEGER)(position__CCC +  1);
+      result__2DKH=TRUE__;
     };
   };
-  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)) {
+  if (result__2DKH) {
+    result__CDFE=readlip_expr_operator__BLZB(Self__ADFE);
+    if (((void *)result__CDFE == (void *)NULL)) {
+      pos__4V0G=current_position__XUF();
+      put_error__text__YKG( 0,(&__string_240));
+      put_position__CMG(pos__4V0G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
-    result__QZJH=FALSE__;
-    if ((! read_space__FSD())) {
-      result__QZJH=FALSE__;
+    result__5DKH=FALSE__;
+    if ((! read_space__KSD())) {
+      result__5DKH=FALSE__;
     } else {
-      result__RZJH='\0';
-      if ((position__0BC > ((__STRING *)source__XBC)->count__4FC)) {
-        result__RZJH=((__CHARACTER )(( 0)));
+      result__AEKH='\0';
+      if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
+        result__AEKH=((__CHARACTER )(( 0)));
       } else {
-        result__RZJH=((__CHARACTER *)((__STRING *)source__XBC)->storage__JCS)[(__INTEGER)(position__0BC -  1)];
+        result__AEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__RZJH == ')')) {
-        position__0BC=(__INTEGER)(position__0BC +  1);
-        result__QZJH=TRUE__;
+      if ((result__AEKH == ')')) {
+        position__CCC=(__INTEGER)(position__CCC +  1);
+        result__5DKH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__5DKH)) {
+      pos__AW0G=current_position__XUF();
+      put_error__text__YKG( 2,(&__string_238));
+      put_position__CMG(pos__AW0G);
+      put_string__CZF(msg_err__3KG);
+      if ((type_error__2KG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__BTPE=NULL;
-    if (read_integer__I2P()) {
-      result__BTPE=get__KJSE(LIP_INTEGER__,((__INTEGER )last_integer__BSO));
-      __tmp__OTPE=TRUE__;
+    result__4RPE=NULL;
+    if (read_integer__1XP()) {
+      result__4RPE=get__LRSE(LIP_INTEGER__,((__INTEGER )last_integer__UNO));
+      __tmp__LSPE=TRUE__;
     } else {
-      __tmp__OTPE=FALSE__;
+      __tmp__LSPE=FALSE__;
     };
-    if (__tmp__OTPE) {
-      __tmp__4TPE=TRUE__;
+    if (__tmp__LSPE) {
+      __tmp__1SPE=TRUE__;
     } else {
-      result__WPQE=read_string__TFQ();
-      if (result__WPQE) {
-        result__BTPE=get__TMFF(LIP_STRING__,last_string__Q0C);
+      result__JPQE=read_string__GBQ();
+      if (result__JPQE) {
+        result__4RPE=get__PVFF(LIP_STRING__,last_string__V0C);
       };
-      __tmp__4TPE=result__WPQE;
+      __tmp__1SPE=result__JPQE;
     };
-    if ((! __tmp__4TPE)) {
-      if (read_cap_identifier__0ZJ()) {
-        if (((void *)last_string__Q0C == (void *)(&__string_42))) {
-          result__BTPE=true__SELF;
-          __tmp__TUPE=TRUE__;
+    if ((! __tmp__1SPE)) {
+      if (read_cap_identifier__MWJ()) {
+        if (((void *)last_string__V0C == (void *)(&__string_42))) {
+          result__4RPE=true__OOLF;
+          __tmp__QTPE=TRUE__;
         } else {
-          __tmp__TUPE=FALSE__;
+          __tmp__QTPE=FALSE__;
         };
-        if ((! __tmp__TUPE)) {
-          if (((void *)last_string__Q0C == (void *)(&__string_43))) {
-            result__BTPE=LIP_BOOLEAN__;
+        if ((! __tmp__QTPE)) {
+          if (((void *)last_string__V0C == (void *)(&__string_43))) {
+            result__4RPE=LIP_BOOLEAN__;
           } else {
-            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)) {
+            pos__CW0G=current_position__XUF();
+            put_error__text__YKG( 0,(&__string_334));
+            put_position__CMG(pos__CW0G);
+            put_string__CZF(msg_err__3KG);
+            if ((type_error__2KG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    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)));
+    if (((void *)result__4RPE != (void *)NULL)) {
+      p__A0RE=current_position__XUF();
+      result__QSSE=NULL;
+      ptr__RSSE=((__POINTER )(NULL));
+      typ_id__WSSE= 0;
+      sz__TSSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__TSSE ==  0)) {
+        result__QSSE=LIP_VALUE__;
+      } else {
+        typ_id__WSSE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TSSE);
+        if ((typ_id__WSSE == (__INTEGER)(-  1))) {
+          a__3YGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4YGH=(__UINTEGER_32)((__UINTEGER_32)(sz__TSSE + a__3YGH) & (__UINTEGER_32)(~ a__3YGH));
+          ptr_table__DEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4YGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__CEKH=((__POINTER )(NULL));
+          result__EEKH=((__POINTER *)ptr_table__DEKH)[ 0];
+          if ((result__EEKH == (void *)NULL)) {
+            result__EEKH=new_lab__QOJ(new_size__4YGH);
+            next__CEKH=(void *)((unsigned long)result__EEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YGH)));
+            ((__POINTER *)next__CEKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DEKH)[ 0]=next__CEKH;
+          } else {
+            next__CEKH=((__POINTER *)result__EEKH)[ 0];
+            if ((next__CEKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EEKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__4YGH <<  1)) <=  4096)) {
+                next__CEKH=(void *)((unsigned long)result__EEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4YGH)));
               } else {
-                next__TZJH=new_lab__URJ(new_size__LNGH);
+                next__CEKH=new_lab__QOJ(new_size__4YGH);
               };
-              ((__POINTER *)next__TZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UZJH)[ 0]=next__TZJH;
+              ((__POINTER *)next__CEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DEKH)[ 0]=next__CEKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__EEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EEKH=next__CEKH;
+            };
+          };
+          ptr__RSSE=result__EEKH;
+        } else {
+          t__CZGH=((__UINTEGER_32 )typ_id__WSSE);
+          a__BZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TSSE + a__BZGH) & (__UINTEGER_32)(~ a__BZGH));
+          ptr_table__IEKH=((__POINTER )(&(table_type[(t__CZGH)])));
+          lab_type__KEKH=(__UINTEGER_32)(t__CZGH |  1);
+          next__HEKH=((__POINTER )(NULL));
+          result__JEKH=((__POINTER *)ptr_table__IEKH)[ 0];
+          if ((result__JEKH == (void *)NULL)) {
+            result__JEKH=new_lab__QOJ(lab_type__KEKH);
+            next__HEKH=(void *)((unsigned long)result__JEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LEKH)));
+            ((__POINTER *)next__HEKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IEKH)[ 0]=next__HEKH;
+          } else {
+            next__HEKH=((__POINTER *)result__JEKH)[ 0];
+            if ((next__HEKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JEKH - (unsigned long)begin_memory__3SH)))) &  4095) + (__UINTEGER_32)(new_size__LEKH <<  1)) <=  4096)) {
+                next__HEKH=(void *)((unsigned long)result__JEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LEKH)));
               } else {
-                next__YZJH=new_lab__URJ(lab_type__1ZJH);
+                next__HEKH=new_lab__QOJ(lab_type__KEKH);
               };
-              ((__POINTER *)next__YZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZZJH)[ 0]=next__YZJH;
+              ((__POINTER *)next__HEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IEKH)[ 0]=next__HEKH;
             } else {
-              ((__POINTER *)result__0ZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__0ZJH=next__YZJH;
+              ((__POINTER *)result__JEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JEKH=next__HEKH;
             };
           };
-          ptr__QKSE=result__0ZJH;
+          ptr__RSSE=result__JEKH;
         };
-        result__PKSE=((__LIP_VALUE *)ptr__QKSE);
-        *(result__PKSE) = *(LIP_VALUE__);
+        result__QSSE=((__LIP_VALUE *)ptr__RSSE);
+        *(result__QSSE) = *(LIP_VALUE__);
       };
-      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;
+      Self__T4WE=((__LIP_VALUE *)result__QSSE);
+      Self__T4WE->parent_lip_code__KEFE.parent_itm_object__NAE.position__RAJ=p__A0RE;
+      Self__T4WE->value__DUUE=result__4RPE;
+      result__CDFE=result__QSSE;
     };
   };
-  return(result__REFE);
+  return(result__CDFE);
 }
 
 //==========================//
diff --git a/lib2/collection/fast_array.li b/lib2/collection/fast_array.li
index 18ad360..0e075dd 100644
--- a/lib2/collection/fast_array.li
+++ b/lib2/collection/fast_array.li
@@ -372,7 +372,7 @@ Section Public
   );
   
   //
-  //
+  // Other.
   //
   
   - from_collection model:COLLECTION(V) <-
diff --git a/lib2/collection/low_level/collection.li b/lib2/collection/low_level/collection.li
index ce4f168..dc7f037 100644
--- a/lib2/collection/low_level/collection.li
+++ b/lib2/collection/low_level/collection.li
@@ -356,7 +356,7 @@ Section Public
   - has x:V :BOOLEAN <-
   // Look for `x' using `equal' for comparison.
   // 
-  // See also `fast_has', `index_of', `fast_index_of'.
+  // See also `fast_has', `index_of start', `fast_index_of start'.
   (
     valid_index (first_index_of x)
   );
@@ -364,7 +364,7 @@ Section Public
   - fast_has x:V :BOOLEAN <-
   // Look for `x' using basic `=' for comparison.
   // 
-  // See also `has', `fast_index_of', `index_of'.
+  // See also `has', `fast_index_of start', `index_of start'.
   (
     valid_index (fast_first_index_of x)
   );
diff --git a/shorter/javadoc.li b/shorter/javadoc.li
index 177a150..ac6f607 100644
--- a/shorter/javadoc.li
+++ b/shorter/javadoc.li
@@ -71,7 +71,7 @@
   
   - table_end := "</tbody></table>&nbsp;";
   
-  - sub_title := "</p><table summary=\"\" width=\"100%\" border=\"1\" cellpadding=\"3\" cellspacing=\"0\"><tbody><tr class=\"TableHeadingColor\" bgcolor=\"#ccccff\"><td colspan=\"1\"><font size=\"+2\"><b>" + token + "</b></font></td></tr></tbody></table>"; 
+  - sub_title := "</dl></p><table summary=\"\" width=\"100%\" border=\"1\" cellpadding=\"3\" cellspacing=\"0\"><tbody><tr class=\"TableHeadingColor\" bgcolor=\"#ccccff\"><td colspan=\"1\"><font size=\"+2\"><b>" + token + "</b></font></td></tr></tbody></table>"; 
   
   - slot_title := "</dl><a name=\"" + token + "\"><!-- --></a><hr><h3>" + token + "</h3><dl>";
   
@@ -93,6 +93,10 @@
   - garantie := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";
   - voir := "<dd><em><strong><font color=\"#707070\">" + token + "</font></strong></em></dd>";  
   
+  - prototype_comment_light := "<strong>" + token + "</strong><hr>";
+  - prototype_comment       := "<em>" + token + "</em>";
+  
+  
   //
   // Recursive Option.
   //
diff --git a/src/any.li b/src/any.li
index da11b11..4996c61 100644
--- a/src/any.li
+++ b/src/any.li
@@ -321,11 +321,10 @@ Section Public
   // String temporary.
   //
 
-  - string_tmp:STRING := STRING.create 256;
-  
-  - string_tmp2:STRING := STRING.create 256;
-  
-  - string_tmp3:STRING := STRING.create 256;
+  - string_tmp :STRING := STRING.create 256;  
+  - string_tmp2:STRING := STRING.create 256;  
+  - string_tmp3:STRING := STRING.create 256;  
+  - string_tmp4:STRING := STRING.create 256;
   
   //
   // Path directory and command front end.
diff --git a/src/item/itm_slot.li b/src/item/itm_slot.li
index b292c01..7d2d6dc 100644
--- a/src/item/itm_slot.li
+++ b/src/item/itm_slot.li
@@ -33,7 +33,11 @@ Section Inherit
   + parent_named:Expanded NAMED;
   
 Section Public
-      
+  
+  //
+  // Shorter information.
+  //
+  
   + comment:STRING_CONSTANT;
   
   - set_comment str:STRING_CONSTANT <-
@@ -41,6 +45,20 @@ Section Public
     comment := str;
   );
   
+  + comment_chapter:STRING_CONSTANT;
+  
+  - set_comment_chapter c:STRING_CONSTANT <-
+  (
+    comment_chapter := c;
+  );
+  
+  + stat_shorter:INTEGER_8;
+  
+  - set_stat_shorter s:INTEGER_8 <-
+  (
+    stat_shorter := s;
+  );
+  
   //
   // Profil
   //
diff --git a/src/parser.li b/src/parser.li
index 7cec04c..a421e70 100644
--- a/src/parser.li
+++ b/src/parser.li
@@ -38,9 +38,7 @@ Section Public
   //
   // Shorter Section.
   //
-  
-  - key_comment_default:STRING_CONSTANT;
-  
+    
   - is_active_short:BOOLEAN;
   
   - short_dico:HASHED_DICTIONARY[LINKED_LIST[STRING_CONSTANT],STRING_CONSTANT] :=
@@ -197,117 +195,63 @@ Section Private
   - last_string  : STRING_CONSTANT;
   - is_parameter_type:BOOLEAN;
   
-  - last_comment:STRING := STRING.create 256;
-  - is_catch_comment:BOOLEAN;
-  - catch_comment_on <-
-  (
-    is_catch_comment := TRUE;
-    last_comment.clear;
-  );
-  - catch_comment_off <-
-  (
-    is_catch_comment := FALSE;
-  );
-  
-  - read_comment:BOOLEAN <-
-  (
-    {(position > 2) && {source.item (position-1) <= ' '}}.while_do {
-      position := position - 1;
-    };
-  );
-  
+  - last_comment_extern:STRING_CONSTANT;
+  - last_comment_slot  :STRING_CONSTANT;
+  - skip_comment:BOOLEAN;
+      
   - read_space:BOOLEAN <-
-  ( + posold,pos,pos2:INTEGER;    
-    + key:STRING_CONSTANT;    
-    + short_line:INTEGER;
+  ( + posold,pos,pos2:INTEGER;     
     + level_comment:INTEGER;
+    + stat:INTEGER;
     
     pos := position;
     posold := -1;    
+    (is_shorter2).if {
+      string_tmp3.clear;
+      string_tmp4.clear;
+    };
     {posold = position}.until_do {
       posold := position;
-      
-      // BSBS: Bug que je n'ai pas trouvé !!!
-      (is_shorter).if {	
-	{(position > 2) && {source.item (position-1) <= ' '}}.while_do {
-	  position := position - 1;
-	};
-	short_line := 0;
-      };
+            
       // Skip spaces :            
       {(last_character = 0.to_character) || {last_character > ' '}}.until_do {
-	(is_shorter).if {
-	  (last_character = '\n').if {
-	    short_line := short_line + 1;	    
-	    (short_line = 2).if {
-              key_comment_default := ALIAS_STR.short_comment_line;
-              (is_shorter2).if {
-                catch_comment_off;
-              };
-	    };
-	  };
-	};
+        (is_shorter2).if {
+          (last_character = '\n').if {
+            (stat)
+            .when 0 then { stat := 1; }
+            .when 1 then { stat := 2; }
+            .when 2 then {            };      
+          };
+        };
 	position := position + 1;	
       };
       
       (position < source.upper).if {
 	// Skip C++ comment style :
-	((last_character = '/') & (source.item (position + 1) = '/')).if {	  
+	((last_character = '/') & (source.item (position + 1) = '/')).if {
 	  position := position + 2;
-          pos2 := position;
-	  (is_shorter).if {
-	    (is_active_short).if {
-	      short_remove (position-2) to (position-1);
-	      // '*' idf ':' string	      
-	      {last_character = ' '}.while_do { position := position + 1; };
-	      (last_character = '*').if {		
-		position := position + 1;
-		{last_character = ' '}.while_do { position := position + 1; };
-		(last_character.is_lower).if {		  
-		  string_tmp.clear;		
-		  {
-		    string_tmp.add_last last_character;
-		    position := position + 1;
-		  }.do_while {
-		    (last_character.is_lower) || 
-		    {last_character.is_digit} ||
-		    {last_character = '_'}
-		  };
-		  {last_character = ' '}.while_do { position := position + 1; };
-		  (last_character = ':').if {
-		    position := position + 1;
-		    key := ALIAS_STR.get string_tmp;		    
-		    short_remove (pos2+1) to position;
-		    pos2 := position;
-		  };
-		};
-	      };	 
-	    };
-          };
-          (is_catch_comment).if {
-            last_comment.add_last '\t';
-          };
+          pos2 := position;          
 	  { 
 	    (last_character = 0.to_character) || 
 	    {last_character = '\n'}
-          }.until_do {            
-            (is_catch_comment).if {                            
-              last_comment.add_last last_character;
+          }.until_do {                        
+            (is_shorter2).if {
+              (stat)
+              .when 0 or 1 then {                 
+                string_tmp3.add_last last_character;
+              }
+              .when 2 then {               
+                string_tmp4.add_last last_character;
+              };                               
             };
 	    position := position + 1;
           };
-          (is_catch_comment).if {
-            last_comment.add_last '\n';
+          (is_shorter2).if {
+            (stat)
+            .when 3 then { string_tmp3.add_last '\n'; }
+            .when 4 then { string_tmp4.add_last '\n'; };
           };
-          (key_comment_default = ALIAS_STR.short_comment_slot_line).if {
-            last_slot.set_comment (ALIAS_STR.get last_comment);
-          };
-          
-	  (key = NULL).if {
-	    short key_comment_default token pos2 to position;
-	  } else {
-	    short key token pos2 to position;
-	  };
+          position := position + 1;
 	};
       };
       (position < source.upper).if {
@@ -340,6 +284,16 @@ Section Private
 	};
       };
     };
+    ((is_shorter2) && {! skip_comment}).if {      
+      (string_tmp3.is_empty).if {
+        last_comment_slot := NULL;
+      } else {
+        last_comment_slot := ALIAS_STR.get string_tmp3;
+      };
+      (string_tmp4.is_empty).if_false {
+        last_comment_extern := ALIAS_STR.get string_tmp4;
+      };
+    };
     // FALSE : Last character.
     begin_position := position;
     ((position != pos) | (last_character != 0.to_character))
@@ -904,19 +858,13 @@ Section Private
     read_space;
     pos_sec := position;
     old_derive := short_derive;
-    
+    last_comment_extern := NULL;
     //
     // Read Section Header.
     //    
     (read_this_keyword (ALIAS_STR.keyword_section)).if_false {
       syntax_error (current_position,"`Section' is needed.");
     };
-    
-    key_comment_default := ALIAS_STR.short_comment_line;
-    (is_shorter2).if {
-      catch_comment_off;
-    };
-    
     (read_this_keyword (ALIAS_STR.section_header)).if_false {
       syntax_error (current_position,"Section `Header' is needed.");
     };    
@@ -926,10 +874,15 @@ Section Private
     {read_slot_header FALSE}.while_do {
     }; // loop
     
+    (is_shorter2).if {
+      object.set_comment_header last_comment_extern;
+    };
+        
     //
     // Read Section Other. 
     //
     {read_this_keyword (ALIAS_STR.keyword_section)}.while_do {
+      last_comment_extern := NULL;
       (read_keyword).if {
 	// Public, Private, ...
 	(ALIAS_STR.is_section last_string).if_false {
@@ -1006,12 +959,7 @@ Section Private
     (style != ' ').if {      
       //
       // Classic slot.
-      //
-      key_comment_default := ALIAS_STR.short_comment_slot_line;
-      (is_shorter2).if {
-        catch_comment_on;
-      };
-          
+      //                
       result := TRUE;
       //
       last_slot := read_type_slot;
@@ -1055,7 +1003,16 @@ Section Private
       last_slot.set_affect affect;
       
       (affect != ' ').if {
-	read_space;
+        read_space;
+        (is_shorter2).if {          
+          (last_comment_slot != NULL).if {
+            last_slot.set_comment last_comment_slot;
+          };
+          (last_comment_extern != NULL).if {
+            last_slot.set_comment_chapter last_comment_extern;
+          };
+          skip_comment := TRUE;
+        };               
 	old_pos    := position;
 	old_derive := short_derive;
 	read_def_slot;
@@ -1064,6 +1021,13 @@ Section Private
       (read_character ';').if_false {
 	warning_error (current_position,"Added ';'.");
       };
+      (is_shorter2).if {
+        skip_comment := FALSE;
+        read_space;
+        ((last_slot.comment = NULL) && {last_comment_slot != NULL}).if {
+          last_slot.set_comment last_comment_slot;
+        };
+      };
 	
       (is_shorter).if {
 	(
@@ -2602,7 +2566,10 @@ Section Private
 	};	
 	(read_string).if_false {
 	  syntax_error (current_position,"Incorrect string.");
-	};	
+        };	
+        (is_shorter2).if {
+          object.set_comment_slot last_string;
+        };
       } else {
 	warning_error (current_position,"Incorrect slot.");
       };
@@ -2719,8 +2686,7 @@ Section Private
       (read_identifier).if_false {
         syntax_error (current_position,"Identifier is incorrect.");
       };
-      pos := current_position;
-      catch_comment_on; 
+      pos := current_position;      
       n := last_string;
       (read_identifier).if {
         na := last_string;
@@ -2740,7 +2706,6 @@ Section Private
       (read_character '(').if_false {
         warning_error (current_position,"Added '(' is needed.");
       };      
-      catch_comment_off;
       cod := ALIAS_ARRAY[LIP_CODE].new;
       {(instr := readlip_expr) != NULL}.while_do {
         cod.add_last instr;
@@ -2755,10 +2720,10 @@ Section Private
       slot_code := LIP_SLOT_CODE.create pos section sec 
       name n argument data code cod;
       (sec = ALIAS_STR.section_public).if {
-        (last_comment.is_empty).if {
+        (last_comment_slot.is_empty).if {
           warning_error (pos,"Comment needed.");
         } else {
-          slot_code.set_comment (ALIAS_STR.get last_comment);
+          slot_code.set_comment (ALIAS_STR.get last_comment_slot);
         };
       };            
     };
@@ -3136,11 +3101,9 @@ Section Public
     pos_cur  := source.lower;
     pos_line := 1;
     pos_col  := 0;
-    catch_comment_off;
     
     (is_shorter).if {
-      is_active_short := TRUE;      
-      key_comment_default := ALIAS_STR.short_comment_header_line;
+      is_active_short := TRUE;            
       short_derive := 0;
       output_code.copy source;
       short_local := HASHED_SET[STRING_CONSTANT].create;
diff --git a/src/tools/alias_str.li b/src/tools/alias_str.li
index d604789..c80219a 100644
--- a/src/tools/alias_str.li
+++ b/src/tools/alias_str.li
@@ -209,7 +209,10 @@ Section Public
   - short_warning     :STRING_CONSTANT := "warning";
   - short_identifier  :STRING_CONSTANT := "identifier";
   - short_identifier_slot:STRING_CONSTANT := "identifier_slot";
-
+  
+  - short_prototype_comment_light:STRING_CONSTANT := "prototype_comment_light";
+  - short_prototype_comment:STRING_CONSTANT := "prototype_comment";
+ 
   - short_title       :STRING_CONSTANT := "title";
   - short_table_begin :STRING_CONSTANT := "table_begin";
   - short_table_item  :STRING_CONSTANT := "table_item";
@@ -488,6 +491,9 @@ Section Public
     list.add short_identifier;
     list.add short_identifier_slot;
     
+    list.add short_prototype_comment_light;
+    list.add short_prototype_comment;
+    
     list.add short_title;
     list.add short_table_begin;
     list.add short_table_item;
diff --git a/src/type/prototype.li b/src/type/prototype.li
index 4f1a76d..ca23e71 100644
--- a/src/type/prototype.li
+++ b/src/type/prototype.li
@@ -372,10 +372,31 @@ Section Public
   // Shorter.
   //
   
+  + comment_slot:STRING_CONSTANT;
+  + comment_header:STRING_CONSTANT;
+  
+  - set_comment_slot t:STRING_CONSTANT <-
+  (
+    comment_slot := t;
+  );
+
+  - set_comment_header t:STRING_CONSTANT <-
+  (
+    comment_header := t;
+  );
+  
   - shorter_out buf:STRING <-
-  ( 
+  ( + title:STRING_CONSTANT;
+    + s:ITM_SLOT;
     put name to buf like (ALIAS_STR.short_title);
     
+    (comment_slot != NULL).if {
+      put comment_slot to buf like (ALIAS_STR.short_prototype_comment_light);
+    };
+    (comment_header != NULL).if {
+      put comment_header to buf like (ALIAS_STR.short_prototype_comment);
+    };
+    
     list_tmp.clear;
     shorter_get_all_slot_in list_tmp;
     
@@ -388,9 +409,15 @@ Section Public
       sl.name.has_prefix "create"
     } title "Constructor Summary" in buf;    
     
-    shorter_table list_tmp select { sl:ITM_SLOT; 
-      (! sl.name.has_prefix "create") && {!sl.id_section.is_inherit_or_insert}
-    } title "Slot Summary" in buf;    
+    (list_tmp.lower).to (list_tmp.upper) do { j:INTEGER;
+      s := list_tmp.item j;
+      (s.stat_shorter = 0).if {
+        title := s.comment_chapter;        
+        shorter_table list_tmp select { sl:ITM_SLOT; 
+          sl.comment_chapter = title
+        } title title in buf;    
+      };
+    };
         
     // Detail.
     shorter_detail list_tmp select { sl:ITM_SLOT; 
@@ -400,11 +427,20 @@ Section Public
     shorter_detail list_tmp select { sl:ITM_SLOT; 
       sl.name.has_prefix "create"
     } title "Constructor Detail" in buf;    
-    
-    shorter_detail list_tmp select { sl:ITM_SLOT; 
-      (! sl.name.has_prefix "create") && {!sl.id_section.is_inherit_or_insert}
-    } title "Slot Detail" in buf;    
         
+    (list_tmp.lower).to (list_tmp.upper) do { j:INTEGER;
+      s := list_tmp.item j;
+      (s.stat_shorter = 1).if {
+        title := s.comment_chapter;        
+        shorter_detail list_tmp select { sl:ITM_SLOT; 
+          sl.comment_chapter = title
+        } title title in buf;    
+      };
+    };
+    
+    (list_tmp.lower).to (list_tmp.upper) do { j:INTEGER;
+      list_tmp.item j.set_stat_shorter 0;
+    };
   );
   
 Section PROTOTYPE
@@ -463,7 +499,7 @@ Section PROTOTYPE
       }).if {
         p := NULL;
         i := prototype_list.lower;
-        {(i <= prototype_list.upper) && {p = NULL}}.while_do {                              
+        {(i <= prototype_list.upper) && {p = NULL}}.while_do {
           (prototype_list.item i.name = ps.name).if {
             p := prototype_list.item i;
           };
@@ -485,11 +521,16 @@ Section PROTOTYPE
     is_first_cur := TRUE;    
     (lst.lower).to (lst.upper) do { i:INTEGER;
       s := lst.item i;
-      (sel.value s).if {
+      ((sel.value s) && {s.stat_shorter = 0}).if {
         (is_first_cur).if {
-          put t to buf like (ALIAS_STR.short_table_begin);
+          (t = NULL).if {
+            put "Slot Summary" to buf like (ALIAS_STR.short_table_begin);
+          } else {
+            put t to buf like (ALIAS_STR.short_table_begin);
+          };
           is_first_cur := FALSE;
         };
+        s.set_stat_shorter 1;
         string_tmp.clear;
         string_tmp2.clear;
         s.pretty_name_in string_tmp2;
@@ -531,11 +572,16 @@ Section PROTOTYPE
     is_first := TRUE;
     (lst.lower).to (lst.upper) do { i:INTEGER;
       s := lst.item i;
-      (sel.value s).if {
+      ((sel.value s) && {s.stat_shorter = 1}).if {
         (is_first).if {
-          put t to buf like (ALIAS_STR.short_sub_title);
+          (t = NULL).if {
+            put "Detail slot" to buf like (ALIAS_STR.short_sub_title);
+          } else {
+            put t to buf like (ALIAS_STR.short_sub_title);
+          };
           is_first := FALSE;
         };
+        s.set_stat_shorter 2;
         //
         string_tmp2.clear;
         s.pretty_name_in string_tmp2;
@@ -543,7 +589,7 @@ Section PROTOTYPE
         string_tmp.copy (s.position.prototype.filename);
         string_tmp.append " line #";
         s.position.line.append_in string_tmp;
-        put string_tmp to buf like (ALIAS_STR.short_prototype_path);
+        put string_tmp to buf like (ALIAS_STR.short_prototype_path);                
         //
         put "Section:" to buf like (ALIAS_STR.short_subsub_title);
         string_tmp.clear;

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list