[SCM] Lisaac compiler branch, master, updated. 9541536bdb20c4177ea49719c160175f24b6a207

Benoit Sonntag sonntag at icps.u-strasbg.fr
Fri Jul 31 02:58:13 UTC 2009


The following commit has been merged in the master branch:
commit 9541536bdb20c4177ea49719c160175f24b6a207
Author: Benoit Sonntag <sonntag at icps.u-strasbg.fr>
Date:   Fri Jul 31 04:58:05 2009 +0200

    Shorter end

diff --git a/bin/shorter.c b/bin/shorter.c
index 1fa480e..7f9b2fa 100644
--- a/bin/shorter.c
+++ b/bin/shorter.c
@@ -80,8 +80,8 @@ typedef struct STRING_struct __STRING;
 struct STRING_struct {
   unsigned long __id;
   __INTEGER count__EGC;
-  __INTEGER capacity__T3R;
-  __CHARACTER *storage__23R;
+  __INTEGER capacity__24R;
+  __CHARACTER *storage__F5R;
 };
 __STRING STRING_={__STRING__};
 #define STRING__ (&STRING_)
@@ -97,8 +97,8 @@ typedef unsigned long __UINTEGER_32;
 typedef struct ARRAYED_COLLECTIONoSTRINGo_struct __ARRAYED_COLLECTIONoSTRINGo;
 struct ARRAYED_COLLECTIONoSTRINGo_struct {
   __INTEGER upper__UKC;
-  __INTEGER capacity__HCT;
-  void **storage__SCT;
+  __INTEGER capacity__QDT;
+  void **storage__1DT;
 };
 __ARRAYED_COLLECTIONoSTRINGo ARRAYED_COLLECTIONoSTRINGo_;
 #define ARRAYED_COLLECTIONoSTRINGo__ (&ARRAYED_COLLECTIONoSTRINGo_)
@@ -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__3DV;
-  __INTEGER capacity__SJV;
-  void **storage__EIV;
+  __INTEGER upper__GFV;
+  __INTEGER capacity__1KV;
+  void **storage__NJV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MONOo ARRAYED_COLLECTIONoITM_TYPE_MONOo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MONOo__ (&ARRAYED_COLLECTIONoITM_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__TYT;
-  void *item__GZT;
-  void *next__4YT;
+  void *key__2ZT;
+  void *item__P0T;
+  void *next__H0T;
 };
 __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__CYT;
-  __INTEGER count__5AZ;
-  void **buckets__HYT;
+  __INTEGER capacity__LZT;
+  __INTEGER count__ICZ;
+  void **buckets__QZT;
 };
 __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__QMO;
+  __CHARACTER *storage__ZNO;
 };
 __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__R4OD;
-  __INTEGER capacity__MAPD;
-  void **storage__HBPD;
+  __INTEGER upper__H4OD;
+  __INTEGER capacity__CAPD;
+  void **storage__3APD;
 };
 __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__L2I;
+  __ARRAYED_COLLECTIONoSTRING_CONSTANTo parent_arrayed_collection__U3I;
 };
 __FAST_ARRAYoSTRING_CONSTANTo FAST_ARRAYoSTRING_CONSTANTo_;
 #define FAST_ARRAYoSTRING_CONSTANTo__ (&FAST_ARRAYoSTRING_CONSTANTo_)
@@ -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__FVR;
-  void *next__RVR;
+  void *item__OWR;
+  void *next__0WR;
 };
 __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__UUR;
-  __INTEGER count__0VR;
-  void **buckets__ZUR;
+  __INTEGER capacity__3VR;
+  __INTEGER count__DXR;
+  void **buckets__CWR;
 };
 __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__RAJ;
+  __POSITION position__0BJ;
 };
 __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__25T;
+  __CHARACTER style__FBU;
 };
 __NAMED NAMED_;
 #define NAMED__ (&NAMED_)
@@ -258,16 +258,16 @@ struct PROTOTYPE_struct {
   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;
+  void *shortname__2FE;
+  void *default_value__KSE;
+  void *type_c__FUE;
+  __INTEGER index__MLG;
+  void *filename__LOG;
+  void *first_slot__DEZB;
+  void *comment_header__I4QC;
+  void *comment_slot__QRTC;
+  void *idf_generic_list__LKE;
+  void *slot_list__ASS;
 };
 __PROTOTYPE PROTOTYPE_;
 #define PROTOTYPE__ (&PROTOTYPE_)
@@ -279,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__UYR;
-  void *next__5YR;
+  void *key__3ZR;
+  void *next__I0R;
 };
 __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo_)
@@ -289,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__DYR;
-  __INTEGER count__IZR;
-  void **buckets__IYR;
+  __INTEGER capacity__MZR;
+  __INTEGER count__R0R;
+  void **buckets__RZR;
 };
 __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoTYPExSTRING_CONSTANTo_)
@@ -303,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__TBS;
+  __UINTEGER_8 flag__2CS;
 };
 __TYPE_FULL TYPE_FULL_;
 #define TYPE_FULL__ (&TYPE_FULL_)
@@ -321,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__N0R;
-  __INTEGER capacity__P0R;
-  void **storage__L1R;
+  __INTEGER upper__W1R;
+  __INTEGER capacity__Y1R;
+  void **storage__U2R;
 };
 __ARRAYED_COLLECTIONoTYPE_IDo ARRAYED_COLLECTIONoTYPE_IDo_;
 #define ARRAYED_COLLECTIONoTYPE_IDo__ (&ARRAYED_COLLECTIONoTYPE_IDo_)
@@ -342,7 +342,7 @@ __FAST_ARRAYoTYPE_IDo FAST_ARRAYoTYPE_IDo_;
 typedef struct ENTRY_struct __ENTRY;
 struct ENTRY_struct {
   void *path__BD;
-  void *name__QJT;
+  void *name__ZKT;
 };
 __ENTRY ENTRY_;
 #define ENTRY__ (&ENTRY_)
@@ -360,7 +360,7 @@ __ENTRY_UNIX ENTRY_UNIX_;
 #define __DIRECTORY__ 22
 typedef struct DIRECTORY_struct __DIRECTORY;
 struct DIRECTORY_struct {
-  void *list__4DRD;
+  void *list__UDRD;
 };
 __DIRECTORY DIRECTORY_;
 #define DIRECTORY__ (&DIRECTORY_)
@@ -380,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__G5S;
-  void *next__R5S;
-  void *item__0T3;
+  void *key__PAT;
+  void *next__0AT;
+  void *item__DV3;
 };
 __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_)
@@ -391,9 +391,9 @@ __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DI
 #define __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ 24
 typedef struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo;
 struct HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_struct {
-  __INTEGER capacity__V4S;
-  __INTEGER count__1HY;
-  void **buckets__04S;
+  __INTEGER capacity__45S;
+  __INTEGER count__EJY;
+  void **buckets__DAT;
 };
 __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo_)
@@ -408,13 +408,13 @@ struct ITM_SLOT_struct {
   unsigned long __id;
   __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;
+  void *comment__1ZOB;
+  void *result_type__B4FC;
+  void *next__ZGHC;
+  void *comment_chapter__T0HC;
+  __CHARACTER affect__Q5FC;
+  void *argument_list__RDHC;
+  __INTEGER_8 stat_shorter__JKTD;
 };
 __ITM_SLOT ITM_SLOT_={__ITM_SLOT__};
 #define ITM_SLOT__ (&ITM_SLOT_)
@@ -424,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__VR5B;
-  __INTEGER priority_and_level__BYHC;
-  void *pretty_name__MYHC;
+  __ITM_SLOT parent_itm_slot__BT5B;
+  __INTEGER priority_and_level__VZHC;
+  void *pretty_name__A0HC;
 };
 __ITM_SLOT_OPERATOR ITM_SLOT_OPERATOR_={__ITM_SLOT_OPERATOR__};
 #define ITM_SLOT_OPERATOR__ (&ITM_SLOT_OPERATOR_)
@@ -435,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__ZWDC;
-  void *type_list__IVFC;
+  void *name__NYDC;
+  void *type_list__2WFC;
 };
 __SECTION_ SECTION__;
 #define SECTION___ (&SECTION__)
@@ -445,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__MXS;
-  void *item__OOOB;
-  void *next__YXS;
+  void *key__VYS;
+  void *item__YPOB;
+  void *next__BZS;
 };
 __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo_)
@@ -456,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__1WS;
-  __INTEGER count__BYS;
-  void **buckets__AXS;
+  __INTEGER capacity__EYS;
+  __INTEGER count__KZS;
+  void **buckets__JYS;
 };
 __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_;
 #define HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__ (&HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo_)
@@ -477,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__FSEC;
-  void *first_link__1REC;
-  void *last_link__ESEC;
-  void *mem_lnk__HSEC;
+  __INTEGER mem_idx__ZTEC;
+  void *first_link__PTEC;
+  void *last_link__YTEC;
+  void *mem_lnk__1TEC;
 };
 __LINKED_LISToSTRING_CONSTANTo LINKED_LISToSTRING_CONSTANTo_;
 #define LINKED_LISToSTRING_CONSTANTo__ (&LINKED_LISToSTRING_CONSTANTo_)
@@ -498,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__N0M;
+  __ITM_OBJECT parent_itm_code__W1M;
 };
 __ITM_ARGUMENT ITM_ARGUMENT_;
 #define ITM_ARGUMENT__ (&ITM_ARGUMENT_)
@@ -507,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__V3GC;
-  __INTEGER capacity__X3GC;
-  void **storage__T4GC;
+  __INTEGER upper__J5GC;
+  __INTEGER capacity__L5GC;
+  void **storage__HAHC;
 };
 __ARRAYED_COLLECTIONoITM_ARGUMENTo ARRAYED_COLLECTIONoITM_ARGUMENTo_;
 #define ARRAYED_COLLECTIONoITM_ARGUMENTo__ (&ARRAYED_COLLECTIONoITM_ARGUMENTo_)
@@ -518,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__U4YB;
+  __ARRAYED_COLLECTIONoITM_ARGUMENTo parent_arrayed_collection__AAZB;
 };
 __FAST_ARRAYoITM_ARGUMENTo FAST_ARRAYoITM_ARGUMENTo_;
 #define FAST_ARRAYoITM_ARGUMENTo__ (&FAST_ARRAYoITM_ARGUMENTo_)
@@ -528,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__1FP;
+  void *list_type__EHP;
 };
 __ITM_TYPE_MULTI ITM_TYPE_MULTI_={__ITM_TYPE_MULTI__};
 #define ITM_TYPE_MULTI__ (&ITM_TYPE_MULTI_)
@@ -538,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__OFV;
+  void *value_list__XGV;
 };
 __ITM_EXPRESSION ITM_EXPRESSION_={__ITM_EXPRESSION__};
 #define ITM_EXPRESSION__ (&ITM_EXPRESSION_)
@@ -548,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__DJFC;
+  void *value__XKFC;
 };
 __ITM_RESULT ITM_RESULT_={__ITM_RESULT__};
 #define ITM_RESULT__ (&ITM_RESULT_)
@@ -557,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__G5FC;
-  void *item__Z5FC;
-  void *next__R5FC;
+  void *key__0AGC;
+  void *item__NBGC;
+  void *next__FBGC;
 };
 __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo_)
@@ -568,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__L2BC;
-  __INTEGER count__FNGC;
-  void **buckets__04FC;
+  __INTEGER capacity__X3BC;
+  __INTEGER count__ZOGC;
+  void **buckets__OAGC;
 };
 __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo_)
@@ -580,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__RIN;
-  void *type_result__1IN;
+  void *type_argument__0JN;
+  void *type_result__EKN;
 };
 __ITM_TYPE_BLOCK ITM_TYPE_BLOCK_={__ITM_TYPE_BLOCK__};
 #define ITM_TYPE_BLOCK__ (&ITM_TYPE_BLOCK_)
@@ -591,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__FUP;
+  void *name__OVP;
 };
 __ITM_TYPE_SIMPLE ITM_TYPE_SIMPLE_={__ITM_TYPE_SIMPLE__};
 #define ITM_TYPE_SIMPLE__ (&ITM_TYPE_SIMPLE_)
@@ -601,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__2NN;
-  void *style__OUP;
+  __ITM_TYPE_SIMPLE parent_itm_type_simple__FPN;
+  void *style__XVP;
 };
 __ITM_TYPE_STYLE ITM_TYPE_STYLE_={__ITM_TYPE_STYLE__};
 #define ITM_TYPE_STYLE__ (&ITM_TYPE_STYLE_)
@@ -612,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__3NN;
-  void *list_type__YUP;
+  __ITM_TYPE_STYLE parent_itm_type_style__GPN;
+  void *list_type__BWP;
 };
 __ITM_TYPE_GENERIC ITM_TYPE_GENERIC_={__ITM_TYPE_GENERIC__};
 #define ITM_TYPE_GENERIC__ (&ITM_TYPE_GENERIC_)
@@ -623,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__NDHB;
-  void *name__SYHC;
-  void *type__TYHC;
+  __ITM_ARGUMENT parent_itm_argument__XEHB;
+  void *name__G0HC;
+  void *type__H0HC;
 };
 __ITM_ARG ITM_ARG_={__ITM_ARG__};
 #define ITM_ARG__ (&ITM_ARG_)
@@ -635,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__R5EE;
-  void *type__MYPF;
-  void *name__LYPF;
+  __ITM_ARGUMENT parent_itm_argument__FAFE;
+  void *type__X2PF;
+  void *name__W2PF;
 };
 __ITM_ARGS ITM_ARGS_={__ITM_ARGS__};
 #define ITM_ARGS__ (&ITM_ARGS_)
@@ -647,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__LAE;
+  __ITM_TYPE_SIMPLE parent_itm_type__UBE;
 };
 __ITM_TYPE_PARAMETER ITM_TYPE_PARAMETER_={__ITM_TYPE_PARAMETER__};
 #define ITM_TYPE_PARAMETER__ (&ITM_TYPE_PARAMETER_)
@@ -657,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__05E;
-  __POINTER stream__0HRD;
+  __ENTRY_UNIX parent_entry_unix__DBF;
+  __POINTER stream__QHRD;
 };
 __FILE_UNIX FILE_UNIX_={__FILE_UNIX__};
 #define FILE_UNIX__ (&FILE_UNIX_)
@@ -667,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__G5AC;
-  __INTEGER capacity__I5AC;
-  void **storage__EABC;
+  __INTEGER upper__SABC;
+  __INTEGER capacity__UABC;
+  void **storage__QBBC;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__ (&ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo_)
@@ -678,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__BJE;
+  __ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo parent_arrayed_collection__KKE;
 };
 __FAST_ARRAYoITM_TYPE_PARAMETERo FAST_ARRAYoITM_TYPE_PARAMETERo_;
 #define FAST_ARRAYoITM_TYPE_PARAMETERo__ (&FAST_ARRAYoITM_TYPE_PARAMETERo_)
@@ -687,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__NAE;
+  __ITM_OBJECT parent_itm_object__WBE;
 };
 __LIP_CODE LIP_CODE_;
 #define LIP_CODE__ (&LIP_CODE_)
@@ -697,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__PRPB;
-  void *name__NEFC;
-  void *value__5EFC;
+  __LIP_CODE parent_lip_code__ZSPB;
+  void *name__BGFC;
+  void *value__TGFC;
 };
 __LIP_AFFECT LIP_AFFECT_={__LIP_AFFECT__};
 #define LIP_AFFECT__ (&LIP_AFFECT_)
@@ -709,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__SY4B;
-  void *argument__ZJUE;
-  void *name__EKUE;
+  __LIP_CODE parent_lip_code__4Z4B;
+  void *argument__ZLUE;
+  void *name__EMUE;
 };
 __LIP_CALL LIP_CALL_={__LIP_CALL__};
 #define LIP_CALL__ (&LIP_CALL_)
@@ -721,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__QOYC;
-  void *condition__WBQD;
-  void *then__MCQD;
-  void *else__DDQD;
+  __LIP_CODE parent_lip_code__HQYC;
+  void *condition__MBQD;
+  void *then__CCQD;
+  void *else__ZCQD;
 };
 __LIP_IF LIP_IF_={__LIP_IF__};
 #define LIP_IF__ (&LIP_IF_)
@@ -734,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__CPYC;
-  void *message__IOUE;
+  __LIP_CODE parent_lip_code__ZQYC;
+  void *message__IQUE;
 };
 __LIP_PRINT LIP_PRINT_={__LIP_PRINT__};
 #define LIP_PRINT__ (&LIP_PRINT_)
@@ -744,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__OAV;
-  void *next__ZAV;
+  void *item__XBV;
+  void *next__CCV;
 };
 __HASHED_SET_NODEoSTRING_CONSTANTo HASHED_SET_NODEoSTRING_CONSTANTo_;
 #define HASHED_SET_NODEoSTRING_CONSTANTo__ (&HASHED_SET_NODEoSTRING_CONSTANTo_)
@@ -754,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__FET;
-  __INTEGER count__LDY;
-  void **buckets__CAV;
+  __INTEGER capacity__OFT;
+  __INTEGER count__UEY;
+  void **buckets__LBV;
 };
 __HASHED_SEToSTRING_CONSTANTo HASHED_SEToSTRING_CONSTANTo_;
 #define HASHED_SEToSTRING_CONSTANTo__ (&HASHED_SEToSTRING_CONSTANTo_)
@@ -765,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__FAE;
+  __ITM_OBJECT parent_itm_object__OBE;
 };
 __ITM_CODE ITM_CODE_;
 #define ITM_CODE__ (&ITM_CODE_)
@@ -774,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__MEL;
-  __INTEGER capacity__VTT;
-  void **storage__AUT;
+  __INTEGER upper__VFL;
+  __INTEGER capacity__4UT;
+  void **storage__JVT;
 };
 __ARRAYED_COLLECTIONoITM_CODEo ARRAYED_COLLECTIONoITM_CODEo_;
 #define ARRAYED_COLLECTIONoITM_CODEo__ (&ARRAYED_COLLECTIONoITM_CODEo_)
@@ -785,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__5QF;
+  __ARRAYED_COLLECTIONoITM_CODEo parent_arrayed_collection__ISF;
 };
 __FAST_ARRAYoITM_CODEo FAST_ARRAYoITM_CODEo_;
 #define FAST_ARRAYoITM_CODEo__ (&FAST_ARRAYoITM_CODEo_)
@@ -794,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__SCQD;
-  __INTEGER capacity__UQTD;
-  void **storage__5QTD;
+  __INTEGER upper__ICQD;
+  __INTEGER capacity__GQTD;
+  void **storage__RQTD;
 };
 __ARRAYED_COLLECTIONoLIP_CODEo ARRAYED_COLLECTIONoLIP_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_CODEo__ (&ARRAYED_COLLECTIONoLIP_CODEo_)
@@ -805,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__5KYC;
+  __ARRAYED_COLLECTIONoLIP_CODEo parent_arrayed_collection__WMYC;
 };
 __FAST_ARRAYoLIP_CODEo FAST_ARRAYoLIP_CODEo_;
 #define FAST_ARRAYoLIP_CODEo__ (&FAST_ARRAYoLIP_CODEo_)
@@ -823,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__TTRD;
-  void **buckets__YTRD;
+  __INTEGER capacity__NTRD;
+  void **buckets__STRD;
 };
 __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__ (&HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo_)
@@ -834,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__RMZB;
-  void *left__CYQD;
-  void *right__FYQD;
-  __CHARACTER operator__IYQD;
+  __LIP_CODE parent_lip_code__3NZB;
+  void *left__YXQD;
+  void *right__1XQD;
+  __CHARACTER operator__4XQD;
 };
 __LIP_BINARY LIP_BINARY_={__LIP_BINARY__};
 #define LIP_BINARY__ (&LIP_BINARY_)
@@ -847,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__AY4B;
-  void *value__50QD;
-  __CHARACTER operator__C1QD;
+  __LIP_CODE parent_lip_code__MZ4B;
+  void *value__V0QD;
+  __CHARACTER operator__Y0QD;
 };
 __LIP_UNARY LIP_UNARY_={__LIP_UNARY__};
 #define LIP_UNARY__ (&LIP_UNARY_)
@@ -859,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__ZD4F;
+  __INTEGER value__EI4F;
 };
 __LIP_INTEGER LIP_INTEGER_={__LIP_INTEGER__};
 #define LIP_INTEGER__ (&LIP_INTEGER_)
@@ -869,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__RLUE;
+  void *value__RNUE;
 };
 __LIP_STRING LIP_STRING_={__LIP_STRING__};
 #define LIP_STRING__ (&LIP_STRING_)
@@ -878,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__NYH;
-  void *name__OZK;
+  __ITM_OBJECT parent_itm_object__WZH;
+  void *name__X0K;
 };
 __ITM_LOCAL ITM_LOCAL_;
 #define ITM_LOCAL__ (&ITM_LOCAL_)
@@ -888,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__LXK;
-  __INTEGER capacity__KGU;
-  void **storage__VGU;
+  __INTEGER upper__UYK;
+  __INTEGER capacity__THU;
+  void **storage__4HU;
 };
 __ARRAYED_COLLECTIONoITM_LOCALo ARRAYED_COLLECTIONoITM_LOCALo_;
 #define ARRAYED_COLLECTIONoITM_LOCALo__ (&ARRAYED_COLLECTIONoITM_LOCALo_)
@@ -899,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__SYH;
+  __ARRAYED_COLLECTIONoITM_LOCALo parent_arrayed_collection__1ZH;
 };
 __FAST_ARRAYoITM_LOCALo FAST_ARRAYoITM_LOCALo_;
 #define FAST_ARRAYoITM_LOCALo__ (&FAST_ARRAYoITM_LOCALo_)
@@ -984,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__QLBC;
-  void *item__I3GD;
-  void *next__1LBC;
+  void *key__2MBC;
+  void *item__J4GD;
+  void *next__HNBC;
 };
 __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo_)
@@ -995,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__5KBC;
-  __INTEGER count__EMBC;
-  void **buckets__ELBC;
+  __INTEGER capacity__LMBC;
+  __INTEGER count__QNBC;
+  void **buckets__QMBC;
 };
 __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__ (&HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo_)
@@ -1007,8 +1007,8 @@ __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo HASHED_DICTIONARYoPROTOTYPExSTRIN
 typedef struct ARRAYED_COLLECTIONoPROTOTYPEo_struct __ARRAYED_COLLECTIONoPROTOTYPEo;
 struct ARRAYED_COLLECTIONoPROTOTYPEo_struct {
   __INTEGER upper__HJ;
-  __INTEGER capacity__Y4T;
-  void **storage__FPT;
+  __INTEGER capacity__BAU;
+  void **storage__OQT;
 };
 __ARRAYED_COLLECTIONoPROTOTYPEo ARRAYED_COLLECTIONoPROTOTYPEo_;
 #define ARRAYED_COLLECTIONoPROTOTYPEo__ (&ARRAYED_COLLECTIONoPROTOTYPEo_)
@@ -1035,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__GWHD;
-  void *next__4MOD;
+  void *item__HXHD;
+  void *next__UMOD;
 };
 __LINKED_LIST_NODEoSTRING_CONSTANTo LINKED_LIST_NODEoSTRING_CONSTANTo_;
 #define LINKED_LIST_NODEoSTRING_CONSTANTo__ (&LINKED_LIST_NODEoSTRING_CONSTANTo_)
@@ -1054,7 +1054,7 @@ __TYPE TYPE_;
 #define __ARRAYED_COLLECTIONoSLOTo__ 66
 typedef struct ARRAYED_COLLECTIONoSLOTo_struct __ARRAYED_COLLECTIONoSLOTo;
 struct ARRAYED_COLLECTIONoSLOTo_struct {
-  __INTEGER capacity__PAS;
+  __INTEGER capacity__YBS;
 };
 __ARRAYED_COLLECTIONoSLOTo ARRAYED_COLLECTIONoSLOTo_;
 #define ARRAYED_COLLECTIONoSLOTo__ (&ARRAYED_COLLECTIONoSLOTo_)
@@ -1072,7 +1072,7 @@ __FAST_ARRAYoSLOTo FAST_ARRAYoSLOTo_;
 #define __LINKED_COLLECTIONoENTRYo__ 68
 typedef struct LINKED_COLLECTIONoENTRYo_struct __LINKED_COLLECTIONoENTRYo;
 struct LINKED_COLLECTIONoENTRYo_struct {
-  __INTEGER upper__EM3D;
+  __INTEGER upper__YM3D;
 };
 __LINKED_COLLECTIONoENTRYo LINKED_COLLECTIONoENTRYo_;
 #define LINKED_COLLECTIONoENTRYo__ (&LINKED_COLLECTIONoENTRYo_)
@@ -1081,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__3DRD;
-  __INTEGER mem_idx__IFWE;
-  void *first_link__BFWE;
-  void *mem_lnk__JFWE;
-  void *last_link__KFWE;
+  __LINKED_COLLECTIONoENTRYo parent_linked_collection__TDRD;
+  __INTEGER mem_idx__IHWE;
+  void *first_link__BHWE;
+  void *mem_lnk__JHWE;
+  void *last_link__KHWE;
 };
 __LINKED_LISToENTRYo LINKED_LISToENTRYo_;
 #define LINKED_LISToENTRYo__ (&LINKED_LISToENTRYo_)
@@ -1094,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__HYWE;
-  void *next__YTFF;
+  void *item__T0WE;
+  void *next__PWFF;
 };
 __LINKED_LIST_NODEoENTRYo LINKED_LIST_NODEoENTRYo_;
 #define LINKED_LIST_NODEoENTRYo__ (&LINKED_LIST_NODEoENTRYo_)
@@ -1104,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__YQV;
-  __INTEGER capacity__TUV;
-  void **storage__OVV;
+  __INTEGER upper__BSV;
+  __INTEGER capacity__2VV;
+  void **storage__XWV;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1115,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__EQP;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo parent_arrayed_collection__NRP;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__ (&FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1133,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__V1V;
-  void *next__B2V;
+  void *item__42V;
+  void *next__K3V;
 };
 __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_)
@@ -1143,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__E1V;
-  __INTEGER count__YDW;
-  void **buckets__J1V;
+  __INTEGER capacity__N2V;
+  __INTEGER count__BFW;
+  void **buckets__S2V;
 };
 __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_;
 #define HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__ (&HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo_)
@@ -1154,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__RFP;
-  __INTEGER capacity__QXV;
-  void **storage__1XV;
+  __INTEGER upper__0GP;
+  __INTEGER capacity__ZYV;
+  void **storage__EZV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_MULTIo ARRAYED_COLLECTIONoITM_TYPE_MULTIo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_MULTIo__ (&ARRAYED_COLLECTIONoITM_TYPE_MULTIo_)
@@ -1165,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__HFP;
+  __ARRAYED_COLLECTIONoITM_TYPE_MULTIo parent_arrayed_collection__QGP;
 };
 __FAST_ARRAYoITM_TYPE_MULTIo FAST_ARRAYoITM_TYPE_MULTIo_;
 #define FAST_ARRAYoITM_TYPE_MULTIo__ (&FAST_ARRAYoITM_TYPE_MULTIo_)
@@ -1174,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__DIN;
-  __INTEGER capacity__ZFV;
-  void **storage__EGV;
+  __INTEGER upper__MJN;
+  __INTEGER capacity__CHV;
+  void **storage__NHV;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__ (&ARRAYED_COLLECTIONoITM_TYPE_BLOCKo_)
@@ -1185,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__ZHN;
+  __ARRAYED_COLLECTIONoITM_TYPE_BLOCKo parent_arrayed_collection__CJN;
 };
 __FAST_ARRAYoITM_TYPE_BLOCKo FAST_ARRAYoITM_TYPE_BLOCKo_;
 #define FAST_ARRAYoITM_TYPE_BLOCKo__ (&FAST_ARRAYoITM_TYPE_BLOCKo_)
@@ -1194,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__JTF;
+  __ITM_CODE parent_itm_code__SUF;
 };
 __ITM_CONSTANT ITM_CONSTANT_;
 #define ITM_CONSTANT__ (&ITM_CONSTANT_)
@@ -1204,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__ANO;
+  __ITM_CONSTANT parent_itm_constant__JOO;
 };
 __ITM_REAL ITM_REAL_={__ITM_REAL__};
 #define ITM_REAL__ (&ITM_REAL_)
@@ -1214,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__SNO;
+  __ITM_CONSTANT parent_itm_constant__1OO;
 };
 __ITM_NUMBER ITM_NUMBER_={__ITM_NUMBER__};
 #define ITM_NUMBER__ (&ITM_NUMBER_)
@@ -1224,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__EOO;
+  __ITM_CONSTANT parent_itm_constant__NPO;
 };
 __ITM_CHARACTER ITM_CHARACTER_={__ITM_CHARACTER__};
 #define ITM_CHARACTER__ (&ITM_CHARACTER_)
@@ -1234,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__VOO;
+  __ITM_CONSTANT parent_itm_constant__4PO;
 };
 __ITM_STRING ITM_STRING_={__ITM_STRING__};
 #define ITM_STRING__ (&ITM_STRING_)
@@ -1243,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__1TP;
-  __INTEGER capacity__G3V;
-  void **storage__R3V;
+  __INTEGER upper__EVP;
+  __INTEGER capacity__P4V;
+  void **storage__04V;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_GENERICo ARRAYED_COLLECTIONoITM_TYPE_GENERICo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_GENERICo__ (&ARRAYED_COLLECTIONoITM_TYPE_GENERICo_)
@@ -1254,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__RTP;
+  __ARRAYED_COLLECTIONoITM_TYPE_GENERICo parent_arrayed_collection__0UP;
 };
 __FAST_ARRAYoITM_TYPE_GENERICo FAST_ARRAYoITM_TYPE_GENERICo_;
 #define FAST_ARRAYoITM_TYPE_GENERICo__ (&FAST_ARRAYoITM_TYPE_GENERICo_)
@@ -1263,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__KKR;
-  __INTEGER capacity__OHW;
-  void **storage__ZHW;
+  __INTEGER upper__TLR;
+  __INTEGER capacity__XIW;
+  void **storage__CJW;
 };
 __ARRAYED_COLLECTIONoITM_TYPE_STYLEo ARRAYED_COLLECTIONoITM_TYPE_STYLEo_;
 #define ARRAYED_COLLECTIONoITM_TYPE_STYLEo__ (&ARRAYED_COLLECTIONoITM_TYPE_STYLEo_)
@@ -1274,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__AKR;
+  __ARRAYED_COLLECTIONoITM_TYPE_STYLEo parent_arrayed_collection__JLR;
 };
 __FAST_ARRAYoITM_TYPE_STYLEo FAST_ARRAYoITM_TYPE_STYLEo_;
 #define FAST_ARRAYoITM_TYPE_STYLEo__ (&FAST_ARRAYoITM_TYPE_STYLEo_)
@@ -1284,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__I2E;
+  __ITM_CODE parent_itm_code__R3E;
 };
 __ITM_LIST ITM_LIST_={__ITM_LIST__};
 #define ITM_LIST__ (&ITM_LIST_)
@@ -1293,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__EXT;
-  __INTEGER capacity__PEU;
-  void **storage__0EU;
+  __INTEGER upper__NYT;
+  __INTEGER capacity__YFU;
+  void **storage__DGU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo_)
@@ -1304,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__YOI;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo parent_arrayed_collection__BQI;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__ (&FAST_ARRAYoFAST_ARRAYoITM_LOCALoo_)
@@ -1322,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__DST;
-  __INTEGER capacity__V1T;
-  void **storage__R2T;
+  __INTEGER upper__MTT;
+  __INTEGER capacity__42T;
+  void **storage__03T;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo_)
@@ -1333,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__O1H;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo parent_arrayed_collection__X2H;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_CODEoo FAST_ARRAYoFAST_ARRAYoITM_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoITM_CODEoo_)
@@ -1351,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__NOU;
-  __INTEGER capacity__SQU;
-  void **storage__3QU;
+  __INTEGER upper__WPU;
+  __INTEGER capacity__1RU;
+  void **storage__GSU;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1362,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__Z1K;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo parent_arrayed_collection__C3K;
 };
 __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_;
 #define FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__ (&FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1381,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__05I;
+  __ITM_CODE parent_itm_code__DBJ;
 };
 __ITM_LIST_IDF ITM_LIST_IDF_={__ITM_LIST_IDF__};
 #define ITM_LIST_IDF__ (&ITM_LIST_IDF_)
@@ -1391,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__4RF;
+  __ITM_CODE parent_itm_constant__HTF;
 };
 __ITM_LDOTS ITM_LDOTS_={__ITM_LDOTS__};
 #define ITM_LDOTS__ (&ITM_LDOTS_)
@@ -1401,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__KTF;
+  __ITM_CONSTANT parent_itm_constant__TUF;
 };
 __ITM_PROTOTYPE ITM_PROTOTYPE_={__ITM_PROTOTYPE__};
 #define ITM_PROTOTYPE__ (&ITM_PROTOTYPE_)
@@ -1410,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__PAJ;
+  __ITM_CODE parent_itm_code__YBJ;
 };
 __ITM_WRITE ITM_WRITE_;
 #define ITM_WRITE__ (&ITM_WRITE_)
@@ -1420,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__QAJ;
+  __ITM_WRITE parent_itm_write__ZBJ;
 };
 __ITM_WRITE_VALUE ITM_WRITE_VALUE_={__ITM_WRITE_VALUE__};
 #define ITM_WRITE_VALUE__ (&ITM_WRITE_VALUE_)
@@ -1430,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__HBJ;
+  __ITM_WRITE parent_itm_write__QCJ;
 };
 __ITM_WRITE_CAST ITM_WRITE_CAST_={__ITM_WRITE_CAST__};
 #define ITM_WRITE_CAST__ (&ITM_WRITE_CAST_)
@@ -1440,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__UDJ;
+  __ITM_CODE parent_itm_code__3EJ;
 };
 __ITM_READ ITM_READ_={__ITM_READ__};
 #define ITM_READ__ (&ITM_READ_)
@@ -1450,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__SEJ;
+  __ITM_WRITE parent_itm_write__1FJ;
 };
 __ITM_WRITE_CODE ITM_WRITE_CODE_={__ITM_WRITE_CODE__};
 #define ITM_WRITE_CODE__ (&ITM_WRITE_CODE_)
@@ -1460,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__UBL;
-  void *name__5EL;
+  __ITM_CODE parent_itm_code__3CL;
+  void *name__IGL;
 };
 __ITM_OPERATOR ITM_OPERATOR_={__ITM_OPERATOR__};
 #define ITM_OPERATOR__ (&ITM_OPERATOR_)
@@ -1471,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__0EL;
+  __ITM_READ parent_itm_read__DGL;
 };
 __ITM_READ_ARG1 ITM_READ_ARG1_={__ITM_READ_ARG1__};
 #define ITM_READ_ARG1__ (&ITM_READ_ARG1_)
@@ -1481,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__HHL;
+  __ITM_READ parent_itm_read__QIL;
 };
 __ITM_READ_ARG2 ITM_READ_ARG2_={__ITM_READ_ARG2__};
 #define ITM_READ_ARG2__ (&ITM_READ_ARG2_)
@@ -1491,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__VYL;
+  __ITM_CODE parent_itm_code__4ZL;
 };
 __ITM_OLD ITM_OLD_={__ITM_OLD__};
 #define ITM_OLD__ (&ITM_OLD_)
@@ -1500,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__J0M;
+  __ITM_CODE parent_itm_code__S1M;
 };
 __ITM_EXTERN ITM_EXTERN_;
 #define ITM_EXTERN__ (&ITM_EXTERN_)
@@ -1510,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__K0M;
-  __BOOLEAN is_persistant__HDN;
+  __ITM_EXTERN parent_itm_extern__T1M;
+  __BOOLEAN is_persistant__QEN;
 };
 __ITM_EXTERNAL_TYPE ITM_EXTERNAL_TYPE_={__ITM_EXTERNAL_TYPE__};
 #define ITM_EXTERNAL_TYPE__ (&ITM_EXTERNAL_TYPE_)
@@ -1521,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__XKDC;
+  void *list__LMDC;
 };
 __ITM_BLOCK ITM_BLOCK_={__ITM_BLOCK__};
 #define ITM_BLOCK__ (&ITM_BLOCK_)
@@ -1531,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__PBN;
+  __ITM_EXTERN parent_itm_extern__YCN;
 };
 __ITM_EXTERNAL ITM_EXTERNAL_={__ITM_EXTERNAL__};
 #define ITM_EXTERNAL__ (&ITM_EXTERNAL_)
@@ -1541,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__F5N;
+  __ITM_READ parent_itm_read__OAO;
 };
 __ITM_READ_ARGS ITM_READ_ARGS_={__ITM_READ_ARGS__};
 #define ITM_READ_ARGS__ (&ITM_READ_ARGS_)
@@ -1550,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__RAQF;
-  void *next__3AQF;
+  void *item__2EQF;
+  void *next__IFQF;
 };
 __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1560,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__AAQF;
-  __INTEGER count__XEQF;
-  void **buckets__FAQF;
+  __INTEGER capacity__LEQF;
+  __INTEGER count__CJQF;
+  void **buckets__QEQF;
 };
 __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_;
 #define HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__ (&HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo_)
@@ -1571,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__FAXE;
-  __INTEGER capacity__HEXE;
-  void **storage__SEXE;
+  __INTEGER upper__RCXE;
+  __INTEGER capacity__TGXE;
+  void **storage__4GXE;
 };
 __ARRAYED_COLLECTIONoLIP_INTEGERo ARRAYED_COLLECTIONoLIP_INTEGERo_;
 #define ARRAYED_COLLECTIONoLIP_INTEGERo__ (&ARRAYED_COLLECTIONoLIP_INTEGERo_)
@@ -1582,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__URSE;
+  __ARRAYED_COLLECTIONoLIP_INTEGERo parent_arrayed_collection__UTSE;
 };
 __FAST_ARRAYoLIP_INTEGERo FAST_ARRAYoLIP_INTEGERo_;
 #define FAST_ARRAYoLIP_INTEGERo__ (&FAST_ARRAYoLIP_INTEGERo_)
@@ -1591,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__OOPF;
-  __INTEGER capacity__SVPF;
-  void **storage__3VPF;
+  __INTEGER upper__VSPF;
+  __INTEGER capacity__3ZPF;
+  void **storage__I0PF;
 };
 __ARRAYED_COLLECTIONoLIP_STRINGo ARRAYED_COLLECTIONoLIP_STRINGo_;
 #define ARRAYED_COLLECTIONoLIP_STRINGo__ (&ARRAYED_COLLECTIONoLIP_STRINGo_)
@@ -1602,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__YVFF;
+  __ARRAYED_COLLECTIONoLIP_STRINGo parent_arrayed_collection__PYFF;
 };
 __FAST_ARRAYoLIP_STRINGo FAST_ARRAYoLIP_STRINGo_;
 #define FAST_ARRAYoLIP_STRINGo__ (&FAST_ARRAYoLIP_STRINGo_)
@@ -1612,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__FCQD;
+  __BOOLEAN value__1BQD;
 };
 __LIP_BOOLEAN LIP_BOOLEAN_={__LIP_BOOLEAN__};
 #define LIP_BOOLEAN__ (&LIP_BOOLEAN_)
@@ -1625,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__KEFE;
-  void *value__DUUE;
+  __LIP_CODE parent_lip_code__4EFE;
+  void *value__DWUE;
 };
 __LIP_VALUE LIP_VALUE_={__LIP_VALUE__};
 #define LIP_VALUE__ (&LIP_VALUE_)
@@ -1635,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__IPTD;
-  __INTEGER capacity__JBUD;
-  void **storage__FCUD;
+  __INTEGER upper__0OTD;
+  __INTEGER capacity__1AUD;
+  void **storage__XBUD;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo_)
@@ -1646,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__RKID;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo parent_arrayed_collection__SLID;
 };
 __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_;
 #define FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__ (&FAST_ARRAYoFAST_ARRAYoLIP_CODEoo_)
@@ -1691,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__UXPF;
-  __INTEGER capacity__13PF;
-  void **storage__G4PF;
+  __INTEGER upper__51PF;
+  __INTEGER capacity__GCQF;
+  void **storage__RCQF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_DATAo ARRAYED_COLLECTIONoLIP_SLOT_DATAo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_DATAo__ (&ARRAYED_COLLECTIONoLIP_SLOT_DATAo_)
@@ -1702,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__CTUE;
+  __ARRAYED_COLLECTIONoLIP_SLOT_DATAo parent_arrayed_collection__CVUE;
 };
 __FAST_ARRAYoLIP_SLOT_DATAo FAST_ARRAYoLIP_SLOT_DATAo_;
 #define FAST_ARRAYoLIP_SLOT_DATAo__ (&FAST_ARRAYoLIP_SLOT_DATAo_)
@@ -1720,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__VSKF;
-  __INTEGER capacity__2YPF;
-  void **storage__HZPF;
+  __INTEGER upper__MVKF;
+  __INTEGER capacity__H3PF;
+  void **storage__S3PF;
 };
 __ARRAYED_COLLECTIONoLIP_SLOT_CODEo ARRAYED_COLLECTIONoLIP_SLOT_CODEo_;
 #define ARRAYED_COLLECTIONoLIP_SLOT_CODEo__ (&ARRAYED_COLLECTIONoLIP_SLOT_CODEo_)
@@ -1731,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__LSKF;
+  __ARRAYED_COLLECTIONoLIP_SLOT_CODEo parent_arrayed_collection__CVKF;
 };
 __FAST_ARRAYoLIP_SLOT_CODEo FAST_ARRAYoLIP_SLOT_CODEo_;
 #define FAST_ARRAYoLIP_SLOT_CODEo__ (&FAST_ARRAYoLIP_SLOT_CODEo_)
@@ -1740,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__FNEC;
-  void *item__YNEC;
-  void *next__QNEC;
+  void *key__ZOEC;
+  void *item__MPEC;
+  void *next__EPEC;
 };
 __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo_)
@@ -1751,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__UMEC;
-  __INTEGER count__WWFC;
-  void **buckets__ZMEC;
+  __INTEGER capacity__IOEC;
+  __INTEGER count__KYFC;
+  void **buckets__NOEC;
 };
 __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_;
 #define HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__ (&HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo_)
@@ -1762,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__4PEC;
-  void *key__LPEC;
-  void *next__WPEC;
+  void *item__SREC;
+  void *key__5QEC;
+  void *next__KREC;
 };
 __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_)
@@ -1773,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__0OEC;
-  __INTEGER count__QZFC;
-  void **buckets__5OEC;
+  __INTEGER capacity__OQEC;
+  __INTEGER count__E1FC;
+  void **buckets__TQEC;
 };
 __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_)
@@ -1784,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__HRGC;
-  __INTEGER capacity__PIHC;
-  void **storage__0IHC;
+  __INTEGER upper__1SGC;
+  __INTEGER capacity__DKHC;
+  void **storage__OKHC;
 };
 __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_;
 #define ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__ (&ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1795,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__KR1B;
+  __ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo parent_arrayed_collection__WS1B;
 };
 __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_;
 #define FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__ (&FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo_)
@@ -1813,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__NKTD;
-  __INTEGER capacity__E1VE;
-  void **storage__5HWE;
+  __INTEGER upper__5JTD;
+  __INTEGER capacity__E3VE;
+  void **storage__HKWE;
 };
 __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define ARRAYED_COLLECTIONoITM_SLOTo__ (&ARRAYED_COLLECTIONoITM_SLOTo_)
@@ -1824,7 +1824,7 @@ __ARRAYED_COLLECTIONoITM_SLOTo ARRAYED_COLLECTIONoITM_SLOTo_;
 #define __FAST_ARRAYoITM_SLOTo__ 121
 typedef struct FAST_ARRAYoITM_SLOTo_struct __FAST_ARRAYoITM_SLOTo;
 struct FAST_ARRAYoITM_SLOTo_struct {
-  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__QJTD;
+  __ARRAYED_COLLECTIONoITM_SLOTo parent_arrayed_collection__CJTD;
 };
 __FAST_ARRAYoITM_SLOTo FAST_ARRAYoITM_SLOTo_;
 #define FAST_ARRAYoITM_SLOTo__ (&FAST_ARRAYoITM_SLOTo_)
@@ -1873,25 +1873,25 @@ void *table_type[122];
 //==========================//
 
 void *parent_numeric__J;
-__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;
+__POINTER begin_memory__GUH;
+__UINTEGER_32 nb_page__LQJ;
+__UINTEGER_64 capacity_max__U34;
+void *first_free__BCVB;
+__INTEGER type_error__FMG;
+void *msg_err__GMG;
 void *prototype_list__BJ;
-void *prototype_dico__KPS;
-void *list_tmp__RJTD;
-void *str_tmp__IH4E;
-void *str_tmp2__KJ4E;
-void *str_tmp3__KN4E;
+void *prototype_dico__TQS;
+void *list_tmp__DJTD;
+void *str_tmp__UJ4E;
+void *str_tmp2__WL4E;
+void *str_tmp3__WP4E;
 void *list_id__CBB;
 void *string_tmp__AFD;
-void *string_tmp2__AYAC;
+void *string_tmp2__MZAC;
 void *alias__RFD;
-void *string_tmp3__GYAC;
-void *bucket_name__XQOB;
-void *bucket_list__SSOB;
+void *string_tmp3__SZAC;
+void *bucket_name__BSOB;
+void *bucket_list__2TOB;
 void *short_dico__QD;
 void *object__ZBC;
 void *source__5BC;
@@ -1906,42 +1906,42 @@ 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;
+__BOOLEAN skip_comment__A4D;
+void *last_comment_slot__S4D;
+__INTEGER begin_position__I5D;
+__BOOLEAN is_parameter_type__5HE;
+void *last_group__SSF;
+__INTEGER old_position__QPI;
+__INTEGER old_pos_cur__SPI;
+__INTEGER old_pos_line__UPI;
+__INTEGER old_pos_col__WPI;
+__INTEGER old_short_derive__YPI;
+__INTEGER_64 last_integer__3OO;
+void *last_slot__0UOB;
+void *dico__RGP;
+void *dico__DJN;
+void *type_void__VUF;
+void *dico__5RI;
+void *type_self__LRN;
+void *type_null__DSN;
+void *dico__KLR;
+void *dico__1UP;
+void *list_data__IONC;
+void *stack__DVUE;
+void *list_method__DVKF;
+void *storage__VTSE;
+void *storage__QYFF;
 __UINTEGER_32 clone_allocation_size__NTB;
-__POINTER get_begin_memory__G5PB;
+__POINTER get_begin_memory__SAQB;
 void *list__FK;
-void *free__2JP;
+void *free__FLP;
 void *string_tmp__VH;
 void *output_code__SI;
 void *string_tmp3__0SD;
 void *string_tmp4__2SD;
-void *output_decl__LCE;
-void *string_tmp2__F3I;
-void *path_file__P0WF;
+void *output_decl__UDE;
+void *string_tmp2__O4I;
+void *path_file__04WF;
 __BOOLEAN is_short_recursive__JB;
 __BOOLEAN is_shorter2__VI;
 __BOOLEAN is_shorter__LZ;
@@ -1954,23 +1954,23 @@ void *input_name__3B;
 void *proto_input__BI;
 void *output_name__DI;
 void *format_name__N1;
-void *string_tmp__3RX;
+void *string_tmp__GTX;
 __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;
+void *free_list__ORP;
+void *empty_list__VSP;
+void *bucket__ATP;
+void *free_list__CQI;
+void *free_list__Y2H;
+void *free_list__D3K;
+void *empty_list__HHMF;
+void *bucket__RHMF;
+void *true__4RLF;
+void *free_list__TLID;
+__INTEGER last_integer__1TUE;
+void *last_string__NUUE;
+__BOOLEAN push_back_flag__OTMF;
+__CHARACTER memory__N5LF;
+void *free_list__XS1B;
 
 //==========================//
 // STRING CONSTANT          //
@@ -2137,7 +2137,7 @@ __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,"------------------\
+__STRING_CONSTANT __string_157={__STRING_CONSTANT__,1989,"------------------\
 ----------------------------------------------\n--                   Lisaac \
 source Shorter                    --\n--            LORIA - LSIIT - ULP - CN\
 RS - FRANCE             --\n--         Benoit SONNTAG - sonntag at icps.u-stras\
@@ -2146,25 +2146,25 @@ bg.fr         --\n--                   http://www.IsaacOS.com               \
 age:                                                      \n  shorter <input\
 _file[.li]> [Options]                       \n                              \
                               \nOptions:                                    \
-                \n  -o <output>      : output file or directory             \
-  \n                     (default: <input_file.ext>)            \n  -p      \
-         : include `Section Private'              \n  -c               : inc\
-lude code source                    \n  -r               : recursive builder\
- documentation        \n  -f <format_file> : formatting description file    \
-        \n                     (see `/lisaac/shorter/')               \n  -d\
-               : Lisaac doc style (no -c, -r)           \n                  \
-                                          \nExamples:                       \
-                            \n  * Output format file:                       \
-              \n    shorter -c -p -f latex hello_world.li                   \
-\n                                                            \n  * Build ht\
-ml documentation:                               \n    shorter -r -f html ~/l\
-isaac/lib                         \n                                        \
-                    \n  * Build html documentation style JavaDoc:           \
-      \n    shorter -d -f javadoc ~/lisaac/lib                         \n   \
-                                                         \nBug report:      \
-                                           \n            post in : https://g\
-na.org/bugs/?group=isaac     \n            mail to : sonntag at icps.u-strasbg.\
-fr             \n"};
+                \n  -o <output>      : output file or directory    <DEPRECAT\
+ED> \n                     (default: <input_file.ext>)            \n  -p    \
+           : include `Section Private'              \n  -c               : i\
+nclude code source         <DEPRECATED> \n  -r               : recursive bui\
+lder documentation <DEPRECATED> \n  -f <format_file> : formatting descriptio\
+n file            \n                     (see `/lisaac/shorter/')           \
+    \n  -d               : Lisaac doc style (no -c, -r)           \n        \
+                                                    \nExamples:             \
+                                      \n  * Output format file:             \
+                        \n    shorter -c -p -f latex hello_world.li  <DEPREC\
+ATED>     \n                                                            \n  \
+* Build html documentation:                               \n    shorter -r -\
+f html ~/lisaac/lib        <DEPRECATED>     \n                              \
+                              \n  * Build html documentation style JavaDoc: \
+                \n    shorter -d -f javadoc ~/lisaac/lib                    \
+     \n                                                            \nBug rep\
+ort:                                                 \n            post in :\
+ https://gna.org/bugs/?group=isaac     \n            mail to : sonntag at icps.\
+u-strasbg.fr             \n"};
 __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 `"};
@@ -2451,211 +2451,211 @@ __STRING_CONSTANT __string_334={__STRING_CONSTANT__,15,"Type incorrect."};
 void print_string(char *str);
 // Source code
 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 __POINTER new_lab__ZPJ(__UINTEGER_32 t__1PJ);
+static void** create__DERB(__INTEGER nb_elements__FERB);
+static void add_last__3IT(__STRING *Self__4IT,__CHARACTER ch__5IT);
+static void add_last__2OV(__FAST_ARRAYoSTRINGo *Self__3OV,void *element__4OV);
+static __INTEGER prime_number_ceiling__T11(__INTEGER integer__V11);
+static void** create__T43(__INTEGER nb_elements__V43);
+static void** create__RITC(__INTEGER nb_elements__TITC);
+static void** create__QDSB(__INTEGER nb_elements__SDSB);
+static void** create__3C4(__INTEGER nb_elements__5C4);
+static void** create__IW2(__INTEGER nb_elements__KW2);
+static void** create__WHRB(__INTEGER nb_elements__YHRB);
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__MCR(__INTEGER new_count__OCR);
+static void** create__XWBB(__INTEGER nb_elements__ZWBB);
+static void** create__WJXB(__INTEGER nb_elements__YJXB);
+static void** create__RSWB(__INTEGER nb_elements__TSWB);
+static void** create__QQXB(__INTEGER nb_elements__SQXB);
+static void** create__RE5(__INTEGER nb_elements__TE5);
+static void fast_put__to__PLZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__QLZ,void *v__RLZ,void *k__SLZ);
+static void** create__2FYB(__INTEGER nb_elements__4FYB);
+static void* get__QRI(void *n__SRI);
+static void** create__OFQB(__INTEGER nb_elements__QFQB);
+static void** create__4ZPB(__INTEGER nb_elements__A0PB);
+static void** create__A2ZB(__INTEGER nb_elements__C2ZB);
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__LHRC(__INTEGER new_count__NHRC);
+static void** create__EGUF(__INTEGER nb_elements__GGUF);
+static void** create__SIGF(__INTEGER nb_elements__UIGF);
+static void** create__5JYF(__INTEGER nb_elements__BKYF);
+static void** create__UYIE(__INTEGER nb_elements__WYIE);
+static void* new_page__K34();
+static void to_busy__index__4SFC(__MEMORY *Self__5SFC,__UINTEGER_32 sz__ATFC,__UINTEGER_32 idx__BTFC);
+static void** create__02XC(__INTEGER nb_elements__22XC);
+static void** create__3BYC(__INTEGER nb_elements__5BYC);
+static void** create__VMBD(__INTEGER nb_elements__XMBD);
+static void** create__UCFF(__INTEGER nb_elements__WCFF);
+static void** create__3G2(__INTEGER nb_elements__5G2);
+static void add__MVR(__HASHED_SEToABSTRACT_STRINGo *Self__NVR,void *e__OVR);
 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 copy__35R(__STRING *Self__45R,void *other__55R);
+static void append__FLS(__STRING *Self__GLS,void *other__HLS);
 static void* parent_directory__1ED();
-static void* get_entry__0XAC(void *p__2XAC);
-static void put_string__CZF(void *s__EZF);
+static void* get_entry__GZAC(void *p__IZAC);
+static void put_string__L0F(void *s__N0F);
 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 __BOOLEAN read_identifier__E4K();
+static __POSITION current_position__AWF();
+static void put_error__text__BMG(__INTEGER type__DMG,void *txt__EMG);
+static void put_position__LNG(__POSITION Self__MNG);
+static __BOOLEAN read_symbol__GVJ(void *st__IVJ);
+static __BOOLEAN read_short_elt__JIKB();
+static void fast_put__to__2YR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__3YR,void *k__5YR);
 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** create__AWNB(__INTEGER nb_elements__CWNB);
+static void add_last__S1R(__FAST_ARRAYoTYPE_IDo *Self__T1R,void *element__U1R);
+static __BOOLEAN open__FDRD(__DIRECTORY_UNIX *Self__GDRD);
+static void check_in__begin__0QQC(void *entry__2QQC,__INTEGER n__3QQC);
+static void* add_ext__L5E(void *n__N5E);
 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 resize__UUZ(__STRING *Self__VUZ,__INTEGER new_count__WUZ);
+static void move__to__by__MVCC(__CHARACTER *Self__NVCC,__INTEGER lower__OVCC,__INTEGER upper__PVCC,__INTEGER offset__QVCC);
+static __BOOLEAN __infix_equal_equal__02DB(__STRING_CONSTANT *Self__12DB,void *other__22DB);
+static void* at__MI4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NI4,void *k__OI4);
 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 put__to__like__C0XD(void *tok__E0XD,void *buf__F0XD,void *key__G0XD);
+static void shorter_get_all_slot_in__E2XD(__PROTOTYPE *Self__F2XD,void *lst__G2XD);
+static void pretty_name_in__ER4F(__ITM_SLOT *Self__FR4F,void *buffer__GR4F);
+static void pretty_name_in__ZS4F(__ITM_SLOT_OPERATOR *Self__0S4F,void *buffer__1S4F);
+static void get_all_comment_slot__in__UF4E(__PROTOTYPE *Self__VF4E,void *n__WF4E,void *buf__XF4E);
+static void shorter_comment__in__light__HJ4E(void *str__JJ4E,void *buf__KJ4E,__BOOLEAN is_light__LJ4E);
+static void append_in__FHH(__UINTEGER_32 Self__GHH,void *buffer__HHH);
+static void append_in__RU4F(__SECTION_ *Self__SU4F,void *buf__TU4F);
+static void shorter_profile_in__TV4F(__ITM_SLOT *Self__UV4F,void *buf__VV4F);
+static void shorter_profile_in__QW4F(__ITM_SLOT_OPERATOR *Self__RW4F,void *buf__SW4F);
+static __CHARACTER* create__3IEB(__INTEGER nb_elements__5IEB);
+static __POINTER realloc_dynamic__old_size__new_size__LELC(__POINTER p__NELC,__UINTEGER_32 old_sz__OELC,__UINTEGER_32 new_sz__PELC);
+static void** create__35QB(__INTEGER nb_elements__55QB);
+static void* fast_reference_at__2YT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__3YT,void *k__4YT);
+static void** create__TIHE(__INTEGER nb_elements__VIHE);
+static __BOOLEAN has__XMW(__HASHED_SEToABSTRACT_STRINGo *Self__YMW,void *e__ZMW);
+static void increase_capacity__2ONB(__HASHED_SEToABSTRACT_STRINGo *Self__3ONB);
+static void put_string__5FF(void *s__BGF);
+static __BOOLEAN fast_has__K3X(__HASHED_SEToABSTRACT_STRINGo *Self__L3X,void *e__M3X);
+static void* physical_get_entry__QAF(void *new_path__SAF);
+static void put__to__VXS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__WXS,void *v__XXS,void *k__YXS);
+static void reduce_path__K3HC(void *st__M3HC);
+static void* reference_at__NV0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__OV0C,void *k__PV0C);
+static void* physical_get_entry__BY0C(void *new_path__DY0C);
+static void** create__4Z1C(__INTEGER nb_elements__A01C);
+static void** create__HRSC(__INTEGER nb_elements__JRSC);
 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);
+static __INTEGER first_substring_index__BVZE(__STRING *Self__CVZE);
+static __BOOLEAN read_string__PCQ();
+static void reduce_path__ZI3E(void *st__1I3E);
+static void* item__NYPE(__DIRECTORY_UNIX *Self__OYPE,__INTEGER i__PYPE);
+static void* item__CZND(__LINKED_LISToSTRING_CONSTANTo *Self__DZND,__INTEGER i__EZND);
+static void** create__PZ3(__INTEGER nb_elements__RZ3);
+static __BOOLEAN read_word__HOF(void *st__JOF);
+static __BOOLEAN read_slot_header__JBE(__BOOLEAN first__LBE);
+static void* get_name__YROB(void *n__0ROB);
+static void* read_type_list__MJO(__PARSER *Self__NJO,__BOOLEAN is_section__OJO);
+static __INTEGER hash_code__L20(__FAST_ARRAYoITM_TYPE_MONOo *Self__M20);
+static __CHARACTER read_style__OQF();
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__SJ5B(__INTEGER new_count__UJ5B);
+static void* read_loc_arg__with_self__GBHB(__PARSER *Self__HBHB,__BOOLEAN mute__IBHB,__BOOLEAN self_first__JBHB);
+static void* read_slot_operator__YS5B(void *list_arg__0S5B);
+static void add_last__F5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__G5GC,void *element__H5GC);
+static void* read_slot_keyword__FY5B(void *list_arg__HY5B);
+static void** create__HRBD(__INTEGER nb_elements__JRBD);
+static void set_argument_list__ACHC(__ITM_SLOT *Self__BCHC,void *p__CCHC);
+static __ITM_TYPE_MULTI* get__GGP(void *lt__IGP);
+static void* read_type__K5L(__PARSER *Self__L5L,__BOOLEAN is_local__M5L);
+static void set_result_type__X2FC(__ITM_SLOT *Self__Y2FC,void *t__Z2FC);
+static void* read_contract__4RF(__PARSER *Self__5RF);
+static void* read_expr__L3I(__PARSER *Self__M3I);
+static void set_value__type__EFHC(__ITM_SLOT *Self__FFHC,void *e__GFHC,void *p__HFHC);
+static __POSITION position__GB5B(__ITM_EXPRESSION *Self__HB5B);
+static __POSITION position__QIHC(__ITM_RESULT *Self__RIHC);
+static void fast_put__to__MNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__NNGC,void *v__ONGC,void *k__PNGC);
+static void* fast_reference_at__15FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__25FC,void *k__35FC);
+static void* fast_reference_at__LHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MHNE,void *k__NHNE);
+static void append_in__0EPD(__ITM_TYPE_BLOCK *Self__1EPD,void *buffer__2EPD);
+static void append_in__4FPD(__ITM_TYPE_GENERIC *Self__5FPD,void *buffer__AGPD);
+static void put__to__like__IGBG(void *tok__KGBG,void *buf__LGBG,void *key__MGBG);
+static void shorter_in__JDBG(__ITM_ARG *Self__KDBG,void *buf__LDBG);
+static void shorter_in__AEBG(__ITM_ARGS *Self__BEBG,void *buf__CEBG);
+static void shorter_in__ZMDG(__ITM_TYPE_PARAMETER *Self__0MDG,void *buf__1MDG);
+static void shorter_in__KNDG(__ITM_TYPE_SIMPLE *Self__LNDG,void *buf__MNDG);
+static void shorter_raw_in__LVFG(__ITM_TYPE_MULTI *Self__MVFG,void *buf__NVFG);
+static void shorter_in__1NDG(__ITM_TYPE_BLOCK *Self__2NDG,void *buf__3NDG);
+static void shorter_in__DPDG(__ITM_TYPE_GENERIC *Self__EPDG,void *buf__FPDG);
+static void put__to__like__HTFG(void *tok__JTFG,void *buf__KTFG,void *key__LTFG);
+static void put__to__like__RTDG(void *tok__TTDG,void *buf__UTDG,void *key__VTDG);
+static void set_path__SKT(__DIRECTORY_UNIX *Self__TKT,void *n__UKT);
+static void set_path__NLT(__FILE_UNIX *Self__OLT,void *n__PLT);
+static void insert_string__to__WUU(__STRING *Self__XUU,void *s__YUU,__INTEGER i__ZUU);
+static void read_escape_character__AZKF();
+static __BOOLEAN read_cap_identifier__VXJ();
+static void add_last__OABC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__PABC,void *element__QABC);
+static __BOOLEAN read_external__EQO();
+static void* read_expr_primary__M1M(__PARSER *Self__N1M);
+static __BOOLEAN read_integer__EZP();
+static void* readlip_expr__ZRPB();
+static void run__1FFC(__LIP_AFFECT *Self__2FFC);
+static void run__RLUE(__LIP_CALL *Self__SLUE);
+static void run__IBQD(__LIP_IF *Self__JBQD);
+static void run__FQUE(__LIP_PRINT *Self__GQUE);
+static void add_last__WKV(__FAST_ARRAYoITM_TYPE_MONOo *Self__XKV,void *element__YKV);
+static void* alias__KSP(void *tmp__MSP);
+static void add__AJHB(__HASHED_SEToSTRING_CONSTANTo *Self__BJHB,void *e__CJHB);
+static void add_last__35OD(__FAST_ARRAYoSTRING_CONSTANTo *Self__45OD,void *element__55OD);
+static void free__WP5(void *tmp__YP5);
+static void free__AKQ(void *tmp__CKQ);
+static __INTEGER hash_code__MORF(__FAST_ARRAYoSTRING_CONSTANTo *Self__NORF);
+static void copy__Q1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R1RD,void *other__S1RD);
+static __BOOLEAN read_operator__OKM();
+static void* operator__name__BBO(void *typ__DBO,void *op__EBO);
+static void append_in__NHBC(__ITM_TYPE_MULTI *Self__OHBC,void *buffer__PHBC);
+static void* read_prototype__LLN(__PARSER *Self__MLN,void *styl__NLN);
+static void read_def_local__UZH(__PARSER *Self__VZH);
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__5TI(__INTEGER new_count__BUI);
+static void add_last__Q2U(__FAST_ARRAYoITM_CODEo *Self__R2U,void *element__S2U);
+static void* copy__H4H(void *tmp__J4H);
+static __BOOLEAN fast_has__ZAV(__HASHED_SEToSTRING_CONSTANTo *Self__0AV,void *e__1AV);
+static void restore_context__MBL();
+static void* read_expr_message__TTL(__PARSER *Self__UTL);
+static void free__FUI(void *tmp__HUI);
+static void display_raw__NLIC(__ITM_TYPE_MULTI *Self__OLIC,void *buffer__PLIC);
+static void put__to__like__TKGG(void *tok__VKGG,void *buf__WKGG,void *key__XKGG);
+static void put__to__like__MRDG(void *tok__ORDG,void *buf__PRDG,void *key__QRDG);
+static void put__to__like__FOFG(void *tok__HOFG,void *buf__IOFG);
+static void put__to__like__YQFG(void *tok__0QFG,void *buf__1QFG,void *key__2QFG);
+static __BOOLEAN is_hexadecimal_digit__GMJE(__CHARACTER Self__HMJE);
+static void* read_constant__5NO();
+static void* read_group__H4GB(__PARSER *Self__I4GB);
+static void* readlip_expr_operator__NMZB(__PARSER *Self__OMZB);
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QRKD(__INTEGER new_count__SRKD);
+static void add_last__UJUD(__FAST_ARRAYoLIP_CODEo *Self__VJUD,void *element__WJUD);
+static void* copy__VMID(void *tmp__XMID);
+static void* fast_reference_at__4SRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__5SRD,void *k__ATRD);
+static void* run_expr__SXQD(__LIP_BINARY *Self__TXQD);
+static void* run_expr__R0QD(__LIP_UNARY *Self__S0QD);
+static void* run_expr__DSUE(__LIP_CALL *Self__ESUE);
+static void* get__LTSE(__LIP_INTEGER *Self__MTSE,__INTEGER i__NTSE);
+static void* get__GYFF(__LIP_STRING *Self__HYFF,void *str__IYFF);
+static void free__223F(__LIP_INTEGER *Self__323F);
+static void free__KBIG(__LIP_STRING *Self__LBIG);
+static void load_directory__is_recursive__K3WF(__LIP_CALL *Self__L3WF,void *path__M3WF,__BOOLEAN is_rec__N3WF);
+static void append_in__EIIG(__LIP_STRING *Self__FIIG,void *str__GIIG);
+static void print_positif__UALG(__INTEGER Self__VALG);
+static __BOOLEAN has__RIMB(__HASHED_SEToSTRING_CONSTANTo *Self__SIMB,void *e__TIMB);
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__THK(__INTEGER new_count__VHK);
+static void add_last__BZU(__FAST_ARRAYoITM_LOCALo *Self__CZU,void *element__DZU);
+static void free__ZHK(void *tmp__1HK);
+static void* copy__C2J(void *tmp__E2J);
+static void** create__RRQB(__INTEGER nb_elements__TRQB);
+static void* read_send_msg__Q1N(__PARSER *Self__R1N,void *first_arg__S1N);
+static void* readlip_expr_cmp__BZ1B(__PARSER *Self__CZ1B);
+static void** create__ATIE(__INTEGER nb_elements__CTIE);
+static void** create__RPQB(__INTEGER nb_elements__TPQB);
+static void* read_argument__XLP(__PARSER *Self__YLP);
+static void* readlip_expr_binary__4L3B(__PARSER *Self__5L3B);
+static void* readlip_expr_unary__5X4B(__PARSER *Self__AY4B);
+static void* readlip_expr_base__TDFE(__PARSER *Self__UDFE);
 
 //==========================//
 // SOURCE CODE              //
@@ -2664,439 +2664,439 @@ static void* readlip_expr_base__5CFE(__PARSER *Self__ADFE);
 int main(int argc,char **argv)
 {
   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;
+  __INTEGER new_count__4IKH,typ_id__XIKH,Self__OFF,limit_up__PFF;
+  __INTEGER idx__UGIH,i__ELEB,typ_id__YSG,new_capacity__5GY;
+  __INTEGER typ_id__E1DB,new_capacity__EVJC,typ_id__XLJ,typ_id__IMH;
+  __INTEGER new_capacity__5IY,typ_id__BPC,new_capacity__2HX,typ_id__LXQ;
+  __INTEGER typ_id__IBR,new_capacity__WF1,typ_id__YPQ,typ_id__4XO;
+  __INTEGER typ_id__F0Q,typ_id__SJK,new_capacity__DCZ,typ_id__VTQ;
+  __INTEGER typ_id__RSR,typ_id__PGK,typ_id__Y2J,typ_id__SIM;
+  __INTEGER typ_id__YCOF,new_capacity__TTRF,typ_id__42F,typ_id__JQTE;
+  __INTEGER typ_id__LMMF,typ_id__VYNF,typ_id__OUMD,typ_id__FWED;
+  __INTEGER new_capacity__0AXD,Self__PJYE,typ_id__RTNF,Self__GJAG;
+  __INTEGER typ_id__OENF,Self__5HAG,typ_id__L1YB,new_capacity__0FOC;
+  __INTEGER typ_id__Q4YB,new_capacity__VJOC,typ_id__KI5B,typ_id__A5HE;
+  __INTEGER typ_id__ZUB,new_capacity__YWW,j__IZ,idx__NLC,typ_id__ZGIH;
+  __INTEGER typ_id__IEKB,result__DHIH,__tmp__FHIH,Self__GHIH;
+  __INTEGER result__IHIH,__tmp__KHIH,Self__LHIH,idx__2MEB,idx__5FZB;
+  __INTEGER new_capacity__AGZB,i__BGZB,result__NHIH,__tmp__PHIH;
+  __INTEGER Self__QHIH,typ_id__OIZB,typ_id__UHIH,typ_id__4HIH;
+  __INTEGER typ_id__IIIH,typ_id__1PED,typ_id__CZB,Self__MLWD;
+  __INTEGER typ_id__E3B,typ_id__SIIH,typ_id__W4B,result__2IIH;
+  __INTEGER __tmp__4IIH,Self__5IIH,result__BJIH,__tmp__DJIH,Self__EJIH;
+  __INTEGER result__KJIH,__tmp__MJIH,Self__NJIH,result__PJIH;
+  __INTEGER __tmp__RJIH,Self__SJIH,result__YJIH,__tmp__0JIH,Self__1JIH;
+  __INTEGER result__3JIH,__tmp__5JIH,Self__AKIH,i__H4EH,j__J4EH;
+  __INTEGER Self__5GHH,result__CKIH,__tmp__EKIH,Self__FKIH,result__LKIH;
+  __INTEGER __tmp__NKIH,Self__OKIH,result__QKIH,__tmp__SKIH,Self__TKIH;
+  __INTEGER i__T4EH,j__V4EH,Self__LHHH,result__VKIH,__tmp__XKIH;
+  __INTEGER Self__YKIH,result__0KIH,__tmp__2KIH,Self__3KIH,i1__KXKH;
+  __INTEGER i2__LXKH,__tmp__BLIH,Self__DLIH,result__ILIH,len__NLIH;
+  __INTEGER __tmp__OLIH,__tmp__QLIH,Self__RLIH,result__ETC,n__ZHHH;
+  __INTEGER Self__PXKH,Self__40QC,limit_up__50QC,__tmp__RCYD,Self__NC5D;
+  __INTEGER i__UXKH,i__ZXKH,__tmp__KHYD,Self__5C5D,i__4XKH,i__DYKH;
+  __INTEGER i__IYKH,__tmp__BKTD,Self__0LYD,__tmp__U2QE,Self__3ESE;
+  __INTEGER i__NYKH,i__SYKH,__tmp__SMYD,Self__0D5D,__tmp__OPYD;
+  __INTEGER Self__JE5D,i__XYKH,__tmp__WLTD,Self__BSYD,__tmp__NBRE;
+  __INTEGER Self__PFSE,__tmp__WMTD,Self__QSYD;
+  __POINTER ptr__WIKH,ptr_table__AJKH,next__5IKH,result__BJKH;
+  __POINTER ptr_table__FJKH,next__EJKH,result__GJKH,ptr__TSG;
+  __POINTER ptr_table__KJKH,next__JJKH,result__LJKH,ptr_table__PJKH;
+  __POINTER next__OJKH,result__QJKH,ptr__50DB,ptr_table__UJKH;
+  __POINTER next__TJKH,result__VJKH,ptr_table__ZJKH,next__YJKH;
+  __POINTER result__0JKH,ptr__SLJ,ptr_table__4JKH,next__3JKH;
+  __POINTER result__5JKH,ptr_table__DKKH,next__CKKH,result__EKKH;
+  __POINTER ptr__DMH,ptr_table__IKKH,next__HKKH,result__JKKH;
+  __POINTER ptr_table__NKKH,next__MKKH,result__OKKH,ptr__2OC;
+  __POINTER ptr_table__SKKH,next__RKKH,result__TKKH,ptr_table__XKKH;
+  __POINTER next__WKKH,result__YKKH,ptr__GXQ,ptr_table__2KKH,next__1KKH;
+  __POINTER result__3KKH,ptr_table__BLKH,next__ALKH,result__CLKH;
+  __POINTER ptr__DBR,ptr_table__GLKH,next__FLKH,result__HLKH;
+  __POINTER ptr_table__LLKH,next__KLKH,result__MLKH,ptr__TPQ;
+  __POINTER ptr_table__QLKH,next__PLKH,result__RLKH,ptr_table__VLKH;
+  __POINTER next__ULKH,result__WLKH,ptr__ZXO,ptr_table__0LKH,next__ZLKH;
+  __POINTER result__1LKH,ptr_table__5LKH,next__4LKH,result__AMKH;
+  __POINTER ptr__A0Q,ptr_table__EMKH,next__DMKH,result__FMKH;
+  __POINTER ptr_table__JMKH,next__IMKH,result__KMKH,ptr__NJK;
+  __POINTER ptr_table__OMKH,next__NMKH,result__PMKH,ptr_table__TMKH;
+  __POINTER next__SMKH,result__UMKH,ptr__QTQ,ptr_table__YMKH,next__XMKH;
+  __POINTER result__ZMKH,ptr_table__3MKH,next__2MKH,result__4MKH;
+  __POINTER ptr__MSR,ptr_table__CNKH,next__BNKH,result__DNKH;
+  __POINTER ptr_table__HNKH,next__GNKH,result__INKH,ptr__KGK;
+  __POINTER ptr_table__MNKH,next__LNKH,result__NNKH,ptr_table__RNKH;
+  __POINTER next__QNKH,result__SNKH,ptr__T2J,ptr_table__WNKH,next__VNKH;
+  __POINTER result__XNKH,ptr_table__1NKH,next__0NKH,result__2NKH;
+  __POINTER ptr__NIM,ptr_table__AOKH,next__5NKH,result__BOKH;
+  __POINTER ptr_table__FOKH,next__EOKH,result__GOKH,ptr__TCOF;
+  __POINTER ptr_table__KOKH,next__JOKH,result__LOKH,ptr_table__POKH;
+  __POINTER next__OOKH,result__QOKH,ptr__Z2F,ptr_table__UOKH,next__TOKH;
+  __POINTER result__VOKH,ptr_table__ZOKH,next__YOKH,result__0OKH;
+  __POINTER ptr__EQTE,ptr_table__4OKH,next__3OKH,result__5OKH;
+  __POINTER ptr_table__DPKH,next__CPKH,result__EPKH,ptr__GMMF;
+  __POINTER ptr_table__IPKH,next__HPKH,result__JPKH,ptr_table__NPKH;
+  __POINTER next__MPKH,result__OPKH,ptr__QYNF,ptr_table__SPKH;
+  __POINTER next__RPKH,result__TPKH,ptr_table__XPKH,next__WPKH;
+  __POINTER result__YPKH,ptr__JUMD,ptr_table__2PKH,next__1PKH;
+  __POINTER result__3PKH,ptr_table__BQKH,next__AQKH,result__CQKH;
+  __POINTER ptr__AWED,ptr_table__GQKH,next__FQKH,result__HQKH;
+  __POINTER ptr_table__LQKH,next__KQKH,result__MQKH,result__00EH;
+  __POINTER ptr_table__QQKH,next__PQKH,result__RQKH,ptr__MTNF;
+  __POINTER ptr_table__YQKH,next__XQKH,result__ZQKH,ptr_table__3QKH;
+  __POINTER next__2QKH,result__4QKH,result__C1EH,ptr_table__CRKH;
+  __POINTER next__BRKH,result__DRKH,ptr__JENF,ptr_table__KRKH;
+  __POINTER next__JRKH,result__LRKH,ptr_table__PRKH,next__ORKH;
+  __POINTER result__QRKH,result__K1EH,ptr_table__URKH,next__TRKH;
+  __POINTER result__VRKH,ptr__G1YB,ptr_table__2RKH,next__1RKH;
+  __POINTER result__3RKH,ptr_table__BSKH,next__ASKH,result__CSKH;
+  __POINTER ptr__L4YB,ptr_table__GSKH,next__FSKH,result__HSKH;
+  __POINTER ptr_table__LSKH,next__KSKH,result__MSKH,ptr__FI5B;
+  __POINTER ptr_table__QSKH,next__PSKH,result__RSKH,ptr_table__VSKH;
+  __POINTER next__USKH,result__WSKH,ptr__14HE,ptr_table__0SKH;
+  __POINTER next__ZSKH,result__1SKH,ptr_table__5SKH,next__4SKH;
+  __POINTER result__ATKH,ptr__UUB,ptr_table__ETKH,next__DTKH;
+  __POINTER result__FTKH,ptr_table__JTKH,next__ITKH,result__KTKH;
+  __POINTER ptr__YGIH,ptr_table__OTKH,next__NTKH,result__PTKH;
+  __POINTER ptr_table__TTKH,next__STKH,result__UTKH,ptr__DEKB;
+  __POINTER ptr_table__1TKH,next__0TKH,result__2TKH,ptr_table__AUKH;
+  __POINTER next__5TKH,result__BUKH,ptr__JIZB,ptr_table__FUKH;
+  __POINTER next__EUKH,result__GUKH,ptr_table__KUKH,next__JUKH;
+  __POINTER result__LUKH,ptr__THIH,ptr_table__PUKH,next__OUKH;
+  __POINTER result__QUKH,ptr_table__UUKH,next__TUKH,result__VUKH;
+  __POINTER ptr__3HIH,ptr_table__ZUKH,next__YUKH,result__0UKH;
+  __POINTER ptr_table__4UKH,next__3UKH,result__5UKH,ptr__HIIH;
+  __POINTER ptr_table__GVKH,next__FVKH,result__HVKH,ptr_table__LVKH;
+  __POINTER next__KVKH,result__MVKH,ptr__WPED,ptr_table__QVKH;
+  __POINTER next__PVKH,result__RVKH,ptr_table__VVKH,next__UVKH;
+  __POINTER result__WVKH,ptr__3YB,ptr_table__0VKH,next__ZVKH;
+  __POINTER result__1VKH,ptr_table__5VKH,next__4VKH,result__AWKH;
+  __POINTER result__S3EH,ptr_table__EWKH,next__DWKH,result__FWKH;
+  __POINTER ptr__52B,ptr_table__MWKH,next__LWKH,result__NWKH;
+  __POINTER ptr_table__RWKH,next__QWKH,result__SWKH,ptr__RIIH;
+  __POINTER ptr_table__WWKH,next__VWKH,result__XWKH,ptr_table__1WKH;
+  __POINTER next__0WKH,result__2WKH,ptr__R4B,ptr_table__AXKH,next__5WKH;
+  __POINTER result__BXKH,ptr_table__FXKH,next__EXKH,result__GXKH;
+  __UINTEGER_32 sz__YIKH,a__ZIKH,new_size__0IKH,t__1IKH,a__2IKH;
+  __UINTEGER_32 new_size__IJKH,lab_type__HJKH,sz__VSG,a__O3GH;
+  __UINTEGER_32 new_size__P3GH,t__T3GH,a__S3GH,new_size__SJKH;
+  __UINTEGER_32 lab_type__RJKH,sz__B1DB,a__W3GH,new_size__X3GH,t__13GH;
+  __UINTEGER_32 a__03GH,new_size__2JKH,lab_type__1JKH,sz__ULJ,a__43GH;
+  __UINTEGER_32 new_size__53GH,t__D4GH,a__C4GH,new_size__GKKH;
+  __UINTEGER_32 lab_type__FKKH,sz__FMH,a__G4GH,new_size__H4GH,t__L4GH;
+  __UINTEGER_32 a__K4GH,new_size__QKKH,lab_type__PKKH,sz__4OC,a__O4GH;
+  __UINTEGER_32 new_size__P4GH,t__T4GH,a__S4GH,new_size__0KKH;
+  __UINTEGER_32 lab_type__ZKKH,sz__IXQ,a__W4GH,new_size__X4GH,t__14GH;
+  __UINTEGER_32 a__04GH,new_size__ELKH,lab_type__DLKH,sz__FBR,a__44GH;
+  __UINTEGER_32 new_size__54GH,t__D5GH,a__C5GH,new_size__OLKH;
+  __UINTEGER_32 lab_type__NLKH,sz__VPQ,a__G5GH,new_size__H5GH,t__L5GH;
+  __UINTEGER_32 a__K5GH,new_size__YLKH,lab_type__XLKH,sz__1XO,a__O5GH;
+  __UINTEGER_32 new_size__P5GH,t__T5GH,a__S5GH,new_size__CMKH;
+  __UINTEGER_32 lab_type__BMKH,sz__C0Q,a__W5GH,new_size__X5GH,t__15GH;
+  __UINTEGER_32 a__05GH,new_size__MMKH,lab_type__LMKH,sz__PJK,a__45GH;
+  __UINTEGER_32 new_size__55GH,t__DAHH,a__CAHH,new_size__WMKH;
+  __UINTEGER_32 lab_type__VMKH,sz__STQ,a__IGFH,new_size__JGFH,t__NGFH;
+  __UINTEGER_32 a__MGFH,new_size__ANKH,lab_type__5MKH,sz__OSR,a__GAHH;
+  __UINTEGER_32 new_size__HAHH,t__LAHH,a__KAHH,new_size__KNKH;
+  __UINTEGER_32 lab_type__JNKH,sz__MGK,a__OAHH,new_size__PAHH,t__TAHH;
+  __UINTEGER_32 a__SAHH,new_size__UNKH,lab_type__TNKH,sz__V2J,a__WAHH;
+  __UINTEGER_32 new_size__XAHH,t__1AHH,a__0AHH,new_size__4NKH;
+  __UINTEGER_32 lab_type__3NKH,sz__PIM,a__4AHH,new_size__5AHH,t__DBHH;
+  __UINTEGER_32 a__CBHH,new_size__IOKH,lab_type__HOKH,sz__VCOF,a__GBHH;
+  __UINTEGER_32 new_size__HBHH,t__LBHH,a__KBHH,new_size__SOKH;
+  __UINTEGER_32 lab_type__ROKH,sz__12F,a__SBFH,new_size__RWG,t__0XG;
+  __UINTEGER_32 a__YBFH,new_size__2OKH,lab_type__1OKH,sz__GQTE,a__OBHH;
+  __UINTEGER_32 new_size__PBHH,t__TBHH,a__SBHH,new_size__GPKH;
+  __UINTEGER_32 lab_type__FPKH,sz__IMMF,a__WBHH,new_size__XBHH,t__1BHH;
+  __UINTEGER_32 a__0BHH,new_size__QPKH,lab_type__PPKH,sz__SYNF,a__4BHH;
+  __UINTEGER_32 new_size__5BHH,t__DCHH,a__CCHH,new_size__0PKH;
+  __UINTEGER_32 lab_type__ZPKH,sz__LUMD,a__GCHH,new_size__HCHH,t__LCHH;
+  __UINTEGER_32 a__KCHH,new_size__EQKH,lab_type__DQKH,sz__CWED,a__OCHH;
+  __UINTEGER_32 new_size__PCHH,t__TCHH,a__SCHH,new_size__OQKH;
+  __UINTEGER_32 lab_type__NQKH,sz__10EH,a__A1EH,new_size__20EH;
+  __UINTEGER_32 new_size2__30EH,a__WCHH,new_size__XCHH,sz__OTNF,a__3CHH;
+  __UINTEGER_32 new_size__4CHH,t__CDHH,a__BDHH,new_size__ARKH;
+  __UINTEGER_32 lab_type__5QKH,sz__D1EH,a__I1EH,new_size__E1EH;
+  __UINTEGER_32 new_size2__F1EH,a__FDHH,new_size__GDHH,sz__LENF,a__MDHH;
+  __UINTEGER_32 new_size__NDHH,t__RDHH,a__QDHH,new_size__SRKH;
+  __UINTEGER_32 lab_type__RRKH,sz__L1EH,a__Q1EH,new_size__M1EH;
+  __UINTEGER_32 new_size2__N1EH,a__UDHH,new_size__VDHH,sz__I1YB,a__1DHH;
+  __UINTEGER_32 new_size__2DHH,t__AEHH,a__5DHH,new_size__ESKH;
+  __UINTEGER_32 lab_type__DSKH,sz__N4YB,a__DEHH,new_size__EEHH,t__IEHH;
+  __UINTEGER_32 a__HEHH,new_size__OSKH,lab_type__NSKH,sz__HI5B,a__LEHH;
+  __UINTEGER_32 new_size__MEHH,t__QEHH,a__PEHH,new_size__YSKH;
+  __UINTEGER_32 lab_type__XSKH,sz__34HE,a__TEHH,new_size__UEHH,t__YEHH;
+  __UINTEGER_32 a__XEHH,new_size__CTKH,lab_type__BTKH,sz__WUB,a__1EHH;
+  __UINTEGER_32 new_size__2EHH,t__AFHH,a__5EHH,new_size__MTKH;
+  __UINTEGER_32 lab_type__LTKH,sz__0GIH,a__1GIH,new_size__2GIH,t__3GIH;
+  __UINTEGER_32 a__4GIH,new_size__WTKH,lab_type__VTKH,sz__FEKB,a__EFHH;
+  __UINTEGER_32 new_size__FFHH,t__JFHH,a__IFHH,new_size__DUKH;
+  __UINTEGER_32 lab_type__CUKH,sz__LIZB,a__PFHH,new_size__QFHH,t__UFHH;
+  __UINTEGER_32 a__TFHH,new_size__NUKH,lab_type__MUKH,sz__VHIH,a__WHIH;
+  __UINTEGER_32 new_size__XHIH,t__YHIH,a__ZHIH,new_size__XUKH;
+  __UINTEGER_32 lab_type__WUKH,sz__5HIH,a__AIIH,new_size__BIIH,t__CIIH;
+  __UINTEGER_32 a__DIIH,new_size__BVKH,lab_type__AVKH,sz__JIIH,a__KIIH;
+  __UINTEGER_32 new_size__LIIH,t__MIIH,a__NIIH,new_size__OVKH;
+  __UINTEGER_32 lab_type__NVKH,sz__YPED,a__C3FH,new_size__D3FH,t__H3FH;
+  __UINTEGER_32 a__G3FH,new_size__YVKH,lab_type__XVKH,sz__5YB,a__3FHH;
+  __UINTEGER_32 new_size__4FHH,t__CGHH,a__BGHH,new_size__CWKH;
+  __UINTEGER_32 lab_type__BWKH,sz__T3EH,a__Y3EH,new_size__U3EH;
+  __UINTEGER_32 new_size2__V3EH,a__FGHH,new_size__GGHH,sz__B3B,a__MGHH;
+  __UINTEGER_32 new_size__NGHH,t__RGHH,a__QGHH,new_size__UWKH;
+  __UINTEGER_32 lab_type__TWKH,sz__TIIH,a__UIIH,new_size__VIIH,t__WIIH;
+  __UINTEGER_32 a__XIIH,new_size__4WKH,lab_type__3WKH,sz__T4B,a__VQFH;
+  __UINTEGER_32 new_size__WQFH,t__0QFH,a__ZQFH,new_size__IXKH;
+  __UINTEGER_32 lab_type__HXKH;
+  __STRING *Self__CLEB,*new__0O1G,*new__2O1G,*Self__G4EH,*Self__S4EH;
+  __STRING *Self__5KIH,*Self__WHHH,*Self__YHHH,*Self__OXKH;
+  __ITM_TYPE_PARAMETER *result__PTQ,*Self__H0V;
+  __LIP_BOOLEAN *result__PYNF;
+  void *result__UQKH,*result__GRKH,*result__YRKH,*result__IWKH;
+  void *txt__1,*fmt_name__YNC,*k__AHIH,*__tmp__JOD,*k__UMEB;
+  void *element__ZFHH,*i__1HIH,*element__LTEC,*i__PIIH,*__tmp__4B;
+  void *__tmp__2H,*title__EITD,*__tmp__2EYD,*__tmp__JFYD,*__tmp__SFYD;
+  void *__tmp__HGYD,*__tmp__WJTD,*__tmp__VJYD,*__tmp__CKYD,*__tmp__LKYD;
+  void *__tmp__ALYD,*__tmp__QKTD,*t__N2QE,*__tmp__XKTD,*__tmp__54QE;
+  void *__tmp__M5QE,*__tmp__V5QE,*__tmp__KARE,*__tmp__2OYD,*__tmp__NLTD;
+  void *__tmp__YRYD,*__tmp__EMTD,*t__GBRE,*__tmp__LMTD,*__tmp__XDRE;
   void *p__AB;
-  __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;
+  __STRING_CONSTANT *result__XGIH,*Self__RTS,*Self__BFHH,*Self__IKS;
+  __STRING_CONSTANT *Self__EHIH,*Self__JHIH,*Self__OHIH,*Self__ZO1G;
+  __STRING_CONSTANT *Self__1O1G,*Self__MXKH,*Self__WXKH,*Self__1XKH;
+  __STRING_CONSTANT *Self__AYKH,*Self__FYKH,*Self__KYKH,*Self__PYKH;
+  __STRING_CONSTANT *Self__UYKH,*Self__ZYKH;
+  __POSITION pos__OK1G,pos__YK1G,pos__KM1G,pos__MM1G,pos__OM1G;
+  __POSITION pos__QM1G,pos__SM1G,__tmp__GOYD,__tmp__LOYD,__tmp__CRYD;
+  __POSITION __tmp__HRYD,__tmp__BDRE,__tmp__GDRE;
+  __TYPE_ID *result__QIIH,*result__Q4B;
   void *ent__TB;
-  __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;
+  __DIRECTORY_UNIX *Self__2GSD;
+  void *dir__4GSD,*dir__GHSD,*__tmp__AD,*dir__SB;
+  __FILE_UNIX *Self__KHRD;
+  __PROTOTYPE *Self__CITD;
+  void *s__FITD,*s__NCYD,*s__GHYD,*s__Q2QE,*s__OMYD,*s__KPYD,*s__JBRE;
+  void *__tmp__3MTD;
+  void *__tmp__MJTD,*__tmp__GEYD,*__tmp__5IYD,*__tmp__J4QE,*__tmp__DLTD;
+  void *__tmp__UOYD,*__tmp__QRYD,*__tmp__PDRE;
+  __SECTION_ *Self__XC2G,*Self__YC2G,*Self__ZC2G,*Self__0C2G,*Self__1C2G;
+  void *__tmp__UEYD,*__tmp__NJYD,*__tmp__X4QE;
+  void *__tmp__WEYD,*ts__TEYD,*__tmp__PJYD,*ts__MJYD,*__tmp__Z4QE;
+  void *ts__W4QE;
+  __CHARACTER *arg__PHD,*Self__VGIH,*p__DLEB,*path__KZ,*Self__BLC;
+  __CHARACTER *Self__AHHH,*model__BHHH,*Self__MHHH,*model__NHHH;
+  __CHARACTER *__tmp__ALIH,*Self__CLIH;
+  __FAST_ARRAYoSTRINGo *result__VIKH,*Self__3IKH,*result__Y2F,*Self__HDT;
   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;
+  __HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *result__SSG,*Self__2FT;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *result__40DB;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__VLCC;
+  __FAST_ARRAYoPROTOTYPEo *result__RLJ,*Self__Y5T;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__CMH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DKT;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__5GIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SMEB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YIIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SGHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GJIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WGHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__UJIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0GHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HUVB;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__HKIH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GHHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__R5S;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__SHHH;
+  __HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *result__1OC,*Self__SMS;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *result__FXQ,*Self__T0V;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *result__CBR,*Self__FCW;
+  __FAST_ARRAYoITM_TYPE_MULTIo *result__SPQ,*Self__QYV;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *result__YXO,*Self__ZGV;
+  __FAST_ARRAYoITM_TYPE_GENERICo *result__5ZQ,*Self__G4V;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__MJK;
+  __HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__LIU;
+  __FAST_ARRAYoITM_TYPE_STYLEo *result__LSR,*Self__OIW;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *result__JGK,*Self__PFU;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *result__S2J,*Self__MCU;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *result__MIM,*Self__SRU;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *result__SCOF,*Self__CHQF;
+  __FAST_ARRAYoLIP_INTEGERo *result__DQTE,*Self__KGXE;
+  __FAST_ARRAYoLIP_STRINGo *result__FMMF,*Self__UZPF;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *result__IUMD,*Self__VFUD;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *result__5VED;
+  __HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__GKSD;
+  void **Result__XSHE;
+  __FAST_ARRAYoLIP_SLOT_DATAo *result__LTNF,*Self__3BQF;
+  void **Result__RD1F;
+  __FAST_ARRAYoLIP_SLOT_CODEo *result__IENF,*Self__42PF;
+  void **Result__Y40F;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *result__F1YB;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__NWFC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__K4YB;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__MZFC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *result__EI5B,*Self__0JHC;
+  __FAST_ARRAYoITM_SLOTo *result__04HE,*Self__UJWE;
+  __HASHED_SEToABSTRACT_STRINGo *result__TUB,*Self__L5R;
+  __BOOLEAN __tmp__U0,__tmp__P1,result__32NB,__tmp__31,result__P3NB;
+  __BOOLEAN __tmp__L2,result__B4NB,__tmp__Y2,result__T4NB,__tmp__14;
+  __BOOLEAN result__XTKH,result__EPEB,result__CVKH,result__SFG;
+  __BOOLEAN __tmp__JC,__tmp__FC,__tmp__UC,result__JXKH;
+  __BOOLEAN is_first_cur__MCYD,__tmp__BDYD,__tmp__DFYD,__tmp__AFYD;
+  __BOOLEAN result__TXKH,__tmp__XFYD,result__YXKH,__tmp__YFYD;
+  __BOOLEAN __tmp__1FYD,is_first_cur__FHYD,result__3XKH,__tmp__0HYD;
+  __BOOLEAN __tmp__2JYD,__tmp__ZJYD,result__CYKH,__tmp__QKYD;
+  __BOOLEAN result__HYKH,__tmp__RKYD,__tmp__UKYD,is_first_cur__P2QE;
+  __BOOLEAN __tmp__E3QE,__tmp__G5QE,__tmp__D5QE,result__MYKH;
+  __BOOLEAN __tmp__05QE,result__RYKH,__tmp__15QE,__tmp__45QE;
+  __BOOLEAN is_first__NMYD,__tmp__CNYD,is_first__JPYD,result__WYKH;
+  __BOOLEAN __tmp__4PYD,is_first__IBRE,__tmp__3BRE;
+  __CHARACTER result__YTKH,result__DVKH,result__EODH,result__TDDH;
+  __CHARACTER Self__QXKH,result__RXKH,__tmp__NEYD,__tmp__GJYD;
+  __CHARACTER __tmp__Q4QE;
+  __LINKED_LISToSTRING_CONSTANTo *result__CEKB,*Self__0FHH,*Self__KTEC;
+  void *node__BHIH,*node__3MEB,*node1__DGZB,*node2__EGZB,*__tmp__KOEB;
+  void *node__0IIH,*node__UGHH,*node__IJIH,*node__YGHH,*node__WJIH;
+  void *node__2GHH,*node__RUVB,*node__JKIH,*node__IHHH,*node__25S;
+  void *node__UHHH;
+  void **old_buckets__CGZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *result__IIZB;
+  __HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__GDGC;
+  void *def__CPEB;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__SHIH,*Self__0HIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__2HIH,*Self__EIIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__GIIH,*Self__OIIH;
+  __LINKED_LIST_NODEoSTRING_CONSTANTo *result__VPED,*Self__UJSD;
+  __FAST_ARRAYoSLOTo *result__2YB,*Self__PBS;
+  void **Result__VJ1C;
+  __FAST_ARRAYoTYPE_IDo *result__42B,*Self__OES;
+  __INTEGER_8 __tmp__4CYD,__tmp__XHYD,__tmp__KKTD,__tmp__B3QE;
+  __INTEGER_8 __tmp__5MYD,__tmp__1PYD,__tmp__4LTD,__tmp__0BRE;
   arg_count  = argc;
   arg_vector = argv;
   parent_numeric__J=NUMERIC__;
   clone_allocation_size__NTB= 0;
   STRING_CONSTANT__->count__DD=((__INTEGER )((0)));
   STRING__->count__EGC= 0;
-  STRING_CONSTANT__->storage__QMO=((__CHARACTER *)(NULL));
-  STRING__->storage__23R=NULL;
-  nb_page__CPJ= 0;
+  STRING_CONSTANT__->storage__ZNO=((__CHARACTER *)(NULL));
+  STRING__->storage__F5R=NULL;
+  nb_page__LQJ= 0;
   MEMORY__->map_size_and_id__YTB= 0;
-  capacity_max__L24= 0;
-  get_begin_memory__G5PB=((__POINTER )(NULL));
-  begin_memory__3SH=((__POINTER )(NULL));
+  capacity_max__U34= 0;
+  get_begin_memory__SAQB=((__POINTER )(NULL));
+  begin_memory__GUH=((__POINTER )(NULL));
   MEMORY__->map_previous_linear__XTB= 0;
-  first_free__VAVB=NULL;
+  first_free__BCVB=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;
+  STRING__->capacity__24R= 0;
+  HASHED_SEToABSTRACT_STRINGo__->buckets__CWR=NULL;
+  HASHED_SEToABSTRACT_STRINGo__->capacity__3VR= 0;
+  HASHED_SEToABSTRACT_STRINGo__->count__DXR= 0;
   list__FK=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->item__FVR=NULL;
-  HASHED_SET_NODEoABSTRACT_STRINGo__->next__RVR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->item__OWR=NULL;
+  HASHED_SET_NODEoABSTRACT_STRINGo__->next__0WR=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;
+  ARRAYED_COLLECTIONoSTRINGo__->capacity__QDT= 0;
+  ARRAYED_COLLECTIONoSTRINGo__->storage__1DT=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__;
+  new_count__4IKH=((__INTEGER )(arg_count));
+  result__VIKH=NULL;
+  ptr__WIKH=((__POINTER )(NULL));
+  typ_id__XIKH= 0;
+  sz__YIKH=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__YIKH ==  0)) {
+    result__VIKH=FAST_ARRAYoSTRINGo__;
   } else {
-    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);
+    typ_id__XIKH=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YIKH);
+    if ((typ_id__XIKH == (__INTEGER)(-  1))) {
+      a__ZIKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0IKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIKH + a__ZIKH) & (__UINTEGER_32)(~ a__ZIKH));
+      ptr_table__AJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0IKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5IKH=((__POINTER )(NULL));
+      result__BJKH=((__POINTER *)ptr_table__AJKH)[ 0];
+      if ((result__BJKH == (void *)NULL)) {
+        result__BJKH=new_lab__ZPJ(new_size__0IKH);
+        next__5IKH=(void *)((unsigned long)result__BJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IKH)));
+        ((__POINTER *)next__5IKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AJKH)[ 0]=next__5IKH;
+      } else {
+        next__5IKH=((__POINTER *)result__BJKH)[ 0];
+        if ((next__5IKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BJKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0IKH <<  1)) <=  4096)) {
+            next__5IKH=(void *)((unsigned long)result__BJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0IKH)));
+          } else {
+            next__5IKH=new_lab__ZPJ(new_size__0IKH);
+          };
+          ((__POINTER *)next__5IKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AJKH)[ 0]=next__5IKH;
+        } else {
+          ((__POINTER *)result__BJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5IKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BJKH=next__5IKH;
+        };
+      };
+      ptr__WIKH=result__BJKH;
+    } else {
+      t__1IKH=((__UINTEGER_32 )typ_id__XIKH);
+      a__2IKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YIKH + a__2IKH) & (__UINTEGER_32)(~ a__2IKH));
+      ptr_table__FJKH=((__POINTER )(&(table_type[(t__1IKH)])));
+      lab_type__HJKH=(__UINTEGER_32)(t__1IKH |  1);
+      next__EJKH=((__POINTER )(NULL));
+      result__GJKH=((__POINTER *)ptr_table__FJKH)[ 0];
+      if ((result__GJKH == (void *)NULL)) {
+        result__GJKH=new_lab__ZPJ(lab_type__HJKH);
+        next__EJKH=(void *)((unsigned long)result__GJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJKH)));
+        ((__POINTER *)next__EJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FJKH)[ 0]=next__EJKH;
+      } else {
+        next__EJKH=((__POINTER *)result__GJKH)[ 0];
+        if ((next__EJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GJKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IJKH <<  1)) <=  4096)) {
+            next__EJKH=(void *)((unsigned long)result__GJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJKH)));
+          } else {
+            next__EJKH=new_lab__ZPJ(lab_type__HJKH);
+          };
+          ((__POINTER *)next__EJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FJKH)[ 0]=next__EJKH;
+        } else {
+          ((__POINTER *)result__GJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GJKH=next__EJKH;
+        };
+      };
+      ptr__WIKH=result__GJKH;
+    };
+    result__VIKH=((__FAST_ARRAYoSTRINGo *)ptr__WIKH);
+    *(result__VIKH) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__3IKH=((__FAST_ARRAYoSTRINGo *)result__VIKH);
+  if ((Self__3IKH->parent_arrayed_collection__RKC.capacity__QDT < new_count__4IKH)) {
+    Self__3IKH->parent_arrayed_collection__RKC.storage__1DT=create__DERB(new_count__4IKH);
+    Self__3IKH->parent_arrayed_collection__RKC.capacity__QDT=new_count__4IKH;
+  };
+  Self__3IKH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  result__OHD=result__VIKH;
+  Self__OFF= 0;
+  limit_up__PFF=(__INTEGER)(((__INTEGER )(arg_count)) -  1);
+  while ((Self__OFF <= limit_up__PFF)) {
+    arg__PHD=((__CHARACTER *)(arg_vector[(Self__OFF)]));
+    Self__VGIH=((__CHARACTER *)arg__PHD);
+    idx__UGIH= 0;
+    while ((! ((idx__UGIH >  1024) || ('\0' == Self__VGIH[idx__UGIH])))) {
+      idx__UGIH=(__INTEGER)(idx__UGIH +  1);
+    };
+    str__QHD=create__ZBB(idx__UGIH);
+    Self__CLEB=((__STRING *)str__QHD);
+    p__DLEB=arg__PHD;
+    i__ELEB= 0;
+    Self__CLEB->count__EGC= 0;
+    while ((((__CHARACTER *)p__DLEB)[i__ELEB] != '\0')) {
+      add_last__3IT(Self__CLEB,((__CHARACTER *)p__DLEB)[i__ELEB]);
+      i__ELEB=(__INTEGER)(i__ELEB +  1);
+    };
+    add_last__2OV(result__OHD,str__QHD);
+    Self__OFF=(__INTEGER)(Self__OFF +  1);
   };
   output_name__DI=NULL;
   format_name__N1=NULL;
@@ -3108,277 +3108,277 @@ int main(int argc,char **argv)
   FILE_SYSTEM__->parent_directory__2FD=1;
   string_tmp__AFD=create__ZBB( 255);
   ENTRY__->path__BD=NULL;
-  ENTRY__->name__QJT=NULL;
+  ENTRY__->name__ZKT=NULL;
   ENTRY_UNIX__->parent_entry__FFD=(*ENTRY__);
-  FILE_UNIX__->parent_entry_unix__05E=(*ENTRY_UNIX__);
+  FILE_UNIX__->parent_entry_unix__DBF=(*ENTRY_UNIX__);
   DIRECTORY_UNIX__->parent_entry_unix__GFD=(*ENTRY_UNIX__);
-  DIRECTORY__->list__4DRD=NULL;
+  DIRECTORY__->list__UDRD=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__;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->buckets__JYS=NULL;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->capacity__EYS= 0;
+  HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__->count__KZS= 0;
+  result__SSG=NULL;
+  ptr__TSG=((__POINTER )(NULL));
+  typ_id__YSG= 0;
+  sz__VSG=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo));
+  if ((sz__VSG ==  0)) {
+    result__SSG=HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
   } else {
-    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);
+    typ_id__YSG=__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VSG);
+    if ((typ_id__YSG == (__INTEGER)(-  1))) {
+      a__O3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__P3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__VSG + a__O3GH) & (__UINTEGER_32)(~ a__O3GH));
+      ptr_table__KJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JJKH=((__POINTER )(NULL));
+      result__LJKH=((__POINTER *)ptr_table__KJKH)[ 0];
+      if ((result__LJKH == (void *)NULL)) {
+        result__LJKH=new_lab__ZPJ(new_size__P3GH);
+        next__JJKH=(void *)((unsigned long)result__LJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3GH)));
+        ((__POINTER *)next__JJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KJKH)[ 0]=next__JJKH;
+      } else {
+        next__JJKH=((__POINTER *)result__LJKH)[ 0];
+        if ((next__JJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LJKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P3GH <<  1)) <=  4096)) {
+            next__JJKH=(void *)((unsigned long)result__LJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3GH)));
+          } else {
+            next__JJKH=new_lab__ZPJ(new_size__P3GH);
+          };
+          ((__POINTER *)next__JJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KJKH)[ 0]=next__JJKH;
+        } else {
+          ((__POINTER *)result__LJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LJKH=next__JJKH;
+        };
+      };
+      ptr__TSG=result__LJKH;
+    } else {
+      t__T3GH=((__UINTEGER_32 )typ_id__YSG);
+      a__S3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SJKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VSG + a__S3GH) & (__UINTEGER_32)(~ a__S3GH));
+      ptr_table__PJKH=((__POINTER )(&(table_type[(t__T3GH)])));
+      lab_type__RJKH=(__UINTEGER_32)(t__T3GH |  1);
+      next__OJKH=((__POINTER )(NULL));
+      result__QJKH=((__POINTER *)ptr_table__PJKH)[ 0];
+      if ((result__QJKH == (void *)NULL)) {
+        result__QJKH=new_lab__ZPJ(lab_type__RJKH);
+        next__OJKH=(void *)((unsigned long)result__QJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJKH)));
+        ((__POINTER *)next__OJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PJKH)[ 0]=next__OJKH;
+      } else {
+        next__OJKH=((__POINTER *)result__QJKH)[ 0];
+        if ((next__OJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QJKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SJKH <<  1)) <=  4096)) {
+            next__OJKH=(void *)((unsigned long)result__QJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SJKH)));
+          } else {
+            next__OJKH=new_lab__ZPJ(lab_type__RJKH);
+          };
+          ((__POINTER *)next__OJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PJKH)[ 0]=next__OJKH;
+        } else {
+          ((__POINTER *)result__QJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QJKH=next__OJKH;
+        };
+      };
+      ptr__TSG=result__QJKH;
+    };
+    result__SSG=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)ptr__TSG);
+    *(result__SSG) = *(HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo__);
+  };
+  Self__2FT=((__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *)result__SSG);
+  new_capacity__5GY=prime_number_ceiling__T11( 193);
+  Self__2FT->buckets__JYS=create__T43(new_capacity__5GY);
+  Self__2FT->capacity__EYS=new_capacity__5GY;
+  Self__2FT->count__KZS= 0;
+  alias__RFD=result__SSG;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->key__VYS=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->next__BZS=NULL;
+  HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__->item__YPOB=NULL;
+  string_tmp2__MZAC=create__ZBB( 255);
+  string_tmp3__SZAC=create__ZBB( 255);
+  ITM_OBJECT__->position__0BJ=((__POSITION ) 0);
   NAMED__->parent_itm_object__4=(*ITM_OBJECT__);
   NAMED__->name__LI=NULL;
-  NAMED__->style__25T='\0';
+  NAMED__->style__FBU='\0';
   PROTOTYPE__->parent_named__5=(*NAMED__);
-  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__;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->buckets__QMBC=NULL;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->capacity__LMBC= 0;
+  HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__->count__QNBC= 0;
+  result__40DB=NULL;
+  ptr__50DB=((__POINTER )(NULL));
+  typ_id__E1DB= 0;
+  sz__B1DB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo));
+  if ((sz__B1DB ==  0)) {
+    result__40DB=HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__E1DB=__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__B1DB);
+    if ((typ_id__E1DB == (__INTEGER)(-  1))) {
+      a__W3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1DB + a__W3GH) & (__UINTEGER_32)(~ a__W3GH));
+      ptr_table__UJKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TJKH=((__POINTER )(NULL));
+      result__VJKH=((__POINTER *)ptr_table__UJKH)[ 0];
+      if ((result__VJKH == (void *)NULL)) {
+        result__VJKH=new_lab__ZPJ(new_size__X3GH);
+        next__TJKH=(void *)((unsigned long)result__VJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3GH)));
+        ((__POINTER *)next__TJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UJKH)[ 0]=next__TJKH;
+      } else {
+        next__TJKH=((__POINTER *)result__VJKH)[ 0];
+        if ((next__TJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VJKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X3GH <<  1)) <=  4096)) {
+            next__TJKH=(void *)((unsigned long)result__VJKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3GH)));
+          } else {
+            next__TJKH=new_lab__ZPJ(new_size__X3GH);
+          };
+          ((__POINTER *)next__TJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UJKH)[ 0]=next__TJKH;
+        } else {
+          ((__POINTER *)result__VJKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VJKH=next__TJKH;
+        };
+      };
+      ptr__50DB=result__VJKH;
+    } else {
+      t__13GH=((__UINTEGER_32 )typ_id__E1DB);
+      a__03GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2JKH=(__UINTEGER_32)((__UINTEGER_32)(sz__B1DB + a__03GH) & (__UINTEGER_32)(~ a__03GH));
+      ptr_table__ZJKH=((__POINTER )(&(table_type[(t__13GH)])));
+      lab_type__1JKH=(__UINTEGER_32)(t__13GH |  1);
+      next__YJKH=((__POINTER )(NULL));
+      result__0JKH=((__POINTER *)ptr_table__ZJKH)[ 0];
+      if ((result__0JKH == (void *)NULL)) {
+        result__0JKH=new_lab__ZPJ(lab_type__1JKH);
+        next__YJKH=(void *)((unsigned long)result__0JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JKH)));
+        ((__POINTER *)next__YJKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZJKH)[ 0]=next__YJKH;
+      } else {
+        next__YJKH=((__POINTER *)result__0JKH)[ 0];
+        if ((next__YJKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0JKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2JKH <<  1)) <=  4096)) {
+            next__YJKH=(void *)((unsigned long)result__0JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2JKH)));
+          } else {
+            next__YJKH=new_lab__ZPJ(lab_type__1JKH);
+          };
+          ((__POINTER *)next__YJKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZJKH)[ 0]=next__YJKH;
+        } else {
+          ((__POINTER *)result__0JKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YJKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0JKH=next__YJKH;
+        };
+      };
+      ptr__50DB=result__0JKH;
+    };
+    result__40DB=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)ptr__50DB);
+    *(result__40DB) = *(HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo__);
+  };
+  Self__VLCC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)result__40DB);
+  new_capacity__EVJC=prime_number_ceiling__T11( 193);
+  Self__VLCC->buckets__QMBC=create__RITC(new_capacity__EVJC);
+  Self__VLCC->capacity__LMBC=new_capacity__EVJC;
+  Self__VLCC->count__QNBC= 0;
+  prototype_dico__TQS=result__40DB;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->key__2MBC=NULL;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->next__HNBC=NULL;
+  PROTOTYPE__->filename__LOG=NULL;
+  PROTOTYPE__->shortname__2FE=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->upper__SABC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->capacity__UABC= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__->storage__QBBC=NULL;
+  FAST_ARRAYoITM_TYPE_PARAMETERo__->parent_arrayed_collection__KKE=(*ARRAYED_COLLECTIONoITM_TYPE_PARAMETERo__);
+  ITM_TYPE_SIMPLE__->name__OVP=NULL;
+  ITM_TYPE_PARAMETER__->parent_itm_type__UBE=(*ITM_TYPE_SIMPLE__);
+  PROTOTYPE__->idf_generic_list__LKE=NULL;
   ARRAYED_COLLECTIONoPROTOTYPEo__->upper__HJ= 0;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__FPT=NULL;
-  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__Y4T= 0;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->storage__OQT=NULL;
+  ARRAYED_COLLECTIONoPROTOTYPEo__->capacity__BAU= 0;
   FAST_ARRAYoPROTOTYPEo__->parent_arrayed_collection__AJ=(*ARRAYED_COLLECTIONoPROTOTYPEo__);
-  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__;
+  result__RLJ=NULL;
+  ptr__SLJ=((__POINTER )(NULL));
+  typ_id__XLJ= 0;
+  sz__ULJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoPROTOTYPEo));
+  if ((sz__ULJ ==  0)) {
+    result__RLJ=FAST_ARRAYoPROTOTYPEo__;
   } else {
-    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);
+    typ_id__XLJ=__FAST_ARRAYoPROTOTYPEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ULJ);
+    if ((typ_id__XLJ == (__INTEGER)(-  1))) {
+      a__43GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__53GH=(__UINTEGER_32)((__UINTEGER_32)(sz__ULJ + a__43GH) & (__UINTEGER_32)(~ a__43GH));
+      ptr_table__4JKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__53GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3JKH=((__POINTER )(NULL));
+      result__5JKH=((__POINTER *)ptr_table__4JKH)[ 0];
+      if ((result__5JKH == (void *)NULL)) {
+        result__5JKH=new_lab__ZPJ(new_size__53GH);
+        next__3JKH=(void *)((unsigned long)result__5JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
+        ((__POINTER *)next__3JKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4JKH)[ 0]=next__3JKH;
+      } else {
+        next__3JKH=((__POINTER *)result__5JKH)[ 0];
+        if ((next__3JKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5JKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__53GH <<  1)) <=  4096)) {
+            next__3JKH=(void *)((unsigned long)result__5JKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__53GH)));
+          } else {
+            next__3JKH=new_lab__ZPJ(new_size__53GH);
+          };
+          ((__POINTER *)next__3JKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4JKH)[ 0]=next__3JKH;
+        } else {
+          ((__POINTER *)result__5JKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3JKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5JKH=next__3JKH;
+        };
+      };
+      ptr__SLJ=result__5JKH;
+    } else {
+      t__D4GH=((__UINTEGER_32 )typ_id__XLJ);
+      a__C4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ULJ + a__C4GH) & (__UINTEGER_32)(~ a__C4GH));
+      ptr_table__DKKH=((__POINTER )(&(table_type[(t__D4GH)])));
+      lab_type__FKKH=(__UINTEGER_32)(t__D4GH |  1);
+      next__CKKH=((__POINTER )(NULL));
+      result__EKKH=((__POINTER *)ptr_table__DKKH)[ 0];
+      if ((result__EKKH == (void *)NULL)) {
+        result__EKKH=new_lab__ZPJ(lab_type__FKKH);
+        next__CKKH=(void *)((unsigned long)result__EKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GKKH)));
+        ((__POINTER *)next__CKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DKKH)[ 0]=next__CKKH;
+      } else {
+        next__CKKH=((__POINTER *)result__EKKH)[ 0];
+        if ((next__CKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EKKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GKKH <<  1)) <=  4096)) {
+            next__CKKH=(void *)((unsigned long)result__EKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GKKH)));
+          } else {
+            next__CKKH=new_lab__ZPJ(lab_type__FKKH);
+          };
+          ((__POINTER *)next__CKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DKKH)[ 0]=next__CKKH;
+        } else {
+          ((__POINTER *)result__EKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EKKH=next__CKKH;
+        };
+      };
+      ptr__SLJ=result__EKKH;
+    };
+    result__RLJ=((__FAST_ARRAYoPROTOTYPEo *)ptr__SLJ);
+    *(result__RLJ) = *(FAST_ARRAYoPROTOTYPEo__);
+  };
+  Self__Y5T=((__FAST_ARRAYoPROTOTYPEo *)result__RLJ);
+  if ((Self__Y5T->parent_arrayed_collection__AJ.capacity__BAU <  512)) {
+    Self__Y5T->parent_arrayed_collection__AJ.storage__OQT=create__QDSB( 512);
+    Self__Y5T->parent_arrayed_collection__AJ.capacity__BAU= 512;
+  };
+  Self__Y5T->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(-  1);
+  prototype_list__BJ=result__RLJ;
+  PROTOTYPE__->index__MLG= 0;
+  HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__->item__J4GD=NULL;
+  string_tmp__GTX=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;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->buckets__OAGC=NULL;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->capacity__X3BC= 0;
+  HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__->count__ZOGC= 0;
+  PROTOTYPE__->slot_list__ASS=NULL;
   object__ZBC=NULL;
   source__5BC=NULL;
   position__CCC= 0;
@@ -3387,112 +3387,112 @@ int main(int argc,char **argv)
   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__;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->buckets__DAT=NULL;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->capacity__45S= 0;
+  HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->count__EJY= 0;
+  result__CMH=NULL;
+  ptr__DMH=((__POINTER )(NULL));
+  typ_id__IMH= 0;
+  sz__FMH=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+  if ((sz__FMH ==  0)) {
+    result__CMH=HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__IMH=__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FMH);
+    if ((typ_id__IMH == (__INTEGER)(-  1))) {
+      a__G4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__H4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__FMH + a__G4GH) & (__UINTEGER_32)(~ a__G4GH));
+      ptr_table__IKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__HKKH=((__POINTER )(NULL));
+      result__JKKH=((__POINTER *)ptr_table__IKKH)[ 0];
+      if ((result__JKKH == (void *)NULL)) {
+        result__JKKH=new_lab__ZPJ(new_size__H4GH);
+        next__HKKH=(void *)((unsigned long)result__JKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H4GH)));
+        ((__POINTER *)next__HKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IKKH)[ 0]=next__HKKH;
+      } else {
+        next__HKKH=((__POINTER *)result__JKKH)[ 0];
+        if ((next__HKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JKKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__H4GH <<  1)) <=  4096)) {
+            next__HKKH=(void *)((unsigned long)result__JKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H4GH)));
+          } else {
+            next__HKKH=new_lab__ZPJ(new_size__H4GH);
+          };
+          ((__POINTER *)next__HKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IKKH)[ 0]=next__HKKH;
+        } else {
+          ((__POINTER *)result__JKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JKKH=next__HKKH;
+        };
+      };
+      ptr__DMH=result__JKKH;
+    } else {
+      t__L4GH=((__UINTEGER_32 )typ_id__IMH);
+      a__K4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QKKH=(__UINTEGER_32)((__UINTEGER_32)(sz__FMH + a__K4GH) & (__UINTEGER_32)(~ a__K4GH));
+      ptr_table__NKKH=((__POINTER )(&(table_type[(t__L4GH)])));
+      lab_type__PKKH=(__UINTEGER_32)(t__L4GH |  1);
+      next__MKKH=((__POINTER )(NULL));
+      result__OKKH=((__POINTER *)ptr_table__NKKH)[ 0];
+      if ((result__OKKH == (void *)NULL)) {
+        result__OKKH=new_lab__ZPJ(lab_type__PKKH);
+        next__MKKH=(void *)((unsigned long)result__OKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QKKH)));
+        ((__POINTER *)next__MKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NKKH)[ 0]=next__MKKH;
+      } else {
+        next__MKKH=((__POINTER *)result__OKKH)[ 0];
+        if ((next__MKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OKKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QKKH <<  1)) <=  4096)) {
+            next__MKKH=(void *)((unsigned long)result__OKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QKKH)));
+          } else {
+            next__MKKH=new_lab__ZPJ(lab_type__PKKH);
+          };
+          ((__POINTER *)next__MKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NKKH)[ 0]=next__MKKH;
+        } else {
+          ((__POINTER *)result__OKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OKKH=next__MKKH;
+        };
+      };
+      ptr__DMH=result__OKKH;
+    };
+    result__CMH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__DMH);
+    *(result__CMH) = *(HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+  };
+  Self__DKT=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+  new_capacity__5IY=prime_number_ceiling__T11( 193);
+  Self__DKT->buckets__DAT=create__3C4(new_capacity__5IY);
+  Self__DKT->capacity__45S=new_capacity__5IY;
+  Self__DKT->count__EJY= 0;
+  short_dico__QD=result__CMH;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->key__PAT=NULL;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->next__0AT=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;
+  HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__->item__DV3=NULL;
   LINKED_COLLECTIONoSTRING_CONSTANTo__->upper__MDD= 0;
   LINKED_LISToSTRING_CONSTANTo__->parent_linked_collection__LD=(*LINKED_COLLECTIONoSTRING_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;
+  LINKED_LISToSTRING_CONSTANTo__->mem_idx__ZTEC= 0;
+  LINKED_LISToSTRING_CONSTANTo__->mem_lnk__1TEC=NULL;
+  LINKED_LISToSTRING_CONSTANTo__->first_link__PTEC=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->next__UMOD=NULL;
+  LINKED_LIST_NODEoSTRING_CONSTANTo__->item__HXHD=NULL;
+  type_error__FMG= 0;
+  msg_err__GMG=create__ZBB( 256);
+  skip_comment__A4D=FALSE__;
+  last_comment_slot__S4D=NULL;
   last_comment_extern__JYC=NULL;
-  begin_position__53D= 0;
+  begin_position__I5D= 0;
   last_string__V0C=NULL;
-  string_tmp2__F3I=create__ZBB( 256);
-  last_integer__UNO= 0;
-  LINKED_LISToSTRING_CONSTANTo__->last_link__ESEC=NULL;
+  string_tmp2__O4I=create__ZBB( 256);
+  last_integer__3OO= 0;
+  LINKED_LISToSTRING_CONSTANTo__->last_link__YTEC=NULL;
   index_count__P5= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__IYR=NULL;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__DYR= 0;
-  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__IZR= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->buckets__RZR=NULL;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->capacity__MZR= 0;
+  HASHED_DICTIONARYoTYPExSTRING_CONSTANTo__->count__R0R= 0;
   result__1OC=NULL;
   ptr__2OC=((__POINTER )(NULL));
   typ_id__BPC= 0;
@@ -3503,2287 +3503,2287 @@ int main(int argc,char **argv)
     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;
+      a__O4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__P4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__O4GH) & (__UINTEGER_32)(~ a__O4GH));
+      ptr_table__SKKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__RKKH=((__POINTER )(NULL));
+      result__TKKH=((__POINTER *)ptr_table__SKKH)[ 0];
+      if ((result__TKKH == (void *)NULL)) {
+        result__TKKH=new_lab__ZPJ(new_size__P4GH);
+        next__RKKH=(void *)((unsigned long)result__TKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P4GH)));
+        ((__POINTER *)next__RKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SKKH)[ 0]=next__RKKH;
       } 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)));
+        next__RKKH=((__POINTER *)result__TKKH)[ 0];
+        if ((next__RKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TKKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P4GH <<  1)) <=  4096)) {
+            next__RKKH=(void *)((unsigned long)result__TKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P4GH)));
           } else {
-            next__IGKH=new_lab__QOJ(new_size__G0GH);
+            next__RKKH=new_lab__ZPJ(new_size__P4GH);
           };
-          ((__POINTER *)next__IGKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__JGKH)[ 0]=next__IGKH;
+          ((__POINTER *)next__RKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SKKH)[ 0]=next__RKKH;
         } else {
-          ((__POINTER *)result__KGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__KGKH=next__IGKH;
+          ((__POINTER *)result__TKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TKKH=next__RKKH;
         };
       };
-      ptr__2OC=result__KGKH;
+      ptr__2OC=result__TKKH;
     } 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;
+      t__T4GH=((__UINTEGER_32 )typ_id__BPC);
+      a__S4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0KKH=(__UINTEGER_32)((__UINTEGER_32)(sz__4OC + a__S4GH) & (__UINTEGER_32)(~ a__S4GH));
+      ptr_table__XKKH=((__POINTER )(&(table_type[(t__T4GH)])));
+      lab_type__ZKKH=(__UINTEGER_32)(t__T4GH |  1);
+      next__WKKH=((__POINTER )(NULL));
+      result__YKKH=((__POINTER *)ptr_table__XKKH)[ 0];
+      if ((result__YKKH == (void *)NULL)) {
+        result__YKKH=new_lab__ZPJ(lab_type__ZKKH);
+        next__WKKH=(void *)((unsigned long)result__YKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0KKH)));
+        ((__POINTER *)next__WKKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XKKH)[ 0]=next__WKKH;
       } 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)));
+        next__WKKH=((__POINTER *)result__YKKH)[ 0];
+        if ((next__WKKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YKKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0KKH <<  1)) <=  4096)) {
+            next__WKKH=(void *)((unsigned long)result__YKKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0KKH)));
           } else {
-            next__NGKH=new_lab__QOJ(lab_type__QGKH);
+            next__WKKH=new_lab__ZPJ(lab_type__ZKKH);
           };
-          ((__POINTER *)next__NGKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__OGKH)[ 0]=next__NGKH;
+          ((__POINTER *)next__WKKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XKKH)[ 0]=next__WKKH;
         } else {
-          ((__POINTER *)result__PGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__PGKH=next__NGKH;
+          ((__POINTER *)result__YKKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WKKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YKKH=next__WKKH;
         };
       };
-      ptr__2OC=result__PGKH;
+      ptr__2OC=result__YKKH;
     };
     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;
+  Self__SMS=((__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *)result__1OC);
+  new_capacity__2HX=prime_number_ceiling__T11( 193);
+  Self__SMS->buckets__RZR=create__IW2(new_capacity__2HX);
+  Self__SMS->capacity__MZR=new_capacity__2HX;
+  Self__SMS->count__R0R= 0;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->key__3ZR=NULL;
+  HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__->next__I0R=NULL;
+  ARRAYED_COLLECTIONoSLOTo__->capacity__YBS= 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;
+  TYPE_FULL__->flag__2CS= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->upper__W1R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->capacity__Y1R= 0;
+  ARRAYED_COLLECTIONoTYPE_IDo__->storage__U2R=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__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));
+  LINKED_COLLECTIONoENTRYo__->upper__YM3D= 0;
+  LINKED_LISToENTRYo__->parent_linked_collection__TDRD=(*LINKED_COLLECTIONoENTRYo__);
+  LINKED_LISToENTRYo__->first_link__BHWE=NULL;
+  LINKED_LISToENTRYo__->mem_idx__IHWE= 0;
+  LINKED_LISToENTRYo__->mem_lnk__JHWE=NULL;
+  LINKED_LISToENTRYo__->last_link__KHWE=NULL;
+  LINKED_LIST_NODEoENTRYo__->item__T0WE=NULL;
+  LINKED_LIST_NODEoENTRYo__->next__PWFF=NULL;
+  FILE_UNIX__->stream__QHRD=((__POINTER )(NULL));
   proto_input__BI=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->buckets__CAV=NULL;
-  HASHED_SEToSTRING_CONSTANTo__->capacity__FET= 0;
-  HASHED_SEToSTRING_CONSTANTo__->count__LDY= 0;
+  HASHED_SEToSTRING_CONSTANTo__->buckets__LBV=NULL;
+  HASHED_SEToSTRING_CONSTANTo__->capacity__OFT= 0;
+  HASHED_SEToSTRING_CONSTANTo__->count__UEY= 0;
   short_local__XCC=NULL;
-  output_decl__LCE=create__ZBB( 60000);
+  output_decl__UDE=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;
+  is_parameter_type__5HE=FALSE__;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->upper__BSV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->capacity__2VV= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__->storage__XWV=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__->parent_arrayed_collection__NRP=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_TYPE_MONOoo__);
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->upper__GFV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->storage__NJV=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MONOo__->capacity__1KV= 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__;
+  result__FXQ=NULL;
+  ptr__GXQ=((__POINTER )(NULL));
+  typ_id__LXQ= 0;
+  sz__IXQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__IXQ ==  0)) {
+    result__FXQ=FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__LXQ=__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IXQ);
+    if ((typ_id__LXQ == (__INTEGER)(-  1))) {
+      a__W4GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X4GH=(__UINTEGER_32)((__UINTEGER_32)(sz__IXQ + a__W4GH) & (__UINTEGER_32)(~ a__W4GH));
+      ptr_table__2KKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X4GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1KKH=((__POINTER )(NULL));
+      result__3KKH=((__POINTER *)ptr_table__2KKH)[ 0];
+      if ((result__3KKH == (void *)NULL)) {
+        result__3KKH=new_lab__ZPJ(new_size__X4GH);
+        next__1KKH=(void *)((unsigned long)result__3KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4GH)));
+        ((__POINTER *)next__1KKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2KKH)[ 0]=next__1KKH;
+      } else {
+        next__1KKH=((__POINTER *)result__3KKH)[ 0];
+        if ((next__1KKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3KKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X4GH <<  1)) <=  4096)) {
+            next__1KKH=(void *)((unsigned long)result__3KKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X4GH)));
+          } else {
+            next__1KKH=new_lab__ZPJ(new_size__X4GH);
+          };
+          ((__POINTER *)next__1KKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2KKH)[ 0]=next__1KKH;
+        } else {
+          ((__POINTER *)result__3KKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1KKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3KKH=next__1KKH;
+        };
+      };
+      ptr__GXQ=result__3KKH;
+    } else {
+      t__14GH=((__UINTEGER_32 )typ_id__LXQ);
+      a__04GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ELKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IXQ + a__04GH) & (__UINTEGER_32)(~ a__04GH));
+      ptr_table__BLKH=((__POINTER )(&(table_type[(t__14GH)])));
+      lab_type__DLKH=(__UINTEGER_32)(t__14GH |  1);
+      next__ALKH=((__POINTER )(NULL));
+      result__CLKH=((__POINTER *)ptr_table__BLKH)[ 0];
+      if ((result__CLKH == (void *)NULL)) {
+        result__CLKH=new_lab__ZPJ(lab_type__DLKH);
+        next__ALKH=(void *)((unsigned long)result__CLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELKH)));
+        ((__POINTER *)next__ALKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BLKH)[ 0]=next__ALKH;
+      } else {
+        next__ALKH=((__POINTER *)result__CLKH)[ 0];
+        if ((next__ALKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CLKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ELKH <<  1)) <=  4096)) {
+            next__ALKH=(void *)((unsigned long)result__CLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ELKH)));
+          } else {
+            next__ALKH=new_lab__ZPJ(lab_type__DLKH);
+          };
+          ((__POINTER *)next__ALKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BLKH)[ 0]=next__ALKH;
+        } else {
+          ((__POINTER *)result__CLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ALKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CLKH=next__ALKH;
+        };
+      };
+      ptr__GXQ=result__CLKH;
+    };
+    result__FXQ=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__GXQ);
+    *(result__FXQ) = *(FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__T0V=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)result__FXQ);
+  if ((Self__T0V->parent_arrayed_collection__NRP.capacity__2VV <  5)) {
+    Self__T0V->parent_arrayed_collection__NRP.storage__XWV=create__WHRB( 5);
+    Self__T0V->parent_arrayed_collection__NRP.capacity__2VV= 5;
+  };
+  Self__T0V->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(-  1);
+  free_list__ORP=result__FXQ;
+  empty_list__VSP=create_with_capacity__MCR( 0);
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->buckets__S2V=NULL;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->capacity__N2V= 0;
+  HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__->count__BFW= 0;
+  result__CBR=NULL;
+  ptr__DBR=((__POINTER )(NULL));
+  typ_id__IBR= 0;
+  sz__FBR=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__FBR ==  0)) {
+    result__CBR=HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
   } else {
-    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__;
+    typ_id__IBR=__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FBR);
+    if ((typ_id__IBR == (__INTEGER)(-  1))) {
+      a__44GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__54GH=(__UINTEGER_32)((__UINTEGER_32)(sz__FBR + a__44GH) & (__UINTEGER_32)(~ a__44GH));
+      ptr_table__GLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__54GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FLKH=((__POINTER )(NULL));
+      result__HLKH=((__POINTER *)ptr_table__GLKH)[ 0];
+      if ((result__HLKH == (void *)NULL)) {
+        result__HLKH=new_lab__ZPJ(new_size__54GH);
+        next__FLKH=(void *)((unsigned long)result__HLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__54GH)));
+        ((__POINTER *)next__FLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GLKH)[ 0]=next__FLKH;
+      } else {
+        next__FLKH=((__POINTER *)result__HLKH)[ 0];
+        if ((next__FLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HLKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__54GH <<  1)) <=  4096)) {
+            next__FLKH=(void *)((unsigned long)result__HLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__54GH)));
+          } else {
+            next__FLKH=new_lab__ZPJ(new_size__54GH);
+          };
+          ((__POINTER *)next__FLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GLKH)[ 0]=next__FLKH;
+        } else {
+          ((__POINTER *)result__HLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HLKH=next__FLKH;
+        };
+      };
+      ptr__DBR=result__HLKH;
+    } else {
+      t__D5GH=((__UINTEGER_32 )typ_id__IBR);
+      a__C5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__FBR + a__C5GH) & (__UINTEGER_32)(~ a__C5GH));
+      ptr_table__LLKH=((__POINTER )(&(table_type[(t__D5GH)])));
+      lab_type__NLKH=(__UINTEGER_32)(t__D5GH |  1);
+      next__KLKH=((__POINTER )(NULL));
+      result__MLKH=((__POINTER *)ptr_table__LLKH)[ 0];
+      if ((result__MLKH == (void *)NULL)) {
+        result__MLKH=new_lab__ZPJ(lab_type__NLKH);
+        next__KLKH=(void *)((unsigned long)result__MLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLKH)));
+        ((__POINTER *)next__KLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LLKH)[ 0]=next__KLKH;
+      } else {
+        next__KLKH=((__POINTER *)result__MLKH)[ 0];
+        if ((next__KLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MLKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OLKH <<  1)) <=  4096)) {
+            next__KLKH=(void *)((unsigned long)result__MLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLKH)));
+          } else {
+            next__KLKH=new_lab__ZPJ(lab_type__NLKH);
+          };
+          ((__POINTER *)next__KLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LLKH)[ 0]=next__KLKH;
+        } else {
+          ((__POINTER *)result__MLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MLKH=next__KLKH;
+        };
+      };
+      ptr__DBR=result__MLKH;
+    };
+    result__CBR=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)ptr__DBR);
+    *(result__CBR) = *(HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__FCW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)result__CBR);
+  new_capacity__WF1=prime_number_ceiling__T11( 53);
+  Self__FCW->buckets__S2V=create__XWBB(new_capacity__WF1);
+  Self__FCW->capacity__N2V=new_capacity__WF1;
+  Self__FCW->count__BFW= 0;
+  bucket__ATP=result__CBR;
+  ITM_TYPE_STYLE__->parent_itm_type_simple__FPN=(*ITM_TYPE_SIMPLE__);
+  ITM_TYPE_STYLE__->style__XVP=NULL;
+  ITM_TYPE_GENERIC__->parent_itm_type_style__GPN=(*ITM_TYPE_STYLE__);
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->item__42V=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__->next__K3V=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->upper__0GP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->capacity__ZYV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_MULTIo__->storage__EZV=NULL;
+  FAST_ARRAYoITM_TYPE_MULTIo__->parent_arrayed_collection__QGP=(*ARRAYED_COLLECTIONoITM_TYPE_MULTIo__);
+  result__SPQ=NULL;
+  ptr__TPQ=((__POINTER )(NULL));
+  typ_id__YPQ= 0;
+  sz__VPQ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MULTIo));
+  if ((sz__VPQ ==  0)) {
+    result__SPQ=FAST_ARRAYoITM_TYPE_MULTIo__;
   } else {
-    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__;
+    typ_id__YPQ=__FAST_ARRAYoITM_TYPE_MULTIo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VPQ);
+    if ((typ_id__YPQ == (__INTEGER)(-  1))) {
+      a__G5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__H5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPQ + a__G5GH) & (__UINTEGER_32)(~ a__G5GH));
+      ptr_table__QLKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__PLKH=((__POINTER )(NULL));
+      result__RLKH=((__POINTER *)ptr_table__QLKH)[ 0];
+      if ((result__RLKH == (void *)NULL)) {
+        result__RLKH=new_lab__ZPJ(new_size__H5GH);
+        next__PLKH=(void *)((unsigned long)result__RLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5GH)));
+        ((__POINTER *)next__PLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QLKH)[ 0]=next__PLKH;
+      } else {
+        next__PLKH=((__POINTER *)result__RLKH)[ 0];
+        if ((next__PLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RLKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__H5GH <<  1)) <=  4096)) {
+            next__PLKH=(void *)((unsigned long)result__RLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H5GH)));
+          } else {
+            next__PLKH=new_lab__ZPJ(new_size__H5GH);
+          };
+          ((__POINTER *)next__PLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QLKH)[ 0]=next__PLKH;
+        } else {
+          ((__POINTER *)result__RLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RLKH=next__PLKH;
+        };
+      };
+      ptr__TPQ=result__RLKH;
+    } else {
+      t__L5GH=((__UINTEGER_32 )typ_id__YPQ);
+      a__K5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YLKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VPQ + a__K5GH) & (__UINTEGER_32)(~ a__K5GH));
+      ptr_table__VLKH=((__POINTER )(&(table_type[(t__L5GH)])));
+      lab_type__XLKH=(__UINTEGER_32)(t__L5GH |  1);
+      next__ULKH=((__POINTER )(NULL));
+      result__WLKH=((__POINTER *)ptr_table__VLKH)[ 0];
+      if ((result__WLKH == (void *)NULL)) {
+        result__WLKH=new_lab__ZPJ(lab_type__XLKH);
+        next__ULKH=(void *)((unsigned long)result__WLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YLKH)));
+        ((__POINTER *)next__ULKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VLKH)[ 0]=next__ULKH;
+      } else {
+        next__ULKH=((__POINTER *)result__WLKH)[ 0];
+        if ((next__ULKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WLKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YLKH <<  1)) <=  4096)) {
+            next__ULKH=(void *)((unsigned long)result__WLKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YLKH)));
+          } else {
+            next__ULKH=new_lab__ZPJ(lab_type__XLKH);
+          };
+          ((__POINTER *)next__ULKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VLKH)[ 0]=next__ULKH;
+        } else {
+          ((__POINTER *)result__WLKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ULKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WLKH=next__ULKH;
+        };
+      };
+      ptr__TPQ=result__WLKH;
+    };
+    result__SPQ=((__FAST_ARRAYoITM_TYPE_MULTIo *)ptr__TPQ);
+    *(result__SPQ) = *(FAST_ARRAYoITM_TYPE_MULTIo__);
+  };
+  Self__QYV=((__FAST_ARRAYoITM_TYPE_MULTIo *)result__SPQ);
+  if ((Self__QYV->parent_arrayed_collection__QGP.capacity__ZYV <  32)) {
+    Self__QYV->parent_arrayed_collection__QGP.storage__EZV=create__WJXB( 32);
+    Self__QYV->parent_arrayed_collection__QGP.capacity__ZYV= 32;
+  };
+  Self__QYV->parent_arrayed_collection__QGP.upper__0GP=(__INTEGER)(-  1);
+  dico__RGP=result__SPQ;
+  ITM_TYPE_MULTI__->list_type__EHP=NULL;
+  ITM_TYPE_BLOCK__->type_argument__0JN=NULL;
+  ITM_TYPE_GENERIC__->list_type__BWP=NULL;
+  ITM_TYPE_BLOCK__->type_result__EKN=NULL;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->upper__MJN= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->capacity__CHV= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__->storage__NHV=NULL;
+  FAST_ARRAYoITM_TYPE_BLOCKo__->parent_arrayed_collection__CJN=(*ARRAYED_COLLECTIONoITM_TYPE_BLOCKo__);
+  result__YXO=NULL;
+  ptr__ZXO=((__POINTER )(NULL));
+  typ_id__4XO= 0;
+  sz__1XO=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_BLOCKo));
+  if ((sz__1XO ==  0)) {
+    result__YXO=FAST_ARRAYoITM_TYPE_BLOCKo__;
   } else {
-    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__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__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__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__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__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__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__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__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__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__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__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__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__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__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__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__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__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__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;
+    typ_id__4XO=__FAST_ARRAYoITM_TYPE_BLOCKo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__1XO);
+    if ((typ_id__4XO == (__INTEGER)(-  1))) {
+      a__O5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__P5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__1XO + a__O5GH) & (__UINTEGER_32)(~ a__O5GH));
+      ptr_table__0LKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZLKH=((__POINTER )(NULL));
+      result__1LKH=((__POINTER *)ptr_table__0LKH)[ 0];
+      if ((result__1LKH == (void *)NULL)) {
+        result__1LKH=new_lab__ZPJ(new_size__P5GH);
+        next__ZLKH=(void *)((unsigned long)result__1LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5GH)));
+        ((__POINTER *)next__ZLKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0LKH)[ 0]=next__ZLKH;
       } 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)));
+        next__ZLKH=((__POINTER *)result__1LKH)[ 0];
+        if ((next__ZLKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1LKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P5GH <<  1)) <=  4096)) {
+            next__ZLKH=(void *)((unsigned long)result__1LKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5GH)));
           } else {
-            next__SNKH=new_lab__QOJ(new_size__T5GH);
+            next__ZLKH=new_lab__ZPJ(new_size__P5GH);
           };
-          ((__POINTER *)next__SNKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TNKH)[ 0]=next__SNKH;
+          ((__POINTER *)next__ZLKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0LKH)[ 0]=next__ZLKH;
         } else {
-          ((__POINTER *)result__UNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UNKH=next__SNKH;
+          ((__POINTER *)result__1LKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZLKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1LKH=next__ZLKH;
         };
       };
-      ptr__0ZYB=result__UNKH;
+      ptr__ZXO=result__1LKH;
     } 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__;
+      t__T5GH=((__UINTEGER_32 )typ_id__4XO);
+      a__S5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__1XO + a__S5GH) & (__UINTEGER_32)(~ a__S5GH));
+      ptr_table__5LKH=((__POINTER )(&(table_type[(t__T5GH)])));
+      lab_type__BMKH=(__UINTEGER_32)(t__T5GH |  1);
+      next__4LKH=((__POINTER )(NULL));
+      result__AMKH=((__POINTER *)ptr_table__5LKH)[ 0];
+      if ((result__AMKH == (void *)NULL)) {
+        result__AMKH=new_lab__ZPJ(lab_type__BMKH);
+        next__4LKH=(void *)((unsigned long)result__AMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMKH)));
+        ((__POINTER *)next__4LKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5LKH)[ 0]=next__4LKH;
+      } else {
+        next__4LKH=((__POINTER *)result__AMKH)[ 0];
+        if ((next__4LKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CMKH <<  1)) <=  4096)) {
+            next__4LKH=(void *)((unsigned long)result__AMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CMKH)));
+          } else {
+            next__4LKH=new_lab__ZPJ(lab_type__BMKH);
+          };
+          ((__POINTER *)next__4LKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5LKH)[ 0]=next__4LKH;
+        } else {
+          ((__POINTER *)result__AMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4LKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AMKH=next__4LKH;
+        };
+      };
+      ptr__ZXO=result__AMKH;
+    };
+    result__YXO=((__FAST_ARRAYoITM_TYPE_BLOCKo *)ptr__ZXO);
+    *(result__YXO) = *(FAST_ARRAYoITM_TYPE_BLOCKo__);
+  };
+  Self__ZGV=((__FAST_ARRAYoITM_TYPE_BLOCKo *)result__YXO);
+  if ((Self__ZGV->parent_arrayed_collection__CJN.capacity__CHV <  32)) {
+    Self__ZGV->parent_arrayed_collection__CJN.storage__NHV=create__RSWB( 32);
+    Self__ZGV->parent_arrayed_collection__CJN.capacity__CHV= 32;
+  };
+  Self__ZGV->parent_arrayed_collection__CJN.upper__MJN=(__INTEGER)(-  1);
+  dico__DJN=result__YXO;
+  ITM_CODE__->parent_itm_object__OBE=(*ITM_OBJECT__);
+  ITM_CONSTANT__->parent_itm_code__SUF=(*ITM_CODE__);
+  ITM_REAL__->parent_itm_constant__JOO=(*ITM_CONSTANT__);
+  ITM_NUMBER__->parent_itm_constant__1OO=(*ITM_CONSTANT__);
+  ITM_CHARACTER__->parent_itm_constant__NPO=(*ITM_CONSTANT__);
+  ITM_STRING__->parent_itm_constant__4PO=(*ITM_CONSTANT__);
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->upper__EVP= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->capacity__P4V= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_GENERICo__->storage__04V=NULL;
+  FAST_ARRAYoITM_TYPE_GENERICo__->parent_arrayed_collection__0UP=(*ARRAYED_COLLECTIONoITM_TYPE_GENERICo__);
+  result__5ZQ=NULL;
+  ptr__A0Q=((__POINTER )(NULL));
+  typ_id__F0Q= 0;
+  sz__C0Q=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_GENERICo));
+  if ((sz__C0Q ==  0)) {
+    result__5ZQ=FAST_ARRAYoITM_TYPE_GENERICo__;
   } else {
-    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;
+    typ_id__F0Q=__FAST_ARRAYoITM_TYPE_GENERICo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__C0Q);
+    if ((typ_id__F0Q == (__INTEGER)(-  1))) {
+      a__W5GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__X5GH=(__UINTEGER_32)((__UINTEGER_32)(sz__C0Q + a__W5GH) & (__UINTEGER_32)(~ a__W5GH));
+      ptr_table__EMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X5GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DMKH=((__POINTER )(NULL));
+      result__FMKH=((__POINTER *)ptr_table__EMKH)[ 0];
+      if ((result__FMKH == (void *)NULL)) {
+        result__FMKH=new_lab__ZPJ(new_size__X5GH);
+        next__DMKH=(void *)((unsigned long)result__FMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5GH)));
+        ((__POINTER *)next__DMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EMKH)[ 0]=next__DMKH;
       } 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)));
+        next__DMKH=((__POINTER *)result__FMKH)[ 0];
+        if ((next__DMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X5GH <<  1)) <=  4096)) {
+            next__DMKH=(void *)((unsigned long)result__FMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5GH)));
           } else {
-            next__2NKH=new_lab__QOJ(new_size__15GH);
+            next__DMKH=new_lab__ZPJ(new_size__X5GH);
           };
-          ((__POINTER *)next__2NKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__3NKH)[ 0]=next__2NKH;
+          ((__POINTER *)next__DMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EMKH)[ 0]=next__DMKH;
         } else {
-          ((__POINTER *)result__4NKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2NKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__4NKH=next__2NKH;
+          ((__POINTER *)result__FMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FMKH=next__DMKH;
         };
       };
-      ptr__52YB=result__4NKH;
+      ptr__A0Q=result__FMKH;
     } 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__;
+      t__15GH=((__UINTEGER_32 )typ_id__F0Q);
+      a__05GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__C0Q + a__05GH) & (__UINTEGER_32)(~ a__05GH));
+      ptr_table__JMKH=((__POINTER )(&(table_type[(t__15GH)])));
+      lab_type__LMKH=(__UINTEGER_32)(t__15GH |  1);
+      next__IMKH=((__POINTER )(NULL));
+      result__KMKH=((__POINTER *)ptr_table__JMKH)[ 0];
+      if ((result__KMKH == (void *)NULL)) {
+        result__KMKH=new_lab__ZPJ(lab_type__LMKH);
+        next__IMKH=(void *)((unsigned long)result__KMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMKH)));
+        ((__POINTER *)next__IMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JMKH)[ 0]=next__IMKH;
+      } else {
+        next__IMKH=((__POINTER *)result__KMKH)[ 0];
+        if ((next__IMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MMKH <<  1)) <=  4096)) {
+            next__IMKH=(void *)((unsigned long)result__KMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MMKH)));
+          } else {
+            next__IMKH=new_lab__ZPJ(lab_type__LMKH);
+          };
+          ((__POINTER *)next__IMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JMKH)[ 0]=next__IMKH;
+        } else {
+          ((__POINTER *)result__KMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KMKH=next__IMKH;
+        };
+      };
+      ptr__A0Q=result__KMKH;
+    };
+    result__5ZQ=((__FAST_ARRAYoITM_TYPE_GENERICo *)ptr__A0Q);
+    *(result__5ZQ) = *(FAST_ARRAYoITM_TYPE_GENERICo__);
+  };
+  Self__G4V=((__FAST_ARRAYoITM_TYPE_GENERICo *)result__5ZQ);
+  if ((Self__G4V->parent_arrayed_collection__0UP.capacity__P4V <  32)) {
+    Self__G4V->parent_arrayed_collection__0UP.storage__04V=create__QQXB( 32);
+    Self__G4V->parent_arrayed_collection__0UP.capacity__P4V= 32;
+  };
+  Self__G4V->parent_arrayed_collection__0UP.upper__EVP=(__INTEGER)(-  1);
+  dico__1UP=result__5ZQ;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->buckets__QZT=NULL;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->capacity__LZT= 0;
+  HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__->count__ICZ= 0;
+  result__MJK=NULL;
+  ptr__NJK=((__POINTER )(NULL));
+  typ_id__SJK= 0;
+  sz__PJK=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+  if ((sz__PJK ==  0)) {
+    result__MJK=HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
   } else {
-    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;
+    typ_id__SJK=__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PJK);
+    if ((typ_id__SJK == (__INTEGER)(-  1))) {
+      a__45GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__55GH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJK + a__45GH) & (__UINTEGER_32)(~ a__45GH));
+      ptr_table__OMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__55GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__NMKH=((__POINTER )(NULL));
+      result__PMKH=((__POINTER *)ptr_table__OMKH)[ 0];
+      if ((result__PMKH == (void *)NULL)) {
+        result__PMKH=new_lab__ZPJ(new_size__55GH);
+        next__NMKH=(void *)((unsigned long)result__PMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55GH)));
+        ((__POINTER *)next__NMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__OMKH)[ 0]=next__NMKH;
       } 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)));
+        next__NMKH=((__POINTER *)result__PMKH)[ 0];
+        if ((next__NMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__55GH <<  1)) <=  4096)) {
+            next__NMKH=(void *)((unsigned long)result__PMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55GH)));
           } else {
-            next__GOKH=new_lab__QOJ(new_size__DAHH);
+            next__NMKH=new_lab__ZPJ(new_size__55GH);
           };
-          ((__POINTER *)next__GOKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__HOKH)[ 0]=next__GOKH;
+          ((__POINTER *)next__NMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OMKH)[ 0]=next__NMKH;
         } else {
-          ((__POINTER *)result__IOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__IOKH=next__GOKH;
+          ((__POINTER *)result__PMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PMKH=next__NMKH;
         };
       };
-      ptr__ZG5B=result__IOKH;
+      ptr__NJK=result__PMKH;
     } 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__;
+      t__DAHH=((__UINTEGER_32 )typ_id__SJK);
+      a__CAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WMKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PJK + a__CAHH) & (__UINTEGER_32)(~ a__CAHH));
+      ptr_table__TMKH=((__POINTER )(&(table_type[(t__DAHH)])));
+      lab_type__VMKH=(__UINTEGER_32)(t__DAHH |  1);
+      next__SMKH=((__POINTER )(NULL));
+      result__UMKH=((__POINTER *)ptr_table__TMKH)[ 0];
+      if ((result__UMKH == (void *)NULL)) {
+        result__UMKH=new_lab__ZPJ(lab_type__VMKH);
+        next__SMKH=(void *)((unsigned long)result__UMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMKH)));
+        ((__POINTER *)next__SMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TMKH)[ 0]=next__SMKH;
+      } else {
+        next__SMKH=((__POINTER *)result__UMKH)[ 0];
+        if ((next__SMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WMKH <<  1)) <=  4096)) {
+            next__SMKH=(void *)((unsigned long)result__UMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMKH)));
+          } else {
+            next__SMKH=new_lab__ZPJ(lab_type__VMKH);
+          };
+          ((__POINTER *)next__SMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TMKH)[ 0]=next__SMKH;
+        } else {
+          ((__POINTER *)result__UMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__UMKH=next__SMKH;
+        };
+      };
+      ptr__NJK=result__UMKH;
+    };
+    result__MJK=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__NJK);
+    *(result__MJK) = *(HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+  };
+  Self__LIU=((__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__MJK);
+  new_capacity__DCZ=prime_number_ceiling__T11( 193);
+  Self__LIU->buckets__QZT=create__RE5(new_capacity__DCZ);
+  Self__LIU->capacity__LZT=new_capacity__DCZ;
+  Self__LIU->count__ICZ= 0;
+  dico__5RI=result__MJK;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->key__2ZT=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->next__H0T=NULL;
+  HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__->item__P0T=NULL;
+  result__PTQ=NULL;
+  ptr__QTQ=((__POINTER )(NULL));
+  typ_id__VTQ= 0;
+  sz__STQ=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+  if ((sz__STQ ==  0)) {
+    result__PTQ=ITM_TYPE_PARAMETER__;
   } else {
-    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;
+    typ_id__VTQ=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__STQ);
+    if ((typ_id__VTQ == (__INTEGER)(-  1))) {
+      a__IGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JGFH=(__UINTEGER_32)((__UINTEGER_32)(sz__STQ + a__IGFH) & (__UINTEGER_32)(~ a__IGFH));
+      ptr_table__YMKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JGFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XMKH=((__POINTER )(NULL));
+      result__ZMKH=((__POINTER *)ptr_table__YMKH)[ 0];
+      if ((result__ZMKH == (void *)NULL)) {
+        result__ZMKH=new_lab__ZPJ(new_size__JGFH);
+        next__XMKH=(void *)((unsigned long)result__ZMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGFH)));
+        ((__POINTER *)next__XMKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YMKH)[ 0]=next__XMKH;
+      } else {
+        next__XMKH=((__POINTER *)result__ZMKH)[ 0];
+        if ((next__XMKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZMKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JGFH <<  1)) <=  4096)) {
+            next__XMKH=(void *)((unsigned long)result__ZMKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JGFH)));
+          } else {
+            next__XMKH=new_lab__ZPJ(new_size__JGFH);
+          };
+          ((__POINTER *)next__XMKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YMKH)[ 0]=next__XMKH;
+        } else {
+          ((__POINTER *)result__ZMKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XMKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZMKH=next__XMKH;
+        };
+      };
+      ptr__QTQ=result__ZMKH;
+    } else {
+      t__NGFH=((__UINTEGER_32 )typ_id__VTQ);
+      a__MGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ANKH=(__UINTEGER_32)((__UINTEGER_32)(sz__STQ + a__MGFH) & (__UINTEGER_32)(~ a__MGFH));
+      ptr_table__3MKH=((__POINTER )(&(table_type[(t__NGFH)])));
+      lab_type__5MKH=(__UINTEGER_32)(t__NGFH |  1);
+      next__2MKH=((__POINTER )(NULL));
+      result__4MKH=((__POINTER *)ptr_table__3MKH)[ 0];
+      if ((result__4MKH == (void *)NULL)) {
+        result__4MKH=new_lab__ZPJ(lab_type__5MKH);
+        next__2MKH=(void *)((unsigned long)result__4MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANKH)));
+        ((__POINTER *)next__2MKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3MKH)[ 0]=next__2MKH;
+      } else {
+        next__2MKH=((__POINTER *)result__4MKH)[ 0];
+        if ((next__2MKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4MKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ANKH <<  1)) <=  4096)) {
+            next__2MKH=(void *)((unsigned long)result__4MKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ANKH)));
+          } else {
+            next__2MKH=new_lab__ZPJ(lab_type__5MKH);
+          };
+          ((__POINTER *)next__2MKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3MKH)[ 0]=next__2MKH;
+        } else {
+          ((__POINTER *)result__4MKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2MKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4MKH=next__2MKH;
+        };
+      };
+      ptr__QTQ=result__4MKH;
+    };
+    result__PTQ=((__ITM_TYPE_PARAMETER *)ptr__QTQ);
+    *(result__PTQ) = *(ITM_TYPE_PARAMETER__);
+  };
+  Self__H0V=((__ITM_TYPE_PARAMETER *)result__PTQ);
+  Self__H0V->parent_itm_type__UBE.name__OVP=(&__string_1);
+  fast_put__to__PLZ(result__MJK,Self__H0V,(&__string_1));
+  type_self__LRN=result__PTQ;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->upper__TLR= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->capacity__XIW= 0;
+  ARRAYED_COLLECTIONoITM_TYPE_STYLEo__->storage__CJW=NULL;
+  FAST_ARRAYoITM_TYPE_STYLEo__->parent_arrayed_collection__JLR=(*ARRAYED_COLLECTIONoITM_TYPE_STYLEo__);
+  result__LSR=NULL;
+  ptr__MSR=((__POINTER )(NULL));
+  typ_id__RSR= 0;
+  sz__OSR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_STYLEo));
+  if ((sz__OSR ==  0)) {
+    result__LSR=FAST_ARRAYoITM_TYPE_STYLEo__;
+  } else {
+    typ_id__RSR=__FAST_ARRAYoITM_TYPE_STYLEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OSR);
+    if ((typ_id__RSR == (__INTEGER)(-  1))) {
+      a__GAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSR + a__GAHH) & (__UINTEGER_32)(~ a__GAHH));
+      ptr_table__CNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BNKH=((__POINTER )(NULL));
+      result__DNKH=((__POINTER *)ptr_table__CNKH)[ 0];
+      if ((result__DNKH == (void *)NULL)) {
+        result__DNKH=new_lab__ZPJ(new_size__HAHH);
+        next__BNKH=(void *)((unsigned long)result__DNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HAHH)));
+        ((__POINTER *)next__BNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CNKH)[ 0]=next__BNKH;
       } 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)));
+        next__BNKH=((__POINTER *)result__DNKH)[ 0];
+        if ((next__BNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DNKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HAHH <<  1)) <=  4096)) {
+            next__BNKH=(void *)((unsigned long)result__DNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HAHH)));
           } else {
-            next__QOKH=new_lab__QOJ(new_size__LAHH);
+            next__BNKH=new_lab__ZPJ(new_size__HAHH);
           };
-          ((__POINTER *)next__QOKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ROKH)[ 0]=next__QOKH;
+          ((__POINTER *)next__BNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CNKH)[ 0]=next__BNKH;
         } else {
-          ((__POINTER *)result__SOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SOKH=next__QOKH;
+          ((__POINTER *)result__DNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DNKH=next__BNKH;
         };
       };
-      ptr__S4HE=result__SOKH;
+      ptr__MSR=result__DNKH;
     } else {
-      t__PAHH=((__UINTEGER_32 )typ_id__X4HE);
+      t__LAHH=((__UINTEGER_32 )typ_id__RSR);
+      a__KAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__KNKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OSR + a__KAHH) & (__UINTEGER_32)(~ a__KAHH));
+      ptr_table__HNKH=((__POINTER )(&(table_type[(t__LAHH)])));
+      lab_type__JNKH=(__UINTEGER_32)(t__LAHH |  1);
+      next__GNKH=((__POINTER )(NULL));
+      result__INKH=((__POINTER *)ptr_table__HNKH)[ 0];
+      if ((result__INKH == (void *)NULL)) {
+        result__INKH=new_lab__ZPJ(lab_type__JNKH);
+        next__GNKH=(void *)((unsigned long)result__INKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNKH)));
+        ((__POINTER *)next__GNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__HNKH)[ 0]=next__GNKH;
+      } else {
+        next__GNKH=((__POINTER *)result__INKH)[ 0];
+        if ((next__GNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__INKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KNKH <<  1)) <=  4096)) {
+            next__GNKH=(void *)((unsigned long)result__INKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KNKH)));
+          } else {
+            next__GNKH=new_lab__ZPJ(lab_type__JNKH);
+          };
+          ((__POINTER *)next__GNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HNKH)[ 0]=next__GNKH;
+        } else {
+          ((__POINTER *)result__INKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__INKH=next__GNKH;
+        };
+      };
+      ptr__MSR=result__INKH;
+    };
+    result__LSR=((__FAST_ARRAYoITM_TYPE_STYLEo *)ptr__MSR);
+    *(result__LSR) = *(FAST_ARRAYoITM_TYPE_STYLEo__);
+  };
+  Self__OIW=((__FAST_ARRAYoITM_TYPE_STYLEo *)result__LSR);
+  if ((Self__OIW->parent_arrayed_collection__JLR.capacity__XIW <  32)) {
+    Self__OIW->parent_arrayed_collection__JLR.storage__CJW=create__2FYB( 32);
+    Self__OIW->parent_arrayed_collection__JLR.capacity__XIW= 32;
+  };
+  Self__OIW->parent_arrayed_collection__JLR.upper__TLR=(__INTEGER)(-  1);
+  dico__KLR=result__LSR;
+  type_null__DSN=get__QRI((&__string_2));
+  ITM_LIST__->parent_itm_code__R3E=(*ITM_CODE__);
+  last_group__SSF=NULL;
+  old_position__QPI= 0;
+  old_pos_cur__SPI= 0;
+  old_pos_line__UPI= 0;
+  old_pos_col__WPI= 0;
+  old_short_derive__YPI= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->upper__NYT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->capacity__YFU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__->storage__DGU=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__->parent_arrayed_collection__BQI=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_LOCALoo__);
+  ARRAYED_COLLECTIONoITM_LOCALo__->upper__UYK= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->capacity__THU= 0;
+  ARRAYED_COLLECTIONoITM_LOCALo__->storage__4HU=NULL;
+  FAST_ARRAYoITM_LOCALo__->parent_arrayed_collection__1ZH=(*ARRAYED_COLLECTIONoITM_LOCALo__);
+  result__JGK=NULL;
+  ptr__KGK=((__POINTER )(NULL));
+  typ_id__PGK= 0;
+  sz__MGK=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo));
+  if ((sz__MGK ==  0)) {
+    result__JGK=FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+  } else {
+    typ_id__PGK=__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MGK);
+    if ((typ_id__PGK == (__INTEGER)(-  1))) {
       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);
+      new_size__PAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__MGK + a__OAHH) & (__UINTEGER_32)(~ a__OAHH));
+      ptr_table__MNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LNKH=((__POINTER )(NULL));
+      result__NNKH=((__POINTER *)ptr_table__MNKH)[ 0];
+      if ((result__NNKH == (void *)NULL)) {
+        result__NNKH=new_lab__ZPJ(new_size__PAHH);
+        next__LNKH=(void *)((unsigned long)result__NNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PAHH)));
+        ((__POINTER *)next__LNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MNKH)[ 0]=next__LNKH;
+      } else {
+        next__LNKH=((__POINTER *)result__NNKH)[ 0];
+        if ((next__LNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NNKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PAHH <<  1)) <=  4096)) {
+            next__LNKH=(void *)((unsigned long)result__NNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PAHH)));
+          } else {
+            next__LNKH=new_lab__ZPJ(new_size__PAHH);
+          };
+          ((__POINTER *)next__LNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MNKH)[ 0]=next__LNKH;
+        } else {
+          ((__POINTER *)result__NNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NNKH=next__LNKH;
+        };
+      };
+      ptr__KGK=result__NNKH;
+    } else {
+      t__TAHH=((__UINTEGER_32 )typ_id__PGK);
+      a__SAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UNKH=(__UINTEGER_32)((__UINTEGER_32)(sz__MGK + a__SAHH) & (__UINTEGER_32)(~ a__SAHH));
+      ptr_table__RNKH=((__POINTER )(&(table_type[(t__TAHH)])));
+      lab_type__TNKH=(__UINTEGER_32)(t__TAHH |  1);
+      next__QNKH=((__POINTER )(NULL));
+      result__SNKH=((__POINTER *)ptr_table__RNKH)[ 0];
+      if ((result__SNKH == (void *)NULL)) {
+        result__SNKH=new_lab__ZPJ(lab_type__TNKH);
+        next__QNKH=(void *)((unsigned long)result__SNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNKH)));
+        ((__POINTER *)next__QNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RNKH)[ 0]=next__QNKH;
+      } else {
+        next__QNKH=((__POINTER *)result__SNKH)[ 0];
+        if ((next__QNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SNKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UNKH <<  1)) <=  4096)) {
+            next__QNKH=(void *)((unsigned long)result__SNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNKH)));
+          } else {
+            next__QNKH=new_lab__ZPJ(lab_type__TNKH);
+          };
+          ((__POINTER *)next__QNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RNKH)[ 0]=next__QNKH;
+        } else {
+          ((__POINTER *)result__SNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SNKH=next__QNKH;
+        };
+      };
+      ptr__KGK=result__SNKH;
+    };
+    result__JGK=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)ptr__KGK);
+    *(result__JGK) = *(FAST_ARRAYoFAST_ARRAYoITM_LOCALoo__);
+  };
+  Self__PFU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)result__JGK);
+  if ((Self__PFU->parent_arrayed_collection__BQI.capacity__YFU <  5)) {
+    Self__PFU->parent_arrayed_collection__BQI.storage__DGU=create__OFQB( 5);
+    Self__PFU->parent_arrayed_collection__BQI.capacity__YFU= 5;
+  };
+  Self__PFU->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(-  1);
+  free_list__CQI=result__JGK;
+  ITM_LOCAL__->parent_itm_object__WZH=(*ITM_OBJECT__);
+  ITM_LOCAL__->name__X0K=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->item__XBV=NULL;
+  HASHED_SET_NODEoSTRING_CONSTANTo__->next__CCV=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->upper__MTT= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->capacity__42T= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__->storage__03T=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_CODEoo__->parent_arrayed_collection__X2H=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_CODEoo__);
+  ARRAYED_COLLECTIONoITM_CODEo__->upper__VFL= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->capacity__4UT= 0;
+  ARRAYED_COLLECTIONoITM_CODEo__->storage__JVT=NULL;
+  FAST_ARRAYoITM_CODEo__->parent_arrayed_collection__ISF=(*ARRAYED_COLLECTIONoITM_CODEo__);
+  result__S2J=NULL;
+  ptr__T2J=((__POINTER )(NULL));
+  typ_id__Y2J= 0;
+  sz__V2J=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_CODEoo));
+  if ((sz__V2J ==  0)) {
+    result__S2J=FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+  } else {
+    typ_id__Y2J=__FAST_ARRAYoFAST_ARRAYoITM_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V2J);
+    if ((typ_id__Y2J == (__INTEGER)(-  1))) {
+      a__WAHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XAHH=(__UINTEGER_32)((__UINTEGER_32)(sz__V2J + a__WAHH) & (__UINTEGER_32)(~ a__WAHH));
+      ptr_table__WNKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XAHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__VNKH=((__POINTER )(NULL));
+      result__XNKH=((__POINTER *)ptr_table__WNKH)[ 0];
+      if ((result__XNKH == (void *)NULL)) {
+        result__XNKH=new_lab__ZPJ(new_size__XAHH);
+        next__VNKH=(void *)((unsigned long)result__XNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XAHH)));
+        ((__POINTER *)next__VNKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WNKH)[ 0]=next__VNKH;
+      } else {
+        next__VNKH=((__POINTER *)result__XNKH)[ 0];
+        if ((next__VNKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XNKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XAHH <<  1)) <=  4096)) {
+            next__VNKH=(void *)((unsigned long)result__XNKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XAHH)));
+          } else {
+            next__VNKH=new_lab__ZPJ(new_size__XAHH);
+          };
+          ((__POINTER *)next__VNKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WNKH)[ 0]=next__VNKH;
+        } else {
+          ((__POINTER *)result__XNKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VNKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XNKH=next__VNKH;
+        };
+      };
+      ptr__T2J=result__XNKH;
+    } else {
+      t__1AHH=((__UINTEGER_32 )typ_id__Y2J);
+      a__0AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4NKH=(__UINTEGER_32)((__UINTEGER_32)(sz__V2J + a__0AHH) & (__UINTEGER_32)(~ a__0AHH));
+      ptr_table__1NKH=((__POINTER )(&(table_type[(t__1AHH)])));
+      lab_type__3NKH=(__UINTEGER_32)(t__1AHH |  1);
+      next__0NKH=((__POINTER )(NULL));
+      result__2NKH=((__POINTER *)ptr_table__1NKH)[ 0];
+      if ((result__2NKH == (void *)NULL)) {
+        result__2NKH=new_lab__ZPJ(lab_type__3NKH);
+        next__0NKH=(void *)((unsigned long)result__2NKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NKH)));
+        ((__POINTER *)next__0NKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1NKH)[ 0]=next__0NKH;
+      } else {
+        next__0NKH=((__POINTER *)result__2NKH)[ 0];
+        if ((next__0NKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2NKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4NKH <<  1)) <=  4096)) {
+            next__0NKH=(void *)((unsigned long)result__2NKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4NKH)));
+          } else {
+            next__0NKH=new_lab__ZPJ(lab_type__3NKH);
+          };
+          ((__POINTER *)next__0NKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1NKH)[ 0]=next__0NKH;
+        } else {
+          ((__POINTER *)result__2NKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0NKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2NKH=next__0NKH;
+        };
+      };
+      ptr__T2J=result__2NKH;
+    };
+    result__S2J=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)ptr__T2J);
+    *(result__S2J) = *(FAST_ARRAYoFAST_ARRAYoITM_CODEoo__);
+  };
+  Self__MCU=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)result__S2J);
+  if ((Self__MCU->parent_arrayed_collection__X2H.capacity__42T <  5)) {
+    Self__MCU->parent_arrayed_collection__X2H.storage__03T=create__4ZPB( 5);
+    Self__MCU->parent_arrayed_collection__X2H.capacity__42T= 5;
+  };
+  Self__MCU->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(-  1);
+  free_list__Y2H=result__S2J;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->upper__WPU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->capacity__1RU= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__->storage__GSU=NULL;
+  FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__->parent_arrayed_collection__C3K=(*ARRAYED_COLLECTIONoFAST_ARRAYoSTRING_CONSTANToo__);
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->upper__H4OD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->capacity__CAPD= 0;
+  ARRAYED_COLLECTIONoSTRING_CONSTANTo__->storage__3APD=NULL;
+  FAST_ARRAYoSTRING_CONSTANTo__->parent_arrayed_collection__U3I=(*ARRAYED_COLLECTIONoSTRING_CONSTANTo__);
+  result__MIM=NULL;
+  ptr__NIM=((__POINTER )(NULL));
+  typ_id__SIM= 0;
+  sz__PIM=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__PIM ==  0)) {
+    result__MIM=FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+  } else {
+    typ_id__SIM=__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PIM);
+    if ((typ_id__SIM == (__INTEGER)(-  1))) {
+      a__4AHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5AHH=(__UINTEGER_32)((__UINTEGER_32)(sz__PIM + a__4AHH) & (__UINTEGER_32)(~ a__4AHH));
+      ptr_table__AOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5AHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5NKH=((__POINTER )(NULL));
+      result__BOKH=((__POINTER *)ptr_table__AOKH)[ 0];
+      if ((result__BOKH == (void *)NULL)) {
+        result__BOKH=new_lab__ZPJ(new_size__5AHH);
+        next__5NKH=(void *)((unsigned long)result__BOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5AHH)));
+        ((__POINTER *)next__5NKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AOKH)[ 0]=next__5NKH;
+      } else {
+        next__5NKH=((__POINTER *)result__BOKH)[ 0];
+        if ((next__5NKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BOKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__5AHH <<  1)) <=  4096)) {
+            next__5NKH=(void *)((unsigned long)result__BOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5AHH)));
+          } else {
+            next__5NKH=new_lab__ZPJ(new_size__5AHH);
+          };
+          ((__POINTER *)next__5NKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AOKH)[ 0]=next__5NKH;
+        } else {
+          ((__POINTER *)result__BOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5NKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BOKH=next__5NKH;
+        };
+      };
+      ptr__NIM=result__BOKH;
+    } else {
+      t__DBHH=((__UINTEGER_32 )typ_id__SIM);
+      a__CBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__PIM + a__CBHH) & (__UINTEGER_32)(~ a__CBHH));
+      ptr_table__FOKH=((__POINTER )(&(table_type[(t__DBHH)])));
+      lab_type__HOKH=(__UINTEGER_32)(t__DBHH |  1);
+      next__EOKH=((__POINTER )(NULL));
+      result__GOKH=((__POINTER *)ptr_table__FOKH)[ 0];
+      if ((result__GOKH == (void *)NULL)) {
+        result__GOKH=new_lab__ZPJ(lab_type__HOKH);
+        next__EOKH=(void *)((unsigned long)result__GOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IOKH)));
+        ((__POINTER *)next__EOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FOKH)[ 0]=next__EOKH;
+      } else {
+        next__EOKH=((__POINTER *)result__GOKH)[ 0];
+        if ((next__EOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GOKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IOKH <<  1)) <=  4096)) {
+            next__EOKH=(void *)((unsigned long)result__GOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IOKH)));
+          } else {
+            next__EOKH=new_lab__ZPJ(lab_type__HOKH);
+          };
+          ((__POINTER *)next__EOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FOKH)[ 0]=next__EOKH;
+        } else {
+          ((__POINTER *)result__GOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GOKH=next__EOKH;
+        };
+      };
+      ptr__NIM=result__GOKH;
+    };
+    result__MIM=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)ptr__NIM);
+    *(result__MIM) = *(FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__SRU=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)result__MIM);
+  if ((Self__SRU->parent_arrayed_collection__C3K.capacity__1RU <  5)) {
+    Self__SRU->parent_arrayed_collection__C3K.storage__GSU=create__A2ZB( 5);
+    Self__SRU->parent_arrayed_collection__C3K.capacity__1RU= 5;
+  };
+  Self__SRU->parent_arrayed_collection__C3K.upper__WPU=(__INTEGER)(-  1);
+  free_list__D3K=result__MIM;
+  ITM_LIST_IDF__->parent_itm_code__DBJ=(*ITM_CODE__);
+  ITM_LDOTS__->parent_itm_constant__HTF=(*ITM_CODE__);
+  ITM_PROTOTYPE__->parent_itm_constant__TUF=(*ITM_CONSTANT__);
+  ITM_WRITE__->parent_itm_code__YBJ=(*ITM_CODE__);
+  ITM_WRITE_VALUE__->parent_itm_write__ZBJ=(*ITM_WRITE__);
+  ITM_WRITE_CAST__->parent_itm_write__QCJ=(*ITM_WRITE__);
+  ITM_READ__->parent_itm_code__3EJ=(*ITM_CODE__);
+  ITM_WRITE_CODE__->parent_itm_write__1FJ=(*ITM_WRITE__);
+  ITM_OPERATOR__->parent_itm_code__3CL=(*ITM_CODE__);
+  ITM_READ_ARG1__->parent_itm_read__DGL=(*ITM_READ__);
+  ITM_READ_ARG2__->parent_itm_read__QIL=(*ITM_READ__);
+  ITM_EXPRESSION__->value_list__XGV=NULL;
+  ITM_OLD__->parent_itm_code__4ZL=(*ITM_CODE__);
+  ITM_EXTERN__->parent_itm_code__S1M=(*ITM_CODE__);
+  ITM_EXTERNAL_TYPE__->parent_itm_extern__T1M=(*ITM_EXTERN__);
+  ITM_BLOCK__->list__LMDC=NULL;
+  ITM_EXTERNAL__->parent_itm_extern__YCN=(*ITM_EXTERN__);
+  ITM_READ_ARGS__->parent_itm_read__OAO=(*ITM_READ__);
+  ITM_RESULT__->value__XKFC=NULL;
+  ITM_OPERATOR__->name__IGL=NULL;
+  ITM_ARGUMENT__->parent_itm_code__W1M=(*ITM_OBJECT__);
+  ITM_ARG__->parent_itm_argument__XEHB=(*ITM_ARGUMENT__);
+  ITM_ARG__->name__G0HC=NULL;
+  ITM_ARG__->type__H0HC=NULL;
+  empty_list__HHMF=create_with_capacity__LHRC( 0);
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->buckets__QEQF=NULL;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->capacity__LEQF= 0;
+  HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__->count__CJQF= 0;
+  result__SCOF=NULL;
+  ptr__TCOF=((__POINTER )(NULL));
+  typ_id__YCOF= 0;
+  sz__VCOF=((__UINTEGER_32 )sizeof(__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo));
+  if ((sz__VCOF ==  0)) {
+    result__SCOF=HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+  } else {
+    typ_id__YCOF=__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VCOF);
+    if ((typ_id__YCOF == (__INTEGER)(-  1))) {
+      a__GBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__VCOF + a__GBHH) & (__UINTEGER_32)(~ a__GBHH));
+      ptr_table__KOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JOKH=((__POINTER )(NULL));
+      result__LOKH=((__POINTER *)ptr_table__KOKH)[ 0];
+      if ((result__LOKH == (void *)NULL)) {
+        result__LOKH=new_lab__ZPJ(new_size__HBHH);
+        next__JOKH=(void *)((unsigned long)result__LOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBHH)));
+        ((__POINTER *)next__JOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KOKH)[ 0]=next__JOKH;
+      } else {
+        next__JOKH=((__POINTER *)result__LOKH)[ 0];
+        if ((next__JOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LOKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HBHH <<  1)) <=  4096)) {
+            next__JOKH=(void *)((unsigned long)result__LOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HBHH)));
+          } else {
+            next__JOKH=new_lab__ZPJ(new_size__HBHH);
+          };
+          ((__POINTER *)next__JOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KOKH)[ 0]=next__JOKH;
+        } else {
+          ((__POINTER *)result__LOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LOKH=next__JOKH;
+        };
+      };
+      ptr__TCOF=result__LOKH;
+    } else {
+      t__LBHH=((__UINTEGER_32 )typ_id__YCOF);
+      a__KBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SOKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VCOF + a__KBHH) & (__UINTEGER_32)(~ a__KBHH));
+      ptr_table__POKH=((__POINTER )(&(table_type[(t__LBHH)])));
+      lab_type__ROKH=(__UINTEGER_32)(t__LBHH |  1);
+      next__OOKH=((__POINTER )(NULL));
+      result__QOKH=((__POINTER *)ptr_table__POKH)[ 0];
+      if ((result__QOKH == (void *)NULL)) {
+        result__QOKH=new_lab__ZPJ(lab_type__ROKH);
+        next__OOKH=(void *)((unsigned long)result__QOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SOKH)));
+        ((__POINTER *)next__OOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__POKH)[ 0]=next__OOKH;
+      } else {
+        next__OOKH=((__POINTER *)result__QOKH)[ 0];
+        if ((next__OOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QOKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SOKH <<  1)) <=  4096)) {
+            next__OOKH=(void *)((unsigned long)result__QOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SOKH)));
+          } else {
+            next__OOKH=new_lab__ZPJ(lab_type__ROKH);
+          };
+          ((__POINTER *)next__OOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__POKH)[ 0]=next__OOKH;
+        } else {
+          ((__POINTER *)result__QOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QOKH=next__OOKH;
+        };
+      };
+      ptr__TCOF=result__QOKH;
+    };
+    result__SCOF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)ptr__TCOF);
+    *(result__SCOF) = *(HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo__);
+  };
+  Self__CHQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)result__SCOF);
+  new_capacity__TTRF=prime_number_ceiling__T11( 53);
+  Self__CHQF->buckets__QEQF=create__EGUF(new_capacity__TTRF);
+  Self__CHQF->capacity__LEQF=new_capacity__TTRF;
+  Self__CHQF->count__CJQF= 0;
+  bucket__RHMF=result__SCOF;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->item__2EQF=NULL;
+  HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__->next__IFQF=NULL;
+  ITM_ARGS__->parent_itm_argument__FAFE=(*ITM_ARGUMENT__);
+  ITM_ARGS__->name__W2PF=NULL;
+  ITM_ARGS__->type__X2PF=NULL;
+  ITM_EXTERNAL_TYPE__->is_persistant__QEN=FALSE__;
+  result__Y2F=NULL;
+  ptr__Z2F=((__POINTER )(NULL));
+  typ_id__42F= 0;
+  sz__12F=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRINGo));
+  if ((sz__12F ==  0)) {
+    result__Y2F=FAST_ARRAYoSTRINGo__;
+  } else {
+    typ_id__42F=__FAST_ARRAYoSTRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__12F);
+    if ((typ_id__42F == (__INTEGER)(-  1))) {
+      a__SBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__RWG=(__UINTEGER_32)((__UINTEGER_32)(sz__12F + a__SBFH) & (__UINTEGER_32)(~ a__SBFH));
+      ptr_table__UOKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RWG / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TOKH=((__POINTER )(NULL));
+      result__VOKH=((__POINTER *)ptr_table__UOKH)[ 0];
+      if ((result__VOKH == (void *)NULL)) {
+        result__VOKH=new_lab__ZPJ(new_size__RWG);
+        next__TOKH=(void *)((unsigned long)result__VOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWG)));
+        ((__POINTER *)next__TOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__UOKH)[ 0]=next__TOKH;
+      } else {
+        next__TOKH=((__POINTER *)result__VOKH)[ 0];
+        if ((next__TOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VOKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__RWG <<  1)) <=  4096)) {
+            next__TOKH=(void *)((unsigned long)result__VOKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RWG)));
+          } else {
+            next__TOKH=new_lab__ZPJ(new_size__RWG);
+          };
+          ((__POINTER *)next__TOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UOKH)[ 0]=next__TOKH;
+        } else {
+          ((__POINTER *)result__VOKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VOKH=next__TOKH;
+        };
+      };
+      ptr__Z2F=result__VOKH;
+    } else {
+      t__0XG=((__UINTEGER_32 )typ_id__42F);
+      a__YBFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2OKH=(__UINTEGER_32)((__UINTEGER_32)(sz__12F + a__YBFH) & (__UINTEGER_32)(~ a__YBFH));
+      ptr_table__ZOKH=((__POINTER )(&(table_type[(t__0XG)])));
+      lab_type__1OKH=(__UINTEGER_32)(t__0XG |  1);
+      next__YOKH=((__POINTER )(NULL));
+      result__0OKH=((__POINTER *)ptr_table__ZOKH)[ 0];
+      if ((result__0OKH == (void *)NULL)) {
+        result__0OKH=new_lab__ZPJ(lab_type__1OKH);
+        next__YOKH=(void *)((unsigned long)result__0OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OKH)));
+        ((__POINTER *)next__YOKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZOKH)[ 0]=next__YOKH;
+      } else {
+        next__YOKH=((__POINTER *)result__0OKH)[ 0];
+        if ((next__YOKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0OKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2OKH <<  1)) <=  4096)) {
+            next__YOKH=(void *)((unsigned long)result__0OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2OKH)));
+          } else {
+            next__YOKH=new_lab__ZPJ(lab_type__1OKH);
+          };
+          ((__POINTER *)next__YOKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZOKH)[ 0]=next__YOKH;
+        } else {
+          ((__POINTER *)result__0OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YOKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0OKH=next__YOKH;
+        };
+      };
+      ptr__Z2F=result__0OKH;
+    };
+    result__Y2F=((__FAST_ARRAYoSTRINGo *)ptr__Z2F);
+    *(result__Y2F) = *(FAST_ARRAYoSTRINGo__);
+  };
+  Self__HDT=((__FAST_ARRAYoSTRINGo *)result__Y2F);
+  if ((Self__HDT->parent_arrayed_collection__RKC.capacity__QDT <  5)) {
+    Self__HDT->parent_arrayed_collection__RKC.storage__1DT=create__DERB( 5);
+    Self__HDT->parent_arrayed_collection__RKC.capacity__QDT= 5;
+  };
+  Self__HDT->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(-  1);
+  free__FLP=result__Y2F;
+  type_void__VUF=get__QRI((&__string_3));
+  PROTOTYPE__->default_value__KSE=NULL;
+  PROTOTYPE__->type_c__FUE=NULL;
+  LIP_CODE__->parent_itm_object__WBE=(*ITM_OBJECT__);
+  LIP_UNARY__->parent_lip_code__MZ4B=(*LIP_CODE__);
+  LIP_UNARY__->operator__Y0QD='\0';
+  LIP_UNARY__->value__V0QD=NULL;
+  LIP_CALL__->parent_lip_code__4Z4B=(*LIP_CODE__);
+  LIP_CALL__->name__EMUE=NULL;
+  LIP_CALL__->argument__ZLUE=NULL;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->upper__RCXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->capacity__TGXE= 0;
+  ARRAYED_COLLECTIONoLIP_INTEGERo__->storage__4GXE=NULL;
+  FAST_ARRAYoLIP_INTEGERo__->parent_arrayed_collection__UTSE=(*ARRAYED_COLLECTIONoLIP_INTEGERo__);
+  result__DQTE=NULL;
+  ptr__EQTE=((__POINTER )(NULL));
+  typ_id__JQTE= 0;
+  sz__GQTE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_INTEGERo));
+  if ((sz__GQTE ==  0)) {
+    result__DQTE=FAST_ARRAYoLIP_INTEGERo__;
+  } else {
+    typ_id__JQTE=__FAST_ARRAYoLIP_INTEGERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GQTE);
+    if ((typ_id__JQTE == (__INTEGER)(-  1))) {
+      a__OBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__GQTE + a__OBHH) & (__UINTEGER_32)(~ a__OBHH));
+      ptr_table__4OKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3OKH=((__POINTER )(NULL));
+      result__5OKH=((__POINTER *)ptr_table__4OKH)[ 0];
+      if ((result__5OKH == (void *)NULL)) {
+        result__5OKH=new_lab__ZPJ(new_size__PBHH);
+        next__3OKH=(void *)((unsigned long)result__5OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBHH)));
+        ((__POINTER *)next__3OKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4OKH)[ 0]=next__3OKH;
+      } else {
+        next__3OKH=((__POINTER *)result__5OKH)[ 0];
+        if ((next__3OKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5OKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PBHH <<  1)) <=  4096)) {
+            next__3OKH=(void *)((unsigned long)result__5OKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBHH)));
+          } else {
+            next__3OKH=new_lab__ZPJ(new_size__PBHH);
+          };
+          ((__POINTER *)next__3OKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4OKH)[ 0]=next__3OKH;
+        } else {
+          ((__POINTER *)result__5OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5OKH=next__3OKH;
+        };
+      };
+      ptr__EQTE=result__5OKH;
+    } else {
+      t__TBHH=((__UINTEGER_32 )typ_id__JQTE);
+      a__SBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__GQTE + a__SBHH) & (__UINTEGER_32)(~ a__SBHH));
+      ptr_table__DPKH=((__POINTER )(&(table_type[(t__TBHH)])));
+      lab_type__FPKH=(__UINTEGER_32)(t__TBHH |  1);
+      next__CPKH=((__POINTER )(NULL));
+      result__EPKH=((__POINTER *)ptr_table__DPKH)[ 0];
+      if ((result__EPKH == (void *)NULL)) {
+        result__EPKH=new_lab__ZPJ(lab_type__FPKH);
+        next__CPKH=(void *)((unsigned long)result__EPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GPKH)));
+        ((__POINTER *)next__CPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DPKH)[ 0]=next__CPKH;
+      } else {
+        next__CPKH=((__POINTER *)result__EPKH)[ 0];
+        if ((next__CPKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EPKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GPKH <<  1)) <=  4096)) {
+            next__CPKH=(void *)((unsigned long)result__EPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GPKH)));
+          } else {
+            next__CPKH=new_lab__ZPJ(lab_type__FPKH);
+          };
+          ((__POINTER *)next__CPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DPKH)[ 0]=next__CPKH;
+        } else {
+          ((__POINTER *)result__EPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EPKH=next__CPKH;
+        };
+      };
+      ptr__EQTE=result__EPKH;
+    };
+    result__DQTE=((__FAST_ARRAYoLIP_INTEGERo *)ptr__EQTE);
+    *(result__DQTE) = *(FAST_ARRAYoLIP_INTEGERo__);
+  };
+  Self__KGXE=((__FAST_ARRAYoLIP_INTEGERo *)result__DQTE);
+  if ((Self__KGXE->parent_arrayed_collection__UTSE.capacity__TGXE <  10)) {
+    Self__KGXE->parent_arrayed_collection__UTSE.storage__4GXE=create__SIGF( 10);
+    Self__KGXE->parent_arrayed_collection__UTSE.capacity__TGXE= 10;
+  };
+  Self__KGXE->parent_arrayed_collection__UTSE.upper__RCXE=(__INTEGER)(-  1);
+  storage__VTSE=result__DQTE;
+  LIP_INTEGER__->value__EI4F= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->upper__VSPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->capacity__3ZPF= 0;
+  ARRAYED_COLLECTIONoLIP_STRINGo__->storage__I0PF=NULL;
+  FAST_ARRAYoLIP_STRINGo__->parent_arrayed_collection__PYFF=(*ARRAYED_COLLECTIONoLIP_STRINGo__);
+  result__FMMF=NULL;
+  ptr__GMMF=((__POINTER )(NULL));
+  typ_id__LMMF= 0;
+  sz__IMMF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_STRINGo));
+  if ((sz__IMMF ==  0)) {
+    result__FMMF=FAST_ARRAYoLIP_STRINGo__;
+  } else {
+    typ_id__LMMF=__FAST_ARRAYoLIP_STRINGo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IMMF);
+    if ((typ_id__LMMF == (__INTEGER)(-  1))) {
+      a__WBHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__XBHH=(__UINTEGER_32)((__UINTEGER_32)(sz__IMMF + a__WBHH) & (__UINTEGER_32)(~ a__WBHH));
+      ptr_table__IPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XBHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__HPKH=((__POINTER )(NULL));
+      result__JPKH=((__POINTER *)ptr_table__IPKH)[ 0];
+      if ((result__JPKH == (void *)NULL)) {
+        result__JPKH=new_lab__ZPJ(new_size__XBHH);
+        next__HPKH=(void *)((unsigned long)result__JPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBHH)));
+        ((__POINTER *)next__HPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IPKH)[ 0]=next__HPKH;
+      } else {
+        next__HPKH=((__POINTER *)result__JPKH)[ 0];
+        if ((next__HPKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JPKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XBHH <<  1)) <=  4096)) {
+            next__HPKH=(void *)((unsigned long)result__JPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBHH)));
+          } else {
+            next__HPKH=new_lab__ZPJ(new_size__XBHH);
+          };
+          ((__POINTER *)next__HPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IPKH)[ 0]=next__HPKH;
+        } else {
+          ((__POINTER *)result__JPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JPKH=next__HPKH;
+        };
+      };
+      ptr__GMMF=result__JPKH;
+    } else {
+      t__1BHH=((__UINTEGER_32 )typ_id__LMMF);
+      a__0BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__QPKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IMMF + a__0BHH) & (__UINTEGER_32)(~ a__0BHH));
+      ptr_table__NPKH=((__POINTER )(&(table_type[(t__1BHH)])));
+      lab_type__PPKH=(__UINTEGER_32)(t__1BHH |  1);
+      next__MPKH=((__POINTER )(NULL));
+      result__OPKH=((__POINTER *)ptr_table__NPKH)[ 0];
+      if ((result__OPKH == (void *)NULL)) {
+        result__OPKH=new_lab__ZPJ(lab_type__PPKH);
+        next__MPKH=(void *)((unsigned long)result__OPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QPKH)));
+        ((__POINTER *)next__MPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NPKH)[ 0]=next__MPKH;
+      } else {
+        next__MPKH=((__POINTER *)result__OPKH)[ 0];
+        if ((next__MPKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OPKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QPKH <<  1)) <=  4096)) {
+            next__MPKH=(void *)((unsigned long)result__OPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QPKH)));
+          } else {
+            next__MPKH=new_lab__ZPJ(lab_type__PPKH);
+          };
+          ((__POINTER *)next__MPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NPKH)[ 0]=next__MPKH;
+        } else {
+          ((__POINTER *)result__OPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__OPKH=next__MPKH;
+        };
+      };
+      ptr__GMMF=result__OPKH;
+    };
+    result__FMMF=((__FAST_ARRAYoLIP_STRINGo *)ptr__GMMF);
+    *(result__FMMF) = *(FAST_ARRAYoLIP_STRINGo__);
+  };
+  Self__UZPF=((__FAST_ARRAYoLIP_STRINGo *)result__FMMF);
+  if ((Self__UZPF->parent_arrayed_collection__PYFF.capacity__3ZPF <  10)) {
+    Self__UZPF->parent_arrayed_collection__PYFF.storage__I0PF=create__5JYF( 10);
+    Self__UZPF->parent_arrayed_collection__PYFF.capacity__3ZPF= 10;
+  };
+  Self__UZPF->parent_arrayed_collection__PYFF.upper__VSPF=(__INTEGER)(-  1);
+  storage__QYFF=result__FMMF;
+  LIP_STRING__->value__RNUE=NULL;
+  LIP_BOOLEAN__->value__1BQD=FALSE__;
+  result__PYNF=NULL;
+  ptr__QYNF=((__POINTER )(NULL));
+  typ_id__VYNF= 0;
+  sz__SYNF=((__UINTEGER_32 )sizeof(__LIP_BOOLEAN));
+  if ((sz__SYNF ==  0)) {
+    result__PYNF=LIP_BOOLEAN__;
+  } else {
+    typ_id__VYNF=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SYNF);
+    if ((typ_id__VYNF == (__INTEGER)(-  1))) {
+      a__4BHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5BHH=(__UINTEGER_32)((__UINTEGER_32)(sz__SYNF + a__4BHH) & (__UINTEGER_32)(~ a__4BHH));
+      ptr_table__SPKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5BHH / ((__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__ZPJ(new_size__5BHH);
+        next__RPKH=(void *)((unsigned long)result__TPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BHH)));
+        ((__POINTER *)next__RPKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__SPKH)[ 0]=next__RPKH;
+      } else {
+        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__5BHH <<  1)) <=  4096)) {
+            next__RPKH=(void *)((unsigned long)result__TPKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BHH)));
+          } else {
+            next__RPKH=new_lab__ZPJ(new_size__5BHH);
+          };
+          ((__POINTER *)next__RPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SPKH)[ 0]=next__RPKH;
+        } else {
+          ((__POINTER *)result__TPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__TPKH=next__RPKH;
+        };
+      };
+      ptr__QYNF=result__TPKH;
+    } else {
+      t__DCHH=((__UINTEGER_32 )typ_id__VYNF);
+      a__CCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0PKH=(__UINTEGER_32)((__UINTEGER_32)(sz__SYNF + a__CCHH) & (__UINTEGER_32)(~ a__CCHH));
+      ptr_table__XPKH=((__POINTER )(&(table_type[(t__DCHH)])));
+      lab_type__ZPKH=(__UINTEGER_32)(t__DCHH |  1);
+      next__WPKH=((__POINTER )(NULL));
+      result__YPKH=((__POINTER *)ptr_table__XPKH)[ 0];
+      if ((result__YPKH == (void *)NULL)) {
+        result__YPKH=new_lab__ZPJ(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__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__GUH)))) &  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__WPKH=new_lab__ZPJ(lab_type__ZPKH);
+          };
+          ((__POINTER *)next__WPKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XPKH)[ 0]=next__WPKH;
+        } else {
+          ((__POINTER *)result__YPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YPKH=next__WPKH;
+        };
+      };
+      ptr__QYNF=result__YPKH;
+    };
+    result__PYNF=((__LIP_BOOLEAN *)ptr__QYNF);
+    *(result__PYNF) = *(LIP_BOOLEAN__);
+  };
+  ((__LIP_BOOLEAN *)result__PYNF)->value__1BQD=TRUE__;
+  true__4RLF=result__PYNF;
+  LIP_VALUE__->parent_lip_code__4EFE=(*LIP_CODE__);
+  LIP_VALUE__->value__DWUE=NULL;
+  LIP_BINARY__->parent_lip_code__3NZB=(*LIP_CODE__);
+  LIP_BINARY__->left__YXQD=NULL;
+  LIP_BINARY__->right__1XQD=NULL;
+  LIP_BINARY__->operator__4XQD='\0';
+  LIP_AFFECT__->parent_lip_code__ZSPB=(*LIP_CODE__);
+  LIP_AFFECT__->name__BGFC=NULL;
+  LIP_AFFECT__->value__TGFC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->upper__0OTD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->capacity__1AUD= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__->storage__XBUD=NULL;
+  FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__->parent_arrayed_collection__SLID=(*ARRAYED_COLLECTIONoFAST_ARRAYoLIP_CODEoo__);
+  ARRAYED_COLLECTIONoLIP_CODEo__->upper__ICQD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->capacity__GQTD= 0;
+  ARRAYED_COLLECTIONoLIP_CODEo__->storage__RQTD=NULL;
+  FAST_ARRAYoLIP_CODEo__->parent_arrayed_collection__WMYC=(*ARRAYED_COLLECTIONoLIP_CODEo__);
+  result__IUMD=NULL;
+  ptr__JUMD=((__POINTER )(NULL));
+  typ_id__OUMD= 0;
+  sz__LUMD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo));
+  if ((sz__LUMD ==  0)) {
+    result__IUMD=FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+  } else {
+    typ_id__OUMD=__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LUMD);
+    if ((typ_id__OUMD == (__INTEGER)(-  1))) {
+      a__GCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUMD + a__GCHH) & (__UINTEGER_32)(~ a__GCHH));
+      ptr_table__2PKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HCHH / ((__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__ZPJ(new_size__HCHH);
+        next__1PKH=(void *)((unsigned long)result__3PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HCHH)));
+        ((__POINTER *)next__1PKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2PKH)[ 0]=next__1PKH;
+      } else {
+        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HCHH <<  1)) <=  4096)) {
+            next__1PKH=(void *)((unsigned long)result__3PKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HCHH)));
+          } else {
+            next__1PKH=new_lab__ZPJ(new_size__HCHH);
+          };
+          ((__POINTER *)next__1PKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2PKH)[ 0]=next__1PKH;
+        } else {
+          ((__POINTER *)result__3PKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3PKH=next__1PKH;
+        };
+      };
+      ptr__JUMD=result__3PKH;
+    } else {
+      t__LCHH=((__UINTEGER_32 )typ_id__OUMD);
+      a__KCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LUMD + a__KCHH) & (__UINTEGER_32)(~ a__KCHH));
+      ptr_table__BQKH=((__POINTER )(&(table_type[(t__LCHH)])));
+      lab_type__DQKH=(__UINTEGER_32)(t__LCHH |  1);
+      next__AQKH=((__POINTER )(NULL));
+      result__CQKH=((__POINTER *)ptr_table__BQKH)[ 0];
+      if ((result__CQKH == (void *)NULL)) {
+        result__CQKH=new_lab__ZPJ(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__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__GUH)))) &  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__AQKH=new_lab__ZPJ(lab_type__DQKH);
+          };
+          ((__POINTER *)next__AQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BQKH)[ 0]=next__AQKH;
+        } else {
+          ((__POINTER *)result__CQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CQKH=next__AQKH;
+        };
+      };
+      ptr__JUMD=result__CQKH;
+    };
+    result__IUMD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)ptr__JUMD);
+    *(result__IUMD) = *(FAST_ARRAYoFAST_ARRAYoLIP_CODEoo__);
+  };
+  Self__VFUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)result__IUMD);
+  if ((Self__VFUD->parent_arrayed_collection__SLID.capacity__1AUD <  5)) {
+    Self__VFUD->parent_arrayed_collection__SLID.storage__XBUD=create__UYIE( 5);
+    Self__VFUD->parent_arrayed_collection__SLID.capacity__1AUD= 5;
+  };
+  Self__VFUD->parent_arrayed_collection__SLID.upper__0OTD=(__INTEGER)(-  1);
+  free_list__TLID=result__IUMD;
+  LIP_IF__->parent_lip_code__HQYC=(*LIP_CODE__);
+  LIP_IF__->condition__MBQD=NULL;
+  LIP_IF__->then__CCQD=NULL;
+  LIP_IF__->else__ZCQD=NULL;
+  LIP_PRINT__->parent_lip_code__ZQYC=(*LIP_CODE__);
+  LIP_PRINT__->message__IQUE=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->buckets__STRD=NULL;
+  HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__->capacity__NTRD= 0;
+  result__5VED=NULL;
+  ptr__AWED=((__POINTER )(NULL));
+  typ_id__FWED= 0;
+  sz__CWED=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo));
+  if ((sz__CWED ==  0)) {
+    result__5VED=HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+  } else {
+    typ_id__FWED=__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CWED);
+    if ((typ_id__FWED == (__INTEGER)(-  1))) {
+      a__OCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PCHH=(__UINTEGER_32)((__UINTEGER_32)(sz__CWED + a__OCHH) & (__UINTEGER_32)(~ a__OCHH));
+      ptr_table__GQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PCHH / ((__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__ZPJ(new_size__PCHH);
+        next__FQKH=(void *)((unsigned long)result__HQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCHH)));
+        ((__POINTER *)next__FQKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GQKH)[ 0]=next__FQKH;
+      } else {
+        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PCHH <<  1)) <=  4096)) {
+            next__FQKH=(void *)((unsigned long)result__HQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCHH)));
+          } else {
+            next__FQKH=new_lab__ZPJ(new_size__PCHH);
+          };
+          ((__POINTER *)next__FQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GQKH)[ 0]=next__FQKH;
+        } else {
+          ((__POINTER *)result__HQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HQKH=next__FQKH;
+        };
+      };
+      ptr__AWED=result__HQKH;
+    } else {
+      t__TCHH=((__UINTEGER_32 )typ_id__FWED);
+      a__SCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OQKH=(__UINTEGER_32)((__UINTEGER_32)(sz__CWED + a__SCHH) & (__UINTEGER_32)(~ a__SCHH));
+      ptr_table__LQKH=((__POINTER )(&(table_type[(t__TCHH)])));
+      lab_type__NQKH=(__UINTEGER_32)(t__TCHH |  1);
+      next__KQKH=((__POINTER )(NULL));
+      result__MQKH=((__POINTER *)ptr_table__LQKH)[ 0];
+      if ((result__MQKH == (void *)NULL)) {
+        result__MQKH=new_lab__ZPJ(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__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__GUH)))) &  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__KQKH=new_lab__ZPJ(lab_type__NQKH);
+          };
+          ((__POINTER *)next__KQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LQKH)[ 0]=next__KQKH;
+        } else {
+          ((__POINTER *)result__MQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MQKH=next__KQKH;
+        };
+      };
+      ptr__AWED=result__MQKH;
+    };
+    result__5VED=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)ptr__AWED);
+    *(result__5VED) = *(HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo__);
+  };
+  Self__GKSD=((__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *)result__5VED);
+  new_capacity__0AXD=prime_number_ceiling__T11( 193);
+  sz__10EH=((__UINTEGER_32 )(__INTEGER)(new_capacity__0AXD * ((__INTEGER )(sizeof(void *)))));
+  result__00EH=((__POINTER )(NULL));
+  a__A1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__20EH=(__UINTEGER_32)((__UINTEGER_32)(sz__10EH + a__A1EH) & (__UINTEGER_32)(~ a__A1EH));
+  new_size2__30EH=(__UINTEGER_32)(new_size__20EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__30EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WCHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XCHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__30EH + a__WCHH) & (__UINTEGER_32)(~ a__WCHH));
+    ptr_table__QQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XCHH / ((__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__ZPJ(new_size__XCHH);
+      next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCHH)));
+      ((__POINTER *)next__PQKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
+    } else {
+      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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XCHH <<  1)) <=  4096)) {
+          next__PQKH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCHH)));
+        } else {
+          next__PQKH=new_lab__ZPJ(new_size__XCHH);
+        };
+        ((__POINTER *)next__PQKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
+      } else {
+        ((__POINTER *)result__RQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RQKH=next__PQKH;
+      };
+    };
+    ((__POINTER *)result__RQKH)[ 0]=((__POINTER ) 3);
+    result__00EH=(void *)((unsigned long)result__RQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+  } else {
+    result__UQKH=first_free__BCVB;
+    while ((((void *)result__UQKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__UQKH)->map_size_and_id__YTB &  4294967292LU) < new_size__20EH))) {
+      result__UQKH=((__MEMORY *)result__UQKH)->map_next_free__ZTB;
+    };
+    if (((void *)result__UQKH == (void *)NULL)) {
+      result__UQKH=new_page__K34();
+    };
+    to_busy__index__4SFC(result__UQKH,new_size__20EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__UQKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__00EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__UQKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  Result__XSHE=((void **)result__00EH);
+  Self__PJYE=(__INTEGER)(new_capacity__0AXD -  1);
+  while ((Self__PJYE >=  0)) {
+    Result__XSHE[Self__PJYE]=NULL;
+    Self__PJYE=(__INTEGER)(Self__PJYE -  1);
+  };
+  Self__GKSD->buckets__STRD=Result__XSHE;
+  Self__GKSD->capacity__NTRD=new_capacity__0AXD;
+  list_data__IONC=result__5VED;
+  push_back_flag__OTMF=FALSE__;
+  memory__N5LF='\0';
+  last_integer__1TUE= 0;
+  last_string__NUUE=create__ZBB( 1024);
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->upper__51PF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->capacity__GCQF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_DATAo__->storage__RCQF=NULL;
+  FAST_ARRAYoLIP_SLOT_DATAo__->parent_arrayed_collection__CVUE=(*ARRAYED_COLLECTIONoLIP_SLOT_DATAo__);
+  result__LTNF=NULL;
+  ptr__MTNF=((__POINTER )(NULL));
+  typ_id__RTNF= 0;
+  sz__OTNF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_DATAo));
+  if ((sz__OTNF ==  0)) {
+    result__LTNF=FAST_ARRAYoLIP_SLOT_DATAo__;
+  } else {
+    typ_id__RTNF=__FAST_ARRAYoLIP_SLOT_DATAo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OTNF);
+    if ((typ_id__RTNF == (__INTEGER)(-  1))) {
+      a__3CHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4CHH=(__UINTEGER_32)((__UINTEGER_32)(sz__OTNF + a__3CHH) & (__UINTEGER_32)(~ a__3CHH));
+      ptr_table__YQKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4CHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XQKH=((__POINTER )(NULL));
+      result__ZQKH=((__POINTER *)ptr_table__YQKH)[ 0];
+      if ((result__ZQKH == (void *)NULL)) {
+        result__ZQKH=new_lab__ZPJ(new_size__4CHH);
+        next__XQKH=(void *)((unsigned long)result__ZQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CHH)));
+        ((__POINTER *)next__XQKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YQKH)[ 0]=next__XQKH;
+      } else {
+        next__XQKH=((__POINTER *)result__ZQKH)[ 0];
+        if ((next__XQKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZQKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4CHH <<  1)) <=  4096)) {
+            next__XQKH=(void *)((unsigned long)result__ZQKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4CHH)));
+          } else {
+            next__XQKH=new_lab__ZPJ(new_size__4CHH);
+          };
+          ((__POINTER *)next__XQKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YQKH)[ 0]=next__XQKH;
+        } else {
+          ((__POINTER *)result__ZQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZQKH=next__XQKH;
+        };
+      };
+      ptr__MTNF=result__ZQKH;
+    } else {
+      t__CDHH=((__UINTEGER_32 )typ_id__RTNF);
+      a__BDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ARKH=(__UINTEGER_32)((__UINTEGER_32)(sz__OTNF + a__BDHH) & (__UINTEGER_32)(~ a__BDHH));
+      ptr_table__3QKH=((__POINTER )(&(table_type[(t__CDHH)])));
+      lab_type__5QKH=(__UINTEGER_32)(t__CDHH |  1);
+      next__2QKH=((__POINTER )(NULL));
+      result__4QKH=((__POINTER *)ptr_table__3QKH)[ 0];
+      if ((result__4QKH == (void *)NULL)) {
+        result__4QKH=new_lab__ZPJ(lab_type__5QKH);
+        next__2QKH=(void *)((unsigned long)result__4QKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARKH)));
+        ((__POINTER *)next__2QKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3QKH)[ 0]=next__2QKH;
+      } else {
+        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ARKH <<  1)) <=  4096)) {
+            next__2QKH=(void *)((unsigned long)result__4QKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ARKH)));
+          } else {
+            next__2QKH=new_lab__ZPJ(lab_type__5QKH);
+          };
+          ((__POINTER *)next__2QKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3QKH)[ 0]=next__2QKH;
+        } else {
+          ((__POINTER *)result__4QKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4QKH=next__2QKH;
+        };
+      };
+      ptr__MTNF=result__4QKH;
+    };
+    result__LTNF=((__FAST_ARRAYoLIP_SLOT_DATAo *)ptr__MTNF);
+    *(result__LTNF) = *(FAST_ARRAYoLIP_SLOT_DATAo__);
+  };
+  Self__3BQF=((__FAST_ARRAYoLIP_SLOT_DATAo *)result__LTNF);
+  if ((Self__3BQF->parent_arrayed_collection__CVUE.capacity__GCQF <  8)) {
+    sz__D1EH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  3));
+    result__C1EH=((__POINTER )(NULL));
+    a__I1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__E1EH=(__UINTEGER_32)((__UINTEGER_32)(sz__D1EH + a__I1EH) & (__UINTEGER_32)(~ a__I1EH));
+    new_size2__F1EH=(__UINTEGER_32)(new_size__E1EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__F1EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__FDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__F1EH + a__FDHH) & (__UINTEGER_32)(~ a__FDHH));
+      ptr_table__CRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__BRKH=((__POINTER )(NULL));
+      result__DRKH=((__POINTER *)ptr_table__CRKH)[ 0];
+      if ((result__DRKH == (void *)NULL)) {
+        result__DRKH=new_lab__ZPJ(new_size__GDHH);
+        next__BRKH=(void *)((unsigned long)result__DRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDHH)));
+        ((__POINTER *)next__BRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CRKH)[ 0]=next__BRKH;
+      } else {
+        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GDHH <<  1)) <=  4096)) {
+            next__BRKH=(void *)((unsigned long)result__DRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDHH)));
+          } else {
+            next__BRKH=new_lab__ZPJ(new_size__GDHH);
+          };
+          ((__POINTER *)next__BRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CRKH)[ 0]=next__BRKH;
+        } else {
+          ((__POINTER *)result__DRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__DRKH=next__BRKH;
+        };
+      };
+      ((__POINTER *)result__DRKH)[ 0]=((__POINTER ) 3);
+      result__C1EH=(void *)((unsigned long)result__DRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__GRKH=first_free__BCVB;
+      while ((((void *)result__GRKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GRKH)->map_size_and_id__YTB &  4294967292LU) < new_size__E1EH))) {
+        result__GRKH=((__MEMORY *)result__GRKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__GRKH == (void *)NULL)) {
+        result__GRKH=new_page__K34();
+      };
+      to_busy__index__4SFC(result__GRKH,new_size__E1EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GRKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+      result__C1EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GRKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__RD1F=((void **)result__C1EH);
+    Self__GJAG= 7;
+    while ((Self__GJAG >=  0)) {
+      Result__RD1F[Self__GJAG]=NULL;
+      Self__GJAG=(__INTEGER)(Self__GJAG -  1);
+    };
+    Self__3BQF->parent_arrayed_collection__CVUE.storage__RCQF=Result__RD1F;
+    Self__3BQF->parent_arrayed_collection__CVUE.capacity__GCQF= 8;
+  };
+  Self__3BQF->parent_arrayed_collection__CVUE.upper__51PF=(__INTEGER)(-  1);
+  stack__DVUE=result__LTNF;
+  path_file__04WF=create_with_capacity__LHRC( 3000);
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->upper__MVKF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->capacity__H3PF= 0;
+  ARRAYED_COLLECTIONoLIP_SLOT_CODEo__->storage__S3PF=NULL;
+  FAST_ARRAYoLIP_SLOT_CODEo__->parent_arrayed_collection__CVKF=(*ARRAYED_COLLECTIONoLIP_SLOT_CODEo__);
+  result__IENF=NULL;
+  ptr__JENF=((__POINTER )(NULL));
+  typ_id__OENF= 0;
+  sz__LENF=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_SLOT_CODEo));
+  if ((sz__LENF ==  0)) {
+    result__IENF=FAST_ARRAYoLIP_SLOT_CODEo__;
+  } else {
+    typ_id__OENF=__FAST_ARRAYoLIP_SLOT_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LENF);
+    if ((typ_id__OENF == (__INTEGER)(-  1))) {
+      a__MDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NDHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LENF + a__MDHH) & (__UINTEGER_32)(~ a__MDHH));
+      ptr_table__KRKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__JRKH=((__POINTER )(NULL));
+      result__LRKH=((__POINTER *)ptr_table__KRKH)[ 0];
+      if ((result__LRKH == (void *)NULL)) {
+        result__LRKH=new_lab__ZPJ(new_size__NDHH);
+        next__JRKH=(void *)((unsigned long)result__LRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDHH)));
+        ((__POINTER *)next__JRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KRKH)[ 0]=next__JRKH;
+      } else {
+        next__JRKH=((__POINTER *)result__LRKH)[ 0];
+        if ((next__JRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LRKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NDHH <<  1)) <=  4096)) {
+            next__JRKH=(void *)((unsigned long)result__LRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NDHH)));
+          } else {
+            next__JRKH=new_lab__ZPJ(new_size__NDHH);
+          };
+          ((__POINTER *)next__JRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KRKH)[ 0]=next__JRKH;
+        } else {
+          ((__POINTER *)result__LRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__LRKH=next__JRKH;
+        };
+      };
+      ptr__JENF=result__LRKH;
+    } else {
+      t__RDHH=((__UINTEGER_32 )typ_id__OENF);
+      a__QDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__SRKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LENF + a__QDHH) & (__UINTEGER_32)(~ a__QDHH));
+      ptr_table__PRKH=((__POINTER )(&(table_type[(t__RDHH)])));
+      lab_type__RRKH=(__UINTEGER_32)(t__RDHH |  1);
+      next__ORKH=((__POINTER )(NULL));
+      result__QRKH=((__POINTER *)ptr_table__PRKH)[ 0];
+      if ((result__QRKH == (void *)NULL)) {
+        result__QRKH=new_lab__ZPJ(lab_type__RRKH);
+        next__ORKH=(void *)((unsigned long)result__QRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SRKH)));
+        ((__POINTER *)next__ORKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__PRKH)[ 0]=next__ORKH;
+      } else {
+        next__ORKH=((__POINTER *)result__QRKH)[ 0];
+        if ((next__ORKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QRKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SRKH <<  1)) <=  4096)) {
+            next__ORKH=(void *)((unsigned long)result__QRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SRKH)));
+          } else {
+            next__ORKH=new_lab__ZPJ(lab_type__RRKH);
+          };
+          ((__POINTER *)next__ORKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PRKH)[ 0]=next__ORKH;
+        } else {
+          ((__POINTER *)result__QRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ORKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__QRKH=next__ORKH;
+        };
+      };
+      ptr__JENF=result__QRKH;
+    };
+    result__IENF=((__FAST_ARRAYoLIP_SLOT_CODEo *)ptr__JENF);
+    *(result__IENF) = *(FAST_ARRAYoLIP_SLOT_CODEo__);
+  };
+  Self__42PF=((__FAST_ARRAYoLIP_SLOT_CODEo *)result__IENF);
+  if ((Self__42PF->parent_arrayed_collection__CVKF.capacity__H3PF <  32)) {
+    sz__L1EH=((__UINTEGER_32 )(__INTEGER)(((__INTEGER )(sizeof(void *))) <<  5));
+    result__K1EH=((__POINTER )(NULL));
+    a__Q1EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__M1EH=(__UINTEGER_32)((__UINTEGER_32)(sz__L1EH + a__Q1EH) & (__UINTEGER_32)(~ a__Q1EH));
+    new_size2__N1EH=(__UINTEGER_32)(new_size__M1EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__N1EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__UDHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VDHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__N1EH + a__UDHH) & (__UINTEGER_32)(~ a__UDHH));
+      ptr_table__URKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VDHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__TRKH=((__POINTER )(NULL));
+      result__VRKH=((__POINTER *)ptr_table__URKH)[ 0];
+      if ((result__VRKH == (void *)NULL)) {
+        result__VRKH=new_lab__ZPJ(new_size__VDHH);
+        next__TRKH=(void *)((unsigned long)result__VRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDHH)));
+        ((__POINTER *)next__TRKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__URKH)[ 0]=next__TRKH;
+      } else {
+        next__TRKH=((__POINTER *)result__VRKH)[ 0];
+        if ((next__TRKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VRKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VDHH <<  1)) <=  4096)) {
+            next__TRKH=(void *)((unsigned long)result__VRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDHH)));
+          } else {
+            next__TRKH=new_lab__ZPJ(new_size__VDHH);
+          };
+          ((__POINTER *)next__TRKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__URKH)[ 0]=next__TRKH;
+        } else {
+          ((__POINTER *)result__VRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__VRKH=next__TRKH;
+        };
+      };
+      ((__POINTER *)result__VRKH)[ 0]=((__POINTER ) 3);
+      result__K1EH=(void *)((unsigned long)result__VRKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__YRKH=first_free__BCVB;
+      while ((((void *)result__YRKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YRKH)->map_size_and_id__YTB &  4294967292LU) < new_size__M1EH))) {
+        result__YRKH=((__MEMORY *)result__YRKH)->map_next_free__ZTB;
+      };
+      if (((void *)result__YRKH == (void *)NULL)) {
+        result__YRKH=new_page__K34();
+      };
+      to_busy__index__4SFC(result__YRKH,new_size__M1EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YRKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+      result__K1EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YRKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    Result__Y40F=((void **)result__K1EH);
+    Self__5HAG= 31;
+    while ((Self__5HAG >=  0)) {
+      Result__Y40F[Self__5HAG]=NULL;
+      Self__5HAG=(__INTEGER)(Self__5HAG -  1);
+    };
+    Self__42PF->parent_arrayed_collection__CVKF.storage__S3PF=Result__Y40F;
+    Self__42PF->parent_arrayed_collection__CVKF.capacity__H3PF= 32;
+  };
+  Self__42PF->parent_arrayed_collection__CVKF.upper__MVKF=(__INTEGER)(-  1);
+  list_method__DVKF=result__IENF;
+  PROTOTYPE__->comment_slot__QRTC=NULL;
+  PROTOTYPE__->comment_header__I4QC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->buckets__NOEC=NULL;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->capacity__IOEC= 0;
+  HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__->count__KYFC= 0;
+  result__F1YB=NULL;
+  ptr__G1YB=((__POINTER )(NULL));
+  typ_id__L1YB= 0;
+  sz__I1YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo));
+  if ((sz__I1YB ==  0)) {
+    result__F1YB=HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+  } else {
+    typ_id__L1YB=__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__I1YB);
+    if ((typ_id__L1YB == (__INTEGER)(-  1))) {
+      a__1DHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2DHH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1YB + a__1DHH) & (__UINTEGER_32)(~ a__1DHH));
+      ptr_table__2RKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2DHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1RKH=((__POINTER )(NULL));
+      result__3RKH=((__POINTER *)ptr_table__2RKH)[ 0];
+      if ((result__3RKH == (void *)NULL)) {
+        result__3RKH=new_lab__ZPJ(new_size__2DHH);
+        next__1RKH=(void *)((unsigned long)result__3RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DHH)));
+        ((__POINTER *)next__1RKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2RKH)[ 0]=next__1RKH;
+      } else {
+        next__1RKH=((__POINTER *)result__3RKH)[ 0];
+        if ((next__1RKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3RKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2DHH <<  1)) <=  4096)) {
+            next__1RKH=(void *)((unsigned long)result__3RKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2DHH)));
+          } else {
+            next__1RKH=new_lab__ZPJ(new_size__2DHH);
+          };
+          ((__POINTER *)next__1RKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2RKH)[ 0]=next__1RKH;
+        } else {
+          ((__POINTER *)result__3RKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1RKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3RKH=next__1RKH;
+        };
+      };
+      ptr__G1YB=result__3RKH;
+    } else {
+      t__AEHH=((__UINTEGER_32 )typ_id__L1YB);
+      a__5DHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ESKH=(__UINTEGER_32)((__UINTEGER_32)(sz__I1YB + a__5DHH) & (__UINTEGER_32)(~ a__5DHH));
+      ptr_table__BSKH=((__POINTER )(&(table_type[(t__AEHH)])));
+      lab_type__DSKH=(__UINTEGER_32)(t__AEHH |  1);
+      next__ASKH=((__POINTER )(NULL));
+      result__CSKH=((__POINTER *)ptr_table__BSKH)[ 0];
+      if ((result__CSKH == (void *)NULL)) {
+        result__CSKH=new_lab__ZPJ(lab_type__DSKH);
+        next__ASKH=(void *)((unsigned long)result__CSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESKH)));
+        ((__POINTER *)next__ASKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BSKH)[ 0]=next__ASKH;
+      } else {
+        next__ASKH=((__POINTER *)result__CSKH)[ 0];
+        if ((next__ASKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CSKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ESKH <<  1)) <=  4096)) {
+            next__ASKH=(void *)((unsigned long)result__CSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESKH)));
+          } else {
+            next__ASKH=new_lab__ZPJ(lab_type__DSKH);
+          };
+          ((__POINTER *)next__ASKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BSKH)[ 0]=next__ASKH;
+        } else {
+          ((__POINTER *)result__CSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ASKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__CSKH=next__ASKH;
+        };
+      };
+      ptr__G1YB=result__CSKH;
+    };
+    result__F1YB=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)ptr__G1YB);
+    *(result__F1YB) = *(HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo__);
+  };
+  Self__NWFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)result__F1YB);
+  new_capacity__0FOC=prime_number_ceiling__T11( 193);
+  Self__NWFC->buckets__NOEC=create__02XC(new_capacity__0FOC);
+  Self__NWFC->capacity__IOEC=new_capacity__0FOC;
+  Self__NWFC->count__KYFC= 0;
+  bucket_name__BSOB=result__F1YB;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->key__ZOEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->next__EPEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__->item__MPEC=NULL;
+  SECTION___->name__NYDC=NULL;
+  SECTION___->type_list__2WFC=NULL;
+  last_section__E1C=NULL;
+  PROTOTYPE__->last_slot__11C=NULL;
+  ITM_SLOT__->id_section__F2C=NULL;
+  ITM_SLOT__->comment__1ZOB=NULL;
+  ITM_SLOT__->result_type__B4FC=NULL;
+  ITM_SLOT__->affect__Q5FC='\0';
+  ITM_SLOT__->argument_list__RDHC=NULL;
+  ITM_SLOT__->next__ZGHC=NULL;
+  ITM_SLOT__->comment_chapter__T0HC=NULL;
+  ITM_SLOT__->stat_shorter__JKTD= 0;
+  ITM_SLOT_OPERATOR__->parent_itm_slot__BT5B=(*ITM_SLOT__);
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->buckets__TQEC=NULL;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->capacity__OQEC= 0;
+  HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->count__E1FC= 0;
+  result__K4YB=NULL;
+  ptr__L4YB=((__POINTER )(NULL));
+  typ_id__Q4YB= 0;
+  sz__N4YB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+  if ((sz__N4YB ==  0)) {
+    result__K4YB=HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+  } else {
+    typ_id__Q4YB=__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__N4YB);
+    if ((typ_id__Q4YB == (__INTEGER)(-  1))) {
+      a__DEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__EEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4YB + a__DEHH) & (__UINTEGER_32)(~ a__DEHH));
+      ptr_table__GSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FSKH=((__POINTER )(NULL));
+      result__HSKH=((__POINTER *)ptr_table__GSKH)[ 0];
+      if ((result__HSKH == (void *)NULL)) {
+        result__HSKH=new_lab__ZPJ(new_size__EEHH);
+        next__FSKH=(void *)((unsigned long)result__HSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EEHH)));
+        ((__POINTER *)next__FSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GSKH)[ 0]=next__FSKH;
+      } else {
+        next__FSKH=((__POINTER *)result__HSKH)[ 0];
+        if ((next__FSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HSKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EEHH <<  1)) <=  4096)) {
+            next__FSKH=(void *)((unsigned long)result__HSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EEHH)));
+          } else {
+            next__FSKH=new_lab__ZPJ(new_size__EEHH);
+          };
+          ((__POINTER *)next__FSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GSKH)[ 0]=next__FSKH;
+        } else {
+          ((__POINTER *)result__HSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HSKH=next__FSKH;
+        };
+      };
+      ptr__L4YB=result__HSKH;
+    } else {
+      t__IEHH=((__UINTEGER_32 )typ_id__Q4YB);
+      a__HEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__N4YB + a__HEHH) & (__UINTEGER_32)(~ a__HEHH));
+      ptr_table__LSKH=((__POINTER )(&(table_type[(t__IEHH)])));
+      lab_type__NSKH=(__UINTEGER_32)(t__IEHH |  1);
+      next__KSKH=((__POINTER )(NULL));
+      result__MSKH=((__POINTER *)ptr_table__LSKH)[ 0];
+      if ((result__MSKH == (void *)NULL)) {
+        result__MSKH=new_lab__ZPJ(lab_type__NSKH);
+        next__KSKH=(void *)((unsigned long)result__MSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSKH)));
+        ((__POINTER *)next__KSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LSKH)[ 0]=next__KSKH;
+      } else {
+        next__KSKH=((__POINTER *)result__MSKH)[ 0];
+        if ((next__KSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OSKH <<  1)) <=  4096)) {
+            next__KSKH=(void *)((unsigned long)result__MSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSKH)));
+          } else {
+            next__KSKH=new_lab__ZPJ(lab_type__NSKH);
+          };
+          ((__POINTER *)next__KSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LSKH)[ 0]=next__KSKH;
+        } else {
+          ((__POINTER *)result__MSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MSKH=next__KSKH;
+        };
+      };
+      ptr__L4YB=result__MSKH;
+    };
+    result__K4YB=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__L4YB);
+    *(result__K4YB) = *(HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+  };
+  Self__MZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__K4YB);
+  new_capacity__VJOC=prime_number_ceiling__T11( 193);
+  Self__MZFC->buckets__TQEC=create__3BYC(new_capacity__VJOC);
+  Self__MZFC->capacity__OQEC=new_capacity__VJOC;
+  Self__MZFC->count__E1FC= 0;
+  bucket_list__2TOB=result__K4YB;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->key__5QEC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->next__KREC=NULL;
+  HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__->item__SREC=NULL;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->upper__1SGC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->capacity__DKHC= 0;
+  ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__->storage__OKHC=NULL;
+  FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__->parent_arrayed_collection__WS1B=(*ARRAYED_COLLECTIONoFAST_ARRAYoITM_ARGUMENToo__);
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->upper__J5GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->capacity__L5GC= 0;
+  ARRAYED_COLLECTIONoITM_ARGUMENTo__->storage__HAHC=NULL;
+  FAST_ARRAYoITM_ARGUMENTo__->parent_arrayed_collection__AAZB=(*ARRAYED_COLLECTIONoITM_ARGUMENTo__);
+  result__EI5B=NULL;
+  ptr__FI5B=((__POINTER )(NULL));
+  typ_id__KI5B= 0;
+  sz__HI5B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo));
+  if ((sz__HI5B ==  0)) {
+    result__EI5B=FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+  } else {
+    typ_id__KI5B=__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HI5B);
+    if ((typ_id__KI5B == (__INTEGER)(-  1))) {
+      a__LEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__HI5B + a__LEHH) & (__UINTEGER_32)(~ a__LEHH));
+      ptr_table__QSKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__PSKH=((__POINTER )(NULL));
+      result__RSKH=((__POINTER *)ptr_table__QSKH)[ 0];
+      if ((result__RSKH == (void *)NULL)) {
+        result__RSKH=new_lab__ZPJ(new_size__MEHH);
+        next__PSKH=(void *)((unsigned long)result__RSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEHH)));
+        ((__POINTER *)next__PSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QSKH)[ 0]=next__PSKH;
+      } else {
+        next__PSKH=((__POINTER *)result__RSKH)[ 0];
+        if ((next__PSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MEHH <<  1)) <=  4096)) {
+            next__PSKH=(void *)((unsigned long)result__RSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEHH)));
+          } else {
+            next__PSKH=new_lab__ZPJ(new_size__MEHH);
+          };
+          ((__POINTER *)next__PSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QSKH)[ 0]=next__PSKH;
+        } else {
+          ((__POINTER *)result__RSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RSKH=next__PSKH;
+        };
+      };
+      ptr__FI5B=result__RSKH;
+    } else {
+      t__QEHH=((__UINTEGER_32 )typ_id__KI5B);
+      a__PEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__YSKH=(__UINTEGER_32)((__UINTEGER_32)(sz__HI5B + a__PEHH) & (__UINTEGER_32)(~ a__PEHH));
+      ptr_table__VSKH=((__POINTER )(&(table_type[(t__QEHH)])));
+      lab_type__XSKH=(__UINTEGER_32)(t__QEHH |  1);
+      next__USKH=((__POINTER )(NULL));
+      result__WSKH=((__POINTER *)ptr_table__VSKH)[ 0];
+      if ((result__WSKH == (void *)NULL)) {
+        result__WSKH=new_lab__ZPJ(lab_type__XSKH);
+        next__USKH=(void *)((unsigned long)result__WSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSKH)));
+        ((__POINTER *)next__USKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__VSKH)[ 0]=next__USKH;
+      } else {
+        next__USKH=((__POINTER *)result__WSKH)[ 0];
+        if ((next__USKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WSKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YSKH <<  1)) <=  4096)) {
+            next__USKH=(void *)((unsigned long)result__WSKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSKH)));
+          } else {
+            next__USKH=new_lab__ZPJ(lab_type__XSKH);
+          };
+          ((__POINTER *)next__USKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VSKH)[ 0]=next__USKH;
+        } else {
+          ((__POINTER *)result__WSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__WSKH=next__USKH;
+        };
+      };
+      ptr__FI5B=result__WSKH;
+    };
+    result__EI5B=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)ptr__FI5B);
+    *(result__EI5B) = *(FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo__);
+  };
+  Self__0JHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)result__EI5B);
+  if ((Self__0JHC->parent_arrayed_collection__WS1B.capacity__DKHC <  5)) {
+    Self__0JHC->parent_arrayed_collection__WS1B.storage__OKHC=create__VMBD( 5);
+    Self__0JHC->parent_arrayed_collection__WS1B.capacity__DKHC= 5;
+  };
+  Self__0JHC->parent_arrayed_collection__WS1B.upper__1SGC=(__INTEGER)(-  1);
+  free_list__XS1B=result__EI5B;
+  ITM_SLOT_OPERATOR__->priority_and_level__VZHC= 0;
+  ITM_SLOT_OPERATOR__->pretty_name__A0HC=NULL;
+  last_slot__0UOB=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->key__0AGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->next__FBGC=NULL;
+  HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__->item__NBGC=NULL;
+  PROTOTYPE__->first_slot__DEZB=NULL;
+  ARRAYED_COLLECTIONoITM_SLOTo__->upper__5JTD= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->capacity__E3VE= 0;
+  ARRAYED_COLLECTIONoITM_SLOTo__->storage__HKWE=NULL;
+  FAST_ARRAYoITM_SLOTo__->parent_arrayed_collection__CJTD=(*ARRAYED_COLLECTIONoITM_SLOTo__);
+  result__04HE=NULL;
+  ptr__14HE=((__POINTER )(NULL));
+  typ_id__A5HE= 0;
+  sz__34HE=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_SLOTo));
+  if ((sz__34HE ==  0)) {
+    result__04HE=FAST_ARRAYoITM_SLOTo__;
+  } else {
+    typ_id__A5HE=__FAST_ARRAYoITM_SLOTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__34HE);
+    if ((typ_id__A5HE == (__INTEGER)(-  1))) {
+      a__TEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UEHH=(__UINTEGER_32)((__UINTEGER_32)(sz__34HE + a__TEHH) & (__UINTEGER_32)(~ a__TEHH));
+      ptr_table__0SKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UEHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZSKH=((__POINTER )(NULL));
+      result__1SKH=((__POINTER *)ptr_table__0SKH)[ 0];
+      if ((result__1SKH == (void *)NULL)) {
+        result__1SKH=new_lab__ZPJ(new_size__UEHH);
+        next__ZSKH=(void *)((unsigned long)result__1SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEHH)));
+        ((__POINTER *)next__ZSKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0SKH)[ 0]=next__ZSKH;
+      } else {
+        next__ZSKH=((__POINTER *)result__1SKH)[ 0];
+        if ((next__ZSKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1SKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UEHH <<  1)) <=  4096)) {
+            next__ZSKH=(void *)((unsigned long)result__1SKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UEHH)));
+          } else {
+            next__ZSKH=new_lab__ZPJ(new_size__UEHH);
+          };
+          ((__POINTER *)next__ZSKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0SKH)[ 0]=next__ZSKH;
+        } else {
+          ((__POINTER *)result__1SKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1SKH=next__ZSKH;
+        };
+      };
+      ptr__14HE=result__1SKH;
+    } else {
+      t__YEHH=((__UINTEGER_32 )typ_id__A5HE);
+      a__XEHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__34HE + a__XEHH) & (__UINTEGER_32)(~ a__XEHH));
+      ptr_table__5SKH=((__POINTER )(&(table_type[(t__YEHH)])));
+      lab_type__BTKH=(__UINTEGER_32)(t__YEHH |  1);
+      next__4SKH=((__POINTER )(NULL));
+      result__ATKH=((__POINTER *)ptr_table__5SKH)[ 0];
+      if ((result__ATKH == (void *)NULL)) {
+        result__ATKH=new_lab__ZPJ(lab_type__BTKH);
+        next__4SKH=(void *)((unsigned long)result__ATKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTKH)));
+        ((__POINTER *)next__4SKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5SKH)[ 0]=next__4SKH;
+      } else {
+        next__4SKH=((__POINTER *)result__ATKH)[ 0];
+        if ((next__4SKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ATKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CTKH <<  1)) <=  4096)) {
+            next__4SKH=(void *)((unsigned long)result__ATKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTKH)));
+          } else {
+            next__4SKH=new_lab__ZPJ(lab_type__BTKH);
+          };
+          ((__POINTER *)next__4SKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5SKH)[ 0]=next__4SKH;
+        } else {
+          ((__POINTER *)result__ATKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4SKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ATKH=next__4SKH;
+        };
+      };
+      ptr__14HE=result__ATKH;
+    };
+    result__04HE=((__FAST_ARRAYoITM_SLOTo *)ptr__14HE);
+    *(result__04HE) = *(FAST_ARRAYoITM_SLOTo__);
+  };
+  Self__UJWE=((__FAST_ARRAYoITM_SLOTo *)result__04HE);
+  if ((Self__UJWE->parent_arrayed_collection__CJTD.capacity__E3VE <  256)) {
+    Self__UJWE->parent_arrayed_collection__CJTD.storage__HKWE=create__UCFF( 256);
+    Self__UJWE->parent_arrayed_collection__CJTD.capacity__E3VE= 256;
+  };
+  Self__UJWE->parent_arrayed_collection__CJTD.upper__5JTD=(__INTEGER)(-  1);
+  list_tmp__DJTD=result__04HE;
+  str_tmp__UJ4E=create__ZBB( 512);
+  str_tmp2__WL4E=create__ZBB( 64);
+  str_tmp3__WP4E=create__ZBB( 64);
   txt__1=NULL;
   p__AB=NULL;
   create__ZBB( 255);
@@ -5797,230 +5797,230 @@ int main(int argc,char **argv)
     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;
+      a__1EHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2EHH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__1EHH) & (__UINTEGER_32)(~ a__1EHH));
+      ptr_table__ETKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2EHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DTKH=((__POINTER )(NULL));
+      result__FTKH=((__POINTER *)ptr_table__ETKH)[ 0];
+      if ((result__FTKH == (void *)NULL)) {
+        result__FTKH=new_lab__ZPJ(new_size__2EHH);
+        next__DTKH=(void *)((unsigned long)result__FTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EHH)));
+        ((__POINTER *)next__DTKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ETKH)[ 0]=next__DTKH;
       } 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)));
+        next__DTKH=((__POINTER *)result__FTKH)[ 0];
+        if ((next__DTKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FTKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2EHH <<  1)) <=  4096)) {
+            next__DTKH=(void *)((unsigned long)result__FTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2EHH)));
           } else {
-            next__0OKH=new_lab__QOJ(new_size__TAHH);
+            next__DTKH=new_lab__ZPJ(new_size__2EHH);
           };
-          ((__POINTER *)next__0OKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1OKH)[ 0]=next__0OKH;
+          ((__POINTER *)next__DTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ETKH)[ 0]=next__DTKH;
         } else {
-          ((__POINTER *)result__2OKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2OKH=next__0OKH;
+          ((__POINTER *)result__FTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FTKH=next__DTKH;
         };
       };
-      ptr__UUB=result__2OKH;
+      ptr__UUB=result__FTKH;
     } 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;
+      t__AFHH=((__UINTEGER_32 )typ_id__ZUB);
+      a__5EHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__WUB + a__5EHH) & (__UINTEGER_32)(~ a__5EHH));
+      ptr_table__JTKH=((__POINTER )(&(table_type[(t__AFHH)])));
+      lab_type__LTKH=(__UINTEGER_32)(t__AFHH |  1);
+      next__ITKH=((__POINTER )(NULL));
+      result__KTKH=((__POINTER *)ptr_table__JTKH)[ 0];
+      if ((result__KTKH == (void *)NULL)) {
+        result__KTKH=new_lab__ZPJ(lab_type__LTKH);
+        next__ITKH=(void *)((unsigned long)result__KTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTKH)));
+        ((__POINTER *)next__ITKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JTKH)[ 0]=next__ITKH;
       } 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)));
+        next__ITKH=((__POINTER *)result__KTKH)[ 0];
+        if ((next__ITKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KTKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MTKH <<  1)) <=  4096)) {
+            next__ITKH=(void *)((unsigned long)result__KTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTKH)));
           } else {
-            next__5OKH=new_lab__QOJ(lab_type__CPKH);
+            next__ITKH=new_lab__ZPJ(lab_type__LTKH);
           };
-          ((__POINTER *)next__5OKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__APKH)[ 0]=next__5OKH;
+          ((__POINTER *)next__ITKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JTKH)[ 0]=next__ITKH;
         } else {
-          ((__POINTER *)result__BPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__BPKH=next__5OKH;
+          ((__POINTER *)result__KTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KTKH=next__ITKH;
         };
       };
-      ptr__UUB=result__BPKH;
+      ptr__UUB=result__KTKH;
     };
     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;
+  Self__L5R=((__HASHED_SEToABSTRACT_STRINGo *)result__TUB);
+  new_capacity__YWW=prime_number_ceiling__T11( 53);
+  Self__L5R->buckets__CWR=create__3G2(new_capacity__YWW);
+  Self__L5R->capacity__3VR=new_capacity__YWW;
+  Self__L5R->count__DXR= 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));
+  add__MVR(result__TUB,(&__string_4));
+  add__MVR(list__FK,(&__string_5));
+  add__MVR(list__FK,(&__string_6));
+  add__MVR(list__FK,(&__string_7));
+  add__MVR(list__FK,(&__string_8));
+  add__MVR(list__FK,(&__string_9));
+  add__MVR(list__FK,(&__string_10));
+  add__MVR(list__FK,(&__string_11));
+  add__MVR(list__FK,(&__string_12));
+  add__MVR(list__FK,(&__string_13));
+  add__MVR(list__FK,(&__string_14));
+  add__MVR(list__FK,(&__string_15));
+  add__MVR(list__FK,(&__string_16));
+  add__MVR(list__FK,(&__string_17));
+  add__MVR(list__FK,(&__string_18));
+  add__MVR(list__FK,(&__string_19));
+  add__MVR(list__FK,(&__string_20));
+  add__MVR(list__FK,(&__string_21));
+  add__MVR(list__FK,(&__string_22));
+  add__MVR(list__FK,(&__string_23));
+  add__MVR(list__FK,(&__string_24));
+  add__MVR(list__FK,(&__string_25));
+  add__MVR(list__FK,(&__string_26));
+  add__MVR(list__FK,(&__string_27));
+  add__MVR(list__FK,(&__string_28));
+  add__MVR(list__FK,(&__string_29));
+  add__MVR(list__FK,(&__string_30));
+  add__MVR(list__FK,(&__string_31));
+  add__MVR(list__FK,(&__string_32));
+  add__MVR(list__FK,(&__string_33));
+  add__MVR(list__FK,(&__string_34));
+  add__MVR(list__FK,(&__string_35));
+  add__MVR(list__FK,(&__string_36));
+  add__MVR(list__FK,(&__string_37));
+  add__MVR(list__FK,(&__string_38));
+  add__MVR(list__FK,(&__string_39));
+  add__MVR(list__FK,(&__string_40));
+  add__MVR(list__FK,(&__string_41));
+  add__MVR(list__FK,(&__string_42));
+  add__MVR(list__FK,(&__string_43));
+  add__MVR(list__FK,(&__string_44));
+  add__MVR(list__FK,(&__string_45));
+  add__MVR(list__FK,(&__string_46));
+  add__MVR(list__FK,(&__string_47));
+  add__MVR(list__FK,(&__string_1));
+  add__MVR(list__FK,(&__string_48));
+  add__MVR(list__FK,(&__string_49));
+  add__MVR(list__FK,(&__string_50));
+  add__MVR(list__FK,(&__string_51));
+  add__MVR(list__FK,(&__string_52));
+  add__MVR(list__FK,(&__string_53));
+  add__MVR(list__FK,(&__string_54));
+  add__MVR(list__FK,(&__string_55));
+  add__MVR(list__FK,(&__string_56));
+  add__MVR(list__FK,(&__string_57));
+  add__MVR(list__FK,(&__string_58));
+  add__MVR(list__FK,(&__string_59));
+  add__MVR(list__FK,(&__string_2));
+  add__MVR(list__FK,(&__string_3));
+  add__MVR(list__FK,(&__string_60));
+  add__MVR(list__FK,(&__string_61));
+  add__MVR(list__FK,(&__string_62));
+  add__MVR(list__FK,(&__string_63));
+  add__MVR(list__FK,(&__string_64));
+  add__MVR(list__FK,(&__string_65));
+  add__MVR(list__FK,(&__string_66));
+  add__MVR(list__FK,(&__string_67));
+  add__MVR(list__FK,(&__string_68));
+  add__MVR(list__FK,(&__string_69));
+  add__MVR(list__FK,(&__string_70));
+  add__MVR(list__FK,(&__string_71));
+  add__MVR(list__FK,(&__string_72));
+  add__MVR(list__FK,(&__string_73));
+  add__MVR(list__FK,(&__string_74));
+  add__MVR(list__FK,(&__string_75));
+  add__MVR(list__FK,(&__string_76));
+  add__MVR(list__FK,(&__string_77));
+  add__MVR(list__FK,(&__string_78));
+  add__MVR(list__FK,(&__string_79));
+  add__MVR(list__FK,(&__string_80));
+  add__MVR(list__FK,(&__string_81));
+  add__MVR(list__FK,(&__string_82));
+  add__MVR(list__FK,(&__string_83));
+  add__MVR(list__FK,(&__string_84));
+  add__MVR(list__FK,(&__string_85));
+  add__MVR(list__FK,(&__string_86));
+  add__MVR(list__FK,(&__string_87));
+  add__MVR(list__FK,(&__string_88));
+  add__MVR(list__FK,(&__string_89));
+  add__MVR(list__FK,(&__string_90));
+  add__MVR(list__FK,(&__string_91));
+  add__MVR(list__FK,(&__string_92));
+  add__MVR(list__FK,(&__string_93));
+  add__MVR(list__FK,(&__string_94));
+  add__MVR(list__FK,(&__string_95));
+  add__MVR(list__FK,(&__string_96));
+  add__MVR(list__FK,(&__string_97));
+  add__MVR(list__FK,(&__string_98));
+  add__MVR(list__FK,(&__string_99));
+  add__MVR(list__FK,(&__string_100));
+  add__MVR(list__FK,(&__string_101));
+  add__MVR(list__FK,(&__string_102));
+  add__MVR(list__FK,(&__string_103));
+  add__MVR(list__FK,(&__string_104));
+  add__MVR(list__FK,(&__string_105));
+  add__MVR(list__FK,(&__string_106));
+  add__MVR(list__FK,(&__string_107));
+  add__MVR(list__FK,(&__string_108));
+  add__MVR(list__FK,(&__string_109));
+  add__MVR(list__FK,(&__string_110));
+  add__MVR(list__FK,(&__string_111));
+  add__MVR(list__FK,(&__string_112));
+  add__MVR(list__FK,(&__string_113));
+  add__MVR(list__FK,(&__string_114));
+  add__MVR(list__FK,(&__string_115));
+  add__MVR(list__FK,(&__string_116));
+  add__MVR(list__FK,(&__string_117));
+  add__MVR(list__FK,(&__string_118));
+  add__MVR(list__FK,(&__string_119));
+  add__MVR(list__FK,(&__string_120));
+  add__MVR(list__FK,(&__string_121));
+  add__MVR(list__FK,(&__string_122));
+  add__MVR(list__FK,(&__string_123));
+  add__MVR(list__FK,(&__string_124));
+  add__MVR(list__FK,(&__string_125));
+  add__MVR(list__FK,(&__string_126));
+  add__MVR(list__FK,(&__string_127));
+  add__MVR(list__FK,(&__string_128));
+  add__MVR(list__FK,(&__string_129));
+  add__MVR(list__FK,(&__string_70));
+  add__MVR(list__FK,(&__string_130));
+  add__MVR(list__FK,(&__string_131));
+  add__MVR(list__FK,(&__string_132));
+  add__MVR(list__FK,(&__string_133));
+  add__MVR(list__FK,(&__string_65));
+  add__MVR(list__FK,(&__string_134));
+  add__MVR(list__FK,(&__string_135));
+  add__MVR(list__FK,(&__string_136));
+  add__MVR(list__FK,(&__string_137));
+  add__MVR(list__FK,(&__string_138));
+  add__MVR(list__FK,(&__string_139));
+  add__MVR(list__FK,(&__string_140));
+  add__MVR(list__FK,(&__string_141));
+  add__MVR(list__FK,(&__string_142));
+  add__MVR(list__FK,(&__string_143));
+  add__MVR(list__FK,(&__string_144));
+  add__MVR(list__FK,(&__string_145));
+  add__MVR(list__FK,(&__string_146));
+  add__MVR(list__FK,(&__string_147));
+  add__MVR(list__FK,(&__string_148));
+  add__MVR(list__FK,(&__string_149));
+  add__MVR(list__FK,(&__string_150));
+  add__MVR(list__FK,(&__string_66));
+  add__MVR(list__FK,(&__string_151));
+  add__MVR(list__FK,(&__string_152));
+  add__MVR(list__FK,(&__string_153));
+  add__MVR(list__FK,(&__string_154));
+  add__MVR(list__FK,(&__string_155));
+  add__MVR(list__FK,(&__string_156));
   operator__name__GHB((&__string_16));
   operator__name__GHB((&__string_17));
   cmd__HZ=NULL;
@@ -6028,15 +6028,15 @@ int main(int argc,char **argv)
   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')) {
+    cmd__HZ=((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ];
+    if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 0] == '-')) {
+      if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 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__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
+        output_name__DI=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
         __tmp__U0=TRUE__;
       } else {
         __tmp__U0=FALSE__;
@@ -6044,46 +6044,46 @@ int main(int argc,char **argv)
       if (__tmp__U0) {
         __tmp__P1=TRUE__;
       } else {
-        result__T1NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'f');
-        if (result__T1NB) {
+        result__32NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'f');
+        if (result__32NB) {
           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__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
+          format_name__N1=get__YWB(((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
         };
-        __tmp__P1=result__T1NB;
+        __tmp__P1=result__32NB;
       };
       if (__tmp__P1) {
         __tmp__31=TRUE__;
       } else {
-        result__F2NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'c');
-        if (result__F2NB) {
+        result__P3NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'c');
+        if (result__P3NB) {
           is_short_code__11=TRUE__;
         };
-        __tmp__31=result__F2NB;
+        __tmp__31=result__P3NB;
       };
       if (__tmp__31) {
         __tmp__L2=TRUE__;
       } else {
-        result__X2NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'p');
-        if (result__X2NB) {
+        result__B4NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'p');
+        if (result__B4NB) {
           is_short_private__J2=TRUE__;
         };
-        __tmp__L2=result__X2NB;
+        __tmp__L2=result__B4NB;
       };
       if (__tmp__L2) {
         __tmp__Y2=TRUE__;
       } else {
-        result__J3NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'r');
-        if (result__J3NB) {
+        result__T4NB=(((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'r');
+        if (result__T4NB) {
           is_short_recursive__JB=TRUE__;
         };
-        __tmp__Y2=result__J3NB;
+        __tmp__Y2=result__T4NB;
       };
       if ((! __tmp__Y2)) {
-        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__23R)[ 1] == 'd')) {
+        if ((((__CHARACTER *)((__STRING *)cmd__HZ)->storage__F5R)[ 1] == 'd')) {
           is_shorter__LZ=FALSE__;
           is_shorter2__VI=TRUE__;
           is_short_recursive__JB=TRUE__;
@@ -6097,7 +6097,7 @@ int main(int argc,char **argv)
         print__DID((&__string_157));
         exit(( 1));
       };
-      copy__U4R(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__SCT)[j__IZ]);
+      copy__35R(string_tmp__VH,((void **)((__FAST_ARRAYoSTRINGo *)result__OHD)->parent_arrayed_collection__RKC.storage__1DT)[j__IZ]);
       input_name__3B=get__YWB(string_tmp__VH);
     };
     j__IZ=(__INTEGER)(j__IZ +  1);
@@ -6113,101 +6113,101 @@ int main(int argc,char **argv)
     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)));
+    result__XGIH=NULL;
+    ptr__YGIH=((__POINTER )(NULL));
+    typ_id__ZGIH= 0;
+    sz__0GIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__0GIH ==  0)) {
+      result__XGIH=STRING_CONSTANT__;
+    } else {
+      typ_id__ZGIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0GIH);
+      if ((typ_id__ZGIH == (__INTEGER)(-  1))) {
+        a__1GIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2GIH=(__UINTEGER_32)((__UINTEGER_32)(sz__0GIH + a__1GIH) & (__UINTEGER_32)(~ a__1GIH));
+        ptr_table__OTKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2GIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__NTKH=((__POINTER )(NULL));
+        result__PTKH=((__POINTER *)ptr_table__OTKH)[ 0];
+        if ((result__PTKH == (void *)NULL)) {
+          result__PTKH=new_lab__ZPJ(new_size__2GIH);
+          next__NTKH=(void *)((unsigned long)result__PTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2GIH)));
+          ((__POINTER *)next__NTKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OTKH)[ 0]=next__NTKH;
+        } else {
+          next__NTKH=((__POINTER *)result__PTKH)[ 0];
+          if ((next__NTKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PTKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2GIH <<  1)) <=  4096)) {
+              next__NTKH=(void *)((unsigned long)result__PTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2GIH)));
             } else {
-              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)));
+              next__NTKH=new_lab__ZPJ(new_size__2GIH);
+            };
+            ((__POINTER *)next__NTKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OTKH)[ 0]=next__NTKH;
+          } else {
+            ((__POINTER *)result__PTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PTKH=next__NTKH;
+          };
+        };
+        ptr__YGIH=result__PTKH;
+      } else {
+        t__3GIH=((__UINTEGER_32 )typ_id__ZGIH);
+        a__4GIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WTKH=(__UINTEGER_32)((__UINTEGER_32)(sz__0GIH + a__4GIH) & (__UINTEGER_32)(~ a__4GIH));
+        ptr_table__TTKH=((__POINTER )(&(table_type[(t__3GIH)])));
+        lab_type__VTKH=(__UINTEGER_32)(t__3GIH |  1);
+        next__STKH=((__POINTER )(NULL));
+        result__UTKH=((__POINTER *)ptr_table__TTKH)[ 0];
+        if ((result__UTKH == (void *)NULL)) {
+          result__UTKH=new_lab__ZPJ(lab_type__VTKH);
+          next__STKH=(void *)((unsigned long)result__UTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTKH)));
+          ((__POINTER *)next__STKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TTKH)[ 0]=next__STKH;
+        } else {
+          next__STKH=((__POINTER *)result__UTKH)[ 0];
+          if ((next__STKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UTKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WTKH <<  1)) <=  4096)) {
+              next__STKH=(void *)((unsigned long)result__UTKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WTKH)));
             } else {
-              next__JPKH=new_lab__QOJ(lab_type__MPKH);
+              next__STKH=new_lab__ZPJ(lab_type__VTKH);
             };
-            ((__POINTER *)next__JPKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KPKH)[ 0]=next__JPKH;
+            ((__POINTER *)next__STKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TTKH)[ 0]=next__STKH;
           } else {
-            ((__POINTER *)result__LPKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JPKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LPKH=next__JPKH;
+            ((__POINTER *)result__UTKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__STKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UTKH=next__STKH;
           };
         };
-        ptr__PCIH=result__LPKH;
+        ptr__YGIH=result__UTKH;
       };
-      result__OCIH=((__STRING_CONSTANT *)ptr__PCIH);
-      *(result__OCIH) = *(STRING_CONSTANT__);
+      result__XGIH=((__STRING_CONSTANT *)ptr__YGIH);
+      *(result__XGIH) = *(STRING_CONSTANT__);
     };
-    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)] != '\\');
+    Self__RTS=((__STRING_CONSTANT *)result__XGIH);
+    Self__RTS->storage__ZNO=path__KZ;
+    Self__RTS->count__DD=idx__NLC;
+    copy__35R(string_tmp__VH,result__XGIH);
+    Self__BFHH=((__STRING_CONSTANT *)result__XGIH);
+    if ((((__CHARACTER *)Self__BFHH->storage__ZNO)[(__INTEGER)(Self__BFHH->count__DD -  1)] != '/')) {
+      Self__IKS=((__STRING_CONSTANT *)result__XGIH);
+      __tmp__14=(((__CHARACTER *)Self__IKS->storage__ZNO)[(__INTEGER)(Self__IKS->count__DD -  1)] != '\\');
     } else {
       __tmp__14=FALSE__;
     };
     if (__tmp__14) {
-      add_last__UHT(string_tmp__VH,'/');
+      add_last__3IT(string_tmp__VH,'/');
     };
-    append__2JS(string_tmp__VH,(&__string_158));
-    append__2JS(string_tmp__VH,format_name__N1);
-    append__2JS(string_tmp__VH,(&__string_159));
+    append__FLS(string_tmp__VH,(&__string_158));
+    append__FLS(string_tmp__VH,format_name__N1);
+    append__FLS(string_tmp__VH,(&__string_159));
     fmt_name__YNC=get__YWB(string_tmp__VH);
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
     };
-    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));
+    if (((void *)get_entry__GZAC(fmt_name__YNC) == (void *)NULL)) {
+      put_string__L0F((&__string_160));
+      put_string__L0F(fmt_name__YNC);
+      put_string__L0F((&__string_161));
       exit(( 1));
     };
     object__ZBC=create__name__generic_count__JBC(fmt_name__YNC,(&__string_114));
@@ -6216,677 +6216,677 @@ int main(int argc,char **argv)
     pos_cur__FCC= 1;
     pos_line__GCC= 1;
     pos_col__HCC= 0;
-    while_do__BHF:
+    while_do__KIF:
     {
-      result__OPKH=FALSE__;
+      result__XTKH=FALSE__;
       if ((! read_space__KSD())) {
-        result__OPKH=FALSE__;
+        result__XTKH=FALSE__;
       } else {
-        result__PPKH='\0';
+        result__YTKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PPKH=((__CHARACTER )(( 0)));
+          result__YTKH=((__CHARACTER )(( 0)));
         } else {
-          result__PPKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__YTKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__PPKH == '-')) {
+        if ((result__YTKH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__OPKH=TRUE__;
+          result__XTKH=TRUE__;
         };
       };
-      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)) {
+      if (result__XTKH) {
+        if ((! read_identifier__E4K())) {
+          pos__OK1G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_162));
+          put_position__LNG(pos__OK1G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__CEKB=NULL;
+        ptr__DEKB=((__POINTER )(NULL));
+        typ_id__IEKB= 0;
+        sz__FEKB=((__UINTEGER_32 )sizeof(__LINKED_LISToSTRING_CONSTANTo));
+        if ((sz__FEKB ==  0)) {
+          result__CEKB=LINKED_LISToSTRING_CONSTANTo__;
+        } else {
+          typ_id__IEKB=__LINKED_LISToSTRING_CONSTANTo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FEKB);
+          if ((typ_id__IEKB == (__INTEGER)(-  1))) {
+            a__EFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__FFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__FEKB + a__EFHH) & (__UINTEGER_32)(~ a__EFHH));
+            ptr_table__1TKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__0TKH=((__POINTER )(NULL));
+            result__2TKH=((__POINTER *)ptr_table__1TKH)[ 0];
+            if ((result__2TKH == (void *)NULL)) {
+              result__2TKH=new_lab__ZPJ(new_size__FFHH);
+              next__0TKH=(void *)((unsigned long)result__2TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFHH)));
+              ((__POINTER *)next__0TKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__1TKH)[ 0]=next__0TKH;
             } else {
-              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)));
+              next__0TKH=((__POINTER *)result__2TKH)[ 0];
+              if ((next__0TKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2TKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FFHH <<  1)) <=  4096)) {
+                  next__0TKH=(void *)((unsigned long)result__2TKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FFHH)));
                 } else {
-                  next__RPKH=new_lab__QOJ(new_size__2AHH);
+                  next__0TKH=new_lab__ZPJ(new_size__FFHH);
                 };
-                ((__POINTER *)next__RPKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SPKH)[ 0]=next__RPKH;
+                ((__POINTER *)next__0TKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1TKH)[ 0]=next__0TKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__2TKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0TKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__2TKH=next__0TKH;
+              };
+            };
+            ptr__DEKB=result__2TKH;
+          } else {
+            t__JFHH=((__UINTEGER_32 )typ_id__IEKB);
+            a__IFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__DUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__FEKB + a__IFHH) & (__UINTEGER_32)(~ a__IFHH));
+            ptr_table__AUKH=((__POINTER )(&(table_type[(t__JFHH)])));
+            lab_type__CUKH=(__UINTEGER_32)(t__JFHH |  1);
+            next__5TKH=((__POINTER )(NULL));
+            result__BUKH=((__POINTER *)ptr_table__AUKH)[ 0];
+            if ((result__BUKH == (void *)NULL)) {
+              result__BUKH=new_lab__ZPJ(lab_type__CUKH);
+              next__5TKH=(void *)((unsigned long)result__BUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DUKH)));
+              ((__POINTER *)next__5TKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__AUKH)[ 0]=next__5TKH;
             } else {
-              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)));
+              next__5TKH=((__POINTER *)result__BUKH)[ 0];
+              if ((next__5TKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BUKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__DUKH <<  1)) <=  4096)) {
+                  next__5TKH=(void *)((unsigned long)result__BUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DUKH)));
                 } else {
-                  next__WPKH=new_lab__QOJ(lab_type__ZPKH);
+                  next__5TKH=new_lab__ZPJ(lab_type__CUKH);
                 };
-                ((__POINTER *)next__WPKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XPKH)[ 0]=next__WPKH;
+                ((__POINTER *)next__5TKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AUKH)[ 0]=next__5TKH;
               } else {
-                ((__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)) {
+                ((__POINTER *)result__BUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5TKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__BUKH=next__5TKH;
+              };
+            };
+            ptr__DEKB=result__BUKH;
+          };
+          result__CEKB=((__LINKED_LISToSTRING_CONSTANTo *)ptr__DEKB);
+          *(result__CEKB) = *(LINKED_LISToSTRING_CONSTANTo__);
+        };
+        Self__5GIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__AHIH=last_string__V0C;
+        Self__EHIH=((__STRING_CONSTANT *)last_string__V0C);
+        result__DHIH= 0;
+        __tmp__FHIH=Self__EHIH->count__DD;
+        Self__GHIH= 1;
+        while ((Self__GHIH <= __tmp__FHIH)) {
+          result__DHIH=(__INTEGER)((__INTEGER)( 5 * result__DHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__EHIH->storage__ZNO)[(__INTEGER)(Self__GHIH -  1)])));
+          Self__GHIH=(__INTEGER)(Self__GHIH +  1);
+        };
+        if ((result__DHIH <  0)) {
+          result__DHIH=(__INTEGER)(~ result__DHIH);
+        };
+        node__BHIH=((void **)Self__5GIH->buckets__DAT)[(__INTEGER)(result__DHIH % Self__5GIH->capacity__45S)];
+        while ((! (((void *)node__BHIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BHIH)->key__PAT == (void *)k__AHIH)))) {
+          node__BHIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__BHIH)->next__0AT;
+        };
+        if (((void *)node__BHIH != (void *)NULL)) {
+          pos__YK1G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_163));
+          put_position__LNG(pos__YK1G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 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);
+        Self__SMEB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        k__UMEB=last_string__V0C;
+        Self__JHIH=((__STRING_CONSTANT *)last_string__V0C);
+        result__IHIH= 0;
+        __tmp__KHIH=Self__JHIH->count__DD;
+        Self__LHIH= 1;
+        while ((Self__LHIH <= __tmp__KHIH)) {
+          result__IHIH=(__INTEGER)((__INTEGER)( 5 * result__IHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__JHIH->storage__ZNO)[(__INTEGER)(Self__LHIH -  1)])));
+          Self__LHIH=(__INTEGER)(Self__LHIH +  1);
+        };
+        if ((result__IHIH <  0)) {
+          result__IHIH=(__INTEGER)(~ result__IHIH);
+        };
+        idx__2MEB=(__INTEGER)(result__IHIH % Self__SMEB->capacity__45S);
+        node__3MEB=((void **)Self__SMEB->buckets__DAT)[idx__2MEB];
+        while ((! (((void *)node__3MEB == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3MEB)->key__PAT == (void *)k__UMEB)))) {
+          node__3MEB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3MEB)->next__0AT;
+        };
+        if (((void *)node__3MEB == (void *)NULL)) {
+          if ((Self__SMEB->capacity__45S == Self__SMEB->count__EJY)) {
+            idx__5FZB= 0;
+            node1__DGZB=NULL;
+            node2__EGZB=NULL;
+            old_buckets__CGZB=Self__SMEB->buckets__DAT;
+            new_capacity__AGZB=prime_number_ceiling__T11((__INTEGER)(Self__SMEB->capacity__45S +  1));
+            Self__SMEB->buckets__DAT=create__3C4(new_capacity__AGZB);
+            i__BGZB=(__INTEGER)(Self__SMEB->capacity__45S -  1);
+            Self__SMEB->capacity__45S=new_capacity__AGZB;
+            while ((i__BGZB >=  0)) {
+              node1__DGZB=((void **)old_buckets__CGZB)[i__BGZB];
+              while (((void *)node1__DGZB != (void *)NULL)) {
+                node2__EGZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__DGZB)->next__0AT;
+                Self__OHIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__DGZB)->key__PAT);
+                result__NHIH= 0;
+                __tmp__PHIH=Self__OHIH->count__DD;
+                Self__QHIH= 1;
+                while ((Self__QHIH <= __tmp__PHIH)) {
+                  result__NHIH=(__INTEGER)((__INTEGER)( 5 * result__NHIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__OHIH->storage__ZNO)[(__INTEGER)(Self__QHIH -  1)])));
+                  Self__QHIH=(__INTEGER)(Self__QHIH +  1);
                 };
-                if ((result__EDIH <  0)) {
-                  result__EDIH=(__INTEGER)(~ result__EDIH);
+                if ((result__NHIH <  0)) {
+                  result__NHIH=(__INTEGER)(~ result__NHIH);
                 };
-                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;
+                idx__5FZB=(__INTEGER)(result__NHIH % Self__SMEB->capacity__45S);
+                ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node1__DGZB)->next__0AT=((void **)Self__SMEB->buckets__DAT)[idx__5FZB];
+                ((void **)Self__SMEB->buckets__DAT)[idx__5FZB]=node1__DGZB;
+                node1__DGZB=node2__EGZB;
+              };
+              i__BGZB=(__INTEGER)(i__BGZB -  1);
+            };
+            idx__2MEB=(__INTEGER)(result__IHIH % new_capacity__AGZB);
+          };
+          __tmp__KOEB=((void **)Self__SMEB->buckets__DAT)[idx__2MEB];
+          result__IIZB=NULL;
+          ptr__JIZB=((__POINTER )(NULL));
+          typ_id__OIZB= 0;
+          sz__LIZB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo));
+          if ((sz__LIZB ==  0)) {
+            result__IIZB=HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+          } else {
+            typ_id__OIZB=__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LIZB);
+            if ((typ_id__OIZB == (__INTEGER)(-  1))) {
+              a__PFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__QFHH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIZB + a__PFHH) & (__UINTEGER_32)(~ a__PFHH));
+              ptr_table__FUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QFHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__EUKH=((__POINTER )(NULL));
+              result__GUKH=((__POINTER *)ptr_table__FUKH)[ 0];
+              if ((result__GUKH == (void *)NULL)) {
+                result__GUKH=new_lab__ZPJ(new_size__QFHH);
+                next__EUKH=(void *)((unsigned long)result__GUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFHH)));
+                ((__POINTER *)next__EUKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FUKH)[ 0]=next__EUKH;
               } else {
-                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)));
+                next__EUKH=((__POINTER *)result__GUKH)[ 0];
+                if ((next__EUKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GUKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QFHH <<  1)) <=  4096)) {
+                    next__EUKH=(void *)((unsigned long)result__GUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QFHH)));
                   } else {
-                    next__1PKH=new_lab__QOJ(new_size__HBHH);
+                    next__EUKH=new_lab__ZPJ(new_size__QFHH);
                   };
-                  ((__POINTER *)next__1PKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2PKH)[ 0]=next__1PKH;
+                  ((__POINTER *)next__EUKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FUKH)[ 0]=next__EUKH;
                 } else {
-                  ((__POINTER *)result__3PKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1PKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__3PKH=next__1PKH;
+                  ((__POINTER *)result__GUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__GUKH=next__EUKH;
                 };
               };
-              ptr__3GZB=result__3PKH;
+              ptr__JIZB=result__GUKH;
             } else {
-              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;
+              t__UFHH=((__UINTEGER_32 )typ_id__OIZB);
+              a__TFHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__NUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIZB + a__TFHH) & (__UINTEGER_32)(~ a__TFHH));
+              ptr_table__KUKH=((__POINTER )(&(table_type[(t__UFHH)])));
+              lab_type__MUKH=(__UINTEGER_32)(t__UFHH |  1);
+              next__JUKH=((__POINTER )(NULL));
+              result__LUKH=((__POINTER *)ptr_table__KUKH)[ 0];
+              if ((result__LUKH == (void *)NULL)) {
+                result__LUKH=new_lab__ZPJ(lab_type__MUKH);
+                next__JUKH=(void *)((unsigned long)result__LUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUKH)));
+                ((__POINTER *)next__JUKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KUKH)[ 0]=next__JUKH;
               } else {
-                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)));
+                next__JUKH=((__POINTER *)result__LUKH)[ 0];
+                if ((next__JUKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LUKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NUKH <<  1)) <=  4096)) {
+                    next__JUKH=(void *)((unsigned long)result__LUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUKH)));
                   } else {
-                    next__AQKH=new_lab__QOJ(lab_type__DQKH);
+                    next__JUKH=new_lab__ZPJ(lab_type__MUKH);
                   };
-                  ((__POINTER *)next__AQKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BQKH)[ 0]=next__AQKH;
+                  ((__POINTER *)next__JUKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KUKH)[ 0]=next__JUKH;
                 } else {
-                  ((__POINTER *)result__CQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CQKH=next__AQKH;
+                  ((__POINTER *)result__LUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LUKH=next__JUKH;
                 };
               };
-              ptr__3GZB=result__CQKH;
+              ptr__JIZB=result__LUKH;
             };
-            result__2GZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__3GZB);
-            *(result__2GZB) = *(HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo__);
+            result__IIZB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)ptr__JIZB);
+            *(result__IIZB) = *(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);
+          Self__GDGC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__IIZB);
+          Self__GDGC->item__DV3=result__CEKB;
+          Self__GDGC->key__PAT=__tmp__JOD;
+          Self__GDGC->next__0AT=__tmp__KOEB;
+          node__3MEB=result__IIZB;
+          ((void **)Self__SMEB->buckets__DAT)[idx__2MEB]=result__IIZB;
+          Self__SMEB->count__EJY=(__INTEGER)(Self__SMEB->count__EJY +  1);
         } else {
-          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ULEB)->item__0T3=result__YCKB;
+          ((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3MEB)->item__DV3=result__CEKB;
         };
-        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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__KM1G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_164));
+          put_position__LNG(pos__KM1G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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__;
+        def__CPEB=result__CEKB;
+        result__EPEB=FALSE__;
+        if (read_short_elt__JIKB()) {
+          result__EPEB=TRUE__;
+          Self__0FHH=((__LINKED_LISToSTRING_CONSTANTo *)result__CEKB);
+          element__ZFHH=last_string__V0C;
+          if (((void *)Self__0FHH->first_link__PTEC == (void *)NULL)) {
+            i__1HIH=last_string__V0C;
+            result__SHIH=NULL;
+            ptr__THIH=((__POINTER )(NULL));
+            typ_id__UHIH= 0;
+            sz__VHIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__VHIH ==  0)) {
+              result__SHIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__UHIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VHIH);
+              if ((typ_id__UHIH == (__INTEGER)(-  1))) {
+                a__WHIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__XHIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VHIH + a__WHIH) & (__UINTEGER_32)(~ a__WHIH));
+                ptr_table__PUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XHIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__OUKH=((__POINTER )(NULL));
+                result__QUKH=((__POINTER *)ptr_table__PUKH)[ 0];
+                if ((result__QUKH == (void *)NULL)) {
+                  result__QUKH=new_lab__ZPJ(new_size__XHIH);
+                  next__OUKH=(void *)((unsigned long)result__QUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XHIH)));
+                  ((__POINTER *)next__OUKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PUKH)[ 0]=next__OUKH;
                 } else {
-                  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)));
+                  next__OUKH=((__POINTER *)result__QUKH)[ 0];
+                  if ((next__OUKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QUKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XHIH <<  1)) <=  4096)) {
+                      next__OUKH=(void *)((unsigned long)result__QUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XHIH)));
                     } else {
-                      next__FQKH=new_lab__QOJ(new_size__ODIH);
+                      next__OUKH=new_lab__ZPJ(new_size__XHIH);
                     };
-                    ((__POINTER *)next__FQKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__GQKH)[ 0]=next__FQKH;
+                    ((__POINTER *)next__OUKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__PUKH)[ 0]=next__OUKH;
                   } else {
-                    ((__POINTER *)result__HQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__HQKH=next__FQKH;
+                    ((__POINTER *)result__QUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__QUKH=next__OUKH;
                   };
                 };
-                ptr__KDIH=result__HQKH;
+                ptr__THIH=result__QUKH;
               } else {
-                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;
+                t__YHIH=((__UINTEGER_32 )typ_id__UHIH);
+                a__ZHIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__XUKH=(__UINTEGER_32)((__UINTEGER_32)(sz__VHIH + a__ZHIH) & (__UINTEGER_32)(~ a__ZHIH));
+                ptr_table__UUKH=((__POINTER )(&(table_type[(t__YHIH)])));
+                lab_type__WUKH=(__UINTEGER_32)(t__YHIH |  1);
+                next__TUKH=((__POINTER )(NULL));
+                result__VUKH=((__POINTER *)ptr_table__UUKH)[ 0];
+                if ((result__VUKH == (void *)NULL)) {
+                  result__VUKH=new_lab__ZPJ(lab_type__WUKH);
+                  next__TUKH=(void *)((unsigned long)result__VUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUKH)));
+                  ((__POINTER *)next__TUKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__UUKH)[ 0]=next__TUKH;
                 } else {
-                  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)));
+                  next__TUKH=((__POINTER *)result__VUKH)[ 0];
+                  if ((next__TUKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VUKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XUKH <<  1)) <=  4096)) {
+                      next__TUKH=(void *)((unsigned long)result__VUKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUKH)));
                     } else {
-                      next__KQKH=new_lab__QOJ(lab_type__NQKH);
+                      next__TUKH=new_lab__ZPJ(lab_type__WUKH);
                     };
-                    ((__POINTER *)next__KQKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__LQKH)[ 0]=next__KQKH;
+                    ((__POINTER *)next__TUKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__UUKH)[ 0]=next__TUKH;
                   } else {
-                    ((__POINTER *)result__MQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__MQKH=next__KQKH;
+                    ((__POINTER *)result__VUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__VUKH=next__TUKH;
                   };
                 };
-                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__;
+                ptr__THIH=result__VUKH;
+              };
+              result__SHIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__THIH);
+              *(result__SHIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+            };
+            Self__0HIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__SHIH);
+            Self__0HIH->item__HXHD=i__1HIH;
+            Self__0HIH->next__UMOD=NULL;
+            Self__0FHH->first_link__PTEC=result__SHIH;
+            Self__0FHH->parent_linked_collection__LD.upper__MDD= 1;
+            Self__0FHH->last_link__YTEC=result__SHIH;
+            Self__0FHH->mem_idx__ZTEC= 1;
+            Self__0FHH->mem_lnk__1TEC=result__SHIH;
+          } else {
+            result__2HIH=NULL;
+            ptr__3HIH=((__POINTER )(NULL));
+            typ_id__4HIH= 0;
+            sz__5HIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+            if ((sz__5HIH ==  0)) {
+              result__2HIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
             } else {
-              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;
+              typ_id__4HIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5HIH);
+              if ((typ_id__4HIH == (__INTEGER)(-  1))) {
+                a__AIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__BIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__5HIH + a__AIIH) & (__UINTEGER_32)(~ a__AIIH));
+                ptr_table__ZUKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__YUKH=((__POINTER )(NULL));
+                result__0UKH=((__POINTER *)ptr_table__ZUKH)[ 0];
+                if ((result__0UKH == (void *)NULL)) {
+                  result__0UKH=new_lab__ZPJ(new_size__BIIH);
+                  next__YUKH=(void *)((unsigned long)result__0UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIIH)));
+                  ((__POINTER *)next__YUKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__ZUKH)[ 0]=next__YUKH;
                 } else {
-                  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)));
+                  next__YUKH=((__POINTER *)result__0UKH)[ 0];
+                  if ((next__YUKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0UKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BIIH <<  1)) <=  4096)) {
+                      next__YUKH=(void *)((unsigned long)result__0UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIIH)));
                     } else {
-                      next__PQKH=new_lab__QOJ(new_size__YDIH);
+                      next__YUKH=new_lab__ZPJ(new_size__BIIH);
                     };
-                    ((__POINTER *)next__PQKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__QQKH)[ 0]=next__PQKH;
+                    ((__POINTER *)next__YUKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__ZUKH)[ 0]=next__YUKH;
                   } else {
-                    ((__POINTER *)result__RQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__RQKH=next__PQKH;
+                    ((__POINTER *)result__0UKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__0UKH=next__YUKH;
                   };
                 };
-                ptr__UDIH=result__RQKH;
+                ptr__3HIH=result__0UKH;
               } else {
-                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;
+                t__CIIH=((__UINTEGER_32 )typ_id__4HIH);
+                a__DIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__BVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5HIH + a__DIIH) & (__UINTEGER_32)(~ a__DIIH));
+                ptr_table__4UKH=((__POINTER )(&(table_type[(t__CIIH)])));
+                lab_type__AVKH=(__UINTEGER_32)(t__CIIH |  1);
+                next__3UKH=((__POINTER )(NULL));
+                result__5UKH=((__POINTER *)ptr_table__4UKH)[ 0];
+                if ((result__5UKH == (void *)NULL)) {
+                  result__5UKH=new_lab__ZPJ(lab_type__AVKH);
+                  next__3UKH=(void *)((unsigned long)result__5UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVKH)));
+                  ((__POINTER *)next__3UKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__4UKH)[ 0]=next__3UKH;
                 } else {
-                  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)));
+                  next__3UKH=((__POINTER *)result__5UKH)[ 0];
+                  if ((next__3UKH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5UKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BVKH <<  1)) <=  4096)) {
+                      next__3UKH=(void *)((unsigned long)result__5UKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BVKH)));
                     } else {
-                      next__UQKH=new_lab__QOJ(lab_type__XQKH);
+                      next__3UKH=new_lab__ZPJ(lab_type__AVKH);
                     };
-                    ((__POINTER *)next__UQKH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__VQKH)[ 0]=next__UQKH;
+                    ((__POINTER *)next__3UKH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__4UKH)[ 0]=next__3UKH;
                   } else {
-                    ((__POINTER *)result__WQKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UQKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__WQKH=next__UQKH;
+                    ((__POINTER *)result__5UKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3UKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__5UKH=next__3UKH;
                   };
                 };
-                ptr__UDIH=result__WQKH;
+                ptr__3HIH=result__5UKH;
               };
-              result__TDIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__UDIH);
-              *(result__TDIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+              result__2HIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__3HIH);
+              *(result__2HIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
             };
-            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;
+            Self__EIIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__2HIH);
+            Self__EIIH->item__HXHD=element__ZFHH;
+            Self__EIIH->next__UMOD=NULL;
+            ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__0FHH->last_link__YTEC)->next__UMOD=result__2HIH;
+            Self__0FHH->parent_linked_collection__LD.upper__MDD=(__INTEGER)(Self__0FHH->parent_linked_collection__LD.upper__MDD +  1);
+            Self__0FHH->last_link__YTEC=result__2HIH;
           };
-          while_do__APSB:
+          while_do__MQSB:
           {
-            result__ZQKH=FALSE__;
+            result__CVKH=FALSE__;
             if ((! read_space__KSD())) {
-              result__ZQKH=FALSE__;
+              result__CVKH=FALSE__;
             } else {
-              result__0QKH='\0';
+              result__DVKH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__0QKH=((__CHARACTER )(( 0)));
+                result__DVKH=((__CHARACTER )(( 0)));
               } else {
-                result__0QKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__DVKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__0QKH == '+')) {
+              if ((result__DVKH == '+')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__ZQKH=TRUE__;
+                result__CVKH=TRUE__;
               };
             };
-            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)) {
+            if (result__CVKH) {
+              if ((! read_short_elt__JIKB())) {
+                pos__MM1G=current_position__AWF();
+                put_error__text__BMG( 0,(&__string_165));
+                put_position__LNG(pos__MM1G);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              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__;
+              Self__KTEC=((__LINKED_LISToSTRING_CONSTANTo *)def__CPEB);
+              element__LTEC=last_string__V0C;
+              if (((void *)Self__KTEC->first_link__PTEC == (void *)NULL)) {
+                i__PIIH=last_string__V0C;
+                result__GIIH=NULL;
+                ptr__HIIH=((__POINTER )(NULL));
+                typ_id__IIIH= 0;
+                sz__JIIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__JIIH ==  0)) {
+                  result__GIIH=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__IIIH=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JIIH);
+                  if ((typ_id__IIIH == (__INTEGER)(-  1))) {
+                    a__KIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__LIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIIH + a__KIIH) & (__UINTEGER_32)(~ a__KIIH));
+                    ptr_table__GVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__FVKH=((__POINTER )(NULL));
+                    result__HVKH=((__POINTER *)ptr_table__GVKH)[ 0];
+                    if ((result__HVKH == (void *)NULL)) {
+                      result__HVKH=new_lab__ZPJ(new_size__LIIH);
+                      next__FVKH=(void *)((unsigned long)result__HVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIIH)));
+                      ((__POINTER *)next__FVKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__GVKH)[ 0]=next__FVKH;
                     } else {
-                      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)));
+                      next__FVKH=((__POINTER *)result__HVKH)[ 0];
+                      if ((next__FVKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HVKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LIIH <<  1)) <=  4096)) {
+                          next__FVKH=(void *)((unsigned long)result__HVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LIIH)));
                         } else {
-                          next__2QKH=new_lab__QOJ(new_size__CEIH);
+                          next__FVKH=new_lab__ZPJ(new_size__LIIH);
                         };
-                        ((__POINTER *)next__2QKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3QKH)[ 0]=next__2QKH;
+                        ((__POINTER *)next__FVKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__GVKH)[ 0]=next__FVKH;
                       } else {
-                        ((__POINTER *)result__4QKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2QKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4QKH=next__2QKH;
+                        ((__POINTER *)result__HVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__HVKH=next__FVKH;
                       };
                     };
-                    ptr__4DIH=result__4QKH;
+                    ptr__HIIH=result__HVKH;
                   } else {
-                    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;
+                    t__MIIH=((__UINTEGER_32 )typ_id__IIIH);
+                    a__NIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__OVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__JIIH + a__NIIH) & (__UINTEGER_32)(~ a__NIIH));
+                    ptr_table__LVKH=((__POINTER )(&(table_type[(t__MIIH)])));
+                    lab_type__NVKH=(__UINTEGER_32)(t__MIIH |  1);
+                    next__KVKH=((__POINTER )(NULL));
+                    result__MVKH=((__POINTER *)ptr_table__LVKH)[ 0];
+                    if ((result__MVKH == (void *)NULL)) {
+                      result__MVKH=new_lab__ZPJ(lab_type__NVKH);
+                      next__KVKH=(void *)((unsigned long)result__MVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVKH)));
+                      ((__POINTER *)next__KVKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__LVKH)[ 0]=next__KVKH;
                     } else {
-                      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)));
+                      next__KVKH=((__POINTER *)result__MVKH)[ 0];
+                      if ((next__KVKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MVKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OVKH <<  1)) <=  4096)) {
+                          next__KVKH=(void *)((unsigned long)result__MVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OVKH)));
                         } else {
-                          next__BRKH=new_lab__QOJ(lab_type__ERKH);
+                          next__KVKH=new_lab__ZPJ(lab_type__NVKH);
                         };
-                        ((__POINTER *)next__BRKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__CRKH)[ 0]=next__BRKH;
+                        ((__POINTER *)next__KVKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__LVKH)[ 0]=next__KVKH;
                       } else {
-                        ((__POINTER *)result__DRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__DRKH=next__BRKH;
+                        ((__POINTER *)result__MVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__MVKH=next__KVKH;
                       };
                     };
-                    ptr__4DIH=result__DRKH;
+                    ptr__HIIH=result__MVKH;
                   };
-                  result__3DIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__4DIH);
-                  *(result__3DIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__GIIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__HIIH);
+                  *(result__GIIH) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__OIIH=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__GIIH);
+                Self__OIIH->item__HXHD=i__PIIH;
+                Self__OIIH->next__UMOD=NULL;
+                Self__KTEC->first_link__PTEC=result__GIIH;
+                Self__KTEC->parent_linked_collection__LD.upper__MDD= 1;
+                Self__KTEC->last_link__YTEC=result__GIIH;
+                Self__KTEC->mem_idx__ZTEC= 1;
+                Self__KTEC->mem_lnk__1TEC=result__GIIH;
               } else {
-                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__;
+                result__VPED=NULL;
+                ptr__WPED=((__POINTER )(NULL));
+                typ_id__1PED= 0;
+                sz__YPED=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoSTRING_CONSTANTo));
+                if ((sz__YPED ==  0)) {
+                  result__VPED=LINKED_LIST_NODEoSTRING_CONSTANTo__;
                 } else {
-                  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;
+                  typ_id__1PED=__LINKED_LIST_NODEoSTRING_CONSTANTo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YPED);
+                  if ((typ_id__1PED == (__INTEGER)(-  1))) {
+                    a__C3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__D3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__YPED + a__C3FH) & (__UINTEGER_32)(~ a__C3FH));
+                    ptr_table__QVKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__D3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__PVKH=((__POINTER )(NULL));
+                    result__RVKH=((__POINTER *)ptr_table__QVKH)[ 0];
+                    if ((result__RVKH == (void *)NULL)) {
+                      result__RVKH=new_lab__ZPJ(new_size__D3FH);
+                      next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3FH)));
+                      ((__POINTER *)next__PVKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
                     } else {
-                      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)));
+                      next__PVKH=((__POINTER *)result__RVKH)[ 0];
+                      if ((next__PVKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RVKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__D3FH <<  1)) <=  4096)) {
+                          next__PVKH=(void *)((unsigned long)result__RVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D3FH)));
                         } else {
-                          next__GRKH=new_lab__QOJ(new_size__0YFH);
+                          next__PVKH=new_lab__ZPJ(new_size__D3FH);
                         };
-                        ((__POINTER *)next__GRKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__HRKH)[ 0]=next__GRKH;
+                        ((__POINTER *)next__PVKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__QVKH)[ 0]=next__PVKH;
                       } else {
-                        ((__POINTER *)result__IRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__IRKH=next__GRKH;
+                        ((__POINTER *)result__RVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__RVKH=next__PVKH;
                       };
                     };
-                    ptr__VOED=result__IRKH;
+                    ptr__WPED=result__RVKH;
                   } else {
-                    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;
+                    t__H3FH=((__UINTEGER_32 )typ_id__1PED);
+                    a__G3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__YVKH=(__UINTEGER_32)((__UINTEGER_32)(sz__YPED + a__G3FH) & (__UINTEGER_32)(~ a__G3FH));
+                    ptr_table__VVKH=((__POINTER )(&(table_type[(t__H3FH)])));
+                    lab_type__XVKH=(__UINTEGER_32)(t__H3FH |  1);
+                    next__UVKH=((__POINTER )(NULL));
+                    result__WVKH=((__POINTER *)ptr_table__VVKH)[ 0];
+                    if ((result__WVKH == (void *)NULL)) {
+                      result__WVKH=new_lab__ZPJ(lab_type__XVKH);
+                      next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVKH)));
+                      ((__POINTER *)next__UVKH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
                     } else {
-                      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)));
+                      next__UVKH=((__POINTER *)result__WVKH)[ 0];
+                      if ((next__UVKH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WVKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YVKH <<  1)) <=  4096)) {
+                          next__UVKH=(void *)((unsigned long)result__WVKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YVKH)));
                         } else {
-                          next__LRKH=new_lab__QOJ(lab_type__ORKH);
+                          next__UVKH=new_lab__ZPJ(lab_type__XVKH);
                         };
-                        ((__POINTER *)next__LRKH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__MRKH)[ 0]=next__LRKH;
+                        ((__POINTER *)next__UVKH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__VVKH)[ 0]=next__UVKH;
                       } else {
-                        ((__POINTER *)result__NRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__NRKH=next__LRKH;
+                        ((__POINTER *)result__WVKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__WVKH=next__UVKH;
                       };
                     };
-                    ptr__VOED=result__NRKH;
+                    ptr__WPED=result__WVKH;
                   };
-                  result__UOED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__VOED);
-                  *(result__UOED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
+                  result__VPED=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)ptr__WPED);
+                  *(result__VPED) = *(LINKED_LIST_NODEoSTRING_CONSTANTo__);
                 };
-                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;
+                Self__UJSD=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)result__VPED);
+                Self__UJSD->item__HXHD=element__LTEC;
+                Self__UJSD->next__UMOD=NULL;
+                ((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__KTEC->last_link__YTEC)->next__UMOD=result__VPED;
+                Self__KTEC->parent_linked_collection__LD.upper__MDD=(__INTEGER)(Self__KTEC->parent_linked_collection__LD.upper__MDD +  1);
+                Self__KTEC->last_link__YTEC=result__VPED;
               };
-              goto while_do__APSB;
+              goto while_do__MQSB;
             };
           };
         };
-        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)) {
+        if ((! result__EPEB)) {
+          pos__OM1G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_166));
+          put_position__LNG(pos__OM1G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__JEG=FALSE__;
+        result__SFG=FALSE__;
         if ((! read_space__KSD())) {
-          result__JEG=FALSE__;
+          result__SFG=FALSE__;
         } else {
-          result__1JDH='\0';
+          result__EODH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__1JDH=((__CHARACTER )(( 0)));
+            result__EODH=((__CHARACTER )(( 0)));
           } else {
-            result__1JDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__EODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__1JDH == ';')) {
+          if ((result__EODH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__JEG=TRUE__;
+            result__SFG=TRUE__;
           };
         };
-        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)) {
+        if ((! result__SFG)) {
+          pos__QM1G=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_167));
+          put_position__LNG(pos__QM1G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__BHF;
+        goto while_do__KIF;
       };
     };
     read_space__KSD();
-    result__K5CH='\0';
+    result__TDDH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__K5CH=((__CHARACTER )(( 0)));
+      result__TDDH=((__CHARACTER )(( 0)));
     } else {
-      result__K5CH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__TDDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    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)) {
+    if ((result__TDDH != ((__CHARACTER )(( 0))))) {
+      pos__SM1G=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_168));
+      put_position__LNG(pos__SM1G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
     object__ZBC=NULL;
   };
   index_count__P5=(__INTEGER)(index_count__P5 +  1);
-  fast_put__to__TXR(result__1OC,(&__string_2));
+  fast_put__to__2YR(result__1OC,(&__string_2));
   result__2YB=NULL;
   ptr__3YB=((__POINTER )(NULL));
   typ_id__CZB= 0;
@@ -6897,123 +6897,123 @@ int main(int argc,char **argv)
     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;
+      a__3FHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4FHH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__3FHH) & (__UINTEGER_32)(~ a__3FHH));
+      ptr_table__0VKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4FHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZVKH=((__POINTER )(NULL));
+      result__1VKH=((__POINTER *)ptr_table__0VKH)[ 0];
+      if ((result__1VKH == (void *)NULL)) {
+        result__1VKH=new_lab__ZPJ(new_size__4FHH);
+        next__ZVKH=(void *)((unsigned long)result__1VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FHH)));
+        ((__POINTER *)next__ZVKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
       } 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)));
+        next__ZVKH=((__POINTER *)result__1VKH)[ 0];
+        if ((next__ZVKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1VKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4FHH <<  1)) <=  4096)) {
+            next__ZVKH=(void *)((unsigned long)result__1VKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4FHH)));
           } else {
-            next__QRKH=new_lab__QOJ(new_size__VBHH);
+            next__ZVKH=new_lab__ZPJ(new_size__4FHH);
           };
-          ((__POINTER *)next__QRKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__RRKH)[ 0]=next__QRKH;
+          ((__POINTER *)next__ZVKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0VKH)[ 0]=next__ZVKH;
         } else {
-          ((__POINTER *)result__SRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__SRKH=next__QRKH;
+          ((__POINTER *)result__1VKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1VKH=next__ZVKH;
         };
       };
-      ptr__3YB=result__SRKH;
+      ptr__3YB=result__1VKH;
     } 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;
+      t__CGHH=((__UINTEGER_32 )typ_id__CZB);
+      a__BGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CWKH=(__UINTEGER_32)((__UINTEGER_32)(sz__5YB + a__BGHH) & (__UINTEGER_32)(~ a__BGHH));
+      ptr_table__5VKH=((__POINTER )(&(table_type[(t__CGHH)])));
+      lab_type__BWKH=(__UINTEGER_32)(t__CGHH |  1);
+      next__4VKH=((__POINTER )(NULL));
+      result__AWKH=((__POINTER *)ptr_table__5VKH)[ 0];
+      if ((result__AWKH == (void *)NULL)) {
+        result__AWKH=new_lab__ZPJ(lab_type__BWKH);
+        next__4VKH=(void *)((unsigned long)result__AWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWKH)));
+        ((__POINTER *)next__4VKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
       } 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)));
+        next__4VKH=((__POINTER *)result__AWKH)[ 0];
+        if ((next__4VKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AWKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CWKH <<  1)) <=  4096)) {
+            next__4VKH=(void *)((unsigned long)result__AWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CWKH)));
           } else {
-            next__VRKH=new_lab__QOJ(lab_type__YRKH);
+            next__4VKH=new_lab__ZPJ(lab_type__BWKH);
           };
-          ((__POINTER *)next__VRKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__WRKH)[ 0]=next__VRKH;
+          ((__POINTER *)next__4VKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5VKH)[ 0]=next__4VKH;
         } else {
-          ((__POINTER *)result__XRKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VRKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__XRKH=next__VRKH;
+          ((__POINTER *)result__AWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4VKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AWKH=next__4VKH;
         };
       };
-      ptr__3YB=result__XRKH;
+      ptr__3YB=result__AWKH;
     };
     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;
+  Self__PBS=((__FAST_ARRAYoSLOTo *)result__2YB);
+  if ((Self__PBS->parent_arrayed_collection__BAB.capacity__YBS <  1)) {
+    sz__T3EH=((__UINTEGER_32 )((__INTEGER )(sizeof(void *))));
+    result__S3EH=((__POINTER )(NULL));
+    a__Y3EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__U3EH=(__UINTEGER_32)((__UINTEGER_32)(sz__T3EH + a__Y3EH) & (__UINTEGER_32)(~ a__Y3EH));
+    new_size2__V3EH=(__UINTEGER_32)(new_size__U3EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__V3EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__FGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GGHH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__V3EH + a__FGHH) & (__UINTEGER_32)(~ a__FGHH));
+      ptr_table__EWKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DWKH=((__POINTER )(NULL));
+      result__FWKH=((__POINTER *)ptr_table__EWKH)[ 0];
+      if ((result__FWKH == (void *)NULL)) {
+        result__FWKH=new_lab__ZPJ(new_size__GGHH);
+        next__DWKH=(void *)((unsigned long)result__FWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGHH)));
+        ((__POINTER *)next__DWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EWKH)[ 0]=next__DWKH;
       } 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)));
+        next__DWKH=((__POINTER *)result__FWKH)[ 0];
+        if ((next__DWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FWKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GGHH <<  1)) <=  4096)) {
+            next__DWKH=(void *)((unsigned long)result__FWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GGHH)));
           } else {
-            next__0RKH=new_lab__QOJ(new_size__3BHH);
+            next__DWKH=new_lab__ZPJ(new_size__GGHH);
           };
-          ((__POINTER *)next__0RKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__1RKH)[ 0]=next__0RKH;
+          ((__POINTER *)next__DWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EWKH)[ 0]=next__DWKH;
         } else {
-          ((__POINTER *)result__2RKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0RKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__2RKH=next__0RKH;
+          ((__POINTER *)result__FWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FWKH=next__DWKH;
         };
       };
-      ((__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 *))))));
+      ((__POINTER *)result__FWKH)[ 0]=((__POINTER ) 3);
+      result__S3EH=(void *)((unsigned long)result__FWKH - (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;
+      result__IWKH=first_free__BCVB;
+      while ((((void *)result__IWKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__IWKH)->map_size_and_id__YTB &  4294967292LU) < new_size__U3EH))) {
+        result__IWKH=((__MEMORY *)result__IWKH)->map_next_free__ZTB;
       };
-      if (((void *)result__5RKH == (void *)NULL)) {
-        result__5RKH=new_page__B24();
+      if (((void *)result__IWKH == (void *)NULL)) {
+        result__IWKH=new_page__K34();
       };
-      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)));
+      to_busy__index__4SFC(result__IWKH,new_size__U3EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__IWKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+      result__S3EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__IWKH)) - (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);
+    Result__VJ1C=((void **)result__S3EH);
+    Self__MLWD= 0;
+    while ((Self__MLWD >=  0)) {
+      Result__VJ1C[Self__MLWD]=NULL;
+      Self__MLWD=(__INTEGER)(Self__MLWD -  1);
     };
-    Self__GAS->parent_arrayed_collection__BAB.capacity__PAS= 1;
+    Self__PBS->parent_arrayed_collection__BAB.capacity__YBS= 1;
   };
   create__with__CRB(TYPE_NULL__, 0);
-  fast_put__to__TXR(result__1OC,(&__string_3));
+  fast_put__to__2YR(result__1OC,(&__string_3));
   create__with__CRB(TYPE_VOID__, 0);
-  fast_put__to__TXR(result__1OC,(&__string_45));
+  fast_put__to__2YR(result__1OC,(&__string_45));
   create__with__CRB(TYPE_CONTEXT__, 1);
   result__42B=NULL;
   ptr__52B=((__POINTER )(NULL));
@@ -7025,143 +7025,143 @@ int main(int argc,char **argv)
     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;
+      a__MGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__NGHH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__MGHH) & (__UINTEGER_32)(~ a__MGHH));
+      ptr_table__MWKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NGHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LWKH=((__POINTER )(NULL));
+      result__NWKH=((__POINTER *)ptr_table__MWKH)[ 0];
+      if ((result__NWKH == (void *)NULL)) {
+        result__NWKH=new_lab__ZPJ(new_size__NGHH);
+        next__LWKH=(void *)((unsigned long)result__NWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGHH)));
+        ((__POINTER *)next__LWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MWKH)[ 0]=next__LWKH;
       } 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)));
+        next__LWKH=((__POINTER *)result__NWKH)[ 0];
+        if ((next__LWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NWKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NGHH <<  1)) <=  4096)) {
+            next__LWKH=(void *)((unsigned long)result__NWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGHH)));
           } else {
-            next__CSKH=new_lab__QOJ(new_size__ECHH);
+            next__LWKH=new_lab__ZPJ(new_size__NGHH);
           };
-          ((__POINTER *)next__CSKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DSKH)[ 0]=next__CSKH;
+          ((__POINTER *)next__LWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MWKH)[ 0]=next__LWKH;
         } else {
-          ((__POINTER *)result__ESKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ESKH=next__CSKH;
+          ((__POINTER *)result__NWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NWKH=next__LWKH;
         };
       };
-      ptr__52B=result__ESKH;
+      ptr__52B=result__NWKH;
     } 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;
+      t__RGHH=((__UINTEGER_32 )typ_id__E3B);
+      a__QGHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UWKH=(__UINTEGER_32)((__UINTEGER_32)(sz__B3B + a__QGHH) & (__UINTEGER_32)(~ a__QGHH));
+      ptr_table__RWKH=((__POINTER )(&(table_type[(t__RGHH)])));
+      lab_type__TWKH=(__UINTEGER_32)(t__RGHH |  1);
+      next__QWKH=((__POINTER )(NULL));
+      result__SWKH=((__POINTER *)ptr_table__RWKH)[ 0];
+      if ((result__SWKH == (void *)NULL)) {
+        result__SWKH=new_lab__ZPJ(lab_type__TWKH);
+        next__QWKH=(void *)((unsigned long)result__SWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UWKH)));
+        ((__POINTER *)next__QWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RWKH)[ 0]=next__QWKH;
       } 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)));
+        next__QWKH=((__POINTER *)result__SWKH)[ 0];
+        if ((next__QWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SWKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UWKH <<  1)) <=  4096)) {
+            next__QWKH=(void *)((unsigned long)result__SWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UWKH)));
           } else {
-            next__HSKH=new_lab__QOJ(lab_type__KSKH);
+            next__QWKH=new_lab__ZPJ(lab_type__TWKH);
           };
-          ((__POINTER *)next__HSKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__ISKH)[ 0]=next__HSKH;
+          ((__POINTER *)next__QWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RWKH)[ 0]=next__QWKH;
         } else {
-          ((__POINTER *)result__JSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__JSKH=next__HSKH;
+          ((__POINTER *)result__SWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SWKH=next__QWKH;
         };
       };
-      ptr__52B=result__JSKH;
+      ptr__52B=result__SWKH;
     };
     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__OES=((__FAST_ARRAYoTYPE_IDo *)result__42B);
+  if ((Self__OES->parent_arrayed_collection__ABB.capacity__Y1R <  3)) {
+    Self__OES->parent_arrayed_collection__ABB.storage__U2R=create__AWNB( 3);
+    Self__OES->parent_arrayed_collection__ABB.capacity__Y1R= 3;
   };
-  Self__FDS->parent_arrayed_collection__ABB.upper__N0R=(__INTEGER)(-  1);
+  Self__OES->parent_arrayed_collection__ABB.upper__W1R=(__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__;
+  result__QIIH=NULL;
+  ptr__RIIH=((__POINTER )(NULL));
+  typ_id__SIIH= 0;
+  sz__TIIH=((__UINTEGER_32 )sizeof(__TYPE_ID));
+  if ((sz__TIIH ==  0)) {
+    result__QIIH=TYPE_ID__;
   } else {
-    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);
+    typ_id__SIIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TIIH);
+    if ((typ_id__SIIH == (__INTEGER)(-  1))) {
+      a__UIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__VIIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TIIH + a__UIIH) & (__UINTEGER_32)(~ a__UIIH));
+      ptr_table__WWKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VIIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__VWKH=((__POINTER )(NULL));
+      result__XWKH=((__POINTER *)ptr_table__WWKH)[ 0];
+      if ((result__XWKH == (void *)NULL)) {
+        result__XWKH=new_lab__ZPJ(new_size__VIIH);
+        next__VWKH=(void *)((unsigned long)result__XWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIIH)));
+        ((__POINTER *)next__VWKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WWKH)[ 0]=next__VWKH;
+      } else {
+        next__VWKH=((__POINTER *)result__XWKH)[ 0];
+        if ((next__VWKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XWKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VIIH <<  1)) <=  4096)) {
+            next__VWKH=(void *)((unsigned long)result__XWKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VIIH)));
+          } else {
+            next__VWKH=new_lab__ZPJ(new_size__VIIH);
+          };
+          ((__POINTER *)next__VWKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__WWKH)[ 0]=next__VWKH;
+        } else {
+          ((__POINTER *)result__XWKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__XWKH=next__VWKH;
+        };
+      };
+      ptr__RIIH=result__XWKH;
+    } else {
+      t__WIIH=((__UINTEGER_32 )typ_id__SIIH);
+      a__XIIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4WKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TIIH + a__XIIH) & (__UINTEGER_32)(~ a__XIIH));
+      ptr_table__1WKH=((__POINTER )(&(table_type[(t__WIIH)])));
+      lab_type__3WKH=(__UINTEGER_32)(t__WIIH |  1);
+      next__0WKH=((__POINTER )(NULL));
+      result__2WKH=((__POINTER *)ptr_table__1WKH)[ 0];
+      if ((result__2WKH == (void *)NULL)) {
+        result__2WKH=new_lab__ZPJ(lab_type__3WKH);
+        next__0WKH=(void *)((unsigned long)result__2WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WKH)));
+        ((__POINTER *)next__0WKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1WKH)[ 0]=next__0WKH;
+      } else {
+        next__0WKH=((__POINTER *)result__2WKH)[ 0];
+        if ((next__0WKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2WKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4WKH <<  1)) <=  4096)) {
+            next__0WKH=(void *)((unsigned long)result__2WKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WKH)));
+          } else {
+            next__0WKH=new_lab__ZPJ(lab_type__3WKH);
+          };
+          ((__POINTER *)next__0WKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__1WKH)[ 0]=next__0WKH;
+        } else {
+          ((__POINTER *)result__2WKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0WKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__2WKH=next__0WKH;
+        };
+      };
+      ptr__RIIH=result__2WKH;
+    };
+    result__QIIH=((__TYPE_ID *)ptr__RIIH);
+    *(result__QIIH) = *(TYPE_ID__);
+  };
+  create__with__CRB(((__TYPE_ID *)result__QIIH), 0);
+  add_last__S1R(result__42B,result__QIIH);
   result__Q4B=NULL;
   ptr__R4B=((__POINTER )(NULL));
   typ_id__W4B= 0;
@@ -7172,67 +7172,67 @@ int main(int argc,char **argv)
     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;
+      a__VQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__VQFH) & (__UINTEGER_32)(~ a__VQFH));
+      ptr_table__AXKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__5WKH=((__POINTER )(NULL));
+      result__BXKH=((__POINTER *)ptr_table__AXKH)[ 0];
+      if ((result__BXKH == (void *)NULL)) {
+        result__BXKH=new_lab__ZPJ(new_size__WQFH);
+        next__5WKH=(void *)((unsigned long)result__BXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WQFH)));
+        ((__POINTER *)next__5WKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__AXKH)[ 0]=next__5WKH;
       } 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)));
+        next__5WKH=((__POINTER *)result__BXKH)[ 0];
+        if ((next__5WKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BXKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WQFH <<  1)) <=  4096)) {
+            next__5WKH=(void *)((unsigned long)result__BXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WQFH)));
           } else {
-            next__WSKH=new_lab__QOJ(new_size__NMFH);
+            next__5WKH=new_lab__ZPJ(new_size__WQFH);
           };
-          ((__POINTER *)next__WSKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__XSKH)[ 0]=next__WSKH;
+          ((__POINTER *)next__5WKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AXKH)[ 0]=next__5WKH;
         } else {
-          ((__POINTER *)result__YSKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WSKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__YSKH=next__WSKH;
+          ((__POINTER *)result__BXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5WKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__BXKH=next__5WKH;
         };
       };
-      ptr__R4B=result__YSKH;
+      ptr__R4B=result__BXKH;
     } 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;
+      t__0QFH=((__UINTEGER_32 )typ_id__W4B);
+      a__ZQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__IXKH=(__UINTEGER_32)((__UINTEGER_32)(sz__T4B + a__ZQFH) & (__UINTEGER_32)(~ a__ZQFH));
+      ptr_table__FXKH=((__POINTER )(&(table_type[(t__0QFH)])));
+      lab_type__HXKH=(__UINTEGER_32)(t__0QFH |  1);
+      next__EXKH=((__POINTER )(NULL));
+      result__GXKH=((__POINTER *)ptr_table__FXKH)[ 0];
+      if ((result__GXKH == (void *)NULL)) {
+        result__GXKH=new_lab__ZPJ(lab_type__HXKH);
+        next__EXKH=(void *)((unsigned long)result__GXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IXKH)));
+        ((__POINTER *)next__EXKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__FXKH)[ 0]=next__EXKH;
       } 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)));
+        next__EXKH=((__POINTER *)result__GXKH)[ 0];
+        if ((next__EXKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GXKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IXKH <<  1)) <=  4096)) {
+            next__EXKH=(void *)((unsigned long)result__GXKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IXKH)));
           } else {
-            next__1SKH=new_lab__QOJ(lab_type__4SKH);
+            next__EXKH=new_lab__ZPJ(lab_type__HXKH);
           };
-          ((__POINTER *)next__1SKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__2SKH)[ 0]=next__1SKH;
+          ((__POINTER *)next__EXKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__FXKH)[ 0]=next__EXKH;
         } else {
-          ((__POINTER *)result__3SKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1SKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__3SKH=next__1SKH;
+          ((__POINTER *)result__GXKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EXKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__GXKH=next__EXKH;
         };
       };
-      ptr__R4B=result__3SKH;
+      ptr__R4B=result__GXKH;
     };
     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);
+  add_last__S1R(list_id__CBB,result__Q4B);
   if (is_short_recursive__JB) {
     directory_list__YB=create__ZBB( 100);
     file_list__0B=create__ZBB( 100);
@@ -7242,16 +7242,16 @@ int main(int argc,char **argv)
     } else {
       parent_directory__1ED();
     };
-    ent__TB=get_entry__0XAC(__tmp__4B);
+    ent__TB=get_entry__GZAC(__tmp__4B);
     if (((void *)ent__TB == (void *)NULL)) {
       __tmp__JC=TRUE__;
     } else {
       if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-        Self__CHSD=((__DIRECTORY_UNIX *)ent__TB);
-        dir__EHSD=Self__CHSD;
-        __tmp__FC=((void *)Self__CHSD != (void *)NULL);
+        Self__2GSD=((__DIRECTORY_UNIX *)ent__TB);
+        dir__4GSD=Self__2GSD;
+        __tmp__FC=((void *)Self__2GSD != (void *)NULL);
       } else {
-        dir__MHSD=NULL;
+        dir__GHSD=NULL;
         __tmp__FC=FALSE__;
       };
       __tmp__JC=(! __tmp__FC);
@@ -7263,11 +7263,11 @@ int main(int argc,char **argv)
       exit(( 1));
     };
     if (((struct ___OBJ *)ent__TB)->__id==__DIRECTORY_UNIX__) {
-      __tmp__UC=open__PDRD(ent__TB);
+      __tmp__UC=open__FDRD(ent__TB);
     } else {
-      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);
+      Self__KHRD=((__FILE_UNIX *)ent__TB);
+      Self__KHRD->stream__QHRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__KHRD->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->storage__ZNO),"r+b")));
+      __tmp__UC=(Self__KHRD->stream__QHRD != (void *)NULL);
     };
     if ((! __tmp__UC)) {
       print__DID((&__string_169));
@@ -7288,1175 +7288,1175 @@ int main(int argc,char **argv)
       }
     };
     dir__SB=__tmp__AD;
-    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);
+    check_in__begin__0QQC(__tmp__AD,(__INTEGER)(((__STRING_CONSTANT *)((__DIRECTORY_UNIX *)__tmp__AD)->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD +  1));
+    Self__YIIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__2IIH= 0;
+    __tmp__4IIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+    Self__5IIH= 1;
+    while ((Self__5IIH <= __tmp__4IIH)) {
+      result__2IIH=(__INTEGER)((__INTEGER)( 5 * result__2IIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__ZNO)[(__INTEGER)(Self__5IIH -  1)])));
+      Self__5IIH=(__INTEGER)(Self__5IIH +  1);
+    };
+    if ((result__2IIH <  0)) {
+      result__2IIH=(__INTEGER)(~ result__2IIH);
+    };
+    node__0IIH=((void **)Self__YIIH->buckets__DAT)[(__INTEGER)(result__2IIH % Self__YIIH->capacity__45S)];
+    while ((! (((void *)node__0IIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0IIH)->key__PAT == (void *)(&__string_150))))) {
+      node__0IIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0IIH)->next__0AT;
+    };
+    if (((void *)node__0IIH != (void *)NULL)) {
+      Self__SGHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+      result__BJIH= 0;
+      __tmp__DJIH=((__STRING_CONSTANT *)(&__string_150))->count__DD;
+      Self__EJIH= 1;
+      while ((Self__EJIH <= __tmp__DJIH)) {
+        result__BJIH=(__INTEGER)((__INTEGER)( 5 * result__BJIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_150))->storage__ZNO)[(__INTEGER)(Self__EJIH -  1)])));
+        Self__EJIH=(__INTEGER)(Self__EJIH +  1);
+      };
+      if ((result__BJIH <  0)) {
+        result__BJIH=(__INTEGER)(~ result__BJIH);
+      };
+      node__UGHH=((void **)Self__SGHH->buckets__DAT)[(__INTEGER)(result__BJIH % Self__SGHH->capacity__45S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UGHH)->key__PAT != (void *)(&__string_150))) {
+        node__UGHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UGHH)->next__0AT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UGHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+      Self__ZO1G=((__STRING_CONSTANT *)txt__1);
+      new__0O1G=create__ZBB(Self__ZO1G->count__DD);
+      copy__35R(new__0O1G,Self__ZO1G);
+      save_file__with__3DC(add_ext__L5E((&__string_150)),new__0O1G);
+    };
+    Self__GJIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__KJIH= 0;
+    __tmp__MJIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+    Self__NJIH= 1;
+    while ((Self__NJIH <= __tmp__MJIH)) {
+      result__KJIH=(__INTEGER)((__INTEGER)( 5 * result__KJIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__ZNO)[(__INTEGER)(Self__NJIH -  1)])));
+      Self__NJIH=(__INTEGER)(Self__NJIH +  1);
+    };
+    if ((result__KJIH <  0)) {
+      result__KJIH=(__INTEGER)(~ result__KJIH);
+    };
+    node__IJIH=((void **)Self__GJIH->buckets__DAT)[(__INTEGER)(result__KJIH % Self__GJIH->capacity__45S)];
+    while ((! (((void *)node__IJIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IJIH)->key__PAT == (void *)(&__string_66))))) {
+      node__IJIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IJIH)->next__0AT;
+    };
+    if (((void *)node__IJIH != (void *)NULL)) {
+      Self__WGHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+      result__PJIH= 0;
+      __tmp__RJIH=((__STRING_CONSTANT *)(&__string_66))->count__DD;
+      Self__SJIH= 1;
+      while ((Self__SJIH <= __tmp__RJIH)) {
+        result__PJIH=(__INTEGER)((__INTEGER)( 5 * result__PJIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_66))->storage__ZNO)[(__INTEGER)(Self__SJIH -  1)])));
+        Self__SJIH=(__INTEGER)(Self__SJIH +  1);
+      };
+      if ((result__PJIH <  0)) {
+        result__PJIH=(__INTEGER)(~ result__PJIH);
+      };
+      node__YGHH=((void **)Self__WGHH->buckets__DAT)[(__INTEGER)(result__PJIH % Self__WGHH->capacity__45S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YGHH)->key__PAT != (void *)(&__string_66))) {
+        node__YGHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YGHH)->next__0AT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YGHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+      Self__1O1G=((__STRING_CONSTANT *)txt__1);
+      new__2O1G=create__ZBB(Self__1O1G->count__DD);
+      copy__35R(new__2O1G,Self__1O1G);
+      save_file__with__3DC(add_ext__L5E((&__string_66)),new__2O1G);
+    };
+    Self__UJIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__YJIH= 0;
+    __tmp__0JIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+    Self__1JIH= 1;
+    while ((Self__1JIH <= __tmp__0JIH)) {
+      result__YJIH=(__INTEGER)((__INTEGER)( 5 * result__YJIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__ZNO)[(__INTEGER)(Self__1JIH -  1)])));
+      Self__1JIH=(__INTEGER)(Self__1JIH +  1);
+    };
+    if ((result__YJIH <  0)) {
+      result__YJIH=(__INTEGER)(~ result__YJIH);
+    };
+    node__WJIH=((void **)Self__UJIH->buckets__DAT)[(__INTEGER)(result__YJIH % Self__UJIH->capacity__45S)];
+    while ((! (((void *)node__WJIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WJIH)->key__PAT == (void *)(&__string_151))))) {
+      node__WJIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WJIH)->next__0AT;
+    };
+    if (((void *)node__WJIH != (void *)NULL)) {
+      Self__0GHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+      result__3JIH= 0;
+      __tmp__5JIH=((__STRING_CONSTANT *)(&__string_151))->count__DD;
+      Self__AKIH= 1;
+      while ((Self__AKIH <= __tmp__5JIH)) {
+        result__3JIH=(__INTEGER)((__INTEGER)( 5 * result__3JIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_151))->storage__ZNO)[(__INTEGER)(Self__AKIH -  1)])));
+        Self__AKIH=(__INTEGER)(Self__AKIH +  1);
+      };
+      if ((result__3JIH <  0)) {
+        result__3JIH=(__INTEGER)(~ result__3JIH);
+      };
+      node__2GHH=((void **)Self__0GHH->buckets__DAT)[(__INTEGER)(result__3JIH % Self__0GHH->capacity__45S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2GHH)->key__PAT != (void *)(&__string_151))) {
+        node__2GHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2GHH)->next__0AT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2GHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+      Self__G4EH=((__STRING *)directory_list__YB);
+      i__H4EH=Self__G4EH->count__EGC;
+      j__J4EH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__UUZ(Self__G4EH,(__INTEGER)(i__H4EH + j__J4EH));
+      if (((i__H4EH >  0) && (j__J4EH >  0))) {
+        move__to__by__MVCC(Self__G4EH->storage__F5R, 0,(__INTEGER)(i__H4EH -  1),j__J4EH);
+      };
+      Self__AHHH=((__CHARACTER *)Self__G4EH->storage__F5R);
+      model__BHHH=((__STRING_CONSTANT *)txt__1)->storage__ZNO;
+      Self__5GHH=(__INTEGER)(j__J4EH -  1);
+      while ((Self__5GHH >=  0)) {
+        Self__AHHH[Self__5GHH]=((__CHARACTER *)model__BHHH)[Self__5GHH];
+        Self__5GHH=(__INTEGER)(Self__5GHH -  1);
+      };
+    };
+    Self__HUVB=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__CKIH= 0;
+    __tmp__EKIH=((__STRING_CONSTANT *)(&__string_153))->count__DD;
+    Self__FKIH= 1;
+    while ((Self__FKIH <= __tmp__EKIH)) {
+      result__CKIH=(__INTEGER)((__INTEGER)( 5 * result__CKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_153))->storage__ZNO)[(__INTEGER)(Self__FKIH -  1)])));
+      Self__FKIH=(__INTEGER)(Self__FKIH +  1);
+    };
+    if ((result__CKIH <  0)) {
+      result__CKIH=(__INTEGER)(~ result__CKIH);
+    };
+    node__RUVB=((void **)Self__HUVB->buckets__DAT)[(__INTEGER)(result__CKIH % Self__HUVB->capacity__45S)];
+    while ((! (((void *)node__RUVB == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RUVB)->key__PAT,(&__string_153))))) {
+      node__RUVB=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__RUVB)->next__0AT;
+    };
+    if (((void *)node__RUVB != (void *)NULL)) {
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)at__MI4(result__CMH,(&__string_153)))->first_link__PTEC)->item__HXHD;
+      append__FLS(directory_list__YB,txt__1);
+    };
+    save_file__with__3DC(add_ext__L5E((&__string_172)),directory_list__YB);
+    Self__HKIH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__LKIH= 0;
+    __tmp__NKIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+    Self__OKIH= 1;
+    while ((Self__OKIH <= __tmp__NKIH)) {
+      result__LKIH=(__INTEGER)((__INTEGER)( 5 * result__LKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__ZNO)[(__INTEGER)(Self__OKIH -  1)])));
+      Self__OKIH=(__INTEGER)(Self__OKIH +  1);
+    };
+    if ((result__LKIH <  0)) {
+      result__LKIH=(__INTEGER)(~ result__LKIH);
+    };
+    node__JKIH=((void **)Self__HKIH->buckets__DAT)[(__INTEGER)(result__LKIH % Self__HKIH->capacity__45S)];
+    while ((! (((void *)node__JKIH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JKIH)->key__PAT == (void *)(&__string_154))))) {
+      node__JKIH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__JKIH)->next__0AT;
+    };
+    if (((void *)node__JKIH != (void *)NULL)) {
+      Self__GHHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+      result__QKIH= 0;
+      __tmp__SKIH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__TKIH= 1;
+      while ((Self__TKIH <= __tmp__SKIH)) {
+        result__QKIH=(__INTEGER)((__INTEGER)( 5 * result__QKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__ZNO)[(__INTEGER)(Self__TKIH -  1)])));
+        Self__TKIH=(__INTEGER)(Self__TKIH +  1);
+      };
+      if ((result__QKIH <  0)) {
+        result__QKIH=(__INTEGER)(~ result__QKIH);
+      };
+      node__IHHH=((void **)Self__GHHH->buckets__DAT)[(__INTEGER)(result__QKIH % Self__GHHH->capacity__45S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IHHH)->key__PAT != (void *)(&__string_154))) {
+        node__IHHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IHHH)->next__0AT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__IHHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+      Self__S4EH=((__STRING *)file_list__0B);
+      i__T4EH=Self__S4EH->count__EGC;
+      j__V4EH=((__STRING_CONSTANT *)txt__1)->count__DD;
+      resize__UUZ(Self__S4EH,(__INTEGER)(i__T4EH + j__V4EH));
+      if (((i__T4EH >  0) && (j__V4EH >  0))) {
+        move__to__by__MVCC(Self__S4EH->storage__F5R, 0,(__INTEGER)(i__T4EH -  1),j__V4EH);
+      };
+      Self__MHHH=((__CHARACTER *)Self__S4EH->storage__F5R);
+      model__NHHH=((__STRING_CONSTANT *)txt__1)->storage__ZNO;
+      Self__LHHH=(__INTEGER)(j__V4EH -  1);
+      while ((Self__LHHH >=  0)) {
+        Self__MHHH[Self__LHHH]=((__CHARACTER *)model__NHHH)[Self__LHHH];
+        Self__LHHH=(__INTEGER)(Self__LHHH -  1);
+      };
+    };
+    Self__R5S=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+    result__VKIH= 0;
+    __tmp__XKIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+    Self__YKIH= 1;
+    while ((Self__YKIH <= __tmp__XKIH)) {
+      result__VKIH=(__INTEGER)((__INTEGER)( 5 * result__VKIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__ZNO)[(__INTEGER)(Self__YKIH -  1)])));
+      Self__YKIH=(__INTEGER)(Self__YKIH +  1);
+    };
+    if ((result__VKIH <  0)) {
+      result__VKIH=(__INTEGER)(~ result__VKIH);
+    };
+    node__25S=((void **)Self__R5S->buckets__DAT)[(__INTEGER)(result__VKIH % Self__R5S->capacity__45S)];
+    while ((! (((void *)node__25S == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__25S)->key__PAT == (void *)(&__string_156))))) {
+      node__25S=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__25S)->next__0AT;
+    };
+    if (((void *)node__25S != (void *)NULL)) {
+      Self__SHHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)result__CMH);
+      result__0KIH= 0;
+      __tmp__2KIH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__3KIH= 1;
+      while ((Self__3KIH <= __tmp__2KIH)) {
+        result__0KIH=(__INTEGER)((__INTEGER)( 5 * result__0KIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__ZNO)[(__INTEGER)(Self__3KIH -  1)])));
+        Self__3KIH=(__INTEGER)(Self__3KIH +  1);
+      };
+      if ((result__0KIH <  0)) {
+        result__0KIH=(__INTEGER)(~ result__0KIH);
+      };
+      node__UHHH=((void **)Self__SHHH->buckets__DAT)[(__INTEGER)(result__0KIH % Self__SHHH->capacity__45S)];
+      while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UHHH)->key__PAT != (void *)(&__string_156))) {
+        node__UHHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UHHH)->next__0AT;
+      };
+      txt__1=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__UHHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+      append__FLS(file_list__0B,txt__1);
+    };
+    save_file__with__3DC(add_ext__L5E((&__string_173)),file_list__0B);
   } else {
-    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));
+    Self__MXKH=((__STRING_CONSTANT *)input_name__3B);
+    result__JXKH=FALSE__;
+    i1__KXKH= 0;
+    i2__LXKH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__MXKH->count__DD)) {
+      i1__KXKH=(__INTEGER)((__INTEGER)(Self__MXKH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+      i2__LXKH= 1;
+      while ((! (((i1__KXKH > Self__MXKH->count__DD) || (i2__LXKH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__MXKH->storage__ZNO)[(__INTEGER)(i1__KXKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__ZNO)[(__INTEGER)(i2__LXKH -  1)])))) {
+        i1__KXKH=(__INTEGER)(i1__KXKH +  1);
+        i2__LXKH=(__INTEGER)(i2__LXKH +  1);
+      };
+      result__JXKH=(i1__KXKH > Self__MXKH->count__DD);
+    };
+    if ((! result__JXKH)) {
+      copy__35R(string_tmp__VH,input_name__3B);
+      append__FLS(string_tmp__VH,(&__string_159));
       input_name__3B=get__YWB(string_tmp__VH);
     };
     __tmp__2H=input_name__3B;
-    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]='/';
+    copy__35R(string_tmp__VH,input_name__3B);
+    Self__5KIH=((__STRING *)string_tmp__VH);
+    __tmp__ALIH=Self__5KIH->storage__F5R;
+    __tmp__BLIH=(__INTEGER)(Self__5KIH->count__EGC -  1);
+    Self__CLIH=((__CHARACTER *)__tmp__ALIH);
+    Self__DLIH=__tmp__BLIH;
+    while ((Self__DLIH >=  0)) {
+      if (('\\' == Self__CLIH[Self__DLIH])) {
+        Self__CLIH[Self__DLIH]='/';
       };
-      Self__0GIH=(__INTEGER)(Self__0GIH -  1);
+      Self__DLIH=(__INTEGER)(Self__DLIH -  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);
+    result__ILIH=((__STRING *)string_tmp__VH)->count__EGC;
+    while ((! ((result__ILIH <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__F5R)[(__INTEGER)(result__ILIH -  1)] == '/')))) {
+      result__ILIH=(__INTEGER)(result__ILIH -  1);
     };
-    if ((result__5GIH >=  1)) {
-      Self__NDHH=((__STRING *)string_tmp__VH);
-      if ((result__5GIH > Self__NDHH->count__EGC)) {
-        Self__NDHH->count__EGC= 0;
+    if ((result__ILIH >=  1)) {
+      Self__WHHH=((__STRING *)string_tmp__VH);
+      if ((result__ILIH > Self__WHHH->count__EGC)) {
+        Self__WHHH->count__EGC= 0;
       } else {
-        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);
+        if ((result__ILIH >  0)) {
+          len__NLIH=(__INTEGER)((__INTEGER)(result__ILIH -  1) +  1);
+          if ((len__NLIH >  0)) {
+            __tmp__OLIH=(__INTEGER)(result__ILIH +  1);
+            __tmp__QLIH=Self__WHHH->count__EGC;
+            Self__RLIH=__tmp__OLIH;
+            while ((Self__RLIH <= __tmp__QLIH)) {
+              ((__CHARACTER *)Self__WHHH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__RLIH - len__NLIH) -  1)]=((__CHARACTER *)Self__WHHH->storage__F5R)[(__INTEGER)(Self__RLIH -  1)];
+              Self__RLIH=(__INTEGER)(Self__RLIH +  1);
             };
-            Self__NDHH->count__EGC=(__INTEGER)(Self__NDHH->count__EGC - len__EHIH);
+            Self__WHHH->count__EGC=(__INTEGER)(Self__WHHH->count__EGC - len__NLIH);
           };
         };
       };
     };
     result__ETC=((__STRING *)string_tmp__VH)->count__EGC;
-    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__23R)[(__INTEGER)(result__ETC -  1)] == '.')))) {
+    while ((! ((result__ETC <  1) || (((__CHARACTER *)((__STRING *)string_tmp__VH)->storage__F5R)[(__INTEGER)(result__ETC -  1)] == '.')))) {
       result__ETC=(__INTEGER)(result__ETC -  1);
     };
-    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;
+    Self__YHHH=((__STRING *)string_tmp__VH);
+    n__ZHHH=(__INTEGER)((__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC - result__ETC) +  1);
+    if ((n__ZHHH > Self__YHHH->count__EGC)) {
+      Self__YHHH->count__EGC= 0;
     } else {
-      Self__PDHH->count__EGC=(__INTEGER)(Self__PDHH->count__EGC - n__QDHH);
+      Self__YHHH->count__EGC=(__INTEGER)(Self__YHHH->count__EGC - n__ZHHH);
     };
-    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;
+    Self__OXKH=((__STRING *)string_tmp__VH);
+    Self__PXKH=Self__OXKH->count__EGC;
+    while ((Self__PXKH >=  1)) {
+      Self__QXKH=((__CHARACTER *)Self__OXKH->storage__F5R)[(__INTEGER)(Self__PXKH -  1)];
+      result__RXKH='\0';
+      if (((((__INTEGER_8 )Self__QXKH) <  97) || (((__INTEGER_8 )Self__QXKH) >  122))) {
+        result__RXKH=Self__QXKH;
       } else {
-        result__ITKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__HTKH) -  32))));
+        result__RXKH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__QXKH) -  32))));
       };
-      ((__CHARACTER *)Self__FTKH->storage__23R)[(__INTEGER)(Self__GTKH -  1)]=result__ITKH;
-      Self__GTKH=(__INTEGER)(Self__GTKH -  1);
+      ((__CHARACTER *)Self__OXKH->storage__F5R)[(__INTEGER)(Self__PXKH -  1)]=result__RXKH;
+      Self__PXKH=(__INTEGER)(Self__PXKH -  1);
     };
     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__C4E(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
+      output_name__DI=add_ext__L5E(((__PROTOTYPE *)proto_input__BI)->parent_named__5.name__LI);
     };
     save_file__with__3DC(output_name__DI,output_code__SI);
   };
   if (is_shorter2__VI) {
-    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];
+    Self__40QC= 0;
+    limit_up__50QC=result__RLJ->parent_arrayed_collection__AJ.upper__HJ;
+    while ((Self__40QC <= limit_up__50QC)) {
+      p__AB=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[Self__40QC];
       ((__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) {
+      Self__CITD=((__PROTOTYPE *)p__AB);
+      title__EITD=NULL;
+      s__FITD=NULL;
+      put__to__like__C0XD(Self__CITD->parent_named__5.name__LI,output_code__SI,(&__string_140));
+      if (((void *)Self__CITD->comment_slot__QRTC != (void *)NULL)) {
+        put__to__like__C0XD(Self__CITD->comment_slot__QRTC,output_code__SI,(&__string_138));
+      };
+      if (((void *)Self__CITD->comment_header__I4QC != (void *)NULL)) {
+        put__to__like__C0XD(Self__CITD->comment_header__I4QC,output_code__SI,(&__string_139));
+      };
+      ((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD=(__INTEGER)(-  1);
+      shorter_get_all_slot_in__E2XD(Self__CITD,list_tmp__DJTD);
+      s__NCYD=NULL;
+      is_first_cur__MCYD=TRUE__;
+      __tmp__RCYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__NC5D= 0;
+      while ((Self__NC5D <= __tmp__RCYD)) {
+        s__NCYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__NC5D];
+        if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+          __tmp__MJTD=((__ITM_SLOT *)s__NCYD)->id_section__F2C;
+        } else {
+          __tmp__MJTD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.id_section__F2C;
+        };
+        Self__XC2G=((__SECTION_ *)__tmp__MJTD);
+        if ((((void *)Self__XC2G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__XC2G->name__NYDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+            __tmp__4CYD=((__ITM_SLOT *)s__NCYD)->stat_shorter__JKTD;
+          } else {
+            __tmp__4CYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+          };
+          __tmp__BDYD=(__tmp__4CYD ==  0);
+        } else {
+          __tmp__BDYD=FALSE__;
+        };
+        if (__tmp__BDYD) {
+          if (is_first_cur__MCYD) {
             if (((void *)(&__string_174) == (void *)NULL)) {
-              put__to__like__Q0XD((&__string_175),output_code__SI,(&__string_141));
+              put__to__like__C0XD((&__string_175),output_code__SI,(&__string_141));
             } else {
-              put__to__like__Q0XD((&__string_174),output_code__SI,(&__string_141));
+              put__to__like__C0XD((&__string_174),output_code__SI,(&__string_141));
             };
-            is_first_cur__0CYD=FALSE__;
+            is_first_cur__MCYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__1CYD)->stat_shorter__XKTD= 1;
+          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__NCYD)->stat_shorter__JKTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 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);
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ER4F(s__NCYD,string_tmp2__O4I);
           } else {
-            pretty_name_in__OO4F(s__1CYD,string_tmp2__F3I);
+            pretty_name_in__ZS4F(s__NCYD,string_tmp2__O4I);
           };
-          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;
+          put__to__like__C0XD(string_tmp2__O4I,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+            __tmp__GEYD=((__ITM_SLOT *)s__NCYD)->id_section__F2C;
           } else {
-            __tmp__UEYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.id_section__F2C;
+            __tmp__GEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.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;
+          Self__YC2G=((__SECTION_ *)__tmp__GEYD);
+          if ((((void *)Self__YC2G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__YC2G->name__NYDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+              __tmp__NEYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.style__FBU;
             } else {
-              __tmp__1EYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
+              __tmp__NEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
             };
-            if ((__tmp__1EYD != '+')) {
-              __tmp__RFYD=TRUE__;
+            if ((__tmp__NEYD != '+')) {
+              __tmp__DFYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
-                __tmp__CFYD=((__ITM_SLOT *)s__1CYD)->result_type__N2FC;
+              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+                __tmp__UEYD=((__ITM_SLOT *)s__NCYD)->result_type__B4FC;
               } else {
-                __tmp__CFYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.result_type__N2FC;
+                __tmp__UEYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.result_type__B4FC;
               };
-              if (__tmp__CFYD==NULL) {
-                __tmp__EFYD=NULL;
+              if (__tmp__UEYD==NULL) {
+                __tmp__WEYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__CFYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__UEYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__EFYD=((void *)__tmp__CFYD);
+                  __tmp__WEYD=((void *)__tmp__UEYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__EFYD=((void *)__tmp__CFYD);
+                  __tmp__WEYD=((void *)__tmp__UEYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__EFYD=NULL;
+                  __tmp__WEYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__EFYD=NULL;
+                  __tmp__WEYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__EFYD=((void *)__tmp__CFYD);
+                  __tmp__WEYD=((void *)__tmp__UEYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__EFYD=((void *)__tmp__CFYD);
+                  __tmp__WEYD=((void *)__tmp__UEYD);
                 } break;
                 }
               };
-              ts__BFYD=__tmp__EFYD;
-              if (((void *)__tmp__EFYD == (void *)NULL)) {
-                __tmp__OFYD=TRUE__;
+              ts__TEYD=__tmp__WEYD;
+              if (((void *)__tmp__WEYD == (void *)NULL)) {
+                __tmp__AFYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__EFYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__WEYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__KFYD=NULL;
+                  __tmp__2EYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__KFYD=NULL;
+                  __tmp__2EYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__KFYD=((__ITM_TYPE_GENERIC *)__tmp__EFYD)->parent_itm_type_style__3NN.style__OUP;
+                  __tmp__2EYD=((__ITM_TYPE_GENERIC *)__tmp__WEYD)->parent_itm_type_style__GPN.style__XVP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__KFYD=((__ITM_TYPE_STYLE *)__tmp__EFYD)->style__OUP;
+                  __tmp__2EYD=((__ITM_TYPE_STYLE *)__tmp__WEYD)->style__XVP;
                 } break;
                 };
-                __tmp__OFYD=((void *)__tmp__KFYD != (void *)(&__string_9));
+                __tmp__AFYD=((void *)__tmp__2EYD != (void *)(&__string_9));
               };
-              __tmp__RFYD=__tmp__OFYD;
+              __tmp__DFYD=__tmp__AFYD;
             };
-            if (__tmp__RFYD) {
-              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
-                __tmp__XFYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.name__LI;
+            if (__tmp__DFYD) {
+              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+                __tmp__JFYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__JFYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+              };
+              Self__WXKH=((__STRING_CONSTANT *)__tmp__JFYD);
+              result__TXKH=FALSE__;
+              i__UXKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__WXKH->count__DD)) {
+                i__UXKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__UXKH ==  0) || (((__CHARACTER *)Self__WXKH->storage__ZNO)[(__INTEGER)(i__UXKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__ZNO)[(__INTEGER)(i__UXKH -  1)])))) {
+                  i__UXKH=(__INTEGER)(i__UXKH -  1);
                 };
-                result__KTKH=(i__LTKH ==  0);
+                result__TXKH=(i__UXKH ==  0);
               };
-              __tmp__FGYD=(! result__KTKH);
+              __tmp__XFYD=(! result__TXKH);
             } else {
-              __tmp__FGYD=FALSE__;
+              __tmp__XFYD=FALSE__;
             };
-            if (__tmp__FGYD) {
-              if (((struct ___OBJ *)s__1CYD)->__id==__ITM_SLOT__) {
-                __tmp__AGYD=((__ITM_SLOT *)s__1CYD)->parent_named__15.name__LI;
+            if (__tmp__XFYD) {
+              if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+                __tmp__SFYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__SFYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+              };
+              Self__1XKH=((__STRING_CONSTANT *)__tmp__SFYD);
+              result__YXKH=FALSE__;
+              i__ZXKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__1XKH->count__DD)) {
+                i__ZXKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__ZXKH ==  0) || (((__CHARACTER *)Self__1XKH->storage__ZNO)[(__INTEGER)(i__ZXKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__ZNO)[(__INTEGER)(i__ZXKH -  1)])))) {
+                  i__ZXKH=(__INTEGER)(i__ZXKH -  1);
                 };
-                result__PTKH=(i__QTKH ==  0);
+                result__YXKH=(i__ZXKH ==  0);
               };
-              __tmp__GGYD=(! result__PTKH);
+              __tmp__YFYD=(! result__YXKH);
             } else {
-              __tmp__GGYD=FALSE__;
+              __tmp__YFYD=FALSE__;
             };
-            __tmp__JGYD=__tmp__GGYD;
+            __tmp__1FYD=__tmp__YFYD;
           } else {
-            __tmp__JGYD=FALSE__;
+            __tmp__1FYD=FALSE__;
           };
-          if (__tmp__JGYD) {
-            put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__1FYD) {
+            put__to__like__C0XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__NCYD)->__id==__ITM_SLOT__) {
+            __tmp__HGYD=((__ITM_SLOT *)s__NCYD)->parent_named__15.name__LI;
           } else {
-            __tmp__VGYD=((__ITM_SLOT_OPERATOR *)s__1CYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__HGYD=((__ITM_SLOT_OPERATOR *)s__NCYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__VGYD,string_tmp2__F3I);
+          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__HGYD,string_tmp2__O4I);
           ((__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));
+          shorter_comment__in__light__HJ4E(string_tmp2__O4I,string_tmp3__0SD,TRUE__);
+          put__to__like__C0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_142));
         };
-        Self__ZB5D=(__INTEGER)(Self__ZB5D +  1);
+        Self__NC5D=(__INTEGER)(Self__NC5D +  1);
       };
-      if ((! is_first_cur__0CYD)) {
-        put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
+      if ((! is_first_cur__MCYD)) {
+        put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
       };
-      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;
+      s__GHYD=NULL;
+      is_first_cur__FHYD=TRUE__;
+      __tmp__KHYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__5C5D= 0;
+      while ((Self__5C5D <= __tmp__KHYD)) {
+        s__GHYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__5C5D];
+        if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+          __tmp__WJTD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
         } else {
-          __tmp__EKTD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+          __tmp__WJTD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
         };
-        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);
+        Self__AYKH=((__STRING_CONSTANT *)__tmp__WJTD);
+        result__3XKH=FALSE__;
+        i__4XKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__AYKH->count__DD)) {
+          i__4XKH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__4XKH ==  0) || (((__CHARACTER *)Self__AYKH->storage__ZNO)[(__INTEGER)(i__4XKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__ZNO)[(__INTEGER)(i__4XKH -  1)])))) {
+            i__4XKH=(__INTEGER)(i__4XKH -  1);
           };
-          result__UTKH=(i__VTKH ==  0);
+          result__3XKH=(i__4XKH ==  0);
         };
-        if (result__UTKH) {
-          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
-            __tmp__FIYD=((__ITM_SLOT *)s__UHYD)->stat_shorter__XKTD;
+        if (result__3XKH) {
+          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+            __tmp__XHYD=((__ITM_SLOT *)s__GHYD)->stat_shorter__JKTD;
           } else {
-            __tmp__FIYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+            __tmp__XHYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
           };
-          __tmp__IIYD=(__tmp__FIYD ==  0);
+          __tmp__0HYD=(__tmp__XHYD ==  0);
         } else {
-          __tmp__IIYD=FALSE__;
+          __tmp__0HYD=FALSE__;
         };
-        if (__tmp__IIYD) {
-          if (is_first_cur__THYD) {
+        if (__tmp__0HYD) {
+          if (is_first_cur__FHYD) {
             if (((void *)(&__string_180) == (void *)NULL)) {
-              put__to__like__Q0XD((&__string_175),output_code__SI,(&__string_141));
+              put__to__like__C0XD((&__string_175),output_code__SI,(&__string_141));
             } else {
-              put__to__like__Q0XD((&__string_180),output_code__SI,(&__string_141));
+              put__to__like__C0XD((&__string_180),output_code__SI,(&__string_141));
             };
-            is_first_cur__THYD=FALSE__;
+            is_first_cur__FHYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__UHYD)->stat_shorter__XKTD= 1;
+          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__GHYD)->stat_shorter__JKTD= 1;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
+            ((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 1;
           };
           ((__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);
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ER4F(s__GHYD,string_tmp2__O4I);
           } else {
-            pretty_name_in__OO4F(s__UHYD,string_tmp2__F3I);
+            pretty_name_in__ZS4F(s__GHYD,string_tmp2__O4I);
           };
-          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;
+          put__to__like__C0XD(string_tmp2__O4I,string_tmp__VH,(&__string_143));
+          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+            __tmp__5IYD=((__ITM_SLOT *)s__GHYD)->id_section__F2C;
           } else {
-            __tmp__NJYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.id_section__F2C;
+            __tmp__5IYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.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;
+          Self__ZC2G=((__SECTION_ *)__tmp__5IYD);
+          if ((((void *)Self__ZC2G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__ZC2G->name__NYDC == (void *)(&__string_24)))) {
+            if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+              __tmp__GJYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.style__FBU;
             } else {
-              __tmp__UJYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
+              __tmp__GJYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
             };
-            if ((__tmp__UJYD != '+')) {
-              __tmp__KKYD=TRUE__;
+            if ((__tmp__GJYD != '+')) {
+              __tmp__2JYD=TRUE__;
             } else {
-              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
-                __tmp__1JYD=((__ITM_SLOT *)s__UHYD)->result_type__N2FC;
+              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+                __tmp__NJYD=((__ITM_SLOT *)s__GHYD)->result_type__B4FC;
               } else {
-                __tmp__1JYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.result_type__N2FC;
+                __tmp__NJYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.result_type__B4FC;
               };
-              if (__tmp__1JYD==NULL) {
-                __tmp__3JYD=NULL;
+              if (__tmp__NJYD==NULL) {
+                __tmp__PJYD=NULL;
               } else {
-                switch (((struct ___OBJ *)__tmp__1JYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__NJYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__3JYD=((void *)__tmp__1JYD);
+                  __tmp__PJYD=((void *)__tmp__NJYD);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__3JYD=((void *)__tmp__1JYD);
+                  __tmp__PJYD=((void *)__tmp__NJYD);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__3JYD=NULL;
+                  __tmp__PJYD=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__3JYD=NULL;
+                  __tmp__PJYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__3JYD=((void *)__tmp__1JYD);
+                  __tmp__PJYD=((void *)__tmp__NJYD);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__3JYD=((void *)__tmp__1JYD);
+                  __tmp__PJYD=((void *)__tmp__NJYD);
                 } break;
                 }
               };
-              ts__0JYD=__tmp__3JYD;
-              if (((void *)__tmp__3JYD == (void *)NULL)) {
-                __tmp__HKYD=TRUE__;
+              ts__MJYD=__tmp__PJYD;
+              if (((void *)__tmp__PJYD == (void *)NULL)) {
+                __tmp__ZJYD=TRUE__;
               } else {
-                switch (((struct ___OBJ *)__tmp__3JYD)->__id) {
+                switch (((struct ___OBJ *)__tmp__PJYD)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__DKYD=NULL;
+                  __tmp__VJYD=NULL;
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__DKYD=NULL;
+                  __tmp__VJYD=NULL;
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__DKYD=((__ITM_TYPE_GENERIC *)__tmp__3JYD)->parent_itm_type_style__3NN.style__OUP;
+                  __tmp__VJYD=((__ITM_TYPE_GENERIC *)__tmp__PJYD)->parent_itm_type_style__GPN.style__XVP;
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__DKYD=((__ITM_TYPE_STYLE *)__tmp__3JYD)->style__OUP;
+                  __tmp__VJYD=((__ITM_TYPE_STYLE *)__tmp__PJYD)->style__XVP;
                 } break;
                 };
-                __tmp__HKYD=((void *)__tmp__DKYD != (void *)(&__string_9));
+                __tmp__ZJYD=((void *)__tmp__VJYD != (void *)(&__string_9));
               };
-              __tmp__KKYD=__tmp__HKYD;
+              __tmp__2JYD=__tmp__ZJYD;
             };
-            if (__tmp__KKYD) {
-              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
-                __tmp__QKYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
+            if (__tmp__2JYD) {
+              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+                __tmp__CKYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__CKYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+              };
+              Self__FYKH=((__STRING_CONSTANT *)__tmp__CKYD);
+              result__CYKH=FALSE__;
+              i__DYKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__FYKH->count__DD)) {
+                i__DYKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                while ((! ((i__DYKH ==  0) || (((__CHARACTER *)Self__FYKH->storage__ZNO)[(__INTEGER)(i__DYKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__ZNO)[(__INTEGER)(i__DYKH -  1)])))) {
+                  i__DYKH=(__INTEGER)(i__DYKH -  1);
                 };
-                result__ZTKH=(i__0TKH ==  0);
+                result__CYKH=(i__DYKH ==  0);
               };
-              __tmp__4KYD=(! result__ZTKH);
+              __tmp__QKYD=(! result__CYKH);
             } else {
-              __tmp__4KYD=FALSE__;
+              __tmp__QKYD=FALSE__;
             };
-            if (__tmp__4KYD) {
-              if (((struct ___OBJ *)s__UHYD)->__id==__ITM_SLOT__) {
-                __tmp__ZKYD=((__ITM_SLOT *)s__UHYD)->parent_named__15.name__LI;
+            if (__tmp__QKYD) {
+              if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+                __tmp__LKYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
               } else {
-                __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);
+                __tmp__LKYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
+              };
+              Self__KYKH=((__STRING_CONSTANT *)__tmp__LKYD);
+              result__HYKH=FALSE__;
+              i__IYKH= 0;
+              if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__KYKH->count__DD)) {
+                i__IYKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                while ((! ((i__IYKH ==  0) || (((__CHARACTER *)Self__KYKH->storage__ZNO)[(__INTEGER)(i__IYKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__ZNO)[(__INTEGER)(i__IYKH -  1)])))) {
+                  i__IYKH=(__INTEGER)(i__IYKH -  1);
                 };
-                result__4TKH=(i__5TKH ==  0);
+                result__HYKH=(i__IYKH ==  0);
               };
-              __tmp__5KYD=(! result__4TKH);
+              __tmp__RKYD=(! result__HYKH);
             } else {
-              __tmp__5KYD=FALSE__;
+              __tmp__RKYD=FALSE__;
             };
-            __tmp__CLYD=__tmp__5KYD;
+            __tmp__UKYD=__tmp__RKYD;
           } else {
-            __tmp__CLYD=FALSE__;
+            __tmp__UKYD=FALSE__;
           };
-          if (__tmp__CLYD) {
-            put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
+          if (__tmp__UKYD) {
+            put__to__like__C0XD((&__string_178),string_tmp__VH,(&__string_135));
           };
-          ((__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;
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__GHYD)->__id==__ITM_SLOT__) {
+            __tmp__ALYD=((__ITM_SLOT *)s__GHYD)->parent_named__15.name__LI;
           } else {
-            __tmp__OLYD=((__ITM_SLOT_OPERATOR *)s__UHYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__ALYD=((__ITM_SLOT_OPERATOR *)s__GHYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          get_all_comment_slot__in__ID4E(Self__QITD,__tmp__OLYD,string_tmp2__F3I);
+          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__ALYD,string_tmp2__O4I);
           ((__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__LC5D=(__INTEGER)(Self__LC5D +  1);
-      };
-      if ((! is_first_cur__THYD)) {
-        put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
-      };
-      __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__YKTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
-        };
-        if ((__tmp__YKTD ==  0)) {
-          if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
-            __tmp__4KTD=((__ITM_SLOT *)s__TITD)->comment_chapter__5YHC;
-          } else {
-            __tmp__4KTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.comment_chapter__5YHC;
-          };
-          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;
+          shorter_comment__in__light__HJ4E(string_tmp2__O4I,string_tmp3__0SD,TRUE__);
+          put__to__like__C0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_142));
+        };
+        Self__5C5D=(__INTEGER)(Self__5C5D +  1);
+      };
+      if ((! is_first_cur__FHYD)) {
+        put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
+      };
+      __tmp__BKTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__0LYD= 0;
+      while ((Self__0LYD <= __tmp__BKTD)) {
+        s__FITD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__0LYD];
+        if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
+          __tmp__KKTD=((__ITM_SLOT *)s__FITD)->stat_shorter__JKTD;
+        } else {
+          __tmp__KKTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
+        };
+        if ((__tmp__KKTD ==  0)) {
+          if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
+            __tmp__QKTD=((__ITM_SLOT *)s__FITD)->comment_chapter__T0HC;
+          } else {
+            __tmp__QKTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.comment_chapter__T0HC;
+          };
+          title__EITD=__tmp__QKTD;
+          t__N2QE=__tmp__QKTD;
+          s__Q2QE=NULL;
+          is_first_cur__P2QE=TRUE__;
+          __tmp__U2QE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+          Self__3ESE= 0;
+          while ((Self__3ESE <= __tmp__U2QE)) {
+            s__Q2QE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__3ESE];
+            if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+              __tmp__XKTD=((__ITM_SLOT *)s__Q2QE)->comment_chapter__T0HC;
             } else {
-              __tmp__FLTD=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.comment_chapter__5YHC;
+              __tmp__XKTD=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.comment_chapter__T0HC;
             };
-            if (((void *)__tmp__FLTD == (void *)title__SITD)) {
-              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
-                __tmp__50QE=((__ITM_SLOT *)s__O0QE)->stat_shorter__XKTD;
+            if (((void *)__tmp__XKTD == (void *)title__EITD)) {
+              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                __tmp__B3QE=((__ITM_SLOT *)s__Q2QE)->stat_shorter__JKTD;
               } else {
-                __tmp__50QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+                __tmp__B3QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.stat_shorter__JKTD;
               };
-              __tmp__C1QE=(__tmp__50QE ==  0);
+              __tmp__E3QE=(__tmp__B3QE ==  0);
             } else {
-              __tmp__C1QE=FALSE__;
+              __tmp__E3QE=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));
+            if (__tmp__E3QE) {
+              if (is_first_cur__P2QE) {
+                if (((void *)t__N2QE == (void *)NULL)) {
+                  put__to__like__C0XD((&__string_175),output_code__SI,(&__string_141));
                 } else {
-                  put__to__like__Q0XD(t__L0QE,output_code__SI,(&__string_141));
+                  put__to__like__C0XD(t__N2QE,output_code__SI,(&__string_141));
                 };
-                is_first_cur__N0QE=FALSE__;
+                is_first_cur__P2QE=FALSE__;
               };
-              if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__O0QE)->stat_shorter__XKTD= 1;
+              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__Q2QE)->stat_shorter__JKTD= 1;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.stat_shorter__XKTD= 1;
+                ((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.stat_shorter__JKTD= 1;
               };
               ((__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);
+              ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                pretty_name_in__ER4F(s__Q2QE,string_tmp2__O4I);
               } else {
-                pretty_name_in__OO4F(s__O0QE,string_tmp2__F3I);
+                pretty_name_in__ZS4F(s__Q2QE,string_tmp2__O4I);
               };
-              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;
+              put__to__like__C0XD(string_tmp2__O4I,string_tmp__VH,(&__string_143));
+              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                __tmp__J4QE=((__ITM_SLOT *)s__Q2QE)->id_section__F2C;
               } else {
-                __tmp__H2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.id_section__F2C;
+                __tmp__J4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.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;
+              Self__0C2G=((__SECTION_ *)__tmp__J4QE);
+              if ((((void *)Self__0C2G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__0C2G->name__NYDC == (void *)(&__string_24)))) {
+                if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                  __tmp__Q4QE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.style__FBU;
                 } else {
-                  __tmp__O2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.style__25T;
+                  __tmp__Q4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
                 };
-                if ((__tmp__O2QE != '+')) {
-                  __tmp__E3QE=TRUE__;
+                if ((__tmp__Q4QE != '+')) {
+                  __tmp__G5QE=TRUE__;
                 } else {
-                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
-                    __tmp__V2QE=((__ITM_SLOT *)s__O0QE)->result_type__N2FC;
+                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                    __tmp__X4QE=((__ITM_SLOT *)s__Q2QE)->result_type__B4FC;
                   } else {
-                    __tmp__V2QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.result_type__N2FC;
+                    __tmp__X4QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.result_type__B4FC;
                   };
-                  if (__tmp__V2QE==NULL) {
-                    __tmp__X2QE=NULL;
+                  if (__tmp__X4QE==NULL) {
+                    __tmp__Z4QE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__V2QE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__X4QE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__X2QE=((void *)__tmp__V2QE);
+                      __tmp__Z4QE=((void *)__tmp__X4QE);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__X2QE=((void *)__tmp__V2QE);
+                      __tmp__Z4QE=((void *)__tmp__X4QE);
                     } break;
                     case __ITM_TYPE_MULTI__: {
-                      __tmp__X2QE=NULL;
+                      __tmp__Z4QE=NULL;
                     } break;
                     case __ITM_TYPE_BLOCK__: {
-                      __tmp__X2QE=NULL;
+                      __tmp__Z4QE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__X2QE=((void *)__tmp__V2QE);
+                      __tmp__Z4QE=((void *)__tmp__X4QE);
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__X2QE=((void *)__tmp__V2QE);
+                      __tmp__Z4QE=((void *)__tmp__X4QE);
                     } break;
                     }
                   };
-                  ts__U2QE=__tmp__X2QE;
-                  if (((void *)__tmp__X2QE == (void *)NULL)) {
-                    __tmp__B3QE=TRUE__;
+                  ts__W4QE=__tmp__Z4QE;
+                  if (((void *)__tmp__Z4QE == (void *)NULL)) {
+                    __tmp__D5QE=TRUE__;
                   } else {
-                    switch (((struct ___OBJ *)__tmp__X2QE)->__id) {
+                    switch (((struct ___OBJ *)__tmp__Z4QE)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__32QE=NULL;
+                      __tmp__54QE=NULL;
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__32QE=NULL;
+                      __tmp__54QE=NULL;
                     } break;
                     case __ITM_TYPE_GENERIC__: {
-                      __tmp__32QE=((__ITM_TYPE_GENERIC *)__tmp__X2QE)->parent_itm_type_style__3NN.style__OUP;
+                      __tmp__54QE=((__ITM_TYPE_GENERIC *)__tmp__Z4QE)->parent_itm_type_style__GPN.style__XVP;
                     } break;
                     case __ITM_TYPE_STYLE__: {
-                      __tmp__32QE=((__ITM_TYPE_STYLE *)__tmp__X2QE)->style__OUP;
+                      __tmp__54QE=((__ITM_TYPE_STYLE *)__tmp__Z4QE)->style__XVP;
                     } break;
                     };
-                    __tmp__B3QE=((void *)__tmp__32QE != (void *)(&__string_9));
+                    __tmp__D5QE=((void *)__tmp__54QE != (void *)(&__string_9));
                   };
-                  __tmp__E3QE=__tmp__B3QE;
+                  __tmp__G5QE=__tmp__D5QE;
                 };
-                if (__tmp__E3QE) {
-                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
-                    __tmp__K3QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.name__LI;
+                if (__tmp__G5QE) {
+                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                    __tmp__M5QE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__K3QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                    __tmp__M5QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.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);
+                  Self__PYKH=((__STRING_CONSTANT *)__tmp__M5QE);
+                  result__MYKH=FALSE__;
+                  i__NYKH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__PYKH->count__DD)) {
+                    i__NYKH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+                    while ((! ((i__NYKH ==  0) || (((__CHARACTER *)Self__PYKH->storage__ZNO)[(__INTEGER)(i__NYKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__ZNO)[(__INTEGER)(i__NYKH -  1)])))) {
+                      i__NYKH=(__INTEGER)(i__NYKH -  1);
                     };
-                    result__DUKH=(i__EUKH ==  0);
+                    result__MYKH=(i__NYKH ==  0);
                   };
-                  __tmp__Y3QE=(! result__DUKH);
+                  __tmp__05QE=(! result__MYKH);
                 } else {
-                  __tmp__Y3QE=FALSE__;
+                  __tmp__05QE=FALSE__;
                 };
-                if (__tmp__Y3QE) {
-                  if (((struct ___OBJ *)s__O0QE)->__id==__ITM_SLOT__) {
-                    __tmp__T3QE=((__ITM_SLOT *)s__O0QE)->parent_named__15.name__LI;
+                if (__tmp__05QE) {
+                  if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                    __tmp__V5QE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.name__LI;
                   } else {
-                    __tmp__T3QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                    __tmp__V5QE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.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);
+                  Self__UYKH=((__STRING_CONSTANT *)__tmp__V5QE);
+                  result__RYKH=FALSE__;
+                  i__SYKH= 0;
+                  if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__UYKH->count__DD)) {
+                    i__SYKH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+                    while ((! ((i__SYKH ==  0) || (((__CHARACTER *)Self__UYKH->storage__ZNO)[(__INTEGER)(i__SYKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__ZNO)[(__INTEGER)(i__SYKH -  1)])))) {
+                      i__SYKH=(__INTEGER)(i__SYKH -  1);
                     };
-                    result__IUKH=(i__JUKH ==  0);
+                    result__RYKH=(i__SYKH ==  0);
                   };
-                  __tmp__Z3QE=(! result__IUKH);
+                  __tmp__15QE=(! result__RYKH);
                 } else {
-                  __tmp__Z3QE=FALSE__;
+                  __tmp__15QE=FALSE__;
                 };
-                __tmp__23QE=__tmp__Z3QE;
+                __tmp__45QE=__tmp__15QE;
               } else {
-                __tmp__23QE=FALSE__;
+                __tmp__45QE=FALSE__;
               };
-              if (__tmp__23QE) {
-                put__to__like__Q0XD((&__string_178),string_tmp__VH,(&__string_135));
+              if (__tmp__45QE) {
+                put__to__like__C0XD((&__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;
+              ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__Q2QE)->__id==__ITM_SLOT__) {
+                __tmp__KARE=((__ITM_SLOT *)s__Q2QE)->parent_named__15.name__LI;
               } else {
-                __tmp__I4QE=((__ITM_SLOT_OPERATOR *)s__O0QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                __tmp__KARE=((__ITM_SLOT_OPERATOR *)s__Q2QE)->parent_itm_slot__BT5B.parent_named__15.name__LI;
               };
-              get_all_comment_slot__in__ID4E(Self__QITD,__tmp__I4QE,string_tmp2__F3I);
+              get_all_comment_slot__in__UF4E(Self__CITD,__tmp__KARE,string_tmp2__O4I);
               ((__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));
+              shorter_comment__in__light__HJ4E(string_tmp2__O4I,string_tmp3__0SD,TRUE__);
+              put__to__like__C0XD(string_tmp3__0SD,string_tmp__VH,(&__string_144));
+              put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_142));
             };
-            Self__3CSE=(__INTEGER)(Self__3CSE +  1);
+            Self__3ESE=(__INTEGER)(Self__3ESE +  1);
           };
-          if ((! is_first_cur__N0QE)) {
-            put__to__like__Q0XD(NULL,output_code__SI,(&__string_145));
+          if ((! is_first_cur__P2QE)) {
+            put__to__like__C0XD(NULL,output_code__SI,(&__string_145));
           };
         };
-        Self__IMYD=(__INTEGER)(Self__IMYD +  1);
+        Self__0LYD=(__INTEGER)(Self__0LYD +  1);
       };
-      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;
+      s__OMYD=NULL;
+      is_first__NMYD=TRUE__;
+      __tmp__SMYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__0D5D= 0;
+      while ((Self__0D5D <= __tmp__SMYD)) {
+        s__OMYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__0D5D];
+        if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+          __tmp__DLTD=((__ITM_SLOT *)s__OMYD)->id_section__F2C;
         } else {
-          __tmp__RLTD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.id_section__F2C;
+          __tmp__DLTD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.id_section__F2C;
         };
-        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;
+        Self__1C2G=((__SECTION_ *)__tmp__DLTD);
+        if ((((void *)Self__1C2G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__1C2G->name__NYDC == (void *)(&__string_24)))) {
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            __tmp__5MYD=((__ITM_SLOT *)s__OMYD)->stat_shorter__JKTD;
           } else {
-            __tmp__NNYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+            __tmp__5MYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
           };
-          __tmp__QNYD=(__tmp__NNYD ==  1);
+          __tmp__CNYD=(__tmp__5MYD ==  1);
         } else {
-          __tmp__QNYD=FALSE__;
+          __tmp__CNYD=FALSE__;
         };
-        if (__tmp__QNYD) {
-          if (is_first__1MYD) {
+        if (__tmp__CNYD) {
+          if (is_first__NMYD) {
             if (((void *)(&__string_181) == (void *)NULL)) {
-              put__to__like__Q0XD((&__string_182),output_code__SI,(&__string_146));
+              put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
             } else {
-              put__to__like__Q0XD((&__string_181),output_code__SI,(&__string_146));
+              put__to__like__C0XD((&__string_181),output_code__SI,(&__string_146));
             };
-            is_first__1MYD=FALSE__;
+            is_first__NMYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__2MYD)->stat_shorter__XKTD= 2;
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__OMYD)->stat_shorter__JKTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 2;
           };
-          ((__STRING *)string_tmp2__F3I)->count__EGC= 0;
-          if (((struct ___OBJ *)s__2MYD)->__id==__ITM_SLOT__) {
-            pretty_name_in__ZM4F(s__2MYD,string_tmp2__F3I);
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ER4F(s__OMYD,string_tmp2__O4I);
           } else {
-            pretty_name_in__OO4F(s__2MYD,string_tmp2__F3I);
+            pretty_name_in__ZS4F(s__OMYD,string_tmp2__O4I);
           };
-          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;
+          put__to__like__C0XD(string_tmp2__O4I,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            __tmp__GOYD=((__ITM_SLOT *)s__OMYD)->parent_named__15.parent_itm_object__4.position__0BJ;
           } else {
-            __tmp__UOYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+            __tmp__GOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
           };
-          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;
+          copy__35R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__GOYD)) &  511)])->filename__LOG);
+          append__FLS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            __tmp__LOYD=((__ITM_SLOT *)s__OMYD)->parent_named__15.parent_itm_object__4.position__0BJ;
           } else {
-            __tmp__ZOYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+            __tmp__LOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
           };
-          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));
+          append_in__FHH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__LOYD) >>  17),string_tmp__VH);
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__C0XD((&__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;
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            __tmp__UOYD=((__ITM_SLOT *)s__OMYD)->id_section__F2C;
           } else {
-            __tmp__CPYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.id_section__F2C;
+            __tmp__UOYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.id_section__F2C;
           };
-          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);
+          append_in__RU4F(__tmp__UOYD,string_tmp__VH);
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__C0XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__TV4F(s__OMYD,output_code__SI);
           } else {
-            shorter_profile_in__FS4F(s__2MYD,output_code__SI);
+            shorter_profile_in__QW4F(s__OMYD,output_code__SI);
           };
           ((__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;
+          if (((struct ___OBJ *)s__OMYD)->__id==__ITM_SLOT__) {
+            __tmp__2OYD=((__ITM_SLOT *)s__OMYD)->parent_named__15.name__LI;
           } else {
-            __tmp__KPYD=((__ITM_SLOT_OPERATOR *)s__2MYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__2OYD=((__ITM_SLOT_OPERATOR *)s__OMYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          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__);
+          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__2OYD,string_tmp__VH);
+          shorter_comment__in__light__HJ4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__GD5D=(__INTEGER)(Self__GD5D +  1);
+        Self__0D5D=(__INTEGER)(Self__0D5D +  1);
       };
-      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;
+      s__KPYD=NULL;
+      is_first__JPYD=TRUE__;
+      __tmp__OPYD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__JE5D= 0;
+      while ((Self__JE5D <= __tmp__OPYD)) {
+        s__KPYD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__JE5D];
+        if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+          __tmp__NLTD=((__ITM_SLOT *)s__KPYD)->parent_named__15.name__LI;
         } else {
-          __tmp__1LTD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+          __tmp__NLTD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
         };
-        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);
+        Self__ZYKH=((__STRING_CONSTANT *)__tmp__NLTD);
+        result__WYKH=FALSE__;
+        i__XYKH= 0;
+        if ((((__STRING_CONSTANT *)(&__string_179))->count__DD <= Self__ZYKH->count__DD)) {
+          i__XYKH=((__STRING_CONSTANT *)(&__string_179))->count__DD;
+          while ((! ((i__XYKH ==  0) || (((__CHARACTER *)Self__ZYKH->storage__ZNO)[(__INTEGER)(i__XYKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_179))->storage__ZNO)[(__INTEGER)(i__XYKH -  1)])))) {
+            i__XYKH=(__INTEGER)(i__XYKH -  1);
           };
-          result__NUKH=(i__OUKH ==  0);
+          result__WYKH=(i__XYKH ==  0);
         };
-        if (result__NUKH) {
-          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
-            __tmp__JQYD=((__ITM_SLOT *)s__YPYD)->stat_shorter__XKTD;
+        if (result__WYKH) {
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            __tmp__1PYD=((__ITM_SLOT *)s__KPYD)->stat_shorter__JKTD;
           } else {
-            __tmp__JQYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+            __tmp__1PYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
           };
-          __tmp__MQYD=(__tmp__JQYD ==  1);
+          __tmp__4PYD=(__tmp__1PYD ==  1);
         } else {
-          __tmp__MQYD=FALSE__;
+          __tmp__4PYD=FALSE__;
         };
-        if (__tmp__MQYD) {
-          if (is_first__XPYD) {
+        if (__tmp__4PYD) {
+          if (is_first__JPYD) {
             if (((void *)(&__string_186) == (void *)NULL)) {
-              put__to__like__Q0XD((&__string_182),output_code__SI,(&__string_146));
+              put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
             } else {
-              put__to__like__Q0XD((&__string_186),output_code__SI,(&__string_146));
+              put__to__like__C0XD((&__string_186),output_code__SI,(&__string_146));
             };
-            is_first__XPYD=FALSE__;
+            is_first__JPYD=FALSE__;
           };
-          if (((struct ___OBJ *)s__YPYD)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)s__YPYD)->stat_shorter__XKTD= 2;
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)s__KPYD)->stat_shorter__JKTD= 2;
           } else {
-            ((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
+            ((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 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);
+          ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            pretty_name_in__ER4F(s__KPYD,string_tmp2__O4I);
           } else {
-            pretty_name_in__OO4F(s__YPYD,string_tmp2__F3I);
+            pretty_name_in__ZS4F(s__KPYD,string_tmp2__O4I);
           };
-          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;
+          put__to__like__C0XD(string_tmp2__O4I,output_code__SI,(&__string_147));
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            __tmp__CRYD=((__ITM_SLOT *)s__KPYD)->parent_named__15.parent_itm_object__4.position__0BJ;
           } else {
-            __tmp__QRYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+            __tmp__CRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
           };
-          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;
+          copy__35R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__CRYD)) &  511)])->filename__LOG);
+          append__FLS(string_tmp__VH,(&__string_183));
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            __tmp__HRYD=((__ITM_SLOT *)s__KPYD)->parent_named__15.parent_itm_object__4.position__0BJ;
           } else {
-            __tmp__VRYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+            __tmp__HRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
           };
-          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));
+          append_in__FHH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__HRYD) >>  17),string_tmp__VH);
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_149));
+          put__to__like__C0XD((&__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;
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            __tmp__QRYD=((__ITM_SLOT *)s__KPYD)->id_section__F2C;
           } else {
-            __tmp__4RYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.id_section__F2C;
+            __tmp__QRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.id_section__F2C;
           };
-          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);
+          append_in__RU4F(__tmp__QRYD,string_tmp__VH);
+          put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_120));
+          put__to__like__C0XD((&__string_185),output_code__SI,(&__string_148));
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            shorter_profile_in__TV4F(s__KPYD,output_code__SI);
           } else {
-            shorter_profile_in__FS4F(s__YPYD,output_code__SI);
+            shorter_profile_in__QW4F(s__KPYD,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;
+          if (((struct ___OBJ *)s__KPYD)->__id==__ITM_SLOT__) {
+            __tmp__YRYD=((__ITM_SLOT *)s__KPYD)->parent_named__15.name__LI;
           } else {
-            __tmp__GSYD=((__ITM_SLOT_OPERATOR *)s__YPYD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__YRYD=((__ITM_SLOT_OPERATOR *)s__KPYD)->parent_itm_slot__BT5B.parent_named__15.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__);
+          get_all_comment_slot__in__UF4E(Self__CITD,__tmp__YRYD,string_tmp__VH);
+          shorter_comment__in__light__HJ4E(string_tmp__VH,output_code__SI,FALSE__);
         };
-        Self__VD5D=(__INTEGER)(Self__VD5D +  1);
+        Self__JE5D=(__INTEGER)(Self__JE5D +  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;
+      __tmp__WLTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__BSYD= 0;
+      while ((Self__BSYD <= __tmp__WLTD)) {
+        s__FITD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__BSYD];
+        if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
+          __tmp__4LTD=((__ITM_SLOT *)s__FITD)->stat_shorter__JKTD;
         } else {
-          __tmp__MMTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+          __tmp__4LTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.stat_shorter__JKTD;
         };
-        if ((__tmp__MMTD ==  1)) {
-          if (((struct ___OBJ *)s__TITD)->__id==__ITM_SLOT__) {
-            __tmp__SMTD=((__ITM_SLOT *)s__TITD)->comment_chapter__5YHC;
+        if ((__tmp__4LTD ==  1)) {
+          if (((struct ___OBJ *)s__FITD)->__id==__ITM_SLOT__) {
+            __tmp__EMTD=((__ITM_SLOT *)s__FITD)->comment_chapter__T0HC;
           } else {
-            __tmp__SMTD=((__ITM_SLOT_OPERATOR *)s__TITD)->parent_itm_slot__VR5B.comment_chapter__5YHC;
+            __tmp__EMTD=((__ITM_SLOT_OPERATOR *)s__FITD)->parent_itm_slot__BT5B.comment_chapter__T0HC;
           };
-          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;
+          title__EITD=__tmp__EMTD;
+          t__GBRE=__tmp__EMTD;
+          s__JBRE=NULL;
+          is_first__IBRE=TRUE__;
+          __tmp__NBRE=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+          Self__PFSE= 0;
+          while ((Self__PFSE <= __tmp__NBRE)) {
+            s__JBRE=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__PFSE];
+            if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+              __tmp__LMTD=((__ITM_SLOT *)s__JBRE)->comment_chapter__T0HC;
             } else {
-              __tmp__ZMTD=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.comment_chapter__5YHC;
+              __tmp__LMTD=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.comment_chapter__T0HC;
             };
-            if (((void *)__tmp__ZMTD == (void *)title__SITD)) {
-              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
-                __tmp__Y5QE=((__ITM_SLOT *)s__H5QE)->stat_shorter__XKTD;
+            if (((void *)__tmp__LMTD == (void *)title__EITD)) {
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                __tmp__0BRE=((__ITM_SLOT *)s__JBRE)->stat_shorter__JKTD;
               } else {
-                __tmp__Y5QE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.stat_shorter__XKTD;
+                __tmp__0BRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.stat_shorter__JKTD;
               };
-              __tmp__15QE=(__tmp__Y5QE ==  1);
+              __tmp__3BRE=(__tmp__0BRE ==  1);
             } else {
-              __tmp__15QE=FALSE__;
+              __tmp__3BRE=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));
+            if (__tmp__3BRE) {
+              if (is_first__IBRE) {
+                if (((void *)t__GBRE == (void *)NULL)) {
+                  put__to__like__C0XD((&__string_182),output_code__SI,(&__string_146));
                 } else {
-                  put__to__like__Q0XD(t__E5QE,output_code__SI,(&__string_146));
+                  put__to__like__C0XD(t__GBRE,output_code__SI,(&__string_146));
                 };
-                is_first__G5QE=FALSE__;
+                is_first__IBRE=FALSE__;
               };
-              if (((struct ___OBJ *)s__H5QE)->__id==__ITM_SLOT__) {
-                ((__ITM_SLOT *)s__H5QE)->stat_shorter__XKTD= 2;
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)s__JBRE)->stat_shorter__JKTD= 2;
               } else {
-                ((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.stat_shorter__XKTD= 2;
+                ((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.stat_shorter__JKTD= 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);
+              ((__STRING *)string_tmp2__O4I)->count__EGC= 0;
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                pretty_name_in__ER4F(s__JBRE,string_tmp2__O4I);
               } else {
-                pretty_name_in__OO4F(s__H5QE,string_tmp2__F3I);
+                pretty_name_in__ZS4F(s__JBRE,string_tmp2__O4I);
               };
-              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;
+              put__to__like__C0XD(string_tmp2__O4I,output_code__SI,(&__string_147));
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                __tmp__BDRE=((__ITM_SLOT *)s__JBRE)->parent_named__15.parent_itm_object__4.position__0BJ;
               } else {
-                __tmp__5ARE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+                __tmp__BDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
               };
-              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;
+              copy__35R(string_tmp__VH,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )__tmp__BDRE)) &  511)])->filename__LOG);
+              append__FLS(string_tmp__VH,(&__string_183));
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                __tmp__GDRE=((__ITM_SLOT *)s__JBRE)->parent_named__15.parent_itm_object__4.position__0BJ;
               } else {
-                __tmp__EBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+                __tmp__GDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
               };
-              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));
+              append_in__FHH((__UINTEGER_32)(((__UINTEGER_32 )__tmp__GDRE) >>  17),string_tmp__VH);
+              put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_149));
+              put__to__like__C0XD((&__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;
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                __tmp__PDRE=((__ITM_SLOT *)s__JBRE)->id_section__F2C;
               } else {
-                __tmp__NBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.id_section__F2C;
+                __tmp__PDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.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);
+              append_in__RU4F(__tmp__PDRE,string_tmp__VH);
+              put__to__like__C0XD(string_tmp__VH,output_code__SI,(&__string_120));
+              put__to__like__C0XD((&__string_185),output_code__SI,(&__string_148));
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                shorter_profile_in__TV4F(s__JBRE,output_code__SI);
               } else {
-                shorter_profile_in__FS4F(s__H5QE,output_code__SI);
+                shorter_profile_in__QW4F(s__JBRE,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;
+              if (((struct ___OBJ *)s__JBRE)->__id==__ITM_SLOT__) {
+                __tmp__XDRE=((__ITM_SLOT *)s__JBRE)->parent_named__15.name__LI;
               } else {
-                __tmp__VBRE=((__ITM_SLOT_OPERATOR *)s__H5QE)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+                __tmp__XDRE=((__ITM_SLOT_OPERATOR *)s__JBRE)->parent_itm_slot__BT5B.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__);
+              get_all_comment_slot__in__UF4E(Self__CITD,__tmp__XDRE,string_tmp__VH);
+              shorter_comment__in__light__HJ4E(string_tmp__VH,output_code__SI,FALSE__);
             };
-            Self__PDSE=(__INTEGER)(Self__PDSE +  1);
+            Self__PFSE=(__INTEGER)(Self__PFSE +  1);
           };
         };
-        Self__PSYD=(__INTEGER)(Self__PSYD +  1);
+        Self__BSYD=(__INTEGER)(Self__BSYD +  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;
+      __tmp__WMTD=((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD;
+      Self__QSYD= 0;
+      while ((Self__QSYD <= __tmp__WMTD)) {
+        __tmp__3MTD=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[Self__QSYD];
+        if (((struct ___OBJ *)__tmp__3MTD)->__id==__ITM_SLOT__) {
+          ((__ITM_SLOT *)__tmp__3MTD)->stat_shorter__JKTD= 0;
         } else {
-          ((__ITM_SLOT_OPERATOR *)__tmp__LNTD)->parent_itm_slot__VR5B.stat_shorter__XKTD= 0;
+          ((__ITM_SLOT_OPERATOR *)__tmp__3MTD)->parent_itm_slot__BT5B.stat_shorter__JKTD= 0;
         };
-        Self__4SYD=(__INTEGER)(Self__4SYD +  1);
+        Self__QSYD=(__INTEGER)(Self__QSYD +  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);
+      save_file__with__3DC(add_ext__L5E(((__PROTOTYPE *)p__AB)->parent_named__5.name__LI),output_code__SI);
+      Self__40QC=(__INTEGER)(Self__40QC +  1);
     };
   };
   return( 0);
@@ -8465,12 +8465,12 @@ int main(int argc,char **argv)
 static __STRING* create__ZBB(__INTEGER needed_capacity__1BB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __STRING *result__YSB,*Self__E3R;
-  __POINTER ptr__ZSB,ptr_table__TUKH,next__SUKH,result__UUKH;
-  __POINTER ptr_table__DRH,next__IRH,result__GRH;
+  __STRING *result__YSB,*Self__N4R;
+  __POINTER ptr__ZSB,ptr_table__2YKH,next__1YKH,result__3YKH;
+  __POINTER ptr_table__MSH,next__RSH,result__PSH;
   __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;
+  __UINTEGER_32 sz__2SB,a__2HHH,new_size__3HHH,t__BIHH,a__AIHH;
+  __UINTEGER_32 new_size__LSH,lab_type__NSH;
   result__YSB=NULL;
   ptr__ZSB=((__POINTER )(NULL));
   typ_id__5SB= 0;
@@ -8481,2606 +8481,2606 @@ static __STRING* create__ZBB(__INTEGER needed_capacity__1BB)
     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;
+      a__2HHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3HHH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__2HHH) & (__UINTEGER_32)(~ a__2HHH));
+      ptr_table__2YKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3HHH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__1YKH=((__POINTER )(NULL));
+      result__3YKH=((__POINTER *)ptr_table__2YKH)[ 0];
+      if ((result__3YKH == (void *)NULL)) {
+        result__3YKH=new_lab__ZPJ(new_size__3HHH);
+        next__1YKH=(void *)((unsigned long)result__3YKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HHH)));
+        ((__POINTER *)next__1YKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2YKH)[ 0]=next__1YKH;
       } else {
-        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)));
+        next__1YKH=((__POINTER *)result__3YKH)[ 0];
+        if ((next__1YKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3YKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3HHH <<  1)) <=  4096)) {
+            next__1YKH=(void *)((unsigned long)result__3YKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3HHH)));
           } else {
-            next__SUKH=new_lab__QOJ(new_size__UDHH);
+            next__1YKH=new_lab__ZPJ(new_size__3HHH);
           };
-          ((__POINTER *)next__SUKH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__TUKH)[ 0]=next__SUKH;
+          ((__POINTER *)next__1YKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2YKH)[ 0]=next__1YKH;
         } else {
-          ((__POINTER *)result__UUKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__UUKH=next__SUKH;
+          ((__POINTER *)result__3YKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1YKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__3YKH=next__1YKH;
         };
       };
-      ptr__ZSB=result__UUKH;
+      ptr__ZSB=result__3YKH;
     } else {
-      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;
+      t__BIHH=((__UINTEGER_32 )typ_id__5SB);
+      a__AIHH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LSH=(__UINTEGER_32)((__UINTEGER_32)(sz__2SB + a__AIHH) & (__UINTEGER_32)(~ a__AIHH));
+      ptr_table__MSH=((__POINTER )(&(table_type[(t__BIHH)])));
+      lab_type__NSH=(__UINTEGER_32)(t__BIHH |  1);
+      next__RSH=((__POINTER )(NULL));
+      result__PSH=((__POINTER *)ptr_table__MSH)[ 0];
+      if ((result__PSH == (void *)NULL)) {
+        result__PSH=new_lab__ZPJ(lab_type__NSH);
+        next__RSH=(void *)((unsigned long)result__PSH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSH)));
+        ((__POINTER *)next__RSH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MSH)[ 0]=next__RSH;
       } else {
-        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)));
+        next__RSH=((__POINTER *)result__PSH)[ 0];
+        if ((next__RSH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PSH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LSH <<  1)) <=  4096)) {
+            next__RSH=(void *)((unsigned long)result__PSH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LSH)));
           } else {
-            next__IRH=new_lab__QOJ(lab_type__ERH);
+            next__RSH=new_lab__ZPJ(lab_type__NSH);
           };
-          ((__POINTER *)next__IRH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__DRH)[ 0]=next__IRH;
+          ((__POINTER *)next__RSH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MSH)[ 0]=next__RSH;
         } else {
-          ((__POINTER *)result__GRH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IRH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__GRH=next__IRH;
+          ((__POINTER *)result__PSH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RSH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__PSH=next__RSH;
         };
       };
-      ptr__ZSB=result__GRH;
+      ptr__ZSB=result__PSH;
     };
     result__YSB=((__STRING *)ptr__ZSB);
     *(result__YSB) = *(STRING__);
   };
-  Self__E3R=((__STRING *)result__YSB);
+  Self__N4R=((__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;
+    if ((Self__N4R->capacity__24R < needed_capacity__1BB)) {
+      Self__N4R->storage__F5R=create__3IEB(needed_capacity__1BB);
+      Self__N4R->capacity__24R=needed_capacity__1BB;
     };
   };
-  Self__E3R->count__EGC= 0;
+  Self__N4R->count__EGC= 0;
   return(result__YSB);
 }
 
-static __POINTER new_lab__QOJ(__UINTEGER_32 t__SOJ)
+static __POINTER new_lab__ZPJ(__UINTEGER_32 t__1PJ)
 // ({UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __UINTEGER_32 idx__3PJ,pv__EQJ;
+  void *blc__AQJ,*prev__BQJ,*prev__KEEH,*next__LEEH;
+  __MEMORY *Self__YEAH,*Self__JEEH;
+  __POINTER result__CQJ;
+  __BOOLEAN __tmp__ERJ;
+  idx__3PJ= 0;
+  blc__AQJ=NULL;
+  prev__BQJ=NULL;
+  pv__EQJ= 0;
+  while_do__ABK:
   {
-    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));
+    if ((idx__3PJ < nb_page__LQJ)) {
+      blc__AQJ=((void *)(last_block[(idx__3PJ)]));
+      __tmp__ERJ=(((__UINTEGER_32)(((__MEMORY *)blc__AQJ)->map_size_and_id__YTB &  4294967292LU) <  4096) || ((__UINTEGER_32)(((__MEMORY *)blc__AQJ)->map_size_and_id__YTB &  1) ==  1));
     } else {
-      __tmp__1PJ=FALSE__;
+      __tmp__ERJ=FALSE__;
     };
-    if (__tmp__1PJ) {
-      idx__UOJ=(__UINTEGER_32)(idx__UOJ +  1);
-      goto while_do__X5J;
+    if (__tmp__ERJ) {
+      idx__3PJ=(__UINTEGER_32)(idx__3PJ +  1);
+      goto while_do__ABK;
     };
   };
-  if ((idx__UOJ >= nb_page__CPJ)) {
-    blc__XOJ=new_page__B24();
+  if ((idx__3PJ >= nb_page__LQJ)) {
+    blc__AQJ=new_page__K34();
   };
-  ((__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;
+  ((__MEMORY *)blc__AQJ)->map_size_and_id__YTB=(__UINTEGER_32)(((__MEMORY *)blc__AQJ)->map_size_and_id__YTB -  4096);
+  Self__YEAH=((__MEMORY *)blc__AQJ);
+  result__CQJ=((__POINTER )((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__YEAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__YEAH->map_size_and_id__YTB &  4294967292LU))))));
+  if (((__UINTEGER_32)(((__MEMORY *)blc__AQJ)->map_size_and_id__YTB &  4294967292LU) < ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    Self__JEEH=((__MEMORY *)blc__AQJ);
+    prev__KEEH=Self__JEEH->map_previous_free__0TB;
+    next__LEEH=Self__JEEH->map_next_free__ZTB;
+    if (((void *)prev__KEEH == (void *)NULL)) {
+      first_free__BCVB=next__LEEH;
     } else {
-      ((__MEMORY *)prev__BAEH)->map_next_free__ZTB=next__CAEH;
+      ((__MEMORY *)prev__KEEH)->map_next_free__ZTB=next__LEEH;
     };
-    if (((void *)next__CAEH != (void *)NULL)) {
-      ((__MEMORY *)next__CAEH)->map_previous_free__0TB=prev__BAEH;
+    if (((void *)next__LEEH != (void *)NULL)) {
+      ((__MEMORY *)next__LEEH)->map_previous_free__0TB=prev__KEEH;
     };
-    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);
+    pv__EQJ=((__MEMORY *)blc__AQJ)->map_previous_linear__XTB;
+    if ((pv__EQJ !=  4294967295LU)) {
+      prev__BQJ=((void *)(void *)((unsigned long)begin_memory__GUH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )pv__EQJ))));
+      ((__MEMORY *)prev__BQJ)->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(((__MEMORY *)prev__BQJ)->map_size_and_id__YTB + ((__MEMORY *)blc__AQJ)->map_size_and_id__YTB) +  8);
+      last_block[(idx__3PJ)] = (prev__BQJ);
     };
   };
-  ((__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 *)))))));
+  ((__POINTER *)result__CQJ)[ 0]=((__POINTER )t__1PJ);
+  return((void *)((unsigned long)result__CQJ - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))))));
 }
 
-static void** create__XCRB(__INTEGER nb_elements__ZCRB)
+static void** create__DERB(__INTEGER nb_elements__FERB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__R2DH,a__EXFH,new_size__S2DH,new_size2__T2DH,a__IXFH;
+  __UINTEGER_32 new_size__JXFH;
+  __POINTER result__Q2DH,ptr_table__T2IH,next__S2IH,result__U2IH;
+  void *result__X2IH;
+  __INTEGER Self__FANC;
+  void **Result__LCUB;
+  sz__R2DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__FERB * ((__INTEGER )(sizeof(void *)))));
+  result__Q2DH=((__POINTER )(NULL));
+  a__EXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__S2DH=(__UINTEGER_32)((__UINTEGER_32)(sz__R2DH + a__EXFH) & (__UINTEGER_32)(~ a__EXFH));
+  new_size2__T2DH=(__UINTEGER_32)(new_size__S2DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__T2DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__IXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__JXFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__T2DH + a__IXFH) & (__UINTEGER_32)(~ a__IXFH));
+    ptr_table__T2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JXFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__S2IH=((__POINTER )(NULL));
+    result__U2IH=((__POINTER *)ptr_table__T2IH)[ 0];
+    if ((result__U2IH == (void *)NULL)) {
+      result__U2IH=new_lab__ZPJ(new_size__JXFH);
+      next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JXFH)));
+      ((__POINTER *)next__S2IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
+    } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JXFH <<  1)) <=  4096)) {
+          next__S2IH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JXFH)));
+        } else {
+          next__S2IH=new_lab__ZPJ(new_size__JXFH);
+        };
+        ((__POINTER *)next__S2IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__T2IH)[ 0]=next__S2IH;
+      } else {
+        ((__POINTER *)result__U2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__U2IH=next__S2IH;
+      };
+    };
+    ((__POINTER *)result__U2IH)[ 0]=((__POINTER ) 3);
+    result__Q2DH=(void *)((unsigned long)result__U2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__X2IH=first_free__BCVB;
+    while ((((void *)result__X2IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__X2IH)->map_size_and_id__YTB &  4294967292LU) < new_size__S2DH))) {
+      result__X2IH=((__MEMORY *)result__X2IH)->map_next_free__ZTB;
     };
-    if (((void *)result__OYIH == (void *)NULL)) {
-      result__OYIH=new_page__B24();
+    if (((void *)result__X2IH == (void *)NULL)) {
+      result__X2IH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__X2IH,new_size__S2DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__X2IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__Q2DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__X2IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__LCUB=((void **)result__Q2DH);
+  Self__FANC=(__INTEGER)(nb_elements__FERB -  1);
+  while ((Self__FANC >=  0)) {
+    Result__LCUB[Self__FANC]=NULL;
+    Self__FANC=(__INTEGER)(Self__FANC -  1);
   };
-  return(Result__5AUB);
+  return(Result__LCUB);
 }
 
-static void add_last__UHT(__STRING *Self__VHT,__CHARACTER ch__WHT)
+static void add_last__3IT(__STRING *Self__4IT,__CHARACTER ch__5IT)
 // ({STRING},{CHARACTER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__AJT,old_nb_elts__NBFH,upper__FIHH,Self__DIHH;
+  __CHARACTER *Self__MBFH,*new__PBFH;
+  new_capacity__AJT= 0;
+  if ((Self__4IT->capacity__24R <= Self__4IT->count__EGC)) {
+    if ((Self__4IT->capacity__24R ==  0)) {
+      Self__4IT->capacity__24R= 32;
+      Self__4IT->storage__F5R=create__3IEB( 32);
+    } else {
+      new_capacity__AJT=(__INTEGER)(Self__4IT->capacity__24R <<  1);
+      Self__MBFH=((__CHARACTER *)Self__4IT->storage__F5R);
+      old_nb_elts__NBFH=Self__4IT->capacity__24R;
+      new__PBFH=((__CHARACTER *)realloc_dynamic__old_size__new_size__LELC(((__POINTER )Self__MBFH),((__UINTEGER_32 )old_nb_elts__NBFH),((__UINTEGER_32 )new_capacity__AJT)));
+      upper__FIHH=(__INTEGER)(new_capacity__AJT -  1);
+      Self__DIHH=old_nb_elts__NBFH;
+      while ((Self__DIHH <= upper__FIHH)) {
+        new__PBFH[Self__DIHH]='\0';
+        Self__DIHH=(__INTEGER)(Self__DIHH +  1);
+      };
+      Self__4IT->storage__F5R=new__PBFH;
+      Self__4IT->capacity__24R=new_capacity__AJT;
+    };
+  };
+  ((__CHARACTER *)Self__4IT->storage__F5R)[Self__4IT->count__EGC]=ch__5IT;
+  Self__4IT->count__EGC=(__INTEGER)(Self__4IT->count__EGC +  1);
 }
 
-static void add_last__TNV(__FAST_ARRAYoSTRINGo *Self__UNV,void *element__VNV)
+static void add_last__2OV(__FAST_ARRAYoSTRINGo *Self__3OV,void *element__4OV)
 // ({FAST_ARRAYoSTRINGo},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__5OV,__tmp__DQV,__tmp__YHEC,Self__SLVD;
+  __BOOLEAN __tmp__NPV;
+  void **__tmp__CQV,**new__EHEC;
+  new_capacity__5OV= 0;
+  if (((__INTEGER)(Self__3OV->parent_arrayed_collection__RKC.upper__UKC +  1) <= (__INTEGER)(Self__3OV->parent_arrayed_collection__RKC.capacity__QDT -  1))) {
+    Self__3OV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__3OV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    __tmp__NPV=TRUE__;
   } else {
-    __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;
+    __tmp__NPV=FALSE__;
+  };
+  if ((! __tmp__NPV)) {
+    if ((Self__3OV->parent_arrayed_collection__RKC.capacity__QDT ==  0)) {
+      Self__3OV->parent_arrayed_collection__RKC.storage__1DT=create__DERB( 2);
+      Self__3OV->parent_arrayed_collection__RKC.capacity__QDT= 2;
+      Self__3OV->parent_arrayed_collection__RKC.upper__UKC= 0;
+    } else {
+      new_capacity__5OV=(__INTEGER)(Self__3OV->parent_arrayed_collection__RKC.capacity__QDT <<  1);
+      __tmp__CQV=Self__3OV->parent_arrayed_collection__RKC.storage__1DT;
+      __tmp__DQV=Self__3OV->parent_arrayed_collection__RKC.capacity__QDT;
+      new__EHEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__CQV)),((__UINTEGER_32 )(__INTEGER)(__tmp__DQV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__5OV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__YHEC=(__INTEGER)(new_capacity__5OV -  1);
+      Self__SLVD=__tmp__DQV;
+      while ((Self__SLVD <= __tmp__YHEC)) {
+        new__EHEC[Self__SLVD]=NULL;
+        Self__SLVD=(__INTEGER)(Self__SLVD +  1);
+      };
+      Self__3OV->parent_arrayed_collection__RKC.storage__1DT=new__EHEC;
+      Self__3OV->parent_arrayed_collection__RKC.capacity__QDT=new_capacity__5OV;
+      Self__3OV->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__3OV->parent_arrayed_collection__RKC.upper__UKC +  1);
+    };
+  };
+  ((void **)Self__3OV->parent_arrayed_collection__RKC.storage__1DT)[Self__3OV->parent_arrayed_collection__RKC.upper__UKC]=element__4OV;
 }
 
-static __INTEGER prime_number_ceiling__K01(__INTEGER integer__M01)
+static __INTEGER prime_number_ceiling__T11(__INTEGER integer__V11)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER result__X11;
+  __BOOLEAN __tmp__511,__tmp__M21,result__YNCB,__tmp__Z21,result__KOCB;
+  __BOOLEAN __tmp__G31,result__2OCB,__tmp__T31,result__OPCB,__tmp__A41;
+  __BOOLEAN result__AQCB,__tmp__N41,result__SQCB,__tmp__041;
+  __BOOLEAN result__ERCB,__tmp__H51,result__WRCB,__tmp__U51;
+  __BOOLEAN result__ISCB,__tmp__BA2,result__0SCB,__tmp__OA2;
+  __BOOLEAN result__MTCB,__tmp__1A2,result__4TCB,__tmp__IB2;
+  __BOOLEAN result__QUCB,__tmp__VB2,result__CVCB,__tmp__CC2;
+  __BOOLEAN result__UVCB,__tmp__PC2,result__GWCB,__tmp__2C2;
+  __BOOLEAN result__YWCB,__tmp__JD2,result__KXCB,__tmp__WD2;
+  __BOOLEAN result__2XCB,__tmp__DE2,result__OYCB,__tmp__QE2;
+  __BOOLEAN result__AZCB,__tmp__3E2,result__SZCB,__tmp__KF2;
+  __BOOLEAN result__E0CB,__tmp__XF2,result__W0CB,__tmp__EG2;
+  __BOOLEAN result__I1CB;
+  result__X11= 0;
+  if ((integer__V11 <=  11)) {
+    result__X11= 11;
+    __tmp__511=TRUE__;
   } else {
-    __tmp__W01=FALSE__;
+    __tmp__511=FALSE__;
   };
-  if (__tmp__W01) {
-    __tmp__D11=TRUE__;
+  if (__tmp__511) {
+    __tmp__M21=TRUE__;
   } else {
-    result__PMCB=(integer__M01 <=  23);
-    if (result__PMCB) {
-      result__O01= 23;
+    result__YNCB=(integer__V11 <=  23);
+    if (result__YNCB) {
+      result__X11= 23;
     };
-    __tmp__D11=result__PMCB;
+    __tmp__M21=result__YNCB;
   };
-  if (__tmp__D11) {
-    __tmp__Q11=TRUE__;
+  if (__tmp__M21) {
+    __tmp__Z21=TRUE__;
   } else {
-    result__BNCB=(integer__M01 <=  53);
-    if (result__BNCB) {
-      result__O01= 53;
+    result__KOCB=(integer__V11 <=  53);
+    if (result__KOCB) {
+      result__X11= 53;
     };
-    __tmp__Q11=result__BNCB;
+    __tmp__Z21=result__KOCB;
   };
-  if (__tmp__Q11) {
-    __tmp__311=TRUE__;
+  if (__tmp__Z21) {
+    __tmp__G31=TRUE__;
   } else {
-    result__TNCB=(integer__M01 <=  97);
-    if (result__TNCB) {
-      result__O01= 97;
+    result__2OCB=(integer__V11 <=  97);
+    if (result__2OCB) {
+      result__X11= 97;
     };
-    __tmp__311=result__TNCB;
+    __tmp__G31=result__2OCB;
   };
-  if (__tmp__311) {
-    __tmp__K21=TRUE__;
+  if (__tmp__G31) {
+    __tmp__T31=TRUE__;
   } else {
-    result__FOCB=(integer__M01 <=  193);
-    if (result__FOCB) {
-      result__O01= 193;
+    result__OPCB=(integer__V11 <=  193);
+    if (result__OPCB) {
+      result__X11= 193;
     };
-    __tmp__K21=result__FOCB;
+    __tmp__T31=result__OPCB;
   };
-  if (__tmp__K21) {
-    __tmp__X21=TRUE__;
+  if (__tmp__T31) {
+    __tmp__A41=TRUE__;
   } else {
-    result__XOCB=(integer__M01 <=  389);
-    if (result__XOCB) {
-      result__O01= 389;
+    result__AQCB=(integer__V11 <=  389);
+    if (result__AQCB) {
+      result__X11= 389;
     };
-    __tmp__X21=result__XOCB;
+    __tmp__A41=result__AQCB;
   };
-  if (__tmp__X21) {
-    __tmp__E31=TRUE__;
+  if (__tmp__A41) {
+    __tmp__N41=TRUE__;
   } else {
-    result__JPCB=(integer__M01 <=  769);
-    if (result__JPCB) {
-      result__O01= 769;
+    result__SQCB=(integer__V11 <=  769);
+    if (result__SQCB) {
+      result__X11= 769;
     };
-    __tmp__E31=result__JPCB;
+    __tmp__N41=result__SQCB;
   };
-  if (__tmp__E31) {
-    __tmp__R31=TRUE__;
+  if (__tmp__N41) {
+    __tmp__041=TRUE__;
   } else {
-    result__1PCB=(integer__M01 <=  1543);
-    if (result__1PCB) {
-      result__O01= 1543;
+    result__ERCB=(integer__V11 <=  1543);
+    if (result__ERCB) {
+      result__X11= 1543;
     };
-    __tmp__R31=result__1PCB;
+    __tmp__041=result__ERCB;
   };
-  if (__tmp__R31) {
-    __tmp__431=TRUE__;
+  if (__tmp__041) {
+    __tmp__H51=TRUE__;
   } else {
-    result__NQCB=(integer__M01 <=  3079);
-    if (result__NQCB) {
-      result__O01= 3079;
+    result__WRCB=(integer__V11 <=  3079);
+    if (result__WRCB) {
+      result__X11= 3079;
     };
-    __tmp__431=result__NQCB;
+    __tmp__H51=result__WRCB;
   };
-  if (__tmp__431) {
-    __tmp__L41=TRUE__;
+  if (__tmp__H51) {
+    __tmp__U51=TRUE__;
   } else {
-    result__5QCB=(integer__M01 <=  6151);
-    if (result__5QCB) {
-      result__O01= 6151;
+    result__ISCB=(integer__V11 <=  6151);
+    if (result__ISCB) {
+      result__X11= 6151;
     };
-    __tmp__L41=result__5QCB;
+    __tmp__U51=result__ISCB;
   };
-  if (__tmp__L41) {
-    __tmp__Y41=TRUE__;
+  if (__tmp__U51) {
+    __tmp__BA2=TRUE__;
   } else {
-    result__RRCB=(integer__M01 <=  12289);
-    if (result__RRCB) {
-      result__O01= 12289;
+    result__0SCB=(integer__V11 <=  12289);
+    if (result__0SCB) {
+      result__X11= 12289;
     };
-    __tmp__Y41=result__RRCB;
+    __tmp__BA2=result__0SCB;
   };
-  if (__tmp__Y41) {
-    __tmp__F51=TRUE__;
+  if (__tmp__BA2) {
+    __tmp__OA2=TRUE__;
   } else {
-    result__DSCB=(integer__M01 <=  24593);
-    if (result__DSCB) {
-      result__O01= 24593;
+    result__MTCB=(integer__V11 <=  24593);
+    if (result__MTCB) {
+      result__X11= 24593;
     };
-    __tmp__F51=result__DSCB;
+    __tmp__OA2=result__MTCB;
   };
-  if (__tmp__F51) {
-    __tmp__S51=TRUE__;
+  if (__tmp__OA2) {
+    __tmp__1A2=TRUE__;
   } else {
-    result__VSCB=(integer__M01 <=  49157);
-    if (result__VSCB) {
-      result__O01= 49157;
+    result__4TCB=(integer__V11 <=  49157);
+    if (result__4TCB) {
+      result__X11= 49157;
     };
-    __tmp__S51=result__VSCB;
+    __tmp__1A2=result__4TCB;
   };
-  if (__tmp__S51) {
-    __tmp__551=TRUE__;
+  if (__tmp__1A2) {
+    __tmp__IB2=TRUE__;
   } else {
-    result__HTCB=(integer__M01 <=  98317);
-    if (result__HTCB) {
-      result__O01= 98317;
+    result__QUCB=(integer__V11 <=  98317);
+    if (result__QUCB) {
+      result__X11= 98317;
     };
-    __tmp__551=result__HTCB;
+    __tmp__IB2=result__QUCB;
   };
-  if (__tmp__551) {
-    __tmp__MA2=TRUE__;
+  if (__tmp__IB2) {
+    __tmp__VB2=TRUE__;
   } else {
-    result__ZTCB=(integer__M01 <=  196613);
-    if (result__ZTCB) {
-      result__O01= 196613;
+    result__CVCB=(integer__V11 <=  196613);
+    if (result__CVCB) {
+      result__X11= 196613;
     };
-    __tmp__MA2=result__ZTCB;
+    __tmp__VB2=result__CVCB;
   };
-  if (__tmp__MA2) {
-    __tmp__ZA2=TRUE__;
+  if (__tmp__VB2) {
+    __tmp__CC2=TRUE__;
   } else {
-    result__LUCB=(integer__M01 <=  393241);
-    if (result__LUCB) {
-      result__O01= 393241;
+    result__UVCB=(integer__V11 <=  393241);
+    if (result__UVCB) {
+      result__X11= 393241;
     };
-    __tmp__ZA2=result__LUCB;
+    __tmp__CC2=result__UVCB;
   };
-  if (__tmp__ZA2) {
-    __tmp__GB2=TRUE__;
+  if (__tmp__CC2) {
+    __tmp__PC2=TRUE__;
   } else {
-    result__3UCB=(integer__M01 <=  786433);
-    if (result__3UCB) {
-      result__O01= 786433;
+    result__GWCB=(integer__V11 <=  786433);
+    if (result__GWCB) {
+      result__X11= 786433;
     };
-    __tmp__GB2=result__3UCB;
+    __tmp__PC2=result__GWCB;
   };
-  if (__tmp__GB2) {
-    __tmp__TB2=TRUE__;
+  if (__tmp__PC2) {
+    __tmp__2C2=TRUE__;
   } else {
-    result__PVCB=(integer__M01 <=  1572869);
-    if (result__PVCB) {
-      result__O01= 1572869;
+    result__YWCB=(integer__V11 <=  1572869);
+    if (result__YWCB) {
+      result__X11= 1572869;
     };
-    __tmp__TB2=result__PVCB;
+    __tmp__2C2=result__YWCB;
   };
-  if (__tmp__TB2) {
-    __tmp__AC2=TRUE__;
+  if (__tmp__2C2) {
+    __tmp__JD2=TRUE__;
   } else {
-    result__BWCB=(integer__M01 <=  3145739);
-    if (result__BWCB) {
-      result__O01= 3145739;
+    result__KXCB=(integer__V11 <=  3145739);
+    if (result__KXCB) {
+      result__X11= 3145739;
     };
-    __tmp__AC2=result__BWCB;
+    __tmp__JD2=result__KXCB;
   };
-  if (__tmp__AC2) {
-    __tmp__NC2=TRUE__;
+  if (__tmp__JD2) {
+    __tmp__WD2=TRUE__;
   } else {
-    result__TWCB=(integer__M01 <=  6291469);
-    if (result__TWCB) {
-      result__O01= 6291469;
+    result__2XCB=(integer__V11 <=  6291469);
+    if (result__2XCB) {
+      result__X11= 6291469;
     };
-    __tmp__NC2=result__TWCB;
+    __tmp__WD2=result__2XCB;
   };
-  if (__tmp__NC2) {
-    __tmp__0C2=TRUE__;
+  if (__tmp__WD2) {
+    __tmp__DE2=TRUE__;
   } else {
-    result__FXCB=(integer__M01 <=  12582917);
-    if (result__FXCB) {
-      result__O01= 12582917;
+    result__OYCB=(integer__V11 <=  12582917);
+    if (result__OYCB) {
+      result__X11= 12582917;
     };
-    __tmp__0C2=result__FXCB;
+    __tmp__DE2=result__OYCB;
   };
-  if (__tmp__0C2) {
-    __tmp__HD2=TRUE__;
+  if (__tmp__DE2) {
+    __tmp__QE2=TRUE__;
   } else {
-    result__XXCB=(integer__M01 <=  25165843);
-    if (result__XXCB) {
-      result__O01= 25165843;
+    result__AZCB=(integer__V11 <=  25165843);
+    if (result__AZCB) {
+      result__X11= 25165843;
     };
-    __tmp__HD2=result__XXCB;
+    __tmp__QE2=result__AZCB;
   };
-  if (__tmp__HD2) {
-    __tmp__UD2=TRUE__;
+  if (__tmp__QE2) {
+    __tmp__3E2=TRUE__;
   } else {
-    result__JYCB=(integer__M01 <=  50331653);
-    if (result__JYCB) {
-      result__O01= 50331653;
+    result__SZCB=(integer__V11 <=  50331653);
+    if (result__SZCB) {
+      result__X11= 50331653;
     };
-    __tmp__UD2=result__JYCB;
+    __tmp__3E2=result__SZCB;
   };
-  if (__tmp__UD2) {
-    __tmp__BE2=TRUE__;
+  if (__tmp__3E2) {
+    __tmp__KF2=TRUE__;
   } else {
-    result__1YCB=(integer__M01 <=  100663319);
-    if (result__1YCB) {
-      result__O01= 100663319;
+    result__E0CB=(integer__V11 <=  100663319);
+    if (result__E0CB) {
+      result__X11= 100663319;
     };
-    __tmp__BE2=result__1YCB;
+    __tmp__KF2=result__E0CB;
   };
-  if (__tmp__BE2) {
-    __tmp__OE2=TRUE__;
+  if (__tmp__KF2) {
+    __tmp__XF2=TRUE__;
   } else {
-    result__NZCB=(integer__M01 <=  201326611);
-    if (result__NZCB) {
-      result__O01= 201326611;
+    result__W0CB=(integer__V11 <=  201326611);
+    if (result__W0CB) {
+      result__X11= 201326611;
     };
-    __tmp__OE2=result__NZCB;
+    __tmp__XF2=result__W0CB;
   };
-  if (__tmp__OE2) {
-    __tmp__1E2=TRUE__;
+  if (__tmp__XF2) {
+    __tmp__EG2=TRUE__;
   } else {
-    result__5ZCB=(integer__M01 <=  402653189);
-    if (result__5ZCB) {
-      result__O01= 402653189;
+    result__I1CB=(integer__V11 <=  402653189);
+    if (result__I1CB) {
+      result__X11= 402653189;
     };
-    __tmp__1E2=result__5ZCB;
+    __tmp__EG2=result__I1CB;
   };
-  if ((! __tmp__1E2)) {
-    if ((integer__M01 <=  805306457)) {
-      result__O01= 805306457;
+  if ((! __tmp__EG2)) {
+    if ((integer__V11 <=  805306457)) {
+      result__X11= 805306457;
     } else {
-      result__O01= 1610612741;
+      result__X11= 1610612741;
     };
   };
-  return(result__O01);
+  return(result__X11);
 }
 
-static void** create__K33(__INTEGER nb_elements__M33)
+static void** create__T43(__INTEGER nb_elements__V43)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1BFH,a__ACFH,new_size__2BFH,new_size2__3BFH,a__ECFH;
+  __UINTEGER_32 new_size__FCFH;
+  __POINTER result__0BFH,ptr_table__ULIH,next__TLIH,result__VLIH;
+  void *result__AZKH;
+  __INTEGER Self__D1JC;
+  void **Result__KWEB;
+  sz__1BFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__V43 * ((__INTEGER )(sizeof(void *)))));
+  result__0BFH=((__POINTER )(NULL));
+  a__ACFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2BFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1BFH + a__ACFH) & (__UINTEGER_32)(~ a__ACFH));
+  new_size2__3BFH=(__UINTEGER_32)(new_size__2BFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3BFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__ECFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FCFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3BFH + a__ECFH) & (__UINTEGER_32)(~ a__ECFH));
+    ptr_table__ULIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__TLIH=((__POINTER )(NULL));
+    result__VLIH=((__POINTER *)ptr_table__ULIH)[ 0];
+    if ((result__VLIH == (void *)NULL)) {
+      result__VLIH=new_lab__ZPJ(new_size__FCFH);
+      next__TLIH=(void *)((unsigned long)result__VLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCFH)));
+      ((__POINTER *)next__TLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ULIH)[ 0]=next__TLIH;
+    } else {
+      next__TLIH=((__POINTER *)result__VLIH)[ 0];
+      if ((next__TLIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VLIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FCFH <<  1)) <=  4096)) {
+          next__TLIH=(void *)((unsigned long)result__VLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FCFH)));
+        } else {
+          next__TLIH=new_lab__ZPJ(new_size__FCFH);
+        };
+        ((__POINTER *)next__TLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ULIH)[ 0]=next__TLIH;
+      } else {
+        ((__POINTER *)result__VLIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__VLIH=next__TLIH;
+      };
+    };
+    ((__POINTER *)result__VLIH)[ 0]=((__POINTER ) 3);
+    result__0BFH=(void *)((unsigned long)result__VLIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__AZKH=first_free__BCVB;
+    while ((((void *)result__AZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__AZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__2BFH))) {
+      result__AZKH=((__MEMORY *)result__AZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__XUKH == (void *)NULL)) {
-      result__XUKH=new_page__B24();
+    if (((void *)result__AZKH == (void *)NULL)) {
+      result__AZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__AZKH,new_size__2BFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__AZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__0BFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__AZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__KWEB=((void **)result__0BFH);
+  Self__D1JC=(__INTEGER)(nb_elements__V43 -  1);
+  while ((Self__D1JC >=  0)) {
+    Result__KWEB[Self__D1JC]=NULL;
+    Self__D1JC=(__INTEGER)(Self__D1JC -  1);
   };
-  return(Result__BVEB);
+  return(Result__KWEB);
 }
 
-static void** create__0GTC(__INTEGER nb_elements__2GTC)
+static void** create__RITC(__INTEGER nb_elements__TITC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__HCFH,a__MCFH,new_size__ICFH,new_size2__JCFH,a__QCFH;
+  __UINTEGER_32 new_size__RCFH;
+  __POINTER result__GCFH,ptr_table__ZLIH,next__YLIH,result__0LIH;
+  void *result__DZKH;
+  __INTEGER Self__NQWD;
+  void **Result__2E3C;
+  sz__HCFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TITC * ((__INTEGER )(sizeof(void *)))));
+  result__GCFH=((__POINTER )(NULL));
+  a__MCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ICFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HCFH + a__MCFH) & (__UINTEGER_32)(~ a__MCFH));
+  new_size2__JCFH=(__UINTEGER_32)(new_size__ICFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__JCFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__QCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__RCFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JCFH + a__QCFH) & (__UINTEGER_32)(~ a__QCFH));
+    ptr_table__ZLIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RCFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__YLIH=((__POINTER )(NULL));
+    result__0LIH=((__POINTER *)ptr_table__ZLIH)[ 0];
+    if ((result__0LIH == (void *)NULL)) {
+      result__0LIH=new_lab__ZPJ(new_size__RCFH);
+      next__YLIH=(void *)((unsigned long)result__0LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCFH)));
+      ((__POINTER *)next__YLIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__ZLIH)[ 0]=next__YLIH;
+    } else {
+      next__YLIH=((__POINTER *)result__0LIH)[ 0];
+      if ((next__YLIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0LIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__RCFH <<  1)) <=  4096)) {
+          next__YLIH=(void *)((unsigned long)result__0LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RCFH)));
+        } else {
+          next__YLIH=new_lab__ZPJ(new_size__RCFH);
+        };
+        ((__POINTER *)next__YLIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZLIH)[ 0]=next__YLIH;
+      } else {
+        ((__POINTER *)result__0LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YLIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__0LIH=next__YLIH;
+      };
+    };
+    ((__POINTER *)result__0LIH)[ 0]=((__POINTER ) 3);
+    result__GCFH=(void *)((unsigned long)result__0LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__DZKH=first_free__BCVB;
+    while ((((void *)result__DZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__ICFH))) {
+      result__DZKH=((__MEMORY *)result__DZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__0UKH == (void *)NULL)) {
-      result__0UKH=new_page__B24();
+    if (((void *)result__DZKH == (void *)NULL)) {
+      result__DZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__DZKH,new_size__ICFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__GCFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__2E3C=((void **)result__GCFH);
+  Self__NQWD=(__INTEGER)(nb_elements__TITC -  1);
+  while ((Self__NQWD >=  0)) {
+    Result__2E3C[Self__NQWD]=NULL;
+    Self__NQWD=(__INTEGER)(Self__NQWD -  1);
   };
-  return(Result__FD3C);
+  return(Result__2E3C);
 }
 
-static void** create__ECSB(__INTEGER nb_elements__GCSB)
+static void** create__QDSB(__INTEGER nb_elements__SDSB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__TCFH,a__YCFH,new_size__UCFH,new_size2__VCFH,a__2CFH;
+  __UINTEGER_32 new_size__3CFH;
+  __POINTER result__SCFH,ptr_table__4LIH,next__3LIH,result__5LIH;
+  void *result__GZKH;
+  __INTEGER Self__LHNC;
+  void **Result__JIVB;
+  sz__TCFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SDSB * ((__INTEGER )(sizeof(void *)))));
+  result__SCFH=((__POINTER )(NULL));
+  a__YCFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__UCFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TCFH + a__YCFH) & (__UINTEGER_32)(~ a__YCFH));
+  new_size2__VCFH=(__UINTEGER_32)(new_size__UCFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VCFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__2CFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__3CFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VCFH + a__2CFH) & (__UINTEGER_32)(~ a__2CFH));
+    ptr_table__4LIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3CFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__3LIH=((__POINTER )(NULL));
+    result__5LIH=((__POINTER *)ptr_table__4LIH)[ 0];
+    if ((result__5LIH == (void *)NULL)) {
+      result__5LIH=new_lab__ZPJ(new_size__3CFH);
+      next__3LIH=(void *)((unsigned long)result__5LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CFH)));
+      ((__POINTER *)next__3LIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__4LIH)[ 0]=next__3LIH;
+    } else {
+      next__3LIH=((__POINTER *)result__5LIH)[ 0];
+      if ((next__3LIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5LIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3CFH <<  1)) <=  4096)) {
+          next__3LIH=(void *)((unsigned long)result__5LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3CFH)));
+        } else {
+          next__3LIH=new_lab__ZPJ(new_size__3CFH);
+        };
+        ((__POINTER *)next__3LIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4LIH)[ 0]=next__3LIH;
+      } else {
+        ((__POINTER *)result__5LIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3LIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__5LIH=next__3LIH;
+      };
+    };
+    ((__POINTER *)result__5LIH)[ 0]=((__POINTER ) 3);
+    result__SCFH=(void *)((unsigned long)result__5LIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GZKH=first_free__BCVB;
+    while ((((void *)result__GZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__UCFH))) {
+      result__GZKH=((__MEMORY *)result__GZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__3UKH == (void *)NULL)) {
-      result__3UKH=new_page__B24();
+    if (((void *)result__GZKH == (void *)NULL)) {
+      result__GZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__GZKH,new_size__UCFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__SCFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JIVB=((void **)result__SCFH);
+  Self__LHNC=(__INTEGER)(nb_elements__SDSB -  1);
+  while ((Self__LHNC >=  0)) {
+    Result__JIVB[Self__LHNC]=NULL;
+    Self__LHNC=(__INTEGER)(Self__LHNC -  1);
   };
-  return(Result__3GVB);
+  return(Result__JIVB);
 }
 
-static void** create__UB4(__INTEGER nb_elements__WB4)
+static void** create__3C4(__INTEGER nb_elements__5C4)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__5CFH,a__EDFH,new_size__ADFH,new_size2__BDFH,a__IDFH;
+  __UINTEGER_32 new_size__JDFH;
+  __POINTER result__4CFH,ptr_table__DMIH,next__CMIH,result__EMIH;
+  void *result__JZKH;
+  __INTEGER Self__K2JC;
+  void **Result__L2EB;
+  sz__5CFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5C4 * ((__INTEGER )(sizeof(void *)))));
+  result__4CFH=((__POINTER )(NULL));
+  a__EDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ADFH=(__UINTEGER_32)((__UINTEGER_32)(sz__5CFH + a__EDFH) & (__UINTEGER_32)(~ a__EDFH));
+  new_size2__BDFH=(__UINTEGER_32)(new_size__ADFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__BDFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__IDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__JDFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__BDFH + a__IDFH) & (__UINTEGER_32)(~ a__IDFH));
+    ptr_table__DMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CMIH=((__POINTER )(NULL));
+    result__EMIH=((__POINTER *)ptr_table__DMIH)[ 0];
+    if ((result__EMIH == (void *)NULL)) {
+      result__EMIH=new_lab__ZPJ(new_size__JDFH);
+      next__CMIH=(void *)((unsigned long)result__EMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDFH)));
+      ((__POINTER *)next__CMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DMIH)[ 0]=next__CMIH;
+    } else {
+      next__CMIH=((__POINTER *)result__EMIH)[ 0];
+      if ((next__CMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EMIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JDFH <<  1)) <=  4096)) {
+          next__CMIH=(void *)((unsigned long)result__EMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDFH)));
+        } else {
+          next__CMIH=new_lab__ZPJ(new_size__JDFH);
+        };
+        ((__POINTER *)next__CMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DMIH)[ 0]=next__CMIH;
+      } else {
+        ((__POINTER *)result__EMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EMIH=next__CMIH;
+      };
+    };
+    ((__POINTER *)result__EMIH)[ 0]=((__POINTER ) 3);
+    result__4CFH=(void *)((unsigned long)result__EMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__JZKH=first_free__BCVB;
+    while ((((void *)result__JZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__JZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__ADFH))) {
+      result__JZKH=((__MEMORY *)result__JZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__AVKH == (void *)NULL)) {
-      result__AVKH=new_page__B24();
+    if (((void *)result__JZKH == (void *)NULL)) {
+      result__JZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__JZKH,new_size__ADFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__JZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__4CFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__JZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__L2EB=((void **)result__4CFH);
+  Self__K2JC=(__INTEGER)(nb_elements__5C4 -  1);
+  while ((Self__K2JC >=  0)) {
+    Result__L2EB[Self__K2JC]=NULL;
+    Self__K2JC=(__INTEGER)(Self__K2JC -  1);
   };
-  return(Result__C1EB);
+  return(Result__L2EB);
 }
 
-static void** create__5U2(__INTEGER nb_elements__BV2)
+static void** create__IW2(__INTEGER nb_elements__KW2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LDFH,a__QDFH,new_size__MDFH,new_size2__NDFH,a__UDFH;
+  __UINTEGER_32 new_size__VDFH;
+  __POINTER result__KDFH,ptr_table__IMIH,next__HMIH,result__JMIH;
+  void *result__MZKH;
+  __INTEGER Self__MUJC;
+  void **Result__5NDB;
+  sz__LDFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__KW2 * ((__INTEGER )(sizeof(void *)))));
+  result__KDFH=((__POINTER )(NULL));
+  a__QDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LDFH + a__QDFH) & (__UINTEGER_32)(~ a__QDFH));
+  new_size2__NDFH=(__UINTEGER_32)(new_size__MDFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NDFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__UDFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VDFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NDFH + a__UDFH) & (__UINTEGER_32)(~ a__UDFH));
+    ptr_table__IMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VDFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HMIH=((__POINTER )(NULL));
+    result__JMIH=((__POINTER *)ptr_table__IMIH)[ 0];
+    if ((result__JMIH == (void *)NULL)) {
+      result__JMIH=new_lab__ZPJ(new_size__VDFH);
+      next__HMIH=(void *)((unsigned long)result__JMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDFH)));
+      ((__POINTER *)next__HMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IMIH)[ 0]=next__HMIH;
+    } else {
+      next__HMIH=((__POINTER *)result__JMIH)[ 0];
+      if ((next__HMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JMIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VDFH <<  1)) <=  4096)) {
+          next__HMIH=(void *)((unsigned long)result__JMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VDFH)));
+        } else {
+          next__HMIH=new_lab__ZPJ(new_size__VDFH);
+        };
+        ((__POINTER *)next__HMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IMIH)[ 0]=next__HMIH;
+      } else {
+        ((__POINTER *)result__JMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JMIH=next__HMIH;
+      };
+    };
+    ((__POINTER *)result__JMIH)[ 0]=((__POINTER ) 3);
+    result__KDFH=(void *)((unsigned long)result__JMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__MZKH=first_free__BCVB;
+    while ((((void *)result__MZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__MDFH))) {
+      result__MZKH=((__MEMORY *)result__MZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__DVKH == (void *)NULL)) {
-      result__DVKH=new_page__B24();
+    if (((void *)result__MZKH == (void *)NULL)) {
+      result__MZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__MZKH,new_size__MDFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__KDFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__5NDB=((void **)result__KDFH);
+  Self__MUJC=(__INTEGER)(nb_elements__KW2 -  1);
+  while ((Self__MUJC >=  0)) {
+    Result__5NDB[Self__MUJC]=NULL;
+    Self__MUJC=(__INTEGER)(Self__MUJC -  1);
   };
-  return(Result__WMDB);
+  return(Result__5NDB);
 }
 
-static void** create__KGRB(__INTEGER nb_elements__MGRB)
+static void** create__WHRB(__INTEGER nb_elements__YHRB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__XDFH,a__2DFH,new_size__YDFH,new_size2__ZDFH,a__AEFH;
+  __UINTEGER_32 new_size__BEFH;
+  __POINTER result__WDFH,ptr_table__NMIH,next__MMIH,result__OMIH;
+  void *result__PZKH;
+  __INTEGER Self__MBNC;
+  void **Result__AHUB;
+  sz__XDFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YHRB * ((__INTEGER )(sizeof(void *)))));
+  result__WDFH=((__POINTER )(NULL));
+  a__2DFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__YDFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XDFH + a__2DFH) & (__UINTEGER_32)(~ a__2DFH));
+  new_size2__ZDFH=(__UINTEGER_32)(new_size__YDFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ZDFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__AEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__BEFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZDFH + a__AEFH) & (__UINTEGER_32)(~ a__AEFH));
+    ptr_table__NMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BEFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__MMIH=((__POINTER )(NULL));
+    result__OMIH=((__POINTER *)ptr_table__NMIH)[ 0];
+    if ((result__OMIH == (void *)NULL)) {
+      result__OMIH=new_lab__ZPJ(new_size__BEFH);
+      next__MMIH=(void *)((unsigned long)result__OMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BEFH)));
+      ((__POINTER *)next__MMIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__NMIH)[ 0]=next__MMIH;
+    } else {
+      next__MMIH=((__POINTER *)result__OMIH)[ 0];
+      if ((next__MMIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OMIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BEFH <<  1)) <=  4096)) {
+          next__MMIH=(void *)((unsigned long)result__OMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BEFH)));
+        } else {
+          next__MMIH=new_lab__ZPJ(new_size__BEFH);
+        };
+        ((__POINTER *)next__MMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__NMIH)[ 0]=next__MMIH;
+      } else {
+        ((__POINTER *)result__OMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__OMIH=next__MMIH;
+      };
+    };
+    ((__POINTER *)result__OMIH)[ 0]=((__POINTER ) 3);
+    result__WDFH=(void *)((unsigned long)result__OMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__PZKH=first_free__BCVB;
+    while ((((void *)result__PZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__YDFH))) {
+      result__PZKH=((__MEMORY *)result__PZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__GVKH == (void *)NULL)) {
-      result__GVKH=new_page__B24();
+    if (((void *)result__PZKH == (void *)NULL)) {
+      result__PZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__PZKH,new_size__YDFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__WDFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__AHUB=((void **)result__WDFH);
+  Self__MBNC=(__INTEGER)(nb_elements__YHRB -  1);
+  while ((Self__MBNC >=  0)) {
+    Result__AHUB[Self__MBNC]=NULL;
+    Self__MBNC=(__INTEGER)(Self__MBNC -  1);
   };
-  return(Result__UFUB);
+  return(Result__AHUB);
 }
 
-static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__DBR(__INTEGER new_count__FBR)
+static __FAST_ARRAYoITM_TYPE_MONOo* create_with_capacity__MCR(__INTEGER new_count__OCR)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__KIR,ptr_table__SMIH,next__RMIH,result__TMIH;
+  __POINTER ptr_table__XMIH,next__WMIH,result__YMIH;
+  __INTEGER typ_id__PIR;
+  __UINTEGER_32 sz__MIR,a__EEFH,new_size__FEFH,t__JEFH,a__IEFH;
+  __UINTEGER_32 new_size__0MIH,lab_type__ZMIH;
+  __FAST_ARRAYoITM_TYPE_MONOo *result__JIR,*Self__1GW;
+  result__JIR=NULL;
+  ptr__KIR=((__POINTER )(NULL));
+  typ_id__PIR= 0;
+  sz__MIR=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_MONOo));
+  if ((sz__MIR ==  0)) {
+    result__JIR=FAST_ARRAYoITM_TYPE_MONOo__;
   } else {
-    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);
+    typ_id__PIR=__FAST_ARRAYoITM_TYPE_MONOo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MIR);
+    if ((typ_id__PIR == (__INTEGER)(-  1))) {
+      a__EEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MIR + a__EEFH) & (__UINTEGER_32)(~ a__EEFH));
+      ptr_table__SMIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FEFH / ((__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__ZPJ(new_size__FEFH);
+        next__RMIH=(void *)((unsigned long)result__TMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FEFH)));
+        ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FEFH <<  1)) <=  4096)) {
+            next__RMIH=(void *)((unsigned long)result__TMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FEFH)));
+          } else {
+            next__RMIH=new_lab__ZPJ(new_size__FEFH);
+          };
+          ((__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;
+        };
+      };
+      ptr__KIR=result__TMIH;
+    } else {
+      t__JEFH=((__UINTEGER_32 )typ_id__PIR);
+      a__IEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__0MIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MIR + a__IEFH) & (__UINTEGER_32)(~ a__IEFH));
+      ptr_table__XMIH=((__POINTER )(&(table_type[(t__JEFH)])));
+      lab_type__ZMIH=(__UINTEGER_32)(t__JEFH |  1);
+      next__WMIH=((__POINTER )(NULL));
+      result__YMIH=((__POINTER *)ptr_table__XMIH)[ 0];
+      if ((result__YMIH == (void *)NULL)) {
+        result__YMIH=new_lab__ZPJ(lab_type__ZMIH);
+        next__WMIH=(void *)((unsigned long)result__YMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MIH)));
+        ((__POINTER *)next__WMIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__XMIH)[ 0]=next__WMIH;
+      } else {
+        next__WMIH=((__POINTER *)result__YMIH)[ 0];
+        if ((next__WMIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YMIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0MIH <<  1)) <=  4096)) {
+            next__WMIH=(void *)((unsigned long)result__YMIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0MIH)));
+          } else {
+            next__WMIH=new_lab__ZPJ(lab_type__ZMIH);
+          };
+          ((__POINTER *)next__WMIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XMIH)[ 0]=next__WMIH;
+        } else {
+          ((__POINTER *)result__YMIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WMIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__YMIH=next__WMIH;
+        };
+      };
+      ptr__KIR=result__YMIH;
+    };
+    result__JIR=((__FAST_ARRAYoITM_TYPE_MONOo *)ptr__KIR);
+    *(result__JIR) = *(FAST_ARRAYoITM_TYPE_MONOo__);
+  };
+  Self__1GW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__JIR);
+  if ((Self__1GW->parent_arrayed_collection__EYC.capacity__1KV < new_count__OCR)) {
+    Self__1GW->parent_arrayed_collection__EYC.storage__NJV=create__35QB(new_count__OCR);
+    Self__1GW->parent_arrayed_collection__EYC.capacity__1KV=new_count__OCR;
+  };
+  Self__1GW->parent_arrayed_collection__EYC.upper__GFV=(__INTEGER)(-  1);
+  return(result__JIR);
 }
 
-static void** create__OVBB(__INTEGER nb_elements__QVBB)
+static void** create__XWBB(__INTEGER nb_elements__ZWBB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__LEFH,a__QEFH,new_size__MEFH,new_size2__NEFH,a__UEFH;
+  __UINTEGER_32 new_size__VEFH;
+  __POINTER result__KEFH,ptr_table__2MIH,next__1MIH,result__3MIH;
+  void *result__SZKH;
+  __INTEGER Self__4LKC;
+  void **Result__FVIB;
+  sz__LEFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__ZWBB * ((__INTEGER )(sizeof(void *)))));
+  result__KEFH=((__POINTER )(NULL));
+  a__QEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__MEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__LEFH + a__QEFH) & (__UINTEGER_32)(~ a__QEFH));
+  new_size2__NEFH=(__UINTEGER_32)(new_size__MEFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__NEFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__UEFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__VEFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__NEFH + a__UEFH) & (__UINTEGER_32)(~ a__UEFH));
+    ptr_table__2MIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VEFH / ((__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__ZPJ(new_size__VEFH);
+      next__1MIH=(void *)((unsigned long)result__3MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEFH)));
+      ((__POINTER *)next__1MIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__2MIH)[ 0]=next__1MIH;
+    } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VEFH <<  1)) <=  4096)) {
+          next__1MIH=(void *)((unsigned long)result__3MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VEFH)));
+        } else {
+          next__1MIH=new_lab__ZPJ(new_size__VEFH);
+        };
+        ((__POINTER *)next__1MIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__2MIH)[ 0]=next__1MIH;
+      } else {
+        ((__POINTER *)result__3MIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1MIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__3MIH=next__1MIH;
+      };
+    };
+    ((__POINTER *)result__3MIH)[ 0]=((__POINTER ) 3);
+    result__KEFH=(void *)((unsigned long)result__3MIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__SZKH=first_free__BCVB;
+    while ((((void *)result__SZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__SZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__MEFH))) {
+      result__SZKH=((__MEMORY *)result__SZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__JVKH == (void *)NULL)) {
-      result__JVKH=new_page__B24();
+    if (((void *)result__SZKH == (void *)NULL)) {
+      result__SZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__SZKH,new_size__MEFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__SZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__KEFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__SZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__FVIB=((void **)result__KEFH);
+  Self__4LKC=(__INTEGER)(nb_elements__ZWBB -  1);
+  while ((Self__4LKC >=  0)) {
+    Result__FVIB[Self__4LKC]=NULL;
+    Self__4LKC=(__INTEGER)(Self__4LKC -  1);
   };
-  return(Result__1TIB);
+  return(Result__FVIB);
 }
 
-static void** create__KIXB(__INTEGER nb_elements__MIXB)
+static void** create__WJXB(__INTEGER nb_elements__YJXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__XEFH,a__2EFH,new_size__YEFH,new_size2__ZEFH,a__AFFH;
+  __UINTEGER_32 new_size__BFFH;
+  __POINTER result__WEFH,ptr_table__BNIH,next__ANIH,result__CNIH;
+  void *result__VZKH;
+  __INTEGER Self__LZOC;
+  void **Result__JV0B;
+  sz__XEFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__YJXB * ((__INTEGER )(sizeof(void *)))));
+  result__WEFH=((__POINTER )(NULL));
+  a__2EFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__YEFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XEFH + a__2EFH) & (__UINTEGER_32)(~ a__2EFH));
+  new_size2__ZEFH=(__UINTEGER_32)(new_size__YEFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ZEFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__AFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__BFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZEFH + a__AFFH) & (__UINTEGER_32)(~ a__AFFH));
+    ptr_table__BNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__ANIH=((__POINTER )(NULL));
+    result__CNIH=((__POINTER *)ptr_table__BNIH)[ 0];
+    if ((result__CNIH == (void *)NULL)) {
+      result__CNIH=new_lab__ZPJ(new_size__BFFH);
+      next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFFH)));
+      ((__POINTER *)next__ANIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
+    } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BFFH <<  1)) <=  4096)) {
+          next__ANIH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BFFH)));
+        } else {
+          next__ANIH=new_lab__ZPJ(new_size__BFFH);
+        };
+        ((__POINTER *)next__ANIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__BNIH)[ 0]=next__ANIH;
+      } else {
+        ((__POINTER *)result__CNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ANIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__CNIH=next__ANIH;
+      };
+    };
+    ((__POINTER *)result__CNIH)[ 0]=((__POINTER ) 3);
+    result__WEFH=(void *)((unsigned long)result__CNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__VZKH=first_free__BCVB;
+    while ((((void *)result__VZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__VZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__YEFH))) {
+      result__VZKH=((__MEMORY *)result__VZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__MVKH == (void *)NULL)) {
-      result__MVKH=new_page__B24();
+    if (((void *)result__VZKH == (void *)NULL)) {
+      result__VZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__VZKH,new_size__YEFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__VZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__WEFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__VZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__JV0B=((void **)result__WEFH);
+  Self__LZOC=(__INTEGER)(nb_elements__YJXB -  1);
+  while ((Self__LZOC >=  0)) {
+    Result__JV0B[Self__LZOC]=NULL;
+    Self__LZOC=(__INTEGER)(Self__LZOC -  1);
   };
-  return(Result__3T0B);
+  return(Result__JV0B);
 }
 
-static void** create__FRWB(__INTEGER nb_elements__HRWB)
+static void** create__RSWB(__INTEGER nb_elements__TSWB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DFFH,a__IFFH,new_size__EFFH,new_size2__FFFH,a__MFFH;
+  __UINTEGER_32 new_size__NFFH;
+  __POINTER result__CFFH,ptr_table__GNIH,next__FNIH,result__HNIH;
+  void *result__YZKH;
+  __INTEGER Self__EYOC;
+  void **Result__SH0B;
+  sz__DFFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TSWB * ((__INTEGER )(sizeof(void *)))));
+  result__CFFH=((__POINTER )(NULL));
+  a__IFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__DFFH + a__IFFH) & (__UINTEGER_32)(~ a__IFFH));
+  new_size2__FFFH=(__UINTEGER_32)(new_size__EFFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FFFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FFFH + a__MFFH) & (__UINTEGER_32)(~ a__MFFH));
+    ptr_table__GNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__FNIH=((__POINTER )(NULL));
+    result__HNIH=((__POINTER *)ptr_table__GNIH)[ 0];
+    if ((result__HNIH == (void *)NULL)) {
+      result__HNIH=new_lab__ZPJ(new_size__NFFH);
+      next__FNIH=(void *)((unsigned long)result__HNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFFH)));
+      ((__POINTER *)next__FNIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__GNIH)[ 0]=next__FNIH;
+    } else {
+      next__FNIH=((__POINTER *)result__HNIH)[ 0];
+      if ((next__FNIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HNIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NFFH <<  1)) <=  4096)) {
+          next__FNIH=(void *)((unsigned long)result__HNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFFH)));
+        } else {
+          next__FNIH=new_lab__ZPJ(new_size__NFFH);
+        };
+        ((__POINTER *)next__FNIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GNIH)[ 0]=next__FNIH;
+      } else {
+        ((__POINTER *)result__HNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__HNIH=next__FNIH;
+      };
+    };
+    ((__POINTER *)result__HNIH)[ 0]=((__POINTER ) 3);
+    result__CFFH=(void *)((unsigned long)result__HNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__YZKH=first_free__BCVB;
+    while ((((void *)result__YZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__YZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__EFFH))) {
+      result__YZKH=((__MEMORY *)result__YZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__PVKH == (void *)NULL)) {
-      result__PVKH=new_page__B24();
+    if (((void *)result__YZKH == (void *)NULL)) {
+      result__YZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__YZKH,new_size__EFFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__YZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__CFFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__YZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__SH0B=((void **)result__CFFH);
+  Self__EYOC=(__INTEGER)(nb_elements__TSWB -  1);
+  while ((Self__EYOC >=  0)) {
+    Result__SH0B[Self__EYOC]=NULL;
+    Self__EYOC=(__INTEGER)(Self__EYOC -  1);
   };
-  return(Result__GG0B);
+  return(Result__SH0B);
 }
 
-static void** create__EPXB(__INTEGER nb_elements__GPXB)
+static void** create__QQXB(__INTEGER nb_elements__SQXB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__PFFH,a__UFFH,new_size__QFFH,new_size2__RFFH,a__YFFH;
+  __UINTEGER_32 new_size__ZFFH;
+  __POINTER result__OFFH,ptr_table__LNIH,next__KNIH,result__MNIH;
+  void *result__1ZKH;
+  __INTEGER Self__S0OC;
+  void **Result__520B;
+  sz__PFFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__SQXB * ((__INTEGER )(sizeof(void *)))));
+  result__OFFH=((__POINTER )(NULL));
+  a__UFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__QFFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PFFH + a__UFFH) & (__UINTEGER_32)(~ a__UFFH));
+  new_size2__RFFH=(__UINTEGER_32)(new_size__QFFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__RFFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YFFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZFFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RFFH + a__YFFH) & (__UINTEGER_32)(~ a__YFFH));
+    ptr_table__LNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZFFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KNIH=((__POINTER )(NULL));
+    result__MNIH=((__POINTER *)ptr_table__LNIH)[ 0];
+    if ((result__MNIH == (void *)NULL)) {
+      result__MNIH=new_lab__ZPJ(new_size__ZFFH);
+      next__KNIH=(void *)((unsigned long)result__MNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFFH)));
+      ((__POINTER *)next__KNIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LNIH)[ 0]=next__KNIH;
+    } else {
+      next__KNIH=((__POINTER *)result__MNIH)[ 0];
+      if ((next__KNIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MNIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZFFH <<  1)) <=  4096)) {
+          next__KNIH=(void *)((unsigned long)result__MNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFFH)));
+        } else {
+          next__KNIH=new_lab__ZPJ(new_size__ZFFH);
+        };
+        ((__POINTER *)next__KNIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LNIH)[ 0]=next__KNIH;
+      } else {
+        ((__POINTER *)result__MNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MNIH=next__KNIH;
+      };
+    };
+    ((__POINTER *)result__MNIH)[ 0]=((__POINTER ) 3);
+    result__OFFH=(void *)((unsigned long)result__MNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__1ZKH=first_free__BCVB;
+    while ((((void *)result__1ZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__1ZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__QFFH))) {
+      result__1ZKH=((__MEMORY *)result__1ZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__SVKH == (void *)NULL)) {
-      result__SVKH=new_page__B24();
+    if (((void *)result__1ZKH == (void *)NULL)) {
+      result__1ZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__1ZKH,new_size__QFFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__1ZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__OFFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__1ZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__520B=((void **)result__OFFH);
+  Self__S0OC=(__INTEGER)(nb_elements__SQXB -  1);
+  while ((Self__S0OC >=  0)) {
+    Result__520B[Self__S0OC]=NULL;
+    Self__S0OC=(__INTEGER)(Self__S0OC -  1);
   };
-  return(Result__T10B);
+  return(Result__520B);
 }
 
-static void** create__ID5(__INTEGER nb_elements__KD5)
+static void** create__RE5(__INTEGER nb_elements__TE5)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1FFH,a__AGFH,new_size__2FFH,new_size2__3FFH,a__EGFH;
+  __UINTEGER_32 new_size__FGFH;
+  __POINTER result__0FFH,ptr_table__QNIH,next__PNIH,result__RNIH;
+  void *result__4ZKH;
+  __INTEGER Self__HAKC;
+  void **Result__M4FB;
+  sz__1FFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TE5 * ((__INTEGER )(sizeof(void *)))));
+  result__0FFH=((__POINTER )(NULL));
+  a__AGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2FFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1FFH + a__AGFH) & (__UINTEGER_32)(~ a__AGFH));
+  new_size2__3FFH=(__UINTEGER_32)(new_size__2FFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3FFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FGFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3FFH + a__EGFH) & (__UINTEGER_32)(~ a__EGFH));
+    ptr_table__QNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FGFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__PNIH=((__POINTER )(NULL));
+    result__RNIH=((__POINTER *)ptr_table__QNIH)[ 0];
+    if ((result__RNIH == (void *)NULL)) {
+      result__RNIH=new_lab__ZPJ(new_size__FGFH);
+      next__PNIH=(void *)((unsigned long)result__RNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGFH)));
+      ((__POINTER *)next__PNIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__QNIH)[ 0]=next__PNIH;
+    } else {
+      next__PNIH=((__POINTER *)result__RNIH)[ 0];
+      if ((next__PNIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RNIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FGFH <<  1)) <=  4096)) {
+          next__PNIH=(void *)((unsigned long)result__RNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FGFH)));
+        } else {
+          next__PNIH=new_lab__ZPJ(new_size__FGFH);
+        };
+        ((__POINTER *)next__PNIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QNIH)[ 0]=next__PNIH;
+      } else {
+        ((__POINTER *)result__RNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__RNIH=next__PNIH;
+      };
+    };
+    ((__POINTER *)result__RNIH)[ 0]=((__POINTER ) 3);
+    result__0FFH=(void *)((unsigned long)result__RNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__4ZKH=first_free__BCVB;
+    while ((((void *)result__4ZKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__4ZKH)->map_size_and_id__YTB &  4294967292LU) < new_size__2FFH))) {
+      result__4ZKH=((__MEMORY *)result__4ZKH)->map_next_free__ZTB;
     };
-    if (((void *)result__VVKH == (void *)NULL)) {
-      result__VVKH=new_page__B24();
+    if (((void *)result__4ZKH == (void *)NULL)) {
+      result__4ZKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__4ZKH,new_size__2FFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__4ZKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__0FFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__4ZKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__M4FB=((void **)result__0FFH);
+  Self__HAKC=(__INTEGER)(nb_elements__TE5 -  1);
+  while ((Self__HAKC >=  0)) {
+    Result__M4FB[Self__HAKC]=NULL;
+    Self__HAKC=(__INTEGER)(Self__HAKC -  1);
   };
-  return(Result__C3FB);
+  return(Result__M4FB);
 }
 
-static void fast_put__to__GKZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__HKZ,void *v__IKZ,void *k__JKZ)
+static void fast_put__to__PLZ(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__QLZ,void *v__RLZ,void *k__SLZ)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{ITM_TYPE_PARAMETERxITM_TYPE_SIMPLE},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__ZXHH,*Self__4XHH;
+  __INTEGER result__YXHH,__tmp__0XHH,Self__1XHH,idx__0LZ,idx__1ATB;
+  __INTEGER new_capacity__2ATB,i__3ATB,result__3XHH,__tmp__5XHH;
+  __INTEGER Self__AYHH,typ_id__KDTB;
+  __POINTER ptr__FDTB,ptr_table__VNIH,next__UNIH,result__WNIH;
+  __POINTER ptr_table__0NIH,next__ZNIH,result__1NIH;
+  __UINTEGER_32 sz__HDTB,a__F0FH,new_size__G0FH,t__K0FH,a__J0FH;
+  __UINTEGER_32 new_size__3NIH,lab_type__2NIH;
+  void *node__1LZ,*node1__5ATB,*node2__ABTB,*__tmp__INZ;
+  void **old_buckets__4ATB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *result__EDTB;
+  __HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__XWEC;
+  Self__ZXHH=((__STRING_CONSTANT *)k__SLZ);
+  result__YXHH= 0;
+  __tmp__0XHH=Self__ZXHH->count__DD;
+  Self__1XHH= 1;
+  while ((Self__1XHH <= __tmp__0XHH)) {
+    result__YXHH=(__INTEGER)((__INTEGER)( 5 * result__YXHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__ZXHH->storage__ZNO)[(__INTEGER)(Self__1XHH -  1)])));
+    Self__1XHH=(__INTEGER)(Self__1XHH +  1);
+  };
+  if ((result__YXHH <  0)) {
+    result__YXHH=(__INTEGER)(~ result__YXHH);
+  };
+  idx__0LZ=(__INTEGER)(result__YXHH % Self__QLZ->capacity__LZT);
+  node__1LZ=((void **)Self__QLZ->buckets__QZT)[idx__0LZ];
+  while ((! (((void *)node__1LZ == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__1LZ)->key__2ZT == (void *)k__SLZ)))) {
+    node__1LZ=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__1LZ)->next__H0T;
+  };
+  if (((void *)node__1LZ == (void *)NULL)) {
+    if ((Self__QLZ->capacity__LZT == Self__QLZ->count__ICZ)) {
+      idx__1ATB= 0;
+      node1__5ATB=NULL;
+      node2__ABTB=NULL;
+      old_buckets__4ATB=Self__QLZ->buckets__QZT;
+      new_capacity__2ATB=prime_number_ceiling__T11((__INTEGER)(Self__QLZ->capacity__LZT +  1));
+      Self__QLZ->buckets__QZT=create__RE5(new_capacity__2ATB);
+      i__3ATB=(__INTEGER)(Self__QLZ->capacity__LZT -  1);
+      Self__QLZ->capacity__LZT=new_capacity__2ATB;
+      while ((i__3ATB >=  0)) {
+        node1__5ATB=((void **)old_buckets__4ATB)[i__3ATB];
+        while (((void *)node1__5ATB != (void *)NULL)) {
+          node2__ABTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__5ATB)->next__H0T;
+          Self__4XHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__5ATB)->key__2ZT);
+          result__3XHH= 0;
+          __tmp__5XHH=Self__4XHH->count__DD;
+          Self__AYHH= 1;
+          while ((Self__AYHH <= __tmp__5XHH)) {
+            result__3XHH=(__INTEGER)((__INTEGER)( 5 * result__3XHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__4XHH->storage__ZNO)[(__INTEGER)(Self__AYHH -  1)])));
+            Self__AYHH=(__INTEGER)(Self__AYHH +  1);
+          };
+          if ((result__3XHH <  0)) {
+            result__3XHH=(__INTEGER)(~ result__3XHH);
+          };
+          idx__1ATB=(__INTEGER)(result__3XHH % Self__QLZ->capacity__LZT);
+          ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node1__5ATB)->next__H0T=((void **)Self__QLZ->buckets__QZT)[idx__1ATB];
+          ((void **)Self__QLZ->buckets__QZT)[idx__1ATB]=node1__5ATB;
+          node1__5ATB=node2__ABTB;
+        };
+        i__3ATB=(__INTEGER)(i__3ATB -  1);
+      };
+      idx__0LZ=(__INTEGER)(result__YXHH % new_capacity__2ATB);
+    };
+    __tmp__INZ=((void **)Self__QLZ->buckets__QZT)[idx__0LZ];
+    result__EDTB=NULL;
+    ptr__FDTB=((__POINTER )(NULL));
+    typ_id__KDTB= 0;
+    sz__HDTB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo));
+    if ((sz__HDTB ==  0)) {
+      result__EDTB=HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+    } else {
+      typ_id__KDTB=__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HDTB);
+      if ((typ_id__KDTB == (__INTEGER)(-  1))) {
+        a__F0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__G0FH=(__UINTEGER_32)((__UINTEGER_32)(sz__HDTB + a__F0FH) & (__UINTEGER_32)(~ a__F0FH));
+        ptr_table__VNIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G0FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__UNIH=((__POINTER )(NULL));
+        result__WNIH=((__POINTER *)ptr_table__VNIH)[ 0];
+        if ((result__WNIH == (void *)NULL)) {
+          result__WNIH=new_lab__ZPJ(new_size__G0FH);
+          next__UNIH=(void *)((unsigned long)result__WNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0FH)));
+          ((__POINTER *)next__UNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VNIH)[ 0]=next__UNIH;
+        } else {
+          next__UNIH=((__POINTER *)result__WNIH)[ 0];
+          if ((next__UNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WNIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__G0FH <<  1)) <=  4096)) {
+              next__UNIH=(void *)((unsigned long)result__WNIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0FH)));
             } else {
-              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)));
+              next__UNIH=new_lab__ZPJ(new_size__G0FH);
+            };
+            ((__POINTER *)next__UNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VNIH)[ 0]=next__UNIH;
+          } else {
+            ((__POINTER *)result__WNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WNIH=next__UNIH;
+          };
+        };
+        ptr__FDTB=result__WNIH;
+      } else {
+        t__K0FH=((__UINTEGER_32 )typ_id__KDTB);
+        a__J0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3NIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HDTB + a__J0FH) & (__UINTEGER_32)(~ a__J0FH));
+        ptr_table__0NIH=((__POINTER )(&(table_type[(t__K0FH)])));
+        lab_type__2NIH=(__UINTEGER_32)(t__K0FH |  1);
+        next__ZNIH=((__POINTER )(NULL));
+        result__1NIH=((__POINTER *)ptr_table__0NIH)[ 0];
+        if ((result__1NIH == (void *)NULL)) {
+          result__1NIH=new_lab__ZPJ(lab_type__2NIH);
+          next__ZNIH=(void *)((unsigned long)result__1NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NIH)));
+          ((__POINTER *)next__ZNIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0NIH)[ 0]=next__ZNIH;
+        } else {
+          next__ZNIH=((__POINTER *)result__1NIH)[ 0];
+          if ((next__ZNIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1NIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3NIH <<  1)) <=  4096)) {
+              next__ZNIH=(void *)((unsigned long)result__1NIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NIH)));
             } else {
-              next__QJIH=new_lab__QOJ(lab_type__TJIH);
+              next__ZNIH=new_lab__ZPJ(lab_type__2NIH);
             };
-            ((__POINTER *)next__QJIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RJIH)[ 0]=next__QJIH;
+            ((__POINTER *)next__ZNIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0NIH)[ 0]=next__ZNIH;
           } else {
-            ((__POINTER *)result__SJIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QJIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SJIH=next__QJIH;
+            ((__POINTER *)result__1NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1NIH=next__ZNIH;
           };
         };
-        ptr__ZBTB=result__SJIH;
+        ptr__FDTB=result__1NIH;
       };
-      result__YBTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__ZBTB);
-      *(result__YBTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
+      result__EDTB=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)ptr__FDTB);
+      *(result__EDTB) = *(HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo__);
     };
-    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);
+    Self__XWEC=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)result__EDTB);
+    Self__XWEC->item__P0T=v__RLZ;
+    Self__XWEC->key__2ZT=k__SLZ;
+    Self__XWEC->next__H0T=__tmp__INZ;
+    node__1LZ=result__EDTB;
+    ((void **)Self__QLZ->buckets__QZT)[idx__0LZ]=result__EDTB;
+    Self__QLZ->count__ICZ=(__INTEGER)(Self__QLZ->count__ICZ +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__SKZ)->item__GZT=v__IKZ;
+    ((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__1LZ)->item__P0T=v__RLZ;
   };
 }
 
-static void** create__QEYB(__INTEGER nb_elements__SEYB)
+static void** create__2FYB(__INTEGER nb_elements__4FYB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__PGFH,a__UGFH,new_size__QGFH,new_size2__RGFH,a__YGFH;
+  __UINTEGER_32 new_size__ZGFH;
+  __POINTER result__OGFH,ptr_table__5NIH,next__4NIH,result__AOIH;
+  void *result__B0KH;
+  __INTEGER Self__Z1OC;
+  void **Result__3G1B;
+  sz__PGFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__4FYB * ((__INTEGER )(sizeof(void *)))));
+  result__OGFH=((__POINTER )(NULL));
+  a__UGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__QGFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PGFH + a__UGFH) & (__UINTEGER_32)(~ a__UGFH));
+  new_size2__RGFH=(__UINTEGER_32)(new_size__QGFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__RGFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YGFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZGFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RGFH + a__YGFH) & (__UINTEGER_32)(~ a__YGFH));
+    ptr_table__5NIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZGFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__4NIH=((__POINTER )(NULL));
+    result__AOIH=((__POINTER *)ptr_table__5NIH)[ 0];
+    if ((result__AOIH == (void *)NULL)) {
+      result__AOIH=new_lab__ZPJ(new_size__ZGFH);
+      next__4NIH=(void *)((unsigned long)result__AOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZGFH)));
+      ((__POINTER *)next__4NIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__5NIH)[ 0]=next__4NIH;
+    } else {
+      next__4NIH=((__POINTER *)result__AOIH)[ 0];
+      if ((next__4NIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AOIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZGFH <<  1)) <=  4096)) {
+          next__4NIH=(void *)((unsigned long)result__AOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZGFH)));
+        } else {
+          next__4NIH=new_lab__ZPJ(new_size__ZGFH);
+        };
+        ((__POINTER *)next__4NIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5NIH)[ 0]=next__4NIH;
+      } else {
+        ((__POINTER *)result__AOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4NIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__AOIH=next__4NIH;
+      };
+    };
+    ((__POINTER *)result__AOIH)[ 0]=((__POINTER ) 3);
+    result__OGFH=(void *)((unsigned long)result__AOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__B0KH=first_free__BCVB;
+    while ((((void *)result__B0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__B0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__QGFH))) {
+      result__B0KH=((__MEMORY *)result__B0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__YVKH == (void *)NULL)) {
-      result__YVKH=new_page__B24();
+    if (((void *)result__B0KH == (void *)NULL)) {
+      result__B0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__B0KH,new_size__QGFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__B0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__OGFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__B0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__3G1B=((void **)result__OGFH);
+  Self__Z1OC=(__INTEGER)(nb_elements__4FYB -  1);
+  while ((Self__Z1OC >=  0)) {
+    Result__3G1B[Self__Z1OC]=NULL;
+    Self__Z1OC=(__INTEGER)(Self__Z1OC -  1);
   };
-  return(Result__RF1B);
+  return(Result__3G1B);
 }
 
-static void* get__HQI(void *n__JQI)
+static void* get__QRI(void *n__SRI)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__0RI;
+  __ITM_TYPE_SIMPLE *result__EKL,*Self__OOU;
+  __POINTER ptr__FKL,ptr_table__EOIH,next__DOIH,result__FOIH;
+  __POINTER ptr_table__JOIH,next__IOIH,result__KOIH;
+  __INTEGER typ_id__KKL;
+  __UINTEGER_32 sz__HKL,a__2GFH,new_size__3GFH,t__BHFH,a__AHFH;
+  __UINTEGER_32 new_size__MOIH,lab_type__LOIH;
+  result__0RI=fast_reference_at__2YT(dico__5RI,n__SRI);
+  if (((void *)result__0RI == (void *)NULL)) {
+    result__EKL=NULL;
+    ptr__FKL=((__POINTER )(NULL));
+    typ_id__KKL= 0;
+    sz__HKL=((__UINTEGER_32 )sizeof(__ITM_TYPE_SIMPLE));
+    if ((sz__HKL ==  0)) {
+      result__EKL=ITM_TYPE_SIMPLE__;
+    } else {
+      typ_id__KKL=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HKL);
+      if ((typ_id__KKL == (__INTEGER)(-  1))) {
+        a__2GFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3GFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HKL + a__2GFH) & (__UINTEGER_32)(~ a__2GFH));
+        ptr_table__EOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3GFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DOIH=((__POINTER )(NULL));
+        result__FOIH=((__POINTER *)ptr_table__EOIH)[ 0];
+        if ((result__FOIH == (void *)NULL)) {
+          result__FOIH=new_lab__ZPJ(new_size__3GFH);
+          next__DOIH=(void *)((unsigned long)result__FOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GFH)));
+          ((__POINTER *)next__DOIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EOIH)[ 0]=next__DOIH;
+        } else {
+          next__DOIH=((__POINTER *)result__FOIH)[ 0];
+          if ((next__DOIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FOIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3GFH <<  1)) <=  4096)) {
+              next__DOIH=(void *)((unsigned long)result__FOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GFH)));
             } else {
-              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)));
+              next__DOIH=new_lab__ZPJ(new_size__3GFH);
+            };
+            ((__POINTER *)next__DOIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EOIH)[ 0]=next__DOIH;
+          } else {
+            ((__POINTER *)result__FOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FOIH=next__DOIH;
+          };
+        };
+        ptr__FKL=result__FOIH;
+      } else {
+        t__BHFH=((__UINTEGER_32 )typ_id__KKL);
+        a__AHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MOIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HKL + a__AHFH) & (__UINTEGER_32)(~ a__AHFH));
+        ptr_table__JOIH=((__POINTER )(&(table_type[(t__BHFH)])));
+        lab_type__LOIH=(__UINTEGER_32)(t__BHFH |  1);
+        next__IOIH=((__POINTER )(NULL));
+        result__KOIH=((__POINTER *)ptr_table__JOIH)[ 0];
+        if ((result__KOIH == (void *)NULL)) {
+          result__KOIH=new_lab__ZPJ(lab_type__LOIH);
+          next__IOIH=(void *)((unsigned long)result__KOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MOIH)));
+          ((__POINTER *)next__IOIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JOIH)[ 0]=next__IOIH;
+        } else {
+          next__IOIH=((__POINTER *)result__KOIH)[ 0];
+          if ((next__IOIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KOIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MOIH <<  1)) <=  4096)) {
+              next__IOIH=(void *)((unsigned long)result__KOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MOIH)));
             } else {
-              next__5JIH=new_lab__QOJ(lab_type__CKIH);
+              next__IOIH=new_lab__ZPJ(lab_type__LOIH);
             };
-            ((__POINTER *)next__5JIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__AKIH)[ 0]=next__5JIH;
+            ((__POINTER *)next__IOIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JOIH)[ 0]=next__IOIH;
           } else {
-            ((__POINTER *)result__BKIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5JIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BKIH=next__5JIH;
+            ((__POINTER *)result__KOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KOIH=next__IOIH;
           };
         };
-        ptr__2IL=result__BKIH;
+        ptr__FKL=result__KOIH;
       };
-      result__1IL=((__ITM_TYPE_SIMPLE *)ptr__2IL);
-      *(result__1IL) = *(ITM_TYPE_SIMPLE__);
+      result__EKL=((__ITM_TYPE_SIMPLE *)ptr__FKL);
+      *(result__EKL) = *(ITM_TYPE_SIMPLE__);
     };
-    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;
+    Self__OOU=((__ITM_TYPE_SIMPLE *)result__EKL);
+    Self__OOU->name__OVP=n__SRI;
+    fast_put__to__PLZ(dico__5RI,Self__OOU,n__SRI);
+    result__0RI=result__EKL;
   };
-  return(result__RQI);
+  return(result__0RI);
 }
 
-static void** create__CEQB(__INTEGER nb_elements__EEQB)
+static void** create__OFQB(__INTEGER nb_elements__QFQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__DHFH,a__IHFH,new_size__EHFH,new_size2__FHFH,a__MHFH;
+  __UINTEGER_32 new_size__NHFH;
+  __POINTER result__CHFH,ptr_table__OOIH,next__NOIH,result__POIH;
+  void *result__E0KH;
+  __INTEGER Self__4WMC;
+  void **Result__14SB;
+  sz__DHFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__QFQB * ((__INTEGER )(sizeof(void *)))));
+  result__CHFH=((__POINTER )(NULL));
+  a__IHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__EHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__DHFH + a__IHFH) & (__UINTEGER_32)(~ a__IHFH));
+  new_size2__FHFH=(__UINTEGER_32)(new_size__EHFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__FHFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NHFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__FHFH + a__MHFH) & (__UINTEGER_32)(~ a__MHFH));
+    ptr_table__OOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NHFH / ((__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__ZPJ(new_size__NHFH);
+      next__NOIH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHFH)));
+      ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NHFH <<  1)) <=  4096)) {
+          next__NOIH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NHFH)));
+        } else {
+          next__NOIH=new_lab__ZPJ(new_size__NHFH);
+        };
+        ((__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__CHFH=(void *)((unsigned long)result__POIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__E0KH=first_free__BCVB;
+    while ((((void *)result__E0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__E0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__EHFH))) {
+      result__E0KH=((__MEMORY *)result__E0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__1VKH == (void *)NULL)) {
-      result__1VKH=new_page__B24();
+    if (((void *)result__E0KH == (void *)NULL)) {
+      result__E0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__E0KH,new_size__EHFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__E0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__CHFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__E0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__14SB=((void **)result__CHFH);
+  Self__4WMC=(__INTEGER)(nb_elements__QFQB -  1);
+  while ((Self__4WMC >=  0)) {
+    Result__14SB[Self__4WMC]=NULL;
+    Self__4WMC=(__INTEGER)(Self__4WMC -  1);
   };
-  return(Result__P3SB);
+  return(Result__14SB);
 }
 
-static void** create__SYPB(__INTEGER nb_elements__UYPB)
+static void** create__4ZPB(__INTEGER nb_elements__A0PB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__PHFH,a__UHFH,new_size__QHFH,new_size2__RHFH,a__YHFH;
+  __UINTEGER_32 new_size__ZHFH;
+  __POINTER result__OHFH,ptr_table__TOIH,next__SOIH,result__UOIH;
+  void *result__H0KH;
+  __INTEGER Self__XVMC;
+  void **Result__QWSB;
+  sz__PHFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__A0PB * ((__INTEGER )(sizeof(void *)))));
+  result__OHFH=((__POINTER )(NULL));
+  a__UHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__QHFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PHFH + a__UHFH) & (__UINTEGER_32)(~ a__UHFH));
+  new_size2__RHFH=(__UINTEGER_32)(new_size__QHFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__RHFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YHFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZHFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RHFH + a__YHFH) & (__UINTEGER_32)(~ a__YHFH));
+    ptr_table__TOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZHFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SOIH=((__POINTER )(NULL));
+    result__UOIH=((__POINTER *)ptr_table__TOIH)[ 0];
+    if ((result__UOIH == (void *)NULL)) {
+      result__UOIH=new_lab__ZPJ(new_size__ZHFH);
+      next__SOIH=(void *)((unsigned long)result__UOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHFH)));
+      ((__POINTER *)next__SOIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TOIH)[ 0]=next__SOIH;
+    } else {
+      next__SOIH=((__POINTER *)result__UOIH)[ 0];
+      if ((next__SOIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UOIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZHFH <<  1)) <=  4096)) {
+          next__SOIH=(void *)((unsigned long)result__UOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZHFH)));
+        } else {
+          next__SOIH=new_lab__ZPJ(new_size__ZHFH);
+        };
+        ((__POINTER *)next__SOIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TOIH)[ 0]=next__SOIH;
+      } else {
+        ((__POINTER *)result__UOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UOIH=next__SOIH;
+      };
+    };
+    ((__POINTER *)result__UOIH)[ 0]=((__POINTER ) 3);
+    result__OHFH=(void *)((unsigned long)result__UOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__H0KH=first_free__BCVB;
+    while ((((void *)result__H0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__H0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__QHFH))) {
+      result__H0KH=((__MEMORY *)result__H0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__4VKH == (void *)NULL)) {
-      result__4VKH=new_page__B24();
+    if (((void *)result__H0KH == (void *)NULL)) {
+      result__H0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__H0KH,new_size__QHFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__H0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__OHFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__H0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__QWSB=((void **)result__OHFH);
+  Self__XVMC=(__INTEGER)(nb_elements__A0PB -  1);
+  while ((Self__XVMC >=  0)) {
+    Result__QWSB[Self__XVMC]=NULL;
+    Self__XVMC=(__INTEGER)(Self__XVMC -  1);
   };
-  return(Result__EVSB);
+  return(Result__QWSB);
 }
 
-static void** create__U0ZB(__INTEGER nb_elements__W0ZB)
+static void** create__A2ZB(__INTEGER nb_elements__C2ZB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1HFH,a__AIFH,new_size__2HFH,new_size2__3HFH,a__EIFH;
+  __UINTEGER_32 new_size__FIFH;
+  __POINTER result__0HFH,ptr_table__YOIH,next__XOIH,result__ZOIH;
+  void *result__K0KH;
+  __INTEGER Self__F5OC;
+  void **Result__YC2B;
+  sz__1HFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__C2ZB * ((__INTEGER )(sizeof(void *)))));
+  result__0HFH=((__POINTER )(NULL));
+  a__AIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2HFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1HFH + a__AIFH) & (__UINTEGER_32)(~ a__AIFH));
+  new_size2__3HFH=(__UINTEGER_32)(new_size__2HFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3HFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FIFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3HFH + a__EIFH) & (__UINTEGER_32)(~ a__EIFH));
+    ptr_table__YOIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__XOIH=((__POINTER )(NULL));
+    result__ZOIH=((__POINTER *)ptr_table__YOIH)[ 0];
+    if ((result__ZOIH == (void *)NULL)) {
+      result__ZOIH=new_lab__ZPJ(new_size__FIFH);
+      next__XOIH=(void *)((unsigned long)result__ZOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FIFH)));
+      ((__POINTER *)next__XOIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__YOIH)[ 0]=next__XOIH;
+    } else {
+      next__XOIH=((__POINTER *)result__ZOIH)[ 0];
+      if ((next__XOIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZOIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FIFH <<  1)) <=  4096)) {
+          next__XOIH=(void *)((unsigned long)result__ZOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FIFH)));
+        } else {
+          next__XOIH=new_lab__ZPJ(new_size__FIFH);
+        };
+        ((__POINTER *)next__XOIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YOIH)[ 0]=next__XOIH;
+      } else {
+        ((__POINTER *)result__ZOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__ZOIH=next__XOIH;
+      };
+    };
+    ((__POINTER *)result__ZOIH)[ 0]=((__POINTER ) 3);
+    result__0HFH=(void *)((unsigned long)result__ZOIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__K0KH=first_free__BCVB;
+    while ((((void *)result__K0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__K0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__2HFH))) {
+      result__K0KH=((__MEMORY *)result__K0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__BWKH == (void *)NULL)) {
-      result__BWKH=new_page__B24();
+    if (((void *)result__K0KH == (void *)NULL)) {
+      result__K0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__K0KH,new_size__2HFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__K0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__0HFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__K0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__YC2B=((void **)result__0HFH);
+  Self__F5OC=(__INTEGER)(nb_elements__C2ZB -  1);
+  while ((Self__F5OC >=  0)) {
+    Result__YC2B[Self__F5OC]=NULL;
+    Self__F5OC=(__INTEGER)(Self__F5OC -  1);
   };
-  return(Result__MB2B);
+  return(Result__YC2B);
 }
 
-static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__UFRC(__INTEGER new_count__WFRC)
+static __FAST_ARRAYoSTRING_CONSTANTo* create_with_capacity__LHRC(__INTEGER new_count__NHRC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__RD1C,ptr_table__3OIH,next__2OIH,result__4OIH;
+  __POINTER ptr_table__CPIH,next__BPIH,result__DPIH;
+  __INTEGER typ_id__WD1C;
+  __UINTEGER_32 sz__TD1C,a__IIFH,new_size__JIFH,t__NIFH,a__MIFH;
+  __UINTEGER_32 new_size__FPIH,lab_type__EPIH;
+  __FAST_ARRAYoSTRING_CONSTANTo *result__QD1C,*Self__S2RD;
+  result__QD1C=NULL;
+  ptr__RD1C=((__POINTER )(NULL));
+  typ_id__WD1C= 0;
+  sz__TD1C=((__UINTEGER_32 )sizeof(__FAST_ARRAYoSTRING_CONSTANTo));
+  if ((sz__TD1C ==  0)) {
+    result__QD1C=FAST_ARRAYoSTRING_CONSTANTo__;
   } else {
-    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);
+    typ_id__WD1C=__FAST_ARRAYoSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TD1C);
+    if ((typ_id__WD1C == (__INTEGER)(-  1))) {
+      a__IIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__JIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__TD1C + a__IIFH) & (__UINTEGER_32)(~ a__IIFH));
+      ptr_table__3OIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__2OIH=((__POINTER )(NULL));
+      result__4OIH=((__POINTER *)ptr_table__3OIH)[ 0];
+      if ((result__4OIH == (void *)NULL)) {
+        result__4OIH=new_lab__ZPJ(new_size__JIFH);
+        next__2OIH=(void *)((unsigned long)result__4OIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JIFH)));
+        ((__POINTER *)next__2OIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3OIH)[ 0]=next__2OIH;
+      } else {
+        next__2OIH=((__POINTER *)result__4OIH)[ 0];
+        if ((next__2OIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4OIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JIFH <<  1)) <=  4096)) {
+            next__2OIH=(void *)((unsigned long)result__4OIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JIFH)));
+          } else {
+            next__2OIH=new_lab__ZPJ(new_size__JIFH);
+          };
+          ((__POINTER *)next__2OIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3OIH)[ 0]=next__2OIH;
+        } else {
+          ((__POINTER *)result__4OIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2OIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4OIH=next__2OIH;
+        };
+      };
+      ptr__RD1C=result__4OIH;
+    } else {
+      t__NIFH=((__UINTEGER_32 )typ_id__WD1C);
+      a__MIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__FPIH=(__UINTEGER_32)((__UINTEGER_32)(sz__TD1C + a__MIFH) & (__UINTEGER_32)(~ a__MIFH));
+      ptr_table__CPIH=((__POINTER )(&(table_type[(t__NIFH)])));
+      lab_type__EPIH=(__UINTEGER_32)(t__NIFH |  1);
+      next__BPIH=((__POINTER )(NULL));
+      result__DPIH=((__POINTER *)ptr_table__CPIH)[ 0];
+      if ((result__DPIH == (void *)NULL)) {
+        result__DPIH=new_lab__ZPJ(lab_type__EPIH);
+        next__BPIH=(void *)((unsigned long)result__DPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FPIH)));
+        ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FPIH <<  1)) <=  4096)) {
+            next__BPIH=(void *)((unsigned long)result__DPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FPIH)));
+          } else {
+            next__BPIH=new_lab__ZPJ(lab_type__EPIH);
+          };
+          ((__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__RD1C=result__DPIH;
+    };
+    result__QD1C=((__FAST_ARRAYoSTRING_CONSTANTo *)ptr__RD1C);
+    *(result__QD1C) = *(FAST_ARRAYoSTRING_CONSTANTo__);
+  };
+  Self__S2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)result__QD1C);
+  if ((Self__S2RD->parent_arrayed_collection__U3I.capacity__CAPD < new_count__NHRC)) {
+    Self__S2RD->parent_arrayed_collection__U3I.storage__3APD=create__TIHE(new_count__NHRC);
+    Self__S2RD->parent_arrayed_collection__U3I.capacity__CAPD=new_count__NHRC;
+  };
+  Self__S2RD->parent_arrayed_collection__U3I.upper__H4OD=(__INTEGER)(-  1);
+  return(result__QD1C);
 }
 
-static void** create__ZBUF(__INTEGER nb_elements__1BUF)
+static void** create__EGUF(__INTEGER nb_elements__GGUF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__PIFH,a__UIFH,new_size__QIFH,new_size2__RIFH,a__YIFH;
+  __UINTEGER_32 new_size__ZIFH;
+  __POINTER result__OIFH,ptr_table__HPIH,next__GPIH,result__IPIH;
+  void *result__N0KH;
+  __INTEGER Self__4CAG;
+  void **Result__OWYF;
+  sz__PIFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__GGUF * ((__INTEGER )(sizeof(void *)))));
+  result__OIFH=((__POINTER )(NULL));
+  a__UIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__QIFH=(__UINTEGER_32)((__UINTEGER_32)(sz__PIFH + a__UIFH) & (__UINTEGER_32)(~ a__UIFH));
+  new_size2__RIFH=(__UINTEGER_32)(new_size__QIFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__RIFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YIFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZIFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__RIFH + a__YIFH) & (__UINTEGER_32)(~ a__YIFH));
+    ptr_table__HPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZIFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__GPIH=((__POINTER )(NULL));
+    result__IPIH=((__POINTER *)ptr_table__HPIH)[ 0];
+    if ((result__IPIH == (void *)NULL)) {
+      result__IPIH=new_lab__ZPJ(new_size__ZIFH);
+      next__GPIH=(void *)((unsigned long)result__IPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZIFH)));
+      ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZIFH <<  1)) <=  4096)) {
+          next__GPIH=(void *)((unsigned long)result__IPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZIFH)));
+        } else {
+          next__GPIH=new_lab__ZPJ(new_size__ZIFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__IPIH)[ 0]=((__POINTER ) 3);
+    result__OIFH=(void *)((unsigned long)result__IPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__N0KH=first_free__BCVB;
+    while ((((void *)result__N0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__N0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__QIFH))) {
+      result__N0KH=((__MEMORY *)result__N0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__EWKH == (void *)NULL)) {
-      result__EWKH=new_page__B24();
+    if (((void *)result__N0KH == (void *)NULL)) {
+      result__N0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__N0KH,new_size__QIFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__N0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__OIFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__N0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__OWYF=((void **)result__OIFH);
+  Self__4CAG=(__INTEGER)(nb_elements__GGUF -  1);
+  while ((Self__4CAG >=  0)) {
+    Result__OWYF[Self__4CAG]=NULL;
+    Self__4CAG=(__INTEGER)(Self__4CAG -  1);
   };
-  return(Result__DSYF);
+  return(Result__OWYF);
 }
 
-static void** create__1FGF(__INTEGER nb_elements__3FGF)
+static void** create__SIGF(__INTEGER nb_elements__UIGF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__1IFH,a__AJFH,new_size__2IFH,new_size2__3IFH,a__EJFH;
+  __UINTEGER_32 new_size__FJFH;
+  __POINTER result__0IFH,ptr_table__MPIH,next__LPIH,result__NPIH;
+  void *result__Q0KH;
+  __INTEGER Self__D1QF;
+  void **Result__CPKF;
+  sz__1IFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__UIGF * ((__INTEGER )(sizeof(void *)))));
+  result__0IFH=((__POINTER )(NULL));
+  a__AJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__2IFH=(__UINTEGER_32)((__UINTEGER_32)(sz__1IFH + a__AJFH) & (__UINTEGER_32)(~ a__AJFH));
+  new_size2__3IFH=(__UINTEGER_32)(new_size__2IFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__3IFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__EJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__FJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__3IFH + a__EJFH) & (__UINTEGER_32)(~ a__EJFH));
+    ptr_table__MPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__FJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__LPIH=((__POINTER )(NULL));
+    result__NPIH=((__POINTER *)ptr_table__MPIH)[ 0];
+    if ((result__NPIH == (void *)NULL)) {
+      result__NPIH=new_lab__ZPJ(new_size__FJFH);
+      next__LPIH=(void *)((unsigned long)result__NPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJFH)));
+      ((__POINTER *)next__LPIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__MPIH)[ 0]=next__LPIH;
+    } else {
+      next__LPIH=((__POINTER *)result__NPIH)[ 0];
+      if ((next__LPIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NPIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FJFH <<  1)) <=  4096)) {
+          next__LPIH=(void *)((unsigned long)result__NPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJFH)));
+        } else {
+          next__LPIH=new_lab__ZPJ(new_size__FJFH);
+        };
+        ((__POINTER *)next__LPIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MPIH)[ 0]=next__LPIH;
+      } else {
+        ((__POINTER *)result__NPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__NPIH=next__LPIH;
+      };
+    };
+    ((__POINTER *)result__NPIH)[ 0]=((__POINTER ) 3);
+    result__0IFH=(void *)((unsigned long)result__NPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__Q0KH=first_free__BCVB;
+    while ((((void *)result__Q0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__Q0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__2IFH))) {
+      result__Q0KH=((__MEMORY *)result__Q0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__HWKH == (void *)NULL)) {
-      result__HWKH=new_page__B24();
+    if (((void *)result__Q0KH == (void *)NULL)) {
+      result__Q0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__Q0KH,new_size__2IFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__Q0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__0IFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__Q0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__CPKF=((void **)result__0IFH);
+  Self__D1QF=(__INTEGER)(nb_elements__UIGF -  1);
+  while ((Self__D1QF >=  0)) {
+    Result__CPKF[Self__D1QF]=NULL;
+    Self__D1QF=(__INTEGER)(Self__D1QF -  1);
   };
-  return(Result__LMKF);
+  return(Result__CPKF);
 }
 
-static void** create__UFYF(__INTEGER nb_elements__WFYF)
+static void** create__5JYF(__INTEGER nb_elements__BKYF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__HJFH,a__MJFH,new_size__IJFH,new_size2__JJFH,a__QJFH;
+  __UINTEGER_32 new_size__RJFH;
+  __POINTER result__GJFH,ptr_table__RPIH,next__QPIH,result__SPIH;
+  void *result__T0KH;
+  __INTEGER Self__YGAG;
+  void **Result__F10F;
+  sz__HJFH=((__UINTEGER_32 )(__INTEGER)(nb_elements__BKYF * ((__INTEGER )(sizeof(void *)))));
+  result__GJFH=((__POINTER )(NULL));
+  a__MJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__IJFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HJFH + a__MJFH) & (__UINTEGER_32)(~ a__MJFH));
+  new_size2__JJFH=(__UINTEGER_32)(new_size__IJFH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__JJFH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__QJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__RJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JJFH + a__QJFH) & (__UINTEGER_32)(~ a__QJFH));
+    ptr_table__RPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RJFH / ((__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__ZPJ(new_size__RJFH);
+      next__QPIH=(void *)((unsigned long)result__SPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RJFH)));
+      ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__RJFH <<  1)) <=  4096)) {
+          next__QPIH=(void *)((unsigned long)result__SPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RJFH)));
+        } else {
+          next__QPIH=new_lab__ZPJ(new_size__RJFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__SPIH)[ 0]=((__POINTER ) 3);
+    result__GJFH=(void *)((unsigned long)result__SPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__T0KH=first_free__BCVB;
+    while ((((void *)result__T0KH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__T0KH)->map_size_and_id__YTB &  4294967292LU) < new_size__IJFH))) {
+      result__T0KH=((__MEMORY *)result__T0KH)->map_next_free__ZTB;
     };
-    if (((void *)result__KWKH == (void *)NULL)) {
-      result__KWKH=new_page__B24();
+    if (((void *)result__T0KH == (void *)NULL)) {
+      result__T0KH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__T0KH,new_size__IJFH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__T0KH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__GJFH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__T0KH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__F10F=((void **)result__GJFH);
+  Self__YGAG=(__INTEGER)(nb_elements__BKYF -  1);
+  while ((Self__YGAG >=  0)) {
+    Result__F10F[Self__YGAG]=NULL;
+    Self__YGAG=(__INTEGER)(Self__YGAG -  1);
   };
-  return(Result__0W0F);
+  return(Result__F10F);
 }
 
-static void** create__LYIE(__INTEGER nb_elements__NYIE)
+static void** create__UYIE(__INTEGER nb_elements__WYIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__QLJB,a__UJFH,new_size__SLJB,new_size2__VLJB,a__YJFH;
+  __UINTEGER_32 new_size__ZJFH;
+  __POINTER result__YLJB,ptr_table__WPIH,next__VPIH,result__XPIH;
+  void *result__CBVB;
+  __INTEGER Self__TSYE;
+  void **Result__J1NE;
+  sz__QLJB=((__UINTEGER_32 )(__INTEGER)(nb_elements__WYIE * ((__INTEGER )(sizeof(void *)))));
+  result__YLJB=((__POINTER )(NULL));
+  a__UJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__SLJB=(__UINTEGER_32)((__UINTEGER_32)(sz__QLJB + a__UJFH) & (__UINTEGER_32)(~ a__UJFH));
+  new_size2__VLJB=(__UINTEGER_32)(new_size__SLJB + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__VLJB <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__YJFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__ZJFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__VLJB + a__YJFH) & (__UINTEGER_32)(~ a__YJFH));
+    ptr_table__WPIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZJFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__VPIH=((__POINTER )(NULL));
+    result__XPIH=((__POINTER *)ptr_table__WPIH)[ 0];
+    if ((result__XPIH == (void *)NULL)) {
+      result__XPIH=new_lab__ZPJ(new_size__ZJFH);
+      next__VPIH=(void *)((unsigned long)result__XPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJFH)));
+      ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZJFH <<  1)) <=  4096)) {
+          next__VPIH=(void *)((unsigned long)result__XPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZJFH)));
+        } else {
+          next__VPIH=new_lab__ZPJ(new_size__ZJFH);
+        };
+        ((__POINTER *)next__VPIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__WPIH)[ 0]=next__VPIH;
+      } else {
+        ((__POINTER *)result__XPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__XPIH=next__VPIH;
+      };
+    };
+    ((__POINTER *)result__XPIH)[ 0]=((__POINTER ) 3);
+    result__YLJB=(void *)((unsigned long)result__XPIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__CBVB=first_free__BCVB;
+    while ((((void *)result__CBVB != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__CBVB)->map_size_and_id__YTB &  4294967292LU) < new_size__SLJB))) {
+      result__CBVB=((__MEMORY *)result__CBVB)->map_next_free__ZTB;
     };
-    if (((void *)result__W5UB == (void *)NULL)) {
-      result__W5UB=new_page__B24();
+    if (((void *)result__CBVB == (void *)NULL)) {
+      result__CBVB=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__CBVB,new_size__SLJB,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBVB)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__YLJB=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__CBVB)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__J1NE=((void **)result__YLJB);
+  Self__TSYE=(__INTEGER)(nb_elements__WYIE -  1);
+  while ((Self__TSYE >=  0)) {
+    Result__J1NE[Self__TSYE]=NULL;
+    Self__TSYE=(__INTEGER)(Self__TSYE -  1);
   };
-  return(Result__FZNE);
+  return(Result__J1NE);
 }
 
-static void* new_page__B24()
+static void* new_page__K34()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __UINTEGER_64 cap__1ZSB,old_size__N34;
+  __POINTER mem__4ZSB;
+  void *block__T34;
+  if ((capacity_max__U34 ==  0)) {
+    mem__4ZSB=((__POINTER )(NULL));
+    cap__1ZSB= 33554432;
     do {
-      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)) {
+      cap__1ZSB=(__UINTEGER_64)(cap__1ZSB <<  1);
+      mem__4ZSB=((__POINTER )(malloc((cap__1ZSB))));
+      if ((mem__4ZSB != (void *)NULL)) {
+        free((mem__4ZSB));
+      };
+    } while ((! ((mem__4ZSB == (void *)NULL) || (cap__1ZSB == ((__UINTEGER_64 )(2048LU << 20))))));
+    if ((mem__4ZSB == (void *)NULL)) {
+      cap__1ZSB=(__UINTEGER_64)(cap__1ZSB >>  1);
+    };
+    get_begin_memory__SAQB=((__POINTER )(malloc((cap__1ZSB))));
+    capacity_max__U34=cap__1ZSB;
+    begin_memory__GUH=get_begin_memory__SAQB;
+  };
+  old_size__N34=((__UINTEGER_64 )(__UINTEGER_32)(nb_page__LQJ <<  26));
+  nb_page__LQJ=(__UINTEGER_32)(nb_page__LQJ +  1);
+  if (((__UINTEGER_64)(old_size__N34 +  67108864) > capacity_max__U34)) {
     print__DID((&__string_187));
     exit(( 1));
   };
-  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);
+  block__T34=((void *)(void *)((unsigned long)begin_memory__GUH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )old_size__N34)))));
+  ((__MEMORY *)block__T34)->map_previous_linear__XTB= 4294967295LU;
+  ((__MEMORY *)block__T34)->map_size_and_id__YTB= 67108858;
+  ((__MEMORY *)block__T34)->map_next_free__ZTB=first_free__BCVB;
+  ((__MEMORY *)block__T34)->map_previous_free__0TB=NULL;
+  if (((void *)first_free__BCVB != (void *)NULL)) {
+    ((__MEMORY *)first_free__BCVB)->map_previous_free__0TB=block__T34;
+  };
+  first_free__BCVB=block__T34;
+  last_block[((__UINTEGER_32)(nb_page__LQJ -  1))] = (block__T34);
+  return(block__T34);
 }
 
-static void to_busy__index__KRFC(__MEMORY *Self__LRFC,__UINTEGER_32 sz__MRFC,__UINTEGER_32 idx__NRFC)
+static void to_busy__index__4SFC(__MEMORY *Self__5SFC,__UINTEGER_32 sz__ATFC,__UINTEGER_32 idx__BTFC)
 // ({MEMORY},{UINTEGER_32},{UINTEGER_32}) VoidNo recursive, No inlinable.
 {
-  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;
+  void *new__ITFC,*prev__DDOC,*next__EDOC;
+  __UINTEGER_32 siz__CTFC,new_size__FTFC;
+  __MEMORY *Self__ORCC,*Self__NEAH;
+  new__ITFC=NULL;
+  prev__DDOC=Self__5SFC->map_previous_free__0TB;
+  next__EDOC=Self__5SFC->map_next_free__ZTB;
+  if (((void *)prev__DDOC == (void *)NULL)) {
+    first_free__BCVB=next__EDOC;
   } else {
-    ((__MEMORY *)prev__PBOC)->map_next_free__ZTB=next__QBOC;
+    ((__MEMORY *)prev__DDOC)->map_next_free__ZTB=next__EDOC;
   };
-  if (((void *)next__QBOC != (void *)NULL)) {
-    ((__MEMORY *)next__QBOC)->map_previous_free__0TB=prev__PBOC;
+  if (((void *)next__EDOC != (void *)NULL)) {
+    ((__MEMORY *)next__EDOC)->map_previous_free__0TB=prev__DDOC;
   };
-  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;
+  siz__CTFC=Self__5SFC->map_size_and_id__YTB;
+  new_size__FTFC=(__UINTEGER_32)(siz__CTFC - sz__ATFC);
+  if ((new_size__FTFC > (__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )(MINIMUM_SIZE)) +  2) +  8))) {
+    siz__CTFC=sz__ATFC;
+    new__ITFC=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__5SFC) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )sz__ATFC))));
+    ((__MEMORY *)new__ITFC)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__5SFC) - (unsigned long)begin_memory__GUH))));
+    ((__MEMORY *)new__ITFC)->map_size_and_id__YTB=(__UINTEGER_32)(new_size__FTFC -  8);
+    Self__ORCC=((__MEMORY *)new__ITFC);
+    Self__ORCC->map_next_free__ZTB=first_free__BCVB;
+    Self__ORCC->map_previous_free__0TB=NULL;
+    if (((void *)first_free__BCVB != (void *)NULL)) {
+      ((__MEMORY *)first_free__BCVB)->map_previous_free__0TB=Self__ORCC;
     };
-    first_free__VAVB=Self__0PCC;
-    if (((__UINTEGER_32)(((__MEMORY *)new__URFC)->map_size_and_id__YTB &  2) !=  0)) {
-      last_block[(idx__NRFC)] = (new__URFC);
+    first_free__BCVB=Self__ORCC;
+    if (((__UINTEGER_32)(((__MEMORY *)new__ITFC)->map_size_and_id__YTB &  2) !=  0)) {
+      last_block[(idx__BTFC)] = (new__ITFC);
     } else {
-      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__NEAH=((__MEMORY *)new__ITFC);
+      ((__MEMORY *)((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__NEAH) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__NEAH->map_size_and_id__YTB &  4294967292LU))))))->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)new__ITFC)) - (unsigned long)begin_memory__GUH))));
     };
   };
-  Self__LRFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__ORFC |  1);
+  Self__5SFC->map_size_and_id__YTB=(__UINTEGER_32)(siz__CTFC |  1);
 }
 
-static void** create__D1XC(__INTEGER nb_elements__F1XC)
+static void** create__02XC(__INTEGER nb_elements__22XC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3MDH,a__2JFH,new_size__4MDH,new_size2__5MDH,a__AKFH;
+  __UINTEGER_32 new_size__BKFH;
+  __POINTER result__2MDH,ptr_table__1PIH,next__0PIH,result__2PIH;
+  void *result__5PIH;
+  __INTEGER Self__MSWD;
+  void **Result__SU5C;
+  sz__3MDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__22XC * ((__INTEGER )(sizeof(void *)))));
+  result__2MDH=((__POINTER )(NULL));
+  a__2JFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4MDH=(__UINTEGER_32)((__UINTEGER_32)(sz__3MDH + a__2JFH) & (__UINTEGER_32)(~ a__2JFH));
+  new_size2__5MDH=(__UINTEGER_32)(new_size__4MDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5MDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__AKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__BKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5MDH + a__AKFH) & (__UINTEGER_32)(~ a__AKFH));
+    ptr_table__1PIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BKFH / ((__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__ZPJ(new_size__BKFH);
+      next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKFH)));
+      ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BKFH <<  1)) <=  4096)) {
+          next__0PIH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BKFH)));
+        } else {
+          next__0PIH=new_lab__ZPJ(new_size__BKFH);
+        };
+        ((__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;
+      };
+    };
+    ((__POINTER *)result__2PIH)[ 0]=((__POINTER ) 3);
+    result__2MDH=(void *)((unsigned long)result__2PIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__5PIH=first_free__BCVB;
+    while ((((void *)result__5PIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5PIH)->map_size_and_id__YTB &  4294967292LU) < new_size__4MDH))) {
+      result__5PIH=((__MEMORY *)result__5PIH)->map_next_free__ZTB;
     };
-    if (((void *)result__WLIH == (void *)NULL)) {
-      result__WLIH=new_page__B24();
+    if (((void *)result__5PIH == (void *)NULL)) {
+      result__5PIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__5PIH,new_size__4MDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5PIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__2MDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5PIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__SU5C=((void **)result__2MDH);
+  Self__MSWD=(__INTEGER)(nb_elements__22XC -  1);
+  while ((Self__MSWD >=  0)) {
+    Result__SU5C[Self__MSWD]=NULL;
+    Self__MSWD=(__INTEGER)(Self__MSWD -  1);
   };
-  return(Result__1S5C);
+  return(Result__SU5C);
 }
 
-static void** create__GAYC(__INTEGER nb_elements__IAYC)
+static void** create__3BYC(__INTEGER nb_elements__5BYC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__BNDH,a__HKFH,new_size__CNDH,new_size2__DNDH,a__LKFH;
+  __UINTEGER_32 new_size__MKFH;
+  __POINTER result__ANDH,ptr_table__DQIH,next__CQIH,result__EQIH;
+  void *result__HQIH;
+  __INTEGER Self__GWWD;
+  void **Result__2Z5C;
+  sz__BNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5BYC * ((__INTEGER )(sizeof(void *)))));
+  result__ANDH=((__POINTER )(NULL));
+  a__HKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__CNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__BNDH + a__HKFH) & (__UINTEGER_32)(~ a__HKFH));
+  new_size2__DNDH=(__UINTEGER_32)(new_size__CNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__DNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__LKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__MKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__DNDH + a__LKFH) & (__UINTEGER_32)(~ a__LKFH));
+    ptr_table__DQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CQIH=((__POINTER )(NULL));
+    result__EQIH=((__POINTER *)ptr_table__DQIH)[ 0];
+    if ((result__EQIH == (void *)NULL)) {
+      result__EQIH=new_lab__ZPJ(new_size__MKFH);
+      next__CQIH=(void *)((unsigned long)result__EQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKFH)));
+      ((__POINTER *)next__CQIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DQIH)[ 0]=next__CQIH;
+    } else {
+      next__CQIH=((__POINTER *)result__EQIH)[ 0];
+      if ((next__CQIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EQIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MKFH <<  1)) <=  4096)) {
+          next__CQIH=(void *)((unsigned long)result__EQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MKFH)));
+        } else {
+          next__CQIH=new_lab__ZPJ(new_size__MKFH);
+        };
+        ((__POINTER *)next__CQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DQIH)[ 0]=next__CQIH;
+      } else {
+        ((__POINTER *)result__EQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EQIH=next__CQIH;
+      };
+    };
+    ((__POINTER *)result__EQIH)[ 0]=((__POINTER ) 3);
+    result__ANDH=(void *)((unsigned long)result__EQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__HQIH=first_free__BCVB;
+    while ((((void *)result__HQIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HQIH)->map_size_and_id__YTB &  4294967292LU) < new_size__CNDH))) {
+      result__HQIH=((__MEMORY *)result__HQIH)->map_next_free__ZTB;
     };
-    if (((void *)result__4LIH == (void *)NULL)) {
-      result__4LIH=new_page__B24();
+    if (((void *)result__HQIH == (void *)NULL)) {
+      result__HQIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__HQIH,new_size__CNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HQIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__ANDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HQIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__2Z5C=((void **)result__ANDH);
+  Self__GWWD=(__INTEGER)(nb_elements__5BYC -  1);
+  while ((Self__GWWD >=  0)) {
+    Result__2Z5C[Self__GWWD]=NULL;
+    Self__GWWD=(__INTEGER)(Self__GWWD -  1);
   };
-  return(Result__FY5C);
+  return(Result__2Z5C);
 }
 
-static void** create__4KBD(__INTEGER nb_elements__ALBD)
+static void** create__VMBD(__INTEGER nb_elements__XMBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__FNDH,a__SKFH,new_size__GNDH,new_size2__HNDH,a__WKFH;
+  __UINTEGER_32 new_size__XKFH;
+  __POINTER result__ENDH,ptr_table__LQIH,next__KQIH,result__MQIH;
+  void *result__PQIH;
+  __INTEGER Self__REXD;
+  void **Result__WAGD;
+  sz__FNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__XMBD * ((__INTEGER )(sizeof(void *)))));
+  result__ENDH=((__POINTER )(NULL));
+  a__SKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__GNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__FNDH + a__SKFH) & (__UINTEGER_32)(~ a__SKFH));
+  new_size2__HNDH=(__UINTEGER_32)(new_size__GNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__HNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__WKFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__XKFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__HNDH + a__WKFH) & (__UINTEGER_32)(~ a__WKFH));
+    ptr_table__LQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XKFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KQIH=((__POINTER )(NULL));
+    result__MQIH=((__POINTER *)ptr_table__LQIH)[ 0];
+    if ((result__MQIH == (void *)NULL)) {
+      result__MQIH=new_lab__ZPJ(new_size__XKFH);
+      next__KQIH=(void *)((unsigned long)result__MQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKFH)));
+      ((__POINTER *)next__KQIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LQIH)[ 0]=next__KQIH;
+    } else {
+      next__KQIH=((__POINTER *)result__MQIH)[ 0];
+      if ((next__KQIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MQIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XKFH <<  1)) <=  4096)) {
+          next__KQIH=(void *)((unsigned long)result__MQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XKFH)));
+        } else {
+          next__KQIH=new_lab__ZPJ(new_size__XKFH);
+        };
+        ((__POINTER *)next__KQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LQIH)[ 0]=next__KQIH;
+      } else {
+        ((__POINTER *)result__MQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MQIH=next__KQIH;
+      };
+    };
+    ((__POINTER *)result__MQIH)[ 0]=((__POINTER ) 3);
+    result__ENDH=(void *)((unsigned long)result__MQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__PQIH=first_free__BCVB;
+    while ((((void *)result__PQIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PQIH)->map_size_and_id__YTB &  4294967292LU) < new_size__GNDH))) {
+      result__PQIH=((__MEMORY *)result__PQIH)->map_next_free__ZTB;
     };
-    if (((void *)result__GMIH == (void *)NULL)) {
-      result__GMIH=new_page__B24();
+    if (((void *)result__PQIH == (void *)NULL)) {
+      result__PQIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__PQIH,new_size__GNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PQIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__ENDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PQIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WAGD=((void **)result__ENDH);
+  Self__REXD=(__INTEGER)(nb_elements__XMBD -  1);
+  while ((Self__REXD >=  0)) {
+    Result__WAGD[Self__REXD]=NULL;
+    Self__REXD=(__INTEGER)(Self__REXD -  1);
   };
-  return(Result__V5FD);
+  return(Result__WAGD);
 }
 
-static void** create__35EF(__INTEGER nb_elements__55EF)
+static void** create__UCFF(__INTEGER nb_elements__WCFF)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__JNDH,a__3KFH,new_size__KNDH,new_size2__LNDH,a__BLFH;
+  __UINTEGER_32 new_size__CLFH;
+  __POINTER result__INDH,ptr_table__TQIH,next__SQIH,result__UQIH;
+  void *result__XQIH;
+  __INTEGER Self__4YQF;
+  void **Result__QSJF;
+  sz__JNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__WCFF * ((__INTEGER )(sizeof(void *)))));
+  result__INDH=((__POINTER )(NULL));
+  a__3KFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__KNDH=(__UINTEGER_32)((__UINTEGER_32)(sz__JNDH + a__3KFH) & (__UINTEGER_32)(~ a__3KFH));
+  new_size2__LNDH=(__UINTEGER_32)(new_size__KNDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__LNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__BLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__CLFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__LNDH + a__BLFH) & (__UINTEGER_32)(~ a__BLFH));
+    ptr_table__TQIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__SQIH=((__POINTER )(NULL));
+    result__UQIH=((__POINTER *)ptr_table__TQIH)[ 0];
+    if ((result__UQIH == (void *)NULL)) {
+      result__UQIH=new_lab__ZPJ(new_size__CLFH);
+      next__SQIH=(void *)((unsigned long)result__UQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLFH)));
+      ((__POINTER *)next__SQIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__TQIH)[ 0]=next__SQIH;
+    } else {
+      next__SQIH=((__POINTER *)result__UQIH)[ 0];
+      if ((next__SQIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UQIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CLFH <<  1)) <=  4096)) {
+          next__SQIH=(void *)((unsigned long)result__UQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CLFH)));
+        } else {
+          next__SQIH=new_lab__ZPJ(new_size__CLFH);
+        };
+        ((__POINTER *)next__SQIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__TQIH)[ 0]=next__SQIH;
+      } else {
+        ((__POINTER *)result__UQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__UQIH=next__SQIH;
+      };
+    };
+    ((__POINTER *)result__UQIH)[ 0]=((__POINTER ) 3);
+    result__INDH=(void *)((unsigned long)result__UQIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__XQIH=first_free__BCVB;
+    while ((((void *)result__XQIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__XQIH)->map_size_and_id__YTB &  4294967292LU) < new_size__KNDH))) {
+      result__XQIH=((__MEMORY *)result__XQIH)->map_next_free__ZTB;
     };
-    if (((void *)result__OMIH == (void *)NULL)) {
-      result__OMIH=new_page__B24();
+    if (((void *)result__XQIH == (void *)NULL)) {
+      result__XQIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__XQIH,new_size__KNDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__XQIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__INDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__XQIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__QSJF=((void **)result__INDH);
+  Self__4YQF=(__INTEGER)(nb_elements__WCFF -  1);
+  while ((Self__4YQF >=  0)) {
+    Result__QSJF[Self__4YQF]=NULL;
+    Self__4YQF=(__INTEGER)(Self__4YQF -  1);
   };
-  return(Result__ZPJF);
+  return(Result__QSJF);
 }
 
-static void** create__UF2(__INTEGER nb_elements__WF2)
+static void** create__3G2(__INTEGER nb_elements__5G2)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__NNDH,a__ILFH,new_size__ONDH,new_size2__PNDH,a__MLFH;
+  __UINTEGER_32 new_size__NLFH;
+  __POINTER result__MNDH,ptr_table__1QIH,next__0QIH,result__2QIH;
+  void *result__5QIH;
+  __INTEGER Self__FTJC;
+  void **Result__U3CB;
+  sz__NNDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__5G2 * ((__INTEGER )(sizeof(void *)))));
+  result__MNDH=((__POINTER )(NULL));
+  a__ILFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ONDH=(__UINTEGER_32)((__UINTEGER_32)(sz__NNDH + a__ILFH) & (__UINTEGER_32)(~ a__ILFH));
+  new_size2__PNDH=(__UINTEGER_32)(new_size__ONDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__PNDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__MLFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__NLFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__PNDH + a__MLFH) & (__UINTEGER_32)(~ a__MLFH));
+    ptr_table__1QIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NLFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__0QIH=((__POINTER )(NULL));
+    result__2QIH=((__POINTER *)ptr_table__1QIH)[ 0];
+    if ((result__2QIH == (void *)NULL)) {
+      result__2QIH=new_lab__ZPJ(new_size__NLFH);
+      next__0QIH=(void *)((unsigned long)result__2QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLFH)));
+      ((__POINTER *)next__0QIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__1QIH)[ 0]=next__0QIH;
+    } else {
+      next__0QIH=((__POINTER *)result__2QIH)[ 0];
+      if ((next__0QIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2QIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NLFH <<  1)) <=  4096)) {
+          next__0QIH=(void *)((unsigned long)result__2QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NLFH)));
+        } else {
+          next__0QIH=new_lab__ZPJ(new_size__NLFH);
+        };
+        ((__POINTER *)next__0QIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__1QIH)[ 0]=next__0QIH;
+      } else {
+        ((__POINTER *)result__2QIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0QIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__2QIH=next__0QIH;
+      };
+    };
+    ((__POINTER *)result__2QIH)[ 0]=((__POINTER ) 3);
+    result__MNDH=(void *)((unsigned long)result__2QIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__5QIH=first_free__BCVB;
+    while ((((void *)result__5QIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__5QIH)->map_size_and_id__YTB &  4294967292LU) < new_size__ONDH))) {
+      result__5QIH=((__MEMORY *)result__5QIH)->map_next_free__ZTB;
     };
-    if (((void *)result__WMIH == (void *)NULL)) {
-      result__WMIH=new_page__B24();
+    if (((void *)result__5QIH == (void *)NULL)) {
+      result__5QIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__5QIH,new_size__ONDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__5QIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__MNDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5QIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__U3CB=((void **)result__MNDH);
+  Self__FTJC=(__INTEGER)(nb_elements__5G2 -  1);
+  while ((Self__FTJC >=  0)) {
+    Result__U3CB[Self__FTJC]=NULL;
+    Self__FTJC=(__INTEGER)(Self__FTJC -  1);
   };
-  return(Result__L2CB);
+  return(Result__U3CB);
 }
 
-static void add__DUR(__HASHED_SEToABSTRACT_STRINGo *Self__EUR,void *e__FUR)
+static void add__MVR(__HASHED_SEToABSTRACT_STRINGo *Self__NVR,void *e__OVR)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__CRIH,__tmp__ERIH,Self__FRIH,idx__WVR,typ_id__JRIH;
+  __POINTER ptr__IRIH,ptr_table__TRIH,next__SRIH,result__URIH;
+  __POINTER ptr_table__YRIH,next__XRIH,result__ZRIH;
+  __UINTEGER_32 sz__KRIH,a__LRIH,new_size__MRIH,t__NRIH,a__ORIH;
+  __UINTEGER_32 new_size__1RIH,lab_type__0RIH;
+  void *node__ZVR,*n__RRIH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__HRIH,*Self__PRIH;
+  has__XMW(Self__NVR,e__OVR);
+  has__XMW(Self__NVR,e__OVR);
+  result__CRIH= 0;
+  __tmp__ERIH=((__STRING_CONSTANT *)e__OVR)->count__DD;
+  Self__FRIH= 1;
+  while ((Self__FRIH <= __tmp__ERIH)) {
+    result__CRIH=(__INTEGER)((__INTEGER)( 5 * result__CRIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__OVR)->storage__ZNO)[(__INTEGER)(Self__FRIH -  1)])));
+    Self__FRIH=(__INTEGER)(Self__FRIH +  1);
+  };
+  if ((result__CRIH <  0)) {
+    result__CRIH=(__INTEGER)(~ result__CRIH);
+  };
+  idx__WVR=(__INTEGER)(result__CRIH % Self__NVR->capacity__3VR);
+  node__ZVR=((void **)Self__NVR->buckets__CWR)[idx__WVR];
+  while ((! (((void *)node__ZVR == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZVR)->item__OWR,e__OVR)))) {
+    node__ZVR=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__ZVR)->next__0WR;
+  };
+  if (((void *)node__ZVR == (void *)NULL)) {
+    if ((Self__NVR->capacity__3VR == Self__NVR->count__DXR)) {
+      increase_capacity__2ONB(Self__NVR);
+      idx__WVR=(__INTEGER)(result__CRIH % Self__NVR->capacity__3VR);
+    };
+    n__RRIH=((void **)Self__NVR->buckets__CWR)[idx__WVR];
+    result__HRIH=NULL;
+    ptr__IRIH=((__POINTER )(NULL));
+    typ_id__JRIH= 0;
+    sz__KRIH=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+    if ((sz__KRIH ==  0)) {
+      result__HRIH=HASHED_SET_NODEoABSTRACT_STRINGo__;
+    } else {
+      typ_id__JRIH=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KRIH);
+      if ((typ_id__JRIH == (__INTEGER)(-  1))) {
+        a__LRIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MRIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KRIH + a__LRIH) & (__UINTEGER_32)(~ a__LRIH));
+        ptr_table__TRIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MRIH / ((__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__ZPJ(new_size__MRIH);
+          next__SRIH=(void *)((unsigned long)result__URIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MRIH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MRIH <<  1)) <=  4096)) {
+              next__SRIH=(void *)((unsigned long)result__URIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MRIH)));
             } else {
-              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)));
+              next__SRIH=new_lab__ZPJ(new_size__MRIH);
+            };
+            ((__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;
+          };
+        };
+        ptr__IRIH=result__URIH;
+      } else {
+        t__NRIH=((__UINTEGER_32 )typ_id__JRIH);
+        a__ORIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1RIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KRIH + a__ORIH) & (__UINTEGER_32)(~ a__ORIH));
+        ptr_table__YRIH=((__POINTER )(&(table_type[(t__NRIH)])));
+        lab_type__0RIH=(__UINTEGER_32)(t__NRIH |  1);
+        next__XRIH=((__POINTER )(NULL));
+        result__ZRIH=((__POINTER *)ptr_table__YRIH)[ 0];
+        if ((result__ZRIH == (void *)NULL)) {
+          result__ZRIH=new_lab__ZPJ(lab_type__0RIH);
+          next__XRIH=(void *)((unsigned long)result__ZRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RIH)));
+          ((__POINTER *)next__XRIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YRIH)[ 0]=next__XRIH;
+        } else {
+          next__XRIH=((__POINTER *)result__ZRIH)[ 0];
+          if ((next__XRIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZRIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__1RIH <<  1)) <=  4096)) {
+              next__XRIH=(void *)((unsigned long)result__ZRIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1RIH)));
             } else {
-              next__ONIH=new_lab__QOJ(lab_type__RNIH);
+              next__XRIH=new_lab__ZPJ(lab_type__0RIH);
             };
-            ((__POINTER *)next__ONIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__PNIH)[ 0]=next__ONIH;
+            ((__POINTER *)next__XRIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YRIH)[ 0]=next__XRIH;
           } else {
-            ((__POINTER *)result__QNIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__QNIH=next__ONIH;
+            ((__POINTER *)result__ZRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ZRIH=next__XRIH;
           };
         };
-        ptr__5MIH=result__QNIH;
+        ptr__IRIH=result__ZRIH;
       };
-      result__4MIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__5MIH);
-      *(result__4MIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+      result__HRIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__IRIH);
+      *(result__HRIH) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
     };
-    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);
+    Self__PRIH=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__HRIH);
+    Self__PRIH->item__OWR=e__OVR;
+    Self__PRIH->next__0WR=n__RRIH;
+    node__ZVR=result__HRIH;
+    ((void **)Self__NVR->buckets__CWR)[idx__WVR]=result__HRIH;
+    Self__NVR->count__DXR=(__INTEGER)(Self__NVR->count__DXR +  1);
   };
 }
 
@@ -11089,22 +11089,22 @@ static void* operator__name__GHB(void *op__JHB)
 {
   __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;
+  __BOOLEAN __tmp__5HB,__tmp__MIB,result__UCDB,__tmp__ZIB,result__GDDB;
+  __BOOLEAN __tmp__GJB,result__YDDB,__tmp__TJB,result__KEDB,__tmp__AKB;
+  __BOOLEAN result__2EDB,__tmp__NKB,result__OFDB,__tmp__0KB;
+  __BOOLEAN result__AGDB,__tmp__HLB,result__SGDB,__tmp__ULB;
+  __BOOLEAN result__EHDB,__tmp__BMB,result__WHDB,__tmp__OMB;
+  __BOOLEAN result__IIDB,__tmp__1MB,result__0IDB,__tmp__INB;
+  __BOOLEAN result__MJDB,__tmp__VNB,result__4JDB,__tmp__COB;
+  __BOOLEAN result__QKDB,__tmp__POB,result__CLDB;
   c__LHB='\0';
-  copy__U4R(string_tmp__VH,(&__string_81));
+  copy__35R(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)];
+    c__LHB=((__CHARACTER *)((__STRING_CONSTANT *)op__JHB)->storage__ZNO)[(__INTEGER)(Self__KWB -  1)];
     if ((c__LHB == '+')) {
-      append__2JS(string_tmp__VH,(&__string_188));
+      append__FLS(string_tmp__VH,(&__string_188));
       __tmp__5HB=TRUE__;
     } else {
       __tmp__5HB=FALSE__;
@@ -11112,150 +11112,150 @@ static void* operator__name__GHB(void *op__JHB)
     if (__tmp__5HB) {
       __tmp__MIB=TRUE__;
     } else {
-      result__LBDB=(c__LHB == '-');
-      if (result__LBDB) {
-        append__2JS(string_tmp__VH,(&__string_189));
+      result__UCDB=(c__LHB == '-');
+      if (result__UCDB) {
+        append__FLS(string_tmp__VH,(&__string_189));
       };
-      __tmp__MIB=result__LBDB;
+      __tmp__MIB=result__UCDB;
     };
     if (__tmp__MIB) {
       __tmp__ZIB=TRUE__;
     } else {
-      result__3BDB=(c__LHB == '~');
-      if (result__3BDB) {
-        append__2JS(string_tmp__VH,(&__string_190));
+      result__GDDB=(c__LHB == '~');
+      if (result__GDDB) {
+        append__FLS(string_tmp__VH,(&__string_190));
       };
-      __tmp__ZIB=result__3BDB;
+      __tmp__ZIB=result__GDDB;
     };
     if (__tmp__ZIB) {
       __tmp__GJB=TRUE__;
     } else {
-      result__PCDB=(c__LHB == '!');
-      if (result__PCDB) {
-        append__2JS(string_tmp__VH,(&__string_191));
+      result__YDDB=(c__LHB == '!');
+      if (result__YDDB) {
+        append__FLS(string_tmp__VH,(&__string_191));
       };
-      __tmp__GJB=result__PCDB;
+      __tmp__GJB=result__YDDB;
     };
     if (__tmp__GJB) {
       __tmp__TJB=TRUE__;
     } else {
-      result__BDDB=(c__LHB == '/');
-      if (result__BDDB) {
-        append__2JS(string_tmp__VH,(&__string_192));
+      result__KEDB=(c__LHB == '/');
+      if (result__KEDB) {
+        append__FLS(string_tmp__VH,(&__string_192));
       };
-      __tmp__TJB=result__BDDB;
+      __tmp__TJB=result__KEDB;
     };
     if (__tmp__TJB) {
       __tmp__AKB=TRUE__;
     } else {
-      result__TDDB=(c__LHB == '*');
-      if (result__TDDB) {
-        append__2JS(string_tmp__VH,(&__string_193));
+      result__2EDB=(c__LHB == '*');
+      if (result__2EDB) {
+        append__FLS(string_tmp__VH,(&__string_193));
       };
-      __tmp__AKB=result__TDDB;
+      __tmp__AKB=result__2EDB;
     };
     if (__tmp__AKB) {
       __tmp__NKB=TRUE__;
     } else {
-      result__FEDB=(c__LHB == '^');
-      if (result__FEDB) {
-        append__2JS(string_tmp__VH,(&__string_194));
+      result__OFDB=(c__LHB == '^');
+      if (result__OFDB) {
+        append__FLS(string_tmp__VH,(&__string_194));
       };
-      __tmp__NKB=result__FEDB;
+      __tmp__NKB=result__OFDB;
     };
     if (__tmp__NKB) {
       __tmp__0KB=TRUE__;
     } else {
-      result__XEDB=(c__LHB == '%');
-      if (result__XEDB) {
-        append__2JS(string_tmp__VH,(&__string_195));
+      result__AGDB=(c__LHB == '%');
+      if (result__AGDB) {
+        append__FLS(string_tmp__VH,(&__string_195));
       };
-      __tmp__0KB=result__XEDB;
+      __tmp__0KB=result__AGDB;
     };
     if (__tmp__0KB) {
       __tmp__HLB=TRUE__;
     } else {
-      result__JFDB=(c__LHB == '>');
-      if (result__JFDB) {
-        append__2JS(string_tmp__VH,(&__string_196));
+      result__SGDB=(c__LHB == '>');
+      if (result__SGDB) {
+        append__FLS(string_tmp__VH,(&__string_196));
       };
-      __tmp__HLB=result__JFDB;
+      __tmp__HLB=result__SGDB;
     };
     if (__tmp__HLB) {
       __tmp__ULB=TRUE__;
     } else {
-      result__1FDB=(c__LHB == '<');
-      if (result__1FDB) {
-        append__2JS(string_tmp__VH,(&__string_197));
+      result__EHDB=(c__LHB == '<');
+      if (result__EHDB) {
+        append__FLS(string_tmp__VH,(&__string_197));
       };
-      __tmp__ULB=result__1FDB;
+      __tmp__ULB=result__EHDB;
     };
     if (__tmp__ULB) {
       __tmp__BMB=TRUE__;
     } else {
-      result__NGDB=(c__LHB == '=');
-      if (result__NGDB) {
-        append__2JS(string_tmp__VH,(&__string_198));
+      result__WHDB=(c__LHB == '=');
+      if (result__WHDB) {
+        append__FLS(string_tmp__VH,(&__string_198));
       };
-      __tmp__BMB=result__NGDB;
+      __tmp__BMB=result__WHDB;
     };
     if (__tmp__BMB) {
       __tmp__OMB=TRUE__;
     } else {
-      result__5GDB=(c__LHB == '\\');
-      if (result__5GDB) {
-        append__2JS(string_tmp__VH,(&__string_199));
+      result__IIDB=(c__LHB == '\\');
+      if (result__IIDB) {
+        append__FLS(string_tmp__VH,(&__string_199));
       };
-      __tmp__OMB=result__5GDB;
+      __tmp__OMB=result__IIDB;
     };
     if (__tmp__OMB) {
       __tmp__1MB=TRUE__;
     } else {
-      result__RHDB=(c__LHB == '|');
-      if (result__RHDB) {
-        append__2JS(string_tmp__VH,(&__string_200));
+      result__0IDB=(c__LHB == '|');
+      if (result__0IDB) {
+        append__FLS(string_tmp__VH,(&__string_200));
       };
-      __tmp__1MB=result__RHDB;
+      __tmp__1MB=result__0IDB;
     };
     if (__tmp__1MB) {
       __tmp__INB=TRUE__;
     } else {
-      result__DIDB=(c__LHB == '&');
-      if (result__DIDB) {
-        append__2JS(string_tmp__VH,(&__string_201));
+      result__MJDB=(c__LHB == '&');
+      if (result__MJDB) {
+        append__FLS(string_tmp__VH,(&__string_201));
       };
-      __tmp__INB=result__DIDB;
+      __tmp__INB=result__MJDB;
     };
     if (__tmp__INB) {
       __tmp__VNB=TRUE__;
     } else {
-      result__VIDB=(c__LHB == '$');
-      if (result__VIDB) {
-        append__2JS(string_tmp__VH,(&__string_202));
+      result__4JDB=(c__LHB == '$');
+      if (result__4JDB) {
+        append__FLS(string_tmp__VH,(&__string_202));
       };
-      __tmp__VNB=result__VIDB;
+      __tmp__VNB=result__4JDB;
     };
     if (__tmp__VNB) {
       __tmp__COB=TRUE__;
     } else {
-      result__HJDB=(c__LHB == '#');
-      if (result__HJDB) {
-        append__2JS(string_tmp__VH,(&__string_203));
+      result__QKDB=(c__LHB == '#');
+      if (result__QKDB) {
+        append__FLS(string_tmp__VH,(&__string_203));
       };
-      __tmp__COB=result__HJDB;
+      __tmp__COB=result__QKDB;
     };
     if (__tmp__COB) {
       __tmp__POB=TRUE__;
     } else {
-      result__ZJDB=(c__LHB == '@');
-      if (result__ZJDB) {
-        append__2JS(string_tmp__VH,(&__string_204));
+      result__CLDB=(c__LHB == '@');
+      if (result__CLDB) {
+        append__FLS(string_tmp__VH,(&__string_204));
       };
-      __tmp__POB=result__ZJDB;
+      __tmp__POB=result__CLDB;
     };
     if ((! __tmp__POB)) {
       if ((c__LHB == '?')) {
-        append__2JS(string_tmp__VH,(&__string_205));
+        append__FLS(string_tmp__VH,(&__string_205));
       };
     };
     Self__KWB=(__INTEGER)(Self__KWB +  1);
@@ -11266,53 +11266,53 @@ static void* operator__name__GHB(void *op__JHB)
 static void print__DID(__STRING_CONSTANT *Self__EID)
 // ({STRING_CONSTANT}) VoidRecursive, No inlinable.
 {
-  put_string__WEF(Self__EID);
+  put_string__5FF(Self__EID);
 }
 
 static void* get__YWB(void *str__0WB)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
   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;
+  void *result__TIS;
+  __STRING *Self__3CX;
+  __INTEGER result__5CX,__tmp__ADX,Self__JS2,typ_id__ULD,c__UCT;
+  __INTEGER Self__CLHH,result__GSIH,__tmp__ISIH,Self__JSIH,idx__V0S;
+  __INTEGER typ_id__GDJB;
+  __STRING_CONSTANT *result__OLD,*result__5EF,*Self__SCT,*Self__HSIH;
+  __POINTER ptr__PLD,ptr_table__3RIH,next__2RIH,result__4RIH;
+  __POINTER ptr_table__CSIH,next__BSIH,result__DSIH,ptr__BDJB;
+  __POINTER ptr_table__MSIH,next__LSIH,result__NSIH,ptr_table__RSIH;
+  __POINTER next__QSIH,result__SSIH;
+  __UINTEGER_32 sz__RLD,a__GMFH,new_size__HMFH,t__LMFH,a__KMFH;
+  __UINTEGER_32 new_size__FSIH,lab_type__ESIH,sz__DDJB,a__00FH;
+  __UINTEGER_32 new_size__10FH,t__50FH,a__40FH,new_size__USIH;
+  __UINTEGER_32 lab_type__TSIH;
+  __HASHED_SEToABSTRACT_STRINGo *Self__AIS,*Self__M0S;
+  void *node__SIS,*node__W0S,*n__DHCB;
+  __CHARACTER *Self__DLHH,*model__ELHH;
+  __HASHED_SET_NODEoABSTRACT_STRINGo *result__ADJB,*Self__W5CC;
   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)) {
+  Self__AIS=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+  result__TIS=NULL;
+  Self__3CX=((__STRING *)str__0WB);
+  result__5CX= 0;
+  __tmp__ADX=Self__3CX->count__EGC;
+  Self__JS2= 1;
+  while ((Self__JS2 <= __tmp__ADX)) {
+    result__5CX=(__INTEGER)((__INTEGER)( 5 * result__5CX) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__3CX->storage__F5R)[(__INTEGER)(Self__JS2 -  1)])));
+    Self__JS2=(__INTEGER)(Self__JS2 +  1);
+  };
+  if ((result__5CX <  0)) {
+    result__5CX=(__INTEGER)(~ result__5CX);
+  };
+  node__SIS=((void **)Self__AIS->buckets__CWR)[(__INTEGER)(result__5CX % Self__AIS->capacity__3VR)];
+  while ((! (((void *)node__SIS == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__SIS)->item__OWR,str__0WB)))) {
+    node__SIS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__SIS)->next__0WR;
+  };
+  if (((void *)node__SIS != (void *)NULL)) {
+    result__TIS=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__SIS)->item__OWR;
+  };
+  if (((void *)result__TIS == (void *)NULL)) {
     result__OLD=NULL;
     ptr__PLD=((__POINTER )(NULL));
     typ_id__ULD= 0;
@@ -11323,304 +11323,304 @@ static void* get__YWB(void *str__0WB)
       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)));
+        a__GMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__RLD + a__GMFH) & (__UINTEGER_32)(~ a__GMFH));
+        ptr_table__3RIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2RIH=((__POINTER )(NULL));
+        result__4RIH=((__POINTER *)ptr_table__3RIH)[ 0];
+        if ((result__4RIH == (void *)NULL)) {
+          result__4RIH=new_lab__ZPJ(new_size__HMFH);
+          next__2RIH=(void *)((unsigned long)result__4RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMFH)));
+          ((__POINTER *)next__2RIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3RIH)[ 0]=next__2RIH;
+        } else {
+          next__2RIH=((__POINTER *)result__4RIH)[ 0];
+          if ((next__2RIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4RIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HMFH <<  1)) <=  4096)) {
+              next__2RIH=(void *)((unsigned long)result__4RIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMFH)));
             } else {
-              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)));
+              next__2RIH=new_lab__ZPJ(new_size__HMFH);
+            };
+            ((__POINTER *)next__2RIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3RIH)[ 0]=next__2RIH;
+          } else {
+            ((__POINTER *)result__4RIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2RIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4RIH=next__2RIH;
+          };
+        };
+        ptr__PLD=result__4RIH;
+      } else {
+        t__LMFH=((__UINTEGER_32 )typ_id__ULD);
+        a__KMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FSIH=(__UINTEGER_32)((__UINTEGER_32)(sz__RLD + a__KMFH) & (__UINTEGER_32)(~ a__KMFH));
+        ptr_table__CSIH=((__POINTER )(&(table_type[(t__LMFH)])));
+        lab_type__ESIH=(__UINTEGER_32)(t__LMFH |  1);
+        next__BSIH=((__POINTER )(NULL));
+        result__DSIH=((__POINTER *)ptr_table__CSIH)[ 0];
+        if ((result__DSIH == (void *)NULL)) {
+          result__DSIH=new_lab__ZPJ(lab_type__ESIH);
+          next__BSIH=(void *)((unsigned long)result__DSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FSIH)));
+          ((__POINTER *)next__BSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CSIH)[ 0]=next__BSIH;
+        } else {
+          next__BSIH=((__POINTER *)result__DSIH)[ 0];
+          if ((next__BSIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DSIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FSIH <<  1)) <=  4096)) {
+              next__BSIH=(void *)((unsigned long)result__DSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FSIH)));
             } else {
-              next__YNIH=new_lab__QOJ(lab_type__1NIH);
+              next__BSIH=new_lab__ZPJ(lab_type__ESIH);
             };
-            ((__POINTER *)next__YNIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZNIH)[ 0]=next__YNIH;
+            ((__POINTER *)next__BSIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CSIH)[ 0]=next__BSIH;
           } else {
-            ((__POINTER *)result__0NIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YNIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0NIH=next__YNIH;
+            ((__POINTER *)result__DSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DSIH=next__BSIH;
           };
         };
-        ptr__PLD=result__0NIH;
+        ptr__PLD=result__DSIH;
       };
       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__5EF=result__OLD;
+    Self__SCT=((__STRING_CONSTANT *)result__OLD);
+    c__UCT=((__STRING *)str__0WB)->count__EGC;
+    if ((c__UCT !=  0)) {
+      Self__SCT->storage__ZNO=create__3IEB((__INTEGER)(c__UCT +  1));
+      Self__DLHH=((__CHARACTER *)Self__SCT->storage__ZNO);
+      model__ELHH=((__STRING *)str__0WB)->storage__F5R;
+      Self__CLHH=(__INTEGER)(c__UCT -  1);
+      while ((Self__CLHH >=  0)) {
+        Self__DLHH[Self__CLHH]=((__CHARACTER *)model__ELHH)[Self__CLHH];
+        Self__CLHH=(__INTEGER)(Self__CLHH -  1);
+      };
+      ((__CHARACTER *)Self__SCT->storage__ZNO)[c__UCT]='\0';
+      Self__SCT->count__DD=c__UCT;
     };
     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)));
+    Self__M0S=((__HASHED_SEToABSTRACT_STRINGo *)list__FK);
+    fast_has__K3X(Self__M0S,result__OLD);
+    fast_has__K3X(Self__M0S,result__OLD);
+    Self__HSIH=((__STRING_CONSTANT *)result__OLD);
+    result__GSIH= 0;
+    __tmp__ISIH=Self__HSIH->count__DD;
+    Self__JSIH= 1;
+    while ((Self__JSIH <= __tmp__ISIH)) {
+      result__GSIH=(__INTEGER)((__INTEGER)( 5 * result__GSIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__HSIH->storage__ZNO)[(__INTEGER)(Self__JSIH -  1)])));
+      Self__JSIH=(__INTEGER)(Self__JSIH +  1);
+    };
+    if ((result__GSIH <  0)) {
+      result__GSIH=(__INTEGER)(~ result__GSIH);
+    };
+    idx__V0S=(__INTEGER)(result__GSIH % Self__M0S->capacity__3VR);
+    node__W0S=((void **)Self__M0S->buckets__CWR)[idx__V0S];
+    while ((! (((void *)node__W0S == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__W0S)->item__OWR == (void *)result__5EF)))) {
+      node__W0S=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__W0S)->next__0WR;
+    };
+    if (((void *)node__W0S == (void *)NULL)) {
+      if ((Self__M0S->capacity__3VR == Self__M0S->count__DXR)) {
+        increase_capacity__2ONB(Self__M0S);
+        idx__V0S=(__INTEGER)(result__GSIH % Self__M0S->capacity__3VR);
+      };
+      n__DHCB=((void **)Self__M0S->buckets__CWR)[idx__V0S];
+      result__ADJB=NULL;
+      ptr__BDJB=((__POINTER )(NULL));
+      typ_id__GDJB= 0;
+      sz__DDJB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoABSTRACT_STRINGo));
+      if ((sz__DDJB ==  0)) {
+        result__ADJB=HASHED_SET_NODEoABSTRACT_STRINGo__;
+      } else {
+        typ_id__GDJB=__HASHED_SET_NODEoABSTRACT_STRINGo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DDJB);
+        if ((typ_id__GDJB == (__INTEGER)(-  1))) {
+          a__00FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__10FH=(__UINTEGER_32)((__UINTEGER_32)(sz__DDJB + a__00FH) & (__UINTEGER_32)(~ a__00FH));
+          ptr_table__MSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__10FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__LSIH=((__POINTER )(NULL));
+          result__NSIH=((__POINTER *)ptr_table__MSIH)[ 0];
+          if ((result__NSIH == (void *)NULL)) {
+            result__NSIH=new_lab__ZPJ(new_size__10FH);
+            next__LSIH=(void *)((unsigned long)result__NSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10FH)));
+            ((__POINTER *)next__LSIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MSIH)[ 0]=next__LSIH;
+          } else {
+            next__LSIH=((__POINTER *)result__NSIH)[ 0];
+            if ((next__LSIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NSIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__10FH <<  1)) <=  4096)) {
+                next__LSIH=(void *)((unsigned long)result__NSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__10FH)));
               } else {
-                next__COIH=new_lab__QOJ(new_size__SWFH);
+                next__LSIH=new_lab__ZPJ(new_size__10FH);
               };
-              ((__POINTER *)next__COIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DOIH)[ 0]=next__COIH;
+              ((__POINTER *)next__LSIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MSIH)[ 0]=next__LSIH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__NSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__NSIH=next__LSIH;
+            };
+          };
+          ptr__BDJB=result__NSIH;
+        } else {
+          t__50FH=((__UINTEGER_32 )typ_id__GDJB);
+          a__40FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__USIH=(__UINTEGER_32)((__UINTEGER_32)(sz__DDJB + a__40FH) & (__UINTEGER_32)(~ a__40FH));
+          ptr_table__RSIH=((__POINTER )(&(table_type[(t__50FH)])));
+          lab_type__TSIH=(__UINTEGER_32)(t__50FH |  1);
+          next__QSIH=((__POINTER )(NULL));
+          result__SSIH=((__POINTER *)ptr_table__RSIH)[ 0];
+          if ((result__SSIH == (void *)NULL)) {
+            result__SSIH=new_lab__ZPJ(lab_type__TSIH);
+            next__QSIH=(void *)((unsigned long)result__SSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__USIH)));
+            ((__POINTER *)next__QSIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RSIH)[ 0]=next__QSIH;
+          } else {
+            next__QSIH=((__POINTER *)result__SSIH)[ 0];
+            if ((next__QSIH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SSIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__USIH <<  1)) <=  4096)) {
+                next__QSIH=(void *)((unsigned long)result__SSIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__USIH)));
               } else {
-                next__HOIH=new_lab__QOJ(lab_type__KOIH);
+                next__QSIH=new_lab__ZPJ(lab_type__TSIH);
               };
-              ((__POINTER *)next__HOIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IOIH)[ 0]=next__HOIH;
+              ((__POINTER *)next__QSIH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RSIH)[ 0]=next__QSIH;
             } else {
-              ((__POINTER *)result__JOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__JOIH=next__HOIH;
+              ((__POINTER *)result__SSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__SSIH=next__QSIH;
             };
           };
-          ptr__XBJB=result__JOIH;
+          ptr__BDJB=result__SSIH;
         };
-        result__WBJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__XBJB);
-        *(result__WBJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
+        result__ADJB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)ptr__BDJB);
+        *(result__ADJB) = *(HASHED_SET_NODEoABSTRACT_STRINGo__);
       };
-      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);
+      Self__W5CC=((__HASHED_SET_NODEoABSTRACT_STRINGo *)result__ADJB);
+      Self__W5CC->item__OWR=result__OLD;
+      Self__W5CC->next__0WR=n__DHCB;
+      node__W0S=result__ADJB;
+      ((void **)Self__M0S->buckets__CWR)[idx__V0S]=result__ADJB;
+      Self__M0S->count__DXR=(__INTEGER)(Self__M0S->count__DXR +  1);
     };
   } else {
-    if (result__KHS==NULL) {
+    if (result__TIS==NULL) {
       __tmp__0XB=NULL;
     } else {
-      __tmp__0XB=((void *)result__KHS);
+      __tmp__0XB=((void *)result__TIS);
     };
     result__2WB=__tmp__0XB;
   };
   return(result__2WB);
 }
 
-static void copy__U4R(__STRING *Self__V4R,void *other__W4R)
+static void copy__35R(__STRING *Self__45R,void *other__55R)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__AAS,Self__NLHH;
+  __CHARACTER *__tmp__VAS,*__tmp__XAS,*Self__OLHH,*model__PLHH;
+  if (((struct ___OBJ *)other__55R)->__id==__STRING_CONSTANT__) {
+    __tmp__AAS=((__STRING_CONSTANT *)other__55R)->count__DD;
   } else {
-    __tmp__X4R=((__STRING *)other__W4R)->count__EGC;
+    __tmp__AAS=((__STRING *)other__55R)->count__EGC;
   };
-  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;
+  Self__45R->count__EGC=__tmp__AAS;
+  if ((__tmp__AAS >  0)) {
+    if ((Self__45R->capacity__24R < __tmp__AAS)) {
+      Self__45R->storage__F5R=create__3IEB(__tmp__AAS);
+      Self__45R->capacity__24R=Self__45R->count__EGC;
     };
-    __tmp__M5R=Self__V4R->storage__23R;
-    if (((struct ___OBJ *)other__W4R)->__id==__STRING_CONSTANT__) {
-      __tmp__O5R=((__STRING_CONSTANT *)other__W4R)->storage__QMO;
+    __tmp__VAS=Self__45R->storage__F5R;
+    if (((struct ___OBJ *)other__55R)->__id==__STRING_CONSTANT__) {
+      __tmp__XAS=((__STRING_CONSTANT *)other__55R)->storage__ZNO;
     } else {
-      __tmp__O5R=((__STRING *)other__W4R)->storage__23R;
+      __tmp__XAS=((__STRING *)other__55R)->storage__F5R;
     };
-    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);
+    Self__OLHH=((__CHARACTER *)__tmp__VAS);
+    model__PLHH=__tmp__XAS;
+    Self__NLHH=(__INTEGER)(Self__45R->count__EGC -  1);
+    while ((Self__NLHH >=  0)) {
+      Self__OLHH[Self__NLHH]=((__CHARACTER *)model__PLHH)[Self__NLHH];
+      Self__NLHH=(__INTEGER)(Self__NLHH -  1);
     };
   };
 }
 
-static void append__2JS(__STRING *Self__3JS,void *other__4JS)
+static void append__FLS(__STRING *Self__GLS,void *other__HLS)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__QLS,needed_capacity__JLS,old_nb_elts__E0DC;
+  __INTEGER upper__XLHH,Self__VLHH,dest__AKBC,src_capacity__BKBC;
+  __INTEGER i2__RKBC,i1__QKBC;
+  __CHARACTER *Self__D0DC,*new__10DC,*__tmp__NMS,*__tmp__OMS,*Self__4JBC;
+  __CHARACTER *src__5JBC;
+  if (((struct ___OBJ *)other__HLS)->__id==__STRING_CONSTANT__) {
+    __tmp__QLS=((__STRING_CONSTANT *)other__HLS)->count__DD;
   } else {
-    __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;
+    __tmp__QLS=((__STRING *)other__HLS)->count__EGC;
+  };
+  needed_capacity__JLS=(__INTEGER)(Self__GLS->count__EGC + __tmp__QLS);
+  if ((Self__GLS->capacity__24R < needed_capacity__JLS)) {
+    if ((Self__GLS->capacity__24R ==  0)) {
+      Self__GLS->capacity__24R=needed_capacity__JLS;
+      Self__GLS->storage__F5R=create__3IEB(needed_capacity__JLS);
+    } else {
+      Self__D0DC=((__CHARACTER *)Self__GLS->storage__F5R);
+      old_nb_elts__E0DC=Self__GLS->capacity__24R;
+      new__10DC=((__CHARACTER *)realloc_dynamic__old_size__new_size__LELC(((__POINTER )Self__D0DC),((__UINTEGER_32 )old_nb_elts__E0DC),((__UINTEGER_32 )needed_capacity__JLS)));
+      upper__XLHH=(__INTEGER)(needed_capacity__JLS -  1);
+      Self__VLHH=old_nb_elts__E0DC;
+      while ((Self__VLHH <= upper__XLHH)) {
+        new__10DC[Self__VLHH]='\0';
+        Self__VLHH=(__INTEGER)(Self__VLHH +  1);
+      };
+      Self__GLS->storage__F5R=new__10DC;
+      Self__GLS->capacity__24R=needed_capacity__JLS;
+    };
+  };
+  __tmp__NMS=Self__GLS->storage__F5R;
+  if (((struct ___OBJ *)other__HLS)->__id==__STRING_CONSTANT__) {
+    __tmp__OMS=((__STRING_CONSTANT *)other__HLS)->storage__ZNO;
   } else {
-    __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;
+    __tmp__OMS=((__STRING *)other__HLS)->storage__F5R;
+  };
+  Self__4JBC=((__CHARACTER *)__tmp__NMS);
+  src__5JBC=__tmp__OMS;
+  dest__AKBC=Self__GLS->count__EGC;
+  src_capacity__BKBC=__tmp__QLS;
+  i2__RKBC= 0;
+  i1__QKBC=dest__AKBC;
+  while ((i2__RKBC != src_capacity__BKBC)) {
+    Self__4JBC[i1__QKBC]=((__CHARACTER *)src__5JBC)[i2__RKBC];
+    i2__RKBC=(__INTEGER)(i2__RKBC +  1);
+    i1__QKBC=(__INTEGER)(i1__QKBC +  1);
+  };
+  Self__GLS->count__EGC=needed_capacity__JLS;
 }
 
 static void* parent_directory__1ED()
 // () With resultNo recursive, No inlinable.
 {
-  __STRING *Self__THHH,*Self__MOIH;
+  __STRING *Self__2LHH,*Self__VSIH;
   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';
+  Self__2LHH=((__STRING *)string_tmp__AFD);
+  if ((Self__2LHH->capacity__24R > Self__2LHH->count__EGC)) {
+    ((__CHARACTER *)Self__2LHH->storage__F5R)[Self__2LHH->count__EGC]='\0';
   } else {
-    add_last__UHT(Self__THHH,'\0');
-    Self__THHH->count__EGC=(__INTEGER)(Self__THHH->count__EGC -  1);
+    add_last__3IT(Self__2LHH,'\0');
+    Self__2LHH->count__EGC=(__INTEGER)(Self__2LHH->count__EGC -  1);
   };
-  cwd__4ED=Self__THHH->storage__23R;
+  cwd__4ED=Self__2LHH->storage__F5R;
   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);
+  Self__VSIH=((__STRING *)string_tmp__AFD);
+  Self__VSIH->count__EGC= 0;
+  while ((((__CHARACTER *)cwd__4ED)[Self__VSIH->count__EGC] != '\0')) {
+    Self__VSIH->count__EGC=(__INTEGER)(Self__VSIH->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);
+  if (((void *)Self__VSIH->storage__F5R != (void *)cwd__4ED)) {
+    Self__VSIH->storage__F5R=cwd__4ED;
+    Self__VSIH->capacity__24R=(__INTEGER)(Self__VSIH->count__EGC +  1);
   };
-  __tmp__LFD=physical_get_entry__H5E(string_tmp__AFD);
+  __tmp__LFD=physical_get_entry__QAF(string_tmp__AFD);
   if (__tmp__LFD==NULL) {
     __tmp__MFD=NULL;
   } else {
@@ -11634,43 +11634,43 @@ static void* parent_directory__1ED()
     }
   };
   result__5ED=__tmp__MFD;
-  put__to__MWS(alias__RFD,__tmp__MFD,((__DIRECTORY_UNIX *)__tmp__MFD)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  put__to__VXS(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__0XAC(void *p__2XAC)
+static void* get_entry__GZAC(void *p__IZAC)
 // ({NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  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;
+  void *result__KZAC;
+  __INTEGER idx__LZAC,idx__NTHH,n__STHH,n__TTHH,__tmp__V1AC;
+  void *__tmp__DFIC,*__tmp__A2AC,*dir__41AC;
+  __STRING *Self__MMFH,*Self__RTHH;
+  __CHARACTER *Self__PTHH;
+  __BOOLEAN __tmp__E1AC,__tmp__P1AC;
+  result__KZAC=NULL;
+  idx__LZAC= 0;
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
-    __tmp__PDIC=FILE_SYSTEM__->parent_directory__1FD;
+    __tmp__DFIC=FILE_SYSTEM__->parent_directory__1FD;
   } else {
-    __tmp__PDIC=parent_directory__1ED();
+    __tmp__DFIC=parent_directory__1ED();
   };
-  copy__U4R(string_tmp2__AYAC,((__DIRECTORY_UNIX *)__tmp__PDIC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  copy__35R(string_tmp2__MZAC,((__DIRECTORY_UNIX *)__tmp__DFIC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  add_last__UHT(string_tmp2__AYAC,'/');
+  add_last__3IT(string_tmp2__MZAC,'/');
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  append__2JS(string_tmp2__AYAC,p__2XAC);
+  append__FLS(string_tmp2__MZAC,p__IZAC);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
@@ -11679,7 +11679,7 @@ static void* get_entry__0XAC(void *p__2XAC)
   } else {
     parent_directory__1ED();
   };
-  reduce_path__W1HC(string_tmp2__AYAC);
+  reduce_path__K3HC(string_tmp2__MZAC);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
@@ -11688,7 +11688,7 @@ static void* get_entry__0XAC(void *p__2XAC)
   } else {
     parent_directory__1ED();
   };
-  copy__U4R(string_tmp3__GYAC,string_tmp2__AYAC);
+  copy__35R(string_tmp3__SZAC,string_tmp2__MZAC);
   do {
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
@@ -11698,32 +11698,32 @@ static void* get_entry__0XAC(void *p__2XAC)
     } else {
       parent_directory__1ED();
     };
-    result__4XAC=reference_at__WT0C(alias__RFD,string_tmp2__AYAC);
-    if (((void *)result__4XAC == (void *)NULL)) {
+    result__KZAC=reference_at__NV0C(alias__RFD,string_tmp2__MZAC);
+    if (((void *)result__KZAC == (void *)NULL)) {
       if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
         parent_directory__1ED();
       };
-      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);
+      Self__MMFH=((__STRING *)string_tmp2__MZAC);
+      Self__PTHH=((__CHARACTER *)Self__MMFH->storage__F5R);
+      idx__NTHH=(__INTEGER)(Self__MMFH->count__EGC -  1);
+      while ((! ((idx__NTHH <  0) || ('/' == Self__PTHH[idx__NTHH])))) {
+        idx__NTHH=(__INTEGER)(idx__NTHH -  1);
       };
-      idx__5XAC=(__INTEGER)( 1 + idx__EPHH);
-      if ((idx__5XAC >  0)) {
+      idx__LZAC=(__INTEGER)( 1 + idx__NTHH);
+      if ((idx__LZAC >  0)) {
         if (FILE_SYSTEM__->parent_directory__2FD==0) {
         } else {
           parent_directory__1ED();
         };
-        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;
+        Self__RTHH=((__STRING *)string_tmp2__MZAC);
+        n__STHH=(__INTEGER)(idx__LZAC -  1);
+        if ((n__STHH < Self__RTHH->count__EGC)) {
+          n__TTHH=(__INTEGER)(Self__RTHH->count__EGC - n__STHH);
+          if ((n__TTHH > Self__RTHH->count__EGC)) {
+            Self__RTHH->count__EGC= 0;
           } else {
-            Self__IPHH->count__EGC=(__INTEGER)(Self__IPHH->count__EGC - n__KPHH);
+            Self__RTHH->count__EGC=(__INTEGER)(Self__RTHH->count__EGC - n__TTHH);
           };
         };
       } else {
@@ -11731,20 +11731,20 @@ static void* get_entry__0XAC(void *p__2XAC)
         } else {
           parent_directory__1ED();
         };
-        ((__STRING *)string_tmp2__AYAC)->count__EGC= 0;
+        ((__STRING *)string_tmp2__MZAC)->count__EGC= 0;
       };
     };
-    if (((void *)result__4XAC == (void *)NULL)) {
+    if (((void *)result__KZAC == (void *)NULL)) {
       if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
         parent_directory__1ED();
       };
-      __tmp__YZAC=(((__STRING *)string_tmp2__AYAC)->count__EGC !=  0);
+      __tmp__E1AC=(((__STRING *)string_tmp2__MZAC)->count__EGC !=  0);
     } else {
-      __tmp__YZAC=FALSE__;
+      __tmp__E1AC=FALSE__;
     };
-  } while (__tmp__YZAC);
-  if (((void *)result__4XAC == (void *)NULL)) {
+  } while (__tmp__E1AC);
+  if (((void *)result__KZAC == (void *)NULL)) {
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
@@ -11753,111 +11753,111 @@ static void* get_entry__0XAC(void *p__2XAC)
     } else {
       parent_directory__1ED();
     };
-    result__4XAC=physical_get_entry__KW0C(string_tmp3__GYAC);
-    __tmp__D0AC=TRUE__;
+    result__KZAC=physical_get_entry__BY0C(string_tmp3__SZAC);
+    __tmp__P1AC=TRUE__;
   } else {
-    __tmp__D0AC=FALSE__;
+    __tmp__P1AC=FALSE__;
   };
-  if ((! __tmp__D0AC)) {
+  if ((! __tmp__P1AC)) {
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
     };
-    __tmp__J0AC=((__STRING *)string_tmp3__GYAC)->count__EGC;
+    __tmp__V1AC=((__STRING *)string_tmp3__SZAC)->count__EGC;
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
     };
-    if ((__tmp__J0AC != ((__STRING *)string_tmp2__AYAC)->count__EGC)) {
-      if (result__4XAC==NULL) {
-        __tmp__U0AC=NULL;
+    if ((__tmp__V1AC != ((__STRING *)string_tmp2__MZAC)->count__EGC)) {
+      if (result__KZAC==NULL) {
+        __tmp__A2AC=NULL;
       } else {
-        switch (((struct ___OBJ *)result__4XAC)->__id) {
+        switch (((struct ___OBJ *)result__KZAC)->__id) {
         case __DIRECTORY_UNIX__: {
-          __tmp__U0AC=((void *)result__4XAC);
+          __tmp__A2AC=((void *)result__KZAC);
         } break;
         case __FILE_UNIX__: {
-          __tmp__U0AC=NULL;
+          __tmp__A2AC=NULL;
         } break;
         }
       };
-      dir__S0AC=__tmp__U0AC;
+      dir__41AC=__tmp__A2AC;
       if (FILE_SYSTEM__->parent_directory__2FD==0) {
       } else {
         parent_directory__1ED();
       };
-      result__4XAC=physical_get_entry__H5E(string_tmp3__GYAC);
+      result__KZAC=physical_get_entry__QAF(string_tmp3__SZAC);
     };
   };
-  return(result__4XAC);
+  return(result__KZAC);
 }
 
-static void put_string__CZF(void *s__EZF)
+static void put_string__L0F(void *s__N0F)
 // ({NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__TZF,__tmp__VZF,Self__GUG,limit_up__HUG;
-  __CHARACTER __tmp__2ZF;
-  if (((struct ___OBJ *)s__EZF)->__id==__STRING_CONSTANT__) {
-    __tmp__TZF= 1;
+  __INTEGER __tmp__20F,__tmp__40F,Self__PVG,limit_up__QVG;
+  __CHARACTER __tmp__F1F;
+  if (((struct ___OBJ *)s__N0F)->__id==__STRING_CONSTANT__) {
+    __tmp__20F= 1;
   } else {
-    __tmp__TZF= 1;
+    __tmp__20F= 1;
   };
-  if (((struct ___OBJ *)s__EZF)->__id==__STRING_CONSTANT__) {
-    __tmp__VZF=((__STRING_CONSTANT *)s__EZF)->count__DD;
+  if (((struct ___OBJ *)s__N0F)->__id==__STRING_CONSTANT__) {
+    __tmp__40F=((__STRING_CONSTANT *)s__N0F)->count__DD;
   } else {
-    __tmp__VZF=((__STRING *)s__EZF)->count__EGC;
+    __tmp__40F=((__STRING *)s__N0F)->count__EGC;
   };
-  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)];
+  Self__PVG=__tmp__20F;
+  limit_up__QVG=__tmp__40F;
+  while ((Self__PVG <= limit_up__QVG)) {
+    if (((struct ___OBJ *)s__N0F)->__id==__STRING_CONSTANT__) {
+      __tmp__F1F=((__CHARACTER *)((__STRING_CONSTANT *)s__N0F)->storage__ZNO)[(__INTEGER)(Self__PVG -  1)];
     } else {
-      __tmp__2ZF=((__CHARACTER *)((__STRING *)s__EZF)->storage__23R)[(__INTEGER)(Self__GUG -  1)];
+      __tmp__F1F=((__CHARACTER *)((__STRING *)s__N0F)->storage__F5R)[(__INTEGER)(Self__PVG -  1)];
     };
-    fputc((int)(__tmp__2ZF),stderr);
-    Self__GUG=(__INTEGER)(Self__GUG +  1);
+    fputc((int)(__tmp__F1F),stderr);
+    Self__PVG=(__INTEGER)(Self__PVG +  1);
   };
 }
 
 static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __PROTOTYPE *result__JVC,*Self__EQS;
+  __POINTER ptr__KVC,ptr_table__ZSIH,next__YSIH,result__0SIH;
+  __POINTER ptr_table__4SIH,next__3SIH,result__5SIH,ptr__CC3;
+  __POINTER ptr_table__LTIH,next__KTIH,result__MTIH,ptr_table__QTIH;
+  __POINTER next__PTIH,result__RTIH,ptr__A2GD,ptr_table__0TIH;
+  __POINTER next__ZTIH,result__1TIH,ptr_table__5TIH,next__4TIH;
+  __POINTER result__AUIH,file__IQS,ptr__HI3,ptr_table__EUIH,next__DUIH;
+  __POINTER result__FUIH,ptr_table__JUIH,next__IUIH,result__KUIH;
+  __INTEGER typ_id__PVC,idx__VTHH,idx__LQS,len__ETIH,__tmp__FTIH;
+  __INTEGER __tmp__HTIH,Self__ITIH,typ_id__HC3,new_capacity__OQX;
+  __INTEGER __tmp__SRX,__tmp__MNEC,Self__QPVD,result__UTIH,__tmp__WTIH;
+  __INTEGER Self__XTIH,idx__HMBC,idx__VZGD,new_capacity__WZGD,i__XZGD;
+  __INTEGER result__2KW,__tmp__3KW,Self__TQ1,typ_id__F2GD,result__PTX;
+  __INTEGER typ_id__MI3,new_capacity__NMJC;
+  __UINTEGER_32 sz__MVC,a__VMFH,new_size__WMFH,t__0MFH,a__ZMFH;
+  __UINTEGER_32 new_size__BTIH,lab_type__ATIH,sz__EC3,a__3MFH;
+  __UINTEGER_32 new_size__4MFH,t__CNFH,a__BNFH,new_size__TTIH;
+  __UINTEGER_32 lab_type__STIH,sz__C2GD,a__UNFH,new_size__VNFH,t__ZNFH;
+  __UINTEGER_32 a__YNFH,new_size__CUIH,lab_type__BUIH,sz__JI3,a__2NFH;
+  __UINTEGER_32 new_size__3NFH,t__BOFH,a__AOFH,new_size__MUIH;
+  __UINTEGER_32 lab_type__LUIH;
+  __STRING_CONSTANT *Self__UOX,*Self__VTIH,*Self__0KW;
+  __STRING *Self__5LHH,*Self__HMHH,*Self__KMHH,*Self__BWS;
+  void *__tmp__ZRS;
+  __CHARACTER *Self__XTHH,*ptr__YTX;
+  __FAST_ARRAYoITM_TYPE_PARAMETERo *result__BC3,*Self__01BC;
+  __FAST_ARRAYoPROTOTYPEo *Self__MQX;
+  __BOOLEAN __tmp__2QX;
+  void **__tmp__RRX,**new__YMEC;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__3LBC;
+  void *node__JMBC,*node1__ZZGD,*node2__0ZGD,*__tmp__3NBC;
+  void **old_buckets__YZGD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *result__51GD;
+  __HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *Self__F2SD;
+  __HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *result__GI3,*Self__Q3BC;
   result__JVC=NULL;
   ptr__KVC=((__POINTER )(NULL));
   typ_id__PVC= 0;
@@ -11868,447 +11868,447 @@ static __PROTOTYPE* create__name__generic_count__JBC(void *f__LBC,void *n__MBC)
     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;
+      a__VMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__WMFH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__VMFH) & (__UINTEGER_32)(~ a__VMFH));
+      ptr_table__ZSIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WMFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__YSIH=((__POINTER )(NULL));
+      result__0SIH=((__POINTER *)ptr_table__ZSIH)[ 0];
+      if ((result__0SIH == (void *)NULL)) {
+        result__0SIH=new_lab__ZPJ(new_size__WMFH);
+        next__YSIH=(void *)((unsigned long)result__0SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMFH)));
+        ((__POINTER *)next__YSIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__ZSIH)[ 0]=next__YSIH;
       } 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)));
+        next__YSIH=((__POINTER *)result__0SIH)[ 0];
+        if ((next__YSIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0SIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WMFH <<  1)) <=  4096)) {
+            next__YSIH=(void *)((unsigned long)result__0SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WMFH)));
           } else {
-            next__POIH=new_lab__QOJ(new_size__NIFH);
+            next__YSIH=new_lab__ZPJ(new_size__WMFH);
           };
-          ((__POINTER *)next__POIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__QOIH)[ 0]=next__POIH;
+          ((__POINTER *)next__YSIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZSIH)[ 0]=next__YSIH;
         } else {
-          ((__POINTER *)result__ROIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__POIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__ROIH=next__POIH;
+          ((__POINTER *)result__0SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__0SIH=next__YSIH;
         };
       };
-      ptr__KVC=result__ROIH;
+      ptr__KVC=result__0SIH;
     } 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;
+      t__0MFH=((__UINTEGER_32 )typ_id__PVC);
+      a__ZMFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__BTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__MVC + a__ZMFH) & (__UINTEGER_32)(~ a__ZMFH));
+      ptr_table__4SIH=((__POINTER )(&(table_type[(t__0MFH)])));
+      lab_type__ATIH=(__UINTEGER_32)(t__0MFH |  1);
+      next__3SIH=((__POINTER )(NULL));
+      result__5SIH=((__POINTER *)ptr_table__4SIH)[ 0];
+      if ((result__5SIH == (void *)NULL)) {
+        result__5SIH=new_lab__ZPJ(lab_type__ATIH);
+        next__3SIH=(void *)((unsigned long)result__5SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTIH)));
+        ((__POINTER *)next__3SIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4SIH)[ 0]=next__3SIH;
       } 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)));
+        next__3SIH=((__POINTER *)result__5SIH)[ 0];
+        if ((next__3SIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5SIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BTIH <<  1)) <=  4096)) {
+            next__3SIH=(void *)((unsigned long)result__5SIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BTIH)));
           } else {
-            next__UOIH=new_lab__QOJ(lab_type__XOIH);
+            next__3SIH=new_lab__ZPJ(lab_type__ATIH);
           };
-          ((__POINTER *)next__UOIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__VOIH)[ 0]=next__UOIH;
+          ((__POINTER *)next__3SIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4SIH)[ 0]=next__3SIH;
         } else {
-          ((__POINTER *)result__WOIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UOIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__WOIH=next__UOIH;
+          ((__POINTER *)result__5SIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3SIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5SIH=next__3SIH;
         };
       };
-      ptr__KVC=result__WOIH;
+      ptr__KVC=result__5SIH;
     };
     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);
+  Self__EQS=((__PROTOTYPE *)result__JVC);
+  Self__EQS->filename__LOG=f__LBC;
+  Self__EQS->parent_named__5.name__LI=n__MBC;
+  Self__UOX=((__STRING_CONSTANT *)n__MBC);
+  Self__XTHH=((__CHARACTER *)Self__UOX->storage__ZNO);
+  idx__VTHH=(__INTEGER)(Self__UOX->count__DD -  1);
+  while ((! ((idx__VTHH <  0) || ('.' == Self__XTHH[idx__VTHH])))) {
+    idx__VTHH=(__INTEGER)(idx__VTHH -  1);
+  };
+  idx__LQS=(__INTEGER)( 1 + idx__VTHH);
+  if ((idx__LQS !=  0)) {
+    copy__35R(string_tmp__VH,n__MBC);
+    Self__5LHH=((__STRING *)string_tmp__VH);
+    if ((idx__LQS > Self__5LHH->count__EGC)) {
+      Self__5LHH->count__EGC= 0;
+    } else {
+      if ((idx__LQS >  0)) {
+        len__ETIH=(__INTEGER)((__INTEGER)(idx__LQS -  1) +  1);
+        if ((len__ETIH >  0)) {
+          __tmp__FTIH=(__INTEGER)(idx__LQS +  1);
+          __tmp__HTIH=Self__5LHH->count__EGC;
+          Self__ITIH=__tmp__FTIH;
+          while ((Self__ITIH <= __tmp__HTIH)) {
+            ((__CHARACTER *)Self__5LHH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__ITIH - len__ETIH) -  1)]=((__CHARACTER *)Self__5LHH->storage__F5R)[(__INTEGER)(Self__ITIH -  1)];
+            Self__ITIH=(__INTEGER)(Self__ITIH +  1);
+          };
+          Self__5LHH->count__EGC=(__INTEGER)(Self__5LHH->count__EGC - len__ETIH);
+        };
+      };
+    };
+    Self__EQS->shortname__2FE=get__YWB(string_tmp__VH);
   } else {
-    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__;
+    Self__EQS->shortname__2FE=n__MBC;
+  };
+  result__BC3=NULL;
+  ptr__CC3=((__POINTER )(NULL));
+  typ_id__HC3= 0;
+  sz__EC3=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_TYPE_PARAMETERo));
+  if ((sz__EC3 ==  0)) {
+    result__BC3=FAST_ARRAYoITM_TYPE_PARAMETERo__;
   } else {
-    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__;
+    typ_id__HC3=__FAST_ARRAYoITM_TYPE_PARAMETERo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__EC3);
+    if ((typ_id__HC3 == (__INTEGER)(-  1))) {
+      a__3MFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__4MFH=(__UINTEGER_32)((__UINTEGER_32)(sz__EC3 + a__3MFH) & (__UINTEGER_32)(~ a__3MFH));
+      ptr_table__LTIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4MFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__KTIH=((__POINTER )(NULL));
+      result__MTIH=((__POINTER *)ptr_table__LTIH)[ 0];
+      if ((result__MTIH == (void *)NULL)) {
+        result__MTIH=new_lab__ZPJ(new_size__4MFH);
+        next__KTIH=(void *)((unsigned long)result__MTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4MFH)));
+        ((__POINTER *)next__KTIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LTIH)[ 0]=next__KTIH;
+      } else {
+        next__KTIH=((__POINTER *)result__MTIH)[ 0];
+        if ((next__KTIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MTIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4MFH <<  1)) <=  4096)) {
+            next__KTIH=(void *)((unsigned long)result__MTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4MFH)));
+          } else {
+            next__KTIH=new_lab__ZPJ(new_size__4MFH);
+          };
+          ((__POINTER *)next__KTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LTIH)[ 0]=next__KTIH;
+        } else {
+          ((__POINTER *)result__MTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MTIH=next__KTIH;
+        };
+      };
+      ptr__CC3=result__MTIH;
+    } else {
+      t__CNFH=((__UINTEGER_32 )typ_id__HC3);
+      a__BNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__TTIH=(__UINTEGER_32)((__UINTEGER_32)(sz__EC3 + a__BNFH) & (__UINTEGER_32)(~ a__BNFH));
+      ptr_table__QTIH=((__POINTER )(&(table_type[(t__CNFH)])));
+      lab_type__STIH=(__UINTEGER_32)(t__CNFH |  1);
+      next__PTIH=((__POINTER )(NULL));
+      result__RTIH=((__POINTER *)ptr_table__QTIH)[ 0];
+      if ((result__RTIH == (void *)NULL)) {
+        result__RTIH=new_lab__ZPJ(lab_type__STIH);
+        next__PTIH=(void *)((unsigned long)result__RTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTIH)));
+        ((__POINTER *)next__PTIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__QTIH)[ 0]=next__PTIH;
+      } else {
+        next__PTIH=((__POINTER *)result__RTIH)[ 0];
+        if ((next__PTIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RTIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__TTIH <<  1)) <=  4096)) {
+            next__PTIH=(void *)((unsigned long)result__RTIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TTIH)));
+          } else {
+            next__PTIH=new_lab__ZPJ(lab_type__STIH);
+          };
+          ((__POINTER *)next__PTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QTIH)[ 0]=next__PTIH;
+        } else {
+          ((__POINTER *)result__RTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__RTIH=next__PTIH;
+        };
+      };
+      ptr__CC3=result__RTIH;
+    };
+    result__BC3=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)ptr__CC3);
+    *(result__BC3) = *(FAST_ARRAYoITM_TYPE_PARAMETERo__);
+  };
+  Self__01BC=((__FAST_ARRAYoITM_TYPE_PARAMETERo *)result__BC3);
+  if ((Self__01BC->parent_arrayed_collection__KKE.capacity__UABC <  0)) {
+    Self__01BC->parent_arrayed_collection__KKE.storage__QBBC=create__4Z1C( 0);
+    Self__01BC->parent_arrayed_collection__KKE.capacity__UABC= 0;
+  };
+  Self__01BC->parent_arrayed_collection__KKE.upper__SABC=(__INTEGER)(-  1);
+  Self__EQS->idf_generic_list__LKE=result__BC3;
+  Self__EQS->index__MLG=(__INTEGER)(((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ +  1);
+  Self__MQX=((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ);
+  new_capacity__OQX= 0;
+  if (((__INTEGER)(Self__MQX->parent_arrayed_collection__AJ.upper__HJ +  1) <= (__INTEGER)(Self__MQX->parent_arrayed_collection__AJ.capacity__BAU -  1))) {
+    Self__MQX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__MQX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    __tmp__2QX=TRUE__;
   } else {
-    __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)));
+    __tmp__2QX=FALSE__;
+  };
+  if ((! __tmp__2QX)) {
+    if ((Self__MQX->parent_arrayed_collection__AJ.capacity__BAU ==  0)) {
+      Self__MQX->parent_arrayed_collection__AJ.storage__OQT=create__QDSB( 2);
+      Self__MQX->parent_arrayed_collection__AJ.capacity__BAU= 2;
+      Self__MQX->parent_arrayed_collection__AJ.upper__HJ= 0;
+    } else {
+      new_capacity__OQX=(__INTEGER)(Self__MQX->parent_arrayed_collection__AJ.capacity__BAU <<  1);
+      __tmp__RRX=Self__MQX->parent_arrayed_collection__AJ.storage__OQT;
+      __tmp__SRX=Self__MQX->parent_arrayed_collection__AJ.capacity__BAU;
+      new__YMEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__RRX)),((__UINTEGER_32 )(__INTEGER)(__tmp__SRX * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OQX * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__MNEC=(__INTEGER)(new_capacity__OQX -  1);
+      Self__QPVD=__tmp__SRX;
+      while ((Self__QPVD <= __tmp__MNEC)) {
+        new__YMEC[Self__QPVD]=NULL;
+        Self__QPVD=(__INTEGER)(Self__QPVD +  1);
+      };
+      Self__MQX->parent_arrayed_collection__AJ.storage__OQT=new__YMEC;
+      Self__MQX->parent_arrayed_collection__AJ.capacity__BAU=new_capacity__OQX;
+      Self__MQX->parent_arrayed_collection__AJ.upper__HJ=(__INTEGER)(Self__MQX->parent_arrayed_collection__AJ.upper__HJ +  1);
+    };
+  };
+  ((void **)Self__MQX->parent_arrayed_collection__AJ.storage__OQT)[Self__MQX->parent_arrayed_collection__AJ.upper__HJ]=Self__EQS;
+  Self__3LBC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__TQS);
+  Self__VTIH=((__STRING_CONSTANT *)f__LBC);
+  result__UTIH= 0;
+  __tmp__WTIH=Self__VTIH->count__DD;
+  Self__XTIH= 1;
+  while ((Self__XTIH <= __tmp__WTIH)) {
+    result__UTIH=(__INTEGER)((__INTEGER)( 5 * result__UTIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__VTIH->storage__ZNO)[(__INTEGER)(Self__XTIH -  1)])));
+    Self__XTIH=(__INTEGER)(Self__XTIH +  1);
+  };
+  if ((result__UTIH <  0)) {
+    result__UTIH=(__INTEGER)(~ result__UTIH);
+  };
+  idx__HMBC=(__INTEGER)(result__UTIH % Self__3LBC->capacity__LMBC);
+  node__JMBC=((void **)Self__3LBC->buckets__QMBC)[idx__HMBC];
+  while ((! (((void *)node__JMBC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__JMBC)->key__2MBC == (void *)f__LBC)))) {
+    node__JMBC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__JMBC)->next__HNBC;
+  };
+  if (((void *)node__JMBC == (void *)NULL)) {
+    if ((Self__3LBC->capacity__LMBC == Self__3LBC->count__QNBC)) {
+      idx__VZGD= 0;
+      node1__ZZGD=NULL;
+      node2__0ZGD=NULL;
+      old_buckets__YZGD=Self__3LBC->buckets__QMBC;
+      new_capacity__WZGD=prime_number_ceiling__T11((__INTEGER)(Self__3LBC->capacity__LMBC +  1));
+      Self__3LBC->buckets__QMBC=create__RITC(new_capacity__WZGD);
+      i__XZGD=(__INTEGER)(Self__3LBC->capacity__LMBC -  1);
+      Self__3LBC->capacity__LMBC=new_capacity__WZGD;
+      while ((i__XZGD >=  0)) {
+        node1__ZZGD=((void **)old_buckets__YZGD)[i__XZGD];
+        while (((void *)node1__ZZGD != (void *)NULL)) {
+          node2__0ZGD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZZGD)->next__HNBC;
+          Self__0KW=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZZGD)->key__2MBC);
+          result__2KW= 0;
+          __tmp__3KW=Self__0KW->count__DD;
+          Self__TQ1= 1;
+          while ((Self__TQ1 <= __tmp__3KW)) {
+            result__2KW=(__INTEGER)((__INTEGER)( 5 * result__2KW) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__0KW->storage__ZNO)[(__INTEGER)(Self__TQ1 -  1)])));
+            Self__TQ1=(__INTEGER)(Self__TQ1 +  1);
+          };
+          if ((result__2KW <  0)) {
+            result__2KW=(__INTEGER)(~ result__2KW);
+          };
+          idx__VZGD=(__INTEGER)(result__2KW % Self__3LBC->capacity__LMBC);
+          ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node1__ZZGD)->next__HNBC=((void **)Self__3LBC->buckets__QMBC)[idx__VZGD];
+          ((void **)Self__3LBC->buckets__QMBC)[idx__VZGD]=node1__ZZGD;
+          node1__ZZGD=node2__0ZGD;
+        };
+        i__XZGD=(__INTEGER)(i__XZGD -  1);
+      };
+      idx__HMBC=(__INTEGER)(result__UTIH % new_capacity__WZGD);
+    };
+    __tmp__3NBC=((void **)Self__3LBC->buckets__QMBC)[idx__HMBC];
+    result__51GD=NULL;
+    ptr__A2GD=((__POINTER )(NULL));
+    typ_id__F2GD= 0;
+    sz__C2GD=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo));
+    if ((sz__C2GD ==  0)) {
+      result__51GD=HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__F2GD=__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__C2GD);
+      if ((typ_id__F2GD == (__INTEGER)(-  1))) {
+        a__UNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__VNFH=(__UINTEGER_32)((__UINTEGER_32)(sz__C2GD + a__UNFH) & (__UINTEGER_32)(~ a__UNFH));
+        ptr_table__0TIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__VNFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ZTIH=((__POINTER )(NULL));
+        result__1TIH=((__POINTER *)ptr_table__0TIH)[ 0];
+        if ((result__1TIH == (void *)NULL)) {
+          result__1TIH=new_lab__ZPJ(new_size__VNFH);
+          next__ZTIH=(void *)((unsigned long)result__1TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VNFH)));
+          ((__POINTER *)next__ZTIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0TIH)[ 0]=next__ZTIH;
+        } else {
+          next__ZTIH=((__POINTER *)result__1TIH)[ 0];
+          if ((next__ZTIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1TIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VNFH <<  1)) <=  4096)) {
+              next__ZTIH=(void *)((unsigned long)result__1TIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VNFH)));
             } else {
-              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)));
+              next__ZTIH=new_lab__ZPJ(new_size__VNFH);
+            };
+            ((__POINTER *)next__ZTIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0TIH)[ 0]=next__ZTIH;
+          } else {
+            ((__POINTER *)result__1TIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1TIH=next__ZTIH;
+          };
+        };
+        ptr__A2GD=result__1TIH;
+      } else {
+        t__ZNFH=((__UINTEGER_32 )typ_id__F2GD);
+        a__YNFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__CUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__C2GD + a__YNFH) & (__UINTEGER_32)(~ a__YNFH));
+        ptr_table__5TIH=((__POINTER )(&(table_type[(t__ZNFH)])));
+        lab_type__BUIH=(__UINTEGER_32)(t__ZNFH |  1);
+        next__4TIH=((__POINTER )(NULL));
+        result__AUIH=((__POINTER *)ptr_table__5TIH)[ 0];
+        if ((result__AUIH == (void *)NULL)) {
+          result__AUIH=new_lab__ZPJ(lab_type__BUIH);
+          next__4TIH=(void *)((unsigned long)result__AUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CUIH)));
+          ((__POINTER *)next__4TIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5TIH)[ 0]=next__4TIH;
+        } else {
+          next__4TIH=((__POINTER *)result__AUIH)[ 0];
+          if ((next__4TIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CUIH <<  1)) <=  4096)) {
+              next__4TIH=(void *)((unsigned long)result__AUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CUIH)));
             } else {
-              next__VPIH=new_lab__QOJ(lab_type__YPIH);
+              next__4TIH=new_lab__ZPJ(lab_type__BUIH);
             };
-            ((__POINTER *)next__VPIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WPIH)[ 0]=next__VPIH;
+            ((__POINTER *)next__4TIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5TIH)[ 0]=next__4TIH;
           } else {
-            ((__POINTER *)result__XPIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XPIH=next__VPIH;
+            ((__POINTER *)result__AUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4TIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__AUIH=next__4TIH;
           };
         };
-        ptr__50GD=result__XPIH;
+        ptr__A2GD=result__AUIH;
       };
-      result__40GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__50GD);
-      *(result__40GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
+      result__51GD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)ptr__A2GD);
+      *(result__51GD) = *(HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__F2SD=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)result__51GD);
+    Self__F2SD->item__J4GD=Self__EQS;
+    Self__F2SD->key__2MBC=f__LBC;
+    Self__F2SD->next__HNBC=__tmp__3NBC;
+    node__JMBC=result__51GD;
+    ((void **)Self__3LBC->buckets__QMBC)[idx__HMBC]=result__51GD;
+    Self__3LBC->count__QNBC=(__INTEGER)(Self__3LBC->count__QNBC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__3KBC)->item__I3GD=Self__1OS;
+    ((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__JMBC)->item__J4GD=Self__EQS;
   };
-  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';
+  copy__35R(string_tmp__GTX,f__LBC);
+  Self__HMHH=((__STRING *)string_tmp__GTX);
+  if ((Self__HMHH->capacity__24R > Self__HMHH->count__EGC)) {
+    ((__CHARACTER *)Self__HMHH->storage__F5R)[Self__HMHH->count__EGC]='\0';
   } else {
-    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';
+    add_last__3IT(Self__HMHH,'\0');
+    Self__HMHH->count__EGC=(__INTEGER)(Self__HMHH->count__EGC -  1);
+  };
+  file__IQS=((__POINTER )(fopen((char*)(Self__HMHH->storage__F5R),"rb")));
+  fseek((FILE*)((file__IQS)),0,SEEK_END);
+  result__PTX=((__INTEGER )(ftell((FILE *)(file__IQS))));
+  fseek((FILE*)((file__IQS)),0,SEEK_SET);
+  Self__EQS->source__3BC=create__ZBB((__INTEGER)(result__PTX +  1));
+  __tmp__ZRS=Self__EQS->source__3BC;
+  Self__KMHH=((__STRING *)__tmp__ZRS);
+  if ((Self__KMHH->capacity__24R > Self__KMHH->count__EGC)) {
+    ((__CHARACTER *)Self__KMHH->storage__F5R)[Self__KMHH->count__EGC]='\0';
   } else {
-    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__;
+    add_last__3IT(Self__KMHH,'\0');
+    Self__KMHH->count__EGC=(__INTEGER)(Self__KMHH->count__EGC -  1);
+  };
+  ptr__YTX=Self__KMHH->storage__F5R;
+  fread((void *)((ptr__YTX)),(size_t)(1), (size_t)((result__PTX)),(FILE*)((file__IQS)));
+  ((__CHARACTER *)ptr__YTX)[result__PTX]='\0';
+  Self__BWS=((__STRING *)__tmp__ZRS);
+  Self__BWS->count__EGC= 0;
+  while ((((__CHARACTER *)ptr__YTX)[Self__BWS->count__EGC] != '\0')) {
+    Self__BWS->count__EGC=(__INTEGER)(Self__BWS->count__EGC +  1);
+  };
+  if (((void *)Self__BWS->storage__F5R != (void *)ptr__YTX)) {
+    Self__BWS->storage__F5R=ptr__YTX;
+    Self__BWS->capacity__24R=(__INTEGER)(Self__BWS->count__EGC +  1);
+  };
+  fclose((FILE*)((file__IQS)));
+  result__GI3=NULL;
+  ptr__HI3=((__POINTER )(NULL));
+  typ_id__MI3= 0;
+  sz__JI3=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo));
+  if ((sz__JI3 ==  0)) {
+    result__GI3=HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
   } else {
-    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));
+    typ_id__MI3=__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__JI3);
+    if ((typ_id__MI3 == (__INTEGER)(-  1))) {
+      a__2NFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__3NFH=(__UINTEGER_32)((__UINTEGER_32)(sz__JI3 + a__2NFH) & (__UINTEGER_32)(~ a__2NFH));
+      ptr_table__EUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3NFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__DUIH=((__POINTER )(NULL));
+      result__FUIH=((__POINTER *)ptr_table__EUIH)[ 0];
+      if ((result__FUIH == (void *)NULL)) {
+        result__FUIH=new_lab__ZPJ(new_size__3NFH);
+        next__DUIH=(void *)((unsigned long)result__FUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NFH)));
+        ((__POINTER *)next__DUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EUIH)[ 0]=next__DUIH;
+      } else {
+        next__DUIH=((__POINTER *)result__FUIH)[ 0];
+        if ((next__DUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3NFH <<  1)) <=  4096)) {
+            next__DUIH=(void *)((unsigned long)result__FUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3NFH)));
+          } else {
+            next__DUIH=new_lab__ZPJ(new_size__3NFH);
+          };
+          ((__POINTER *)next__DUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EUIH)[ 0]=next__DUIH;
+        } else {
+          ((__POINTER *)result__FUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FUIH=next__DUIH;
+        };
+      };
+      ptr__HI3=result__FUIH;
+    } else {
+      t__BOFH=((__UINTEGER_32 )typ_id__MI3);
+      a__AOFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__MUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__JI3 + a__AOFH) & (__UINTEGER_32)(~ a__AOFH));
+      ptr_table__JUIH=((__POINTER )(&(table_type[(t__BOFH)])));
+      lab_type__LUIH=(__UINTEGER_32)(t__BOFH |  1);
+      next__IUIH=((__POINTER )(NULL));
+      result__KUIH=((__POINTER *)ptr_table__JUIH)[ 0];
+      if ((result__KUIH == (void *)NULL)) {
+        result__KUIH=new_lab__ZPJ(lab_type__LUIH);
+        next__IUIH=(void *)((unsigned long)result__KUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUIH)));
+        ((__POINTER *)next__IUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__JUIH)[ 0]=next__IUIH;
+      } else {
+        next__IUIH=((__POINTER *)result__KUIH)[ 0];
+        if ((next__IUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MUIH <<  1)) <=  4096)) {
+            next__IUIH=(void *)((unsigned long)result__KUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MUIH)));
+          } else {
+            next__IUIH=new_lab__ZPJ(lab_type__LUIH);
+          };
+          ((__POINTER *)next__IUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__JUIH)[ 0]=next__IUIH;
+        } else {
+          ((__POINTER *)result__KUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__KUIH=next__IUIH;
+        };
+      };
+      ptr__HI3=result__KUIH;
+    };
+    result__GI3=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)ptr__HI3);
+    *(result__GI3) = *(HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo__);
+  };
+  Self__Q3BC=((__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *)result__GI3);
+  new_capacity__NMJC=prime_number_ceiling__T11( 193);
+  Self__Q3BC->buckets__OAGC=create__HRSC(new_capacity__NMJC);
+  Self__Q3BC->capacity__X3BC=new_capacity__NMJC;
+  Self__Q3BC->count__ZOGC= 0;
+  Self__EQS->slot_list__ASS=result__GI3;
+  Self__EQS->parent_named__5.parent_itm_object__4.position__0BJ=((__POSITION )(__UINTEGER_32)(((__UINTEGER_32 )Self__EQS->index__MLG) |  131072));
   return(result__JVC);
 }
 
@@ -12316,13 +12316,13 @@ static __BOOLEAN read_space__KSD()
 // () With resultNo recursive, No inlinable.
 {
   __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;
+  __INTEGER Self__IQDD;
+  __POSITION pos__4SVG;
+  __CHARACTER result__RSDH,result__4SDH,result__HTDH,result__QTDH;
+  __CHARACTER result__3TDH,result__KUDH,result__TUDH,result__2UDH;
+  __CHARACTER result__FVDH,result__SVDH,result__5VDH,result__MWDH;
+  __CHARACTER result__53E;
+  __BOOLEAN __tmp__1TD,__tmp__4WD,__tmp__D2D;
   pos2__PSD= 0;
   level_comment__QSD= 0;
   stat__RSD= 0;
@@ -12334,107 +12334,115 @@ static __BOOLEAN read_space__KSD()
   };
   while ((posold__NSD != position__CCC)) {
     posold__NSD=position__CCC;
-    until_do__XKI:
+    until_do__AMI:
     {
-      result__IODH='\0';
+      result__RSDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__IODH=((__CHARACTER )(( 0)));
+        result__RSDH=((__CHARACTER )(( 0)));
       } else {
-        result__IODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__RSDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__IODH == ((__CHARACTER )(( 0))))) {
+      if ((result__RSDH == ((__CHARACTER )(( 0))))) {
         __tmp__1TD=TRUE__;
       } else {
-        result__VODH='\0';
+        result__4SDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__VODH=((__CHARACTER )(( 0)));
+          result__4SDH=((__CHARACTER )(( 0)));
         } else {
-          result__VODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__4SDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__1TD=(((__INTEGER_8 )result__VODH) > ((__INTEGER_8 )' '));
+        __tmp__1TD=(((__INTEGER_8 )result__4SDH) > ((__INTEGER_8 )' '));
       };
       if ((! __tmp__1TD)) {
-        if (is_shorter2__VI) {
-          result__4ODH='\0';
+        if ((is_shorter2__VI | is_shorter__LZ)) {
+          result__HTDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__4ODH=((__CHARACTER )(( 0)));
+            result__HTDH=((__CHARACTER )(( 0)));
           } else {
-            result__4ODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__HTDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__4ODH == '\n')) {
-            Self__HPDD=stat__RSD;
+          if ((result__HTDH == '\n')) {
+            Self__IQDD=stat__RSD;
             if ((stat__RSD ==  0)) {
               stat__RSD= 1;
             };
-            if ((Self__HPDD ==  1)) {
+            if ((Self__IQDD ==  1)) {
               stat__RSD= 2;
             };
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__XKI;
+        goto until_do__AMI;
       };
     };
     if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
-      result__HPDH='\0';
+      result__QTDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__HPDH=((__CHARACTER )(( 0)));
+        result__QTDH=((__CHARACTER )(( 0)));
       } else {
-        result__HPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__QTDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__HPDH == '/') & (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+      if (((result__QTDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
         pos2__PSD=position__CCC;
-        until_do__H5BD:
+        until_do__KT2D:
         {
-          result__UPDH='\0';
+          result__3TDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__UPDH=((__CHARACTER )(( 0)));
+            result__3TDH=((__CHARACTER )(( 0)));
           } else {
-            result__UPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__3TDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__UPDH == ((__CHARACTER )(( 0))))) {
-            __tmp__QWD=TRUE__;
+          if ((result__3TDH == ((__CHARACTER )(( 0))))) {
+            __tmp__4WD=TRUE__;
           } else {
-            result__BQDH='\0';
+            result__KUDH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__BQDH=((__CHARACTER )(( 0)));
+              result__KUDH=((__CHARACTER )(( 0)));
             } else {
-              result__BQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__KUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__QWD=(result__BQDH == '\n');
+            __tmp__4WD=(result__KUDH == '\n');
           };
-          if ((! __tmp__QWD)) {
+          if ((! __tmp__4WD)) {
             if (is_shorter2__VI) {
               if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
-                result__KQDH='\0';
+                result__TUDH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__KQDH=((__CHARACTER )(( 0)));
+                  result__TUDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__KQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__TUDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                add_last__UHT(string_tmp3__0SD,result__KQDH);
+                add_last__3IT(string_tmp3__0SD,result__TUDH);
               };
               if ((stat__RSD ==  2)) {
-                result__TQDH='\0';
+                result__2UDH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__TQDH=((__CHARACTER )(( 0)));
+                  result__2UDH=((__CHARACTER )(( 0)));
                 } else {
-                  result__TQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__2UDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                add_last__UHT(string_tmp4__2SD,result__TQDH);
+                add_last__3IT(string_tmp4__2SD,result__2UDH);
               };
             };
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto until_do__H5BD;
+            goto until_do__KT2D;
           };
         };
         if (is_shorter2__VI) {
-          if ((stat__RSD ==  3)) {
-            add_last__UHT(string_tmp3__0SD,'\n');
+          if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
+            add_last__3IT(string_tmp3__0SD,'\n');
           };
-          if ((stat__RSD ==  4)) {
-            add_last__UHT(string_tmp4__2SD,'\n');
+          if ((stat__RSD ==  2)) {
+            add_last__3IT(string_tmp4__2SD,'\n');
+          };
+        };
+        if (is_shorter__LZ) {
+          if (((stat__RSD ==  0) || (stat__RSD ==  1))) {
+            short__token__to__YBD((&__string_128),pos2__PSD,position__CCC);
+          };
+          if ((stat__RSD ==  2)) {
+            short__token__to__YBD((&__string_127),pos2__PSD,position__CCC);
           };
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
@@ -12442,61 +12450,61 @@ static __BOOLEAN read_space__KSD()
     };
     if ((position__CCC < ((__STRING *)source__5BC)->count__EGC)) {
       pos2__PSD=position__CCC;
-      result__2QDH='\0';
+      result__FVDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__2QDH=((__CHARACTER )(( 0)));
+        result__FVDH=((__CHARACTER )(( 0)));
       } else {
-        result__2QDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__FVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if (((result__2QDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+      if (((result__FVDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
         position__CCC=(__INTEGER)(position__CCC +  2);
         level_comment__QSD= 1;
-        until_do__YT2D:
+        until_do__MU2D:
         {
-          result__JRDH='\0';
+          result__SVDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__JRDH=((__CHARACTER )(( 0)));
+            result__SVDH=((__CHARACTER )(( 0)));
           } else {
-            result__JRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__SVDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((! ((result__JRDH == ((__CHARACTER )(( 0)))) || (level_comment__QSD ==  0)))) {
-            result__WRDH='\0';
+          if ((! ((result__SVDH == ((__CHARACTER )(( 0)))) || (level_comment__QSD ==  0)))) {
+            result__5VDH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__WRDH=((__CHARACTER )(( 0)));
+              result__5VDH=((__CHARACTER )(( 0)));
             } else {
-              result__WRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__5VDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if (((result__WRDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
+            if (((result__5VDH == '/') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '*'))) {
               level_comment__QSD=(__INTEGER)(level_comment__QSD +  1);
               position__CCC=(__INTEGER)(position__CCC +  2);
-              __tmp__00D=TRUE__;
+              __tmp__D2D=TRUE__;
             } else {
-              __tmp__00D=FALSE__;
+              __tmp__D2D=FALSE__;
             };
-            if ((! __tmp__00D)) {
-              result__DSDH='\0';
+            if ((! __tmp__D2D)) {
+              result__MWDH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__DSDH=((__CHARACTER )(( 0)));
+                result__MWDH=((__CHARACTER )(( 0)));
               } else {
-                result__DSDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__MWDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if (((result__DSDH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
+              if (((result__MWDH == '*') && (((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)] == '/'))) {
                 level_comment__QSD=(__INTEGER)(level_comment__QSD -  1);
                 position__CCC=(__INTEGER)(position__CCC +  2);
               } else {
                 position__CCC=(__INTEGER)(position__CCC +  1);
               };
             };
-            goto until_do__YT2D;
+            goto until_do__MU2D;
           };
         };
         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)) {
+          pos__4SVG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_206));
+          put_position__LNG(pos__4SVG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
@@ -12504,145 +12512,145 @@ static __BOOLEAN read_space__KSD()
       };
     };
   };
-  if ((is_shorter2__VI && (! skip_comment__X2D))) {
+  if ((is_shorter2__VI && (! skip_comment__A4D))) {
     if ((((__STRING *)string_tmp3__0SD)->count__EGC ==  0)) {
-      last_comment_slot__J3D=NULL;
+      last_comment_slot__S4D=NULL;
     } else {
-      last_comment_slot__J3D=get__YWB(string_tmp3__0SD);
+      last_comment_slot__S4D=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';
+  begin_position__I5D=position__CCC;
+  result__53E='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__W2E=((__CHARACTER )(( 0)));
+    result__53E=((__CHARACTER )(( 0)));
   } else {
-    result__W2E=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    result__53E=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
   };
-  return(((position__CCC != pos__OSD) | (result__W2E != ((__CHARACTER )(( 0))))));
+  return(((position__CCC != pos__OSD) | (result__53E != ((__CHARACTER )(( 0))))));
 }
 
-static __BOOLEAN read_identifier__12K()
+static __BOOLEAN read_identifier__E4K()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER posold__I4K,idx__J4K;
+  __POSITION pos__1U1G;
+  __BOOLEAN result__H4K,__tmp__W4K,result__COFH,__tmp__GAL,result__FOFH;
+  __BOOLEAN result__IOFH,__tmp__CAL,__tmp__DAL;
+  __CHARACTER result__NODH,result__1ODH,result__IPDH,result__RPDH;
+  __CHARACTER result__0PDH,result__DQDH;
+  result__H4K=FALSE__;
+  posold__I4K= 0;
+  idx__J4K= 0;
   if ((! read_space__KSD())) {
-    __tmp__N3K=TRUE__;
+    __tmp__W4K=TRUE__;
   } else {
-    result__EKDH='\0';
+    result__NODH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__EKDH=((__CHARACTER )(( 0)));
+      result__NODH=((__CHARACTER )(( 0)));
     } else {
-      result__EKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__NODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__ZJFH=FALSE__;
-    if ((((__INTEGER_8 )result__EKDH) >= ((__INTEGER_8 )'a'))) {
-      result__ZJFH=(((__INTEGER_8 )result__EKDH) <= ((__INTEGER_8 )'z'));
+    result__COFH=FALSE__;
+    if ((((__INTEGER_8 )result__NODH) >= ((__INTEGER_8 )'a'))) {
+      result__COFH=(((__INTEGER_8 )result__NODH) <= ((__INTEGER_8 )'z'));
     };
-    __tmp__N3K=(! result__ZJFH);
+    __tmp__W4K=(! result__COFH);
   };
-  if (__tmp__N3K) {
-    result__42K=FALSE__;
+  if (__tmp__W4K) {
+    result__H4K=FALSE__;
   } else {
-    posold__52K=position__CCC;
+    posold__I4K=position__CCC;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__OTZE:
+    until_do__0VZE:
     {
-      result__SKDH='\0';
+      result__1ODH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SKDH=((__CHARACTER )(( 0)));
+        result__1ODH=((__CHARACTER )(( 0)));
       } else {
-        result__SKDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__1ODH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__SKDH == ((__CHARACTER )(( 0))))) {
-        __tmp__34K=TRUE__;
+      if ((result__1ODH == ((__CHARACTER )(( 0))))) {
+        __tmp__GAL=TRUE__;
       } else {
-        result__5KDH='\0';
+        result__IPDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__5KDH=((__CHARACTER )(( 0)));
+          result__IPDH=((__CHARACTER )(( 0)));
         } else {
-          result__5KDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__IPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__2JFH=FALSE__;
-        if ((((__INTEGER_8 )result__5KDH) >= ((__INTEGER_8 )'a'))) {
-          result__2JFH=(((__INTEGER_8 )result__5KDH) <= ((__INTEGER_8 )'z'));
+        result__FOFH=FALSE__;
+        if ((((__INTEGER_8 )result__IPDH) >= ((__INTEGER_8 )'a'))) {
+          result__FOFH=(((__INTEGER_8 )result__IPDH) <= ((__INTEGER_8 )'z'));
         };
-        if ((! result__2JFH)) {
-          result__ILDH='\0';
+        if ((! result__FOFH)) {
+          result__RPDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ILDH=((__CHARACTER )(( 0)));
+            result__RPDH=((__CHARACTER )(( 0)));
           } else {
-            result__ILDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__RPDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__5JFH=FALSE__;
-          if ((((__INTEGER_8 )result__ILDH) >= ((__INTEGER_8 )'0'))) {
-            result__5JFH=(((__INTEGER_8 )result__ILDH) <= ((__INTEGER_8 )'9'));
+          result__IOFH=FALSE__;
+          if ((((__INTEGER_8 )result__RPDH) >= ((__INTEGER_8 )'0'))) {
+            result__IOFH=(((__INTEGER_8 )result__RPDH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__Z4K=(! result__5JFH);
+          __tmp__CAL=(! result__IOFH);
         } else {
-          __tmp__Z4K=FALSE__;
+          __tmp__CAL=FALSE__;
         };
-        if (__tmp__Z4K) {
-          result__RLDH='\0';
+        if (__tmp__CAL) {
+          result__0PDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__RLDH=((__CHARACTER )(( 0)));
+            result__0PDH=((__CHARACTER )(( 0)));
           } else {
-            result__RLDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__0PDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__04K=(result__RLDH != '_');
+          __tmp__DAL=(result__0PDH != '_');
         } else {
-          __tmp__04K=FALSE__;
+          __tmp__DAL=FALSE__;
         };
-        __tmp__34K=__tmp__04K;
+        __tmp__GAL=__tmp__DAL;
       };
-      if ((! __tmp__34K)) {
-        result__0LDH='\0';
+      if ((! __tmp__GAL)) {
+        result__DQDH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0LDH=((__CHARACTER )(( 0)));
+          result__DQDH=((__CHARACTER )(( 0)));
         } else {
-          result__0LDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__DQDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__0LDH);
+        add_last__3IT(string_tmp__VH,result__DQDH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__OTZE;
+        goto until_do__0VZE;
       };
     };
     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)) {
+      idx__J4K=first_substring_index__BVZE(string_tmp__VH);
+      if ((idx__J4K !=  0)) {
+        position__CCC=(__INTEGER)(posold__I4K + idx__J4K);
+        pos__1U1G=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_207));
+        put_position__LNG(pos__1U1G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
       last_string__V0C=get__YWB(string_tmp__VH);
-      result__42K=TRUE__;
+      result__H4K=TRUE__;
     };
   };
-  return(result__42K);
+  return(result__H4K);
 }
 
-static __POSITION current_position__XUF()
+static __POSITION current_position__AWF()
 // () With resultNo recursive, No inlinable.
 {
-  __POSITION result__0UF;
-  result__0UF=((__POSITION ) 0);
+  __POSITION result__DWF;
+  result__DWF=((__POSITION ) 0);
   while ((pos_cur__FCC != position__CCC)) {
-    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
+    if ((((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(pos_cur__FCC -  1)] == '\n')) {
       pos_col__HCC= 0;
       pos_line__GCC=(__INTEGER)(pos_line__GCC +  1);
     } else {
@@ -12651,383 +12659,383 @@ static __POSITION current_position__XUF()
     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)) {
+    result__DWF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__MLG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) |  4294836224LU));
+    put_error__text__BMG( 0,(&__string_208));
+    put_position__LNG(result__DWF);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
   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)) {
+    result__DWF=((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__MLG) |  130560) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17))));
+    put_error__text__BMG( 0,(&__string_209));
+    put_position__LNG(result__DWF);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  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)))));
+  return(((__POSITION )(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((__PROTOTYPE *)object__ZBC)->index__MLG) | ((__UINTEGER_32 )(__INTEGER)(pos_col__HCC <<  9))) | ((__UINTEGER_32 )(__INTEGER)(pos_line__GCC <<  17)))));
 }
 
-static void put_error__text__YKG(__INTEGER type__0KG,void *txt__1KG)
+static void put_error__text__BMG(__INTEGER type__DMG,void *txt__EMG)
 // ({INTEGER},{NULLxSTRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  type_error__2KG=type__0KG;
-  ((__STRING *)msg_err__3KG)->count__EGC= 0;
-  if ((type__0KG ==  0)) {
-    append__2JS(msg_err__3KG,(&__string_210));
+  type_error__FMG=type__DMG;
+  ((__STRING *)msg_err__GMG)->count__EGC= 0;
+  if ((type__DMG ==  0)) {
+    append__FLS(msg_err__GMG,(&__string_210));
   };
-  if ((type__0KG ==  1)) {
-    append__2JS(msg_err__3KG,(&__string_211));
+  if ((type__DMG ==  1)) {
+    append__FLS(msg_err__GMG,(&__string_211));
   };
-  if ((type__0KG ==  2)) {
-    append__2JS(msg_err__3KG,(&__string_212));
+  if ((type__DMG ==  2)) {
+    append__FLS(msg_err__GMG,(&__string_212));
   };
-  if ((type__0KG ==  3)) {
-    append__2JS(msg_err__3KG,(&__string_213));
+  if ((type__DMG ==  3)) {
+    append__FLS(msg_err__GMG,(&__string_213));
   };
-  append__2JS(msg_err__3KG,txt__1KG);
+  append__FLS(msg_err__GMG,txt__EMG);
 }
 
-static void put_position__CMG(__POSITION Self__DMG)
+static void put_position__LNG(__POSITION Self__MNG)
 // ({POSITION}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __UINTEGER_32 c__ONG,__tmp__WOG,cols__RNG;
+  void *src__UNG;
+  __INTEGER pos__NNG,Self__DKH,limit_up__EKH;
+  __CHARACTER char__VNG;
+  c__ONG= 0;
+  char__VNG='\0';
+  append__FLS(msg_err__GMG,(&__string_214));
+  append_in__FHH((__UINTEGER_32)(((__UINTEGER_32 )Self__MNG) >>  17),msg_err__GMG);
+  append__FLS(msg_err__GMG,(&__string_215));
+  append_in__FHH((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__MNG) >>  9) &  255),msg_err__GMG);
+  append__FLS(msg_err__GMG,(&__string_216));
+  append__FLS(msg_err__GMG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__MNG)) &  511)])->parent_named__5.name__LI);
+  add_last__3IT(msg_err__GMG,'(');
+  append__FLS(msg_err__GMG,((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__MNG)) &  511)])->filename__LOG);
+  append__FLS(msg_err__GMG,(&__string_217));
+  src__UNG=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[(__INTEGER)(((__INTEGER )((__UINTEGER_32 )Self__MNG)) &  511)])->source__3BC;
+  pos__NNG= 1;
+  __tmp__WOG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__MNG) >>  17) -  1);
+  Self__DKH= 1;
+  limit_up__EKH=((__INTEGER )__tmp__WOG);
+  while ((Self__DKH <= limit_up__EKH)) {
+    while ((((__CHARACTER *)((__STRING *)src__UNG)->storage__F5R)[(__INTEGER)(pos__NNG -  1)] != '\n')) {
+      pos__NNG=(__INTEGER)(pos__NNG +  1);
+    };
+    pos__NNG=(__INTEGER)(pos__NNG +  1);
+    Self__DKH=(__INTEGER)(Self__DKH +  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');
+  cols__RNG=(__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )Self__MNG) >>  9) &  255);
+  while ((! ((pos__NNG > ((__STRING *)src__UNG)->count__EGC) || (((__CHARACTER *)((__STRING *)src__UNG)->storage__F5R)[(__INTEGER)(pos__NNG -  1)] == '\n')))) {
+    char__VNG=((__CHARACTER *)((__STRING *)src__UNG)->storage__F5R)[(__INTEGER)(pos__NNG -  1)];
+    add_last__3IT(msg_err__GMG,char__VNG);
+    if ((c__ONG < cols__RNG)) {
+      if ((char__VNG == '\t')) {
+        add_last__3IT(string_tmp__VH,'\t');
       } else {
-        add_last__UHT(string_tmp__VH,' ');
+        add_last__3IT(string_tmp__VH,' ');
       };
     };
-    c__FMG=(__UINTEGER_32)(c__FMG +  1);
-    pos__EMG=(__INTEGER)(pos__EMG +  1);
+    c__ONG=(__UINTEGER_32)(c__ONG +  1);
+    pos__NNG=(__INTEGER)(pos__NNG +  1);
   };
-  add_last__UHT(msg_err__3KG,'\n');
-  append__2JS(msg_err__3KG,string_tmp__VH);
-  append__2JS(msg_err__3KG,(&__string_218));
+  add_last__3IT(msg_err__GMG,'\n');
+  append__FLS(msg_err__GMG,string_tmp__VH);
+  append__FLS(msg_err__GMG,(&__string_218));
 }
 
-static __BOOLEAN read_symbol__3TJ(void *st__5TJ)
+static __BOOLEAN read_symbol__GVJ(void *st__IVJ)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__KVJ,j__LVJ;
+  __BOOLEAN result__MVJ,__tmp__UWJ,__tmp__RWJ;
+  __CHARACTER result__JRDH,result__WRDH;
+  posold__KVJ= 0;
+  j__LVJ= 0;
+  result__MVJ=FALSE__;
   if ((! read_space__KSD())) {
-    result__DUJ=FALSE__;
+    result__MVJ=FALSE__;
   } else {
-    posold__BUJ=position__CCC;
-    j__CUJ= 1;
-    until_do__R44:
+    posold__KVJ=position__CCC;
+    j__LVJ= 1;
+    until_do__054:
     {
-      result__ANDH='\0';
+      result__JRDH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__ANDH=((__CHARACTER )(( 0)));
+        result__JRDH=((__CHARACTER )(( 0)));
       } else {
-        result__ANDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__JRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__ANDH == ((__CHARACTER )(( 0))))) {
-        __tmp__LVJ=TRUE__;
+      if ((result__JRDH == ((__CHARACTER )(( 0))))) {
+        __tmp__UWJ=TRUE__;
       } else {
-        if ((j__CUJ > ((__STRING_CONSTANT *)st__5TJ)->count__DD)) {
-          __tmp__IVJ=TRUE__;
+        if ((j__LVJ > ((__STRING_CONSTANT *)st__IVJ)->count__DD)) {
+          __tmp__RWJ=TRUE__;
         } else {
-          result__NNDH='\0';
+          result__WRDH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__NNDH=((__CHARACTER )(( 0)));
+            result__WRDH=((__CHARACTER )(( 0)));
           } else {
-            result__NNDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__WRDH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__IVJ=(result__NNDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__5TJ)->storage__QMO)[(__INTEGER)(j__CUJ -  1)]);
+          __tmp__RWJ=(result__WRDH != ((__CHARACTER *)((__STRING_CONSTANT *)st__IVJ)->storage__ZNO)[(__INTEGER)(j__LVJ -  1)]);
         };
-        __tmp__LVJ=__tmp__IVJ;
+        __tmp__UWJ=__tmp__RWJ;
       };
-      if ((! __tmp__LVJ)) {
-        j__CUJ=(__INTEGER)(j__CUJ +  1);
+      if ((! __tmp__UWJ)) {
+        j__LVJ=(__INTEGER)(j__LVJ +  1);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__R44;
+        goto until_do__054;
       };
     };
-    if ((j__CUJ > ((__STRING_CONSTANT *)st__5TJ)->count__DD)) {
-      result__DUJ=TRUE__;
-      last_string__V0C=st__5TJ;
+    if ((j__LVJ > ((__STRING_CONSTANT *)st__IVJ)->count__DD)) {
+      result__MVJ=TRUE__;
+      last_string__V0C=st__IVJ;
     } else {
-      position__CCC=posold__BUJ;
-      result__DUJ=FALSE__;
+      position__CCC=posold__KVJ;
+      result__MVJ=FALSE__;
     };
   };
-  return(result__DUJ);
+  return(result__MVJ);
 }
 
-static __BOOLEAN read_short_elt__5GKB()
+static __BOOLEAN read_short_elt__JIKB()
 // () With resultNo recursive, No inlinable.
 {
-  __INTEGER j__DHKB;
-  __POSITION pos__IGG;
-  __BOOLEAN result__CHKB,__tmp__WHKB;
-  __CHARACTER __tmp__1IKB;
-  result__CHKB=FALSE__;
-  j__DHKB= 0;
-  if (read_identifier__12K()) {
+  __INTEGER j__NIKB;
+  __POSITION pos__RHG;
+  __BOOLEAN result__MIKB,__tmp__AJKB;
+  __CHARACTER __tmp__FKKB;
+  result__MIKB=FALSE__;
+  j__NIKB= 0;
+  if (read_identifier__E4K()) {
     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)) {
+      pos__RHG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_219));
+      put_position__LNG(pos__RHG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
     last_string__V0C=NULL;
-    result__CHKB=TRUE__;
-    __tmp__WHKB=TRUE__;
+    result__MIKB=TRUE__;
+    __tmp__AJKB=TRUE__;
   } else {
-    __tmp__WHKB=FALSE__;
+    __tmp__AJKB=FALSE__;
   };
-  if ((! __tmp__WHKB)) {
-    if (read_string__GBQ()) {
+  if ((! __tmp__AJKB)) {
+    if (read_string__PCQ()) {
       ((__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');
+      j__NIKB= 1;
+      while ((j__NIKB <= ((__STRING_CONSTANT *)last_string__V0C)->count__DD)) {
+        if ((((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[(__INTEGER)(j__NIKB -  1)] == '\\')) {
+          j__NIKB=(__INTEGER)(j__NIKB +  1);
+          __tmp__FKKB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[(__INTEGER)(j__NIKB -  1)];
+          if ((__tmp__FKKB == 'a')) {
+            add_last__3IT(string_tmp__VH,'\a');
           };
-          if ((__tmp__1IKB == 'b')) {
-            add_last__UHT(string_tmp__VH,'\b');
+          if ((__tmp__FKKB == 'b')) {
+            add_last__3IT(string_tmp__VH,'\b');
           };
-          if ((__tmp__1IKB == 'f')) {
-            add_last__UHT(string_tmp__VH,'\f');
+          if ((__tmp__FKKB == 'f')) {
+            add_last__3IT(string_tmp__VH,'\f');
           };
-          if ((__tmp__1IKB == 'n')) {
-            add_last__UHT(string_tmp__VH,'\n');
+          if ((__tmp__FKKB == 'n')) {
+            add_last__3IT(string_tmp__VH,'\n');
           };
-          if ((__tmp__1IKB == 'r')) {
-            add_last__UHT(string_tmp__VH,'\r');
+          if ((__tmp__FKKB == 'r')) {
+            add_last__3IT(string_tmp__VH,'\r');
           };
-          if ((__tmp__1IKB == 't')) {
-            add_last__UHT(string_tmp__VH,'\t');
+          if ((__tmp__FKKB == 't')) {
+            add_last__3IT(string_tmp__VH,'\t');
           };
-          if ((__tmp__1IKB == 'v')) {
-            add_last__UHT(string_tmp__VH,'\v');
+          if ((__tmp__FKKB == 'v')) {
+            add_last__3IT(string_tmp__VH,'\v');
           };
-          if ((__tmp__1IKB == '\\')) {
-            add_last__UHT(string_tmp__VH,'\\');
+          if ((__tmp__FKKB == '\\')) {
+            add_last__3IT(string_tmp__VH,'\\');
           };
-          if ((__tmp__1IKB == '?')) {
-            add_last__UHT(string_tmp__VH,'\?');
+          if ((__tmp__FKKB == '?')) {
+            add_last__3IT(string_tmp__VH,'\?');
           };
-          if ((__tmp__1IKB == '\'')) {
-            add_last__UHT(string_tmp__VH,'\'');
+          if ((__tmp__FKKB == '\'')) {
+            add_last__3IT(string_tmp__VH,'\'');
           };
-          if ((__tmp__1IKB == '\"')) {
-            add_last__UHT(string_tmp__VH,'\"');
+          if ((__tmp__FKKB == '\"')) {
+            add_last__3IT(string_tmp__VH,'\"');
           };
         } else {
-          add_last__UHT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__QMO)[(__INTEGER)(j__DHKB -  1)]);
+          add_last__3IT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[(__INTEGER)(j__NIKB -  1)]);
         };
-        j__DHKB=(__INTEGER)(j__DHKB +  1);
+        j__NIKB=(__INTEGER)(j__NIKB +  1);
       };
       last_string__V0C=get__YWB(string_tmp__VH);
-      result__CHKB=TRUE__;
+      result__MIKB=TRUE__;
     };
   };
-  return(result__CHKB);
+  return(result__MIKB);
 }
 
-static void fast_put__to__TXR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__UXR,void *k__WXR)
+static void fast_put__to__2YR(__HASHED_DICTIONARYoTYPExSTRING_CONSTANTo *Self__3YR,void *k__5YR)
 // ({HASHED_DICTIONARYoTYPExSTRING_CONSTANTo},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __INTEGER result__ZTHH,__tmp__1THH,Self__2THH,idx__HZR,idx__JRNB;
+  __INTEGER new_capacity__KRNB,i__LRNB,result__4THH,__tmp__AUHH;
+  __INTEGER Self__BUHH,typ_id__0TNB;
+  __STRING_CONSTANT *Self__5THH;
+  __POINTER ptr__VTNB,ptr_table__OUIH,next__NUIH,result__PUIH;
+  __POINTER ptr_table__TUIH,next__SUIH,result__UUIH;
+  __UINTEGER_32 sz__XTNB,a__0PFH,new_size__1PFH,t__5PFH,a__4PFH;
+  __UINTEGER_32 new_size__WUIH,lab_type__VUIH;
+  void *node__KZR,*node1__NRNB,*node2__ORNB,*__tmp__40R;
+  void **old_buckets__MRNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *result__UTNB;
+  __HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *Self__CTDC;
+  result__ZTHH= 0;
+  __tmp__1THH=((__STRING_CONSTANT *)k__5YR)->count__DD;
+  Self__2THH= 1;
+  while ((Self__2THH <= __tmp__1THH)) {
+    result__ZTHH=(__INTEGER)((__INTEGER)( 5 * result__ZTHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__5YR)->storage__ZNO)[(__INTEGER)(Self__2THH -  1)])));
+    Self__2THH=(__INTEGER)(Self__2THH +  1);
+  };
+  if ((result__ZTHH <  0)) {
+    result__ZTHH=(__INTEGER)(~ result__ZTHH);
+  };
+  idx__HZR=(__INTEGER)(result__ZTHH % Self__3YR->capacity__MZR);
+  node__KZR=((void **)Self__3YR->buckets__RZR)[idx__HZR];
+  while ((! (((void *)node__KZR == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__KZR)->key__3ZR == (void *)k__5YR)))) {
+    node__KZR=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node__KZR)->next__I0R;
+  };
+  if (((void *)node__KZR == (void *)NULL)) {
+    if ((Self__3YR->capacity__MZR == Self__3YR->count__R0R)) {
+      idx__JRNB= 0;
+      node1__NRNB=NULL;
+      node2__ORNB=NULL;
+      old_buckets__MRNB=Self__3YR->buckets__RZR;
+      new_capacity__KRNB=prime_number_ceiling__T11((__INTEGER)(Self__3YR->capacity__MZR +  1));
+      Self__3YR->buckets__RZR=create__IW2(new_capacity__KRNB);
+      i__LRNB=(__INTEGER)(Self__3YR->capacity__MZR -  1);
+      Self__3YR->capacity__MZR=new_capacity__KRNB;
+      while ((i__LRNB >=  0)) {
+        node1__NRNB=((void **)old_buckets__MRNB)[i__LRNB];
+        while (((void *)node1__NRNB != (void *)NULL)) {
+          node2__ORNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__NRNB)->next__I0R;
+          Self__5THH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__NRNB)->key__3ZR);
+          result__4THH= 0;
+          __tmp__AUHH=Self__5THH->count__DD;
+          Self__BUHH= 1;
+          while ((Self__BUHH <= __tmp__AUHH)) {
+            result__4THH=(__INTEGER)((__INTEGER)( 5 * result__4THH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__5THH->storage__ZNO)[(__INTEGER)(Self__BUHH -  1)])));
+            Self__BUHH=(__INTEGER)(Self__BUHH +  1);
+          };
+          if ((result__4THH <  0)) {
+            result__4THH=(__INTEGER)(~ result__4THH);
+          };
+          idx__JRNB=(__INTEGER)(result__4THH % Self__3YR->capacity__MZR);
+          ((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)node1__NRNB)->next__I0R=((void **)Self__3YR->buckets__RZR)[idx__JRNB];
+          ((void **)Self__3YR->buckets__RZR)[idx__JRNB]=node1__NRNB;
+          node1__NRNB=node2__ORNB;
+        };
+        i__LRNB=(__INTEGER)(i__LRNB -  1);
+      };
+      idx__HZR=(__INTEGER)(result__ZTHH % new_capacity__KRNB);
+    };
+    __tmp__40R=((void **)Self__3YR->buckets__RZR)[idx__HZR];
+    result__UTNB=NULL;
+    ptr__VTNB=((__POINTER )(NULL));
+    typ_id__0TNB= 0;
+    sz__XTNB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo));
+    if ((sz__XTNB ==  0)) {
+      result__UTNB=HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+    } else {
+      typ_id__0TNB=__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XTNB);
+      if ((typ_id__0TNB == (__INTEGER)(-  1))) {
+        a__0PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1PFH=(__UINTEGER_32)((__UINTEGER_32)(sz__XTNB + a__0PFH) & (__UINTEGER_32)(~ a__0PFH));
+        ptr_table__OUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1PFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__NUIH=((__POINTER )(NULL));
+        result__PUIH=((__POINTER *)ptr_table__OUIH)[ 0];
+        if ((result__PUIH == (void *)NULL)) {
+          result__PUIH=new_lab__ZPJ(new_size__1PFH);
+          next__NUIH=(void *)((unsigned long)result__PUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
+          ((__POINTER *)next__NUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__OUIH)[ 0]=next__NUIH;
+        } else {
+          next__NUIH=((__POINTER *)result__PUIH)[ 0];
+          if ((next__NUIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__1PFH <<  1)) <=  4096)) {
+              next__NUIH=(void *)((unsigned long)result__PUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1PFH)));
             } else {
-              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)));
+              next__NUIH=new_lab__ZPJ(new_size__1PFH);
+            };
+            ((__POINTER *)next__NUIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__OUIH)[ 0]=next__NUIH;
+          } else {
+            ((__POINTER *)result__PUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__PUIH=next__NUIH;
+          };
+        };
+        ptr__VTNB=result__PUIH;
+      } else {
+        t__5PFH=((__UINTEGER_32 )typ_id__0TNB);
+        a__4PFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WUIH=(__UINTEGER_32)((__UINTEGER_32)(sz__XTNB + a__4PFH) & (__UINTEGER_32)(~ a__4PFH));
+        ptr_table__TUIH=((__POINTER )(&(table_type[(t__5PFH)])));
+        lab_type__VUIH=(__UINTEGER_32)(t__5PFH |  1);
+        next__SUIH=((__POINTER )(NULL));
+        result__UUIH=((__POINTER *)ptr_table__TUIH)[ 0];
+        if ((result__UUIH == (void *)NULL)) {
+          result__UUIH=new_lab__ZPJ(lab_type__VUIH);
+          next__SUIH=(void *)((unsigned long)result__UUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUIH)));
+          ((__POINTER *)next__SUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__TUIH)[ 0]=next__SUIH;
+        } else {
+          next__SUIH=((__POINTER *)result__UUIH)[ 0];
+          if ((next__SUIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WUIH <<  1)) <=  4096)) {
+              next__SUIH=(void *)((unsigned long)result__UUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WUIH)));
             } else {
-              next__JQIH=new_lab__QOJ(lab_type__MQIH);
+              next__SUIH=new_lab__ZPJ(lab_type__VUIH);
             };
-            ((__POINTER *)next__JQIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__KQIH)[ 0]=next__JQIH;
+            ((__POINTER *)next__SUIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TUIH)[ 0]=next__SUIH;
           } else {
-            ((__POINTER *)result__LQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__LQIH=next__JQIH;
+            ((__POINTER *)result__UUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__UUIH=next__SUIH;
           };
         };
-        ptr__LSNB=result__LQIH;
+        ptr__VTNB=result__UUIH;
       };
-      result__KSNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__LSNB);
-      *(result__KSNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
+      result__UTNB=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)ptr__VTNB);
+      *(result__UTNB) = *(HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo__);
     };
-    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);
+    Self__CTDC=((__HASHED_DICTIONARY_NODEoTYPExSTRING_CONSTANTo *)result__UTNB);
+    Self__CTDC->key__3ZR=k__5YR;
+    Self__CTDC->next__I0R=__tmp__40R;
+    node__KZR=result__UTNB;
+    ((void **)Self__3YR->buckets__RZR)[idx__HZR]=result__UTNB;
+    Self__3YR->count__R0R=(__INTEGER)(Self__3YR->count__R0R +  1);
   };
 }
 
 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__L1B,*Self__PBS;
-  __POINTER ptr__M1B,ptr_table__PQIH,next__OQIH,result__QQIH;
-  __POINTER ptr_table__UQIH,next__TQIH,result__VQIH;
+  __TYPE_FULL *result__L1B,*Self__YCS;
+  __POINTER ptr__M1B,ptr_table__YUIH,next__XUIH,result__ZUIH;
+  __POINTER ptr_table__3UIH,next__2UIH,result__4UIH;
   __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;
+  __UINTEGER_32 sz__O1B,a__CQFH,new_size__DQFH,t__HQFH,a__GQFH;
+  __UINTEGER_32 new_size__AVIH,lab_type__5UIH;
+  void *__tmp__EDS,*__tmp__MDS;
+  __BOOLEAN __tmp__YDS,__tmp__ZDS;
   result__L1B=NULL;
   ptr__M1B=((__POINTER )(NULL));
   typ_id__R1B= 0;
@@ -13038,106 +13046,106 @@ static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB)
     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;
+      a__CQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DQFH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__CQFH) & (__UINTEGER_32)(~ a__CQFH));
+      ptr_table__YUIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__XUIH=((__POINTER )(NULL));
+      result__ZUIH=((__POINTER *)ptr_table__YUIH)[ 0];
+      if ((result__ZUIH == (void *)NULL)) {
+        result__ZUIH=new_lab__ZPJ(new_size__DQFH);
+        next__XUIH=(void *)((unsigned long)result__ZUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
+        ((__POINTER *)next__XUIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__YUIH)[ 0]=next__XUIH;
       } 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)));
+        next__XUIH=((__POINTER *)result__ZUIH)[ 0];
+        if ((next__XUIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZUIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__DQFH <<  1)) <=  4096)) {
+            next__XUIH=(void *)((unsigned long)result__ZUIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DQFH)));
           } else {
-            next__OQIH=new_lab__QOJ(new_size__0LFH);
+            next__XUIH=new_lab__ZPJ(new_size__DQFH);
           };
-          ((__POINTER *)next__OQIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__PQIH)[ 0]=next__OQIH;
+          ((__POINTER *)next__XUIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__YUIH)[ 0]=next__XUIH;
         } else {
-          ((__POINTER *)result__QQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__QQIH=next__OQIH;
+          ((__POINTER *)result__ZUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ZUIH=next__XUIH;
         };
       };
-      ptr__M1B=result__QQIH;
+      ptr__M1B=result__ZUIH;
     } 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;
+      t__HQFH=((__UINTEGER_32 )typ_id__R1B);
+      a__GQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__AVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__O1B + a__GQFH) & (__UINTEGER_32)(~ a__GQFH));
+      ptr_table__3UIH=((__POINTER )(&(table_type[(t__HQFH)])));
+      lab_type__5UIH=(__UINTEGER_32)(t__HQFH |  1);
+      next__2UIH=((__POINTER )(NULL));
+      result__4UIH=((__POINTER *)ptr_table__3UIH)[ 0];
+      if ((result__4UIH == (void *)NULL)) {
+        result__4UIH=new_lab__ZPJ(lab_type__5UIH);
+        next__2UIH=(void *)((unsigned long)result__4UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVIH)));
+        ((__POINTER *)next__2UIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__3UIH)[ 0]=next__2UIH;
       } 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)));
+        next__2UIH=((__POINTER *)result__4UIH)[ 0];
+        if ((next__2UIH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4UIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__AVIH <<  1)) <=  4096)) {
+            next__2UIH=(void *)((unsigned long)result__4UIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVIH)));
           } else {
-            next__TQIH=new_lab__QOJ(lab_type__WQIH);
+            next__2UIH=new_lab__ZPJ(lab_type__5UIH);
           };
-          ((__POINTER *)next__TQIH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__UQIH)[ 0]=next__TQIH;
+          ((__POINTER *)next__2UIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3UIH)[ 0]=next__2UIH;
         } else {
-          ((__POINTER *)result__VQIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__VQIH=next__TQIH;
+          ((__POINTER *)result__4UIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2UIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__4UIH=next__2UIH;
         };
       };
-      ptr__M1B=result__VQIH;
+      ptr__M1B=result__4UIH;
     };
     result__L1B=((__TYPE_FULL *)ptr__M1B);
     *(result__L1B) = *(TYPE_FULL__);
   };
-  Self__PBS=((__TYPE_FULL *)result__L1B);
-  Self__PBS->flag__TBS=code__FRB;
+  Self__YCS=((__TYPE_FULL *)result__L1B);
+  Self__YCS->flag__2CS=code__FRB;
   if (((void *)typ__ERB != (void *)NULL)) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__1BS=(&__string_2);
+      __tmp__EDS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__1BS=(&__string_3);
+      __tmp__EDS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__1BS=(&__string_45);
+      __tmp__EDS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__1BS=(&__string_47);
+      __tmp__EDS=(&__string_47);
     } break;
     };
-    __tmp__PCS=((void *)__tmp__1BS != (void *)NULL);
+    __tmp__YDS=((void *)__tmp__EDS != (void *)NULL);
   } else {
-    __tmp__PCS=FALSE__;
+    __tmp__YDS=FALSE__;
   };
-  if (__tmp__PCS) {
+  if (__tmp__YDS) {
     switch (((struct ___OBJ *)typ__ERB)->__id) {
     case __TYPE_NULL__: {
-      __tmp__DCS=(&__string_2);
+      __tmp__MDS=(&__string_2);
     } break;
     case __TYPE_VOID__: {
-      __tmp__DCS=(&__string_3);
+      __tmp__MDS=(&__string_3);
     } break;
     case __TYPE_CONTEXT__: {
-      __tmp__DCS=(&__string_45);
+      __tmp__MDS=(&__string_45);
     } break;
     case __TYPE_ID__: {
-      __tmp__DCS=(&__string_47);
+      __tmp__MDS=(&__string_47);
     } break;
     };
-    __tmp__QCS=__infix_equal_equal__R1DB(__tmp__DCS,(&__string_33));
+    __tmp__ZDS=__infix_equal_equal__02DB(__tmp__MDS,(&__string_33));
   } else {
-    __tmp__QCS=FALSE__;
+    __tmp__ZDS=FALSE__;
   };
-  if ((__tmp__QCS && (! ((__UINTEGER_8)(Self__PBS->flag__TBS &  1) !=  0)))) {
+  if ((__tmp__ZDS && (! ((__UINTEGER_8)(Self__YCS->flag__2CS &  1) !=  0)))) {
     print__DID((&__string_220));
     fputc((int)('\n'),stdout);
     exit(( 1));
@@ -13145,968 +13153,968 @@ static __TYPE_FULL* create__with__CRB(void *typ__ERB,__UINTEGER_8 code__FRB)
   return(result__L1B);
 }
 
-static void** create__WUNB(__INTEGER nb_elements__YUNB)
+static void** create__AWNB(__INTEGER nb_elements__CWNB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__CXDH,a__KQFH,new_size__DXDH,new_size2__EXDH,a__OQFH;
+  __UINTEGER_32 new_size__PQFH;
+  __POINTER result__BXDH,ptr_table__CVIH,next__BVIH,result__DVIH;
+  void *result__GVIH;
+  __INTEGER Self__VFMC;
+  void **Result__P2RB;
+  sz__CXDH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CWNB * ((__INTEGER )(sizeof(void *)))));
+  result__BXDH=((__POINTER )(NULL));
+  a__KQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__DXDH=(__UINTEGER_32)((__UINTEGER_32)(sz__CXDH + a__KQFH) & (__UINTEGER_32)(~ a__KQFH));
+  new_size2__EXDH=(__UINTEGER_32)(new_size__DXDH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__EXDH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__OQFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__PQFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__EXDH + a__OQFH) & (__UINTEGER_32)(~ a__OQFH));
+    ptr_table__CVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PQFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BVIH=((__POINTER )(NULL));
+    result__DVIH=((__POINTER *)ptr_table__CVIH)[ 0];
+    if ((result__DVIH == (void *)NULL)) {
+      result__DVIH=new_lab__ZPJ(new_size__PQFH);
+      next__BVIH=(void *)((unsigned long)result__DVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQFH)));
+      ((__POINTER *)next__BVIH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CVIH)[ 0]=next__BVIH;
+    } else {
+      next__BVIH=((__POINTER *)result__DVIH)[ 0];
+      if ((next__BVIH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DVIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PQFH <<  1)) <=  4096)) {
+          next__BVIH=(void *)((unsigned long)result__DVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PQFH)));
+        } else {
+          next__BVIH=new_lab__ZPJ(new_size__PQFH);
+        };
+        ((__POINTER *)next__BVIH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CVIH)[ 0]=next__BVIH;
+      } else {
+        ((__POINTER *)result__DVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DVIH=next__BVIH;
+      };
+    };
+    ((__POINTER *)result__DVIH)[ 0]=((__POINTER ) 3);
+    result__BXDH=(void *)((unsigned long)result__DVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GVIH=first_free__BCVB;
+    while ((((void *)result__GVIH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GVIH)->map_size_and_id__YTB &  4294967292LU) < new_size__DXDH))) {
+      result__GVIH=((__MEMORY *)result__GVIH)->map_next_free__ZTB;
     };
-    if (((void *)result__3QIH == (void *)NULL)) {
-      result__3QIH=new_page__B24();
+    if (((void *)result__GVIH == (void *)NULL)) {
+      result__GVIH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__GVIH,new_size__DXDH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GVIH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__BXDH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GVIH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__P2RB=((void **)result__BXDH);
+  Self__VFMC=(__INTEGER)(nb_elements__CWNB -  1);
+  while ((Self__VFMC >=  0)) {
+    Result__P2RB[Self__VFMC]=NULL;
+    Self__VFMC=(__INTEGER)(Self__VFMC -  1);
   };
-  return(Result__D1RB);
+  return(Result__P2RB);
 }
 
-static void add_last__J0R(__FAST_ARRAYoTYPE_IDo *Self__K0R,void *element__L0R)
+static void add_last__S1R(__FAST_ARRAYoTYPE_IDo *Self__T1R,void *element__U1R)
 // ({FAST_ARRAYoTYPE_IDo},{NULLxTYPE_ID}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__V1R,__tmp__42R,__tmp__IVDC,Self__Y5UD;
+  __BOOLEAN __tmp__F2R;
+  void **__tmp__32R,**new__UUDC;
+  new_capacity__V1R= 0;
+  if (((__INTEGER)(Self__T1R->parent_arrayed_collection__ABB.upper__W1R +  1) <= (__INTEGER)(Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R -  1))) {
+    Self__T1R->parent_arrayed_collection__ABB.upper__W1R=(__INTEGER)(Self__T1R->parent_arrayed_collection__ABB.upper__W1R +  1);
+    __tmp__F2R=TRUE__;
   } else {
-    __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;
+    __tmp__F2R=FALSE__;
+  };
+  if ((! __tmp__F2R)) {
+    if ((Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R ==  0)) {
+      Self__T1R->parent_arrayed_collection__ABB.storage__U2R=create__AWNB( 2);
+      Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R= 2;
+      Self__T1R->parent_arrayed_collection__ABB.upper__W1R= 0;
+    } else {
+      new_capacity__V1R=(__INTEGER)(Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R <<  1);
+      __tmp__32R=Self__T1R->parent_arrayed_collection__ABB.storage__U2R;
+      __tmp__42R=Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R;
+      new__UUDC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__32R)),((__UINTEGER_32 )(__INTEGER)(__tmp__42R * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__V1R * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__IVDC=(__INTEGER)(new_capacity__V1R -  1);
+      Self__Y5UD=__tmp__42R;
+      while ((Self__Y5UD <= __tmp__IVDC)) {
+        new__UUDC[Self__Y5UD]=NULL;
+        Self__Y5UD=(__INTEGER)(Self__Y5UD +  1);
+      };
+      Self__T1R->parent_arrayed_collection__ABB.storage__U2R=new__UUDC;
+      Self__T1R->parent_arrayed_collection__ABB.capacity__Y1R=new_capacity__V1R;
+      Self__T1R->parent_arrayed_collection__ABB.upper__W1R=(__INTEGER)(Self__T1R->parent_arrayed_collection__ABB.upper__W1R +  1);
+    };
+  };
+  ((void **)Self__T1R->parent_arrayed_collection__ABB.storage__U2R)[Self__T1R->parent_arrayed_collection__ABB.upper__W1R]=element__U1R;
 }
 
-static __BOOLEAN open__PDRD(__DIRECTORY_UNIX *Self__QDRD)
+static __BOOLEAN open__FDRD(__DIRECTORY_UNIX *Self__GDRD)
 // ({DIRECTORY_UNIX}) With resultNo recursive, No inlinable.
 {
-  __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)));
+  __POINTER dirent__MDRD,ptr__WTLE,ptr_table__KVIH,next__JVIH;
+  __POINTER result__LVIH,ptr_table__PVIH,next__OVIH,result__QVIH;
+  __POINTER dir__KDRD,ptr__ZVIH,ptr_table__DWIH,next__CWIH,result__EWIH;
+  __POINTER ptr_table__IWIH,next__HWIH,result__JWIH,ptr__J4NF;
+  __POINTER ptr_table__NWIH,next__MWIH,result__OWIH,ptr_table__SWIH;
+  __POINTER next__RWIH,result__TWIH;
+  __INTEGER i__QDRD,typ_id__1TLE,i__UVIH,Self__BPFF,i__RRFH,j__TRFH;
+  __INTEGER Self__PNHH,idx__XP3E,idx__Q52,n__RUTD,n__O2FH,typ_id__0VIH;
+  __INTEGER typ_id__O4NF;
+  __UINTEGER_32 sz__YTLE,a__3QFH,new_size__4QFH,t__CRFH,a__BRFH;
+  __UINTEGER_32 new_size__SVIH,lab_type__RVIH,sz__1VIH,a__2VIH;
+  __UINTEGER_32 new_size__3VIH,t__4VIH,a__5VIH,new_size__LWIH;
+  __UINTEGER_32 lab_type__KWIH,sz__L4NF,a__U3FH,new_size__V3FH,t__Z3FH;
+  __UINTEGER_32 a__Y3FH,new_size__VWIH,lab_type__UWIH;
+  __STRING *new__2TQE,*Self__ERFH,*Self__RH3E,*Self__QRFH,*Self__NWSD;
+  __STRING *Self__QUTD;
+  void *other__SRFH;
+  void *result__WP3E;
+  void *__tmp__KS3E,*dir__IS3E;
+  void *__tmp__5FRD;
+  __CHARACTER *n__JDRD,*Self__VVIH,*other__WVIH,*Self__QNHH,*model__RNHH;
+  __CHARACTER *Self__E52;
+  __BOOLEAN result__PDRD,result__DRFH,__tmp__ZR3E;
+  __LINKED_LISToENTRYo *result__VTLE,*Self__5GWE,*Self__TJMF;
+  __LINKED_LIST_NODEoENTRYo *result__YVIH,*Self__AWIH,*result__I4NF;
+  __LINKED_LIST_NODEoENTRYo *Self__QGQF;
+  n__JDRD=NULL;
+  dirent__MDRD=((__POINTER )(NULL));
+  result__PDRD=FALSE__;
+  i__QDRD= 0;
+  if (((void *)Self__GDRD->parent_directory__HFD.list__UDRD == (void *)NULL)) {
+    result__VTLE=NULL;
+    ptr__WTLE=((__POINTER )(NULL));
+    typ_id__1TLE= 0;
+    sz__YTLE=((__UINTEGER_32 )sizeof(__LINKED_LISToENTRYo));
+    if ((sz__YTLE ==  0)) {
+      result__VTLE=LINKED_LISToENTRYo__;
+    } else {
+      typ_id__1TLE=__LINKED_LISToENTRYo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YTLE);
+      if ((typ_id__1TLE == (__INTEGER)(-  1))) {
+        a__3QFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__4QFH=(__UINTEGER_32)((__UINTEGER_32)(sz__YTLE + a__3QFH) & (__UINTEGER_32)(~ a__3QFH));
+        ptr_table__KVIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4QFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__JVIH=((__POINTER )(NULL));
+        result__LVIH=((__POINTER *)ptr_table__KVIH)[ 0];
+        if ((result__LVIH == (void *)NULL)) {
+          result__LVIH=new_lab__ZPJ(new_size__4QFH);
+          next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4QFH)));
+          ((__POINTER *)next__JVIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__KVIH)[ 0]=next__JVIH;
+        } else {
+          next__JVIH=((__POINTER *)result__LVIH)[ 0];
+          if ((next__JVIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LVIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4QFH <<  1)) <=  4096)) {
+              next__JVIH=(void *)((unsigned long)result__LVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4QFH)));
             } else {
-              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)));
+              next__JVIH=new_lab__ZPJ(new_size__4QFH);
+            };
+            ((__POINTER *)next__JVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KVIH)[ 0]=next__JVIH;
+          } else {
+            ((__POINTER *)result__LVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LVIH=next__JVIH;
+          };
+        };
+        ptr__WTLE=result__LVIH;
+      } else {
+        t__CRFH=((__UINTEGER_32 )typ_id__1TLE);
+        a__BRFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SVIH=(__UINTEGER_32)((__UINTEGER_32)(sz__YTLE + a__BRFH) & (__UINTEGER_32)(~ a__BRFH));
+        ptr_table__PVIH=((__POINTER )(&(table_type[(t__CRFH)])));
+        lab_type__RVIH=(__UINTEGER_32)(t__CRFH |  1);
+        next__OVIH=((__POINTER )(NULL));
+        result__QVIH=((__POINTER *)ptr_table__PVIH)[ 0];
+        if ((result__QVIH == (void *)NULL)) {
+          result__QVIH=new_lab__ZPJ(lab_type__RVIH);
+          next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVIH)));
+          ((__POINTER *)next__OVIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
+        } else {
+          next__OVIH=((__POINTER *)result__QVIH)[ 0];
+          if ((next__OVIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QVIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SVIH <<  1)) <=  4096)) {
+              next__OVIH=(void *)((unsigned long)result__QVIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVIH)));
             } else {
-              next__FRIH=new_lab__QOJ(lab_type__IRIH);
+              next__OVIH=new_lab__ZPJ(lab_type__RVIH);
             };
-            ((__POINTER *)next__FRIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__GRIH)[ 0]=next__FRIH;
+            ((__POINTER *)next__OVIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
           } else {
-            ((__POINTER *)result__HRIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__HRIH=next__FRIH;
+            ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QVIH=next__OVIH;
           };
         };
-        ptr__NTLE=result__HRIH;
+        ptr__WTLE=result__QVIH;
       };
-      result__MTLE=((__LINKED_LISToENTRYo *)ptr__NTLE);
-      *(result__MTLE) = *(LINKED_LISToENTRYo__);
+      result__VTLE=((__LINKED_LISToENTRYo *)ptr__WTLE);
+      *(result__VTLE) = *(LINKED_LISToENTRYo__);
     };
-    Self__QDRD->parent_directory__HFD.list__4DRD=result__MTLE;
+    Self__GDRD->parent_directory__HFD.list__UDRD=result__VTLE;
   } else {
-    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__;
+    Self__5GWE=((__LINKED_LISToENTRYo *)Self__GDRD->parent_directory__HFD.list__UDRD);
+    if (((void *)Self__5GWE->first_link__BHWE != (void *)NULL)) {
+      Self__5GWE->first_link__BHWE=NULL;
+      Self__5GWE->mem_idx__IHWE= 0;
+      Self__5GWE->mem_lnk__JHWE=NULL;
+      Self__5GWE->parent_linked_collection__TDRD.upper__YM3D= 0;
+      Self__5GWE->last_link__KHWE=NULL;
+    };
+  };
+  dir__KDRD=((__POINTER )(opendir((((__STRING_CONSTANT *)Self__GDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->storage__ZNO))));
+  if ((dir__KDRD != (void *)NULL)) {
+    result__PDRD=TRUE__;
     do {
-      dirent__WDRD=((__POINTER )(readdir((dir__UDRD))));
-      if ((dirent__WDRD != (void *)NULL)) {
-        n__TDRD=((__CHARACTER *)(((struct dirent *)(dirent__WDRD))->d_name));
+      dirent__MDRD=((__POINTER )(readdir((dir__KDRD))));
+      if ((dirent__MDRD != (void *)NULL)) {
+        n__JDRD=((__CHARACTER *)(((struct dirent *)(dirent__MDRD))->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);
+        i__QDRD= 0;
+        while ((((__CHARACTER *)n__JDRD)[i__QDRD] != '\0')) {
+          add_last__3IT(string_tmp__AFD,((__CHARACTER *)n__JDRD)[i__QDRD]);
+          i__QDRD=(__INTEGER)(i__QDRD +  1);
+        };
+        new__2TQE=create__ZBB(((__STRING_CONSTANT *)(&__string_221))->count__DD);
+        copy__35R(new__2TQE,(&__string_221));
+        Self__ERFH=((__STRING *)string_tmp__AFD);
+        result__DRFH=FALSE__;
+        if ((Self__ERFH->count__EGC == new__2TQE->count__EGC)) {
+          if ((Self__ERFH->count__EGC ==  0)) {
+            result__DRFH=TRUE__;
+          } else {
+            Self__VVIH=((__CHARACTER *)Self__ERFH->storage__F5R);
+            other__WVIH=new__2TQE->storage__F5R;
+            i__UVIH=(__INTEGER)(Self__ERFH->count__EGC -  1);
+            while (((i__UVIH >=  0) && (Self__VVIH[i__UVIH] == ((__CHARACTER *)other__WVIH)[i__UVIH]))) {
+              i__UVIH=(__INTEGER)(i__UVIH -  1);
+            };
+            result__DRFH=(i__UVIH <  0);
+          };
+        };
+        if ((! result__DRFH)) {
+          Self__RH3E=((__STRING *)string_tmp__AFD);
+          add_last__3IT(Self__RH3E,' ');
+          Self__BPFF=Self__RH3E->count__EGC;
+          while ((Self__BPFF >=  2)) {
+            ((__CHARACTER *)Self__RH3E->storage__F5R)[(__INTEGER)(Self__BPFF -  1)]=((__CHARACTER *)Self__RH3E->storage__F5R)[(__INTEGER)((__INTEGER)(Self__BPFF -  1) -  1)];
+            Self__BPFF=(__INTEGER)(Self__BPFF -  1);
+          };
+          ((__CHARACTER *)Self__RH3E->storage__F5R)[ 0]='/';
+          Self__QRFH=((__STRING *)string_tmp__AFD);
+          other__SRFH=Self__GDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+          i__RRFH=Self__QRFH->count__EGC;
+          j__TRFH=((__STRING_CONSTANT *)other__SRFH)->count__DD;
+          resize__UUZ(Self__QRFH,(__INTEGER)(i__RRFH + j__TRFH));
+          if (((i__RRFH >  0) && (j__TRFH >  0))) {
+            move__to__by__MVCC(Self__QRFH->storage__F5R, 0,(__INTEGER)(i__RRFH -  1),j__TRFH);
+          };
+          Self__QNHH=((__CHARACTER *)Self__QRFH->storage__F5R);
+          model__RNHH=((__STRING_CONSTANT *)other__SRFH)->storage__ZNO;
+          Self__PNHH=(__INTEGER)(j__TRFH -  1);
+          while ((Self__PNHH >=  0)) {
+            Self__QNHH[Self__PNHH]=((__CHARACTER *)model__RNHH)[Self__PNHH];
+            Self__PNHH=(__INTEGER)(Self__PNHH -  1);
+          };
+          reduce_path__ZI3E(string_tmp__AFD);
+          result__WP3E=NULL;
+          idx__XP3E= 0;
+          copy__35R(string_tmp2__MZAC,Self__GDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+          add_last__3IT(string_tmp2__MZAC,'/');
+          append__FLS(string_tmp2__MZAC,string_tmp__AFD);
+          reduce_path__ZI3E(string_tmp2__MZAC);
+          copy__35R(string_tmp3__SZAC,string_tmp2__MZAC);
           do {
-            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;
+            result__WP3E=reference_at__NV0C(alias__RFD,string_tmp2__MZAC);
+            if (((void *)result__WP3E == (void *)NULL)) {
+              Self__NWSD=((__STRING *)string_tmp2__MZAC);
+              Self__E52=((__CHARACTER *)Self__NWSD->storage__F5R);
+              idx__Q52=(__INTEGER)(Self__NWSD->count__EGC -  1);
+              while ((! ((idx__Q52 <  0) || ('/' == Self__E52[idx__Q52])))) {
+                idx__Q52=(__INTEGER)(idx__Q52 -  1);
+              };
+              idx__XP3E=(__INTEGER)( 1 + idx__Q52);
+              if ((idx__XP3E >  0)) {
+                Self__QUTD=((__STRING *)string_tmp2__MZAC);
+                n__RUTD=(__INTEGER)(idx__XP3E -  1);
+                if ((n__RUTD < Self__QUTD->count__EGC)) {
+                  n__O2FH=(__INTEGER)(Self__QUTD->count__EGC - n__RUTD);
+                  if ((n__O2FH > Self__QUTD->count__EGC)) {
+                    Self__QUTD->count__EGC= 0;
                   } else {
-                    Self__4UTD->count__EGC=(__INTEGER)(Self__4UTD->count__EGC - n__FYFH);
+                    Self__QUTD->count__EGC=(__INTEGER)(Self__QUTD->count__EGC - n__O2FH);
                   };
                 };
               } else {
-                ((__STRING *)string_tmp2__AYAC)->count__EGC= 0;
+                ((__STRING *)string_tmp2__MZAC)->count__EGC= 0;
               };
             };
-          } while ((((void *)result__KN3E == (void *)NULL) && (((__STRING *)string_tmp2__AYAC)->count__EGC !=  0)));
-          if (((void *)result__KN3E == (void *)NULL)) {
+          } while ((((void *)result__WP3E == (void *)NULL) && (((__STRING *)string_tmp2__MZAC)->count__EGC !=  0)));
+          if (((void *)result__WP3E == (void *)NULL)) {
             if (FILE_SYSTEM__->parent_directory__2FD==0) {
             } else {
               parent_directory__1ED();
             };
-            result__KN3E=physical_get_entry__KW0C(string_tmp3__GYAC);
-            __tmp__NP3E=TRUE__;
+            result__WP3E=physical_get_entry__BY0C(string_tmp3__SZAC);
+            __tmp__ZR3E=TRUE__;
           } else {
-            __tmp__NP3E=FALSE__;
+            __tmp__ZR3E=FALSE__;
           };
-          if ((! __tmp__NP3E)) {
-            if ((((__STRING *)string_tmp3__GYAC)->count__EGC != ((__STRING *)string_tmp2__AYAC)->count__EGC)) {
-              if (result__KN3E==NULL) {
-                __tmp__4P3E=NULL;
+          if ((! __tmp__ZR3E)) {
+            if ((((__STRING *)string_tmp3__SZAC)->count__EGC != ((__STRING *)string_tmp2__MZAC)->count__EGC)) {
+              if (result__WP3E==NULL) {
+                __tmp__KS3E=NULL;
               } else {
-                switch (((struct ___OBJ *)result__KN3E)->__id) {
+                switch (((struct ___OBJ *)result__WP3E)->__id) {
                 case __DIRECTORY_UNIX__: {
-                  __tmp__4P3E=((void *)result__KN3E);
+                  __tmp__KS3E=((void *)result__WP3E);
                 } break;
                 case __FILE_UNIX__: {
-                  __tmp__4P3E=NULL;
+                  __tmp__KS3E=NULL;
                 } break;
                 }
               };
-              dir__2P3E=__tmp__4P3E;
-              result__KN3E=physical_get_entry__H5E(string_tmp3__GYAC);
+              dir__IS3E=__tmp__KS3E;
+              result__WP3E=physical_get_entry__QAF(string_tmp3__SZAC);
             };
           };
-          if (((void *)result__KN3E == (void *)NULL)) {
-            result__ZDRD=FALSE__;
+          if (((void *)result__WP3E == (void *)NULL)) {
+            result__PDRD=FALSE__;
           } else {
-            if (((struct ___OBJ *)result__KN3E)->__id==__DIRECTORY_UNIX__) {
-              __tmp__JGRD=((__DIRECTORY_UNIX *)result__KN3E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+            if (((struct ___OBJ *)result__WP3E)->__id==__DIRECTORY_UNIX__) {
+              __tmp__5FRD=((__DIRECTORY_UNIX *)result__WP3E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
             } else {
-              __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__;
+              __tmp__5FRD=((__FILE_UNIX *)result__WP3E)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
+            };
+            if ((((__STRING_CONSTANT *)__tmp__5FRD)->count__DD >= ((__STRING_CONSTANT *)Self__GDRD->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD)) {
+              Self__TJMF=((__LINKED_LISToENTRYo *)Self__GDRD->parent_directory__HFD.list__UDRD);
+              if (((void *)Self__TJMF->first_link__BHWE == (void *)NULL)) {
+                result__YVIH=NULL;
+                ptr__ZVIH=((__POINTER )(NULL));
+                typ_id__0VIH= 0;
+                sz__1VIH=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__1VIH ==  0)) {
+                  result__YVIH=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__0VIH=__LINKED_LIST_NODEoENTRYo__;
+                  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__DWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__3VIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__CWIH=((__POINTER )(NULL));
+                    result__EWIH=((__POINTER *)ptr_table__DWIH)[ 0];
+                    if ((result__EWIH == (void *)NULL)) {
+                      result__EWIH=new_lab__ZPJ(new_size__3VIH);
+                      next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VIH)));
+                      ((__POINTER *)next__CWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__DWIH)[ 0]=next__CWIH;
                     } else {
-                      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)));
+                      next__CWIH=((__POINTER *)result__EWIH)[ 0];
+                      if ((next__CWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EWIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3VIH <<  1)) <=  4096)) {
+                          next__CWIH=(void *)((unsigned long)result__EWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VIH)));
                         } else {
-                          next__ZRIH=new_lab__QOJ(new_size__URIH);
+                          next__CWIH=new_lab__ZPJ(new_size__3VIH);
                         };
-                        ((__POINTER *)next__ZRIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__0RIH)[ 0]=next__ZRIH;
+                        ((__POINTER *)next__CWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__DWIH)[ 0]=next__CWIH;
                       } else {
-                        ((__POINTER *)result__1RIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZRIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__1RIH=next__ZRIH;
+                        ((__POINTER *)result__EWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__EWIH=next__CWIH;
                       };
                     };
-                    ptr__QRIH=result__1RIH;
+                    ptr__ZVIH=result__EWIH;
                   } else {
-                    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;
+                    t__4VIH=((__UINTEGER_32 )typ_id__0VIH);
+                    a__5VIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__LWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__1VIH + a__5VIH) & (__UINTEGER_32)(~ a__5VIH));
+                    ptr_table__IWIH=((__POINTER )(&(table_type[(t__4VIH)])));
+                    lab_type__KWIH=(__UINTEGER_32)(t__4VIH |  1);
+                    next__HWIH=((__POINTER )(NULL));
+                    result__JWIH=((__POINTER *)ptr_table__IWIH)[ 0];
+                    if ((result__JWIH == (void *)NULL)) {
+                      result__JWIH=new_lab__ZPJ(lab_type__KWIH);
+                      next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LWIH)));
+                      ((__POINTER *)next__HWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
                     } else {
-                      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)));
+                      next__HWIH=((__POINTER *)result__JWIH)[ 0];
+                      if ((next__HWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JWIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LWIH <<  1)) <=  4096)) {
+                          next__HWIH=(void *)((unsigned long)result__JWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LWIH)));
                         } else {
-                          next__4RIH=new_lab__QOJ(lab_type__BSIH);
+                          next__HWIH=new_lab__ZPJ(lab_type__KWIH);
                         };
-                        ((__POINTER *)next__4RIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__5RIH)[ 0]=next__4RIH;
+                        ((__POINTER *)next__HWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__IWIH)[ 0]=next__HWIH;
                       } else {
-                        ((__POINTER *)result__ASIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4RIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ASIH=next__4RIH;
+                        ((__POINTER *)result__JWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__JWIH=next__HWIH;
                       };
                     };
-                    ptr__QRIH=result__ASIH;
+                    ptr__ZVIH=result__JWIH;
                   };
-                  result__PRIH=((__LINKED_LIST_NODEoENTRYo *)ptr__QRIH);
-                  *(result__PRIH) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__YVIH=((__LINKED_LIST_NODEoENTRYo *)ptr__ZVIH);
+                  *(result__YVIH) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__AWIH=((__LINKED_LIST_NODEoENTRYo *)result__YVIH);
+                Self__AWIH->item__T0WE=result__WP3E;
+                Self__AWIH->next__PWFF=NULL;
+                Self__TJMF->first_link__BHWE=result__YVIH;
+                Self__TJMF->parent_linked_collection__TDRD.upper__YM3D= 1;
+                Self__TJMF->last_link__KHWE=result__YVIH;
+                Self__TJMF->mem_idx__IHWE= 1;
+                Self__TJMF->mem_lnk__JHWE=result__YVIH;
               } else {
-                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__;
+                result__I4NF=NULL;
+                ptr__J4NF=((__POINTER )(NULL));
+                typ_id__O4NF= 0;
+                sz__L4NF=((__UINTEGER_32 )sizeof(__LINKED_LIST_NODEoENTRYo));
+                if ((sz__L4NF ==  0)) {
+                  result__I4NF=LINKED_LIST_NODEoENTRYo__;
                 } else {
-                  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;
+                  typ_id__O4NF=__LINKED_LIST_NODEoENTRYo__;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L4NF);
+                  if ((typ_id__O4NF == (__INTEGER)(-  1))) {
+                    a__U3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__V3FH=(__UINTEGER_32)((__UINTEGER_32)(sz__L4NF + a__U3FH) & (__UINTEGER_32)(~ a__U3FH));
+                    ptr_table__NWIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V3FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__MWIH=((__POINTER )(NULL));
+                    result__OWIH=((__POINTER *)ptr_table__NWIH)[ 0];
+                    if ((result__OWIH == (void *)NULL)) {
+                      result__OWIH=new_lab__ZPJ(new_size__V3FH);
+                      next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3FH)));
+                      ((__POINTER *)next__MWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__NWIH)[ 0]=next__MWIH;
                     } else {
-                      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)));
+                      next__MWIH=((__POINTER *)result__OWIH)[ 0];
+                      if ((next__MWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__OWIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__V3FH <<  1)) <=  4096)) {
+                          next__MWIH=(void *)((unsigned long)result__OWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V3FH)));
                         } else {
-                          next__DSIH=new_lab__QOJ(new_size__MZFH);
+                          next__MWIH=new_lab__ZPJ(new_size__V3FH);
                         };
-                        ((__POINTER *)next__DSIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__ESIH)[ 0]=next__DSIH;
+                        ((__POINTER *)next__MWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__NWIH)[ 0]=next__MWIH;
                       } else {
-                        ((__POINTER *)result__FSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__FSIH=next__DSIH;
+                        ((__POINTER *)result__OWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__OWIH=next__MWIH;
                       };
                     };
-                    ptr__C0NF=result__FSIH;
+                    ptr__J4NF=result__OWIH;
                   } else {
-                    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;
+                    t__Z3FH=((__UINTEGER_32 )typ_id__O4NF);
+                    a__Y3FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__VWIH=(__UINTEGER_32)((__UINTEGER_32)(sz__L4NF + a__Y3FH) & (__UINTEGER_32)(~ a__Y3FH));
+                    ptr_table__SWIH=((__POINTER )(&(table_type[(t__Z3FH)])));
+                    lab_type__UWIH=(__UINTEGER_32)(t__Z3FH |  1);
+                    next__RWIH=((__POINTER )(NULL));
+                    result__TWIH=((__POINTER *)ptr_table__SWIH)[ 0];
+                    if ((result__TWIH == (void *)NULL)) {
+                      result__TWIH=new_lab__ZPJ(lab_type__UWIH);
+                      next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWIH)));
+                      ((__POINTER *)next__RWIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
                     } else {
-                      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)));
+                      next__RWIH=((__POINTER *)result__TWIH)[ 0];
+                      if ((next__RWIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TWIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VWIH <<  1)) <=  4096)) {
+                          next__RWIH=(void *)((unsigned long)result__TWIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VWIH)));
                         } else {
-                          next__ISIH=new_lab__QOJ(lab_type__LSIH);
+                          next__RWIH=new_lab__ZPJ(lab_type__UWIH);
                         };
-                        ((__POINTER *)next__ISIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__JSIH)[ 0]=next__ISIH;
+                        ((__POINTER *)next__RWIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__SWIH)[ 0]=next__RWIH;
                       } else {
-                        ((__POINTER *)result__KSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ISIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__KSIH=next__ISIH;
+                        ((__POINTER *)result__TWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__TWIH=next__RWIH;
                       };
                     };
-                    ptr__C0NF=result__KSIH;
+                    ptr__J4NF=result__TWIH;
                   };
-                  result__B0NF=((__LINKED_LIST_NODEoENTRYo *)ptr__C0NF);
-                  *(result__B0NF) = *(LINKED_LIST_NODEoENTRYo__);
+                  result__I4NF=((__LINKED_LIST_NODEoENTRYo *)ptr__J4NF);
+                  *(result__I4NF) = *(LINKED_LIST_NODEoENTRYo__);
                 };
-                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;
+                Self__QGQF=((__LINKED_LIST_NODEoENTRYo *)result__I4NF);
+                Self__QGQF->item__T0WE=result__WP3E;
+                Self__QGQF->next__PWFF=NULL;
+                ((__LINKED_LIST_NODEoENTRYo *)Self__TJMF->last_link__KHWE)->next__PWFF=result__I4NF;
+                Self__TJMF->parent_linked_collection__TDRD.upper__YM3D=(__INTEGER)(Self__TJMF->parent_linked_collection__TDRD.upper__YM3D +  1);
+                Self__TJMF->last_link__KHWE=result__I4NF;
               };
             };
           };
         };
       };
-    } while (((dirent__WDRD != (void *)NULL) & result__ZDRD));
-    closedir((dir__UDRD));
+    } while (((dirent__MDRD != (void *)NULL) & result__PDRD));
+    closedir((dir__KDRD));
   };
-  return(result__ZDRD);
+  return(result__PDRD);
 }
 
-static void check_in__begin__GPQC(void *entry__IPQC,__INTEGER n__JPQC)
+static void check_in__begin__0QQC(void *entry__2QQC,__INTEGER n__3QQC)
 // ({NULLxDIRECTORY_UNIXxFILE_UNIX},{INTEGER}) VoidRecursive, No inlinable.
 {
-  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);
+  void *tok__5QQC,*__tmp__JRQC,*__tmp__ZSQC,*k__4VDC,*k__11EG;
+  void *__tmp__FVQC,*__tmp__KVQC;
+  void *dir__BRQC,*__tmp__QRQC;
+  __FILE_UNIX *Self__4T3G;
+  __INTEGER __tmp__VRQC,Self__2M3D,__tmp__KSQC,Self__NN3D,i1__3FS;
+  __INTEGER i2__4FS,Self__UMX,result__HUHH,__tmp__JUHH,Self__KUHH;
+  __INTEGER result__MUHH,__tmp__OUHH,Self__PUHH,__tmp__VTQC,Self__L1EG;
+  __INTEGER result__RUHH,__tmp__TUHH,Self__UUHH,result__WUHH;
+  __INTEGER __tmp__YUHH,Self__ZUHH,result__5UHH,__tmp__BVHH,Self__CVHH;
+  __INTEGER result__EVHH,__tmp__GVHH,Self__HVHH,i__ZZBD,j__0ZBD;
+  __INTEGER Self__MAKB,result__NVHH,__tmp__PVHH,Self__QVHH,result__SVHH;
+  __INTEGER __tmp__UVHH,Self__VVHH,len__3SU,__tmp__0TU,__tmp__1TU;
+  __INTEGER Self__UNGB,__tmp__TNS,Self__CSIC,result__1VHH,__tmp__3VHH;
+  __INTEGER Self__4VHH,result__AWHH,__tmp__CWHH,Self__DWHH,__tmp__DYQC;
+  __INTEGER Self__LBSE;
+  void *__tmp__1RQC,*__tmp__QSQC,*__tmp__YSQC,*__tmp__EVQC,*__tmp__JVQC;
+  __STRING_CONSTANT *Self__ZFS,*Self__SUHH,*Self__XUHH;
+  __STRING *Self__SOS,*Self__YPS,*Self__XZBD,*Self__V02,*Self__LNS;
+  void *tok_lst__ARQC;
+  __BOOLEAN __tmp__CRQC,__tmp__2RQC,__tmp__RSQC,result__2FS;
+  __CHARACTER Self__OSFH,result__NSFH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__DUHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__WNHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__1UHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__0NHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__JVHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__BOHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__XVHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FU3;
+  void *node__FUHH,*node__YNHH,*node__3UHH,*node__2NHH,*node__LVHH;
+  void *node__DOHH,*node__ZVHH,*node__QU3;
+  __HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *Self__3VDC,*Self__01EG;
+  void *node__HWDC,*node__F2EG;
+  __CHARACTER *Self__XJEB,*model__YJEB,*__tmp__QNS,*Self__CLBC;
+  tok__5QQC=NULL;
+  tok_lst__ARQC=NULL;
+  dir__BRQC=NULL;
+  if (((struct ___OBJ *)entry__2QQC)->__id==__DIRECTORY_UNIX__) {
+    __tmp__CRQC=open__FDRD(entry__2QQC);
   } else {
-    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);
+    Self__4T3G=((__FILE_UNIX *)entry__2QQC);
+    Self__4T3G->stream__QHRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__4T3G->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->storage__ZNO),"r+b")));
+    __tmp__CRQC=(Self__4T3G->stream__QHRD != (void *)NULL);
   };
-  if ((! __tmp__OPQC)) {
+  if ((! __tmp__CRQC)) {
     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;
+    if (((struct ___OBJ *)entry__2QQC)->__id==__DIRECTORY_UNIX__) {
+      __tmp__JRQC=((__DIRECTORY_UNIX *)entry__2QQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__VPQC=((__FILE_UNIX *)entry__IPQC)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+      __tmp__JRQC=((__FILE_UNIX *)entry__2QQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
     };
-    print__DID(__tmp__VPQC);
+    print__DID(__tmp__JRQC);
     print__DID((&__string_171));
   } else {
-    if (entry__IPQC==NULL) {
-      __tmp__2PQC=NULL;
+    if (entry__2QQC==NULL) {
+      __tmp__QRQC=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__IPQC)->__id) {
+      switch (((struct ___OBJ *)entry__2QQC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__2PQC=((void *)entry__IPQC);
+        __tmp__QRQC=((void *)entry__2QQC);
       } break;
       case __FILE_UNIX__: {
-        __tmp__2PQC=NULL;
+        __tmp__QRQC=NULL;
       } break;
       }
     };
-    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;
+    dir__BRQC=__tmp__QRQC;
+    __tmp__VRQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__QRQC)->parent_directory__HFD.list__UDRD)->parent_linked_collection__TDRD.upper__YM3D;
+    Self__2M3D= 1;
+    while ((Self__2M3D <= __tmp__VRQC)) {
+      __tmp__1RQC=item__NYPE(dir__BRQC,Self__2M3D);
+      if (((struct ___OBJ *)__tmp__1RQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__2RQC=((void *)((__DIRECTORY_UNIX *)__tmp__1RQC) != (void *)NULL);
+      } else {
+        __tmp__2RQC=FALSE__;
+      };
+      if (__tmp__2RQC) {
+        check_in__begin__0QQC(item__NYPE(dir__BRQC,Self__2M3D),n__3QQC);
+      };
+      Self__2M3D=(__INTEGER)(Self__2M3D +  1);
+    };
+    __tmp__KSQC=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__QRQC)->parent_directory__HFD.list__UDRD)->parent_linked_collection__TDRD.upper__YM3D;
+    Self__NN3D= 1;
+    while ((Self__NN3D <= __tmp__KSQC)) {
+      __tmp__QSQC=item__NYPE(dir__BRQC,Self__NN3D);
+      if (((struct ___OBJ *)__tmp__QSQC)->__id==__DIRECTORY_UNIX__) {
+        __tmp__RSQC=((void *)((__DIRECTORY_UNIX *)__tmp__QSQC) != (void *)NULL);
+      } else {
+        __tmp__RSQC=FALSE__;
+      };
+      if ((! __tmp__RSQC)) {
+        __tmp__YSQC=item__NYPE(dir__BRQC,Self__NN3D);
+        if (((struct ___OBJ *)__tmp__YSQC)->__id==__DIRECTORY_UNIX__) {
+          __tmp__ZSQC=((__DIRECTORY_UNIX *)__tmp__YSQC)->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT;
+        } else {
+          __tmp__ZSQC=((__FILE_UNIX *)__tmp__YSQC)->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT;
+        };
+        Self__ZFS=((__STRING_CONSTANT *)__tmp__ZSQC);
+        result__2FS=FALSE__;
+        i1__3FS= 0;
+        i2__4FS= 0;
+        if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__ZFS->count__DD)) {
+          i1__3FS=(__INTEGER)((__INTEGER)(Self__ZFS->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+          i2__4FS= 1;
+          while ((! (((i1__3FS > Self__ZFS->count__DD) || (i2__4FS > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__ZFS->storage__ZNO)[(__INTEGER)(i1__3FS -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__ZNO)[(__INTEGER)(i2__4FS -  1)])))) {
+            i1__3FS=(__INTEGER)(i1__3FS +  1);
+            i2__4FS=(__INTEGER)(i2__4FS +  1);
+          };
+          result__2FS=(i1__3FS > Self__ZFS->count__DD);
+        };
+        if (result__2FS) {
+          copy__35R(string_tmp__VH,__tmp__ZSQC);
+          Self__SOS=((__STRING *)string_tmp__VH);
+          if (( 3 > Self__SOS->count__EGC)) {
+            Self__SOS->count__EGC= 0;
+          } else {
+            Self__SOS->count__EGC=(__INTEGER)(Self__SOS->count__EGC -  3);
+          };
+          Self__YPS=((__STRING *)string_tmp__VH);
+          Self__UMX=Self__YPS->count__EGC;
+          while ((Self__UMX >=  1)) {
+            Self__OSFH=((__CHARACTER *)Self__YPS->storage__F5R)[(__INTEGER)(Self__UMX -  1)];
+            result__NSFH='\0';
+            if (((((__INTEGER_8 )Self__OSFH) <  97) || (((__INTEGER_8 )Self__OSFH) >  122))) {
+              result__NSFH=Self__OSFH;
             } else {
-              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);
+              result__NSFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__OSFH) -  32))));
+            };
+            ((__CHARACTER *)Self__YPS->storage__F5R)[(__INTEGER)(Self__UMX -  1)]=result__NSFH;
+            Self__UMX=(__INTEGER)(Self__UMX -  1);
+          };
+          tok__5QQC=get__YWB(string_tmp__VH);
+          Self__DUHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__HUHH= 0;
+          __tmp__JUHH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+          Self__KUHH= 1;
+          while ((Self__KUHH <= __tmp__JUHH)) {
+            result__HUHH=(__INTEGER)((__INTEGER)( 5 * result__HUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__ZNO)[(__INTEGER)(Self__KUHH -  1)])));
+            Self__KUHH=(__INTEGER)(Self__KUHH +  1);
+          };
+          if ((result__HUHH <  0)) {
+            result__HUHH=(__INTEGER)(~ result__HUHH);
+          };
+          node__FUHH=((void **)Self__DUHH->buckets__DAT)[(__INTEGER)(result__HUHH % Self__DUHH->capacity__45S)];
+          while ((! (((void *)node__FUHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FUHH)->key__PAT == (void *)(&__string_155))))) {
+            node__FUHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__FUHH)->next__0AT;
+          };
+          if (((void *)node__FUHH != (void *)NULL)) {
+            Self__WNHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+            result__MUHH= 0;
+            __tmp__OUHH=((__STRING_CONSTANT *)(&__string_155))->count__DD;
+            Self__PUHH= 1;
+            while ((Self__PUHH <= __tmp__OUHH)) {
+              result__MUHH=(__INTEGER)((__INTEGER)( 5 * result__MUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_155))->storage__ZNO)[(__INTEGER)(Self__PUHH -  1)])));
+              Self__PUHH=(__INTEGER)(Self__PUHH +  1);
+            };
+            if ((result__MUHH <  0)) {
+              result__MUHH=(__INTEGER)(~ result__MUHH);
+            };
+            node__YNHH=((void **)Self__WNHH->buckets__DAT)[(__INTEGER)(result__MUHH % Self__WNHH->capacity__45S)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YNHH)->key__PAT != (void *)(&__string_155))) {
+              node__YNHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YNHH)->next__0AT;
+            };
+            tok_lst__ARQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YNHH)->item__DV3;
+            __tmp__VTQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ARQC)->parent_linked_collection__LD.upper__MDD;
+            Self__L1EG= 1;
+            while ((Self__L1EG <= __tmp__VTQC)) {
+              if (((void *)item__CZND(tok_lst__ARQC,Self__L1EG) == (void *)NULL)) {
+                append__FLS(current_list__2B,tok__5QQC);
+                append__FLS(file_list__0B,tok__5QQC);
               } else {
-                append__2JS(current_list__2B,item__MZND(tok_lst__MPQC,Self__AXEG));
-                append__2JS(file_list__0B,item__MZND(tok_lst__MPQC,Self__AXEG));
+                append__FLS(current_list__2B,item__CZND(tok_lst__ARQC,Self__L1EG));
+                append__FLS(file_list__0B,item__CZND(tok_lst__ARQC,Self__L1EG));
               };
-              Self__AXEG=(__INTEGER)(Self__AXEG +  1);
+              Self__L1EG=(__INTEGER)(Self__L1EG +  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');
+            append__FLS(current_list__2B,tok__5QQC);
+            add_last__3IT(current_list__2B,'\n');
+            append__FLS(file_list__0B,tok__5QQC);
+            add_last__3IT(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);
+          Self__3VDC=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__TQS);
+          k__4VDC=tok__5QQC;
+          Self__SUHH=((__STRING_CONSTANT *)tok__5QQC);
+          result__RUHH= 0;
+          __tmp__TUHH=Self__SUHH->count__DD;
+          Self__UUHH= 1;
+          while ((Self__UUHH <= __tmp__TUHH)) {
+            result__RUHH=(__INTEGER)((__INTEGER)( 5 * result__RUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SUHH->storage__ZNO)[(__INTEGER)(Self__UUHH -  1)])));
+            Self__UUHH=(__INTEGER)(Self__UUHH +  1);
           };
-          if ((result__IQHH <  0)) {
-            result__IQHH=(__INTEGER)(~ result__IQHH);
+          if ((result__RUHH <  0)) {
+            result__RUHH=(__INTEGER)(~ result__RUHH);
           };
-          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;
+          node__HWDC=((void **)Self__3VDC->buckets__QMBC)[(__INTEGER)(result__RUHH % Self__3VDC->capacity__LMBC)];
+          while ((! (((void *)node__HWDC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__HWDC)->key__2MBC == (void *)k__4VDC)))) {
+            node__HWDC=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__HWDC)->next__HNBC;
           };
-          if (((void *)node__TUDC != (void *)NULL)) {
+          if (((void *)node__HWDC != (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);
+            Self__01EG=((__HASHED_DICTIONARYoPROTOTYPExSTRING_CONSTANTo *)prototype_dico__TQS);
+            k__11EG=tok__5QQC;
+            Self__XUHH=((__STRING_CONSTANT *)tok__5QQC);
+            result__WUHH= 0;
+            __tmp__YUHH=Self__XUHH->count__DD;
+            Self__ZUHH= 1;
+            while ((Self__ZUHH <= __tmp__YUHH)) {
+              result__WUHH=(__INTEGER)((__INTEGER)( 5 * result__WUHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XUHH->storage__ZNO)[(__INTEGER)(Self__ZUHH -  1)])));
+              Self__ZUHH=(__INTEGER)(Self__ZUHH +  1);
+            };
+            if ((result__WUHH <  0)) {
+              result__WUHH=(__INTEGER)(~ result__WUHH);
+            };
+            node__F2EG=((void **)Self__01EG->buckets__QMBC)[(__INTEGER)(result__WUHH % Self__01EG->capacity__LMBC)];
+            while (((void *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__F2EG)->key__2MBC != (void *)k__11EG)) {
+              node__F2EG=((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__F2EG)->next__HNBC;
+            };
+            print__DID(((__PROTOTYPE *)((__HASHED_DICTIONARY_NODEoPROTOTYPExSTRING_CONSTANTo *)node__F2EG)->item__J4GD)->filename__LOG);
             fputc((int)('\n'),stdout);
-            __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;
+            __tmp__EVQC=item__NYPE(dir__BRQC,Self__NN3D);
+            if (((struct ___OBJ *)__tmp__EVQC)->__id==__DIRECTORY_UNIX__) {
+              __tmp__FVQC=((__DIRECTORY_UNIX *)__tmp__EVQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
             } else {
-              __tmp__RTQC=((__FILE_UNIX *)__tmp__QTQC)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+              __tmp__FVQC=((__FILE_UNIX *)__tmp__EVQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
             };
-            print__DID(__tmp__RTQC);
+            print__DID(__tmp__FVQC);
             fputc((int)('\n'),stdout);
             exit(( 1));
           };
-          __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;
+          __tmp__JVQC=item__NYPE(dir__BRQC,Self__NN3D);
+          if (((struct ___OBJ *)__tmp__JVQC)->__id==__DIRECTORY_UNIX__) {
+            __tmp__KVQC=((__DIRECTORY_UNIX *)__tmp__JVQC)->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;
+            __tmp__KVQC=((__FILE_UNIX *)__tmp__JVQC)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
           };
-          proto_input__BI=create__name__generic_count__JBC(__tmp__WTQC,tok__LPQC);
+          proto_input__BI=create__name__generic_count__JBC(__tmp__KVQC,tok__5QQC);
           go_on__SBC(proto_input__BI);
           if (is_shorter__LZ) {
-            save_file__with__3DC(add_ext__C4E(tok__LPQC),output_code__SI);
+            save_file__with__3DC(add_ext__L5E(tok__5QQC),output_code__SI);
           };
         };
       };
-      Self__ZM3D=(__INTEGER)(Self__ZM3D +  1);
+      Self__NN3D=(__INTEGER)(Self__NN3D +  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);
+      Self__1UHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__5UHH= 0;
+      __tmp__BVHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+      Self__CVHH= 1;
+      while ((Self__CVHH <= __tmp__BVHH)) {
+        result__5UHH=(__INTEGER)((__INTEGER)( 5 * result__5UHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__ZNO)[(__INTEGER)(Self__CVHH -  1)])));
+        Self__CVHH=(__INTEGER)(Self__CVHH +  1);
+      };
+      if ((result__5UHH <  0)) {
+        result__5UHH=(__INTEGER)(~ result__5UHH);
+      };
+      node__3UHH=((void **)Self__1UHH->buckets__DAT)[(__INTEGER)(result__5UHH % Self__1UHH->capacity__45S)];
+      while ((! (((void *)node__3UHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3UHH)->key__PAT == (void *)(&__string_154))))) {
+        node__3UHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__3UHH)->next__0AT;
+      };
+      if (((void *)node__3UHH != (void *)NULL)) {
+        Self__0NHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__EVHH= 0;
+        __tmp__GVHH=((__STRING_CONSTANT *)(&__string_154))->count__DD;
+        Self__HVHH= 1;
+        while ((Self__HVHH <= __tmp__GVHH)) {
+          result__EVHH=(__INTEGER)((__INTEGER)( 5 * result__EVHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_154))->storage__ZNO)[(__INTEGER)(Self__HVHH -  1)])));
+          Self__HVHH=(__INTEGER)(Self__HVHH +  1);
+        };
+        if ((result__EVHH <  0)) {
+          result__EVHH=(__INTEGER)(~ result__EVHH);
+        };
+        node__2NHH=((void **)Self__0NHH->buckets__DAT)[(__INTEGER)(result__EVHH % Self__0NHH->capacity__45S)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2NHH)->key__PAT != (void *)(&__string_154))) {
+          node__2NHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2NHH)->next__0AT;
+        };
+        tok__5QQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__2NHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+        Self__XZBD=((__STRING *)current_list__2B);
+        i__ZZBD=Self__XZBD->count__EGC;
+        j__0ZBD=((__STRING_CONSTANT *)tok__5QQC)->count__DD;
+        resize__UUZ(Self__XZBD,(__INTEGER)(i__ZZBD + j__0ZBD));
+        if (((i__ZZBD >  0) && (j__0ZBD >  0))) {
+          move__to__by__MVCC(Self__XZBD->storage__F5R, 0,(__INTEGER)(i__ZZBD -  1),j__0ZBD);
+        };
+        Self__XJEB=((__CHARACTER *)Self__XZBD->storage__F5R);
+        model__YJEB=((__STRING_CONSTANT *)tok__5QQC)->storage__ZNO;
+        Self__MAKB=(__INTEGER)(j__0ZBD -  1);
+        while ((Self__MAKB >=  0)) {
+          Self__XJEB[Self__MAKB]=((__CHARACTER *)model__YJEB)[Self__MAKB];
+          Self__MAKB=(__INTEGER)(Self__MAKB -  1);
+        };
+      };
+      Self__JVHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__NVHH= 0;
+      __tmp__PVHH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+      Self__QVHH= 1;
+      while ((Self__QVHH <= __tmp__PVHH)) {
+        result__NVHH=(__INTEGER)((__INTEGER)( 5 * result__NVHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__ZNO)[(__INTEGER)(Self__QVHH -  1)])));
+        Self__QVHH=(__INTEGER)(Self__QVHH +  1);
+      };
+      if ((result__NVHH <  0)) {
+        result__NVHH=(__INTEGER)(~ result__NVHH);
+      };
+      node__LVHH=((void **)Self__JVHH->buckets__DAT)[(__INTEGER)(result__NVHH % Self__JVHH->capacity__45S)];
+      while ((! (((void *)node__LVHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LVHH)->key__PAT == (void *)(&__string_156))))) {
+        node__LVHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__LVHH)->next__0AT;
+      };
+      if (((void *)node__LVHH != (void *)NULL)) {
+        Self__BOHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__SVHH= 0;
+        __tmp__UVHH=((__STRING_CONSTANT *)(&__string_156))->count__DD;
+        Self__VVHH= 1;
+        while ((Self__VVHH <= __tmp__UVHH)) {
+          result__SVHH=(__INTEGER)((__INTEGER)( 5 * result__SVHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_156))->storage__ZNO)[(__INTEGER)(Self__VVHH -  1)])));
+          Self__VVHH=(__INTEGER)(Self__VVHH +  1);
+        };
+        if ((result__SVHH <  0)) {
+          result__SVHH=(__INTEGER)(~ result__SVHH);
+        };
+        node__DOHH=((void **)Self__BOHH->buckets__DAT)[(__INTEGER)(result__SVHH % Self__BOHH->capacity__45S)];
+        while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->key__PAT != (void *)(&__string_156))) {
+          node__DOHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->next__0AT;
+        };
+        tok__5QQC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__DOHH)->item__DV3)->first_link__PTEC)->item__HXHD;
+        append__FLS(current_list__2B,tok__5QQC);
+      };
+      copy__35R(string_tmp__VH,((__DIRECTORY_UNIX *)__tmp__QRQC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+      Self__V02=((__STRING *)string_tmp__VH);
+      if ((n__3QQC > Self__V02->count__EGC)) {
+        Self__V02->count__EGC= 0;
+      } else {
+        if ((n__3QQC >  0)) {
+          len__3SU=(__INTEGER)((__INTEGER)(n__3QQC -  1) +  1);
+          if ((len__3SU >  0)) {
+            __tmp__0TU=(__INTEGER)(n__3QQC +  1);
+            __tmp__1TU=Self__V02->count__EGC;
+            Self__UNGB=__tmp__0TU;
+            while ((Self__UNGB <= __tmp__1TU)) {
+              ((__CHARACTER *)Self__V02->storage__F5R)[(__INTEGER)((__INTEGER)(Self__UNGB - len__3SU) -  1)]=((__CHARACTER *)Self__V02->storage__F5R)[(__INTEGER)(Self__UNGB -  1)];
+              Self__UNGB=(__INTEGER)(Self__UNGB +  1);
+            };
+            Self__V02->count__EGC=(__INTEGER)(Self__V02->count__EGC - len__3SU);
           };
         };
       };
       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);
+        Self__LNS=((__STRING *)string_tmp__VH);
+        __tmp__QNS=Self__LNS->storage__F5R;
+        __tmp__TNS=(__INTEGER)(Self__LNS->count__EGC -  1);
+        Self__CLBC=((__CHARACTER *)__tmp__QNS);
+        Self__CSIC=__tmp__TNS;
+        while ((Self__CSIC >=  0)) {
+          if (('/' == Self__CLBC[Self__CSIC])) {
+            Self__CLBC[Self__CSIC]='-';
+          };
+          Self__CSIC=(__INTEGER)(Self__CSIC -  1);
+        };
+        tok__5QQC=get__YWB(string_tmp__VH);
+        Self__XVHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+        result__1VHH= 0;
+        __tmp__3VHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+        Self__4VHH= 1;
+        while ((Self__4VHH <= __tmp__3VHH)) {
+          result__1VHH=(__INTEGER)((__INTEGER)( 5 * result__1VHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__ZNO)[(__INTEGER)(Self__4VHH -  1)])));
+          Self__4VHH=(__INTEGER)(Self__4VHH +  1);
+        };
+        if ((result__1VHH <  0)) {
+          result__1VHH=(__INTEGER)(~ result__1VHH);
+        };
+        node__ZVHH=((void **)Self__XVHH->buckets__DAT)[(__INTEGER)(result__1VHH % Self__XVHH->capacity__45S)];
+        while ((! (((void *)node__ZVHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ZVHH)->key__PAT == (void *)(&__string_152))))) {
+          node__ZVHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__ZVHH)->next__0AT;
+        };
+        if (((void *)node__ZVHH != (void *)NULL)) {
+          Self__FU3=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+          result__AWHH= 0;
+          __tmp__CWHH=((__STRING_CONSTANT *)(&__string_152))->count__DD;
+          Self__DWHH= 1;
+          while ((Self__DWHH <= __tmp__CWHH)) {
+            result__AWHH=(__INTEGER)((__INTEGER)( 5 * result__AWHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_152))->storage__ZNO)[(__INTEGER)(Self__DWHH -  1)])));
+            Self__DWHH=(__INTEGER)(Self__DWHH +  1);
+          };
+          if ((result__AWHH <  0)) {
+            result__AWHH=(__INTEGER)(~ result__AWHH);
+          };
+          node__QU3=((void **)Self__FU3->buckets__DAT)[(__INTEGER)(result__AWHH % Self__FU3->capacity__45S)];
+          while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QU3)->key__PAT != (void *)(&__string_152))) {
+            node__QU3=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QU3)->next__0AT;
+          };
+          tok_lst__ARQC=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__QU3)->item__DV3;
+          __tmp__DYQC=((__LINKED_LISToSTRING_CONSTANTo *)tok_lst__ARQC)->parent_linked_collection__LD.upper__MDD;
+          Self__LBSE= 1;
+          while ((Self__LBSE <= __tmp__DYQC)) {
+            if (((void *)item__CZND(tok_lst__ARQC,Self__LBSE) == (void *)NULL)) {
+              append__FLS(directory_list__YB,tok__5QQC);
             } else {
-              append__2JS(directory_list__YB,item__MZND(tok_lst__MPQC,Self__J5RE));
+              append__FLS(directory_list__YB,item__CZND(tok_lst__ARQC,Self__LBSE));
             };
-            Self__J5RE=(__INTEGER)(Self__J5RE +  1);
+            Self__LBSE=(__INTEGER)(Self__LBSE +  1);
           };
         } else {
-          append__2JS(directory_list__YB,tok__LPQC);
-          add_last__UHT(directory_list__YB,'\n');
+          append__FLS(directory_list__YB,tok__5QQC);
+          add_last__3IT(directory_list__YB,'\n');
         };
-        save_file__with__3DC(add_ext__C4E(tok__LPQC),current_list__2B);
+        save_file__with__3DC(add_ext__L5E(tok__5QQC),current_list__2B);
         ((__STRING *)current_list__2B)->count__EGC= 0;
       };
     };
   };
 }
 
-static void* add_ext__C4E(void *n__E4E)
+static void* add_ext__L5E(void *n__N5E)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__JWHH,__tmp__LWHH,Self__MWHH,result__OWHH;
+  __INTEGER __tmp__QWHH,Self__RWHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__FWHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__YRFH;
+  void *node__HWHH,*node__0RFH;
+  copy__35R(string_tmp__VH,n__N5E);
+  Self__FWHH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+  result__JWHH= 0;
+  __tmp__LWHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+  Self__MWHH= 1;
+  while ((Self__MWHH <= __tmp__LWHH)) {
+    result__JWHH=(__INTEGER)((__INTEGER)( 5 * result__JWHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__ZNO)[(__INTEGER)(Self__MWHH -  1)])));
+    Self__MWHH=(__INTEGER)(Self__MWHH +  1);
+  };
+  if ((result__JWHH <  0)) {
+    result__JWHH=(__INTEGER)(~ result__JWHH);
+  };
+  node__HWHH=((void **)Self__FWHH->buckets__DAT)[(__INTEGER)(result__JWHH % Self__FWHH->capacity__45S)];
+  while ((! (((void *)node__HWHH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWHH)->key__PAT == (void *)(&__string_116))))) {
+    node__HWHH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__HWHH)->next__0AT;
+  };
+  if (((void *)node__HWHH != (void *)NULL)) {
+    Self__YRFH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+    result__OWHH= 0;
+    __tmp__QWHH=((__STRING_CONSTANT *)(&__string_116))->count__DD;
+    Self__RWHH= 1;
+    while ((Self__RWHH <= __tmp__QWHH)) {
+      result__OWHH=(__INTEGER)((__INTEGER)( 5 * result__OWHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)(&__string_116))->storage__ZNO)[(__INTEGER)(Self__RWHH -  1)])));
+      Self__RWHH=(__INTEGER)(Self__RWHH +  1);
+    };
+    if ((result__OWHH <  0)) {
+      result__OWHH=(__INTEGER)(~ result__OWHH);
+    };
+    node__0RFH=((void **)Self__YRFH->buckets__DAT)[(__INTEGER)(result__OWHH % Self__YRFH->capacity__45S)];
+    while (((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0RFH)->key__PAT != (void *)(&__string_116))) {
+      node__0RFH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0RFH)->next__0AT;
+    };
+    append__FLS(string_tmp__VH,((__LINKED_LIST_NODEoSTRING_CONSTANTo *)((__LINKED_LISToSTRING_CONSTANTo *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__0RFH)->item__DV3)->first_link__PTEC)->item__HXHD);
   } else {
-    append__2JS(string_tmp__VH,(&__string_224));
+    append__FLS(string_tmp__VH,(&__string_224));
   };
   return(get__YWB(string_tmp__VH));
 }
@@ -14114,55 +14122,55 @@ static void* add_ext__C4E(void *n__E4E)
 static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __STRING *Self__2RFH,*Self__HBT,*Self__1US;
+  void *result__EYAC,*__tmp__UYAC,*__tmp__BGC,*file__CEC;
+  void *__tmp__12HC;
+  __POINTER stream__JEIC,ptr__1GPF;
+  void *__tmp__TYAC;
+  __FILE_UNIX *Self__SU3G,*Self__HDUE,*Self__QEUE;
   __INTEGER __tmp__GGC;
-  __BOOLEAN __tmp__XEC,result__XCIC;
+  __BOOLEAN __tmp__XEC,result__LEIC;
   if (((void *)output_name__DI != (void *)NULL)) {
-    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)] != '/')) {
+    copy__35R(string_tmp__VH,output_name__DI);
+    Self__2RFH=((__STRING *)string_tmp__VH);
+    if ((((__CHARACTER *)Self__2RFH->storage__F5R)[(__INTEGER)(Self__2RFH->count__EGC -  1)] != '/')) {
       __tmp__XEC=TRUE__;
     } else {
-      Self__45S=((__STRING *)string_tmp__VH);
-      __tmp__XEC=(((__CHARACTER *)Self__45S->storage__23R)[(__INTEGER)(Self__45S->count__EGC -  1)] != '\\');
+      Self__HBT=((__STRING *)string_tmp__VH);
+      __tmp__XEC=(((__CHARACTER *)Self__HBT->storage__F5R)[(__INTEGER)(Self__HBT->count__EGC -  1)] != '\\');
     };
     if (__tmp__XEC) {
-      add_last__UHT(string_tmp__VH,'/');
+      add_last__3IT(string_tmp__VH,'/');
     };
   } else {
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
   };
-  append__2JS(string_tmp__VH,n__5DC);
+  append__FLS(string_tmp__VH,n__5DC);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  result__YWAC=NULL;
+  result__EYAC=NULL;
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
-    __tmp__H1HC=FILE_SYSTEM__->parent_directory__1FD;
+    __tmp__12HC=FILE_SYSTEM__->parent_directory__1FD;
   } else {
-    __tmp__H1HC=parent_directory__1ED();
+    __tmp__12HC=parent_directory__1ED();
   };
-  copy__U4R(string_tmp__AFD,((__DIRECTORY_UNIX *)__tmp__H1HC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  copy__35R(string_tmp__AFD,((__DIRECTORY_UNIX *)__tmp__12HC)->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  add_last__UHT(string_tmp__AFD,'/');
+  add_last__3IT(string_tmp__AFD,'/');
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  append__2JS(string_tmp__AFD,string_tmp__VH);
+  append__FLS(string_tmp__AFD,string_tmp__VH);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
@@ -14171,7 +14179,7 @@ static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
   } else {
     parent_directory__1ED();
   };
-  reduce_path__W1HC(string_tmp__AFD);
+  reduce_path__K3HC(string_tmp__AFD);
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
@@ -14180,19 +14188,19 @@ static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
   } else {
     parent_directory__1ED();
   };
-  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';
+  result__LEIC=FALSE__;
+  Self__1US=((__STRING *)string_tmp__AFD);
+  if ((Self__1US->capacity__24R > Self__1US->count__EGC)) {
+    ((__CHARACTER *)Self__1US->storage__F5R)[Self__1US->count__EGC]='\0';
   } else {
-    add_last__UHT(Self__STS,'\0');
-    Self__STS->count__EGC=(__INTEGER)(Self__STS->count__EGC -  1);
+    add_last__3IT(Self__1US,'\0');
+    Self__1US->count__EGC=(__INTEGER)(Self__1US->count__EGC -  1);
   };
-  stream__VCIC=((__POINTER )(fopen((char*)(Self__STS->storage__23R),"w+b")));
-  if ((stream__VCIC != (void *)NULL)) {
-    result__XCIC=(((__INTEGER )(fclose((FILE*)(stream__VCIC)))) ==  0);
+  stream__JEIC=((__POINTER )(fopen((char*)(Self__1US->storage__F5R),"w+b")));
+  if ((stream__JEIC != (void *)NULL)) {
+    result__LEIC=(((__INTEGER )(fclose((FILE*)(stream__JEIC)))) ==  0);
   };
-  if (result__XCIC) {
+  if (result__LEIC) {
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
@@ -14201,259 +14209,259 @@ static void save_file__with__3DC(void *n__5DC,void *buf__AEC)
     } else {
       parent_directory__1ED();
     };
-    __tmp__HXAC=get_entry__0XAC(string_tmp__AFD);
-    if (__tmp__HXAC==NULL) {
-      __tmp__IXAC=NULL;
+    __tmp__TYAC=get_entry__GZAC(string_tmp__AFD);
+    if (__tmp__TYAC==NULL) {
+      __tmp__UYAC=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__HXAC)->__id) {
+      switch (((struct ___OBJ *)__tmp__TYAC)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__IXAC=NULL;
+        __tmp__UYAC=NULL;
       } break;
       case __FILE_UNIX__: {
-        __tmp__IXAC=((void *)__tmp__HXAC);
+        __tmp__UYAC=((void *)__tmp__TYAC);
       } break;
       }
     };
-    result__YWAC=__tmp__IXAC;
+    result__EYAC=__tmp__UYAC;
   };
-  if (((void *)result__YWAC == (void *)NULL)) {
-    put_string__CZF((&__string_225));
-    put_string__CZF(string_tmp__VH);
-    put_string__CZF((&__string_226));
+  if (((void *)result__EYAC == (void *)NULL)) {
+    put_string__L0F((&__string_225));
+    put_string__L0F(string_tmp__VH);
+    put_string__L0F((&__string_226));
     exit(( 1));
   };
-  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));
+  Self__SU3G=((__FILE_UNIX *)result__EYAC);
+  Self__SU3G->stream__QHRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__SU3G->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->storage__ZNO),"r+b")));
+  if ((! (Self__SU3G->stream__QHRD != (void *)NULL))) {
+    put_string__L0F((&__string_225));
+    put_string__L0F(string_tmp__VH);
+    put_string__L0F((&__string_227));
     exit(( 1));
   };
-  if (result__YWAC==NULL) {
+  if (result__EYAC==NULL) {
     __tmp__BGC=NULL;
   } else {
-    __tmp__BGC=((void *)result__YWAC);
+    __tmp__BGC=((void *)result__EYAC);
   };
   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;
+  Self__HDUE=((__FILE_UNIX *)__tmp__BGC);
+  ptr__1GPF=((__POINTER )((__UINTEGER_8 *)((__STRING *)buf__AEC)->storage__F5R));
+  ptr__1GPF=(void *)((unsigned long)ptr__1GPF - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 0)));
+  fwrite((void *)((((__UINTEGER_8 *)ptr__1GPF))),(size_t)(1), (size_t)((__tmp__GGC)),(FILE*)((Self__HDUE->stream__QHRD)));
+  Self__QEUE=((__FILE_UNIX *)__tmp__BGC);
+  fclose((FILE*)((Self__QEUE->stream__QHRD)));
+  Self__QEUE->stream__QHRD=NULL;
 }
 
-static void resize__LTZ(__STRING *Self__MTZ,__INTEGER new_count__NTZ)
+static void resize__UUZ(__STRING *Self__VUZ,__INTEGER new_count__WUZ)
 // ({STRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER old_nb_elts__EBEH,upper__IOHH,Self__GOHH,lower__ZP3C;
+  __INTEGER upper__0P3C,Self__XUDD;
+  __CHARACTER *Self__DBEH,*new__GBEH,*Self__YP3C;
+  if ((! (new_count__WUZ <= Self__VUZ->count__EGC))) {
+    if ((Self__VUZ->capacity__24R < new_count__WUZ)) {
+      if ((Self__VUZ->capacity__24R ==  0)) {
+        Self__VUZ->storage__F5R=create__3IEB(new_count__WUZ);
+      } else {
+        Self__DBEH=((__CHARACTER *)Self__VUZ->storage__F5R);
+        old_nb_elts__EBEH=Self__VUZ->capacity__24R;
+        new__GBEH=((__CHARACTER *)realloc_dynamic__old_size__new_size__LELC(((__POINTER )Self__DBEH),((__UINTEGER_32 )old_nb_elts__EBEH),((__UINTEGER_32 )new_count__WUZ)));
+        upper__IOHH=(__INTEGER)(new_count__WUZ -  1);
+        Self__GOHH=old_nb_elts__EBEH;
+        while ((Self__GOHH <= upper__IOHH)) {
+          new__GBEH[Self__GOHH]='\0';
+          Self__GOHH=(__INTEGER)(Self__GOHH +  1);
+        };
+        Self__VUZ->storage__F5R=new__GBEH;
+      };
+      Self__VUZ->capacity__24R=new_count__WUZ;
+    } else {
+      Self__YP3C=((__CHARACTER *)Self__VUZ->storage__F5R);
+      lower__ZP3C=Self__VUZ->count__EGC;
+      upper__0P3C=(__INTEGER)(new_count__WUZ -  1);
+      Self__XUDD=lower__ZP3C;
+      while ((Self__XUDD <= upper__0P3C)) {
+        Self__YP3C[Self__XUDD]='\0';
+        Self__XUDD=(__INTEGER)(Self__XUDD +  1);
+      };
+    };
+  };
+  Self__VUZ->count__EGC=new_count__WUZ;
 }
 
-static void move__to__by__YTCC(__CHARACTER *Self__ZTCC,__INTEGER lower__0TCC,__INTEGER upper__1TCC,__INTEGER offset__2TCC)
+static void move__to__by__MVCC(__CHARACTER *Self__NVCC,__INTEGER lower__OVCC,__INTEGER upper__PVCC,__INTEGER offset__QVCC)
 // ({NATIVE_ARRAYoExpanded_CHARACTERo},{INTEGER},{INTEGER},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER Self__WKHD,Self__FLHD;
+  if ((offset__QVCC !=  0)) {
+    if ((offset__QVCC <  0)) {
+      Self__WKHD=lower__OVCC;
+      while ((Self__WKHD <= upper__PVCC)) {
+        Self__NVCC[(__INTEGER)(Self__WKHD + offset__QVCC)]=Self__NVCC[Self__WKHD];
+        Self__WKHD=(__INTEGER)(Self__WKHD +  1);
       };
     } else {
-      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);
+      Self__FLHD=upper__PVCC;
+      while ((Self__FLHD >= lower__OVCC)) {
+        Self__NVCC[(__INTEGER)(Self__FLHD + offset__QVCC)]=Self__NVCC[Self__FLHD];
+        Self__FLHD=(__INTEGER)(Self__FLHD -  1);
       };
     };
   };
 }
 
-static __BOOLEAN __infix_equal_equal__R1DB(__STRING_CONSTANT *Self__S1DB,void *other__T1DB)
+static __BOOLEAN __infix_equal_equal__02DB(__STRING_CONSTANT *Self__12DB,void *other__22DB)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANTxSTRING}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__F3DB,__tmp__G3DB,i__XWIH;
+  __BOOLEAN result__42DB;
+  __CHARACTER *__tmp__X3DB,*__tmp__Y3DB,*Self__YWIH,*other__ZWIH;
+  result__42DB=FALSE__;
+  __tmp__F3DB=Self__12DB->count__DD;
+  if (((struct ___OBJ *)other__22DB)->__id==__STRING_CONSTANT__) {
+    __tmp__G3DB=((__STRING_CONSTANT *)other__22DB)->count__DD;
   } else {
-    __tmp__31DB=((__STRING *)other__T1DB)->count__EGC;
+    __tmp__G3DB=((__STRING *)other__22DB)->count__EGC;
   };
-  if ((__tmp__21DB == __tmp__31DB)) {
-    if ((Self__S1DB->count__DD ==  0)) {
-      result__V1DB=TRUE__;
+  if ((__tmp__F3DB == __tmp__G3DB)) {
+    if ((Self__12DB->count__DD ==  0)) {
+      result__42DB=TRUE__;
     } else {
-      __tmp__O2DB=Self__S1DB->storage__QMO;
-      if (((struct ___OBJ *)other__T1DB)->__id==__STRING_CONSTANT__) {
-        __tmp__P2DB=((__STRING_CONSTANT *)other__T1DB)->storage__QMO;
+      __tmp__X3DB=Self__12DB->storage__ZNO;
+      if (((struct ___OBJ *)other__22DB)->__id==__STRING_CONSTANT__) {
+        __tmp__Y3DB=((__STRING_CONSTANT *)other__22DB)->storage__ZNO;
       } else {
-        __tmp__P2DB=((__STRING *)other__T1DB)->storage__23R;
+        __tmp__Y3DB=((__STRING *)other__22DB)->storage__F5R;
       };
-      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);
+      Self__YWIH=((__CHARACTER *)__tmp__X3DB);
+      other__ZWIH=__tmp__Y3DB;
+      i__XWIH=(__INTEGER)(Self__12DB->count__DD -  1);
+      while (((i__XWIH >=  0) && (Self__YWIH[i__XWIH] == ((__CHARACTER *)other__ZWIH)[i__XWIH]))) {
+        i__XWIH=(__INTEGER)(i__XWIH -  1);
       };
-      result__V1DB=(i__OSIH <  0);
+      result__42DB=(i__XWIH <  0);
     };
   };
-  return(result__V1DB);
+  return(result__42DB);
 }
 
-static void* at__DH4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__EH4,void *k__FH4)
+static void* at__MI4(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__NI4,void *k__OI4)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__TWHH,__tmp__VWHH,Self__WWHH;
+  void *node__YI4;
+  result__TWHH= 0;
+  __tmp__VWHH=((__STRING_CONSTANT *)k__OI4)->count__DD;
+  Self__WWHH= 1;
+  while ((Self__WWHH <= __tmp__VWHH)) {
+    result__TWHH=(__INTEGER)((__INTEGER)( 5 * result__TWHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)k__OI4)->storage__ZNO)[(__INTEGER)(Self__WWHH -  1)])));
+    Self__WWHH=(__INTEGER)(Self__WWHH +  1);
+  };
+  if ((result__TWHH <  0)) {
+    result__TWHH=(__INTEGER)(~ result__TWHH);
+  };
+  node__YI4=((void **)Self__NI4->buckets__DAT)[(__INTEGER)(result__TWHH % Self__NI4->capacity__45S)];
+  while ((! __infix_equal_equal__02DB(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YI4)->key__PAT,k__OI4))) {
+    node__YI4=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YI4)->next__0AT;
+  };
+  return(((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__YI4)->item__DV3);
 }
 
 static void go_on__SBC(void *obj__UBC)
 // ({NULLxPROTOTYPE}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __POINTER ptr__1DG,ptr_table__2WIH,next__1WIH,result__3WIH;
+  __POINTER ptr_table__BXIH,next__AXIH,result__CXIH,ptr__GXIH;
+  __POINTER ptr_table__OXIH,next__NXIH,result__PXIH,ptr_table__TXIH;
+  __POINTER next__SXIH,result__UXIH,ptr__FHID,ptr_table__YXIH;
+  __POINTER next__XXIH,result__ZXIH,ptr_table__3XIH,next__2XIH;
+  __POINTER result__4XIH,ptr__FYIH,ptr_table__RYIH,next__QYIH;
+  __POINTER result__SYIH,ptr_table__WYIH,next__VYIH,result__XYIH;
+  __POINTER ptr__MZIH,ptr_table__YZIH,next__XZIH,result__ZZIH;
+  __POINTER ptr_table__3ZIH,next__2ZIH,result__4ZIH,ptr__C0IH;
+  __POINTER ptr_table__O0IH,next__N0IH,result__P0IH,ptr_table__T0IH;
+  __POINTER next__S0IH,result__U0IH,ptr__Y0IH,ptr_table__B1IH;
+  __POINTER next__A1IH,result__C1IH,ptr_table__G1IH,next__F1IH;
+  __POINTER result__H1IH,ptr__L1IH,ptr_table__U1IH,next__T1IH;
+  __POINTER result__V1IH,ptr_table__Z1IH,next__Y1IH,result__01IH;
+  __INTEGER typ_id__AEG,new_capacity__PEY,pos_sec__2XC,old_derive__3XC;
+  __INTEGER typ_id__HXIH,h__B0FC,idx__C0FC,idx__1EID,new_capacity__2EID;
+  __INTEGER i__3EID,typ_id__KHID,old_pos__QUOB,old_derive__RUOB;
+  __INTEGER typ_id__GYIH,new_capacity__ZLHC,other_upper__YLHC;
+  __INTEGER Self__T2WD,new_capacity__EUHC,__tmp__IVHC,__tmp__WHTD;
+  __INTEGER Self__IBYE,__tmp__3DHC,typ_id__NZIH,typ_id__D0IH;
+  __INTEGER typ_id__Z0IH,typ_id__M1IH,start__ZWHH,end__YWHH,len__0WHH;
+  __INTEGER __tmp__1WHH,__tmp__3WHH,Self__4WHH,__tmp__JI3B,Self__PZPC;
+  __INTEGER start__BXHH,end__AXHH,len__CXHH,__tmp__DXHH,__tmp__FXHH;
+  __INTEGER Self__GXHH;
+  __UINTEGER_32 sz__3DG,a__SSFH,new_size__TSFH,t__XSFH,a__WSFH;
+  __UINTEGER_32 new_size__EXIH,lab_type__DXIH,sz__IXIH,a__JXIH;
+  __UINTEGER_32 new_size__KXIH,t__LXIH,a__MXIH,new_size__WXIH;
+  __UINTEGER_32 lab_type__VXIH,sz__HHID,a__JTFH,new_size__KTFH,t__OTFH;
+  __UINTEGER_32 a__NTFH,new_size__AYIH,lab_type__5XIH,sz__HYIH,a__IYIH;
+  __UINTEGER_32 new_size__JYIH,t__KYIH,a__LYIH,new_size__ZYIH;
+  __UINTEGER_32 lab_type__YYIH,sz__OZIH,a__PZIH,new_size__QZIH,t__RZIH;
+  __UINTEGER_32 a__SZIH,new_size__A0IH,lab_type__5ZIH,sz__E0IH,a__F0IH;
+  __UINTEGER_32 new_size__G0IH,t__H0IH,a__I0IH,new_size__W0IH;
+  __UINTEGER_32 lab_type__V0IH,sz__00IH,a__10IH,new_size__20IH,t__30IH;
+  __UINTEGER_32 a__40IH,new_size__J1IH,lab_type__I1IH,sz__N1IH,a__O1IH;
+  __UINTEGER_32 new_size__P1IH,t__Q1IH,a__R1IH,new_size__21IH;
+  __UINTEGER_32 lab_type__11IH;
+  __POSITION pos__23VG,pos__43VG,pos__A4VG,pos__L4VG,pos__N4VG;
+  __POSITION pos__Q4VG,pos__S4VG,p__NYIH,__tmp__PEHC,__tmp__2EHC;
+  __POSITION pos__BDWG,pos__DDWG,pos__FDWG,pos__HDWG,pos__40ID;
+  __POSITION pos__PDWG,__tmp__YFBD,__tmp__AGBD,__tmp__UGBD,__tmp__3GBD;
+  __POSITION pos__ZDWG,__tmp__F4OB,__tmp__H4OB,pos__UEWG,pos__WEWG;
+  void *n__2POB,*__tmp__WYOB,*n__LFBD,*__tmp__2ZOB,*__tmp__M0OB;
+  void *__tmp__03OB,*__tmp__BEZB;
+  __SECTION_ *Self__1Y3G,*Self__2Y3G,*result__FXIH,*Self__D5VG;
+  __SECTION_ *Self__T23G,*Self__U23G;
+  void *__tmp__E2C,*s__SUOB,*result__15YB,*__tmp__BYOB,*__tmp__SH3B;
+  void *s__5DZB,*__tmp__PEZB;
+  void *__tmp__G2C,*result__MQEC,*result__YTOB,*sec__MFBD;
+  void *t__MUOB;
+  void *arg__05YB,*__tmp__2DHC,*__tmp__OEHC,*__tmp__1EHC;
+  __ITM_ARG *result__EYIH,*Self__MYIH,*result__LZIH,*Self__TZIH;
+  __ITM_SLOT_OPERATOR *Self__TDHC,*Self__D4FC,*Self__4FHC;
+  void *tm__F4FC,*__tmp__O4FC;
+  void *expr__FH3B;
+  void *__tmp__TH3B;
+  __ITM_SLOT *result__B0IH,*Self__J0IH;
+  __ITM_PROTOTYPE *result__X0IH;
+  __ITM_READ_ARG1 *result__K1IH;
+  __STRING *Self__2WHH,*Self__EXHH;
+  __PROTOTYPE *Self__4DZB;
+  __HASHED_SEToSTRING_CONSTANTo *result__0DG,*Self__AFT,*Self__EI3B;
+  void *t__FYC,*k__BQEC,*k__0ZFC,*lt__NUOB;
+  __BOOLEAN result__X0KH,result__Z0KH,result__W5D,result__KDEB;
+  __BOOLEAN __tmp__XDEB,result__TA5,result__YSFH,result__SU5;
+  __BOOLEAN __tmp__PFEB,result__JSAB,__tmp__QFEB,__tmp__TFEB,__tmp__X2C;
+  __BOOLEAN __tmp__M2C,result__LUOB,result__BYIH,result__0YIH;
+  __BOOLEAN __tmp__LBZB,result__3YIH,__tmp__SUHC,__tmp__BEHC;
+  __BOOLEAN result__CZIH,__tmp__3VOB,result__FZIH,result__IZIH;
+  __BOOLEAN result__31IH,__tmp__Q2OB,__tmp__R2OB;
+  __CHARACTER result__KX3G,result__PX3G,result__UX3G,result__ZX3G;
+  __CHARACTER result__4X3G,result__HY3G,result__MY3G,result__RY3G;
+  __CHARACTER result__WY3G,affect__PUOB,style__OUOB,result__CYIH;
+  __CHARACTER result__1YIH,result__4YIH,result__DZIH,result__GZIH;
+  __CHARACTER result__JZIH,result__41IH,result__423G,result__H33G;
+  __CHARACTER result__M33G,result__R33G,result__C43G;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__AQEC;
+  __HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__YZFC;
+  void *node__LQEC,*node__D0FC,*node1__5EID,*node2__AFID,*__tmp__R1FC;
+  void **old_buckets__4EID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *result__EHID;
+  __HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *Self__VCTD;
+  void *result__RS1B,*result__TS4B,*larg__NFBD;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__5DZC,*Self__VEZC;
+  __FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *Self__CUHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__WLHC,*Self__2TFH,*Self__FUFH;
+  void **__tmp__MMHC,**__tmp__OMHC,**Self__YFSD;
+  void **__tmp__HVHC,**new__CHTD;
+  void *__tmp__Y3OB,*__tmp__AEZB;
+  void **__tmp__GI3B,**Self__4GHC;
   object__ZBC=obj__UBC;
   source__5BC=((__PROTOTYPE *)obj__UBC)->source__3BC;
   position__CCC= 1;
@@ -14463,82 +14471,82 @@ static void go_on__SBC(void *obj__UBC)
   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)));
+    copy__35R(output_code__SI,source__5BC);
+    result__0DG=NULL;
+    ptr__1DG=((__POINTER )(NULL));
+    typ_id__AEG= 0;
+    sz__3DG=((__UINTEGER_32 )sizeof(__HASHED_SEToSTRING_CONSTANTo));
+    if ((sz__3DG ==  0)) {
+      result__0DG=HASHED_SEToSTRING_CONSTANTo__;
+    } else {
+      typ_id__AEG=__HASHED_SEToSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3DG);
+      if ((typ_id__AEG == (__INTEGER)(-  1))) {
+        a__SSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__TSFH=(__UINTEGER_32)((__UINTEGER_32)(sz__3DG + a__SSFH) & (__UINTEGER_32)(~ a__SSFH));
+        ptr_table__2WIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__TSFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__1WIH=((__POINTER )(NULL));
+        result__3WIH=((__POINTER *)ptr_table__2WIH)[ 0];
+        if ((result__3WIH == (void *)NULL)) {
+          result__3WIH=new_lab__ZPJ(new_size__TSFH);
+          next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSFH)));
+          ((__POINTER *)next__1WIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2WIH)[ 0]=next__1WIH;
+        } else {
+          next__1WIH=((__POINTER *)result__3WIH)[ 0];
+          if ((next__1WIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3WIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__TSFH <<  1)) <=  4096)) {
+              next__1WIH=(void *)((unsigned long)result__3WIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TSFH)));
             } else {
-              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)));
+              next__1WIH=new_lab__ZPJ(new_size__TSFH);
+            };
+            ((__POINTER *)next__1WIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2WIH)[ 0]=next__1WIH;
+          } else {
+            ((__POINTER *)result__3WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3WIH=next__1WIH;
+          };
+        };
+        ptr__1DG=result__3WIH;
+      } else {
+        t__XSFH=((__UINTEGER_32 )typ_id__AEG);
+        a__WSFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3DG + a__WSFH) & (__UINTEGER_32)(~ a__WSFH));
+        ptr_table__BXIH=((__POINTER )(&(table_type[(t__XSFH)])));
+        lab_type__DXIH=(__UINTEGER_32)(t__XSFH |  1);
+        next__AXIH=((__POINTER )(NULL));
+        result__CXIH=((__POINTER *)ptr_table__BXIH)[ 0];
+        if ((result__CXIH == (void *)NULL)) {
+          result__CXIH=new_lab__ZPJ(lab_type__DXIH);
+          next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EXIH)));
+          ((__POINTER *)next__AXIH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BXIH)[ 0]=next__AXIH;
+        } else {
+          next__AXIH=((__POINTER *)result__CXIH)[ 0];
+          if ((next__AXIH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CXIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EXIH <<  1)) <=  4096)) {
+              next__AXIH=(void *)((unsigned long)result__CXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EXIH)));
             } else {
-              next__XSIH=new_lab__QOJ(lab_type__0SIH);
+              next__AXIH=new_lab__ZPJ(lab_type__DXIH);
             };
-            ((__POINTER *)next__XSIH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YSIH)[ 0]=next__XSIH;
+            ((__POINTER *)next__AXIH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BXIH)[ 0]=next__AXIH;
           } else {
-            ((__POINTER *)result__ZSIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XSIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZSIH=next__XSIH;
+            ((__POINTER *)result__CXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CXIH=next__AXIH;
           };
         };
-        ptr__SCG=result__ZSIH;
+        ptr__1DG=result__CXIH;
       };
-      result__RCG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__SCG);
-      *(result__RCG) = *(HASHED_SEToSTRING_CONSTANTo__);
+      result__0DG=((__HASHED_SEToSTRING_CONSTANTo *)ptr__1DG);
+      *(result__0DG) = *(HASHED_SEToSTRING_CONSTANTo__);
     };
-    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;
+    Self__AFT=((__HASHED_SEToSTRING_CONSTANTo *)result__0DG);
+    new_capacity__PEY=prime_number_ceiling__T11( 53);
+    Self__AFT->buckets__LBV=create__PZ3(new_capacity__PEY);
+    Self__AFT->capacity__OFT=new_capacity__PEY;
+    Self__AFT->count__UEY= 0;
+    short_local__XCC=result__0DG;
     short__token__to__YBD((&__string_117), 1, 1);
   };
   t__FYC=NULL;
@@ -14546,24 +14554,24 @@ static void go_on__SBC(void *obj__UBC)
   pos_sec__2XC=position__CCC;
   old_derive__3XC=short_derive__PCC;
   last_comment_extern__JYC=NULL;
-  result__OWKH=read_word__4MF((&__string_4));
+  result__X0KH=read_word__HOF((&__string_4));
   if (is_shorter__LZ) {
-    if (result__OWKH) {
+    if (result__X0KH) {
       short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
     };
   };
-  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)) {
+  if ((! result__X0KH)) {
+    pos__23VG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_228));
+    put_position__LNG(pos__23VG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  result__QWKH=read_word__4MF((&__string_22));
+  result__Z0KH=read_word__HOF((&__string_22));
   if (is_shorter__LZ) {
-    if (result__QWKH) {
+    if (result__Z0KH) {
       if (((void *)(&__string_22) == (void *)(&__string_4))) {
         short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
@@ -14571,1673 +14579,1673 @@ static void go_on__SBC(void *obj__UBC)
       };
     };
   };
-  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)) {
+  if ((! result__Z0KH)) {
+    pos__43VG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_229));
+    put_position__LNG(pos__43VG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  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)) {
+  if ((! read_slot_header__JBE(TRUE__))) {
+    pos__A4VG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_230));
+    put_position__LNG(pos__A4VG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  while (read_slot_header__AAE(FALSE__)) {
+  while (read_slot_header__JBE(FALSE__)) {
   };
   if (is_shorter2__VI) {
-    ((__PROTOTYPE *)object__ZBC)->comment_header__U2QC=last_comment_extern__JYC;
+    ((__PROTOTYPE *)object__ZBC)->comment_header__I4QC=last_comment_extern__JYC;
   };
-  while_do__11E:
+  while_do__E3E:
   {
-    result__N4D=read_word__4MF((&__string_4));
+    result__W5D=read_word__HOF((&__string_4));
     if (is_shorter__LZ) {
-      if (result__N4D) {
+      if (result__W5D) {
         short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       };
     };
-    if (result__N4D) {
+    if (result__W5D) {
       last_comment_extern__JYC=NULL;
-      result__BCEB=FALSE__;
+      result__KDEB=FALSE__;
       if ((! read_space__KSD())) {
-        __tmp__OCEB=TRUE__;
+        __tmp__XDEB=TRUE__;
       } else {
-        result__BT3G='\0';
+        result__KX3G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__BT3G=((__CHARACTER )(( 0)));
+          result__KX3G=((__CHARACTER )(( 0)));
         } else {
-          result__BT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__KX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__K54=FALSE__;
-        if ((((__INTEGER_8 )result__BT3G) >= ((__INTEGER_8 )'A'))) {
-          result__K54=(((__INTEGER_8 )result__BT3G) <= ((__INTEGER_8 )'Z'));
+        result__TA5=FALSE__;
+        if ((((__INTEGER_8 )result__KX3G) >= ((__INTEGER_8 )'A'))) {
+          result__TA5=(((__INTEGER_8 )result__KX3G) <= ((__INTEGER_8 )'Z'));
         };
-        __tmp__OCEB=(! result__K54);
+        __tmp__XDEB=(! result__TA5);
       };
-      if (__tmp__OCEB) {
-        result__BCEB=FALSE__;
+      if (__tmp__XDEB) {
+        result__KDEB=FALSE__;
       } else {
         ((__STRING *)string_tmp__VH)->count__EGC= 0;
-        result__GT3G='\0';
+        result__PX3G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__GT3G=((__CHARACTER )(( 0)));
+          result__PX3G=((__CHARACTER )(( 0)));
         } else {
-          result__GT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__PX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__GT3G);
+        add_last__3IT(string_tmp__VH,result__PX3G);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__LT3G='\0';
+        result__UX3G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__LT3G=((__CHARACTER )(( 0)));
+          result__UX3G=((__CHARACTER )(( 0)));
         } else {
-          result__LT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__UX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__POFH=FALSE__;
-        if ((((__INTEGER_8 )result__LT3G) >= ((__INTEGER_8 )'a'))) {
-          result__POFH=(((__INTEGER_8 )result__LT3G) <= ((__INTEGER_8 )'z'));
+        result__YSFH=FALSE__;
+        if ((((__INTEGER_8 )result__UX3G) >= ((__INTEGER_8 )'a'))) {
+          result__YSFH=(((__INTEGER_8 )result__UX3G) <= ((__INTEGER_8 )'z'));
         };
-        if (result__POFH) {
-          result__QT3G='\0';
+        if (result__YSFH) {
+          result__ZX3G='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QT3G=((__CHARACTER )(( 0)));
+            result__ZX3G=((__CHARACTER )(( 0)));
           } else {
-            result__QT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__ZX3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__QT3G);
+          add_last__3IT(string_tmp__VH,result__ZX3G);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__JSGF:
+          while_do__AVGF:
           {
-            result__VT3G='\0';
+            result__4X3G='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__VT3G=((__CHARACTER )(( 0)));
+              result__4X3G=((__CHARACTER )(( 0)));
             } else {
-              result__VT3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__4X3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__VT3G != ((__CHARACTER )(( 0))))) {
-              result__4T3G='\0';
+            if ((result__4X3G != ((__CHARACTER )(( 0))))) {
+              result__HY3G='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__4T3G=((__CHARACTER )(( 0)));
+                result__HY3G=((__CHARACTER )(( 0)));
               } else {
-                result__4T3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__HY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              result__JT5=FALSE__;
-              if ((((__INTEGER_8 )result__4T3G) >= ((__INTEGER_8 )'a'))) {
-                result__JT5=(((__INTEGER_8 )result__4T3G) <= ((__INTEGER_8 )'z'));
+              result__SU5=FALSE__;
+              if ((((__INTEGER_8 )result__HY3G) >= ((__INTEGER_8 )'a'))) {
+                result__SU5=(((__INTEGER_8 )result__HY3G) <= ((__INTEGER_8 )'z'));
               };
-              if (result__JT5) {
-                __tmp__GEEB=TRUE__;
+              if (result__SU5) {
+                __tmp__PFEB=TRUE__;
               } else {
-                result__DU3G='\0';
+                result__MY3G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__DU3G=((__CHARACTER )(( 0)));
+                  result__MY3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__DU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__MY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                result__ARAB=FALSE__;
-                if ((((__INTEGER_8 )result__DU3G) >= ((__INTEGER_8 )'0'))) {
-                  result__ARAB=(((__INTEGER_8 )result__DU3G) <= ((__INTEGER_8 )'9'));
+                result__JSAB=FALSE__;
+                if ((((__INTEGER_8 )result__MY3G) >= ((__INTEGER_8 )'0'))) {
+                  result__JSAB=(((__INTEGER_8 )result__MY3G) <= ((__INTEGER_8 )'9'));
                 };
-                __tmp__GEEB=result__ARAB;
+                __tmp__PFEB=result__JSAB;
               };
-              if (__tmp__GEEB) {
-                __tmp__HEEB=TRUE__;
+              if (__tmp__PFEB) {
+                __tmp__QFEB=TRUE__;
               } else {
-                result__IU3G='\0';
+                result__RY3G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__IU3G=((__CHARACTER )(( 0)));
+                  result__RY3G=((__CHARACTER )(( 0)));
                 } else {
-                  result__IU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__RY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                __tmp__HEEB=(result__IU3G == '_');
+                __tmp__QFEB=(result__RY3G == '_');
               };
-              __tmp__KEEB=__tmp__HEEB;
+              __tmp__TFEB=__tmp__QFEB;
             } else {
-              __tmp__KEEB=FALSE__;
+              __tmp__TFEB=FALSE__;
             };
-            if (__tmp__KEEB) {
-              result__NU3G='\0';
+            if (__tmp__TFEB) {
+              result__WY3G='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__NU3G=((__CHARACTER )(( 0)));
+                result__WY3G=((__CHARACTER )(( 0)));
               } else {
-                result__NU3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__WY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__UHT(string_tmp__VH,result__NU3G);
+              add_last__3IT(string_tmp__VH,result__WY3G);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__JSGF;
+              goto while_do__AVGF;
             };
           };
           last_string__V0C=get__YWB(string_tmp__VH);
-          result__BCEB=TRUE__;
+          result__KDEB=TRUE__;
           short__token__to__YBD((&__string_119),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
           position__CCC=(__INTEGER)(position__CCC -  1);
-          result__BCEB=FALSE__;
+          result__KDEB=FALSE__;
         };
       };
-      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)) {
+      if (result__KDEB) {
+        n__2POB=last_string__V0C;
+        if ((! (((((((((void *)n__2POB == (void *)(&__string_23)) || ((void *)n__2POB == (void *)(&__string_24))) || ((void *)n__2POB == (void *)(&__string_25))) || ((void *)n__2POB == (void *)(&__string_26))) || ((void *)n__2POB == (void *)(&__string_27))) || ((void *)n__2POB == (void *)(&__string_28))) || ((void *)n__2POB == (void *)(&__string_29))) || ((void *)n__2POB == (void *)(&__string_30))))) {
+          pos__L4VG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_231));
+          put_position__LNG(pos__L4VG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        last_section__E1C=get_name__OQOB(last_string__V0C);
-        if (((void *)((__SECTION_ *)last_section__E1C)->name__ZWDC == (void *)(&__string_28))) {
+        last_section__E1C=get_name__YROB(last_string__V0C);
+        if (((void *)((__SECTION_ *)last_section__E1C)->name__NYDC == (void *)(&__string_28))) {
           __tmp__X2C=TRUE__;
         } else {
-          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))) {
+          Self__1Y3G=((__SECTION_ *)last_section__E1C);
+          if (((((void *)Self__1Y3G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__1Y3G->name__NYDC == (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__G2C=((__ITM_SLOT_OPERATOR *)__tmp__E2C)->parent_itm_slot__VR5B.id_section__F2C;
+              __tmp__G2C=((__ITM_SLOT_OPERATOR *)__tmp__E2C)->parent_itm_slot__BT5B.id_section__F2C;
             };
-            Self__TU3G=((__SECTION_ *)__tmp__G2C);
-            __tmp__M2C=(! (((void *)Self__TU3G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__TU3G->name__ZWDC == (void *)(&__string_24))));
+            Self__2Y3G=((__SECTION_ *)__tmp__G2C);
+            __tmp__M2C=(! (((void *)Self__2Y3G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__2Y3G->name__NYDC == (void *)(&__string_24))));
           } else {
             __tmp__M2C=FALSE__;
           };
           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)) {
+            pos__N4VG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_232));
+            put_position__LNG(pos__N4VG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
           __tmp__X2C=__tmp__M2C;
         };
         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)) {
+          if ((((((void *)((__SECTION_ *)last_section__E1C)->name__NYDC == (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__Q4VG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_233));
+            put_position__LNG(pos__Q4VG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
         };
       } else {
-        t__FYC=read_type_list__DIO(PARSER__,TRUE__);
+        t__FYC=read_type_list__MJO(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)) {
+          pos__S4VG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_231));
+          put_position__LNG(pos__S4VG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        Self__AQEC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__2TOB);
+        k__BQEC=t__FYC;
+        result__MQEC=NULL;
+        node__LQEC=((void **)Self__AQEC->buckets__TQEC)[(__INTEGER)(hash_code__L20(t__FYC) % Self__AQEC->capacity__OQEC)];
+        while ((! (((void *)node__LQEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__LQEC)->key__5QEC == (void *)k__BQEC)))) {
+          node__LQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__LQEC)->next__KREC;
+        };
+        if (((void *)node__LQEC != (void *)NULL)) {
+          result__MQEC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__LQEC)->item__SREC;
+        };
+        result__YTOB=result__MQEC;
+        if (((void *)result__MQEC == (void *)NULL)) {
+          result__FXIH=NULL;
+          ptr__GXIH=((__POINTER )(NULL));
+          typ_id__HXIH= 0;
+          sz__IXIH=((__UINTEGER_32 )sizeof(__SECTION_));
+          if ((sz__IXIH ==  0)) {
+            result__FXIH=SECTION___;
+          } else {
+            typ_id__HXIH=__SECTION___;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IXIH);
+            if ((typ_id__HXIH == (__INTEGER)(-  1))) {
+              a__JXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IXIH + a__JXIH) & (__UINTEGER_32)(~ a__JXIH));
+              ptr_table__OXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KXIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__NXIH=((__POINTER )(NULL));
+              result__PXIH=((__POINTER *)ptr_table__OXIH)[ 0];
+              if ((result__PXIH == (void *)NULL)) {
+                result__PXIH=new_lab__ZPJ(new_size__KXIH);
+                next__NXIH=(void *)((unsigned long)result__PXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXIH)));
+                ((__POINTER *)next__NXIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OXIH)[ 0]=next__NXIH;
               } else {
-                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)));
+                next__NXIH=((__POINTER *)result__PXIH)[ 0];
+                if ((next__NXIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PXIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KXIH <<  1)) <=  4096)) {
+                    next__NXIH=(void *)((unsigned long)result__PXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXIH)));
                   } else {
-                    next__ETIH=new_lab__QOJ(new_size__BTIH);
+                    next__NXIH=new_lab__ZPJ(new_size__KXIH);
                   };
-                  ((__POINTER *)next__ETIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__FTIH)[ 0]=next__ETIH;
+                  ((__POINTER *)next__NXIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OXIH)[ 0]=next__NXIH;
                 } else {
-                  ((__POINTER *)result__GTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ETIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__GTIH=next__ETIH;
+                  ((__POINTER *)result__PXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__PXIH=next__NXIH;
                 };
               };
-              ptr__3SIH=result__GTIH;
+              ptr__GXIH=result__PXIH;
             } else {
-              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;
+              t__LXIH=((__UINTEGER_32 )typ_id__HXIH);
+              a__MXIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__WXIH=(__UINTEGER_32)((__UINTEGER_32)(sz__IXIH + a__MXIH) & (__UINTEGER_32)(~ a__MXIH));
+              ptr_table__TXIH=((__POINTER )(&(table_type[(t__LXIH)])));
+              lab_type__VXIH=(__UINTEGER_32)(t__LXIH |  1);
+              next__SXIH=((__POINTER )(NULL));
+              result__UXIH=((__POINTER *)ptr_table__TXIH)[ 0];
+              if ((result__UXIH == (void *)NULL)) {
+                result__UXIH=new_lab__ZPJ(lab_type__VXIH);
+                next__SXIH=(void *)((unsigned long)result__UXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WXIH)));
+                ((__POINTER *)next__SXIH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TXIH)[ 0]=next__SXIH;
               } else {
-                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)));
+                next__SXIH=((__POINTER *)result__UXIH)[ 0];
+                if ((next__SXIH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UXIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WXIH <<  1)) <=  4096)) {
+                    next__SXIH=(void *)((unsigned long)result__UXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WXIH)));
                   } else {
-                    next__JTIH=new_lab__QOJ(lab_type__MTIH);
+                    next__SXIH=new_lab__ZPJ(lab_type__VXIH);
                   };
-                  ((__POINTER *)next__JTIH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__KTIH)[ 0]=next__JTIH;
+                  ((__POINTER *)next__SXIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TXIH)[ 0]=next__SXIH;
                 } else {
-                  ((__POINTER *)result__LTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__LTIH=next__JTIH;
+                  ((__POINTER *)result__UXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__UXIH=next__SXIH;
                 };
               };
-              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;
+              ptr__GXIH=result__UXIH;
+            };
+            result__FXIH=((__SECTION_ *)ptr__GXIH);
+            *(result__FXIH) = *(SECTION___);
+          };
+          result__YTOB=result__FXIH;
+          Self__D5VG=((__SECTION_ *)result__FXIH);
+          Self__D5VG->name__NYDC=NULL;
+          Self__D5VG->type_list__2WFC=t__FYC;
+          Self__YZFC=((__HASHED_DICTIONARYoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)bucket_list__2TOB);
+          k__0ZFC=t__FYC;
+          h__B0FC=hash_code__L20(t__FYC);
+          idx__C0FC=(__INTEGER)(h__B0FC % Self__YZFC->capacity__OQEC);
+          node__D0FC=((void **)Self__YZFC->buckets__TQEC)[idx__C0FC];
+          while ((! (((void *)node__D0FC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__D0FC)->key__5QEC == (void *)k__0ZFC)))) {
+            node__D0FC=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__D0FC)->next__KREC;
+          };
+          if (((void *)node__D0FC == (void *)NULL)) {
+            if ((Self__YZFC->capacity__OQEC == Self__YZFC->count__E1FC)) {
+              idx__1EID= 0;
+              node1__5EID=NULL;
+              node2__AFID=NULL;
+              old_buckets__4EID=Self__YZFC->buckets__TQEC;
+              new_capacity__2EID=prime_number_ceiling__T11((__INTEGER)(Self__YZFC->capacity__OQEC +  1));
+              Self__YZFC->buckets__TQEC=create__3BYC(new_capacity__2EID);
+              i__3EID=(__INTEGER)(Self__YZFC->capacity__OQEC -  1);
+              Self__YZFC->capacity__OQEC=new_capacity__2EID;
+              while ((i__3EID >=  0)) {
+                node1__5EID=((void **)old_buckets__4EID)[i__3EID];
+                while (((void *)node1__5EID != (void *)NULL)) {
+                  node2__AFID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__5EID)->next__KREC;
+                  idx__1EID=(__INTEGER)(hash_code__L20(((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__5EID)->key__5QEC) % Self__YZFC->capacity__OQEC);
+                  ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node1__5EID)->next__KREC=((void **)Self__YZFC->buckets__TQEC)[idx__1EID];
+                  ((void **)Self__YZFC->buckets__TQEC)[idx__1EID]=node1__5EID;
+                  node1__5EID=node2__AFID;
                 };
-                i__2DID=(__INTEGER)(i__2DID -  1);
+                i__3EID=(__INTEGER)(i__3EID -  1);
               };
-              idx__OYFC=(__INTEGER)(h__NYFC % Self__EYFC->capacity__0OEC);
+              idx__C0FC=(__INTEGER)(h__B0FC % Self__YZFC->capacity__OQEC);
             };
-            __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__;
+            __tmp__R1FC=((void **)Self__YZFC->buckets__TQEC)[idx__C0FC];
+            result__EHID=NULL;
+            ptr__FHID=((__POINTER )(NULL));
+            typ_id__KHID= 0;
+            sz__HHID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo));
+            if ((sz__HHID ==  0)) {
+              result__EHID=HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
             } else {
-              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;
+              typ_id__KHID=__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HHID);
+              if ((typ_id__KHID == (__INTEGER)(-  1))) {
+                a__JTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__KTFH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHID + a__JTFH) & (__UINTEGER_32)(~ a__JTFH));
+                ptr_table__YXIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KTFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__XXIH=((__POINTER )(NULL));
+                result__ZXIH=((__POINTER *)ptr_table__YXIH)[ 0];
+                if ((result__ZXIH == (void *)NULL)) {
+                  result__ZXIH=new_lab__ZPJ(new_size__KTFH);
+                  next__XXIH=(void *)((unsigned long)result__ZXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTFH)));
+                  ((__POINTER *)next__XXIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__YXIH)[ 0]=next__XXIH;
                 } else {
-                  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)));
+                  next__XXIH=((__POINTER *)result__ZXIH)[ 0];
+                  if ((next__XXIH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZXIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KTFH <<  1)) <=  4096)) {
+                      next__XXIH=(void *)((unsigned long)result__ZXIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KTFH)));
                     } else {
-                      next__OTIH=new_lab__QOJ(new_size__BPFH);
+                      next__XXIH=new_lab__ZPJ(new_size__KTFH);
                     };
-                    ((__POINTER *)next__OTIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__PTIH)[ 0]=next__OTIH;
+                    ((__POINTER *)next__XXIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__YXIH)[ 0]=next__XXIH;
                   } else {
-                    ((__POINTER *)result__QTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__QTIH=next__OTIH;
+                    ((__POINTER *)result__ZXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__ZXIH=next__XXIH;
                   };
                 };
-                ptr__EGID=result__QTIH;
+                ptr__FHID=result__ZXIH;
               } else {
-                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;
+                t__OTFH=((__UINTEGER_32 )typ_id__KHID);
+                a__NTFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__AYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HHID + a__NTFH) & (__UINTEGER_32)(~ a__NTFH));
+                ptr_table__3XIH=((__POINTER )(&(table_type[(t__OTFH)])));
+                lab_type__5XIH=(__UINTEGER_32)(t__OTFH |  1);
+                next__2XIH=((__POINTER )(NULL));
+                result__4XIH=((__POINTER *)ptr_table__3XIH)[ 0];
+                if ((result__4XIH == (void *)NULL)) {
+                  result__4XIH=new_lab__ZPJ(lab_type__5XIH);
+                  next__2XIH=(void *)((unsigned long)result__4XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AYIH)));
+                  ((__POINTER *)next__2XIH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__3XIH)[ 0]=next__2XIH;
                 } else {
-                  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)));
+                  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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__AYIH <<  1)) <=  4096)) {
+                      next__2XIH=(void *)((unsigned long)result__4XIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AYIH)));
                     } else {
-                      next__TTIH=new_lab__QOJ(lab_type__WTIH);
+                      next__2XIH=new_lab__ZPJ(lab_type__5XIH);
                     };
-                    ((__POINTER *)next__TTIH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__UTIH)[ 0]=next__TTIH;
+                    ((__POINTER *)next__2XIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__3XIH)[ 0]=next__2XIH;
                   } else {
-                    ((__POINTER *)result__VTIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TTIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__VTIH=next__TTIH;
+                    ((__POINTER *)result__4XIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2XIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__4XIH=next__2XIH;
                   };
                 };
-                ptr__EGID=result__VTIH;
+                ptr__FHID=result__4XIH;
               };
-              result__DGID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__EGID);
-              *(result__DGID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
+              result__EHID=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)ptr__FHID);
+              *(result__EHID) = *(HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo__);
             };
-            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);
+            Self__VCTD=((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)result__EHID);
+            Self__VCTD->item__SREC=result__FXIH;
+            Self__VCTD->key__5QEC=t__FYC;
+            Self__VCTD->next__KREC=__tmp__R1FC;
+            node__D0FC=result__EHID;
+            ((void **)Self__YZFC->buckets__TQEC)[idx__C0FC]=result__EHID;
+            Self__YZFC->count__E1FC=(__INTEGER)(Self__YZFC->count__E1FC +  1);
           } else {
-            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__PYFC)->item__4PEC=result__2SIH;
+            ((__HASHED_DICTIONARY_NODEoSECTION_xFAST_ARRAYoITM_TYPE_MONOoo *)node__D0FC)->item__SREC=result__FXIH;
           };
         };
-        last_section__E1C=result__OSOB;
+        last_section__E1C=result__YTOB;
       };
       do {
-        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__;
+        result__LUOB=FALSE__;
+        t__MUOB=NULL;
+        lt__NUOB=NULL;
+        affect__PUOB='\0';
+        old_pos__QUOB= 0;
+        old_derive__RUOB= 0;
+        s__SUOB=NULL;
+        style__OUOB=read_style__OQF();
+        if ((style__OUOB != ' ')) {
+          result__LUOB=TRUE__;
+          result__15YB=NULL;
+          result__RS1B=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__XS1B)->parent_arrayed_collection__WS1B.upper__1SGC <  0)) {
+            result__RS1B=create_with_capacity__SJ5B( 16);
+          } else {
+            Self__5DZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__XS1B);
+            result__RS1B=((void **)Self__5DZC->parent_arrayed_collection__WS1B.storage__OKHC)[Self__5DZC->parent_arrayed_collection__WS1B.upper__1SGC];
+            Self__VEZC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__XS1B);
+            Self__VEZC->parent_arrayed_collection__WS1B.upper__1SGC=(__INTEGER)(Self__VEZC->parent_arrayed_collection__WS1B.upper__1SGC -  1);
+          };
+          arg__05YB=read_loc_arg__with_self__GBHB(PARSER__,FALSE__,TRUE__);
+          if (((void *)arg__05YB == (void *)NULL)) {
+            result__BYIH=FALSE__;
             if ((! read_space__KSD())) {
-              result__YTIH=FALSE__;
+              result__BYIH=FALSE__;
             } else {
-              result__ZTIH='\0';
+              result__CYIH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__ZTIH=((__CHARACTER )(( 0)));
+                result__CYIH=((__CHARACTER )(( 0)));
               } else {
-                result__ZTIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__CYIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__ZTIH == '\'')) {
+              if ((result__CYIH == '\'')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__YTIH=TRUE__;
+                result__BYIH=TRUE__;
               };
             };
-            if (result__YTIH) {
-              result__P4YB=read_slot_operator__MR5B(result__FR1B);
+            if (result__BYIH) {
+              result__15YB=read_slot_operator__YS5B(result__RS1B);
             } else {
-              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__;
+              p__NYIH=current_position__AWF();
+              result__EYIH=NULL;
+              ptr__FYIH=((__POINTER )(NULL));
+              typ_id__GYIH= 0;
+              sz__HYIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+              if ((sz__HYIH ==  0)) {
+                result__EYIH=ITM_ARG__;
               } else {
-                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;
+                typ_id__GYIH=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__HYIH);
+                if ((typ_id__GYIH == (__INTEGER)(-  1))) {
+                  a__IYIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__JYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HYIH + a__IYIH) & (__UINTEGER_32)(~ a__IYIH));
+                  ptr_table__RYIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JYIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__QYIH=((__POINTER )(NULL));
+                  result__SYIH=((__POINTER *)ptr_table__RYIH)[ 0];
+                  if ((result__SYIH == (void *)NULL)) {
+                    result__SYIH=new_lab__ZPJ(new_size__JYIH);
+                    next__QYIH=(void *)((unsigned long)result__SYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JYIH)));
+                    ((__POINTER *)next__QYIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__RYIH)[ 0]=next__QYIH;
                   } else {
-                    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)));
+                    next__QYIH=((__POINTER *)result__SYIH)[ 0];
+                    if ((next__QYIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SYIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JYIH <<  1)) <=  4096)) {
+                        next__QYIH=(void *)((unsigned long)result__SYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JYIH)));
                       } else {
-                        next__HUIH=new_lab__QOJ(new_size__AUIH);
+                        next__QYIH=new_lab__ZPJ(new_size__JYIH);
                       };
-                      ((__POINTER *)next__HUIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__IUIH)[ 0]=next__HUIH;
+                      ((__POINTER *)next__QYIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__RYIH)[ 0]=next__QYIH;
                     } else {
-                      ((__POINTER *)result__JUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__JUIH=next__HUIH;
+                      ((__POINTER *)result__SYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__SYIH=next__QYIH;
                     };
                   };
-                  ptr__2TIH=result__JUIH;
+                  ptr__FYIH=result__SYIH;
                 } else {
-                  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;
+                  t__KYIH=((__UINTEGER_32 )typ_id__GYIH);
+                  a__LYIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__ZYIH=(__UINTEGER_32)((__UINTEGER_32)(sz__HYIH + a__LYIH) & (__UINTEGER_32)(~ a__LYIH));
+                  ptr_table__WYIH=((__POINTER )(&(table_type[(t__KYIH)])));
+                  lab_type__YYIH=(__UINTEGER_32)(t__KYIH |  1);
+                  next__VYIH=((__POINTER )(NULL));
+                  result__XYIH=((__POINTER *)ptr_table__WYIH)[ 0];
+                  if ((result__XYIH == (void *)NULL)) {
+                    result__XYIH=new_lab__ZPJ(lab_type__YYIH);
+                    next__VYIH=(void *)((unsigned long)result__XYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYIH)));
+                    ((__POINTER *)next__VYIH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__WYIH)[ 0]=next__VYIH;
                   } else {
-                    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)));
+                    next__VYIH=((__POINTER *)result__XYIH)[ 0];
+                    if ((next__VYIH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XYIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZYIH <<  1)) <=  4096)) {
+                        next__VYIH=(void *)((unsigned long)result__XYIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZYIH)));
                       } else {
-                        next__MUIH=new_lab__QOJ(lab_type__PUIH);
+                        next__VYIH=new_lab__ZPJ(lab_type__YYIH);
                       };
-                      ((__POINTER *)next__MUIH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NUIH)[ 0]=next__MUIH;
+                      ((__POINTER *)next__VYIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__WYIH)[ 0]=next__VYIH;
                     } else {
-                      ((__POINTER *)result__OUIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MUIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__OUIH=next__MUIH;
+                      ((__POINTER *)result__XYIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__XYIH=next__VYIH;
                     };
                   };
-                  ptr__2TIH=result__OUIH;
+                  ptr__FYIH=result__XYIH;
                 };
-                result__1TIH=((__ITM_ARG *)ptr__2TIH);
-                *(result__1TIH) = *(ITM_ARG__);
+                result__EYIH=((__ITM_ARG *)ptr__FYIH);
+                *(result__EYIH) = *(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);
+              Self__MYIH=((__ITM_ARG *)result__EYIH);
+              Self__MYIH->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ=p__NYIH;
+              Self__MYIH->name__G0HC=(&__string_58);
+              Self__MYIH->type__H0HC=type_self__LRN;
+              arg__05YB=result__EYIH;
+              add_last__F5GC(result__RS1B,result__EYIH);
+              result__15YB=read_slot_keyword__FY5B(result__RS1B);
             };
           } else {
-            add_last__R3GC(result__FR1B,arg__O4YB);
-            result__RUIH=FALSE__;
+            add_last__F5GC(result__RS1B,arg__05YB);
+            result__0YIH=FALSE__;
             if ((! read_space__KSD())) {
-              result__RUIH=FALSE__;
+              result__0YIH=FALSE__;
             } else {
-              result__SUIH='\0';
+              result__1YIH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__SUIH=((__CHARACTER )(( 0)));
+                result__1YIH=((__CHARACTER )(( 0)));
               } else {
-                result__SUIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__1YIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__SUIH == '.')) {
+              if ((result__1YIH == '.')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__RUIH=TRUE__;
+                result__0YIH=TRUE__;
               };
             };
-            if (result__RUIH) {
-              result__P4YB=read_slot_keyword__ZW5B(result__FR1B);
-              __tmp__55YB=TRUE__;
+            if (result__0YIH) {
+              result__15YB=read_slot_keyword__FY5B(result__RS1B);
+              __tmp__LBZB=TRUE__;
             } else {
-              __tmp__55YB=FALSE__;
+              __tmp__LBZB=FALSE__;
             };
-            if ((! __tmp__55YB)) {
-              result__UUIH=FALSE__;
+            if ((! __tmp__LBZB)) {
+              result__3YIH=FALSE__;
               if ((! read_space__KSD())) {
-                result__UUIH=FALSE__;
+                result__3YIH=FALSE__;
               } else {
-                result__VUIH='\0';
+                result__4YIH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__VUIH=((__CHARACTER )(( 0)));
+                  result__4YIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__VUIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__4YIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__VUIH == '\'')) {
+                if ((result__4YIH == '\'')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__UUIH=TRUE__;
+                  result__3YIH=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__;
+              if (result__3YIH) {
+                result__15YB=read_slot_operator__YS5B(result__RS1B);
+              };
+            };
+          };
+          if (((void *)result__15YB != (void *)NULL)) {
+            result__TS4B=create_with_capacity__SJ5B((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__RS1B)->parent_arrayed_collection__AAZB.upper__J5GC +  1));
+            Self__WLHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__TS4B);
+            new_capacity__ZLHC= 0;
+            other_upper__YLHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__RS1B)->parent_arrayed_collection__AAZB.upper__J5GC;
+            if ((other_upper__YLHC >=  0)) {
+              new_capacity__ZLHC=(__INTEGER)(other_upper__YLHC +  1);
+              if ((Self__WLHC->parent_arrayed_collection__AAZB.capacity__L5GC < new_capacity__ZLHC)) {
+                Self__WLHC->parent_arrayed_collection__AAZB.storage__HAHC=create__HRBD(new_capacity__ZLHC);
+                Self__WLHC->parent_arrayed_collection__AAZB.capacity__L5GC=new_capacity__ZLHC;
+              };
+              __tmp__MMHC=Self__WLHC->parent_arrayed_collection__AAZB.storage__HAHC;
+              __tmp__OMHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__RS1B)->parent_arrayed_collection__AAZB.storage__HAHC;
+              Self__YFSD=((void **)__tmp__MMHC);
+              Self__T2WD=other_upper__YLHC;
+              while ((Self__T2WD >=  0)) {
+                Self__YFSD[Self__T2WD]=((void **)__tmp__OMHC)[Self__T2WD];
+                Self__T2WD=(__INTEGER)(Self__T2WD -  1);
+              };
+            };
+            Self__WLHC->parent_arrayed_collection__AAZB.upper__J5GC=other_upper__YLHC;
+            ((__FAST_ARRAYoITM_ARGUMENTo *)result__RS1B)->parent_arrayed_collection__AAZB.upper__J5GC=(__INTEGER)(-  1);
+            Self__CUHC=((__FAST_ARRAYoFAST_ARRAYoITM_ARGUMENToo *)free_list__XS1B);
+            new_capacity__EUHC= 0;
+            if (((__INTEGER)(Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC +  1) <= (__INTEGER)(Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC -  1))) {
+              Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC=(__INTEGER)(Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC +  1);
+              __tmp__SUHC=TRUE__;
             } else {
-              __tmp__4SHC=FALSE__;
+              __tmp__SUHC=FALSE__;
             };
-            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;
+            if ((! __tmp__SUHC)) {
+              if ((Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC ==  0)) {
+                Self__CUHC->parent_arrayed_collection__WS1B.storage__OKHC=create__VMBD( 2);
+                Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC= 2;
+                Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC= 0;
               } else {
-                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);
+                new_capacity__EUHC=(__INTEGER)(Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC <<  1);
+                __tmp__HVHC=Self__CUHC->parent_arrayed_collection__WS1B.storage__OKHC;
+                __tmp__IVHC=Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC;
+                new__CHTD=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__HVHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__IVHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EUHC * ((__INTEGER )(sizeof(void *)))))));
+                __tmp__WHTD=(__INTEGER)(new_capacity__EUHC -  1);
+                Self__IBYE=__tmp__IVHC;
+                while ((Self__IBYE <= __tmp__WHTD)) {
+                  new__CHTD[Self__IBYE]=NULL;
+                  Self__IBYE=(__INTEGER)(Self__IBYE +  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);
+                Self__CUHC->parent_arrayed_collection__WS1B.storage__OKHC=new__CHTD;
+                Self__CUHC->parent_arrayed_collection__WS1B.capacity__DKHC=new_capacity__EUHC;
+                Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC=(__INTEGER)(Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC +  1);
               };
             };
-            ((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);
+            ((void **)Self__CUHC->parent_arrayed_collection__WS1B.storage__OKHC)[Self__CUHC->parent_arrayed_collection__WS1B.upper__1SGC]=result__RS1B;
+            if (((struct ___OBJ *)result__15YB)->__id==__ITM_SLOT__) {
+              set_argument_list__ACHC(result__15YB,result__TS4B);
             } else {
-              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__;
+              Self__TDHC=((__ITM_SLOT_OPERATOR *)result__15YB);
+              if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)result__TS4B)->parent_arrayed_collection__AAZB.upper__J5GC +  1) >  1)) {
+                __tmp__BEHC=TRUE__;
               } else {
-                __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;
+                __tmp__2DHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)result__TS4B)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+                if (((struct ___OBJ *)__tmp__2DHC)->__id==__ITM_ARG__) {
+                  __tmp__3DHC= 1;
                 } else {
-                  __tmp__JCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__ICHC)->name__LYPF)->parent_arrayed_collection__L2I.upper__R4OD +  1);
+                  __tmp__3DHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__2DHC)->name__W2PF)->parent_arrayed_collection__U3I.upper__H4OD +  1);
                 };
-                __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;
+                __tmp__BEHC=(__tmp__3DHC >  1);
+              };
+              if (__tmp__BEHC) {
+                if (((void *)((__SECTION_ *)Self__TDHC->parent_itm_slot__BT5B.id_section__F2C)->name__NYDC == (void *)(&__string_25))) {
+                  Self__2TFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__TS4B);
+                  __tmp__OEHC=((void **)Self__2TFH->parent_arrayed_collection__AAZB.storage__HAHC)[Self__2TFH->parent_arrayed_collection__AAZB.upper__J5GC];
+                  if (((struct ___OBJ *)__tmp__OEHC)->__id==__ITM_ARG__) {
+                    __tmp__PEHC=((__ITM_ARG *)__tmp__OEHC)->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ;
                   } else {
-                    __tmp__1CHC=((__ITM_ARGS *)__tmp__0CHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
+                    __tmp__PEHC=((__ITM_ARGS *)__tmp__OEHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
                   };
-                  put_error__text__YKG( 1,(&__string_234));
-                  put_position__CMG(__tmp__1CHC);
-                  put_string__CZF(msg_err__3KG);
-                  if ((type_error__2KG !=  2)) {
+                  put_error__text__BMG( 1,(&__string_234));
+                  put_position__LNG(__tmp__PEHC);
+                  put_string__L0F(msg_err__GMG);
+                  if ((type_error__FMG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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;
+                Self__T23G=((__SECTION_ *)Self__TDHC->parent_itm_slot__BT5B.id_section__F2C);
+                if ((((void *)Self__T23G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__T23G->name__NYDC == (void *)(&__string_24)))) {
+                  Self__FUFH=((__FAST_ARRAYoITM_ARGUMENTo *)result__TS4B);
+                  __tmp__1EHC=((void **)Self__FUFH->parent_arrayed_collection__AAZB.storage__HAHC)[Self__FUFH->parent_arrayed_collection__AAZB.upper__J5GC];
+                  if (((struct ___OBJ *)__tmp__1EHC)->__id==__ITM_ARG__) {
+                    __tmp__2EHC=((__ITM_ARG *)__tmp__1EHC)->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ;
                   } else {
-                    __tmp__IDHC=((__ITM_ARGS *)__tmp__HDHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
+                    __tmp__2EHC=((__ITM_ARGS *)__tmp__1EHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
                   };
-                  put_error__text__YKG( 1,(&__string_235));
-                  put_position__CMG(__tmp__IDHC);
-                  put_string__CZF(msg_err__3KG);
-                  if ((type_error__2KG !=  2)) {
+                  put_error__text__BMG( 1,(&__string_235));
+                  put_position__LNG(__tmp__2EHC);
+                  put_string__L0F(msg_err__GMG);
+                  if ((type_error__FMG !=  2)) {
                     exit(( 1));
                   };
                 };
               };
-              Self__5BHC->parent_itm_slot__VR5B.argument_list__3BHC=result__HR4B;
+              Self__TDHC->parent_itm_slot__BT5B.argument_list__RDHC=result__TS4B;
             };
           };
-          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)) {
+          last_slot__0UOB=result__15YB;
+          if (((void *)result__15YB == (void *)NULL)) {
+            pos__BDWG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_236));
+            put_position__LNG(pos__BDWG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__QTOB)->parent_named__15.style__25T=style__ETOB;
+          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__0UOB)->parent_named__15.style__FBU=style__OUOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.style__25T=style__ETOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.style__FBU=style__OUOB;
           };
-          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];
+          if (((read_symbol__GVJ((&__string_12)) || read_symbol__GVJ((&__string_13))) || read_symbol__GVJ((&__string_14)))) {
+            affect__PUOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[ 0];
           } else {
-            affect__FTOB=' ';
+            affect__PUOB=' ';
           };
-          if ((affect__FTOB == ' ')) {
-            result__ZUIH=FALSE__;
+          if ((affect__PUOB == ' ')) {
+            result__CZIH=FALSE__;
             if ((! read_space__KSD())) {
-              result__ZUIH=FALSE__;
+              result__CZIH=FALSE__;
             } else {
-              result__0UIH='\0';
+              result__DZIH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__0UIH=((__CHARACTER )(( 0)));
+                result__DZIH=((__CHARACTER )(( 0)));
               } else {
-                result__0UIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__DZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__0UIH == ':')) {
+              if ((result__DZIH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__ZUIH=TRUE__;
+                result__CZIH=TRUE__;
               };
             };
-            __tmp__TUOB=result__ZUIH;
+            __tmp__3VOB=result__CZIH;
           } else {
-            __tmp__TUOB=FALSE__;
+            __tmp__3VOB=FALSE__;
           };
-          if (__tmp__TUOB) {
-            result__2UIH=FALSE__;
+          if (__tmp__3VOB) {
+            result__FZIH=FALSE__;
             if ((! read_space__KSD())) {
-              result__2UIH=FALSE__;
+              result__FZIH=FALSE__;
             } else {
-              result__3UIH='\0';
+              result__GZIH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__3UIH=((__CHARACTER )(( 0)));
+                result__GZIH=((__CHARACTER )(( 0)));
               } else {
-                result__3UIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__GZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__3UIH == '(')) {
+              if ((result__GZIH == '(')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__2UIH=TRUE__;
+                result__FZIH=TRUE__;
               };
             };
-            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)) {
+            if (result__FZIH) {
+              lt__NUOB=read_type_list__MJO(PARSER__,FALSE__);
+              if (((void *)lt__NUOB == (void *)NULL)) {
+                pos__DDWG=current_position__AWF();
+                put_error__text__BMG( 0,(&__string_237));
+                put_position__LNG(pos__DDWG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              result__5UIH=FALSE__;
+              result__IZIH=FALSE__;
               if ((! read_space__KSD())) {
-                result__5UIH=FALSE__;
+                result__IZIH=FALSE__;
               } else {
-                result__AVIH='\0';
+                result__JZIH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__AVIH=((__CHARACTER )(( 0)));
+                  result__JZIH=((__CHARACTER )(( 0)));
                 } else {
-                  result__AVIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__JZIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__AVIH == ')')) {
+                if ((result__JZIH == ')')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__5UIH=TRUE__;
+                  result__IZIH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__IZIH)) {
+                pos__FDWG=current_position__AWF();
+                put_error__text__BMG( 2,(&__string_238));
+                put_position__LNG(pos__FDWG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              t__CTOB=get__3EP(lt__DTOB);
+              t__MUOB=get__GGP(lt__NUOB);
             } else {
-              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)) {
+              t__MUOB=read_type__K5L(PARSER__,FALSE__);
+              if (((void *)t__MUOB == (void *)NULL)) {
+                pos__HDWG=current_position__AWF();
+                put_error__text__BMG( 0,(&__string_237));
+                put_position__LNG(pos__HDWG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            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];
+            if (((read_symbol__GVJ((&__string_12)) || read_symbol__GVJ((&__string_13))) || read_symbol__GVJ((&__string_14)))) {
+              affect__PUOB=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[ 0];
             };
           } else {
-            t__CTOB=type_void__MTF;
+            t__MUOB=type_void__VUF;
           };
-          __tmp__XWOB=last_slot__QTOB;
-          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
-            set_result_type__D1FC(last_slot__QTOB,t__CTOB);
+          __tmp__BYOB=last_slot__0UOB;
+          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            set_result_type__X2FC(last_slot__0UOB,t__MUOB);
           } else {
-            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;
+            Self__D4FC=((__ITM_SLOT_OPERATOR *)__tmp__BYOB);
+            tm__F4FC=NULL;
+            Self__U23G=((__SECTION_ *)Self__D4FC->parent_itm_slot__BT5B.id_section__F2C);
+            if ((((void *)Self__U23G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__U23G->name__NYDC == (void *)(&__string_24)))) {
+              if (t__MUOB==NULL) {
+                __tmp__O4FC=NULL;
               } else {
-                switch (((struct ___OBJ *)t__CTOB)->__id) {
+                switch (((struct ___OBJ *)t__MUOB)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__02FC=((void *)t__CTOB);
+                  __tmp__O4FC=((void *)t__MUOB);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__02FC=((void *)t__CTOB);
+                  __tmp__O4FC=((void *)t__MUOB);
                 } break;
                 case __ITM_TYPE_MULTI__: {
-                  __tmp__02FC=NULL;
+                  __tmp__O4FC=NULL;
                 } break;
                 case __ITM_TYPE_BLOCK__: {
-                  __tmp__02FC=((void *)t__CTOB);
+                  __tmp__O4FC=((void *)t__MUOB);
                 } break;
                 case __ITM_TYPE_GENERIC__: {
-                  __tmp__02FC=((void *)t__CTOB);
+                  __tmp__O4FC=((void *)t__MUOB);
                 } break;
                 case __ITM_TYPE_STYLE__: {
-                  __tmp__02FC=((void *)t__CTOB);
+                  __tmp__O4FC=((void *)t__MUOB);
                 } break;
                 }
               };
-              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)) {
+              tm__F4FC=__tmp__O4FC;
+              if (((((void *)__tmp__O4FC == (void *)NULL) || ((void *)__tmp__O4FC == (void *)type_self__LRN)) || ((void *)__tmp__O4FC == (void *)type_void__VUF))) {
+                pos__40ID=Self__D4FC->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
+                put_error__text__BMG( 1,(&__string_239));
+                put_position__LNG(pos__40ID);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
             };
-            Self__P2FC->parent_itm_slot__VR5B.result_type__N2FC=t__CTOB;
+            Self__D4FC->parent_itm_slot__BT5B.result_type__B4FC=t__MUOB;
           };
-          if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
-            ((__ITM_SLOT *)last_slot__QTOB)->affect__23FC=affect__FTOB;
+          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            ((__ITM_SLOT *)last_slot__0UOB)->affect__Q5FC=affect__PUOB;
           } else {
-            ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.affect__23FC=affect__FTOB;
+            ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.affect__Q5FC=affect__PUOB;
           };
-          if ((affect__FTOB != ' ')) {
+          if ((affect__PUOB != ' ')) {
             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;
+              if (((void *)last_comment_slot__S4D != (void *)NULL)) {
+                __tmp__WYOB=last_comment_slot__S4D;
+                if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__0UOB)->comment__1ZOB=__tmp__WYOB;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB=__tmp__MXOB;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB=__tmp__WYOB;
                 };
               };
               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;
+                if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+                  ((__ITM_SLOT *)last_slot__0UOB)->comment_chapter__T0HC=last_comment_extern__JYC;
                 } else {
-                  ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment_chapter__5YHC=last_comment_extern__JYC;
+                  ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment_chapter__T0HC=last_comment_extern__JYC;
                 };
               };
-              skip_comment__X2D=TRUE__;
+              skip_comment__A4D=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__) {
+            old_pos__QUOB=position__CCC;
+            old_derive__RUOB=short_derive__PCC;
+            if (((void *)read_contract__4RF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
               };
             };
-            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)) {
+            expr__FH3B=read_expr__L3I(PARSER__);
+            if (((void *)expr__FH3B == (void *)NULL)) {
+              pos__PDWG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_240));
+              put_position__LNG(pos__PDWG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            __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);
+            __tmp__SH3B=last_slot__0UOB;
+            __tmp__TH3B=object__ZBC;
+            if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+              set_value__type__EFHC(last_slot__0UOB,expr__FH3B,object__ZBC);
             } else {
-              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) {
+              Self__4FHC=((__ITM_SLOT_OPERATOR *)__tmp__SH3B);
+              if ((Self__4FHC->parent_itm_slot__BT5B.affect__Q5FC != '<')) {
+                copy__35R(string_tmp__VH,(&__string_241));
+                append__FLS(string_tmp__VH,Self__4FHC->parent_itm_slot__BT5B.parent_named__15.name__LI);
+                n__LFBD=get__YWB(string_tmp__VH);
+                sec__MFBD=get_name__YROB((&__string_27));
+                larg__NFBD=create_with_capacity__SJ5B( 1);
+                switch (((struct ___OBJ *)expr__FH3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__BEBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__BEBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__BEBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__BEBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__BEBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__BEBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__BEBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__BEBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__BEBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__BEBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__BEBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__BEBD=position__054B(expr__ZF3B);
+                  __tmp__YFBD=position__GB5B(expr__FH3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__BEBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__BEBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__BEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__BEBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__BEBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__BEBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__BEBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__BEBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__BEBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__YFBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__BEBD=position__2GHC(expr__ZF3B);
+                  __tmp__YFBD=position__QIHC(expr__FH3B);
                 } break;
                 };
-                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__;
+                result__LZIH=NULL;
+                ptr__MZIH=((__POINTER )(NULL));
+                typ_id__NZIH= 0;
+                sz__OZIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+                if ((sz__OZIH ==  0)) {
+                  result__LZIH=ITM_ARG__;
                 } else {
-                  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;
+                  typ_id__NZIH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OZIH);
+                  if ((typ_id__NZIH == (__INTEGER)(-  1))) {
+                    a__PZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__QZIH=(__UINTEGER_32)((__UINTEGER_32)(sz__OZIH + a__PZIH) & (__UINTEGER_32)(~ a__PZIH));
+                    ptr_table__YZIH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QZIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__XZIH=((__POINTER )(NULL));
+                    result__ZZIH=((__POINTER *)ptr_table__YZIH)[ 0];
+                    if ((result__ZZIH == (void *)NULL)) {
+                      result__ZZIH=new_lab__ZPJ(new_size__QZIH);
+                      next__XZIH=(void *)((unsigned long)result__ZZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZIH)));
+                      ((__POINTER *)next__XZIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__YZIH)[ 0]=next__XZIH;
                     } else {
-                      next__OVIH=((__POINTER *)result__QVIH)[ 0];
-                      if ((next__OVIH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QVIH - (unsigned long)begin_memory__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)));
+                      next__XZIH=((__POINTER *)result__ZZIH)[ 0];
+                      if ((next__XZIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZZIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QZIH <<  1)) <=  4096)) {
+                          next__XZIH=(void *)((unsigned long)result__ZZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZIH)));
                         } else {
-                          next__OVIH=new_lab__QOJ(new_size__HVIH);
+                          next__XZIH=new_lab__ZPJ(new_size__QZIH);
                         };
-                        ((__POINTER *)next__OVIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__PVIH)[ 0]=next__OVIH;
+                        ((__POINTER *)next__XZIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__YZIH)[ 0]=next__XZIH;
                       } else {
-                        ((__POINTER *)result__QVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__QVIH=next__OVIH;
+                        ((__POINTER *)result__ZZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__ZZIH=next__XZIH;
                       };
                     };
-                    ptr__DVIH=result__QVIH;
+                    ptr__MZIH=result__ZZIH;
                   } else {
-                    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;
+                    t__RZIH=((__UINTEGER_32 )typ_id__NZIH);
+                    a__SZIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__A0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__OZIH + a__SZIH) & (__UINTEGER_32)(~ a__SZIH));
+                    ptr_table__3ZIH=((__POINTER )(&(table_type[(t__RZIH)])));
+                    lab_type__5ZIH=(__UINTEGER_32)(t__RZIH |  1);
+                    next__2ZIH=((__POINTER )(NULL));
+                    result__4ZIH=((__POINTER *)ptr_table__3ZIH)[ 0];
+                    if ((result__4ZIH == (void *)NULL)) {
+                      result__4ZIH=new_lab__ZPJ(lab_type__5ZIH);
+                      next__2ZIH=(void *)((unsigned long)result__4ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
+                      ((__POINTER *)next__2ZIH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3ZIH)[ 0]=next__2ZIH;
                     } else {
-                      next__TVIH=((__POINTER *)result__VVIH)[ 0];
-                      if ((next__TVIH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VVIH - (unsigned long)begin_memory__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)));
+                      next__2ZIH=((__POINTER *)result__4ZIH)[ 0];
+                      if ((next__2ZIH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4ZIH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__A0IH <<  1)) <=  4096)) {
+                          next__2ZIH=(void *)((unsigned long)result__4ZIH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A0IH)));
                         } else {
-                          next__TVIH=new_lab__QOJ(lab_type__WVIH);
+                          next__2ZIH=new_lab__ZPJ(lab_type__5ZIH);
                         };
-                        ((__POINTER *)next__TVIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__UVIH)[ 0]=next__TVIH;
+                        ((__POINTER *)next__2ZIH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3ZIH)[ 0]=next__2ZIH;
                       } else {
-                        ((__POINTER *)result__VVIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TVIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__VVIH=next__TVIH;
+                        ((__POINTER *)result__4ZIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ZIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__4ZIH=next__2ZIH;
                       };
                     };
-                    ptr__DVIH=result__VVIH;
+                    ptr__MZIH=result__4ZIH;
                   };
-                  result__CVIH=((__ITM_ARG *)ptr__DVIH);
-                  *(result__CVIH) = *(ITM_ARG__);
+                  result__LZIH=((__ITM_ARG *)ptr__MZIH);
+                  *(result__LZIH) = *(ITM_ARG__);
                 };
-                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) {
+                Self__TZIH=((__ITM_ARG *)result__LZIH);
+                Self__TZIH->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ=__tmp__YFBD;
+                Self__TZIH->name__G0HC=(&__string_58);
+                Self__TZIH->type__H0HC=type_self__LRN;
+                add_last__F5GC(larg__NFBD,result__LZIH);
+                switch (((struct ___OBJ *)expr__FH3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__JEBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__JEBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__JEBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__JEBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__JEBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__JEBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__JEBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__JEBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__JEBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__JEBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__JEBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__JEBD=position__054B(expr__ZF3B);
+                  __tmp__AGBD=position__GB5B(expr__FH3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__JEBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__JEBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__JEBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__JEBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__JEBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__JEBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__JEBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__JEBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__JEBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__AGBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__JEBD=position__2GHC(expr__ZF3B);
+                  __tmp__AGBD=position__QIHC(expr__FH3B);
                 } break;
                 };
-                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__;
+                result__B0IH=NULL;
+                ptr__C0IH=((__POINTER )(NULL));
+                typ_id__D0IH= 0;
+                sz__E0IH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+                if ((sz__E0IH ==  0)) {
+                  result__B0IH=ITM_SLOT__;
                 } else {
-                  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;
+                  typ_id__D0IH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E0IH);
+                  if ((typ_id__D0IH == (__INTEGER)(-  1))) {
+                    a__F0IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__G0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0IH + a__F0IH) & (__UINTEGER_32)(~ a__F0IH));
+                    ptr_table__O0IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__G0IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__N0IH=((__POINTER )(NULL));
+                    result__P0IH=((__POINTER *)ptr_table__O0IH)[ 0];
+                    if ((result__P0IH == (void *)NULL)) {
+                      result__P0IH=new_lab__ZPJ(new_size__G0IH);
+                      next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0IH)));
+                      ((__POINTER *)next__N0IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
                     } else {
-                      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)));
+                      next__N0IH=((__POINTER *)result__P0IH)[ 0];
+                      if ((next__N0IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P0IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__G0IH <<  1)) <=  4096)) {
+                          next__N0IH=(void *)((unsigned long)result__P0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G0IH)));
                         } else {
-                          next__EWIH=new_lab__QOJ(new_size__3VIH);
+                          next__N0IH=new_lab__ZPJ(new_size__G0IH);
                         };
-                        ((__POINTER *)next__EWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__FWIH)[ 0]=next__EWIH;
+                        ((__POINTER *)next__N0IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__O0IH)[ 0]=next__N0IH;
                       } else {
-                        ((__POINTER *)result__GWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__GWIH=next__EWIH;
+                        ((__POINTER *)result__P0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__P0IH=next__N0IH;
                       };
                     };
-                    ptr__ZVIH=result__GWIH;
+                    ptr__C0IH=result__P0IH;
                   } else {
-                    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;
+                    t__H0IH=((__UINTEGER_32 )typ_id__D0IH);
+                    a__I0IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__W0IH=(__UINTEGER_32)((__UINTEGER_32)(sz__E0IH + a__I0IH) & (__UINTEGER_32)(~ a__I0IH));
+                    ptr_table__T0IH=((__POINTER )(&(table_type[(t__H0IH)])));
+                    lab_type__V0IH=(__UINTEGER_32)(t__H0IH |  1);
+                    next__S0IH=((__POINTER )(NULL));
+                    result__U0IH=((__POINTER *)ptr_table__T0IH)[ 0];
+                    if ((result__U0IH == (void *)NULL)) {
+                      result__U0IH=new_lab__ZPJ(lab_type__V0IH);
+                      next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0IH)));
+                      ((__POINTER *)next__S0IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
                     } else {
-                      next__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)));
+                      next__S0IH=((__POINTER *)result__U0IH)[ 0];
+                      if ((next__S0IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U0IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__W0IH <<  1)) <=  4096)) {
+                          next__S0IH=(void *)((unsigned long)result__U0IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W0IH)));
                         } else {
-                          next__JWIH=new_lab__QOJ(lab_type__MWIH);
+                          next__S0IH=new_lab__ZPJ(lab_type__V0IH);
                         };
-                        ((__POINTER *)next__JWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__KWIH)[ 0]=next__JWIH;
+                        ((__POINTER *)next__S0IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__T0IH)[ 0]=next__S0IH;
                       } else {
-                        ((__POINTER *)result__LWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__LWIH=next__JWIH;
+                        ((__POINTER *)result__U0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__U0IH=next__S0IH;
                       };
                     };
-                    ptr__ZVIH=result__LWIH;
+                    ptr__C0IH=result__U0IH;
                   };
-                  result__YVIH=((__ITM_SLOT *)ptr__ZVIH);
-                  *(result__YVIH) = *(ITM_SLOT__);
+                  result__B0IH=((__ITM_SLOT *)ptr__C0IH);
+                  *(result__B0IH) = *(ITM_SLOT__);
                 };
-                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) {
+                Self__J0IH=((__ITM_SLOT *)result__B0IH);
+                Self__J0IH->parent_named__15.name__LI=n__LFBD;
+                Self__J0IH->parent_named__15.parent_itm_object__4.position__0BJ=__tmp__AGBD;
+                Self__J0IH->id_section__F2C=sec__MFBD;
+                ((__ITM_SLOT *)result__B0IH)->affect__Q5FC='<';
+                set_value__type__EFHC(result__B0IH,expr__FH3B,__tmp__TH3B);
+                set_argument_list__ACHC(result__B0IH,larg__NFBD);
+                set_result_type__X2FC(result__B0IH,Self__4FHC->parent_itm_slot__BT5B.result_type__B4FC);
+                fast_put__to__MNGC(((__PROTOTYPE *)__tmp__TH3B)->slot_list__ASS,result__B0IH,result__B0IH->parent_named__15.name__LI);
+                switch (((struct ___OBJ *)expr__FH3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__3EBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__3EBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__3EBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__3EBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__3EBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__3EBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__3EBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__3EBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__3EBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__3EBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__3EBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__3EBD=position__054B(expr__ZF3B);
+                  __tmp__UGBD=position__GB5B(expr__FH3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__3EBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__3EBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__3EBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__3EBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__3EBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__3EBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__3EBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__3EBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__3EBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__UGBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__3EBD=position__2GHC(expr__ZF3B);
+                  __tmp__UGBD=position__QIHC(expr__FH3B);
                 } break;
                 };
-                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__;
+                get__QRI(((__PROTOTYPE *)__tmp__TH3B)->parent_named__5.name__LI);
+                result__X0IH=NULL;
+                ptr__Y0IH=((__POINTER )(NULL));
+                typ_id__Z0IH= 0;
+                sz__00IH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+                if ((sz__00IH ==  0)) {
+                  result__X0IH=ITM_PROTOTYPE__;
                 } else {
-                  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;
+                  typ_id__Z0IH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__00IH);
+                  if ((typ_id__Z0IH == (__INTEGER)(-  1))) {
+                    a__10IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__20IH=(__UINTEGER_32)((__UINTEGER_32)(sz__00IH + a__10IH) & (__UINTEGER_32)(~ a__10IH));
+                    ptr_table__B1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__20IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__A1IH=((__POINTER )(NULL));
+                    result__C1IH=((__POINTER *)ptr_table__B1IH)[ 0];
+                    if ((result__C1IH == (void *)NULL)) {
+                      result__C1IH=new_lab__ZPJ(new_size__20IH);
+                      next__A1IH=(void *)((unsigned long)result__C1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20IH)));
+                      ((__POINTER *)next__A1IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__B1IH)[ 0]=next__A1IH;
                     } 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__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)));
+                      next__A1IH=((__POINTER *)result__C1IH)[ 0];
+                      if ((next__A1IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__C1IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__20IH <<  1)) <=  4096)) {
+                          next__A1IH=(void *)((unsigned long)result__C1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__20IH)));
                         } else {
-                          next__XWIH=new_lab__QOJ(new_size__TWIH);
+                          next__A1IH=new_lab__ZPJ(new_size__20IH);
                         };
-                        ((__POINTER *)next__XWIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__YWIH)[ 0]=next__XWIH;
+                        ((__POINTER *)next__A1IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__B1IH)[ 0]=next__A1IH;
                       } else {
-                        ((__POINTER *)result__ZWIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XWIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__ZWIH=next__XWIH;
+                        ((__POINTER *)result__C1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__C1IH=next__A1IH;
                       };
                     };
-                    ptr__PWIH=result__ZWIH;
+                    ptr__Y0IH=result__C1IH;
                   } else {
-                    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;
+                    t__30IH=((__UINTEGER_32 )typ_id__Z0IH);
+                    a__40IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__J1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__00IH + a__40IH) & (__UINTEGER_32)(~ a__40IH));
+                    ptr_table__G1IH=((__POINTER )(&(table_type[(t__30IH)])));
+                    lab_type__I1IH=(__UINTEGER_32)(t__30IH |  1);
+                    next__F1IH=((__POINTER )(NULL));
+                    result__H1IH=((__POINTER *)ptr_table__G1IH)[ 0];
+                    if ((result__H1IH == (void *)NULL)) {
+                      result__H1IH=new_lab__ZPJ(lab_type__I1IH);
+                      next__F1IH=(void *)((unsigned long)result__H1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1IH)));
+                      ((__POINTER *)next__F1IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__G1IH)[ 0]=next__F1IH;
                     } else {
-                      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)));
+                      next__F1IH=((__POINTER *)result__H1IH)[ 0];
+                      if ((next__F1IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__H1IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__J1IH <<  1)) <=  4096)) {
+                          next__F1IH=(void *)((unsigned long)result__H1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1IH)));
                         } else {
-                          next__2WIH=new_lab__QOJ(lab_type__5WIH);
+                          next__F1IH=new_lab__ZPJ(lab_type__I1IH);
                         };
-                        ((__POINTER *)next__2WIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__3WIH)[ 0]=next__2WIH;
+                        ((__POINTER *)next__F1IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__G1IH)[ 0]=next__F1IH;
                       } else {
-                        ((__POINTER *)result__4WIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2WIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__4WIH=next__2WIH;
+                        ((__POINTER *)result__H1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__H1IH=next__F1IH;
                       };
                     };
-                    ptr__PWIH=result__4WIH;
+                    ptr__Y0IH=result__H1IH;
                   };
-                  result__OWIH=((__ITM_PROTOTYPE *)ptr__PWIH);
-                  *(result__OWIH) = *(ITM_PROTOTYPE__);
+                  result__X0IH=((__ITM_PROTOTYPE *)ptr__Y0IH);
+                  *(result__X0IH) = *(ITM_PROTOTYPE__);
                 };
-                ((__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) {
+                ((__ITM_PROTOTYPE *)result__X0IH)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__UGBD;
+                switch (((struct ___OBJ *)expr__FH3B)->__id) {
                 case __ITM_LIST__: {
-                  __tmp__GFBD=((__ITM_LIST *)expr__ZF3B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_LIST *)expr__FH3B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LDOTS__: {
-                  __tmp__GFBD=((__ITM_LDOTS *)expr__ZF3B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_LDOTS *)expr__FH3B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_PROTOTYPE__: {
-                  __tmp__GFBD=((__ITM_PROTOTYPE *)expr__ZF3B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_PROTOTYPE *)expr__FH3B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_LIST_IDF__: {
-                  __tmp__GFBD=((__ITM_LIST_IDF *)expr__ZF3B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_LIST_IDF *)expr__FH3B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_VALUE__: {
-                  __tmp__GFBD=((__ITM_WRITE_VALUE *)expr__ZF3B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_WRITE_VALUE *)expr__FH3B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CAST__: {
-                  __tmp__GFBD=((__ITM_WRITE_CAST *)expr__ZF3B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_WRITE_CAST *)expr__FH3B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ__: {
-                  __tmp__GFBD=((__ITM_READ *)expr__ZF3B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_READ *)expr__FH3B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_WRITE_CODE__: {
-                  __tmp__GFBD=((__ITM_WRITE_CODE *)expr__ZF3B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_WRITE_CODE *)expr__FH3B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_OPERATOR__: {
-                  __tmp__GFBD=((__ITM_OPERATOR *)expr__ZF3B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_OPERATOR *)expr__FH3B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG1__: {
-                  __tmp__GFBD=((__ITM_READ_ARG1 *)expr__ZF3B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_READ_ARG1 *)expr__FH3B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARG2__: {
-                  __tmp__GFBD=((__ITM_READ_ARG2 *)expr__ZF3B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_READ_ARG2 *)expr__FH3B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXPRESSION__: {
-                  __tmp__GFBD=position__054B(expr__ZF3B);
+                  __tmp__3GBD=position__GB5B(expr__FH3B);
                 } break;
                 case __ITM_OLD__: {
-                  __tmp__GFBD=((__ITM_OLD *)expr__ZF3B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_OLD *)expr__FH3B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL_TYPE__: {
-                  __tmp__GFBD=((__ITM_EXTERNAL_TYPE *)expr__ZF3B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_EXTERNAL_TYPE *)expr__FH3B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_BLOCK__: {
-                  __tmp__GFBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__ZF3B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_LIST *)((__ITM_BLOCK *)expr__FH3B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_EXTERNAL__: {
-                  __tmp__GFBD=((__ITM_EXTERNAL *)expr__ZF3B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_EXTERNAL *)expr__FH3B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_READ_ARGS__: {
-                  __tmp__GFBD=((__ITM_READ_ARGS *)expr__ZF3B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_READ_ARGS *)expr__FH3B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_REAL__: {
-                  __tmp__GFBD=((__ITM_REAL *)expr__ZF3B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_REAL *)expr__FH3B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_NUMBER__: {
-                  __tmp__GFBD=((__ITM_NUMBER *)expr__ZF3B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_NUMBER *)expr__FH3B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_CHARACTER__: {
-                  __tmp__GFBD=((__ITM_CHARACTER *)expr__ZF3B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_CHARACTER *)expr__FH3B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_STRING__: {
-                  __tmp__GFBD=((__ITM_STRING *)expr__ZF3B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+                  __tmp__3GBD=((__ITM_STRING *)expr__FH3B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
                 } break;
                 case __ITM_RESULT__: {
-                  __tmp__GFBD=position__2GHC(expr__ZF3B);
+                  __tmp__3GBD=position__QIHC(expr__FH3B);
                 } break;
                 };
-                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__;
+                result__K1IH=NULL;
+                ptr__L1IH=((__POINTER )(NULL));
+                typ_id__M1IH= 0;
+                sz__N1IH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+                if ((sz__N1IH ==  0)) {
+                  result__K1IH=ITM_READ_ARG1__;
                 } else {
-                  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;
+                  typ_id__M1IH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__N1IH);
+                  if ((typ_id__M1IH == (__INTEGER)(-  1))) {
+                    a__O1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__P1IH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1IH + a__O1IH) & (__UINTEGER_32)(~ a__O1IH));
+                    ptr_table__U1IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__P1IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__T1IH=((__POINTER )(NULL));
+                    result__V1IH=((__POINTER *)ptr_table__U1IH)[ 0];
+                    if ((result__V1IH == (void *)NULL)) {
+                      result__V1IH=new_lab__ZPJ(new_size__P1IH);
+                      next__T1IH=(void *)((unsigned long)result__V1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1IH)));
+                      ((__POINTER *)next__T1IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__U1IH)[ 0]=next__T1IH;
                     } else {
-                      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)));
+                      next__T1IH=((__POINTER *)result__V1IH)[ 0];
+                      if ((next__T1IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V1IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P1IH <<  1)) <=  4096)) {
+                          next__T1IH=(void *)((unsigned long)result__V1IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1IH)));
                         } else {
-                          next__KXIH=new_lab__QOJ(new_size__GXIH);
+                          next__T1IH=new_lab__ZPJ(new_size__P1IH);
                         };
-                        ((__POINTER *)next__KXIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__LXIH)[ 0]=next__KXIH;
+                        ((__POINTER *)next__T1IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__U1IH)[ 0]=next__T1IH;
                       } else {
-                        ((__POINTER *)result__MXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__MXIH=next__KXIH;
+                        ((__POINTER *)result__V1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__V1IH=next__T1IH;
                       };
                     };
-                    ptr__CXIH=result__MXIH;
+                    ptr__L1IH=result__V1IH;
                   } else {
-                    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;
+                    t__Q1IH=((__UINTEGER_32 )typ_id__M1IH);
+                    a__R1IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__21IH=(__UINTEGER_32)((__UINTEGER_32)(sz__N1IH + a__R1IH) & (__UINTEGER_32)(~ a__R1IH));
+                    ptr_table__Z1IH=((__POINTER )(&(table_type[(t__Q1IH)])));
+                    lab_type__11IH=(__UINTEGER_32)(t__Q1IH |  1);
+                    next__Y1IH=((__POINTER )(NULL));
+                    result__01IH=((__POINTER *)ptr_table__Z1IH)[ 0];
+                    if ((result__01IH == (void *)NULL)) {
+                      result__01IH=new_lab__ZPJ(lab_type__11IH);
+                      next__Y1IH=(void *)((unsigned long)result__01IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21IH)));
+                      ((__POINTER *)next__Y1IH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__Z1IH)[ 0]=next__Y1IH;
                     } else {
-                      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)));
+                      next__Y1IH=((__POINTER *)result__01IH)[ 0];
+                      if ((next__Y1IH == (void *)NULL)) {
+                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__01IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__21IH <<  1)) <=  4096)) {
+                          next__Y1IH=(void *)((unsigned long)result__01IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__21IH)));
                         } else {
-                          next__PXIH=new_lab__QOJ(lab_type__SXIH);
+                          next__Y1IH=new_lab__ZPJ(lab_type__11IH);
                         };
-                        ((__POINTER *)next__PXIH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__QXIH)[ 0]=next__PXIH;
+                        ((__POINTER *)next__Y1IH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__Z1IH)[ 0]=next__Y1IH;
                       } else {
-                        ((__POINTER *)result__RXIH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PXIH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__RXIH=next__PXIH;
+                        ((__POINTER *)result__01IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__01IH=next__Y1IH;
                       };
                     };
-                    ptr__CXIH=result__RXIH;
+                    ptr__L1IH=result__01IH;
                   };
-                  result__BXIH=((__ITM_READ_ARG1 *)ptr__CXIH);
-                  *(result__BXIH) = *(ITM_READ_ARG1__);
+                  result__K1IH=((__ITM_READ_ARG1 *)ptr__L1IH);
+                  *(result__K1IH) = *(ITM_READ_ARG1__);
                 };
-                ((__ITM_READ_ARG1 *)result__BXIH)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__GFBD;
+                ((__ITM_READ_ARG1 *)result__K1IH)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__3GBD;
               };
             };
-            if (((void *)read_contract__VQF(PARSER__) != (void *)NULL)) {
-              if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
+            if (((void *)read_contract__4RF(PARSER__) != (void *)NULL)) {
+              if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
               };
             };
           };
-          result__UXIH=FALSE__;
+          result__31IH=FALSE__;
           if ((! read_space__KSD())) {
-            result__UXIH=FALSE__;
+            result__31IH=FALSE__;
           } else {
-            result__VXIH='\0';
+            result__41IH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__VXIH=((__CHARACTER )(( 0)));
+              result__41IH=((__CHARACTER )(( 0)));
             } else {
-              result__VXIH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__41IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__VXIH == ';')) {
+            if ((result__41IH == ';')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__UXIH=TRUE__;
+              result__31IH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__31IH)) {
+            pos__ZDWG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_242));
+            put_position__LNG(pos__ZDWG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
           if (is_shorter2__VI) {
-            skip_comment__X2D=FALSE__;
+            skip_comment__A4D=FALSE__;
             read_space__KSD();
-            if (((struct ___OBJ *)last_slot__QTOB)->__id==__ITM_SLOT__) {
-              __tmp__SYOB=((__ITM_SLOT *)last_slot__QTOB)->comment__RYOB;
+            if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+              __tmp__2ZOB=((__ITM_SLOT *)last_slot__0UOB)->comment__1ZOB;
             } else {
-              __tmp__SYOB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB;
+              __tmp__2ZOB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB;
             };
-            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;
+            if ((((void *)__tmp__2ZOB == (void *)NULL) && ((void *)last_comment_slot__S4D != (void *)NULL))) {
+              __tmp__M0OB=last_comment_slot__S4D;
+              if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+                ((__ITM_SLOT *)last_slot__0UOB)->comment__1ZOB=__tmp__M0OB;
               } else {
-                ((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.comment__RYOB=__tmp__CZOB;
+                ((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.comment__1ZOB=__tmp__M0OB;
               };
             };
           };
           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:
+            if ((((! is_short_code__11) && (old_pos__QUOB !=  0)) && ((void *)((__SECTION_ *)last_section__E1C)->name__NYDC != (void *)(&__string_22)))) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )current_position__AWF()) >>  9) &  255) <  5)) {
+                while_do__QMLE:
                 {
-                  result__VY3G='\0';
+                  result__423G='\0';
                   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__VY3G=((__CHARACTER )(( 0)));
+                    result__423G=((__CHARACTER )(( 0)));
                   } else {
-                    result__VY3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                    result__423G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__VY3G != ((__CHARACTER )(( 0))))) {
-                    result__4Y3G='\0';
+                  if ((result__423G != ((__CHARACTER )(( 0))))) {
+                    result__H33G='\0';
                     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__4Y3G=((__CHARACTER )(( 0)));
+                      result__H33G=((__CHARACTER )(( 0)));
                     } else {
-                      result__4Y3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                      result__H33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__G1OB=(((((((result__4Y3G == ' ') || (result__4Y3G == '\t')) || (result__4Y3G == '\n')) || (result__4Y3G == '\r')) || (result__4Y3G == '\0')) || (result__4Y3G == '\f')) || (result__4Y3G == '\v'));
+                    __tmp__Q2OB=(((((((result__H33G == ' ') || (result__H33G == '\t')) || (result__H33G == '\n')) || (result__H33G == '\r')) || (result__H33G == '\0')) || (result__H33G == '\f')) || (result__H33G == '\v'));
                   } else {
-                    __tmp__G1OB=FALSE__;
+                    __tmp__Q2OB=FALSE__;
                   };
-                  if (__tmp__G1OB) {
-                    result__DZ3G='\0';
+                  if (__tmp__Q2OB) {
+                    result__M33G='\0';
                     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                      result__DZ3G=((__CHARACTER )(( 0)));
+                      result__M33G=((__CHARACTER )(( 0)));
                     } else {
-                      result__DZ3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                      result__M33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                     };
-                    __tmp__H1OB=(result__DZ3G != '\n');
+                    __tmp__R2OB=(result__M33G != '\n');
                   } else {
-                    __tmp__H1OB=FALSE__;
+                    __tmp__R2OB=FALSE__;
                   };
-                  if (__tmp__H1OB) {
+                  if (__tmp__R2OB) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    goto while_do__HMLE;
+                    goto while_do__QMLE;
                   };
                 };
-                result__IZ3G='\0';
+                result__R33G='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__IZ3G=((__CHARACTER )(( 0)));
+                  result__R33G=((__CHARACTER )(( 0)));
                 } else {
-                  result__IZ3G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__R33G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__IZ3G == '\n')) {
+                if ((result__R33G == '\n')) {
                   position__CCC=(__INTEGER)(position__CCC +  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__2WHH=((__STRING *)output_code__SI);
+              start__ZWHH=(__INTEGER)(old_pos__QUOB + old_derive__RUOB);
+              end__YWHH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+              len__0WHH=(__INTEGER)((__INTEGER)(end__YWHH - start__ZWHH) +  1);
+              if ((len__0WHH >  0)) {
+                __tmp__1WHH=(__INTEGER)(end__YWHH +  1);
+                __tmp__3WHH=Self__2WHH->count__EGC;
+                Self__4WHH=__tmp__1WHH;
+                while ((Self__4WHH <= __tmp__3WHH)) {
+                  ((__CHARACTER *)Self__2WHH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__4WHH - len__0WHH) -  1)]=((__CHARACTER *)Self__2WHH->storage__F5R)[(__INTEGER)(Self__4WHH -  1)];
+                  Self__4WHH=(__INTEGER)(Self__4WHH +  1);
                 };
-                Self__TSHH->count__EGC=(__INTEGER)(Self__TSHH->count__EGC - len__RSHH);
+                Self__2WHH->count__EGC=(__INTEGER)(Self__2WHH->count__EGC - len__0WHH);
               };
-              short_derive__PCC=(__INTEGER)(old_derive__HTOB - (__INTEGER)(position__CCC - old_pos__GTOB));
+              short_derive__PCC=(__INTEGER)(old_derive__RUOB - (__INTEGER)(position__CCC - old_pos__QUOB));
             };
           };
-          __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;
+          __tmp__Y3OB=((__PROTOTYPE *)object__ZBC)->slot_list__ASS;
+          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            __tmp__03OB=((__ITM_SLOT *)last_slot__0UOB)->parent_named__15.name__LI;
           } else {
-            __tmp__Q2OB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__03OB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          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;
+          s__SUOB=fast_reference_at__15FC(__tmp__Y3OB,__tmp__03OB);
+          if (((void *)s__SUOB != (void *)NULL)) {
+            put_error__text__BMG( 1,(&__string_243));
+            if (((struct ___OBJ *)s__SUOB)->__id==__ITM_SLOT__) {
+              __tmp__F4OB=((__ITM_SLOT *)s__SUOB)->parent_named__15.parent_itm_object__4.position__0BJ;
             } else {
-              __tmp__12OB=((__ITM_SLOT_OPERATOR *)s__ITOB)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+              __tmp__F4OB=((__ITM_SLOT_OPERATOR *)s__SUOB)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
             };
-            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;
+            put_position__LNG(__tmp__F4OB);
+            if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+              __tmp__H4OB=((__ITM_SLOT *)last_slot__0UOB)->parent_named__15.parent_itm_object__4.position__0BJ;
             } else {
-              __tmp__32OB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.parent_itm_object__4.position__RAJ;
+              __tmp__H4OB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ;
             };
-            put_position__CMG(__tmp__32OB);
-            put_string__CZF(msg_err__3KG);
-            if ((type_error__2KG !=  2)) {
+            put_position__LNG(__tmp__H4OB);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          Self__4DZB=((__PROTOTYPE *)object__ZBC);
+          s__5DZB=last_slot__0UOB;
+          __tmp__AEZB=Self__4DZB->slot_list__ASS;
+          if (((struct ___OBJ *)last_slot__0UOB)->__id==__ITM_SLOT__) {
+            __tmp__BEZB=((__ITM_SLOT *)last_slot__0UOB)->parent_named__15.name__LI;
           } else {
-            __tmp__VCZB=((__ITM_SLOT_OPERATOR *)last_slot__QTOB)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__BEZB=((__ITM_SLOT_OPERATOR *)last_slot__0UOB)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          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;
+          fast_put__to__MNGC(__tmp__AEZB,last_slot__0UOB,__tmp__BEZB);
+          if (((void *)Self__4DZB->first_slot__DEZB == (void *)NULL)) {
+            Self__4DZB->first_slot__DEZB=s__5DZB;
           } else {
-            __tmp__DDZB=Self__SCZB->last_slot__11C;
-            if (((struct ___OBJ *)__tmp__DDZB)->__id==__ITM_SLOT__) {
-              ((__ITM_SLOT *)__tmp__DDZB)->next__FFHC=s__TCZB;
+            __tmp__PEZB=Self__4DZB->last_slot__11C;
+            if (((struct ___OBJ *)__tmp__PEZB)->__id==__ITM_SLOT__) {
+              ((__ITM_SLOT *)__tmp__PEZB)->next__ZGHC=s__5DZB;
             } else {
-              ((__ITM_SLOT_OPERATOR *)__tmp__DDZB)->parent_itm_slot__VR5B.next__FFHC=s__TCZB;
+              ((__ITM_SLOT_OPERATOR *)__tmp__PEZB)->parent_itm_slot__BT5B.next__ZGHC=s__5DZB;
             };
           };
-          Self__SCZB->last_slot__11C=s__TCZB;
+          Self__4DZB->last_slot__11C=s__5DZB;
           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);
+            Self__EI3B=((__HASHED_SEToSTRING_CONSTANTo *)short_local__XCC);
+            Self__EI3B->count__UEY= 0;
+            __tmp__GI3B=Self__EI3B->buckets__LBV;
+            __tmp__JI3B=(__INTEGER)(Self__EI3B->capacity__OFT -  1);
+            Self__4GHC=((void **)__tmp__GI3B);
+            Self__PZPC=__tmp__JI3B;
+            while ((Self__PZPC >=  0)) {
+              Self__4GHC[Self__PZPC]=NULL;
+              Self__PZPC=(__INTEGER)(Self__PZPC -  1);
             };
           };
         };
-      } while (result__BTOB);
+      } while (result__LUOB);
       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);
+        if (((! is_short_private__J2) && ((void *)((__SECTION_ *)last_section__E1C)->name__NYDC == (void *)(&__string_26)))) {
+          Self__EXHH=((__STRING *)output_code__SI);
+          start__BXHH=(__INTEGER)(pos_sec__2XC + old_derive__3XC);
+          end__AXHH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+          len__CXHH=(__INTEGER)((__INTEGER)(end__AXHH - start__BXHH) +  1);
+          if ((len__CXHH >  0)) {
+            __tmp__DXHH=(__INTEGER)(end__AXHH +  1);
+            __tmp__FXHH=Self__EXHH->count__EGC;
+            Self__GXHH=__tmp__DXHH;
+            while ((Self__GXHH <= __tmp__FXHH)) {
+              ((__CHARACTER *)Self__EXHH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__GXHH - len__CXHH) -  1)]=((__CHARACTER *)Self__EXHH->storage__F5R)[(__INTEGER)(Self__GXHH -  1)];
+              Self__GXHH=(__INTEGER)(Self__GXHH +  1);
+            };
+            Self__EXHH->count__EGC=(__INTEGER)(Self__EXHH->count__EGC - len__CXHH);
           };
           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;
+      goto while_do__E3E;
     };
   };
-  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)) {
+  if (((void *)read_contract__4RF(PARSER__) != (void *)NULL)) {
+    pos__UEWG=current_position__AWF();
+    put_error__text__BMG( 2,(&__string_244));
+    put_position__LNG(pos__UEWG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
   read_space__KSD();
-  result__ZZ3G='\0';
+  result__C43G='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__ZZ3G=((__CHARACTER )(( 0)));
+    result__C43G=((__CHARACTER )(( 0)));
   } else {
-    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)) {
+    result__C43G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+  };
+  if ((result__C43G != ((__CHARACTER )(( 0))))) {
+    pos__WEWG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_168));
+    put_position__LNG(pos__WEWG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
@@ -16245,2493 +16253,2493 @@ static void go_on__SBC(void *obj__UBC)
   object__ZBC=NULL;
 }
 
-static void put__to__like__Q0XD(void *tok__S0XD,void *buf__T0XD,void *key__U0XD)
+static void put__to__like__C0XD(void *tok__E0XD,void *buf__F0XD,void *key__G0XD)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__X0XD,Self__DDQE;
+  void *lst__H0XD;
+  lst__H0XD=NULL;
+  if (((void *)key__G0XD != (void *)NULL)) {
+    lst__H0XD=fast_reference_at__LHNE(short_dico__QD,key__G0XD);
+    if (((void *)lst__H0XD != (void *)NULL)) {
+      __tmp__X0XD=((__LINKED_LISToSTRING_CONSTANTo *)lst__H0XD)->parent_linked_collection__LD.upper__MDD;
+      Self__DDQE= 1;
+      while ((Self__DDQE <= __tmp__X0XD)) {
+        if (((void *)item__CZND(lst__H0XD,Self__DDQE) == (void *)NULL)) {
+          append__FLS(buf__F0XD,tok__E0XD);
         } else {
-          append__2JS(buf__T0XD,item__MZND(lst__V0XD,Self__DBQE));
+          append__FLS(buf__F0XD,item__CZND(lst__H0XD,Self__DDQE));
         };
-        Self__DBQE=(__INTEGER)(Self__DBQE +  1);
+        Self__DDQE=(__INTEGER)(Self__DDQE +  1);
       };
     };
   };
 }
 
-static void shorter_get_all_slot_in__S2XD(__PROTOTYPE *Self__T2XD,void *lst__U2XD)
+static void shorter_get_all_slot_in__E2XD(__PROTOTYPE *Self__F2XD,void *lst__G2XD)
 // ({PROTOTYPE},{NULLxFAST_ARRAYoITM_SLOTo}) VoidRecursive, No inlinable.
 {
-  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)) {
+  void *ps__I2XD,*__tmp__E5XD;
+  void *p__J2XD;
+  __INTEGER i__K2XD,new_capacity__IDXE,__tmp__MEXE,__tmp__XYPF;
+  __INTEGER Self__P55F,i__10KH,i__A1KH;
+  void *s__H2XD,*__tmp__S3XD,*__tmp__L4XD,*__tmp__ECYD;
+  void *__tmp__12XD,*__tmp__X4XD;
+  void *__tmp__T3XD,*__tmp__U3XD,*__tmp__V5XD,*__tmp__55XD,*__tmp__HAYD;
+  void *__tmp__OBYD,*__tmp__PBYD;
+  __SECTION_ *Self__MBFC;
+  void *__tmp__C5XD;
+  __STRING_CONSTANT *Self__30KH,*Self__C1KH;
+  __BOOLEAN __tmp__A3XD,__tmp__X3XD,__tmp__WDXE,__tmp__14XD,__tmp__GJLF;
+  __BOOLEAN __tmp__LAYD,result__00KH,__tmp__MAYD,result__50KH;
+  __BOOLEAN __tmp__PAYD;
+  __FAST_ARRAYoITM_SLOTo *Self__GDXE;
+  void **__tmp__LEXE,**new__DYPF;
+  __CHARACTER __tmp__O5XD;
+  ps__I2XD=NULL;
+  p__J2XD=NULL;
+  i__K2XD= 0;
+  s__H2XD=Self__F2XD->first_slot__DEZB;
+  while (((void *)s__H2XD != (void *)NULL)) {
     if (is_short_private__J2) {
-      __tmp__O3XD=TRUE__;
+      __tmp__A3XD=TRUE__;
     } else {
-      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-        __tmp__J3XD=((__ITM_SLOT *)s__V2XD)->id_section__F2C;
+      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+        __tmp__12XD=((__ITM_SLOT *)s__H2XD)->id_section__F2C;
       } else {
-        __tmp__J3XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.id_section__F2C;
+        __tmp__12XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.id_section__F2C;
       };
-      __tmp__O3XD=((void *)((__SECTION_ *)__tmp__J3XD)->name__ZWDC != (void *)(&__string_26));
+      __tmp__A3XD=((void *)((__SECTION_ *)__tmp__12XD)->name__NYDC != (void *)(&__string_26));
     };
-    if (__tmp__O3XD) {
-      i__Y2XD= 0;
-      while_do__ICSE:
+    if (__tmp__A3XD) {
+      i__K2XD= 0;
+      while_do__IESE:
       {
-        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;
+        if ((i__K2XD <= ((__FAST_ARRAYoITM_SLOTo *)lst__G2XD)->parent_arrayed_collection__CJTD.upper__5JTD)) {
+          __tmp__S3XD=((void **)((__FAST_ARRAYoITM_SLOTo *)lst__G2XD)->parent_arrayed_collection__CJTD.storage__HKWE)[i__K2XD];
+          if (((struct ___OBJ *)__tmp__S3XD)->__id==__ITM_SLOT__) {
+            __tmp__T3XD=((__ITM_SLOT *)__tmp__S3XD)->parent_named__15.name__LI;
           } else {
-            __tmp__B4XD=((__ITM_SLOT_OPERATOR *)__tmp__A4XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__T3XD=((__ITM_SLOT_OPERATOR *)__tmp__S3XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-            __tmp__C4XD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+            __tmp__U3XD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__C4XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__U3XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          __tmp__F4XD=((void *)__tmp__B4XD != (void *)__tmp__C4XD);
+          __tmp__X3XD=((void *)__tmp__T3XD != (void *)__tmp__U3XD);
         } else {
-          __tmp__F4XD=FALSE__;
+          __tmp__X3XD=FALSE__;
         };
-        if (__tmp__F4XD) {
-          i__Y2XD=(__INTEGER)(i__Y2XD +  1);
-          goto while_do__ICSE;
+        if (__tmp__X3XD) {
+          i__K2XD=(__INTEGER)(i__K2XD +  1);
+          goto while_do__IESE;
         };
       };
-      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__;
+      if ((i__K2XD > ((__FAST_ARRAYoITM_SLOTo *)lst__G2XD)->parent_arrayed_collection__CJTD.upper__5JTD)) {
+        Self__GDXE=((__FAST_ARRAYoITM_SLOTo *)lst__G2XD);
+        new_capacity__IDXE= 0;
+        if (((__INTEGER)(Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD +  1) <= (__INTEGER)(Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE -  1))) {
+          Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD=(__INTEGER)(Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD +  1);
+          __tmp__WDXE=TRUE__;
         } else {
-          __tmp__KBXE=FALSE__;
+          __tmp__WDXE=FALSE__;
         };
-        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;
+        if ((! __tmp__WDXE)) {
+          if ((Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE ==  0)) {
+            Self__GDXE->parent_arrayed_collection__CJTD.storage__HKWE=create__UCFF( 2);
+            Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE= 2;
+            Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD= 0;
           } else {
-            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);
+            new_capacity__IDXE=(__INTEGER)(Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE <<  1);
+            __tmp__LEXE=Self__GDXE->parent_arrayed_collection__CJTD.storage__HKWE;
+            __tmp__MEXE=Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE;
+            new__DYPF=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__LEXE)),((__UINTEGER_32 )(__INTEGER)(__tmp__MEXE * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__IDXE * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__XYPF=(__INTEGER)(new_capacity__IDXE -  1);
+            Self__P55F=__tmp__MEXE;
+            while ((Self__P55F <= __tmp__XYPF)) {
+              new__DYPF[Self__P55F]=NULL;
+              Self__P55F=(__INTEGER)(Self__P55F +  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);
+            Self__GDXE->parent_arrayed_collection__CJTD.storage__HKWE=new__DYPF;
+            Self__GDXE->parent_arrayed_collection__CJTD.capacity__E3VE=new_capacity__IDXE;
+            Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD=(__INTEGER)(Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD +  1);
           };
         };
-        ((void **)Self__0AXE->parent_arrayed_collection__QJTD.storage__5HWE)[Self__0AXE->parent_arrayed_collection__QJTD.upper__NKTD]=s__V2XD;
+        ((void **)Self__GDXE->parent_arrayed_collection__CJTD.storage__HKWE)[Self__GDXE->parent_arrayed_collection__CJTD.upper__5JTD]=s__H2XD;
       };
     };
-    if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-      __tmp__Z4XD=((__ITM_SLOT *)s__V2XD)->next__FFHC;
+    if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+      __tmp__L4XD=((__ITM_SLOT *)s__H2XD)->next__ZGHC;
     } else {
-      __tmp__Z4XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.next__FFHC;
+      __tmp__L4XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.next__ZGHC;
     };
-    s__V2XD=__tmp__Z4XD;
+    s__H2XD=__tmp__L4XD;
   };
-  s__V2XD=Self__T2XD->first_slot__XCZB;
-  while_do__NB5D:
+  s__H2XD=Self__F2XD->first_slot__DEZB;
+  while_do__BC5D:
   {
-    if (((void *)s__V2XD != (void *)NULL)) {
-      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-        __tmp__F5XD=((__ITM_SLOT *)s__V2XD)->id_section__F2C;
+    if (((void *)s__H2XD != (void *)NULL)) {
+      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+        __tmp__X4XD=((__ITM_SLOT *)s__H2XD)->id_section__F2C;
       } else {
-        __tmp__F5XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.id_section__F2C;
+        __tmp__X4XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.id_section__F2C;
       };
-      Self__Y5EC=((__SECTION_ *)__tmp__F5XD);
-      __tmp__J5XD=(((void *)Self__Y5EC->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__Y5EC->name__ZWDC == (void *)(&__string_24)));
+      Self__MBFC=((__SECTION_ *)__tmp__X4XD);
+      __tmp__14XD=(((void *)Self__MBFC->name__NYDC == (void *)(&__string_23)) || ((void *)Self__MBFC->name__NYDC == (void *)(&__string_24)));
     } else {
-      __tmp__J5XD=FALSE__;
+      __tmp__14XD=FALSE__;
     };
-    if (__tmp__J5XD) {
-      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-        __tmp__Q5XD=((__ITM_SLOT *)s__V2XD)->result_type__N2FC;
+    if (__tmp__14XD) {
+      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+        __tmp__C5XD=((__ITM_SLOT *)s__H2XD)->result_type__B4FC;
       } else {
-        __tmp__Q5XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.result_type__N2FC;
+        __tmp__C5XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.result_type__B4FC;
       };
-      if (__tmp__Q5XD==NULL) {
-        __tmp__S5XD=NULL;
+      if (__tmp__C5XD==NULL) {
+        __tmp__E5XD=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__Q5XD)->__id) {
+        switch (((struct ___OBJ *)__tmp__C5XD)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__S5XD=((void *)__tmp__Q5XD);
+          __tmp__E5XD=((void *)__tmp__C5XD);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__S5XD=((void *)__tmp__Q5XD);
+          __tmp__E5XD=((void *)__tmp__C5XD);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__S5XD=NULL;
+          __tmp__E5XD=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__S5XD=NULL;
+          __tmp__E5XD=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__S5XD=((void *)__tmp__Q5XD);
+          __tmp__E5XD=((void *)__tmp__C5XD);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__S5XD=((void *)__tmp__Q5XD);
+          __tmp__E5XD=((void *)__tmp__C5XD);
         } break;
         }
       };
-      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;
+      ps__I2XD=__tmp__E5XD;
+      if (((void *)__tmp__E5XD != (void *)NULL)) {
+        if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+          __tmp__O5XD=((__ITM_SLOT *)s__H2XD)->parent_named__15.style__FBU;
         } else {
-          __tmp__25XD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.style__25T;
+          __tmp__O5XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.style__FBU;
         };
-        if ((__tmp__25XD == '+')) {
-          switch (((struct ___OBJ *)__tmp__S5XD)->__id) {
+        if ((__tmp__O5XD == '+')) {
+          switch (((struct ___OBJ *)__tmp__E5XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__DAYD=NULL;
+            __tmp__V5XD=NULL;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__DAYD=NULL;
+            __tmp__V5XD=NULL;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__DAYD=((__ITM_TYPE_GENERIC *)__tmp__S5XD)->parent_itm_type_style__3NN.style__OUP;
+            __tmp__V5XD=((__ITM_TYPE_GENERIC *)__tmp__E5XD)->parent_itm_type_style__GPN.style__XVP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__DAYD=((__ITM_TYPE_STYLE *)__tmp__S5XD)->style__OUP;
+            __tmp__V5XD=((__ITM_TYPE_STYLE *)__tmp__E5XD)->style__XVP;
           } break;
           };
-          __tmp__WFLF=((void *)__tmp__DAYD == (void *)(&__string_9));
+          __tmp__GJLF=((void *)__tmp__V5XD == (void *)(&__string_9));
         } else {
-          __tmp__WFLF=FALSE__;
+          __tmp__GJLF=FALSE__;
         };
-        if (__tmp__WFLF) {
-          __tmp__ZAYD=TRUE__;
+        if (__tmp__GJLF) {
+          __tmp__LAYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-            __tmp__NAYD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+            __tmp__55XD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__NAYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__55XD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          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);
+          Self__30KH=((__STRING_CONSTANT *)__tmp__55XD);
+          result__00KH=FALSE__;
+          i__10KH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_176))->count__DD <= Self__30KH->count__DD)) {
+            i__10KH=((__STRING_CONSTANT *)(&__string_176))->count__DD;
+            while ((! ((i__10KH ==  0) || (((__CHARACTER *)Self__30KH->storage__ZNO)[(__INTEGER)(i__10KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_176))->storage__ZNO)[(__INTEGER)(i__10KH -  1)])))) {
+              i__10KH=(__INTEGER)(i__10KH -  1);
             };
-            result__RWKH=(i__SWKH ==  0);
+            result__00KH=(i__10KH ==  0);
           };
-          __tmp__ZAYD=result__RWKH;
+          __tmp__LAYD=result__00KH;
         };
-        if (__tmp__ZAYD) {
-          __tmp__0AYD=TRUE__;
+        if (__tmp__LAYD) {
+          __tmp__MAYD=TRUE__;
         } else {
-          if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-            __tmp__VAYD=((__ITM_SLOT *)s__V2XD)->parent_named__15.name__LI;
+          if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+            __tmp__HAYD=((__ITM_SLOT *)s__H2XD)->parent_named__15.name__LI;
           } else {
-            __tmp__VAYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.parent_named__15.name__LI;
+            __tmp__HAYD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.parent_named__15.name__LI;
           };
-          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);
+          Self__C1KH=((__STRING_CONSTANT *)__tmp__HAYD);
+          result__50KH=FALSE__;
+          i__A1KH= 0;
+          if ((((__STRING_CONSTANT *)(&__string_177))->count__DD <= Self__C1KH->count__DD)) {
+            i__A1KH=((__STRING_CONSTANT *)(&__string_177))->count__DD;
+            while ((! ((i__A1KH ==  0) || (((__CHARACTER *)Self__C1KH->storage__ZNO)[(__INTEGER)(i__A1KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_177))->storage__ZNO)[(__INTEGER)(i__A1KH -  1)])))) {
+              i__A1KH=(__INTEGER)(i__A1KH -  1);
             };
-            result__WWKH=(i__XWKH ==  0);
+            result__50KH=(i__A1KH ==  0);
           };
-          __tmp__0AYD=result__WWKH;
+          __tmp__MAYD=result__50KH;
         };
-        __tmp__3AYD=__tmp__0AYD;
+        __tmp__PAYD=__tmp__MAYD;
       } else {
-        __tmp__3AYD=FALSE__;
+        __tmp__PAYD=FALSE__;
       };
-      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) {
+      if (__tmp__PAYD) {
+        p__J2XD=NULL;
+        i__K2XD= 0;
+        while (((i__K2XD <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__J2XD == (void *)NULL))) {
+          __tmp__OBYD=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__K2XD])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__I2XD)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__3BYD=((__ITM_TYPE_PARAMETER *)ps__W2XD)->parent_itm_type__LAE.name__FUP;
+            __tmp__PBYD=((__ITM_TYPE_PARAMETER *)ps__I2XD)->parent_itm_type__UBE.name__OVP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__3BYD=((__ITM_TYPE_SIMPLE *)ps__W2XD)->name__FUP;
+            __tmp__PBYD=((__ITM_TYPE_SIMPLE *)ps__I2XD)->name__OVP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__3BYD=((__ITM_TYPE_GENERIC *)ps__W2XD)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP;
+            __tmp__PBYD=((__ITM_TYPE_GENERIC *)ps__I2XD)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__3BYD=((__ITM_TYPE_STYLE *)ps__W2XD)->parent_itm_type_simple__2NN.name__FUP;
+            __tmp__PBYD=((__ITM_TYPE_STYLE *)ps__I2XD)->parent_itm_type_simple__FPN.name__OVP;
           } break;
           };
-          if (((void *)__tmp__2BYD == (void *)__tmp__3BYD)) {
-            p__X2XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__Y2XD];
+          if (((void *)__tmp__OBYD == (void *)__tmp__PBYD)) {
+            p__J2XD=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__K2XD];
           };
-          i__Y2XD=(__INTEGER)(i__Y2XD +  1);
+          i__K2XD=(__INTEGER)(i__K2XD +  1);
         };
-        if (((void *)p__X2XD != (void *)NULL)) {
-          shorter_get_all_slot_in__S2XD(p__X2XD,lst__U2XD);
+        if (((void *)p__J2XD != (void *)NULL)) {
+          shorter_get_all_slot_in__E2XD(p__J2XD,lst__G2XD);
         };
       };
-      if (((struct ___OBJ *)s__V2XD)->__id==__ITM_SLOT__) {
-        __tmp__SCYD=((__ITM_SLOT *)s__V2XD)->next__FFHC;
+      if (((struct ___OBJ *)s__H2XD)->__id==__ITM_SLOT__) {
+        __tmp__ECYD=((__ITM_SLOT *)s__H2XD)->next__ZGHC;
       } else {
-        __tmp__SCYD=((__ITM_SLOT_OPERATOR *)s__V2XD)->parent_itm_slot__VR5B.next__FFHC;
+        __tmp__ECYD=((__ITM_SLOT_OPERATOR *)s__H2XD)->parent_itm_slot__BT5B.next__ZGHC;
       };
-      s__V2XD=__tmp__SCYD;
-      goto while_do__NB5D;
+      s__H2XD=__tmp__ECYD;
+      goto while_do__BC5D;
     };
   };
 }
 
-static void pretty_name_in__ZM4F(__ITM_SLOT *Self__0M4F,void *buffer__1M4F)
+static void pretty_name_in__ER4F(__ITM_SLOT *Self__FR4F,void *buffer__GR4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER j__HR4F;
+  __STRING_CONSTANT *Self__CVFH;
+  j__HR4F= 1;
+  while ((j__HR4F < ((__STRING_CONSTANT *)Self__FR4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__FR4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)(j__HR4F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__FR4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)((__INTEGER)(j__HR4F +  1) -  1)] == '_'))) {
+      add_last__3IT(buffer__GR4F,' ');
+      j__HR4F=(__INTEGER)(j__HR4F +  2);
     } else {
-      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);
+      add_last__3IT(buffer__GR4F,((__CHARACTER *)((__STRING_CONSTANT *)Self__FR4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)(j__HR4F -  1)]);
+      j__HR4F=(__INTEGER)(j__HR4F +  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)]);
+  Self__CVFH=((__STRING_CONSTANT *)Self__FR4F->parent_named__15.name__LI);
+  add_last__3IT(buffer__GR4F,((__CHARACTER *)Self__CVFH->storage__ZNO)[(__INTEGER)(Self__CVFH->count__DD -  1)]);
 }
 
-static void pretty_name_in__OO4F(__ITM_SLOT_OPERATOR *Self__PO4F,void *buffer__QO4F)
+static void pretty_name_in__ZS4F(__ITM_SLOT_OPERATOR *Self__0S4F,void *buffer__1S4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *Self__H1KH,*Self__OMTF;
+  __INTEGER i__F1KH,i__SMTF;
+  __BOOLEAN result__E1KH,__tmp__GT4F,result__RMTF;
+  Self__H1KH=((__STRING_CONSTANT *)Self__0S4F->parent_itm_slot__BT5B.parent_named__15.name__LI);
+  result__E1KH=FALSE__;
+  i__F1KH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__H1KH->count__DD)) {
+    i__F1KH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__F1KH ==  0) || (((__CHARACTER *)Self__H1KH->storage__ZNO)[(__INTEGER)(i__F1KH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__ZNO)[(__INTEGER)(i__F1KH -  1)])))) {
+      i__F1KH=(__INTEGER)(i__F1KH -  1);
+    };
+    result__E1KH=(i__F1KH ==  0);
+  };
+  if (result__E1KH) {
+    append__FLS(buffer__1S4F,(&__string_245));
+    __tmp__GT4F=TRUE__;
   } else {
-    __tmp__1O4F=FALSE__;
+    __tmp__GT4F=FALSE__;
   };
-  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);
+  if ((! __tmp__GT4F)) {
+    Self__OMTF=((__STRING_CONSTANT *)Self__0S4F->parent_itm_slot__BT5B.parent_named__15.name__LI);
+    result__RMTF=FALSE__;
+    i__SMTF= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__OMTF->count__DD)) {
+      i__SMTF=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__SMTF ==  0) || (((__CHARACTER *)Self__OMTF->storage__ZNO)[(__INTEGER)(i__SMTF -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__ZNO)[(__INTEGER)(i__SMTF -  1)])))) {
+        i__SMTF=(__INTEGER)(i__SMTF -  1);
       };
-      result__GITF=(i__HITF ==  0);
+      result__RMTF=(i__SMTF ==  0);
     };
-    if (result__GITF) {
-      append__2JS(buffer__QO4F,(&__string_246));
+    if (result__RMTF) {
+      append__FLS(buffer__1S4F,(&__string_246));
     } else {
-      append__2JS(buffer__QO4F,(&__string_247));
+      append__FLS(buffer__1S4F,(&__string_247));
     };
   };
-  append__2JS(buffer__QO4F,Self__PO4F->pretty_name__MYHC);
-  add_last__UHT(buffer__QO4F,'\'');
+  append__FLS(buffer__1S4F,Self__0S4F->pretty_name__A0HC);
+  add_last__3IT(buffer__1S4F,'\'');
 }
 
-static void get_all_comment_slot__in__ID4E(__PROTOTYPE *Self__JD4E,void *n__KD4E,void *buf__LD4E)
+static void get_all_comment_slot__in__UF4E(__PROTOTYPE *Self__VF4E,void *n__WF4E,void *buf__XF4E)
 // ({PROTOTYPE},{NULLxSTRING_CONSTANT},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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);
+  void *ps__ZF4E,*__tmp__HH4E;
+  void *p__0F4E;
+  __INTEGER i__1F4E;
+  void *s__YF4E,*__tmp__2I4E;
+  void *__tmp__DG4E,*__tmp__MG4E,*__tmp__GI4E,*__tmp__HI4E;
+  void *__tmp__0G4E;
+  __SECTION_ *Self__GW1G;
+  void *__tmp__FH4E;
+  __BOOLEAN __tmp__GG4E,__tmp__4G4E;
+  ps__ZF4E=NULL;
+  p__0F4E=NULL;
+  i__1F4E= 0;
+  s__YF4E=fast_reference_at__15FC(Self__VF4E->slot_list__ASS,n__WF4E);
+  if (((void *)s__YF4E != (void *)NULL)) {
+    if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
+      __tmp__DG4E=((__ITM_SLOT *)s__YF4E)->comment__1ZOB;
+    } else {
+      __tmp__DG4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.comment__1ZOB;
+    };
+    __tmp__GG4E=((void *)__tmp__DG4E != (void *)NULL);
   } else {
-    __tmp__0D4E=FALSE__;
+    __tmp__GG4E=FALSE__;
   };
-  if (__tmp__0D4E) {
-    if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
-      __tmp__AE4E=((__ITM_SLOT *)s__MD4E)->comment__RYOB;
+  if (__tmp__GG4E) {
+    if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
+      __tmp__MG4E=((__ITM_SLOT *)s__YF4E)->comment__1ZOB;
     } else {
-      __tmp__AE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.comment__RYOB;
+      __tmp__MG4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.comment__1ZOB;
     };
-    append__2JS(buf__LD4E,__tmp__AE4E);
+    append__FLS(buf__XF4E,__tmp__MG4E);
   };
-  s__MD4E=Self__JD4E->first_slot__XCZB;
-  while_do__CHGF:
+  s__YF4E=Self__VF4E->first_slot__DEZB;
+  while_do__ZJGF:
   {
-    if (((void *)s__MD4E != (void *)NULL)) {
-      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
-        __tmp__OE4E=((__ITM_SLOT *)s__MD4E)->id_section__F2C;
+    if (((void *)s__YF4E != (void *)NULL)) {
+      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
+        __tmp__0G4E=((__ITM_SLOT *)s__YF4E)->id_section__F2C;
       } else {
-        __tmp__OE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.id_section__F2C;
+        __tmp__0G4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.id_section__F2C;
       };
-      Self__3R1G=((__SECTION_ *)__tmp__OE4E);
-      __tmp__SE4E=(((void *)Self__3R1G->name__ZWDC == (void *)(&__string_23)) || ((void *)Self__3R1G->name__ZWDC == (void *)(&__string_24)));
+      Self__GW1G=((__SECTION_ *)__tmp__0G4E);
+      __tmp__4G4E=(((void *)Self__GW1G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__GW1G->name__NYDC == (void *)(&__string_24)));
     } else {
-      __tmp__SE4E=FALSE__;
+      __tmp__4G4E=FALSE__;
     };
-    if (__tmp__SE4E) {
-      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
-        __tmp__ZE4E=((__ITM_SLOT *)s__MD4E)->result_type__N2FC;
+    if (__tmp__4G4E) {
+      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
+        __tmp__FH4E=((__ITM_SLOT *)s__YF4E)->result_type__B4FC;
       } else {
-        __tmp__ZE4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.result_type__N2FC;
+        __tmp__FH4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.result_type__B4FC;
       };
-      if (__tmp__ZE4E==NULL) {
-        __tmp__1E4E=NULL;
+      if (__tmp__FH4E==NULL) {
+        __tmp__HH4E=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__ZE4E)->__id) {
+        switch (((struct ___OBJ *)__tmp__FH4E)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__1E4E=((void *)__tmp__ZE4E);
+          __tmp__HH4E=((void *)__tmp__FH4E);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__1E4E=((void *)__tmp__ZE4E);
+          __tmp__HH4E=((void *)__tmp__FH4E);
         } break;
         case __ITM_TYPE_MULTI__: {
-          __tmp__1E4E=NULL;
+          __tmp__HH4E=NULL;
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__1E4E=NULL;
+          __tmp__HH4E=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__1E4E=((void *)__tmp__ZE4E);
+          __tmp__HH4E=((void *)__tmp__FH4E);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__1E4E=((void *)__tmp__ZE4E);
+          __tmp__HH4E=((void *)__tmp__FH4E);
         } break;
         }
       };
-      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) {
+      ps__ZF4E=__tmp__HH4E;
+      if (((void *)__tmp__HH4E != (void *)NULL)) {
+        p__0F4E=NULL;
+        i__1F4E= 0;
+        while (((i__1F4E <= ((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.upper__HJ) && ((void *)p__0F4E == (void *)NULL))) {
+          __tmp__GI4E=((__PROTOTYPE *)((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__1F4E])->parent_named__5.name__LI;
+          switch (((struct ___OBJ *)ps__ZF4E)->__id) {
           case __ITM_TYPE_PARAMETER__: {
-            __tmp__1F4E=((__ITM_TYPE_PARAMETER *)ps__ND4E)->parent_itm_type__LAE.name__FUP;
+            __tmp__HI4E=((__ITM_TYPE_PARAMETER *)ps__ZF4E)->parent_itm_type__UBE.name__OVP;
           } break;
           case __ITM_TYPE_SIMPLE__: {
-            __tmp__1F4E=((__ITM_TYPE_SIMPLE *)ps__ND4E)->name__FUP;
+            __tmp__HI4E=((__ITM_TYPE_SIMPLE *)ps__ZF4E)->name__OVP;
           } break;
           case __ITM_TYPE_GENERIC__: {
-            __tmp__1F4E=((__ITM_TYPE_GENERIC *)ps__ND4E)->parent_itm_type_style__3NN.parent_itm_type_simple__2NN.name__FUP;
+            __tmp__HI4E=((__ITM_TYPE_GENERIC *)ps__ZF4E)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP;
           } break;
           case __ITM_TYPE_STYLE__: {
-            __tmp__1F4E=((__ITM_TYPE_STYLE *)ps__ND4E)->parent_itm_type_simple__2NN.name__FUP;
+            __tmp__HI4E=((__ITM_TYPE_STYLE *)ps__ZF4E)->parent_itm_type_simple__FPN.name__OVP;
           } break;
           };
-          if (((void *)__tmp__0F4E == (void *)__tmp__1F4E)) {
-            p__OD4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__FPT)[i__PD4E];
+          if (((void *)__tmp__GI4E == (void *)__tmp__HI4E)) {
+            p__0F4E=((void **)((__FAST_ARRAYoPROTOTYPEo *)prototype_list__BJ)->parent_arrayed_collection__AJ.storage__OQT)[i__1F4E];
           };
-          i__PD4E=(__INTEGER)(i__PD4E +  1);
+          i__1F4E=(__INTEGER)(i__1F4E +  1);
         };
-        if (((void *)p__OD4E != (void *)NULL)) {
-          get_all_comment_slot__in__ID4E(p__OD4E,n__KD4E,buf__LD4E);
+        if (((void *)p__0F4E != (void *)NULL)) {
+          get_all_comment_slot__in__UF4E(p__0F4E,n__WF4E,buf__XF4E);
         };
       };
-      if (((struct ___OBJ *)s__MD4E)->__id==__ITM_SLOT__) {
-        __tmp__QG4E=((__ITM_SLOT *)s__MD4E)->next__FFHC;
+      if (((struct ___OBJ *)s__YF4E)->__id==__ITM_SLOT__) {
+        __tmp__2I4E=((__ITM_SLOT *)s__YF4E)->next__ZGHC;
       } else {
-        __tmp__QG4E=((__ITM_SLOT_OPERATOR *)s__MD4E)->parent_itm_slot__VR5B.next__FFHC;
+        __tmp__2I4E=((__ITM_SLOT_OPERATOR *)s__YF4E)->parent_itm_slot__BT5B.next__ZGHC;
       };
-      s__MD4E=__tmp__QG4E;
-      goto while_do__CHGF;
+      s__YF4E=__tmp__2I4E;
+      goto while_do__ZJGF;
     };
   };
 }
 
-static void shorter_comment__in__light__1G4E(void *str__3G4E,void *buf__4G4E,__BOOLEAN is_light__5G4E)
+static void shorter_comment__in__light__HJ4E(void *str__JJ4E,void *buf__KJ4E,__BOOLEAN is_light__LJ4E)
 // ({NULLxSTRING},{NULLxSTRING},{TRUExFALSE}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER stat__NJ4E,old_stat__OJ4E,i__QJ4E,cur__MJ4E,__tmp__EK4E;
+  __INTEGER __tmp__KXHH,Self__MXHH,i__BZYB;
+  void *code_balise__SJ4E;
+  __STRING *Self__IXHH,*Self__AHLB,*Self__F3RE;
+  void *__tmp__ZP4E;
+  __CHARACTER car__PJ4E,result__OVFH,result__2P2F,Self__UGOB;
+  __CHARACTER result__WGOB;
+  __BOOLEAN __tmp__LL4E,__tmp__QM4E,__tmp__IN4E,__tmp__5M4E;
+  __BOOLEAN result__I3RE,__tmp__CQ4E,__tmp__CS4E;
+  __CHARACTER *__tmp__JXHH,*Self__LXHH,*Self__X1DH,*Self__NYYB;
+  __CHARACTER *other__OYYB;
+  stat__NJ4E= 0;
+  old_stat__OJ4E= 0;
+  car__PJ4E='\0';
+  i__QJ4E= 0;
+  cur__MJ4E= 1;
+  ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
+  code_balise__SJ4E=(&__string_128);
+  while ((cur__MJ4E <= ((__STRING *)str__JJ4E)->count__EGC)) {
+    car__PJ4E=((__CHARACTER *)((__STRING *)str__JJ4E)->storage__F5R)[(__INTEGER)(cur__MJ4E -  1)];
+    __tmp__EK4E=stat__NJ4E;
+    if ((stat__NJ4E ==  0)) {
+      if ((car__PJ4E == '*')) {
+        if ((((__STRING *)str_tmp__UJ4E)->count__EGC >  1)) {
+          if (is_light__LJ4E) {
+            append__FLS(buf__KJ4E,str_tmp__UJ4E);
+            cur__MJ4E=(__INTEGER)(((__STRING *)str__JJ4E)->count__EGC +  1);
+          } else {
+            put__to__like__C0XD((&__string_248),buf__KJ4E,(&__string_148));
+            put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,code_balise__SJ4E);
+          };
+        };
+        ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
+        stat__NJ4E= 1;
+        __tmp__LL4E=TRUE__;
+      } else {
+        __tmp__LL4E=FALSE__;
+      };
+      if ((! __tmp__LL4E)) {
+        if ((car__PJ4E == '`')) {
+          old_stat__OJ4E=stat__NJ4E;
+          stat__NJ4E= 2;
+          ((__STRING *)str_tmp2__WL4E)->count__EGC= 0;
+        } else {
+          add_last__3IT(str_tmp__UJ4E,car__PJ4E);
+        };
+      };
+    };
+    if ((__tmp__EK4E ==  1)) {
+      result__OVFH='\0';
+      if (((((__INTEGER_8 )car__PJ4E) <  65) || (((__INTEGER_8 )car__PJ4E) >  90))) {
+        result__OVFH=car__PJ4E;
+      } else {
+        result__OVFH=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__PJ4E) +  32))));
+      };
+      if (((((__INTEGER_8 )result__OVFH) >= ((__INTEGER_8 )'a')) && (((__INTEGER_8 )result__OVFH) <= ((__INTEGER_8 )'z')))) {
+        result__2P2F='\0';
+        if (((((__INTEGER_8 )car__PJ4E) <  65) || (((__INTEGER_8 )car__PJ4E) >  90))) {
+          result__2P2F=car__PJ4E;
+        } else {
+          result__2P2F=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )car__PJ4E) +  32))));
+        };
+        add_last__3IT(str_tmp__UJ4E,result__2P2F);
+        __tmp__QM4E=TRUE__;
+      } else {
+        __tmp__QM4E=FALSE__;
+      };
+      if (__tmp__QM4E) {
+        __tmp__IN4E=TRUE__;
+      } else {
+        __tmp__5M4E=((car__PJ4E == ' ') && (((__STRING *)str_tmp__UJ4E)->count__EGC !=  0));
+        if (__tmp__5M4E) {
+          add_last__3IT(str_tmp__UJ4E,'_');
+        };
+        __tmp__IN4E=__tmp__5M4E;
+      };
+      if ((! __tmp__IN4E)) {
+        if ((car__PJ4E == ':')) {
+          if ((((__STRING *)str_tmp__UJ4E)->count__EGC !=  0)) {
+            code_balise__SJ4E=get__YWB(str_tmp__UJ4E);
+            if (((void *)fast_reference_at__LHNE(short_dico__QD,code_balise__SJ4E) == (void *)NULL)) {
+              code_balise__SJ4E=NULL;
             } else {
-              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__IXHH=((__STRING *)str_tmp__UJ4E);
+              __tmp__JXHH=Self__IXHH->storage__F5R;
+              __tmp__KXHH=(__INTEGER)(Self__IXHH->count__EGC -  1);
+              Self__LXHH=((__CHARACTER *)__tmp__JXHH);
+              Self__MXHH=__tmp__KXHH;
+              while ((Self__MXHH >=  0)) {
+                if (('_' == Self__LXHH[Self__MXHH])) {
+                  Self__LXHH[Self__MXHH]=' ';
                 };
-                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;
+                Self__MXHH=(__INTEGER)(Self__MXHH -  1);
+              };
+              add_last__3IT(str_tmp__UJ4E,':');
+              Self__X1DH=((__CHARACTER *)((__STRING *)str_tmp__UJ4E)->storage__F5R);
+              Self__AHLB=((__STRING *)str_tmp__UJ4E);
+              Self__UGOB=Self__X1DH[ 0];
+              result__WGOB='\0';
+              if (((((__INTEGER_8 )Self__UGOB) <  97) || (((__INTEGER_8 )Self__UGOB) >  122))) {
+                result__WGOB=Self__UGOB;
               } else {
-                result__MFOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__KFOB) -  32))));
+                result__WGOB=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )Self__UGOB) -  32))));
               };
-              ((__CHARACTER *)Self__WFLB->storage__23R)[ 0]=result__MFOB;
-              put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,(&__string_148));
+              ((__CHARACTER *)Self__AHLB->storage__F5R)[ 0]=result__WGOB;
+              put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,(&__string_148));
             };
           };
-          ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
-          stat__BH4E= 3;
+          ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
+          stat__NJ4E= 3;
         };
       };
     };
-    if ((__tmp__YH4E ==  2)) {
-      if ((car__DH4E == '\'')) {
-        if (((void *)code_balise__GH4E != (void *)NULL)) {
-          i__EH4E= 0;
-          while_do__1Q3F:
+    if ((__tmp__EK4E ==  2)) {
+      if ((car__PJ4E == '\'')) {
+        if (((void *)code_balise__SJ4E != (void *)NULL)) {
+          i__QJ4E= 0;
+          while_do__GV3F:
           {
-            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);
+            if ((i__QJ4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD)) {
+              ((__STRING *)str_tmp3__WP4E)->count__EGC= 0;
+              __tmp__ZP4E=((void **)((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.storage__HKWE)[i__QJ4E];
+              if (((struct ___OBJ *)__tmp__ZP4E)->__id==__ITM_SLOT__) {
+                pretty_name_in__ER4F(__tmp__ZP4E,str_tmp3__WP4E);
               } else {
-                pretty_name_in__OO4F(__tmp__NN4E,str_tmp3__KN4E);
+                pretty_name_in__ZS4F(__tmp__ZP4E,str_tmp3__WP4E);
               };
-              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__;
+              Self__F3RE=((__STRING *)str_tmp3__WP4E);
+              result__I3RE=FALSE__;
+              if ((Self__F3RE->count__EGC == ((__STRING *)str_tmp2__WL4E)->count__EGC)) {
+                if ((Self__F3RE->count__EGC ==  0)) {
+                  result__I3RE=TRUE__;
                 } else {
-                  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);
+                  Self__NYYB=((__CHARACTER *)Self__F3RE->storage__F5R);
+                  other__OYYB=((__STRING *)str_tmp2__WL4E)->storage__F5R;
+                  i__BZYB=(__INTEGER)(Self__F3RE->count__EGC -  1);
+                  while (((i__BZYB >=  0) && (Self__NYYB[i__BZYB] == ((__CHARACTER *)other__OYYB)[i__BZYB]))) {
+                    i__BZYB=(__INTEGER)(i__BZYB -  1);
                   };
-                  result__G1RE=(i__VXYB <  0);
+                  result__I3RE=(i__BZYB <  0);
                 };
               };
-              __tmp__WN4E=(! result__G1RE);
+              __tmp__CQ4E=(! result__I3RE);
             } else {
-              __tmp__WN4E=FALSE__;
+              __tmp__CQ4E=FALSE__;
             };
-            if (__tmp__WN4E) {
-              i__EH4E=(__INTEGER)(i__EH4E +  1);
-              goto while_do__1Q3F;
+            if (__tmp__CQ4E) {
+              i__QJ4E=(__INTEGER)(i__QJ4E +  1);
+              goto while_do__GV3F;
             };
           };
-          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));
+          if ((i__QJ4E <= ((__FAST_ARRAYoITM_SLOTo *)list_tmp__DJTD)->parent_arrayed_collection__CJTD.upper__5JTD)) {
+            put__to__like__C0XD(str_tmp2__WL4E,str_tmp__UJ4E,(&__string_137));
           } else {
-            put__to__like__Q0XD(str_tmp2__KJ4E,str_tmp__IH4E,(&__string_136));
+            put__to__like__C0XD(str_tmp2__WL4E,str_tmp__UJ4E,(&__string_136));
           };
         };
-        stat__BH4E=old_stat__CH4E;
+        stat__NJ4E=old_stat__OJ4E;
       } else {
-        add_last__UHT(str_tmp2__KJ4E,car__DH4E);
+        add_last__3IT(str_tmp2__WL4E,car__PJ4E);
       };
     };
-    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);
+    if ((__tmp__EK4E ==  3)) {
+      if ((car__PJ4E == '*')) {
+        if ((((__STRING *)str_tmp__UJ4E)->count__EGC >  1)) {
+          put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,code_balise__SJ4E);
         };
-        ((__STRING *)str_tmp__IH4E)->count__EGC= 0;
-        stat__BH4E= 1;
-        __tmp__WP4E=TRUE__;
+        ((__STRING *)str_tmp__UJ4E)->count__EGC= 0;
+        stat__NJ4E= 1;
+        __tmp__CS4E=TRUE__;
       } else {
-        __tmp__WP4E=FALSE__;
+        __tmp__CS4E=FALSE__;
       };
-      if ((! __tmp__WP4E)) {
-        if ((car__DH4E == '`')) {
-          old_stat__CH4E=stat__BH4E;
-          stat__BH4E= 2;
-          ((__STRING *)str_tmp2__KJ4E)->count__EGC= 0;
+      if ((! __tmp__CS4E)) {
+        if ((car__PJ4E == '`')) {
+          old_stat__OJ4E=stat__NJ4E;
+          stat__NJ4E= 2;
+          ((__STRING *)str_tmp2__WL4E)->count__EGC= 0;
         } else {
-          add_last__UHT(str_tmp__IH4E,car__DH4E);
+          add_last__3IT(str_tmp__UJ4E,car__PJ4E);
         };
       };
     };
-    cur__AH4E=(__INTEGER)(cur__AH4E +  1);
+    cur__MJ4E=(__INTEGER)(cur__MJ4E +  1);
   };
-  if ((((__STRING *)str_tmp__IH4E)->count__EGC >  1)) {
-    if (is_light__5G4E) {
-      append__2JS(buf__4G4E,str_tmp__IH4E);
+  if ((((__STRING *)str_tmp__UJ4E)->count__EGC >  1)) {
+    if (is_light__LJ4E) {
+      append__FLS(buf__KJ4E,str_tmp__UJ4E);
     } else {
-      if ((stat__BH4E ==  0)) {
-        put__to__like__Q0XD((&__string_248),buf__4G4E,(&__string_148));
+      if ((stat__NJ4E ==  0)) {
+        put__to__like__C0XD((&__string_248),buf__KJ4E,(&__string_148));
       };
-      put__to__like__Q0XD(str_tmp__IH4E,buf__4G4E,code_balise__GH4E);
+      put__to__like__C0XD(str_tmp__UJ4E,buf__KJ4E,code_balise__SJ4E);
     };
   };
 }
 
-static void append_in__2FH(__UINTEGER_32 Self__3FH,void *buffer__4FH)
+static void append_in__FHH(__UINTEGER_32 Self__GHH,void *buffer__HHH)
 // ({UINTEGER_32},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __UINTEGER_32 val__IHH;
+  __INTEGER i__LHH,j__MHH;
+  __STRING *Self__PPHH;
+  __CHARACTER tmp__RPHH;
+  val__IHH= 0;
+  i__LHH= 0;
+  j__MHH= 0;
+  if ((Self__GHH ==  0)) {
+    add_last__3IT(((__STRING *)buffer__HHH),'0');
   } else {
-    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);
+    i__LHH=(__INTEGER)(((__STRING *)buffer__HHH)->count__EGC +  1);
+    val__IHH=Self__GHH;
+    while ((val__IHH !=  0)) {
+      add_last__3IT(((__STRING *)buffer__HHH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__UINTEGER_32)(val__IHH %  10)) + ((__INTEGER_8 )'0'))))));
+      val__IHH=(__UINTEGER_32)(val__IHH /  10);
+    };
+    j__MHH=((__STRING *)buffer__HHH)->count__EGC;
+    while ((i__LHH < j__MHH)) {
+      Self__PPHH=((__STRING *)buffer__HHH);
+      tmp__RPHH=((__CHARACTER *)Self__PPHH->storage__F5R)[(__INTEGER)(i__LHH -  1)];
+      ((__CHARACTER *)Self__PPHH->storage__F5R)[(__INTEGER)(i__LHH -  1)]=((__CHARACTER *)Self__PPHH->storage__F5R)[(__INTEGER)(j__MHH -  1)];
+      ((__CHARACTER *)Self__PPHH->storage__F5R)[(__INTEGER)(j__MHH -  1)]=tmp__RPHH;
+      j__MHH=(__INTEGER)(j__MHH -  1);
+      i__LHH=(__INTEGER)(i__LHH +  1);
     };
   };
 }
 
-static void append_in__GQ4F(__SECTION_ *Self__HQ4F,void *buf__IQ4F)
+static void append_in__RU4F(__SECTION_ *Self__SU4F,void *buf__TU4F)
 // ({SECTION_},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__GV4F,Self__WLDG;
+  void *__tmp__NV4F,*__tmp__QV4F;
+  __ITM_TYPE_STYLE *Self__VVFH,*Self__XVFH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__YPHH;
+  if (((void *)Self__SU4F->name__NYDC != (void *)NULL)) {
+    append__FLS(buf__TU4F,Self__SU4F->name__NYDC);
   } else {
-    __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) {
+    __tmp__GV4F=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__SU4F->type_list__2WFC)->parent_arrayed_collection__EYC.upper__GFV -  1);
+    Self__WLDG= 0;
+    while ((Self__WLDG <= __tmp__GV4F)) {
+      __tmp__NV4F=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__SU4F->type_list__2WFC)->parent_arrayed_collection__EYC.storage__NJV)[Self__WLDG];
+      switch (((struct ___OBJ *)__tmp__NV4F)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__2JS(buf__IQ4F,((__ITM_TYPE_PARAMETER *)__tmp__CR4F)->parent_itm_type__LAE.name__FUP);
+        append__FLS(buf__TU4F,((__ITM_TYPE_PARAMETER *)__tmp__NV4F)->parent_itm_type__UBE.name__OVP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__2JS(buf__IQ4F,((__ITM_TYPE_SIMPLE *)__tmp__CR4F)->name__FUP);
+        append__FLS(buf__TU4F,((__ITM_TYPE_SIMPLE *)__tmp__NV4F)->name__OVP);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__EFPD(__tmp__CR4F,buf__IQ4F);
+        append_in__0EPD(__tmp__NV4F,buf__TU4F);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__IGPD(__tmp__CR4F,buf__IQ4F);
+        append_in__4FPD(__tmp__NV4F,buf__TU4F);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__VVFH=((__ITM_TYPE_STYLE *)__tmp__NV4F);
+        if (((void *)Self__VVFH->style__XVP != (void *)NULL)) {
+          append__FLS(buf__TU4F,Self__VVFH->style__XVP);
+          add_last__3IT(buf__TU4F,' ');
         };
-        append__2JS(buf__IQ4F,Self__MRFH->parent_itm_type_simple__2NN.name__FUP);
+        append__FLS(buf__TU4F,Self__VVFH->parent_itm_type_simple__FPN.name__OVP);
       } break;
       };
-      add_last__UHT(buf__IQ4F,',');
-      add_last__UHT(buf__IQ4F,' ');
-      Self__LHDG=(__INTEGER)(Self__LHDG +  1);
+      add_last__3IT(buf__TU4F,',');
+      add_last__3IT(buf__TU4F,' ');
+      Self__WLDG=(__INTEGER)(Self__WLDG +  1);
     };
-    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) {
+    Self__YPHH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__SU4F->type_list__2WFC);
+    __tmp__QV4F=((void **)Self__YPHH->parent_arrayed_collection__EYC.storage__NJV)[Self__YPHH->parent_arrayed_collection__EYC.upper__GFV];
+    switch (((struct ___OBJ *)__tmp__QV4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__2JS(buf__IQ4F,((__ITM_TYPE_PARAMETER *)__tmp__FR4F)->parent_itm_type__LAE.name__FUP);
+      append__FLS(buf__TU4F,((__ITM_TYPE_PARAMETER *)__tmp__QV4F)->parent_itm_type__UBE.name__OVP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__2JS(buf__IQ4F,((__ITM_TYPE_SIMPLE *)__tmp__FR4F)->name__FUP);
+      append__FLS(buf__TU4F,((__ITM_TYPE_SIMPLE *)__tmp__QV4F)->name__OVP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__EFPD(__tmp__FR4F,buf__IQ4F);
+      append_in__0EPD(__tmp__QV4F,buf__TU4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__IGPD(__tmp__FR4F,buf__IQ4F);
+      append_in__4FPD(__tmp__QV4F,buf__TU4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__XVFH=((__ITM_TYPE_STYLE *)__tmp__QV4F);
+      if (((void *)Self__XVFH->style__XVP != (void *)NULL)) {
+        append__FLS(buf__TU4F,Self__XVFH->style__XVP);
+        add_last__3IT(buf__TU4F,' ');
       };
-      append__2JS(buf__IQ4F,Self__ORFH->parent_itm_type_simple__2NN.name__FUP);
+      append__FLS(buf__TU4F,Self__XVFH->parent_itm_type_simple__FPN.name__OVP);
     } break;
     };
   };
 }
 
-static void shorter_profile_in__IR4F(__ITM_SLOT *Self__JR4F,void *buf__KR4F)
+static void shorter_profile_in__TV4F(__ITM_SLOT *Self__UV4F,void *buf__VV4F)
 // ({ITM_SLOT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER j__NY5F,i__OY5F;
+  void *__tmp__TY5F,*__tmp__1Z5F,*__tmp__105F;
+  __STRING_CONSTANT *Self__JWFH;
+  void *__tmp__NW4F;
+  __ITM_TYPE_MULTI *Self__2W1G;
+  __ITM_TYPE_STYLE *Self__TWFH;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__LWFH;
+  if ((Self__UV4F->parent_named__15.style__FBU == '+')) {
+    put__to__like__IGBG((&__string_249),buf__VV4F,(&__string_132));
   } else {
-    put__to__like__3BBG((&__string_250),buf__KR4F,(&__string_132));
+    put__to__like__IGBG((&__string_250),buf__VV4F,(&__string_132));
   };
   ((__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);
+  j__NY5F= 1;
+  __tmp__TY5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__UV4F->argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+  if (((struct ___OBJ *)__tmp__TY5F)->__id==__ITM_ARG__) {
+    shorter_in__JDBG(__tmp__TY5F,buf__VV4F);
   } else {
-    shorter_in__V5AG(__tmp__IU5F,buf__KR4F);
+    shorter_in__AEBG(__tmp__TY5F,buf__VV4F);
   };
-  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);
+  add_last__3IT(buf__VV4F,'.');
+  i__OY5F= 1;
+  while ((j__NY5F < ((__STRING_CONSTANT *)Self__UV4F->parent_named__15.name__LI)->count__DD)) {
+    if (((((__CHARACTER *)((__STRING_CONSTANT *)Self__UV4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)(j__NY5F -  1)] == '_') && (((__CHARACTER *)((__STRING_CONSTANT *)Self__UV4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)((__INTEGER)(j__NY5F +  1) -  1)] == '_'))) {
+      put__to__like__IGBG(string_tmp__VH,buf__VV4F,(&__string_130));
+      add_last__3IT(buf__VV4F,' ');
+      __tmp__1Z5F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__UV4F->argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[i__OY5F];
+      if (((struct ___OBJ *)__tmp__1Z5F)->__id==__ITM_ARG__) {
+        shorter_in__JDBG(__tmp__1Z5F,buf__VV4F);
       } else {
-        shorter_in__V5AG(__tmp__QV5F,buf__KR4F);
+        shorter_in__AEBG(__tmp__1Z5F,buf__VV4F);
       };
-      add_last__UHT(buf__KR4F,' ');
+      add_last__3IT(buf__VV4F,' ');
       ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      j__CU5F=(__INTEGER)(j__CU5F +  2);
-      i__DU5F=(__INTEGER)(i__DU5F +  1);
+      j__NY5F=(__INTEGER)(j__NY5F +  2);
+      i__OY5F=(__INTEGER)(i__OY5F +  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);
+      add_last__3IT(string_tmp__VH,((__CHARACTER *)((__STRING_CONSTANT *)Self__UV4F->parent_named__15.name__LI)->storage__ZNO)[(__INTEGER)(j__NY5F -  1)]);
+      j__NY5F=(__INTEGER)(j__NY5F +  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);
+  Self__JWFH=((__STRING_CONSTANT *)Self__UV4F->parent_named__15.name__LI);
+  add_last__3IT(string_tmp__VH,((__CHARACTER *)Self__JWFH->storage__ZNO)[(__INTEGER)(Self__JWFH->count__DD -  1)]);
+  put__to__like__IGBG(string_tmp__VH,buf__VV4F,(&__string_130));
+  if ((i__OY5F <= ((__FAST_ARRAYoITM_ARGUMENTo *)Self__UV4F->argument_list__RDHC)->parent_arrayed_collection__AAZB.upper__J5GC)) {
+    add_last__3IT(buf__VV4F,' ');
+    Self__LWFH=((__FAST_ARRAYoITM_ARGUMENTo *)Self__UV4F->argument_list__RDHC);
+    __tmp__105F=((void **)Self__LWFH->parent_arrayed_collection__AAZB.storage__HAHC)[Self__LWFH->parent_arrayed_collection__AAZB.upper__J5GC];
+    if (((struct ___OBJ *)__tmp__105F)->__id==__ITM_ARG__) {
+      shorter_in__JDBG(__tmp__105F,buf__VV4F);
     } else {
-      shorter_in__V5AG(__tmp__QW5F,buf__KR4F);
+      shorter_in__AEBG(__tmp__105F,buf__VV4F);
     };
-    add_last__UHT(buf__KR4F,' ');
+    add_last__3IT(buf__VV4F,' ');
   };
-  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) {
+  if (((void *)Self__UV4F->result_type__B4FC != (void *)type_void__VUF)) {
+    add_last__3IT(buf__VV4F,':');
+    __tmp__NW4F=Self__UV4F->result_type__B4FC;
+    switch (((struct ___OBJ *)__tmp__NW4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__CS4F,buf__KR4F);
+      shorter_in__ZMDG(__tmp__NW4F,buf__VV4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__CS4F,buf__KR4F);
+      shorter_in__KNDG(__tmp__NW4F,buf__VV4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__2W1G=((__ITM_TYPE_MULTI *)__tmp__NW4F);
+      add_last__3IT(buf__VV4F,'(');
+      shorter_raw_in__LVFG(Self__2W1G,buf__VV4F);
+      add_last__3IT(buf__VV4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__CS4F,buf__KR4F);
+      shorter_in__1NDG(__tmp__NW4F,buf__VV4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__CS4F,buf__KR4F);
+      shorter_in__DPDG(__tmp__NW4F,buf__VV4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__TWFH=((__ITM_TYPE_STYLE *)__tmp__NW4F);
+      if (((void *)Self__TWFH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__TWFH->style__XVP,buf__VV4F,(&__string_119));
+        add_last__3IT(buf__VV4F,' ');
       };
-      put__to__like__2OFG(Self__KSFH->parent_itm_type_simple__2NN.name__FUP,buf__KR4F,(&__string_125));
+      put__to__like__HTFG(Self__TWFH->parent_itm_type_simple__FPN.name__OVP,buf__VV4F,(&__string_125));
     } break;
     };
   };
 }
 
-static void shorter_profile_in__FS4F(__ITM_SLOT_OPERATOR *Self__GS4F,void *buf__HS4F)
+static void shorter_profile_in__QW4F(__ITM_SLOT_OPERATOR *Self__RW4F,void *buf__SW4F)
 // ({ITM_SLOT_OPERATOR},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__D2IH,*Self__I2IH;
+  __INTEGER i__B2IH,i__G2IH,Self__YFMG,result__0FMG,i__KHMG,j__LHMG;
+  void *__tmp__315F,*__tmp__S25F,*__tmp__I35F,*__tmp__S35F;
+  void *result__W5LG;
+  __INTEGER_32 Self__5GMG,val__HHMG;
+  __STRING *Self__5UFB;
+  void *__tmp__KX4F;
+  __ITM_TYPE_MULTI *Self__KTDG;
+  __ITM_TYPE_STYLE *Self__VWFH;
+  __BOOLEAN result__A2IH,__tmp__C25F,result__F2IH;
+  __CHARACTER tmp__CVFB;
+  if ((Self__RW4F->parent_itm_slot__BT5B.parent_named__15.style__FBU == '+')) {
+    put__to__like__RTDG((&__string_249),buf__SW4F,(&__string_132));
   } else {
-    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__;
+    put__to__like__RTDG((&__string_250),buf__SW4F,(&__string_132));
+  };
+  Self__D2IH=((__STRING_CONSTANT *)Self__RW4F->parent_itm_slot__BT5B.parent_named__15.name__LI);
+  result__A2IH=FALSE__;
+  i__B2IH= 0;
+  if ((((__STRING_CONSTANT *)(&__string_82))->count__DD <= Self__D2IH->count__DD)) {
+    i__B2IH=((__STRING_CONSTANT *)(&__string_82))->count__DD;
+    while ((! ((i__B2IH ==  0) || (((__CHARACTER *)Self__D2IH->storage__ZNO)[(__INTEGER)(i__B2IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_82))->storage__ZNO)[(__INTEGER)(i__B2IH -  1)])))) {
+      i__B2IH=(__INTEGER)(i__B2IH -  1);
+    };
+    result__A2IH=(i__B2IH ==  0);
+  };
+  if (result__A2IH) {
+    __tmp__315F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__RW4F->parent_itm_slot__BT5B.argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+    if (((struct ___OBJ *)__tmp__315F)->__id==__ITM_ARG__) {
+      shorter_in__JDBG(__tmp__315F,buf__SW4F);
+    } else {
+      shorter_in__AEBG(__tmp__315F,buf__SW4F);
+    };
+    add_last__3IT(buf__SW4F,' ');
+    add_last__3IT(buf__SW4F,'\'');
+    put__to__like__RTDG(Self__RW4F->pretty_name__A0HC,buf__SW4F,(&__string_130));
+    add_last__3IT(buf__SW4F,'\'');
+    add_last__3IT(buf__SW4F,' ');
+    __tmp__C25F=TRUE__;
   } else {
-    __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,' ');
+    __tmp__C25F=FALSE__;
+  };
+  if ((! __tmp__C25F)) {
+    Self__I2IH=((__STRING_CONSTANT *)Self__RW4F->parent_itm_slot__BT5B.parent_named__15.name__LI);
+    result__F2IH=FALSE__;
+    i__G2IH= 0;
+    if ((((__STRING_CONSTANT *)(&__string_81))->count__DD <= Self__I2IH->count__DD)) {
+      i__G2IH=((__STRING_CONSTANT *)(&__string_81))->count__DD;
+      while ((! ((i__G2IH ==  0) || (((__CHARACTER *)Self__I2IH->storage__ZNO)[(__INTEGER)(i__G2IH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_81))->storage__ZNO)[(__INTEGER)(i__G2IH -  1)])))) {
+        i__G2IH=(__INTEGER)(i__G2IH -  1);
+      };
+      result__F2IH=(i__G2IH ==  0);
+    };
+    if (result__F2IH) {
+      __tmp__S25F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__RW4F->parent_itm_slot__BT5B.argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+      if (((struct ___OBJ *)__tmp__S25F)->__id==__ITM_ARG__) {
+        shorter_in__JDBG(__tmp__S25F,buf__SW4F);
+      } else {
+        shorter_in__AEBG(__tmp__S25F,buf__SW4F);
+      };
+      add_last__3IT(buf__SW4F,' ');
+      add_last__3IT(buf__SW4F,'\'');
+      put__to__like__RTDG(Self__RW4F->pretty_name__A0HC,buf__SW4F,(&__string_130));
+      add_last__3IT(buf__SW4F,'\'');
+      if ((Self__RW4F->priority_and_level__VZHC !=  0)) {
+        add_last__3IT(buf__SW4F,' ');
+        result__W5LG=NULL;
+        if ((Self__RW4F->priority_and_level__VZHC >=  0)) {
+          result__W5LG=(&__string_6);
+        } else {
+          result__W5LG=(&__string_5);
+        };
+        put__to__like__RTDG(result__W5LG,buf__SW4F,(&__string_119));
+        add_last__3IT(buf__SW4F,' ');
         ((__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);
+        Self__YFMG=Self__RW4F->priority_and_level__VZHC;
+        result__0FMG= 0;
+        if ((Self__YFMG <  0)) {
+          result__0FMG=(__INTEGER)(- Self__YFMG);
         } else {
-          result__PBMG=Self__NBMG;
+          result__0FMG=Self__YFMG;
         };
-        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');
+        Self__5GMG=((__INTEGER_32 )result__0FMG);
+        val__HHMG= 0;
+        i__KHMG= 0;
+        j__LHMG= 0;
+        if ((Self__5GMG ==  0)) {
+          add_last__3IT(((__STRING *)string_tmp__VH),'0');
         } else {
-          if ((Self__UCMG >  0)) {
-            val__2CMG=Self__UCMG;
+          if ((Self__5GMG >  0)) {
+            val__HHMG=Self__5GMG;
           } else {
-            val__2CMG=(__INTEGER_32)(- Self__UCMG);
-            add_last__UHT(((__STRING *)string_tmp__VH),'-');
+            val__HHMG=(__INTEGER_32)(- Self__5GMG);
+            add_last__3IT(((__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);
+          i__KHMG=(__INTEGER)(((__STRING *)string_tmp__VH)->count__EGC +  1);
+          while ((val__HHMG !=  0)) {
+            add_last__3IT(((__STRING *)string_tmp__VH),((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER_32)(val__HHMG %  10)) + ((__INTEGER_8 )'0'))))));
+            val__HHMG=(__INTEGER_32)(val__HHMG /  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);
+          j__LHMG=((__STRING *)string_tmp__VH)->count__EGC;
+          while ((i__KHMG < j__LHMG)) {
+            Self__5UFB=((__STRING *)string_tmp__VH);
+            tmp__CVFB=((__CHARACTER *)Self__5UFB->storage__F5R)[(__INTEGER)(i__KHMG -  1)];
+            ((__CHARACTER *)Self__5UFB->storage__F5R)[(__INTEGER)(i__KHMG -  1)]=((__CHARACTER *)Self__5UFB->storage__F5R)[(__INTEGER)(j__LHMG -  1)];
+            ((__CHARACTER *)Self__5UFB->storage__F5R)[(__INTEGER)(j__LHMG -  1)]=tmp__CVFB;
+            j__LHMG=(__INTEGER)(j__LHMG -  1);
+            i__KHMG=(__INTEGER)(i__KHMG +  1);
           };
         };
-        put__to__like__GPDG(string_tmp__VH,buf__HS4F,(&__string_119));
+        put__to__like__RTDG(string_tmp__VH,buf__SW4F,(&__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);
+      add_last__3IT(buf__SW4F,' ');
+      __tmp__I35F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__RW4F->parent_itm_slot__BT5B.argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 1];
+      if (((struct ___OBJ *)__tmp__I35F)->__id==__ITM_ARG__) {
+        shorter_in__JDBG(__tmp__I35F,buf__SW4F);
       } else {
-        shorter_in__V5AG(__tmp__3Y5F,buf__HS4F);
+        shorter_in__AEBG(__tmp__I35F,buf__SW4F);
       };
-      add_last__UHT(buf__HS4F,' ');
+      add_last__3IT(buf__SW4F,' ');
     } 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);
+      add_last__3IT(buf__SW4F,'\'');
+      put__to__like__RTDG(Self__RW4F->pretty_name__A0HC,buf__SW4F,(&__string_130));
+      add_last__3IT(buf__SW4F,'\'');
+      add_last__3IT(buf__SW4F,' ');
+      __tmp__S35F=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)Self__RW4F->parent_itm_slot__BT5B.argument_list__RDHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+      if (((struct ___OBJ *)__tmp__S35F)->__id==__ITM_ARG__) {
+        shorter_in__JDBG(__tmp__S35F,buf__SW4F);
       } else {
-        shorter_in__V5AG(__tmp__HZ5F,buf__HS4F);
+        shorter_in__AEBG(__tmp__S35F,buf__SW4F);
       };
-      add_last__UHT(buf__HS4F,' ');
+      add_last__3IT(buf__SW4F,' ');
     };
   };
-  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) {
+  if (((void *)Self__RW4F->parent_itm_slot__BT5B.result_type__B4FC != (void *)type_void__VUF)) {
+    add_last__3IT(buf__SW4F,':');
+    __tmp__KX4F=Self__RW4F->parent_itm_slot__BT5B.result_type__B4FC;
+    switch (((struct ___OBJ *)__tmp__KX4F)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__5S4F,buf__HS4F);
+      shorter_in__ZMDG(__tmp__KX4F,buf__SW4F);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__5S4F,buf__HS4F);
+      shorter_in__KNDG(__tmp__KX4F,buf__SW4F);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__KTDG=((__ITM_TYPE_MULTI *)__tmp__KX4F);
+      add_last__3IT(buf__SW4F,'(');
+      shorter_raw_in__LVFG(Self__KTDG,buf__SW4F);
+      add_last__3IT(buf__SW4F,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__5S4F,buf__HS4F);
+      shorter_in__1NDG(__tmp__KX4F,buf__SW4F);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__5S4F,buf__HS4F);
+      shorter_in__DPDG(__tmp__KX4F,buf__SW4F);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__VWFH=((__ITM_TYPE_STYLE *)__tmp__KX4F);
+      if (((void *)Self__VWFH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__VWFH->style__XVP,buf__SW4F,(&__string_119));
+        add_last__3IT(buf__SW4F,' ');
       };
-      put__to__like__2OFG(Self__MSFH->parent_itm_type_simple__2NN.name__FUP,buf__HS4F,(&__string_125));
+      put__to__like__HTFG(Self__VWFH->parent_itm_type_simple__FPN.name__OVP,buf__SW4F,(&__string_125));
     } break;
     };
   };
 }
 
-static __CHARACTER* create__UHEB(__INTEGER nb_elements__WHEB)
+static __CHARACTER* create__3IEB(__INTEGER nb_elements__5IEB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__N2DH,a__ZWFH,new_size__O2DH,new_size2__P2DH,a__3WFH;
+  __UINTEGER_32 new_size__4WFH;
+  __POINTER result__M2DH,ptr_table__L2IH,next__K2IH,result__M2IH;
+  void *result__P2IH;
+  __INTEGER Self__LUKC;
+  __CHARACTER *Result__A4JB;
+  sz__N2DH=((__UINTEGER_32 )nb_elements__5IEB);
+  result__M2DH=((__POINTER )(NULL));
+  a__ZWFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__O2DH=(__UINTEGER_32)((__UINTEGER_32)(sz__N2DH + a__ZWFH) & (__UINTEGER_32)(~ a__ZWFH));
+  new_size2__P2DH=(__UINTEGER_32)(new_size__O2DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__P2DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__3WFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__4WFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__P2DH + a__3WFH) & (__UINTEGER_32)(~ a__3WFH));
+    ptr_table__L2IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4WFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__K2IH=((__POINTER )(NULL));
+    result__M2IH=((__POINTER *)ptr_table__L2IH)[ 0];
+    if ((result__M2IH == (void *)NULL)) {
+      result__M2IH=new_lab__ZPJ(new_size__4WFH);
+      next__K2IH=(void *)((unsigned long)result__M2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WFH)));
+      ((__POINTER *)next__K2IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__L2IH)[ 0]=next__K2IH;
+    } else {
+      next__K2IH=((__POINTER *)result__M2IH)[ 0];
+      if ((next__K2IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__M2IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4WFH <<  1)) <=  4096)) {
+          next__K2IH=(void *)((unsigned long)result__M2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4WFH)));
+        } else {
+          next__K2IH=new_lab__ZPJ(new_size__4WFH);
+        };
+        ((__POINTER *)next__K2IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__L2IH)[ 0]=next__K2IH;
+      } else {
+        ((__POINTER *)result__M2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__M2IH=next__K2IH;
+      };
+    };
+    ((__POINTER *)result__M2IH)[ 0]=((__POINTER ) 3);
+    result__M2DH=(void *)((unsigned long)result__M2IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__P2IH=first_free__BCVB;
+    while ((((void *)result__P2IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__P2IH)->map_size_and_id__YTB &  4294967292LU) < new_size__O2DH))) {
+      result__P2IH=((__MEMORY *)result__P2IH)->map_next_free__ZTB;
     };
-    if (((void *)result__GYIH == (void *)NULL)) {
-      result__GYIH=new_page__B24();
+    if (((void *)result__P2IH == (void *)NULL)) {
+      result__P2IH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__P2IH,new_size__O2DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__P2IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__M2DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__P2IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__A4JB=((__CHARACTER *)result__M2DH);
+  Self__LUKC=(__INTEGER)(nb_elements__5IEB -  1);
+  while ((Self__LUKC >=  0)) {
+    Result__A4JB[Self__LUKC]='\0';
+    Self__LUKC=(__INTEGER)(Self__LUKC -  1);
   };
-  return(Result__W2JB);
+  return(Result__A4JB);
 }
 
-static __POINTER realloc_dynamic__old_size__new_size__XCLC(__POINTER p__ZCLC,__UINTEGER_32 old_sz__0CLC,__UINTEGER_32 new_sz__1CLC)
+static __POINTER realloc_dynamic__old_size__new_size__LELC(__POINTER p__NELC,__UINTEGER_32 old_sz__OELC,__UINTEGER_32 new_sz__PELC)
 // ({POINTER},{UINTEGER_32},{UINTEGER_32}) With resultNo recursive, No inlinable.
 {
-  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;
+  void *mem__0ELC,*result__52IH,*nxt__4DED,*result__5DED,*result__C3IH;
+  void *next__BBND,*new_free__ABND,*prev__QYFH,*next__RYFH;
+  __POINTER result__1ELC,result__Y2DH,ptr_table__12IH,next__02IH;
+  __POINTER result__22IH,__tmp__5FLC,last__ZPHD,src__KBED,dst__LBED;
+  __UINTEGER_32 a__PXFH,old_size__RELC,old_size2__UELC,a__TXFH;
+  __UINTEGER_32 new_size__XELC,a__XXFH,new_size__02DH,new_size2__12DH;
+  __UINTEGER_32 a__1XFH,new_size__2XFH,a__JQH,__tmp__MGLC,sz__DEED;
+  __UINTEGER_32 old_size__AEED,prev__CBND,new_size__FBND;
+  __INTEGER siz__RXHH,Self__WXHH,siz__PBED,Self__MNHD;
+  __MEMORY *Self__0DED;
+  __POINTER *na_src__TXHH,*na_dst__VXHH,*na_src__NBED,*na_dst__OBED;
+  mem__0ELC=NULL;
+  result__1ELC=((__POINTER )(NULL));
+  a__PXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  old_size__RELC=(__UINTEGER_32)((__UINTEGER_32)(old_sz__OELC + a__PXFH) & (__UINTEGER_32)(~ a__PXFH));
+  old_size2__UELC=(__UINTEGER_32)(old_size__RELC + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  a__TXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__XELC=(__UINTEGER_32)((__UINTEGER_32)(new_sz__PELC + a__TXFH) & (__UINTEGER_32)(~ a__TXFH));
+  if ((old_size2__UELC <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    result__Y2DH=((__POINTER )(NULL));
+    a__XXFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__02DH=(__UINTEGER_32)((__UINTEGER_32)(new_size__XELC + a__XXFH) & (__UINTEGER_32)(~ a__XXFH));
+    new_size2__12DH=(__UINTEGER_32)(new_size__02DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+    if ((new_size2__12DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+      a__1XFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__2XFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__12DH + a__1XFH) & (__UINTEGER_32)(~ a__1XFH));
+      ptr_table__12IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2XFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__02IH=((__POINTER )(NULL));
+      result__22IH=((__POINTER *)ptr_table__12IH)[ 0];
+      if ((result__22IH == (void *)NULL)) {
+        result__22IH=new_lab__ZPJ(new_size__2XFH);
+        next__02IH=(void *)((unsigned long)result__22IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XFH)));
+        ((__POINTER *)next__02IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__12IH)[ 0]=next__02IH;
+      } else {
+        next__02IH=((__POINTER *)result__22IH)[ 0];
+        if ((next__02IH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__22IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2XFH <<  1)) <=  4096)) {
+            next__02IH=(void *)((unsigned long)result__22IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2XFH)));
+          } else {
+            next__02IH=new_lab__ZPJ(new_size__2XFH);
+          };
+          ((__POINTER *)next__02IH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__12IH)[ 0]=next__02IH;
+        } else {
+          ((__POINTER *)result__22IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__02IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__22IH=next__02IH;
+        };
+      };
+      ((__POINTER *)result__22IH)[ 0]=((__POINTER ) 3);
+      result__Y2DH=(void *)((unsigned long)result__22IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
+    } else {
+      result__52IH=first_free__BCVB;
+      while ((((void *)result__52IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__52IH)->map_size_and_id__YTB &  4294967292LU) < new_size__02DH))) {
+        result__52IH=((__MEMORY *)result__52IH)->map_next_free__ZTB;
+      };
+      if (((void *)result__52IH == (void *)NULL)) {
+        result__52IH=new_page__K34();
+      };
+      to_busy__index__4SFC(result__52IH,new_size__02DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__52IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+      result__Y2DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__52IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+    };
+    result__1ELC=result__Y2DH;
+    siz__RXHH=((__INTEGER )old_size__RELC);
+    siz__RXHH=(__INTEGER)(siz__RXHH / ((__INTEGER )(sizeof(void *))));
+    na_src__TXHH=((__POINTER *)p__NELC);
+    na_dst__VXHH=((__POINTER *)result__Y2DH);
+    Self__WXHH=(__INTEGER)(siz__RXHH -  1);
+    while ((Self__WXHH >=  0)) {
+      na_dst__VXHH[Self__WXHH]=na_src__TXHH[Self__WXHH];
+      Self__WXHH=(__INTEGER)(Self__WXHH -  1);
+    };
+    __tmp__5FLC=(void *)((unsigned long)p__NELC - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *)))));
+    a__JQH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    last__ZPHD=((__POINTER *)((__POINTER )(&(table_size[((__UINTEGER_32)((__UINTEGER_32)((__UINTEGER_32)(old_size2__UELC + a__JQH) & (__UINTEGER_32)(~ a__JQH)) / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1]))))[ 0];
+    ((__POINTER *)__tmp__5FLC)[ 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__ZPHD)[ 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__ZPHD)[ 0]=__tmp__5FLC;
   } else {
-    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);
+    mem__0ELC=((void *)(void *)((unsigned long)p__NELC - (unsigned long)((__POINTER ) 8)));
+    __tmp__MGLC=(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)p__NELC - (unsigned long)begin_memory__GUH)))) >>  26);
+    Self__0DED=((__MEMORY *)mem__0ELC);
+    nxt__4DED=NULL;
+    result__5DED=NULL;
+    sz__DEED= 0;
+    old_size__AEED=(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967292LU);
+    if ((new_size__XELC > old_size__AEED)) {
+      if ((! ((__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  2) !=  0))) {
+        nxt__4DED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967292LU)))));
+        sz__DEED=(__UINTEGER_32)((__UINTEGER_32)(new_size__XELC - old_size__AEED) -  8);
+        if ((((__UINTEGER_32)(((__MEMORY *)nxt__4DED)->map_size_and_id__YTB &  1) ==  0) && ((__UINTEGER_32)(((__MEMORY *)nxt__4DED)->map_size_and_id__YTB &  4294967292LU) >= sz__DEED))) {
+          to_busy__index__4SFC(nxt__4DED,sz__DEED,__tmp__MGLC);
+          Self__0DED->map_size_and_id__YTB=(__UINTEGER_32)((__UINTEGER_32)(Self__0DED->map_size_and_id__YTB + (__UINTEGER_32)(((__MEMORY *)nxt__4DED)->map_size_and_id__YTB &  4294967294LU)) +  8);
+          if (((__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  2) !=  0)) {
+            last_block[(__tmp__MGLC)] = (Self__0DED);
+          } else {
+            nxt__4DED=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967292LU)))));
+            ((__MEMORY *)nxt__4DED)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)begin_memory__GUH))));
+          };
+          result__5DED=Self__0DED;
+        };
+      };
+      if (((void *)result__5DED == (void *)NULL)) {
+        result__C3IH=first_free__BCVB;
+        while ((((void *)result__C3IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__C3IH)->map_size_and_id__YTB &  4294967292LU) < new_size__XELC))) {
+          result__C3IH=((__MEMORY *)result__C3IH)->map_next_free__ZTB;
+        };
+        if (((void *)result__C3IH == (void *)NULL)) {
+          result__C3IH=new_page__K34();
+        };
+        to_busy__index__4SFC(result__C3IH,new_size__XELC,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__C3IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+        result__5DED=result__C3IH;
+        src__KBED=(void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        dst__LBED=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__C3IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+        siz__PBED=((__INTEGER )old_size__AEED);
+        siz__PBED=(__INTEGER)(siz__PBED / ((__INTEGER )(sizeof(void *))));
+        na_src__NBED=((__POINTER *)src__KBED);
+        na_dst__OBED=((__POINTER *)dst__LBED);
+        Self__MNHD=(__INTEGER)(siz__PBED -  1);
+        while ((Self__MNHD >=  0)) {
+          na_dst__OBED[Self__MNHD]=na_src__NBED[Self__MNHD];
+          Self__MNHD=(__INTEGER)(Self__MNHD -  1);
+        };
+        prev__CBND=Self__0DED->map_previous_linear__XTB;
+        next__BBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967292LU)))));
+        new_free__ABND=((void *)(void *)((unsigned long)begin_memory__GUH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )prev__CBND))));
+        new_size__FBND=(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967294LU);
+        if (((prev__CBND ==  4294967295LU) || ((__UINTEGER_32)(((__MEMORY *)new_free__ABND)->map_size_and_id__YTB &  1) !=  0))) {
+          new_free__ABND=Self__0DED;
+          Self__0DED->map_next_free__ZTB=first_free__BCVB;
+          Self__0DED->map_previous_free__0TB=NULL;
+          if (((void *)first_free__BCVB != (void *)NULL)) {
+            ((__MEMORY *)first_free__BCVB)->map_previous_free__0TB=Self__0DED;
+          };
+          first_free__BCVB=Self__0DED;
+        } else {
+          new_size__FBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__FBND + ((__MEMORY *)new_free__ABND)->map_size_and_id__YTB) +  8);
+        };
+        if (((! ((__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  2) !=  0)) && ((__UINTEGER_32)(((__MEMORY *)next__BBND)->map_size_and_id__YTB &  1) ==  0))) {
+          new_size__FBND=(__UINTEGER_32)((__UINTEGER_32)(new_size__FBND + ((__MEMORY *)next__BBND)->map_size_and_id__YTB) +  8);
+          prev__QYFH=((__MEMORY *)next__BBND)->map_previous_free__0TB;
+          next__RYFH=((__MEMORY *)next__BBND)->map_next_free__ZTB;
+          if (((void *)prev__QYFH == (void *)NULL)) {
+            first_free__BCVB=next__RYFH;
+          } else {
+            ((__MEMORY *)prev__QYFH)->map_next_free__ZTB=next__RYFH;
+          };
+          if (((void *)next__RYFH != (void *)NULL)) {
+            ((__MEMORY *)next__RYFH)->map_previous_free__0TB=prev__QYFH;
+          };
+        };
+        ((__MEMORY *)new_free__ABND)->map_size_and_id__YTB=new_size__FBND;
+        if (((__UINTEGER_32)(((__MEMORY *)new_free__ABND)->map_size_and_id__YTB &  2) !=  0)) {
+          last_block[(__tmp__MGLC)] = (new_free__ABND);
+        } else {
+          next__BBND=((void *)(void *)((unsigned long)(void *)((unsigned long)((__POINTER )Self__0DED) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8))) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )(__UINTEGER_32)(Self__0DED->map_size_and_id__YTB &  4294967292LU)))));
+          ((__MEMORY *)next__BBND)->map_previous_linear__XTB=((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )new_free__ABND) - (unsigned long)begin_memory__GUH))));
+        };
+      };
+    } else {
+      result__5DED=Self__0DED;
+    };
+    result__1ELC=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__5DED)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
+  };
+  return(result__1ELC);
 }
 
-static void** create__R4QB(__INTEGER nb_elements__T4QB)
+static void** create__35QB(__INTEGER nb_elements__55QB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__E3DH,a__J3DH,new_size__F3DH,new_size2__G3DH,a__PZFH;
+  __UINTEGER_32 new_size__QZFH;
+  __POINTER result__D3DH,ptr_table__G3IH,next__F3IH,result__H3IH;
+  void *result__K3IH;
+  __INTEGER Self__44MC;
+  void **Result__F3TB;
+  sz__E3DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__55QB * ((__INTEGER )(sizeof(void *)))));
+  result__D3DH=((__POINTER )(NULL));
+  a__J3DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__F3DH=(__UINTEGER_32)((__UINTEGER_32)(sz__E3DH + a__J3DH) & (__UINTEGER_32)(~ a__J3DH));
+  new_size2__G3DH=(__UINTEGER_32)(new_size__F3DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__G3DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__PZFH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__QZFH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__G3DH + a__PZFH) & (__UINTEGER_32)(~ a__PZFH));
+    ptr_table__G3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QZFH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__F3IH=((__POINTER )(NULL));
+    result__H3IH=((__POINTER *)ptr_table__G3IH)[ 0];
+    if ((result__H3IH == (void *)NULL)) {
+      result__H3IH=new_lab__ZPJ(new_size__QZFH);
+      next__F3IH=(void *)((unsigned long)result__H3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZFH)));
+      ((__POINTER *)next__F3IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__G3IH)[ 0]=next__F3IH;
+    } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QZFH <<  1)) <=  4096)) {
+          next__F3IH=(void *)((unsigned long)result__H3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QZFH)));
+        } else {
+          next__F3IH=new_lab__ZPJ(new_size__QZFH);
+        };
+        ((__POINTER *)next__F3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__G3IH)[ 0]=next__F3IH;
+      } else {
+        ((__POINTER *)result__H3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__F3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__H3IH=next__F3IH;
+      };
+    };
+    ((__POINTER *)result__H3IH)[ 0]=((__POINTER ) 3);
+    result__D3DH=(void *)((unsigned long)result__H3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__K3IH=first_free__BCVB;
+    while ((((void *)result__K3IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__K3IH)->map_size_and_id__YTB &  4294967292LU) < new_size__F3DH))) {
+      result__K3IH=((__MEMORY *)result__K3IH)->map_next_free__ZTB;
     };
-    if (((void *)result__BZIH == (void *)NULL)) {
-      result__BZIH=new_page__B24();
+    if (((void *)result__K3IH == (void *)NULL)) {
+      result__K3IH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__K3IH,new_size__F3DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__K3IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__D3DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__K3IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__F3TB=((void **)result__D3DH);
+  Self__44MC=(__INTEGER)(nb_elements__55QB -  1);
+  while ((Self__44MC >=  0)) {
+    Result__F3TB[Self__44MC]=NULL;
+    Self__44MC=(__INTEGER)(Self__44MC -  1);
   };
-  return(Result__Z1TB);
+  return(Result__F3TB);
 }
 
-static void* fast_reference_at__TXT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__UXT,void *k__VXT)
+static void* fast_reference_at__2YT(__HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo *Self__3YT,void *k__4YT)
 // ({HASHED_DICTIONARYoITM_TYPE_SIMPLExSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__JZT;
+  __STRING_CONSTANT *Self__DYHH;
+  __INTEGER result__CYHH,__tmp__EYHH,Self__FYHH;
+  void *node__IZT;
+  result__JZT=NULL;
+  Self__DYHH=((__STRING_CONSTANT *)k__4YT);
+  result__CYHH= 0;
+  __tmp__EYHH=Self__DYHH->count__DD;
+  Self__FYHH= 1;
+  while ((Self__FYHH <= __tmp__EYHH)) {
+    result__CYHH=(__INTEGER)((__INTEGER)( 5 * result__CYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__DYHH->storage__ZNO)[(__INTEGER)(Self__FYHH -  1)])));
+    Self__FYHH=(__INTEGER)(Self__FYHH +  1);
+  };
+  if ((result__CYHH <  0)) {
+    result__CYHH=(__INTEGER)(~ result__CYHH);
+  };
+  node__IZT=((void **)Self__3YT->buckets__QZT)[(__INTEGER)(result__CYHH % Self__3YT->capacity__LZT)];
+  while ((! (((void *)node__IZT == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__IZT)->key__2ZT == (void *)k__4YT)))) {
+    node__IZT=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__IZT)->next__H0T;
+  };
+  if (((void *)node__IZT != (void *)NULL)) {
+    result__JZT=((__HASHED_DICTIONARY_NODEoITM_TYPE_SIMPLExSTRING_CONSTANTo *)node__IZT)->item__P0T;
+  };
+  return(result__JZT);
 }
 
-static void** create__5HHE(__INTEGER nb_elements__BIHE)
+static void** create__TIHE(__INTEGER nb_elements__VIHE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__M3DH,a__R3DH,new_size__N3DH,new_size2__O3DH,a__Q0FH;
+  __UINTEGER_32 new_size__R0FH;
+  __POINTER result__L3DH,ptr_table__O3IH,next__N3IH,result__P3IH;
+  void *result__S3IH;
+  __INTEGER Self__LPYE;
+  void **Result__SZME;
+  sz__M3DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__VIHE * ((__INTEGER )(sizeof(void *)))));
+  result__L3DH=((__POINTER )(NULL));
+  a__R3DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__N3DH=(__UINTEGER_32)((__UINTEGER_32)(sz__M3DH + a__R3DH) & (__UINTEGER_32)(~ a__R3DH));
+  new_size2__O3DH=(__UINTEGER_32)(new_size__N3DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__O3DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__Q0FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__R0FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__O3DH + a__Q0FH) & (__UINTEGER_32)(~ a__Q0FH));
+    ptr_table__O3IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__R0FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__N3IH=((__POINTER )(NULL));
+    result__P3IH=((__POINTER *)ptr_table__O3IH)[ 0];
+    if ((result__P3IH == (void *)NULL)) {
+      result__P3IH=new_lab__ZPJ(new_size__R0FH);
+      next__N3IH=(void *)((unsigned long)result__P3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0FH)));
+      ((__POINTER *)next__N3IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__O3IH)[ 0]=next__N3IH;
+    } else {
+      next__N3IH=((__POINTER *)result__P3IH)[ 0];
+      if ((next__N3IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P3IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__R0FH <<  1)) <=  4096)) {
+          next__N3IH=(void *)((unsigned long)result__P3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0FH)));
+        } else {
+          next__N3IH=new_lab__ZPJ(new_size__R0FH);
+        };
+        ((__POINTER *)next__N3IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__O3IH)[ 0]=next__N3IH;
+      } else {
+        ((__POINTER *)result__P3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__P3IH=next__N3IH;
+      };
+    };
+    ((__POINTER *)result__P3IH)[ 0]=((__POINTER ) 3);
+    result__L3DH=(void *)((unsigned long)result__P3IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__S3IH=first_free__BCVB;
+    while ((((void *)result__S3IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__S3IH)->map_size_and_id__YTB &  4294967292LU) < new_size__N3DH))) {
+      result__S3IH=((__MEMORY *)result__S3IH)->map_next_free__ZTB;
     };
-    if (((void *)result__JZIH == (void *)NULL)) {
-      result__JZIH=new_page__B24();
+    if (((void *)result__S3IH == (void *)NULL)) {
+      result__S3IH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__S3IH,new_size__N3DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__S3IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__L3DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__S3IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__SZME=((void **)result__L3DH);
+  Self__LPYE=(__INTEGER)(nb_elements__VIHE -  1);
+  while ((Self__LPYE >=  0)) {
+    Result__SZME[Self__LPYE]=NULL;
+    Self__LPYE=(__INTEGER)(Self__LPYE -  1);
   };
-  return(Result__OXME);
+  return(Result__SZME);
 }
 
-static __BOOLEAN has__OLW(__HASHED_SEToABSTRACT_STRINGo *Self__PLW,void *e__QLW)
+static __BOOLEAN has__XMW(__HASHED_SEToABSTRACT_STRINGo *Self__YMW,void *e__ZMW)
 // ({HASHED_SEToABSTRACT_STRINGo},{STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __INTEGER result__HYHH,__tmp__JYHH,Self__KYHH;
+  void *node__CNW;
+  result__HYHH= 0;
+  __tmp__JYHH=((__STRING_CONSTANT *)e__ZMW)->count__DD;
+  Self__KYHH= 1;
+  while ((Self__KYHH <= __tmp__JYHH)) {
+    result__HYHH=(__INTEGER)((__INTEGER)( 5 * result__HYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)e__ZMW)->storage__ZNO)[(__INTEGER)(Self__KYHH -  1)])));
+    Self__KYHH=(__INTEGER)(Self__KYHH +  1);
+  };
+  if ((result__HYHH <  0)) {
+    result__HYHH=(__INTEGER)(~ result__HYHH);
+  };
+  node__CNW=((void **)Self__YMW->buckets__CWR)[(__INTEGER)(result__HYHH % Self__YMW->capacity__3VR)];
+  while ((! (((void *)node__CNW == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__CNW)->item__OWR,e__ZMW)))) {
+    node__CNW=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__CNW)->next__0WR;
+  };
+  return(((void *)node__CNW != (void *)NULL));
 }
 
-static void increase_capacity__SNNB(__HASHED_SEToABSTRACT_STRINGo *Self__TNNB)
+static void increase_capacity__2ONB(__HASHED_SEToABSTRACT_STRINGo *Self__3ONB)
 // ({HASHED_SEToABSTRACT_STRINGo}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER idx__5ONB,new_capacity__APNB,i__4ONB,result__MYHH;
+  __INTEGER __tmp__OYHH,Self__PYHH;
+  __STRING_CONSTANT *Self__NYHH;
+  void *node1__CPNB,*node2__DPNB;
+  void **old_buckets__BPNB;
+  idx__5ONB= 0;
+  node1__CPNB=NULL;
+  node2__DPNB=NULL;
+  new_capacity__APNB=prime_number_ceiling__T11((__INTEGER)(Self__3ONB->capacity__3VR +  1));
+  old_buckets__BPNB=Self__3ONB->buckets__CWR;
+  Self__3ONB->buckets__CWR=create__3G2(new_capacity__APNB);
+  i__4ONB=(__INTEGER)(Self__3ONB->capacity__3VR -  1);
+  Self__3ONB->capacity__3VR=new_capacity__APNB;
+  while ((i__4ONB >=  0)) {
+    node1__CPNB=((void **)old_buckets__BPNB)[i__4ONB];
+    while (((void *)node1__CPNB != (void *)NULL)) {
+      node2__DPNB=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__CPNB)->next__0WR;
+      Self__NYHH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__CPNB)->item__OWR);
+      result__MYHH= 0;
+      __tmp__OYHH=Self__NYHH->count__DD;
+      Self__PYHH= 1;
+      while ((Self__PYHH <= __tmp__OYHH)) {
+        result__MYHH=(__INTEGER)((__INTEGER)( 5 * result__MYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__NYHH->storage__ZNO)[(__INTEGER)(Self__PYHH -  1)])));
+        Self__PYHH=(__INTEGER)(Self__PYHH +  1);
+      };
+      if ((result__MYHH <  0)) {
+        result__MYHH=(__INTEGER)(~ result__MYHH);
+      };
+      idx__5ONB=(__INTEGER)(result__MYHH % Self__3ONB->capacity__3VR);
+      ((__HASHED_SET_NODEoABSTRACT_STRINGo *)node1__CPNB)->next__0WR=((void **)Self__3ONB->buckets__CWR)[idx__5ONB];
+      ((void **)Self__3ONB->buckets__CWR)[idx__5ONB]=node1__CPNB;
+      node1__CPNB=node2__DPNB;
+    };
+    i__4ONB=(__INTEGER)(i__4ONB -  1);
   };
 }
 
-static void put_string__WEF(void *s__YEF)
+static void put_string__5FF(void *s__BGF)
 // ({STRING_CONSTANTxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__JFF,Self__N4F,limit_up__O4F;
-  __CHARACTER __tmp__QFF;
-  if (((struct ___OBJ *)s__YEF)->__id==__STRING_CONSTANT__) {
+  __INTEGER __tmp__SGF,Self__W5F,limit_up__X5F;
+  __CHARACTER __tmp__ZGF;
+  if (((struct ___OBJ *)s__BGF)->__id==__STRING_CONSTANT__) {
   };
-  if (((struct ___OBJ *)s__YEF)->__id==__STRING_CONSTANT__) {
-    __tmp__JFF=((__STRING_CONSTANT *)s__YEF)->count__DD;
+  if (((struct ___OBJ *)s__BGF)->__id==__STRING_CONSTANT__) {
+    __tmp__SGF=((__STRING_CONSTANT *)s__BGF)->count__DD;
   } else {
-    __tmp__JFF=((__STRING *)s__YEF)->count__EGC;
+    __tmp__SGF=((__STRING *)s__BGF)->count__EGC;
   };
-  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)];
+  Self__W5F= 1;
+  limit_up__X5F=__tmp__SGF;
+  while ((Self__W5F <= limit_up__X5F)) {
+    if (((struct ___OBJ *)s__BGF)->__id==__STRING_CONSTANT__) {
+      __tmp__ZGF=((__CHARACTER *)((__STRING_CONSTANT *)s__BGF)->storage__ZNO)[(__INTEGER)(Self__W5F -  1)];
     } else {
-      __tmp__QFF=((__CHARACTER *)((__STRING *)s__YEF)->storage__23R)[(__INTEGER)(Self__N4F -  1)];
+      __tmp__ZGF=((__CHARACTER *)((__STRING *)s__BGF)->storage__F5R)[(__INTEGER)(Self__W5F -  1)];
     };
-    fputc((int)(__tmp__QFF),stdout);
-    Self__N4F=(__INTEGER)(Self__N4F +  1);
+    fputc((int)(__tmp__ZGF),stdout);
+    Self__W5F=(__INTEGER)(Self__W5F +  1);
   };
 }
 
-static __BOOLEAN fast_has__B2X(__HASHED_SEToABSTRACT_STRINGo *Self__C2X,void *e__D2X)
+static __BOOLEAN fast_has__K3X(__HASHED_SEToABSTRACT_STRINGo *Self__L3X,void *e__M3X)
 // ({HASHED_SEToABSTRACT_STRINGo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__SYHH;
+  __INTEGER result__RYHH,__tmp__TYHH,Self__UYHH;
+  void *node__V3X;
+  Self__SYHH=((__STRING_CONSTANT *)e__M3X);
+  result__RYHH= 0;
+  __tmp__TYHH=Self__SYHH->count__DD;
+  Self__UYHH= 1;
+  while ((Self__UYHH <= __tmp__TYHH)) {
+    result__RYHH=(__INTEGER)((__INTEGER)( 5 * result__RYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SYHH->storage__ZNO)[(__INTEGER)(Self__UYHH -  1)])));
+    Self__UYHH=(__INTEGER)(Self__UYHH +  1);
+  };
+  if ((result__RYHH <  0)) {
+    result__RYHH=(__INTEGER)(~ result__RYHH);
+  };
+  node__V3X=((void **)Self__L3X->buckets__CWR)[(__INTEGER)(result__RYHH % Self__L3X->capacity__3VR)];
+  while ((! (((void *)node__V3X == (void *)NULL) || ((void *)((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__V3X)->item__OWR == (void *)e__M3X)))) {
+    node__V3X=((__HASHED_SET_NODEoABSTRACT_STRINGo *)node__V3X)->next__0WR;
+  };
+  return(((void *)node__V3X != (void *)NULL));
 }
 
-static void* physical_get_entry__H5E(void *new_path__J5E)
+static void* physical_get_entry__QAF(void *new_path__SAF)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__VAF;
+  __STRING *Self__G1FH;
+  __FILE_UNIX *result__V3IH;
+  __POINTER ptr__W3IH,ptr_table__43IH,next__33IH,result__53IH;
+  __POINTER ptr_table__D4IH,next__C4IH,result__E4IH,ptr__I4IH;
+  __POINTER ptr_table__Q4IH,next__P4IH,result__R4IH,ptr_table__V4IH;
+  __POINTER next__U4IH,result__W4IH;
+  __INTEGER typ_id__X3IH,typ_id__J4IH;
+  __UINTEGER_32 sz__Y3IH,a__Z3IH,new_size__03IH,t__13IH,a__23IH;
+  __UINTEGER_32 new_size__G4IH,lab_type__F4IH,sz__K4IH,a__L4IH;
+  __UINTEGER_32 new_size__M4IH,t__N4IH,a__O4IH,new_size__Y4IH;
+  __UINTEGER_32 lab_type__X4IH;
+  __DIRECTORY_UNIX *result__H4IH;
+  void *__tmp__OBF;
+  __CHARACTER *pe__UAF;
+  result__VAF=NULL;
+  Self__G1FH=((__STRING *)new_path__SAF);
+  if ((Self__G1FH->capacity__24R > Self__G1FH->count__EGC)) {
+    ((__CHARACTER *)Self__G1FH->storage__F5R)[Self__G1FH->count__EGC]='\0';
   } else {
-    add_last__UHT(Self__3WFH,'\0');
-    Self__3WFH->count__EGC=(__INTEGER)(Self__3WFH->count__EGC -  1);
+    add_last__3IT(Self__G1FH,'\0');
+    Self__G1FH->count__EGC=(__INTEGER)(Self__G1FH->count__EGC -  1);
   };
-  pe__L5E=Self__3WFH->storage__23R;
+  pe__UAF=Self__G1FH->storage__F5R;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__L5E),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__UAF),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__V3IH=NULL;
+      ptr__W3IH=((__POINTER )(NULL));
+      typ_id__X3IH= 0;
+      sz__Y3IH=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__Y3IH ==  0)) {
+        result__V3IH=FILE_UNIX__;
+      } else {
+        typ_id__X3IH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__Y3IH);
+        if ((typ_id__X3IH == (__INTEGER)(-  1))) {
+          a__Z3IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__03IH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y3IH + a__Z3IH) & (__UINTEGER_32)(~ a__Z3IH));
+          ptr_table__43IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__03IH / ((__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__ZPJ(new_size__03IH);
+            next__33IH=(void *)((unsigned long)result__53IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03IH)));
+            ((__POINTER *)next__33IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
+          } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__03IH <<  1)) <=  4096)) {
+                next__33IH=(void *)((unsigned long)result__53IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__03IH)));
               } else {
-                next__UZIH=new_lab__QOJ(new_size__RZIH);
+                next__33IH=new_lab__ZPJ(new_size__03IH);
               };
-              ((__POINTER *)next__UZIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__VZIH)[ 0]=next__UZIH;
+              ((__POINTER *)next__33IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__43IH)[ 0]=next__33IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__53IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__33IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__53IH=next__33IH;
+            };
+          };
+          ptr__W3IH=result__53IH;
+        } else {
+          t__13IH=((__UINTEGER_32 )typ_id__X3IH);
+          a__23IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__G4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__Y3IH + a__23IH) & (__UINTEGER_32)(~ a__23IH));
+          ptr_table__D4IH=((__POINTER )(&(table_type[(t__13IH)])));
+          lab_type__F4IH=(__UINTEGER_32)(t__13IH |  1);
+          next__C4IH=((__POINTER )(NULL));
+          result__E4IH=((__POINTER *)ptr_table__D4IH)[ 0];
+          if ((result__E4IH == (void *)NULL)) {
+            result__E4IH=new_lab__ZPJ(lab_type__F4IH);
+            next__C4IH=(void *)((unsigned long)result__E4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4IH)));
+            ((__POINTER *)next__C4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
+          } else {
+            next__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__G4IH <<  1)) <=  4096)) {
+                next__C4IH=(void *)((unsigned long)result__E4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__G4IH)));
               } else {
-                next__ZZIH=new_lab__QOJ(lab_type__2ZIH);
+                next__C4IH=new_lab__ZPJ(lab_type__F4IH);
               };
-              ((__POINTER *)next__ZZIH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0ZIH)[ 0]=next__ZZIH;
+              ((__POINTER *)next__C4IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__D4IH)[ 0]=next__C4IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__E4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__E4IH=next__C4IH;
+            };
+          };
+          ptr__W3IH=result__E4IH;
+        };
+        result__V3IH=((__FILE_UNIX *)ptr__W3IH);
+        *(result__V3IH) = *(FILE_UNIX__);
+      };
+      result__VAF=result__V3IH;
+    } else {
+      result__H4IH=NULL;
+      ptr__I4IH=((__POINTER )(NULL));
+      typ_id__J4IH= 0;
+      sz__K4IH=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__K4IH ==  0)) {
+        result__H4IH=DIRECTORY_UNIX__;
+      } else {
+        typ_id__J4IH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__K4IH);
+        if ((typ_id__J4IH == (__INTEGER)(-  1))) {
+          a__L4IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__M4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__K4IH + a__L4IH) & (__UINTEGER_32)(~ a__L4IH));
+          ptr_table__Q4IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__M4IH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__P4IH=((__POINTER )(NULL));
+          result__R4IH=((__POINTER *)ptr_table__Q4IH)[ 0];
+          if ((result__R4IH == (void *)NULL)) {
+            result__R4IH=new_lab__ZPJ(new_size__M4IH);
+            next__P4IH=(void *)((unsigned long)result__R4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M4IH)));
+            ((__POINTER *)next__P4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__Q4IH)[ 0]=next__P4IH;
+          } else {
+            next__P4IH=((__POINTER *)result__R4IH)[ 0];
+            if ((next__P4IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__R4IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__M4IH <<  1)) <=  4096)) {
+                next__P4IH=(void *)((unsigned long)result__R4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__M4IH)));
               } else {
-                next__G0IH=new_lab__QOJ(new_size__D0IH);
+                next__P4IH=new_lab__ZPJ(new_size__M4IH);
               };
-              ((__POINTER *)next__G0IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__H0IH)[ 0]=next__G0IH;
+              ((__POINTER *)next__P4IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__Q4IH)[ 0]=next__P4IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__R4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__P4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__R4IH=next__P4IH;
+            };
+          };
+          ptr__I4IH=result__R4IH;
+        } else {
+          t__N4IH=((__UINTEGER_32 )typ_id__J4IH);
+          a__O4IH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Y4IH=(__UINTEGER_32)((__UINTEGER_32)(sz__K4IH + a__O4IH) & (__UINTEGER_32)(~ a__O4IH));
+          ptr_table__V4IH=((__POINTER )(&(table_type[(t__N4IH)])));
+          lab_type__X4IH=(__UINTEGER_32)(t__N4IH |  1);
+          next__U4IH=((__POINTER )(NULL));
+          result__W4IH=((__POINTER *)ptr_table__V4IH)[ 0];
+          if ((result__W4IH == (void *)NULL)) {
+            result__W4IH=new_lab__ZPJ(lab_type__X4IH);
+            next__U4IH=(void *)((unsigned long)result__W4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4IH)));
+            ((__POINTER *)next__U4IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__V4IH)[ 0]=next__U4IH;
+          } else {
+            next__U4IH=((__POINTER *)result__W4IH)[ 0];
+            if ((next__U4IH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__W4IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Y4IH <<  1)) <=  4096)) {
+                next__U4IH=(void *)((unsigned long)result__W4IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y4IH)));
               } else {
-                next__L0IH=new_lab__QOJ(lab_type__O0IH);
+                next__U4IH=new_lab__ZPJ(lab_type__X4IH);
               };
-              ((__POINTER *)next__L0IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__M0IH)[ 0]=next__L0IH;
+              ((__POINTER *)next__U4IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__V4IH)[ 0]=next__U4IH;
             } else {
-              ((__POINTER *)result__N0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__N0IH=next__L0IH;
+              ((__POINTER *)result__W4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__U4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__W4IH=next__U4IH;
             };
           };
-          ptr__5ZIH=result__N0IH;
+          ptr__I4IH=result__W4IH;
         };
-        result__4ZIH=((__DIRECTORY_UNIX *)ptr__5ZIH);
-        *(result__4ZIH) = *(DIRECTORY_UNIX__);
+        result__H4IH=((__DIRECTORY_UNIX *)ptr__I4IH);
+        *(result__H4IH) = *(DIRECTORY_UNIX__);
       };
-      result__M5E=result__4ZIH;
+      result__VAF=result__H4IH;
     };
-    if (((struct ___OBJ *)result__M5E)->__id==__DIRECTORY_UNIX__) {
-      set_path__JJT(result__M5E,new_path__J5E);
+    if (((struct ___OBJ *)result__VAF)->__id==__DIRECTORY_UNIX__) {
+      set_path__SKT(result__VAF,new_path__SAF);
     } else {
-      set_path__EKT(result__M5E,new_path__J5E);
+      set_path__NLT(result__VAF,new_path__SAF);
     };
-    if (((struct ___OBJ *)result__M5E)->__id==__DIRECTORY_UNIX__) {
-      __tmp__FAF=((__DIRECTORY_UNIX *)result__M5E)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+    if (((struct ___OBJ *)result__VAF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__OBF=((__DIRECTORY_UNIX *)result__VAF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__FAF=((__FILE_UNIX *)result__M5E)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+      __tmp__OBF=((__FILE_UNIX *)result__VAF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
     };
-    put__to__MWS(alias__RFD,result__M5E,__tmp__FAF);
+    put__to__VXS(alias__RFD,result__VAF,__tmp__OBF);
   };
   };
-  return(result__M5E);
+  return(result__VAF);
 }
 
-static void put__to__MWS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__NWS,void *v__OWS,void *k__PWS)
+static void put__to__VXS(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__WXS,void *v__XXS,void *k__YXS)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxDIRECTORY_UNIXxFILE_UNIX},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__XYHH,*Self__2YHH;
+  __INTEGER result__WYHH,__tmp__YYHH,Self__ZYHH,idx__AYS,idx__ELOB;
+  __INTEGER new_capacity__FLOB,i__GLOB,result__1YHH,__tmp__3YHH;
+  __INTEGER Self__4YHH,typ_id__UNOB;
+  __POINTER ptr__PNOB,ptr_table__04IH,next__Z4IH,result__14IH;
+  __POINTER ptr_table__54IH,next__44IH,result__A5IH;
+  __UINTEGER_32 sz__RNOB,a__01FH,new_size__11FH,t__51FH,a__41FH;
+  __UINTEGER_32 new_size__C5IH,lab_type__B5IH;
+  void *node__CYS,*node1__ILOB,*node2__JLOB,*__tmp__XZS;
+  void **old_buckets__HLOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *result__ONOB;
+  __HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *Self__RXDC;
+  Self__XYHH=((__STRING_CONSTANT *)k__YXS);
+  result__WYHH= 0;
+  __tmp__YYHH=Self__XYHH->count__DD;
+  Self__ZYHH= 1;
+  while ((Self__ZYHH <= __tmp__YYHH)) {
+    result__WYHH=(__INTEGER)((__INTEGER)( 5 * result__WYHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XYHH->storage__ZNO)[(__INTEGER)(Self__ZYHH -  1)])));
+    Self__ZYHH=(__INTEGER)(Self__ZYHH +  1);
+  };
+  if ((result__WYHH <  0)) {
+    result__WYHH=(__INTEGER)(~ result__WYHH);
+  };
+  idx__AYS=(__INTEGER)(result__WYHH % Self__WXS->capacity__EYS);
+  node__CYS=((void **)Self__WXS->buckets__JYS)[idx__AYS];
+  while ((! (((void *)node__CYS == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__CYS)->key__VYS,k__YXS)))) {
+    node__CYS=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__CYS)->next__BZS;
+  };
+  if (((void *)node__CYS == (void *)NULL)) {
+    if ((Self__WXS->capacity__EYS == Self__WXS->count__KZS)) {
+      idx__ELOB= 0;
+      node1__ILOB=NULL;
+      node2__JLOB=NULL;
+      old_buckets__HLOB=Self__WXS->buckets__JYS;
+      new_capacity__FLOB=prime_number_ceiling__T11((__INTEGER)(Self__WXS->capacity__EYS +  1));
+      Self__WXS->buckets__JYS=create__T43(new_capacity__FLOB);
+      i__GLOB=(__INTEGER)(Self__WXS->capacity__EYS -  1);
+      Self__WXS->capacity__EYS=new_capacity__FLOB;
+      while ((i__GLOB >=  0)) {
+        node1__ILOB=((void **)old_buckets__HLOB)[i__GLOB];
+        while (((void *)node1__ILOB != (void *)NULL)) {
+          node2__JLOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__ILOB)->next__BZS;
+          Self__2YHH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__ILOB)->key__VYS);
+          result__1YHH= 0;
+          __tmp__3YHH=Self__2YHH->count__DD;
+          Self__4YHH= 1;
+          while ((Self__4YHH <= __tmp__3YHH)) {
+            result__1YHH=(__INTEGER)((__INTEGER)( 5 * result__1YHH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__2YHH->storage__ZNO)[(__INTEGER)(Self__4YHH -  1)])));
+            Self__4YHH=(__INTEGER)(Self__4YHH +  1);
+          };
+          if ((result__1YHH <  0)) {
+            result__1YHH=(__INTEGER)(~ result__1YHH);
+          };
+          idx__ELOB=(__INTEGER)(result__1YHH % Self__WXS->capacity__EYS);
+          ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node1__ILOB)->next__BZS=((void **)Self__WXS->buckets__JYS)[idx__ELOB];
+          ((void **)Self__WXS->buckets__JYS)[idx__ELOB]=node1__ILOB;
+          node1__ILOB=node2__JLOB;
+        };
+        i__GLOB=(__INTEGER)(i__GLOB -  1);
+      };
+      idx__AYS=(__INTEGER)(result__WYHH % new_capacity__FLOB);
+    };
+    __tmp__XZS=((void **)Self__WXS->buckets__JYS)[idx__AYS];
+    result__ONOB=NULL;
+    ptr__PNOB=((__POINTER )(NULL));
+    typ_id__UNOB= 0;
+    sz__RNOB=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo));
+    if ((sz__RNOB ==  0)) {
+      result__ONOB=HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+    } else {
+      typ_id__UNOB=__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RNOB);
+      if ((typ_id__UNOB == (__INTEGER)(-  1))) {
+        a__01FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__11FH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNOB + a__01FH) & (__UINTEGER_32)(~ a__01FH));
+        ptr_table__04IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__11FH / ((__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__ZPJ(new_size__11FH);
+          next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__11FH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__11FH <<  1)) <=  4096)) {
+              next__Z4IH=(void *)((unsigned long)result__14IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__11FH)));
             } else {
-              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)));
+              next__Z4IH=new_lab__ZPJ(new_size__11FH);
+            };
+            ((__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__PNOB=result__14IH;
+      } else {
+        t__51FH=((__UINTEGER_32 )typ_id__UNOB);
+        a__41FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__C5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNOB + a__41FH) & (__UINTEGER_32)(~ a__41FH));
+        ptr_table__54IH=((__POINTER )(&(table_type[(t__51FH)])));
+        lab_type__B5IH=(__UINTEGER_32)(t__51FH |  1);
+        next__44IH=((__POINTER )(NULL));
+        result__A5IH=((__POINTER *)ptr_table__54IH)[ 0];
+        if ((result__A5IH == (void *)NULL)) {
+          result__A5IH=new_lab__ZPJ(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__GUH)))) &  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__V0IH=new_lab__QOJ(lab_type__Y0IH);
+              next__44IH=new_lab__ZPJ(lab_type__B5IH);
             };
-            ((__POINTER *)next__V0IH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__W0IH)[ 0]=next__V0IH;
+            ((__POINTER *)next__44IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__54IH)[ 0]=next__44IH;
           } else {
-            ((__POINTER *)result__X0IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V0IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__X0IH=next__V0IH;
+            ((__POINTER *)result__A5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__A5IH=next__44IH;
           };
         };
-        ptr__FMOB=result__X0IH;
+        ptr__PNOB=result__A5IH;
       };
-      result__EMOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__FMOB);
-      *(result__EMOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
+      result__ONOB=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)ptr__PNOB);
+      *(result__ONOB) = *(HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo__);
     };
-    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);
+    Self__RXDC=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)result__ONOB);
+    Self__RXDC->item__YPOB=v__XXS;
+    Self__RXDC->key__VYS=k__YXS;
+    Self__RXDC->next__BZS=__tmp__XZS;
+    node__CYS=result__ONOB;
+    ((void **)Self__WXS->buckets__JYS)[idx__AYS]=result__ONOB;
+    Self__WXS->count__KZS=(__INTEGER)(Self__WXS->count__KZS +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__ZWS)->item__OOOB=v__OWS;
+    ((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__CYS)->item__YPOB=v__XXS;
   };
 }
 
-static void reduce_path__W1HC(void *st__Y1HC)
+static void reduce_path__K3HC(void *st__M3HC)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER stat__O3HC,__tmp__CZHH,Self__EZHH,i__N3HC,Self__JOOE;
+  __INTEGER n__E2FH,len__KZHH,__tmp__LZHH,__tmp__NZHH,Self__OZHH;
+  __INTEGER len__SZHH,__tmp__TZHH,__tmp__VZHH,Self__WZHH,result__ZZHH;
+  __INTEGER n__G2FH,len__4ZHH,__tmp__5ZHH,__tmp__B0HH,Self__C0HH;
+  __INTEGER end__E0HH,len__G0HH,__tmp__H0HH,__tmp__J0HH,Self__K0HH;
+  __INTEGER Self__PGFF,n__I2FH,len__O0HH,__tmp__P0HH,__tmp__R0HH;
+  __INTEGER Self__S0HH,result__V0HH,end__Y0HH,len__00HH,__tmp__10HH;
+  __INTEGER __tmp__30HH,Self__40HH;
+  __STRING *Self__AZHH,*Self__D2FH,*Self__UZHH,*Self__0ZHH,*Self__F2FH;
+  __STRING *Self__I0HH,*Self__H2FH,*Self__J2FH,*Self__L2FH,*Self__W0HH;
+  __STRING *Self__20HH;
+  __CHARACTER car__P3HC,Self__E5IH;
+  __CHARACTER *__tmp__BZHH,*Self__DZHH;
+  __BOOLEAN __tmp__W5HC,__tmp__1AIC,result__NHHE,result__D5IH;
+  __BOOLEAN __tmp__F5IH,__tmp__2BIC;
+  stat__O3HC= 0;
+  car__P3HC='\0';
+  Self__AZHH=((__STRING *)st__M3HC);
+  __tmp__BZHH=Self__AZHH->storage__F5R;
+  __tmp__CZHH=(__INTEGER)(Self__AZHH->count__EGC -  1);
+  Self__DZHH=((__CHARACTER *)__tmp__BZHH);
+  Self__EZHH=__tmp__CZHH;
+  while ((Self__EZHH >=  0)) {
+    if (('\\' == Self__DZHH[Self__EZHH])) {
+      Self__DZHH[Self__EZHH]='/';
+    };
+    Self__EZHH=(__INTEGER)(Self__EZHH -  1);
+  };
+  i__N3HC= 1;
+  while ((i__N3HC <= ((__STRING *)st__M3HC)->count__EGC)) {
+    car__P3HC=((__CHARACTER *)((__STRING *)st__M3HC)->storage__F5R)[(__INTEGER)(i__N3HC -  1)];
+    if ((car__P3HC == '/')) {
+      Self__JOOE=stat__O3HC;
+      if ((stat__O3HC ==  0)) {
+        stat__O3HC= 1;
+      };
+      if ((Self__JOOE ==  1)) {
+        Self__D2FH=((__STRING *)st__M3HC);
+        n__E2FH=(__INTEGER)(i__N3HC -  1);
+        if ((n__E2FH > Self__D2FH->count__EGC)) {
+          Self__D2FH->count__EGC= 0;
+        } else {
+          if ((n__E2FH >  0)) {
+            len__KZHH=(__INTEGER)((__INTEGER)(n__E2FH -  1) +  1);
+            if ((len__KZHH >  0)) {
+              __tmp__LZHH=(__INTEGER)(n__E2FH +  1);
+              __tmp__NZHH=Self__D2FH->count__EGC;
+              Self__OZHH=__tmp__LZHH;
+              while ((Self__OZHH <= __tmp__NZHH)) {
+                ((__CHARACTER *)Self__D2FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__OZHH - len__KZHH) -  1)]=((__CHARACTER *)Self__D2FH->storage__F5R)[(__INTEGER)(Self__OZHH -  1)];
+                Self__OZHH=(__INTEGER)(Self__OZHH +  1);
+              };
+              Self__D2FH->count__EGC=(__INTEGER)(Self__D2FH->count__EGC - len__KZHH);
+            };
+          };
+        };
+        i__N3HC= 1;
+      };
+      if ((Self__JOOE ==  2)) {
+        Self__UZHH=((__STRING *)st__M3HC);
+        len__SZHH=(__INTEGER)((__INTEGER)(i__N3HC - (__INTEGER)(i__N3HC -  1)) +  1);
+        if ((len__SZHH >  0)) {
+          __tmp__TZHH=(__INTEGER)(i__N3HC +  1);
+          __tmp__VZHH=Self__UZHH->count__EGC;
+          Self__WZHH=__tmp__TZHH;
+          while ((Self__WZHH <= __tmp__VZHH)) {
+            ((__CHARACTER *)Self__UZHH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__WZHH - len__SZHH) -  1)]=((__CHARACTER *)Self__UZHH->storage__F5R)[(__INTEGER)(Self__WZHH -  1)];
+            Self__WZHH=(__INTEGER)(Self__WZHH +  1);
+          };
+          Self__UZHH->count__EGC=(__INTEGER)(Self__UZHH->count__EGC - len__SZHH);
+        };
+        i__N3HC=(__INTEGER)(i__N3HC -  2);
+        stat__O3HC= 1;
+      };
+      if ((Self__JOOE ==  3)) {
+        Self__0ZHH=((__STRING *)st__M3HC);
+        result__ZZHH=(__INTEGER)(i__N3HC -  4);
+        while ((! ((result__ZZHH <  1) || ('/' == ((__CHARACTER *)Self__0ZHH->storage__F5R)[(__INTEGER)(result__ZZHH -  1)])))) {
+          result__ZZHH=(__INTEGER)(result__ZZHH -  1);
+        };
+        if ((result__ZZHH ==  0)) {
+          Self__F2FH=((__STRING *)st__M3HC);
+          n__G2FH=(__INTEGER)(i__N3HC -  1);
+          if ((n__G2FH > Self__F2FH->count__EGC)) {
+            Self__F2FH->count__EGC= 0;
+          } else {
+            if ((n__G2FH >  0)) {
+              len__4ZHH=(__INTEGER)((__INTEGER)(n__G2FH -  1) +  1);
+              if ((len__4ZHH >  0)) {
+                __tmp__5ZHH=(__INTEGER)(n__G2FH +  1);
+                __tmp__B0HH=Self__F2FH->count__EGC;
+                Self__C0HH=__tmp__5ZHH;
+                while ((Self__C0HH <= __tmp__B0HH)) {
+                  ((__CHARACTER *)Self__F2FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__C0HH - len__4ZHH) -  1)]=((__CHARACTER *)Self__F2FH->storage__F5R)[(__INTEGER)(Self__C0HH -  1)];
+                  Self__C0HH=(__INTEGER)(Self__C0HH +  1);
                 };
-                Self__2XFH->count__EGC=(__INTEGER)(Self__2XFH->count__EGC - len__VVHH);
+                Self__F2FH->count__EGC=(__INTEGER)(Self__F2FH->count__EGC - len__4ZHH);
               };
             };
           };
-          i__Z1HC= 1;
+          i__N3HC= 1;
         } else {
-          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__I0HH=((__STRING *)st__M3HC);
+          end__E0HH=(__INTEGER)(i__N3HC -  1);
+          len__G0HH=(__INTEGER)((__INTEGER)(end__E0HH - result__ZZHH) +  1);
+          if ((len__G0HH >  0)) {
+            __tmp__H0HH=(__INTEGER)(end__E0HH +  1);
+            __tmp__J0HH=Self__I0HH->count__EGC;
+            Self__K0HH=__tmp__H0HH;
+            while ((Self__K0HH <= __tmp__J0HH)) {
+              ((__CHARACTER *)Self__I0HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__K0HH - len__G0HH) -  1)]=((__CHARACTER *)Self__I0HH->storage__F5R)[(__INTEGER)(Self__K0HH -  1)];
+              Self__K0HH=(__INTEGER)(Self__K0HH +  1);
             };
-            Self__5VHH->count__EGC=(__INTEGER)(Self__5VHH->count__EGC - len__3VHH);
+            Self__I0HH->count__EGC=(__INTEGER)(Self__I0HH->count__EGC - len__G0HH);
           };
-          i__Z1HC=result__QVHH;
+          i__N3HC=result__ZZHH;
         };
-        stat__01HC= 1;
+        stat__O3HC= 1;
       };
-      __tmp__C4HC=TRUE__;
+      __tmp__W5HC=TRUE__;
     } else {
-      __tmp__C4HC=FALSE__;
+      __tmp__W5HC=FALSE__;
     };
-    if (__tmp__C4HC) {
-      __tmp__H5HC=TRUE__;
+    if (__tmp__W5HC) {
+      __tmp__1AIC=TRUE__;
     } else {
-      result__ZGHE=(car__11HC == '.');
-      if (result__ZGHE) {
-        Self__YDFF=stat__01HC;
-        if ((stat__01HC ==  1)) {
-          stat__01HC= 2;
+      result__NHHE=(car__P3HC == '.');
+      if (result__NHHE) {
+        Self__PGFF=stat__O3HC;
+        if ((stat__O3HC ==  1)) {
+          stat__O3HC= 2;
         };
-        if ((Self__YDFF ==  2)) {
-          stat__01HC= 3;
+        if ((Self__PGFF ==  2)) {
+          stat__O3HC= 3;
         };
-        if ((Self__YDFF ==  3)) {
-          stat__01HC= 0;
+        if ((Self__PGFF ==  3)) {
+          stat__O3HC= 0;
         };
       };
-      __tmp__H5HC=result__ZGHE;
+      __tmp__1AIC=result__NHHE;
     };
-    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__;
+    if ((! __tmp__1AIC)) {
+      if (((car__P3HC == ':') && (i__N3HC >  2))) {
+        Self__E5IH=((__CHARACTER *)((__STRING *)st__M3HC)->storage__F5R)[(__INTEGER)((__INTEGER)(i__N3HC -  1) -  1)];
+        result__D5IH=FALSE__;
+        if ((((__INTEGER_8 )Self__E5IH) >= ((__INTEGER_8 )'a'))) {
+          result__D5IH=(((__INTEGER_8 )Self__E5IH) <= ((__INTEGER_8 )'z'));
+          __tmp__F5IH=TRUE__;
         } else {
-          __tmp__20IH=FALSE__;
+          __tmp__F5IH=FALSE__;
         };
-        if ((! __tmp__20IH)) {
-          if ((((__INTEGER_8 )Self__10IH) >= ((__INTEGER_8 )'A'))) {
-            result__00IH=(((__INTEGER_8 )Self__10IH) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__F5IH)) {
+          if ((((__INTEGER_8 )Self__E5IH) >= ((__INTEGER_8 )'A'))) {
+            result__D5IH=(((__INTEGER_8 )Self__E5IH) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__IAIC=result__00IH;
+        __tmp__2BIC=result__D5IH;
       } else {
-        __tmp__IAIC=FALSE__;
+        __tmp__2BIC=FALSE__;
       };
-      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;
+      if ((__tmp__2BIC && (((__CHARACTER *)((__STRING *)st__M3HC)->storage__F5R)[(__INTEGER)((__INTEGER)(i__N3HC -  2) -  1)] == '/'))) {
+        Self__H2FH=((__STRING *)st__M3HC);
+        n__I2FH=(__INTEGER)(i__N3HC -  2);
+        if ((n__I2FH > Self__H2FH->count__EGC)) {
+          Self__H2FH->count__EGC= 0;
         } else {
-          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);
+          if ((n__I2FH >  0)) {
+            len__O0HH=(__INTEGER)((__INTEGER)(n__I2FH -  1) +  1);
+            if ((len__O0HH >  0)) {
+              __tmp__P0HH=(__INTEGER)(n__I2FH +  1);
+              __tmp__R0HH=Self__H2FH->count__EGC;
+              Self__S0HH=__tmp__P0HH;
+              while ((Self__S0HH <= __tmp__R0HH)) {
+                ((__CHARACTER *)Self__H2FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__S0HH - len__O0HH) -  1)]=((__CHARACTER *)Self__H2FH->storage__F5R)[(__INTEGER)(Self__S0HH -  1)];
+                Self__S0HH=(__INTEGER)(Self__S0HH +  1);
               };
-              Self__4XFH->count__EGC=(__INTEGER)(Self__4XFH->count__EGC - len__FWHH);
+              Self__H2FH->count__EGC=(__INTEGER)(Self__H2FH->count__EGC - len__O0HH);
             };
           };
         };
-        i__Z1HC= 1;
+        i__N3HC= 1;
       } else {
-        stat__01HC= 0;
+        stat__O3HC= 0;
       };
     };
-    i__Z1HC=(__INTEGER)(i__Z1HC +  1);
+    i__N3HC=(__INTEGER)(i__N3HC +  1);
   };
-  if ((stat__01HC ==  1)) {
-    Self__AYFH=((__STRING *)st__Y1HC);
-    if (( 1 > Self__AYFH->count__EGC)) {
-      Self__AYFH->count__EGC= 0;
+  if ((stat__O3HC ==  1)) {
+    Self__J2FH=((__STRING *)st__M3HC);
+    if (( 1 > Self__J2FH->count__EGC)) {
+      Self__J2FH->count__EGC= 0;
     } else {
-      Self__AYFH->count__EGC=(__INTEGER)(Self__AYFH->count__EGC -  1);
+      Self__J2FH->count__EGC=(__INTEGER)(Self__J2FH->count__EGC -  1);
     };
   };
-  if ((stat__01HC ==  2)) {
-    Self__CYFH=((__STRING *)st__Y1HC);
-    if (( 2 > Self__CYFH->count__EGC)) {
-      Self__CYFH->count__EGC= 0;
+  if ((stat__O3HC ==  2)) {
+    Self__L2FH=((__STRING *)st__M3HC);
+    if (( 2 > Self__L2FH->count__EGC)) {
+      Self__L2FH->count__EGC= 0;
     } else {
-      Self__CYFH->count__EGC=(__INTEGER)(Self__CYFH->count__EGC -  2);
+      Self__L2FH->count__EGC=(__INTEGER)(Self__L2FH->count__EGC -  2);
     };
   };
-  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 ((stat__O3HC ==  3)) {
+    Self__W0HH=((__STRING *)st__M3HC);
+    result__V0HH=(__INTEGER)(i__N3HC -  4);
+    while ((! ((result__V0HH <  1) || ('/' == ((__CHARACTER *)Self__W0HH->storage__F5R)[(__INTEGER)(result__V0HH -  1)])))) {
+      result__V0HH=(__INTEGER)(result__V0HH -  1);
     };
-    if ((result__MWHH ==  0)) {
-      ((__STRING *)st__Y1HC)->count__EGC= 0;
+    if ((result__V0HH ==  0)) {
+      ((__STRING *)st__M3HC)->count__EGC= 0;
     } else {
-      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__20HH=((__STRING *)st__M3HC);
+      end__Y0HH=(__INTEGER)(i__N3HC -  1);
+      len__00HH=(__INTEGER)((__INTEGER)(end__Y0HH - result__V0HH) +  1);
+      if ((len__00HH >  0)) {
+        __tmp__10HH=(__INTEGER)(end__Y0HH +  1);
+        __tmp__30HH=Self__20HH->count__EGC;
+        Self__40HH=__tmp__10HH;
+        while ((Self__40HH <= __tmp__30HH)) {
+          ((__CHARACTER *)Self__20HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__40HH - len__00HH) -  1)]=((__CHARACTER *)Self__20HH->storage__F5R)[(__INTEGER)(Self__40HH -  1)];
+          Self__40HH=(__INTEGER)(Self__40HH +  1);
         };
-        Self__TWHH->count__EGC=(__INTEGER)(Self__TWHH->count__EGC - len__RWHH);
+        Self__20HH->count__EGC=(__INTEGER)(Self__20HH->count__EGC - len__00HH);
       };
     };
   };
-  if ((((__STRING *)st__Y1HC)->count__EGC ==  0)) {
-    add_last__UHT(st__Y1HC,'/');
+  if ((((__STRING *)st__M3HC)->count__EGC ==  0)) {
+    add_last__3IT(st__M3HC,'/');
   };
 }
 
-static void* reference_at__WT0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__XT0C,void *k__YT0C)
+static void* reference_at__NV0C(__HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo *Self__OV0C,void *k__PV0C)
 // ({HASHED_DICTIONARYoENTRYxABSTRACT_STRINGo},{NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__ZV0C;
+  __STRING *Self__B1HH;
+  __INTEGER result__A1HH,__tmp__C1HH,Self__D1HH;
+  void *node__YV0C;
+  result__ZV0C=NULL;
+  Self__B1HH=((__STRING *)k__PV0C);
+  result__A1HH= 0;
+  __tmp__C1HH=Self__B1HH->count__EGC;
+  Self__D1HH= 1;
+  while ((Self__D1HH <= __tmp__C1HH)) {
+    result__A1HH=(__INTEGER)((__INTEGER)( 5 * result__A1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__B1HH->storage__F5R)[(__INTEGER)(Self__D1HH -  1)])));
+    Self__D1HH=(__INTEGER)(Self__D1HH +  1);
+  };
+  if ((result__A1HH <  0)) {
+    result__A1HH=(__INTEGER)(~ result__A1HH);
+  };
+  node__YV0C=((void **)Self__OV0C->buckets__JYS)[(__INTEGER)(result__A1HH % Self__OV0C->capacity__EYS)];
+  while ((! (((void *)node__YV0C == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__YV0C)->key__VYS,k__PV0C)))) {
+    node__YV0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__YV0C)->next__BZS;
+  };
+  if (((void *)node__YV0C != (void *)NULL)) {
+    result__ZV0C=((__HASHED_DICTIONARY_NODEoENTRYxABSTRACT_STRINGo *)node__YV0C)->item__YPOB;
+  };
+  return(result__ZV0C);
 }
 
-static void* physical_get_entry__KW0C(void *new_path__MW0C)
+static void* physical_get_entry__BY0C(void *new_path__DY0C)
 // ({NULLxSTRING}) With resultNo recursive, No inlinable.
 {
-  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';
+  void *result__GY0C;
+  __STRING *Self__P2FH;
+  __FILE_UNIX *result__LWI;
+  __POINTER ptr__MWI,ptr_table__H5IH,next__G5IH,result__I5IH;
+  __POINTER ptr_table__M5IH,next__L5IH,result__N5IH,ptr__3XI;
+  __POINTER ptr_table__R5IH,next__Q5IH,result__S5IH,ptr_table__W5IH;
+  __POINTER next__V5IH,result__X5IH;
+  __INTEGER typ_id__RWI,typ_id__CYI;
+  __UINTEGER_32 sz__OWI,a__3LGH,new_size__4LGH,t__CMGH,a__BMGH;
+  __UINTEGER_32 new_size__P5IH,lab_type__O5IH,sz__5XI,a__FMGH;
+  __UINTEGER_32 new_size__GMGH,t__KMGH,a__JMGH,new_size__Z5IH;
+  __UINTEGER_32 lab_type__Y5IH;
+  __DIRECTORY_UNIX *result__2XI;
+  void *__tmp__3Y0C;
+  __CHARACTER *pe__FY0C;
+  result__GY0C=NULL;
+  Self__P2FH=((__STRING *)new_path__DY0C);
+  if ((Self__P2FH->capacity__24R > Self__P2FH->count__EGC)) {
+    ((__CHARACTER *)Self__P2FH->storage__F5R)[Self__P2FH->count__EGC]='\0';
   } else {
-    add_last__UHT(Self__GYFH,'\0');
-    Self__GYFH->count__EGC=(__INTEGER)(Self__GYFH->count__EGC -  1);
+    add_last__3IT(Self__P2FH,'\0');
+    Self__P2FH->count__EGC=(__INTEGER)(Self__P2FH->count__EGC -  1);
   };
-  pe__OW0C=Self__GYFH->storage__23R;
+  pe__FY0C=Self__P2FH->storage__F5R;
   { struct stat t;
-  if ((((__INTEGER )(stat((pe__OW0C),&t))) ==  0)) {
+  if ((((__INTEGER )(stat((pe__FY0C),&t))) ==  0)) {
     if ((((__INTEGER )(S_ISDIR(t.st_mode))) ==  0)) {
-      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)));
+      result__LWI=NULL;
+      ptr__MWI=((__POINTER )(NULL));
+      typ_id__RWI= 0;
+      sz__OWI=((__UINTEGER_32 )sizeof(__FILE_UNIX));
+      if ((sz__OWI ==  0)) {
+        result__LWI=FILE_UNIX__;
+      } else {
+        typ_id__RWI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OWI);
+        if ((typ_id__RWI == (__INTEGER)(-  1))) {
+          a__3LGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__4LGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWI + a__3LGH) & (__UINTEGER_32)(~ a__3LGH));
+          ptr_table__H5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__4LGH / ((__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__ZPJ(new_size__4LGH);
+            next__G5IH=(void *)((unsigned long)result__I5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LGH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4LGH <<  1)) <=  4096)) {
+                next__G5IH=(void *)((unsigned long)result__I5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4LGH)));
               } else {
-                next__30IH=new_lab__QOJ(new_size__VHGH);
+                next__G5IH=new_lab__ZPJ(new_size__4LGH);
               };
-              ((__POINTER *)next__30IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__40IH)[ 0]=next__30IH;
+              ((__POINTER *)next__G5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__H5IH)[ 0]=next__G5IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__I5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__I5IH=next__G5IH;
+            };
+          };
+          ptr__MWI=result__I5IH;
+        } else {
+          t__CMGH=((__UINTEGER_32 )typ_id__RWI);
+          a__BMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__P5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__OWI + a__BMGH) & (__UINTEGER_32)(~ a__BMGH));
+          ptr_table__M5IH=((__POINTER )(&(table_type[(t__CMGH)])));
+          lab_type__O5IH=(__UINTEGER_32)(t__CMGH |  1);
+          next__L5IH=((__POINTER )(NULL));
+          result__N5IH=((__POINTER *)ptr_table__M5IH)[ 0];
+          if ((result__N5IH == (void *)NULL)) {
+            result__N5IH=new_lab__ZPJ(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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P5IH <<  1)) <=  4096)) {
+                next__L5IH=(void *)((unsigned long)result__N5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P5IH)));
               } else {
-                next__C1IH=new_lab__QOJ(lab_type__F1IH);
+                next__L5IH=new_lab__ZPJ(lab_type__O5IH);
               };
-              ((__POINTER *)next__C1IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__D1IH)[ 0]=next__C1IH;
+              ((__POINTER *)next__L5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__M5IH)[ 0]=next__L5IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__N5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__N5IH=next__L5IH;
+            };
+          };
+          ptr__MWI=result__N5IH;
+        };
+        result__LWI=((__FILE_UNIX *)ptr__MWI);
+        *(result__LWI) = *(FILE_UNIX__);
+      };
+      result__GY0C=result__LWI;
+    } else {
+      result__2XI=NULL;
+      ptr__3XI=((__POINTER )(NULL));
+      typ_id__CYI= 0;
+      sz__5XI=((__UINTEGER_32 )sizeof(__DIRECTORY_UNIX));
+      if ((sz__5XI ==  0)) {
+        result__2XI=DIRECTORY_UNIX__;
+      } else {
+        typ_id__CYI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5XI);
+        if ((typ_id__CYI == (__INTEGER)(-  1))) {
+          a__FMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GMGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5XI + a__FMGH) & (__UINTEGER_32)(~ a__FMGH));
+          ptr_table__R5IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GMGH / ((__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__ZPJ(new_size__GMGH);
+            next__Q5IH=(void *)((unsigned long)result__S5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GMGH)));
+            ((__POINTER *)next__Q5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
+          } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GMGH <<  1)) <=  4096)) {
+                next__Q5IH=(void *)((unsigned long)result__S5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GMGH)));
               } else {
-                next__H1IH=new_lab__QOJ(new_size__3HGH);
+                next__Q5IH=new_lab__ZPJ(new_size__GMGH);
               };
-              ((__POINTER *)next__H1IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__I1IH)[ 0]=next__H1IH;
+              ((__POINTER *)next__Q5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R5IH)[ 0]=next__Q5IH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__S5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__S5IH=next__Q5IH;
+            };
+          };
+          ptr__3XI=result__S5IH;
+        } else {
+          t__KMGH=((__UINTEGER_32 )typ_id__CYI);
+          a__JMGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z5IH=(__UINTEGER_32)((__UINTEGER_32)(sz__5XI + a__JMGH) & (__UINTEGER_32)(~ a__JMGH));
+          ptr_table__W5IH=((__POINTER )(&(table_type[(t__KMGH)])));
+          lab_type__Y5IH=(__UINTEGER_32)(t__KMGH |  1);
+          next__V5IH=((__POINTER )(NULL));
+          result__X5IH=((__POINTER *)ptr_table__W5IH)[ 0];
+          if ((result__X5IH == (void *)NULL)) {
+            result__X5IH=new_lab__ZPJ(lab_type__Y5IH);
+            next__V5IH=(void *)((unsigned long)result__X5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5IH)));
+            ((__POINTER *)next__V5IH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
+          } else {
+            next__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Z5IH <<  1)) <=  4096)) {
+                next__V5IH=(void *)((unsigned long)result__X5IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z5IH)));
               } else {
-                next__M1IH=new_lab__QOJ(lab_type__P1IH);
+                next__V5IH=new_lab__ZPJ(lab_type__Y5IH);
               };
-              ((__POINTER *)next__M1IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__N1IH)[ 0]=next__M1IH;
+              ((__POINTER *)next__V5IH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W5IH)[ 0]=next__V5IH;
             } else {
-              ((__POINTER *)result__O1IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__M1IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__O1IH=next__M1IH;
+              ((__POINTER *)result__X5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__X5IH=next__V5IH;
             };
           };
-          ptr__UWI=result__O1IH;
+          ptr__3XI=result__X5IH;
         };
-        result__TWI=((__DIRECTORY_UNIX *)ptr__UWI);
-        *(result__TWI) = *(DIRECTORY_UNIX__);
+        result__2XI=((__DIRECTORY_UNIX *)ptr__3XI);
+        *(result__2XI) = *(DIRECTORY_UNIX__);
       };
-      result__PW0C=result__TWI;
+      result__GY0C=result__2XI;
     };
-    if (((struct ___OBJ *)result__PW0C)->__id==__DIRECTORY_UNIX__) {
-      set_path__JJT(result__PW0C,new_path__MW0C);
+    if (((struct ___OBJ *)result__GY0C)->__id==__DIRECTORY_UNIX__) {
+      set_path__SKT(result__GY0C,new_path__DY0C);
     } else {
-      set_path__EKT(result__PW0C,new_path__MW0C);
+      set_path__NLT(result__GY0C,new_path__DY0C);
     };
     if (FILE_SYSTEM__->parent_directory__2FD==0) {
     } else {
       parent_directory__1ED();
     };
-    if (((struct ___OBJ *)result__PW0C)->__id==__DIRECTORY_UNIX__) {
-      __tmp__GX0C=((__DIRECTORY_UNIX *)result__PW0C)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
+    if (((struct ___OBJ *)result__GY0C)->__id==__DIRECTORY_UNIX__) {
+      __tmp__3Y0C=((__DIRECTORY_UNIX *)result__GY0C)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
     } else {
-      __tmp__GX0C=((__FILE_UNIX *)result__PW0C)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+      __tmp__3Y0C=((__FILE_UNIX *)result__GY0C)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
     };
-    put__to__MWS(alias__RFD,result__PW0C,__tmp__GX0C);
+    put__to__VXS(alias__RFD,result__GY0C,__tmp__3Y0C);
   };
   };
-  return(result__PW0C);
+  return(result__GY0C);
 }
 
-static void** create__HY1C(__INTEGER nb_elements__JY1C)
+static void** create__4Z1C(__INTEGER nb_elements__A01C)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__Z4DH,a__44DH,new_size__04DH,new_size2__14DH,a__U2FH;
+  __UINTEGER_32 new_size__V2FH;
+  __POINTER result__Y4DH,ptr_table__15IH,next__05IH,result__25IH;
+  void *result__55IH;
+  __INTEGER Self__A4WD;
+  void **Result__MVCD;
+  sz__Z4DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__A01C * ((__INTEGER )(sizeof(void *)))));
+  result__Y4DH=((__POINTER )(NULL));
+  a__44DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__04DH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z4DH + a__44DH) & (__UINTEGER_32)(~ a__44DH));
+  new_size2__14DH=(__UINTEGER_32)(new_size__04DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__14DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__U2FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__V2FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__14DH + a__U2FH) & (__UINTEGER_32)(~ a__U2FH));
+    ptr_table__15IH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__V2FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__05IH=((__POINTER )(NULL));
+    result__25IH=((__POINTER *)ptr_table__15IH)[ 0];
+    if ((result__25IH == (void *)NULL)) {
+      result__25IH=new_lab__ZPJ(new_size__V2FH);
+      next__05IH=(void *)((unsigned long)result__25IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2FH)));
+      ((__POINTER *)next__05IH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__15IH)[ 0]=next__05IH;
+    } else {
+      next__05IH=((__POINTER *)result__25IH)[ 0];
+      if ((next__05IH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__25IH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__V2FH <<  1)) <=  4096)) {
+          next__05IH=(void *)((unsigned long)result__25IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__V2FH)));
+        } else {
+          next__05IH=new_lab__ZPJ(new_size__V2FH);
+        };
+        ((__POINTER *)next__05IH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__15IH)[ 0]=next__05IH;
+      } else {
+        ((__POINTER *)result__25IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__05IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__25IH=next__05IH;
+      };
+    };
+    ((__POINTER *)result__25IH)[ 0]=((__POINTER ) 3);
+    result__Y4DH=(void *)((unsigned long)result__25IH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__55IH=first_free__BCVB;
+    while ((((void *)result__55IH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__55IH)->map_size_and_id__YTB &  4294967292LU) < new_size__04DH))) {
+      result__55IH=((__MEMORY *)result__55IH)->map_next_free__ZTB;
     };
-    if (((void *)result__W1IH == (void *)NULL)) {
-      result__W1IH=new_page__B24();
+    if (((void *)result__55IH == (void *)NULL)) {
+      result__55IH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__55IH,new_size__04DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__55IH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__Y4DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__55IH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__MVCD=((void **)result__Y4DH);
+  Self__A4WD=(__INTEGER)(nb_elements__A01C -  1);
+  while ((Self__A4WD >=  0)) {
+    Result__MVCD[Self__A4WD]=NULL;
+    Self__A4WD=(__INTEGER)(Self__A4WD -  1);
   };
-  return(Result__LUCD);
+  return(Result__MVCD);
 }
 
-static void** create__QPSC(__INTEGER nb_elements__SPSC)
+static void** create__HRSC(__INTEGER nb_elements__JRSC)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__B5DH,a__G5DH,new_size__C5DH,new_size2__D5DH,a__12FH;
+  __UINTEGER_32 new_size__22FH;
+  __POINTER result__A5DH,ptr_table__DAJH,next__CAJH,result__EAJH;
+  void *result__HAJH;
+  __INTEGER Self__GPWD;
+  void **Result__521C;
+  sz__B5DH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JRSC * ((__INTEGER )(sizeof(void *)))));
+  result__A5DH=((__POINTER )(NULL));
+  a__G5DH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__C5DH=(__UINTEGER_32)((__UINTEGER_32)(sz__B5DH + a__G5DH) & (__UINTEGER_32)(~ a__G5DH));
+  new_size2__D5DH=(__UINTEGER_32)(new_size__C5DH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__D5DH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__12FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__22FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__D5DH + a__12FH) & (__UINTEGER_32)(~ a__12FH));
+    ptr_table__DAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__22FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__CAJH=((__POINTER )(NULL));
+    result__EAJH=((__POINTER *)ptr_table__DAJH)[ 0];
+    if ((result__EAJH == (void *)NULL)) {
+      result__EAJH=new_lab__ZPJ(new_size__22FH);
+      next__CAJH=(void *)((unsigned long)result__EAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22FH)));
+      ((__POINTER *)next__CAJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__DAJH)[ 0]=next__CAJH;
+    } else {
+      next__CAJH=((__POINTER *)result__EAJH)[ 0];
+      if ((next__CAJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EAJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__22FH <<  1)) <=  4096)) {
+          next__CAJH=(void *)((unsigned long)result__EAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__22FH)));
+        } else {
+          next__CAJH=new_lab__ZPJ(new_size__22FH);
+        };
+        ((__POINTER *)next__CAJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DAJH)[ 0]=next__CAJH;
+      } else {
+        ((__POINTER *)result__EAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__EAJH=next__CAJH;
+      };
+    };
+    ((__POINTER *)result__EAJH)[ 0]=((__POINTER ) 3);
+    result__A5DH=(void *)((unsigned long)result__EAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__HAJH=first_free__BCVB;
+    while ((((void *)result__HAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__HAJH)->map_size_and_id__YTB &  4294967292LU) < new_size__C5DH))) {
+      result__HAJH=((__MEMORY *)result__HAJH)->map_next_free__ZTB;
     };
-    if (((void *)result__41IH == (void *)NULL)) {
-      result__41IH=new_page__B24();
+    if (((void *)result__HAJH == (void *)NULL)) {
+      result__HAJH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__HAJH,new_size__C5DH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__HAJH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__A5DH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__HAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__521C=((void **)result__A5DH);
+  Self__GPWD=(__INTEGER)(nb_elements__JRSC -  1);
+  while ((Self__GPWD >=  0)) {
+    Result__521C[Self__GPWD]=NULL;
+    Self__GPWD=(__INTEGER)(Self__GPWD -  1);
   };
-  return(Result__I11C);
+  return(Result__521C);
 }
 
 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__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;
+  __INTEGER pos__3BD,result__J1HH,__tmp__L1HH,Self__M1HH,__tmp__YCD;
+  __INTEGER Self__4H4,__tmp__R1HH,__tmp__T1HH,Self__U1HH,__tmp__ODD;
+  __INTEGER Self__PJ4,__tmp__EED,__tmp__HED;
   void *add_text__4BD;
-  __STRING *Self__JXHH;
+  __STRING *Self__S1HH;
   void *fmt__5BD;
-  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__2WHH;
-  void *node__4WHH;
+  __HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__F1HH;
+  void *node__H1HH;
   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)) {
+      Self__F1HH=((__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)short_dico__QD);
+      result__J1HH= 0;
+      __tmp__L1HH=((__STRING_CONSTANT *)key__0BD)->count__DD;
+      Self__M1HH= 1;
+      while ((Self__M1HH <= __tmp__L1HH)) {
+        result__J1HH=(__INTEGER)((__INTEGER)( 5 * result__J1HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)((__STRING_CONSTANT *)key__0BD)->storage__ZNO)[(__INTEGER)(Self__M1HH -  1)])));
+        Self__M1HH=(__INTEGER)(Self__M1HH +  1);
+      };
+      if ((result__J1HH <  0)) {
+        result__J1HH=(__INTEGER)(~ result__J1HH);
+      };
+      node__H1HH=((void **)Self__F1HH->buckets__DAT)[(__INTEGER)(result__J1HH % Self__F1HH->capacity__45S)];
+      while ((! (((void *)node__H1HH == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__H1HH)->key__PAT == (void *)key__0BD)))) {
+        node__H1HH=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__H1HH)->next__0AT;
+      };
+      if (((void *)node__H1HH != (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);
+        Self__4H4=beg__1BD;
+        while ((Self__4H4 <= __tmp__YCD)) {
+          add_last__3IT(token__TCD,((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(Self__4H4 -  1)]);
+          Self__S1HH=((__STRING *)output_code__SI);
+          __tmp__R1HH=(__INTEGER)(pos__3BD +  1);
+          __tmp__T1HH=Self__S1HH->count__EGC;
+          Self__U1HH=__tmp__R1HH;
+          while ((Self__U1HH <= __tmp__T1HH)) {
+            ((__CHARACTER *)Self__S1HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__U1HH -  1) -  1)]=((__CHARACTER *)Self__S1HH->storage__F5R)[(__INTEGER)(Self__U1HH -  1)];
+            Self__U1HH=(__INTEGER)(Self__U1HH +  1);
+          };
+          Self__S1HH->count__EGC=(__INTEGER)(Self__S1HH->count__EGC -  1);
+          Self__4H4=(__INTEGER)(Self__4H4 +  1);
         };
         short_derive__PCC=(__INTEGER)(short_derive__PCC - ((__STRING *)token__TCD)->count__EGC);
-        fmt__5BD=at__DH4(short_dico__QD,key__0BD);
+        fmt__5BD=at__MI4(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)) {
+        Self__PJ4= 1;
+        while ((Self__PJ4 <= __tmp__ODD)) {
+          if (((void *)item__CZND(fmt__5BD,Self__PJ4) == (void *)NULL)) {
             add_text__4BD=token__TCD;
           } else {
-            add_text__4BD=item__MZND(fmt__5BD,Self__GI4);
+            add_text__4BD=item__CZND(fmt__5BD,Self__PJ4);
           };
-          insert_string__to__NTU(output_code__SI,add_text__4BD,pos__3BD);
+          insert_string__to__WUU(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 {
@@ -18744,583 +18752,583 @@ static void short__token__to__YBD(void *key__0BD,__INTEGER beg__1BD,__INTEGER en
             __tmp__HED=((__STRING *)add_text__4BD)->count__EGC;
           };
           short_derive__PCC=(__INTEGER)(short_derive__PCC + __tmp__HED);
-          Self__GI4=(__INTEGER)(Self__GI4 +  1);
+          Self__PJ4=(__INTEGER)(Self__PJ4 +  1);
         };
       };
     };
   };
 }
 
-static __INTEGER first_substring_index__VSZE(__STRING *Self__WSZE)
+static __INTEGER first_substring_index__BVZE(__STRING *Self__CVZE)
 // ({STRING}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER i__T04E,result__V04E,s__U04E;
+  i__T04E= 0;
+  result__V04E= 0;
+  s__U04E= 1;
+  while ((! ((result__V04E !=  0) || ((__INTEGER)((__INTEGER)(s__U04E + ((__STRING_CONSTANT *)(&__string_112))->count__DD) -  1) > Self__CVZE->count__EGC)))) {
+    i__T04E= 1;
+    while ((! ((i__T04E > ((__STRING_CONSTANT *)(&__string_112))->count__DD) || (((__CHARACTER *)Self__CVZE->storage__F5R)[(__INTEGER)((__INTEGER)((__INTEGER)(s__U04E + i__T04E) -  1) -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_112))->storage__ZNO)[(__INTEGER)(i__T04E -  1)])))) {
+      i__T04E=(__INTEGER)(i__T04E +  1);
     };
-    if ((i__HY4E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
-      result__JY4E=s__IY4E;
+    if ((i__T04E > ((__STRING_CONSTANT *)(&__string_112))->count__DD)) {
+      result__V04E=s__U04E;
     } else {
-      s__IY4E=(__INTEGER)(s__IY4E +  1);
+      s__U04E=(__INTEGER)(s__U04E +  1);
     };
   };
-  return(result__JY4E);
+  return(result__V04E);
 }
 
-static __BOOLEAN read_string__GBQ()
+static __BOOLEAN read_string__PCQ()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER old_pos__TCQ;
+  __POSITION pos__UJXG;
+  __BOOLEAN result__SCQ,__tmp__3CQ,__tmp__2DQ,__tmp__3DQ;
+  __CHARACTER result__1H5G,result__FI5G,result__OI5G,result__TI5G;
+  __CHARACTER result__YI5G,result__3I5G,result__CJ5G;
+  result__SCQ=FALSE__;
+  old_pos__TCQ= 0;
   if (read_space__KSD()) {
-    result__SD5G='\0';
+    result__1H5G='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__SD5G=((__CHARACTER )(( 0)));
+      result__1H5G=((__CHARACTER )(( 0)));
     } else {
-      result__SD5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__1H5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__UBQ=(result__SD5G == '\"');
+    __tmp__3CQ=(result__1H5G == '\"');
   } else {
-    __tmp__UBQ=FALSE__;
+    __tmp__3CQ=FALSE__;
   };
-  if (__tmp__UBQ) {
-    old_pos__KBQ=position__CCC;
+  if (__tmp__3CQ) {
+    old_pos__TCQ=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__RIRC:
+    until_do__IKRC:
     {
-      result__2D5G='\0';
+      result__FI5G='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__2D5G=((__CHARACTER )(( 0)));
+        result__FI5G=((__CHARACTER )(( 0)));
       } else {
-        result__2D5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__FI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__2D5G == ((__CHARACTER )(( 0))))) {
-        __tmp__TCQ=TRUE__;
+      if ((result__FI5G == ((__CHARACTER )(( 0))))) {
+        __tmp__2DQ=TRUE__;
       } else {
-        result__FE5G='\0';
+        result__OI5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__FE5G=((__CHARACTER )(( 0)));
+          result__OI5G=((__CHARACTER )(( 0)));
         } else {
-          result__FE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__OI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__TCQ=(result__FE5G == '\n');
+        __tmp__2DQ=(result__OI5G == '\n');
       };
-      if (__tmp__TCQ) {
-        __tmp__UCQ=TRUE__;
+      if (__tmp__2DQ) {
+        __tmp__3DQ=TRUE__;
       } else {
-        result__KE5G='\0';
+        result__TI5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__KE5G=((__CHARACTER )(( 0)));
+          result__TI5G=((__CHARACTER )(( 0)));
         } else {
-          result__KE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__TI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__UCQ=(result__KE5G == '\"');
+        __tmp__3DQ=(result__TI5G == '\"');
       };
-      if ((! __tmp__UCQ)) {
-        result__PE5G='\0';
+      if ((! __tmp__3DQ)) {
+        result__YI5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PE5G=((__CHARACTER )(( 0)));
+          result__YI5G=((__CHARACTER )(( 0)));
         } else {
-          result__PE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__YI5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__PE5G);
-        result__UE5G='\0';
+        add_last__3IT(string_tmp__VH,result__YI5G);
+        result__3I5G='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UE5G=((__CHARACTER )(( 0)));
+          result__3I5G=((__CHARACTER )(( 0)));
         } else {
-          result__UE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__3I5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__UE5G == '\\')) {
+        if ((result__3I5G == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          read_escape_character__JWKF();
+          read_escape_character__AZKF();
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__RIRC;
+        goto until_do__IKRC;
       };
     };
-    result__ZE5G='\0';
+    result__CJ5G='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__ZE5G=((__CHARACTER )(( 0)));
+      result__CJ5G=((__CHARACTER )(( 0)));
     } else {
-      result__ZE5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__CJ5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__ZE5G == '\"')) {
+    if ((result__CJ5G == '\"')) {
       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__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)) {
+      result__SCQ=TRUE__;
+      short__token__to__YBD((&__string_123),old_pos__TCQ,position__CCC);
+    } else {
+      position__CCC=begin_position__I5D;
+      pos__UJXG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_251));
+      put_position__LNG(pos__UJXG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__JBQ);
+  return(result__SCQ);
 }
 
-static void reduce_path__NG3E(void *st__PG3E)
+static void reduce_path__ZI3E(void *st__1I3E)
 // ({NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER stat__3I3E,__tmp__Y1HH,Self__01HH,i__2I3E,Self__IP1F;
+  __INTEGER n__J3FH,len__A2HH,__tmp__B2HH,__tmp__D2HH,Self__E2HH;
+  __INTEGER len__I2HH,__tmp__J2HH,__tmp__L2HH,Self__M2HH,result__P2HH;
+  __INTEGER n__L3FH,len__U2HH,__tmp__V2HH,__tmp__X2HH,Self__Y2HH;
+  __INTEGER end__02HH,len__22HH,__tmp__32HH,__tmp__52HH,Self__A3HH;
+  __INTEGER Self__DMEG,n__N3FH,len__E3HH,__tmp__F3HH,__tmp__H3HH;
+  __INTEGER Self__I3HH,result__LMGD,end__K3HH,len__M3HH,__tmp__N3HH;
+  __INTEGER __tmp__P3HH,Self__Q3HH;
+  __STRING *Self__W1HH,*Self__I3FH,*Self__K2HH,*Self__Q2HH,*Self__K3FH;
+  __STRING *Self__42HH,*Self__M3FH,*Self__O3FH,*Self__Q3FH,*Self__HMGD;
+  __STRING *Self__O3HH;
+  __CHARACTER car__4I3E,Self__C42E;
+  __CHARACTER *__tmp__X1HH,*Self__Z1HH;
+  __BOOLEAN __tmp__FL3E,__tmp__KM3E,result__YZXF,result__E42E;
+  __BOOLEAN __tmp__O42E,__tmp__LN3E;
+  stat__3I3E= 0;
+  car__4I3E='\0';
+  Self__W1HH=((__STRING *)st__1I3E);
+  __tmp__X1HH=Self__W1HH->storage__F5R;
+  __tmp__Y1HH=(__INTEGER)(Self__W1HH->count__EGC -  1);
+  Self__Z1HH=((__CHARACTER *)__tmp__X1HH);
+  Self__01HH=__tmp__Y1HH;
+  while ((Self__01HH >=  0)) {
+    if (('\\' == Self__Z1HH[Self__01HH])) {
+      Self__Z1HH[Self__01HH]='/';
+    };
+    Self__01HH=(__INTEGER)(Self__01HH -  1);
+  };
+  i__2I3E= 1;
+  while ((i__2I3E <= ((__STRING *)st__1I3E)->count__EGC)) {
+    car__4I3E=((__CHARACTER *)((__STRING *)st__1I3E)->storage__F5R)[(__INTEGER)(i__2I3E -  1)];
+    if ((car__4I3E == '/')) {
+      Self__IP1F=stat__3I3E;
+      if ((stat__3I3E ==  0)) {
+        stat__3I3E= 1;
+      };
+      if ((Self__IP1F ==  1)) {
+        Self__I3FH=((__STRING *)st__1I3E);
+        n__J3FH=(__INTEGER)(i__2I3E -  1);
+        if ((n__J3FH > Self__I3FH->count__EGC)) {
+          Self__I3FH->count__EGC= 0;
+        } else {
+          if ((n__J3FH >  0)) {
+            len__A2HH=(__INTEGER)((__INTEGER)(n__J3FH -  1) +  1);
+            if ((len__A2HH >  0)) {
+              __tmp__B2HH=(__INTEGER)(n__J3FH +  1);
+              __tmp__D2HH=Self__I3FH->count__EGC;
+              Self__E2HH=__tmp__B2HH;
+              while ((Self__E2HH <= __tmp__D2HH)) {
+                ((__CHARACTER *)Self__I3FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__E2HH - len__A2HH) -  1)]=((__CHARACTER *)Self__I3FH->storage__F5R)[(__INTEGER)(Self__E2HH -  1)];
+                Self__E2HH=(__INTEGER)(Self__E2HH +  1);
+              };
+              Self__I3FH->count__EGC=(__INTEGER)(Self__I3FH->count__EGC - len__A2HH);
+            };
+          };
+        };
+        i__2I3E= 1;
+      };
+      if ((Self__IP1F ==  2)) {
+        Self__K2HH=((__STRING *)st__1I3E);
+        len__I2HH=(__INTEGER)((__INTEGER)(i__2I3E - (__INTEGER)(i__2I3E -  1)) +  1);
+        if ((len__I2HH >  0)) {
+          __tmp__J2HH=(__INTEGER)(i__2I3E +  1);
+          __tmp__L2HH=Self__K2HH->count__EGC;
+          Self__M2HH=__tmp__J2HH;
+          while ((Self__M2HH <= __tmp__L2HH)) {
+            ((__CHARACTER *)Self__K2HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__M2HH - len__I2HH) -  1)]=((__CHARACTER *)Self__K2HH->storage__F5R)[(__INTEGER)(Self__M2HH -  1)];
+            Self__M2HH=(__INTEGER)(Self__M2HH +  1);
+          };
+          Self__K2HH->count__EGC=(__INTEGER)(Self__K2HH->count__EGC - len__I2HH);
+        };
+        i__2I3E=(__INTEGER)(i__2I3E -  2);
+        stat__3I3E= 1;
+      };
+      if ((Self__IP1F ==  3)) {
+        Self__Q2HH=((__STRING *)st__1I3E);
+        result__P2HH=(__INTEGER)(i__2I3E -  4);
+        while ((! ((result__P2HH <  1) || ('/' == ((__CHARACTER *)Self__Q2HH->storage__F5R)[(__INTEGER)(result__P2HH -  1)])))) {
+          result__P2HH=(__INTEGER)(result__P2HH -  1);
+        };
+        if ((result__P2HH ==  0)) {
+          Self__K3FH=((__STRING *)st__1I3E);
+          n__L3FH=(__INTEGER)(i__2I3E -  1);
+          if ((n__L3FH > Self__K3FH->count__EGC)) {
+            Self__K3FH->count__EGC= 0;
+          } else {
+            if ((n__L3FH >  0)) {
+              len__U2HH=(__INTEGER)((__INTEGER)(n__L3FH -  1) +  1);
+              if ((len__U2HH >  0)) {
+                __tmp__V2HH=(__INTEGER)(n__L3FH +  1);
+                __tmp__X2HH=Self__K3FH->count__EGC;
+                Self__Y2HH=__tmp__V2HH;
+                while ((Self__Y2HH <= __tmp__X2HH)) {
+                  ((__CHARACTER *)Self__K3FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__Y2HH - len__U2HH) -  1)]=((__CHARACTER *)Self__K3FH->storage__F5R)[(__INTEGER)(Self__Y2HH -  1)];
+                  Self__Y2HH=(__INTEGER)(Self__Y2HH +  1);
                 };
-                Self__BZFH->count__EGC=(__INTEGER)(Self__BZFH->count__EGC - len__LYHH);
+                Self__K3FH->count__EGC=(__INTEGER)(Self__K3FH->count__EGC - len__U2HH);
               };
             };
           };
-          i__QG3E= 1;
+          i__2I3E= 1;
         } else {
-          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__42HH=((__STRING *)st__1I3E);
+          end__02HH=(__INTEGER)(i__2I3E -  1);
+          len__22HH=(__INTEGER)((__INTEGER)(end__02HH - result__P2HH) +  1);
+          if ((len__22HH >  0)) {
+            __tmp__32HH=(__INTEGER)(end__02HH +  1);
+            __tmp__52HH=Self__42HH->count__EGC;
+            Self__A3HH=__tmp__32HH;
+            while ((Self__A3HH <= __tmp__52HH)) {
+              ((__CHARACTER *)Self__42HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__A3HH - len__22HH) -  1)]=((__CHARACTER *)Self__42HH->storage__F5R)[(__INTEGER)(Self__A3HH -  1)];
+              Self__A3HH=(__INTEGER)(Self__A3HH +  1);
             };
-            Self__VYHH->count__EGC=(__INTEGER)(Self__VYHH->count__EGC - len__TYHH);
+            Self__42HH->count__EGC=(__INTEGER)(Self__42HH->count__EGC - len__22HH);
           };
-          i__QG3E=result__GYHH;
+          i__2I3E=result__P2HH;
         };
-        stat__RG3E= 1;
+        stat__3I3E= 1;
       };
-      __tmp__ZI3E=TRUE__;
+      __tmp__FL3E=TRUE__;
     } else {
-      __tmp__ZI3E=FALSE__;
+      __tmp__FL3E=FALSE__;
     };
-    if (__tmp__ZI3E) {
-      __tmp__4J3E=TRUE__;
+    if (__tmp__FL3E) {
+      __tmp__KM3E=TRUE__;
     } else {
-      result__NVXF=(car__SG3E == '.');
-      if (result__NVXF) {
-        Self__YHEG=stat__RG3E;
-        if ((stat__RG3E ==  1)) {
-          stat__RG3E= 2;
+      result__YZXF=(car__4I3E == '.');
+      if (result__YZXF) {
+        Self__DMEG=stat__3I3E;
+        if ((stat__3I3E ==  1)) {
+          stat__3I3E= 2;
         };
-        if ((Self__YHEG ==  2)) {
-          stat__RG3E= 3;
+        if ((Self__DMEG ==  2)) {
+          stat__3I3E= 3;
         };
-        if ((Self__YHEG ==  3)) {
-          stat__RG3E= 0;
+        if ((Self__DMEG ==  3)) {
+          stat__3I3E= 0;
         };
       };
-      __tmp__4J3E=result__NVXF;
+      __tmp__KM3E=result__YZXF;
     };
-    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__;
+    if ((! __tmp__KM3E)) {
+      if (((car__4I3E == ':') && (i__2I3E >  2))) {
+        Self__C42E=((__CHARACTER *)((__STRING *)st__1I3E)->storage__F5R)[(__INTEGER)((__INTEGER)(i__2I3E -  1) -  1)];
+        result__E42E=FALSE__;
+        if ((((__INTEGER_8 )Self__C42E) >= ((__INTEGER_8 )'a'))) {
+          result__E42E=(((__INTEGER_8 )Self__C42E) <= ((__INTEGER_8 )'z'));
+          __tmp__O42E=TRUE__;
         } else {
-          __tmp__C22E=FALSE__;
+          __tmp__O42E=FALSE__;
         };
-        if ((! __tmp__C22E)) {
-          if ((((__INTEGER_8 )Self__W12E) >= ((__INTEGER_8 )'A'))) {
-            result__Y12E=(((__INTEGER_8 )Self__W12E) <= ((__INTEGER_8 )'Z'));
+        if ((! __tmp__O42E)) {
+          if ((((__INTEGER_8 )Self__C42E) >= ((__INTEGER_8 )'A'))) {
+            result__E42E=(((__INTEGER_8 )Self__C42E) <= ((__INTEGER_8 )'Z'));
           };
         };
-        __tmp__5K3E=result__Y12E;
+        __tmp__LN3E=result__E42E;
       } else {
-        __tmp__5K3E=FALSE__;
+        __tmp__LN3E=FALSE__;
       };
-      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;
+      if ((__tmp__LN3E && (((__CHARACTER *)((__STRING *)st__1I3E)->storage__F5R)[(__INTEGER)((__INTEGER)(i__2I3E -  2) -  1)] == '/'))) {
+        Self__M3FH=((__STRING *)st__1I3E);
+        n__N3FH=(__INTEGER)(i__2I3E -  2);
+        if ((n__N3FH > Self__M3FH->count__EGC)) {
+          Self__M3FH->count__EGC= 0;
         } else {
-          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);
+          if ((n__N3FH >  0)) {
+            len__E3HH=(__INTEGER)((__INTEGER)(n__N3FH -  1) +  1);
+            if ((len__E3HH >  0)) {
+              __tmp__F3HH=(__INTEGER)(n__N3FH +  1);
+              __tmp__H3HH=Self__M3FH->count__EGC;
+              Self__I3HH=__tmp__F3HH;
+              while ((Self__I3HH <= __tmp__H3HH)) {
+                ((__CHARACTER *)Self__M3FH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__I3HH - len__E3HH) -  1)]=((__CHARACTER *)Self__M3FH->storage__F5R)[(__INTEGER)(Self__I3HH -  1)];
+                Self__I3HH=(__INTEGER)(Self__I3HH +  1);
               };
-              Self__DZFH->count__EGC=(__INTEGER)(Self__DZFH->count__EGC - len__1YHH);
+              Self__M3FH->count__EGC=(__INTEGER)(Self__M3FH->count__EGC - len__E3HH);
             };
           };
         };
-        i__QG3E= 1;
+        i__2I3E= 1;
       } else {
-        stat__RG3E= 0;
+        stat__3I3E= 0;
       };
     };
-    i__QG3E=(__INTEGER)(i__QG3E +  1);
+    i__2I3E=(__INTEGER)(i__2I3E +  1);
   };
-  if ((stat__RG3E ==  1)) {
-    Self__FZFH=((__STRING *)st__PG3E);
-    if (( 1 > Self__FZFH->count__EGC)) {
-      Self__FZFH->count__EGC= 0;
+  if ((stat__3I3E ==  1)) {
+    Self__O3FH=((__STRING *)st__1I3E);
+    if (( 1 > Self__O3FH->count__EGC)) {
+      Self__O3FH->count__EGC= 0;
     } else {
-      Self__FZFH->count__EGC=(__INTEGER)(Self__FZFH->count__EGC -  1);
+      Self__O3FH->count__EGC=(__INTEGER)(Self__O3FH->count__EGC -  1);
     };
   };
-  if ((stat__RG3E ==  2)) {
-    Self__HZFH=((__STRING *)st__PG3E);
-    if (( 2 > Self__HZFH->count__EGC)) {
-      Self__HZFH->count__EGC= 0;
+  if ((stat__3I3E ==  2)) {
+    Self__Q3FH=((__STRING *)st__1I3E);
+    if (( 2 > Self__Q3FH->count__EGC)) {
+      Self__Q3FH->count__EGC= 0;
     } else {
-      Self__HZFH->count__EGC=(__INTEGER)(Self__HZFH->count__EGC -  2);
+      Self__Q3FH->count__EGC=(__INTEGER)(Self__Q3FH->count__EGC -  2);
     };
   };
-  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 ((stat__3I3E ==  3)) {
+    Self__HMGD=((__STRING *)st__1I3E);
+    result__LMGD=(__INTEGER)(i__2I3E -  4);
+    while ((! ((result__LMGD <  1) || ('/' == ((__CHARACTER *)Self__HMGD->storage__F5R)[(__INTEGER)(result__LMGD -  1)])))) {
+      result__LMGD=(__INTEGER)(result__LMGD -  1);
     };
-    if ((result__KLGD ==  0)) {
-      ((__STRING *)st__PG3E)->count__EGC= 0;
+    if ((result__LMGD ==  0)) {
+      ((__STRING *)st__1I3E)->count__EGC= 0;
     } else {
-      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__O3HH=((__STRING *)st__1I3E);
+      end__K3HH=(__INTEGER)(i__2I3E -  1);
+      len__M3HH=(__INTEGER)((__INTEGER)(end__K3HH - result__LMGD) +  1);
+      if ((len__M3HH >  0)) {
+        __tmp__N3HH=(__INTEGER)(end__K3HH +  1);
+        __tmp__P3HH=Self__O3HH->count__EGC;
+        Self__Q3HH=__tmp__N3HH;
+        while ((Self__Q3HH <= __tmp__P3HH)) {
+          ((__CHARACTER *)Self__O3HH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__Q3HH - len__M3HH) -  1)]=((__CHARACTER *)Self__O3HH->storage__F5R)[(__INTEGER)(Self__Q3HH -  1)];
+          Self__Q3HH=(__INTEGER)(Self__Q3HH +  1);
         };
-        Self__FZHH->count__EGC=(__INTEGER)(Self__FZHH->count__EGC - len__DZHH);
+        Self__O3HH->count__EGC=(__INTEGER)(Self__O3HH->count__EGC - len__M3HH);
       };
     };
   };
-  if ((((__STRING *)st__PG3E)->count__EGC ==  0)) {
-    add_last__UHT(st__PG3E,'/');
+  if ((((__STRING *)st__1I3E)->count__EGC ==  0)) {
+    add_last__3IT(st__1I3E,'/');
   };
 }
 
-static void* item__YVPE(__DIRECTORY_UNIX *Self__ZVPE,__INTEGER i__0VPE)
+static void* item__NYPE(__DIRECTORY_UNIX *Self__OYPE,__INTEGER i__PYPE)
 // ({DIRECTORY_UNIX},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __LINKED_LISToENTRYo *Self__A0WE;
+  Self__A0WE=((__LINKED_LISToENTRYo *)Self__OYPE->parent_directory__HFD.list__UDRD);
+  if ((i__PYPE != Self__A0WE->mem_idx__IHWE)) {
+    if ((Self__A0WE->mem_idx__IHWE > i__PYPE)) {
+      Self__A0WE->mem_idx__IHWE= 1;
+      Self__A0WE->mem_lnk__JHWE=Self__A0WE->first_link__BHWE;
     };
-    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);
+    while ((i__PYPE != Self__A0WE->mem_idx__IHWE)) {
+      Self__A0WE->mem_lnk__JHWE=((__LINKED_LIST_NODEoENTRYo *)Self__A0WE->mem_lnk__JHWE)->next__PWFF;
+      Self__A0WE->mem_idx__IHWE=(__INTEGER)(Self__A0WE->mem_idx__IHWE +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoENTRYo *)Self__UXWE->mem_lnk__JFWE)->item__HYWE);
+  return(((__LINKED_LIST_NODEoENTRYo *)Self__A0WE->mem_lnk__JHWE)->item__T0WE);
 }
 
-static void* item__MZND(__LINKED_LISToSTRING_CONSTANTo *Self__NZND,__INTEGER i__OZND)
+static void* item__CZND(__LINKED_LISToSTRING_CONSTANTo *Self__DZND,__INTEGER i__EZND)
 // ({LINKED_LISToSTRING_CONSTANTo},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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;
+  if ((i__EZND != Self__DZND->mem_idx__ZTEC)) {
+    if ((Self__DZND->mem_idx__ZTEC > i__EZND)) {
+      Self__DZND->mem_idx__ZTEC= 1;
+      Self__DZND->mem_lnk__1TEC=Self__DZND->first_link__PTEC;
     };
-    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);
+    while ((i__EZND != Self__DZND->mem_idx__ZTEC)) {
+      Self__DZND->mem_lnk__1TEC=((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__DZND->mem_lnk__1TEC)->next__UMOD;
+      Self__DZND->mem_idx__ZTEC=(__INTEGER)(Self__DZND->mem_idx__ZTEC +  1);
     };
   };
-  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__NZND->mem_lnk__HSEC)->item__GWHD);
+  return(((__LINKED_LIST_NODEoSTRING_CONSTANTo *)Self__DZND->mem_lnk__1TEC)->item__HXHD);
 }
 
-static void** create__GY3(__INTEGER nb_elements__IY3)
+static void** create__PZ3(__INTEGER nb_elements__RZ3)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__XBEH,a__2BEH,new_size__YBEH,new_size2__ZBEH,a__53FH;
+  __UINTEGER_32 new_size__A4FH;
+  __POINTER result__WBEH,ptr_table__LAJH,next__KAJH,result__MAJH;
+  void *result__PAJH;
+  __INTEGER Self__2ZJC;
+  void **Result__1REB;
+  sz__XBEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__RZ3 * ((__INTEGER )(sizeof(void *)))));
+  result__WBEH=((__POINTER )(NULL));
+  a__2BEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__YBEH=(__UINTEGER_32)((__UINTEGER_32)(sz__XBEH + a__2BEH) & (__UINTEGER_32)(~ a__2BEH));
+  new_size2__ZBEH=(__UINTEGER_32)(new_size__YBEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__ZBEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__53FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__A4FH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__ZBEH + a__53FH) & (__UINTEGER_32)(~ a__53FH));
+    ptr_table__LAJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A4FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__KAJH=((__POINTER )(NULL));
+    result__MAJH=((__POINTER *)ptr_table__LAJH)[ 0];
+    if ((result__MAJH == (void *)NULL)) {
+      result__MAJH=new_lab__ZPJ(new_size__A4FH);
+      next__KAJH=(void *)((unsigned long)result__MAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A4FH)));
+      ((__POINTER *)next__KAJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__LAJH)[ 0]=next__KAJH;
+    } else {
+      next__KAJH=((__POINTER *)result__MAJH)[ 0];
+      if ((next__KAJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MAJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__A4FH <<  1)) <=  4096)) {
+          next__KAJH=(void *)((unsigned long)result__MAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A4FH)));
+        } else {
+          next__KAJH=new_lab__ZPJ(new_size__A4FH);
+        };
+        ((__POINTER *)next__KAJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LAJH)[ 0]=next__KAJH;
+      } else {
+        ((__POINTER *)result__MAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__MAJH=next__KAJH;
+      };
+    };
+    ((__POINTER *)result__MAJH)[ 0]=((__POINTER ) 3);
+    result__WBEH=(void *)((unsigned long)result__MAJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__PAJH=first_free__BCVB;
+    while ((((void *)result__PAJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__PAJH)->map_size_and_id__YTB &  4294967292LU) < new_size__YBEH))) {
+      result__PAJH=((__MEMORY *)result__PAJH)->map_next_free__ZTB;
     };
-    if (((void *)result__G2IH == (void *)NULL)) {
-      result__G2IH=new_page__B24();
+    if (((void *)result__PAJH == (void *)NULL)) {
+      result__PAJH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__PAJH,new_size__YBEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__PAJH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__WBEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__PAJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__1REB=((void **)result__WBEH);
+  Self__2ZJC=(__INTEGER)(nb_elements__RZ3 -  1);
+  while ((Self__2ZJC >=  0)) {
+    Result__1REB[Self__2ZJC]=NULL;
+    Self__2ZJC=(__INTEGER)(Self__2ZJC -  1);
   };
-  return(Result__SQEB);
+  return(Result__1REB);
 }
 
-static __BOOLEAN read_word__4MF(void *st__ANF)
+static __BOOLEAN read_word__HOF(void *st__JOF)
 // ({STRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __INTEGER posold__CNF,idx__DNF;
-  __BOOLEAN result__ENF,__tmp__COF;
-  __CHARACTER result__0KAH;
-  posold__CNF= 0;
-  idx__DNF= 0;
-  result__ENF=FALSE__;
+  __INTEGER posold__LOF,idx__MOF;
+  __BOOLEAN result__NOF,__tmp__LPF;
+  __CHARACTER result__DPAH;
+  posold__LOF= 0;
+  idx__MOF= 0;
+  result__NOF=FALSE__;
   if ((! read_space__KSD())) {
-    result__ENF=FALSE__;
+    result__NOF=FALSE__;
   } else {
-    posold__CNF=position__CCC;
-    idx__DNF= 1;
-    until_do__213:
+    posold__LOF=position__CCC;
+    idx__MOF= 1;
+    until_do__F33:
     {
-      if ((idx__DNF > ((__STRING_CONSTANT *)st__ANF)->count__DD)) {
-        __tmp__COF=TRUE__;
+      if ((idx__MOF > ((__STRING_CONSTANT *)st__JOF)->count__DD)) {
+        __tmp__LPF=TRUE__;
       } else {
-        result__0KAH='\0';
+        result__DPAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0KAH=((__CHARACTER )(( 0)));
+          result__DPAH=((__CHARACTER )(( 0)));
         } else {
-          result__0KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__DPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__COF=(result__0KAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__ANF)->storage__QMO)[(__INTEGER)(idx__DNF -  1)]);
+        __tmp__LPF=(result__DPAH != ((__CHARACTER *)((__STRING_CONSTANT *)st__JOF)->storage__ZNO)[(__INTEGER)(idx__MOF -  1)]);
       };
-      if ((! __tmp__COF)) {
+      if ((! __tmp__LPF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        idx__DNF=(__INTEGER)(idx__DNF +  1);
-        goto until_do__213;
+        idx__MOF=(__INTEGER)(idx__MOF +  1);
+        goto until_do__F33;
       };
     };
-    if ((idx__DNF > ((__STRING_CONSTANT *)st__ANF)->count__DD)) {
-      last_string__V0C=st__ANF;
-      result__ENF=TRUE__;
+    if ((idx__MOF > ((__STRING_CONSTANT *)st__JOF)->count__DD)) {
+      last_string__V0C=st__JOF;
+      result__NOF=TRUE__;
     } else {
-      position__CCC=posold__CNF;
+      position__CCC=posold__LOF;
     };
   };
-  return(result__ENF);
+  return(result__NOF);
 }
 
-static __BOOLEAN read_slot_header__AAE(__BOOLEAN first__CAE)
+static __BOOLEAN read_slot_header__JBE(__BOOLEAN first__LBE)
 // ({TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *v__PBE;
+  void *instr__XBE;
+  __POSITION pos__DRXG,pos__FRXG,pos__HRXG,pos__JRXG,pos__LRXG;
+  __POSITION pos__NRXG,pos__PRXG,pos__401G,pos__RRXG,pos__TRXG;
+  __POSITION pos__VRXG,pos__XRXG,pos__A11G,pos__ZRXG,pos__1RXG;
+  __POSITION pos__3RXG,pos__5RXG,pos__BSXG,pos__DSXG,pos__FSXG;
+  __POSITION pos__HSXG,pos__JSXG,pos__LSXG,pos__NSXG,pos__C11G;
+  __POSITION pos__PSXG,pos__RSXG,pos__JGM,pos__TSXG,pos__VSXG,pos__XSXG;
+  __POSITION pos__ZSXG,__tmp__BBQD,__tmp__GBQD,__tmp__E11G,pos__1SXG;
+  __POSITION pos__3SXG,pos__5SXG,pos__BTXG,pos__DTXG,pos__FTXG;
+  void *res__TGE,*__tmp__VIE;
+  __INTEGER __tmp__MIE,__tmp__OIE,__tmp__QIE,typ_id__U3HH,typ_id__43HH;
+  void *n__E4FH,*n__4MGB;
+  void *result__F4FH,*result__GNGB;
+  __ITM_TYPE_PARAMETER *result__S3HH,*Self__03HH,*result__23HH;
+  __ITM_TYPE_PARAMETER *Self__E4HH;
+  __POINTER ptr__T3HH,ptr_table__3AJH,next__2AJH,result__4AJH;
+  __POINTER ptr_table__CBJH,next__BBJH,result__DBJH,ptr__33HH;
+  __POINTER ptr_table__NBJH,next__MBJH,result__OBJH,ptr_table__SBJH;
+  __POINTER next__RBJH,result__TBJH;
+  __UINTEGER_32 sz__V3HH,a__W3HH,new_size__X3HH,t__Y3HH,a__Z3HH;
+  __UINTEGER_32 new_size__FBJH,lab_type__EBJH,sz__53HH,a__A4HH;
+  __UINTEGER_32 new_size__B4HH,t__C4HH,a__D4HH,new_size__VBJH;
+  __UINTEGER_32 lab_type__UBJH;
+  __BOOLEAN result__NBE,result__TAJH,__tmp__3EE,result__VAJH;
+  __BOOLEAN result__WAJH,__tmp__VGE,result__ZAJH,__tmp__FHE,__tmp__THE;
+  __BOOLEAN result__OQL,__tmp__BIE,result__GBJH,result__JBJH;
+  __BOOLEAN result__WBJH,__tmp__ANE,__tmp__GPE,__tmp__SNE,__tmp__2QE;
+  __BOOLEAN result__X3G,__tmp__YSE,result__J4G,__tmp__UUE,result__14G;
+  __BOOLEAN __tmp__BWE,result__N5G,__tmp__HYE,result__55G,result__ZBJH;
+  __BOOLEAN result__2BJH,result__5BJH,result__CCJH;
+  __CHARACTER style__RBE,result__XAJH,result__0AJH,result__HBJH;
+  __CHARACTER result__KBJH,result__XBJH,result__0BJH,result__3BJH;
+  __CHARACTER result__ACJH,result__DCJH;
+  result__NBE=FALSE__;
+  v__PBE=NULL;
+  instr__XBE=NULL;
+  style__RBE=read_style__OQF();
+  if ((style__RBE != ' ')) {
+    result__NBE=TRUE__;
+    if (((! first__LBE) && (style__RBE == '+'))) {
+      pos__DRXG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_252));
+      put_position__LNG(pos__DRXG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    if (first__CAE) {
-      if (read_word__4MF((&__string_62))) {
-        if ((style__IAE == '-')) {
-          append__2JS(output_decl__LCE,(&__string_253));
+    if (first__LBE) {
+      if (read_word__HOF((&__string_62))) {
+        if ((style__RBE == '-')) {
+          append__FLS(output_decl__UDE,(&__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)) {
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.parent_itm_object__4.position__0BJ=current_position__AWF();
+        ((__PROTOTYPE *)object__ZBC)->parent_named__5.style__FBU=style__RBE;
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__FRXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__FRXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__K2IH=read_word__4MF((&__string_9));
+        result__TAJH=read_word__HOF((&__string_9));
         if (is_shorter__LZ) {
-          if (result__K2IH) {
+          if (result__TAJH) {
             if (((void *)(&__string_9) == (void *)(&__string_4))) {
               short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             } else {
@@ -19328,12 +19336,12 @@ static __BOOLEAN read_slot_header__AAE(__BOOLEAN first__CAE)
             };
           };
         };
-        if (result__K2IH) {
-          __tmp__UDE=TRUE__;
+        if (result__TAJH) {
+          __tmp__3EE=TRUE__;
         } else {
-          result__M2IH=read_word__4MF((&__string_10));
+          result__VAJH=read_word__HOF((&__string_10));
           if (is_shorter__LZ) {
-            if (result__M2IH) {
+            if (result__VAJH) {
               if (((void *)(&__string_10) == (void *)(&__string_4))) {
                 short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
               } else {
@@ -19341,1561 +19349,1561 @@ static __BOOLEAN read_slot_header__AAE(__BOOLEAN first__CAE)
               };
             };
           };
-          __tmp__UDE=result__M2IH;
+          __tmp__3EE=result__VAJH;
         };
-        if (__tmp__UDE) {
+        if (__tmp__3EE) {
           ((__PROTOTYPE *)object__ZBC)->type_style__E3C=last_string__V0C;
         };
-        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)) {
+        if ((! read_cap_identifier__VXJ())) {
+          pos__HRXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_255));
+          put_position__LNG(pos__HRXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
         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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->shortname__2FE != (void *)last_string__V0C)) {
+          pos__JRXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_256));
+          put_position__LNG(pos__JRXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__N2IH=FALSE__;
+        result__WAJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__N2IH=FALSE__;
+          result__WAJH=FALSE__;
         } else {
-          result__O2IH='\0';
+          result__XAJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__O2IH=((__CHARACTER )(( 0)));
+            result__XAJH=((__CHARACTER )(( 0)));
           } else {
-            result__O2IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__XAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__O2IH == '(')) {
+          if ((result__XAJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__N2IH=TRUE__;
+            result__WAJH=TRUE__;
           };
         };
-        if (result__N2IH) {
+        if (result__WAJH) {
           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)) {
+            pos__LRXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_257));
+            put_position__LNG(pos__LRXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          res__KFE=NULL;
-          __tmp__MFE=read_identifier__12K();
-          if (__tmp__MFE) {
-            result__Q2IH=FALSE__;
+          res__TGE=NULL;
+          __tmp__VGE=read_identifier__E4K();
+          if (__tmp__VGE) {
+            result__ZAJH=FALSE__;
             if ((! read_space__KSD())) {
-              result__Q2IH=FALSE__;
+              result__ZAJH=FALSE__;
             } else {
-              result__R2IH='\0';
+              result__0AJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__R2IH=((__CHARACTER )(( 0)));
+                result__0AJH=((__CHARACTER )(( 0)));
               } else {
-                result__R2IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__0AJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__R2IH == ':')) {
+              if ((result__0AJH == ':')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__Q2IH=TRUE__;
+                result__ZAJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__ZAJH)) {
+              pos__NRXG=current_position__AWF();
+              put_error__text__BMG( 2,(&__string_258));
+              put_position__LNG(pos__NRXG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            __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)) {
+            __tmp__FHE=((void *)read_type__K5L(PARSER__,TRUE__) == (void *)NULL);
+            if (__tmp__FHE) {
+              pos__PRXG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_259));
+              put_position__LNG(pos__PRXG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            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)) {
+            pos__401G=current_position__AWF();
+            put_error__text__BMG( 1,(&__string_260));
+            put_position__LNG(pos__401G);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
-            __tmp__KGE=TRUE__;
+            __tmp__THE=TRUE__;
           } else {
-            __tmp__KGE=FALSE__;
+            __tmp__THE=FALSE__;
           };
-          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)) {
+          if ((! __tmp__THE)) {
+            result__OQL=read_cap_identifier__VXJ();
+            if (result__OQL) {
+              __tmp__BIE=is_parameter_type__5HE;
+              if ((! __tmp__BIE)) {
+                pos__RRXG=current_position__AWF();
+                put_error__text__BMG( 0,(&__string_261));
+                put_position__LNG(pos__RRXG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              __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__;
+              __tmp__MIE=position__CCC;
+              __tmp__OIE=((__STRING_CONSTANT *)last_string__V0C)->count__DD;
+              __tmp__QIE=(__INTEGER)(__tmp__MIE - __tmp__OIE);
+              short__token__to__YBD((&__string_126),__tmp__QIE,position__CCC);
+              n__E4FH=last_string__V0C;
+              result__F4FH=fast_reference_at__2YT(dico__5RI,n__E4FH);
+              if (((void *)result__F4FH == (void *)NULL)) {
+                result__S3HH=NULL;
+                ptr__T3HH=((__POINTER )(NULL));
+                typ_id__U3HH= 0;
+                sz__V3HH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                if ((sz__V3HH ==  0)) {
+                  result__S3HH=ITM_TYPE_PARAMETER__;
                 } else {
-                  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;
+                  typ_id__U3HH=-1;
+                  clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__V3HH);
+                  if ((typ_id__U3HH == (__INTEGER)(-  1))) {
+                    a__W3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__X3HH=(__UINTEGER_32)((__UINTEGER_32)(sz__V3HH + a__W3HH) & (__UINTEGER_32)(~ a__W3HH));
+                    ptr_table__3AJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X3HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                    next__2AJH=((__POINTER )(NULL));
+                    result__4AJH=((__POINTER *)ptr_table__3AJH)[ 0];
+                    if ((result__4AJH == (void *)NULL)) {
+                      result__4AJH=new_lab__ZPJ(new_size__X3HH);
+                      next__2AJH=(void *)((unsigned long)result__4AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3HH)));
+                      ((__POINTER *)next__2AJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
                     } else {
-                      next__T2IH=((__POINTER *)result__V2IH)[ 0];
-                      if ((next__T2IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__V2IH - (unsigned long)begin_memory__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)));
+                      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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X3HH <<  1)) <=  4096)) {
+                          next__2AJH=(void *)((unsigned long)result__4AJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X3HH)));
                         } else {
-                          next__T2IH=new_lab__QOJ(new_size__OZHH);
+                          next__2AJH=new_lab__ZPJ(new_size__X3HH);
                         };
-                        ((__POINTER *)next__T2IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__U2IH)[ 0]=next__T2IH;
+                        ((__POINTER *)next__2AJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
                       } else {
-                        ((__POINTER *)result__V2IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__T2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__V2IH=next__T2IH;
+                        ((__POINTER *)result__4AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__4AJH=next__2AJH;
                       };
                     };
-                    ptr__KZHH=result__V2IH;
+                    ptr__T3HH=result__4AJH;
                   } else {
-                    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;
+                    t__Y3HH=((__UINTEGER_32 )typ_id__U3HH);
+                    a__Z3HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                    new_size__FBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__V3HH + a__Z3HH) & (__UINTEGER_32)(~ a__Z3HH));
+                    ptr_table__CBJH=((__POINTER )(&(table_type[(t__Y3HH)])));
+                    lab_type__EBJH=(__UINTEGER_32)(t__Y3HH |  1);
+                    next__BBJH=((__POINTER )(NULL));
+                    result__DBJH=((__POINTER *)ptr_table__CBJH)[ 0];
+                    if ((result__DBJH == (void *)NULL)) {
+                      result__DBJH=new_lab__ZPJ(lab_type__EBJH);
+                      next__BBJH=(void *)((unsigned long)result__DBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FBJH)));
+                      ((__POINTER *)next__BBJH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
                     } else {
-                      next__Y2IH=((__POINTER *)result__02IH)[ 0];
-                      if ((next__Y2IH == (void *)NULL)) {
-                        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__02IH - (unsigned long)begin_memory__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)));
+                      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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FBJH <<  1)) <=  4096)) {
+                          next__BBJH=(void *)((unsigned long)result__DBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FBJH)));
                         } else {
-                          next__Y2IH=new_lab__QOJ(lab_type__12IH);
+                          next__BBJH=new_lab__ZPJ(lab_type__EBJH);
                         };
-                        ((__POINTER *)next__Y2IH)[ 0]=NULL;
-                        ((__POINTER *)ptr_table__Z2IH)[ 0]=next__Y2IH;
+                        ((__POINTER *)next__BBJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
                       } else {
-                        ((__POINTER *)result__02IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                        result__02IH=next__Y2IH;
+                        ((__POINTER *)result__DBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                        result__DBJH=next__BBJH;
                       };
                     };
-                    ptr__KZHH=result__02IH;
+                    ptr__T3HH=result__DBJH;
                   };
-                  result__JZHH=((__ITM_TYPE_PARAMETER *)ptr__KZHH);
-                  *(result__JZHH) = *(ITM_TYPE_PARAMETER__);
+                  result__S3HH=((__ITM_TYPE_PARAMETER *)ptr__T3HH);
+                  *(result__S3HH) = *(ITM_TYPE_PARAMETER__);
                 };
-                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;
+                Self__03HH=((__ITM_TYPE_PARAMETER *)result__S3HH);
+                Self__03HH->parent_itm_type__UBE.name__OVP=n__E4FH;
+                fast_put__to__PLZ(dico__5RI,Self__03HH,n__E4FH);
+                result__F4FH=result__S3HH;
               };
-              if (result__2ZFH==NULL) {
-                __tmp__MHE=NULL;
+              if (result__F4FH==NULL) {
+                __tmp__VIE=NULL;
               } else {
-                switch (((struct ___OBJ *)result__2ZFH)->__id) {
+                switch (((struct ___OBJ *)result__F4FH)->__id) {
                 case __ITM_TYPE_PARAMETER__: {
-                  __tmp__MHE=((void *)result__2ZFH);
+                  __tmp__VIE=((void *)result__F4FH);
                 } break;
                 case __ITM_TYPE_SIMPLE__: {
-                  __tmp__MHE=NULL;
+                  __tmp__VIE=NULL;
                 } break;
                 }
               };
-              res__KFE=__tmp__MHE;
+              res__TGE=__tmp__VIE;
             };
           };
-          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)) {
+          if (((void *)res__TGE == (void *)NULL)) {
+            pos__TRXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_261));
+            put_position__LNG(pos__TRXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__C5AC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__CJE,res__KFE);
-          while_do__KTK:
+          add_last__OABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__LKE,res__TGE);
+          while_do__TUK:
           {
-            result__32IH=FALSE__;
+            result__GBJH=FALSE__;
             if ((! read_space__KSD())) {
-              result__32IH=FALSE__;
+              result__GBJH=FALSE__;
             } else {
-              result__42IH='\0';
+              result__HBJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__42IH=((__CHARACTER )(( 0)));
+                result__HBJH=((__CHARACTER )(( 0)));
               } else {
-                result__42IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__HBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__42IH == ',')) {
+              if ((result__HBJH == ',')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__32IH=TRUE__;
+                result__GBJH=TRUE__;
               };
             };
-            if (result__32IH) {
-              res__KFE=NULL;
-              __tmp__MFE=read_identifier__12K();
-              if (__tmp__MFE) {
-                result__A3IH=FALSE__;
+            if (result__GBJH) {
+              res__TGE=NULL;
+              __tmp__VGE=read_identifier__E4K();
+              if (__tmp__VGE) {
+                result__JBJH=FALSE__;
                 if ((! read_space__KSD())) {
-                  result__A3IH=FALSE__;
+                  result__JBJH=FALSE__;
                 } else {
-                  result__B3IH='\0';
+                  result__KBJH='\0';
                   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                    result__B3IH=((__CHARACTER )(( 0)));
+                    result__KBJH=((__CHARACTER )(( 0)));
                   } else {
-                    result__B3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                    result__KBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                   };
-                  if ((result__B3IH == ':')) {
+                  if ((result__KBJH == ':')) {
                     position__CCC=(__INTEGER)(position__CCC +  1);
-                    result__A3IH=TRUE__;
+                    result__JBJH=TRUE__;
                   };
                 };
-                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)) {
+                if ((! result__JBJH)) {
+                  pos__VRXG=current_position__AWF();
+                  put_error__text__BMG( 2,(&__string_258));
+                  put_position__LNG(pos__VRXG);
+                  put_string__L0F(msg_err__GMG);
+                  if ((type_error__FMG !=  2)) {
                     exit(( 1));
                   };
                 };
-                __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)) {
+                __tmp__FHE=((void *)read_type__K5L(PARSER__,TRUE__) == (void *)NULL);
+                if (__tmp__FHE) {
+                  pos__XRXG=current_position__AWF();
+                  put_error__text__BMG( 0,(&__string_259));
+                  put_position__LNG(pos__XRXG);
+                  put_string__L0F(msg_err__GMG);
+                  if ((type_error__FMG !=  2)) {
                     exit(( 1));
                   };
                 };
-                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)) {
+                pos__A11G=current_position__AWF();
+                put_error__text__BMG( 1,(&__string_260));
+                put_position__LNG(pos__A11G);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
-                __tmp__KGE=TRUE__;
+                __tmp__THE=TRUE__;
               } else {
-                __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)) {
+                __tmp__THE=FALSE__;
+              };
+              if ((! __tmp__THE)) {
+                result__OQL=read_cap_identifier__VXJ();
+                if (result__OQL) {
+                  __tmp__BIE=is_parameter_type__5HE;
+                  if ((! __tmp__BIE)) {
+                    pos__ZRXG=current_position__AWF();
+                    put_error__text__BMG( 0,(&__string_261));
+                    put_position__LNG(pos__ZRXG);
+                    put_string__L0F(msg_err__GMG);
+                    if ((type_error__FMG !=  2)) {
                       exit(( 1));
                     };
                   };
-                  __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__;
+                  __tmp__MIE=position__CCC;
+                  __tmp__OIE=((__STRING_CONSTANT *)last_string__V0C)->count__DD;
+                  __tmp__QIE=(__INTEGER)(__tmp__MIE - __tmp__OIE);
+                  short__token__to__YBD((&__string_126),__tmp__QIE,position__CCC);
+                  n__4MGB=last_string__V0C;
+                  result__GNGB=fast_reference_at__2YT(dico__5RI,n__4MGB);
+                  if (((void *)result__GNGB == (void *)NULL)) {
+                    result__23HH=NULL;
+                    ptr__33HH=((__POINTER )(NULL));
+                    typ_id__43HH= 0;
+                    sz__53HH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+                    if ((sz__53HH ==  0)) {
+                      result__23HH=ITM_TYPE_PARAMETER__;
                     } else {
-                      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;
+                      typ_id__43HH=-1;
+                      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__53HH);
+                      if ((typ_id__43HH == (__INTEGER)(-  1))) {
+                        a__A4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__B4HH=(__UINTEGER_32)((__UINTEGER_32)(sz__53HH + a__A4HH) & (__UINTEGER_32)(~ a__A4HH));
+                        ptr_table__NBJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B4HH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                        next__MBJH=((__POINTER )(NULL));
+                        result__OBJH=((__POINTER *)ptr_table__NBJH)[ 0];
+                        if ((result__OBJH == (void *)NULL)) {
+                          result__OBJH=new_lab__ZPJ(new_size__B4HH);
+                          next__MBJH=(void *)((unsigned long)result__OBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4HH)));
+                          ((__POINTER *)next__MBJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
                         } else {
-                          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)));
+                          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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__B4HH <<  1)) <=  4096)) {
+                              next__MBJH=(void *)((unsigned long)result__OBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B4HH)));
                             } else {
-                              next__D3IH=new_lab__QOJ(new_size__YZHH);
+                              next__MBJH=new_lab__ZPJ(new_size__B4HH);
                             };
-                            ((__POINTER *)next__D3IH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__E3IH)[ 0]=next__D3IH;
+                            ((__POINTER *)next__MBJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__NBJH)[ 0]=next__MBJH;
                           } else {
-                            ((__POINTER *)result__F3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__D3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__F3IH=next__D3IH;
+                            ((__POINTER *)result__OBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__OBJH=next__MBJH;
                           };
                         };
-                        ptr__UZHH=result__F3IH;
+                        ptr__33HH=result__OBJH;
                       } else {
-                        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;
+                        t__C4HH=((__UINTEGER_32 )typ_id__43HH);
+                        a__D4HH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                        new_size__VBJH=(__UINTEGER_32)((__UINTEGER_32)(sz__53HH + a__D4HH) & (__UINTEGER_32)(~ a__D4HH));
+                        ptr_table__SBJH=((__POINTER )(&(table_type[(t__C4HH)])));
+                        lab_type__UBJH=(__UINTEGER_32)(t__C4HH |  1);
+                        next__RBJH=((__POINTER )(NULL));
+                        result__TBJH=((__POINTER *)ptr_table__SBJH)[ 0];
+                        if ((result__TBJH == (void *)NULL)) {
+                          result__TBJH=new_lab__ZPJ(lab_type__UBJH);
+                          next__RBJH=(void *)((unsigned long)result__TBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VBJH)));
+                          ((__POINTER *)next__RBJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
                         } else {
-                          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)));
+                          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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__VBJH <<  1)) <=  4096)) {
+                              next__RBJH=(void *)((unsigned long)result__TBJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__VBJH)));
                             } else {
-                              next__I3IH=new_lab__QOJ(lab_type__L3IH);
+                              next__RBJH=new_lab__ZPJ(lab_type__UBJH);
                             };
-                            ((__POINTER *)next__I3IH)[ 0]=NULL;
-                            ((__POINTER *)ptr_table__J3IH)[ 0]=next__I3IH;
+                            ((__POINTER *)next__RBJH)[ 0]=NULL;
+                            ((__POINTER *)ptr_table__SBJH)[ 0]=next__RBJH;
                           } else {
-                            ((__POINTER *)result__K3IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__I3IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                            result__K3IH=next__I3IH;
+                            ((__POINTER *)result__TBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                            result__TBJH=next__RBJH;
                           };
                         };
-                        ptr__UZHH=result__K3IH;
+                        ptr__33HH=result__TBJH;
                       };
-                      result__TZHH=((__ITM_TYPE_PARAMETER *)ptr__UZHH);
-                      *(result__TZHH) = *(ITM_TYPE_PARAMETER__);
+                      result__23HH=((__ITM_TYPE_PARAMETER *)ptr__33HH);
+                      *(result__23HH) = *(ITM_TYPE_PARAMETER__);
                     };
-                    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;
+                    Self__E4HH=((__ITM_TYPE_PARAMETER *)result__23HH);
+                    Self__E4HH->parent_itm_type__UBE.name__OVP=n__4MGB;
+                    fast_put__to__PLZ(dico__5RI,Self__E4HH,n__4MGB);
+                    result__GNGB=result__23HH;
                   };
-                  if (result__2LGB==NULL) {
-                    __tmp__MHE=NULL;
+                  if (result__GNGB==NULL) {
+                    __tmp__VIE=NULL;
                   } else {
-                    switch (((struct ___OBJ *)result__2LGB)->__id) {
+                    switch (((struct ___OBJ *)result__GNGB)->__id) {
                     case __ITM_TYPE_PARAMETER__: {
-                      __tmp__MHE=((void *)result__2LGB);
+                      __tmp__VIE=((void *)result__GNGB);
                     } break;
                     case __ITM_TYPE_SIMPLE__: {
-                      __tmp__MHE=NULL;
+                      __tmp__VIE=NULL;
                     } break;
                     }
                   };
-                  res__KFE=__tmp__MHE;
+                  res__TGE=__tmp__VIE;
                 };
               };
-              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)) {
+              if (((void *)res__TGE == (void *)NULL)) {
+                pos__1RXG=current_position__AWF();
+                put_error__text__BMG( 0,(&__string_261));
+                put_position__LNG(pos__1RXG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              add_last__C5AC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__CJE,res__KFE);
-              goto while_do__KTK;
+              add_last__OABC(((__PROTOTYPE *)object__ZBC)->idf_generic_list__LKE,res__TGE);
+              goto while_do__TUK;
             };
           };
-          result__N3IH=FALSE__;
+          result__WBJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__N3IH=FALSE__;
+            result__WBJH=FALSE__;
           } else {
-            result__O3IH='\0';
+            result__XBJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__O3IH=((__CHARACTER )(( 0)));
+              result__XBJH=((__CHARACTER )(( 0)));
             } else {
-              result__O3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__XBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__O3IH == ')')) {
+            if ((result__XBJH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__N3IH=TRUE__;
+              result__WBJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__WBJH)) {
+            pos__3RXG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_262));
+            put_position__LNG(pos__3RXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
           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)) {
+            if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_PARAMETERo *)((__PROTOTYPE *)object__ZBC)->idf_generic_list__LKE)->parent_arrayed_collection__KKE.upper__SABC +  1) !=  0)) {
+              pos__5RXG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_263));
+              put_position__LNG(pos__5RXG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
       } else {
-        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)) {
+        pos__BSXG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_264));
+        put_position__LNG(pos__BSXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      __tmp__XLE=TRUE__;
+      __tmp__ANE=TRUE__;
     } else {
-      __tmp__XLE=FALSE__;
+      __tmp__ANE=FALSE__;
     };
-    if (__tmp__XLE) {
-      __tmp__3NE=TRUE__;
+    if (__tmp__ANE) {
+      __tmp__GPE=TRUE__;
     } else {
-      __tmp__JME=(read_word__4MF((&__string_63)) || read_word__4MF((&__string_64)));
-      if (__tmp__JME) {
+      __tmp__SNE=(read_word__HOF((&__string_63)) || read_word__HOF((&__string_64)));
+      if (__tmp__SNE) {
         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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__DSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__DSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)read_type_list__MJO(PARSER__,FALSE__) == (void *)NULL)) {
+          pos__FSXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_265));
+          put_position__LNG(pos__FSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__3NE=__tmp__JME;
+      __tmp__GPE=__tmp__SNE;
     };
-    if (__tmp__3NE) {
-      __tmp__TPE=TRUE__;
+    if (__tmp__GPE) {
+      __tmp__2QE=TRUE__;
     } else {
-      result__O2G=read_word__4MF((&__string_65));
-      if (result__O2G) {
+      result__X3G=read_word__HOF((&__string_65));
+      if (result__X3G) {
         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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__HSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__HSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__EQO())) {
+          pos__JSXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_266));
+          put_position__LNG(pos__JSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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');
+        append__FLS(output_decl__UDE,(&__string_267));
+        append__FLS(output_decl__UDE,((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI);
+        add_last__3IT(output_decl__UDE,'\n');
+        append__FLS(output_decl__UDE,last_string__V0C);
+        add_last__3IT(output_decl__UDE,'\n');
       };
-      __tmp__TPE=result__O2G;
+      __tmp__2QE=result__X3G;
     };
-    if (__tmp__TPE) {
-      __tmp__PRE=TRUE__;
+    if (__tmp__2QE) {
+      __tmp__YSE=TRUE__;
     } else {
-      result__A3G=read_word__4MF((&__string_66));
-      if (result__A3G) {
+      result__J4G=read_word__HOF((&__string_66));
+      if (result__J4G) {
         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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__LSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__LSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        v__PBE=read_expr_primary__M1M(PARSER__);
+        if (((void *)v__PBE == (void *)NULL)) {
+          pos__NSXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_268));
+          put_position__LNG(pos__NSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->default_value__KSE != (void *)NULL)) {
+          pos__C11G=current_position__AWF();
+          put_error__text__BMG( 1,(&__string_269));
+          put_position__LNG(pos__C11G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->default_value__BRE=v__GAE;
+        ((__PROTOTYPE *)object__ZBC)->default_value__KSE=v__PBE;
       };
-      __tmp__PRE=result__A3G;
+      __tmp__YSE=result__J4G;
     };
-    if (__tmp__PRE) {
-      __tmp__LTE=TRUE__;
+    if (__tmp__YSE) {
+      __tmp__UUE=TRUE__;
     } else {
-      result__S3G=read_word__4MF((&__string_67));
-      if (result__S3G) {
+      result__14G=read_word__HOF((&__string_67));
+      if (result__14G) {
         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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__PSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__PSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_external__EQO())) {
+          pos__RSXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_266));
+          put_position__LNG(pos__RSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if (((void *)((__PROTOTYPE *)object__ZBC)->type_c__FUE != (void *)NULL)) {
+          pos__JGM=current_position__AWF();
+          put_error__text__BMG( 1,(&__string_270));
+          put_position__LNG(pos__JGM);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        ((__PROTOTYPE *)object__ZBC)->type_c__2SE=last_string__V0C;
+        ((__PROTOTYPE *)object__ZBC)->type_c__FUE=last_string__V0C;
       };
-      __tmp__LTE=result__S3G;
+      __tmp__UUE=result__14G;
     };
-    if (__tmp__LTE) {
-      __tmp__YUE=TRUE__;
+    if (__tmp__UUE) {
+      __tmp__BWE=TRUE__;
     } else {
-      result__E4G=read_word__4MF((&__string_68));
-      if (result__E4G) {
+      result__N5G=read_word__HOF((&__string_68));
+      if (result__N5G) {
         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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__TSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__TSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_integer__EZP())) {
+          pos__VSXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_271));
+          put_position__LNG(pos__VSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__YUE=result__E4G;
+      __tmp__BWE=result__N5G;
     };
-    if (__tmp__YUE) {
-      __tmp__4WE=TRUE__;
+    if (__tmp__BWE) {
+      __tmp__HYE=TRUE__;
     } else {
-      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)) {
+      result__55G=read_word__HOF((&__string_88));
+      if (result__55G) {
+        if ((! read_symbol__GVJ((&__string_14)))) {
+          pos__XSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_272));
+          put_position__LNG(pos__XSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__Q3IH=FALSE__;
+        result__ZBJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__Q3IH=FALSE__;
+          result__ZBJH=FALSE__;
         } else {
-          result__R3IH='\0';
+          result__0BJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__R3IH=((__CHARACTER )(( 0)));
+            result__0BJH=((__CHARACTER )(( 0)));
           } else {
-            result__R3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__0BJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__R3IH == '(')) {
+          if ((result__0BJH == '(')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__Q3IH=TRUE__;
+            result__ZBJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__ZBJH)) {
+          pos__ZSXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_273));
+          put_position__LNG(pos__ZSXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__5BFB:
+        while_do__IDFB:
         {
-          instr__OAE=readlip_expr__PQPB();
-          if (((void *)instr__OAE != (void *)NULL)) {
-            switch (((struct ___OBJ *)instr__OAE)->__id) {
+          instr__XBE=readlip_expr__ZRPB();
+          if (((void *)instr__XBE != (void *)NULL)) {
+            switch (((struct ___OBJ *)instr__XBE)->__id) {
             case __LIP_AFFECT__: {
-              run__HEFC(instr__OAE);
+              run__1FFC(instr__XBE);
             } break;
             case __LIP_BINARY__: {
-              __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)) {
+              __tmp__BBQD=((__LIP_BINARY *)instr__XBE)->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ;
+              put_error__text__BMG( 2,(&__string_274));
+              put_position__LNG(__tmp__BBQD);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_UNARY__: {
-              __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)) {
+              __tmp__GBQD=((__LIP_UNARY *)instr__XBE)->parent_lip_code__MZ4B.parent_itm_object__WBE.position__0BJ;
+              put_error__text__BMG( 2,(&__string_274));
+              put_position__LNG(__tmp__GBQD);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             } break;
             case __LIP_CALL__: {
-              run__RJUE(instr__OAE);
+              run__RLUE(instr__XBE);
             } break;
             case __LIP_IF__: {
-              run__SBQD(instr__OAE);
+              run__IBQD(instr__XBE);
             } break;
             case __LIP_PRINT__: {
-              run__FOUE(instr__OAE);
+              run__FQUE(instr__XBE);
             } break;
             case __LIP_VALUE__: {
-              __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)) {
+              __tmp__E11G=((__LIP_VALUE *)instr__XBE)->parent_lip_code__4EFE.parent_itm_object__WBE.position__0BJ;
+              put_error__text__BMG( 2,(&__string_274));
+              put_position__LNG(__tmp__E11G);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             } break;
             };
-            result__T3IH=FALSE__;
+            result__2BJH=FALSE__;
             if ((! read_space__KSD())) {
-              result__T3IH=FALSE__;
+              result__2BJH=FALSE__;
             } else {
-              result__U3IH='\0';
+              result__3BJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__U3IH=((__CHARACTER )(( 0)));
+                result__3BJH=((__CHARACTER )(( 0)));
               } else {
-                result__U3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__3BJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__U3IH == ';')) {
+              if ((result__3BJH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__T3IH=TRUE__;
+                result__2BJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__2BJH)) {
+              pos__1SXG=current_position__AWF();
+              put_error__text__BMG( 2,(&__string_167));
+              put_position__LNG(pos__1SXG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__5BFB;
+            goto while_do__IDFB;
           };
         };
-        result__W3IH=FALSE__;
+        result__5BJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__W3IH=FALSE__;
+          result__5BJH=FALSE__;
         } else {
-          result__X3IH='\0';
+          result__ACJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__X3IH=((__CHARACTER )(( 0)));
+            result__ACJH=((__CHARACTER )(( 0)));
           } else {
-            result__X3IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__ACJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__X3IH == ')')) {
+          if ((result__ACJH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__W3IH=TRUE__;
+            result__5BJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__5BJH)) {
+          pos__3SXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_238));
+          put_position__LNG(pos__3SXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
-      __tmp__4WE=result__W4G;
+      __tmp__HYE=result__55G;
     };
-    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)))) {
+    if ((! __tmp__HYE)) {
+      if (((((((read_word__HOF((&__string_69)) || read_word__HOF((&__string_70))) || read_word__HOF((&__string_71))) || read_word__HOF((&__string_72))) || read_word__HOF((&__string_73))) || read_word__HOF((&__string_74))) || read_word__HOF((&__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)) {
+        if ((! read_symbol__GVJ((&__string_12)))) {
+          pos__5SXG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_254));
+          put_position__LNG(pos__5SXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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)) {
+        if ((! read_string__PCQ())) {
+          pos__BTXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_275));
+          put_position__LNG(pos__BTXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
         if (is_shorter2__VI) {
-          ((__PROTOTYPE *)object__ZBC)->comment_slot__ZPTC=last_string__V0C;
+          ((__PROTOTYPE *)object__ZBC)->comment_slot__QRTC=last_string__V0C;
         };
       } else {
-        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)) {
+        pos__DTXG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_276));
+        put_position__LNG(pos__DTXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    result__Z3IH=FALSE__;
+    result__CCJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__Z3IH=FALSE__;
+      result__CCJH=FALSE__;
     } else {
-      result__03IH='\0';
+      result__DCJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__03IH=((__CHARACTER )(( 0)));
+        result__DCJH=((__CHARACTER )(( 0)));
       } else {
-        result__03IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__DCJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__03IH == ';')) {
+      if ((result__DCJH == ';')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__Z3IH=TRUE__;
+        result__CCJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__CCJH)) {
+      pos__FTXG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_242));
+      put_position__LNG(pos__FTXG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__EAE);
+  return(result__NBE);
 }
 
-static void* get_name__OQOB(void *n__QQOB)
+static void* get_name__YROB(void *n__0ROB)
 // ({NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__GOEC,*result__2ROB;
+  __STRING_CONSTANT *Self__H4HH,*Self__M4HH,*Self__R4HH;
+  __INTEGER result__G4HH,__tmp__I4HH,Self__J4HH,typ_id__22YB;
+  __INTEGER result__L4HH,__tmp__N4HH,Self__O4HH,idx__IXFC,idx__D4HD;
+  __INTEGER new_capacity__E4HD,i__F4HD,result__Q4HH,__tmp__S4HH;
+  __INTEGER Self__T4HH,typ_id__SAID;
+  __SECTION_ *result__W2YB,*Self__ZWFC;
+  __POINTER ptr__X2YB,ptr_table__GCJH,next__FCJH,result__HCJH;
+  __POINTER ptr_table__LCJH,next__KCJH,result__MCJH,ptr__NAID;
+  __POINTER ptr_table__QCJH,next__PCJH,result__RCJH,ptr_table__VCJH;
+  __POINTER next__UCJH,result__WCJH;
+  __UINTEGER_32 sz__Z2YB,a__W5FH,new_size__X5FH,t__15FH,a__05FH;
+  __UINTEGER_32 new_size__OCJH,lab_type__NCJH,sz__PAID,a__04FH;
+  __UINTEGER_32 new_size__14FH,t__54FH,a__44FH,new_size__YCJH;
+  __UINTEGER_32 lab_type__XCJH;
+  __HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *Self__0NEC,*Self__4WFC;
+  void *node__FOEC,*node__JXFC,*node1__H4HD,*node2__I4HD,*__tmp__XYFC;
+  void **old_buckets__G4HD;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *result__MAID;
+  __HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *Self__WBTD;
+  Self__0NEC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__BSOB);
+  result__GOEC=NULL;
+  Self__H4HH=((__STRING_CONSTANT *)n__0ROB);
+  result__G4HH= 0;
+  __tmp__I4HH=Self__H4HH->count__DD;
+  Self__J4HH= 1;
+  while ((Self__J4HH <= __tmp__I4HH)) {
+    result__G4HH=(__INTEGER)((__INTEGER)( 5 * result__G4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__H4HH->storage__ZNO)[(__INTEGER)(Self__J4HH -  1)])));
+    Self__J4HH=(__INTEGER)(Self__J4HH +  1);
+  };
+  if ((result__G4HH <  0)) {
+    result__G4HH=(__INTEGER)(~ result__G4HH);
+  };
+  node__FOEC=((void **)Self__0NEC->buckets__NOEC)[(__INTEGER)(result__G4HH % Self__0NEC->capacity__IOEC)];
+  while ((! (((void *)node__FOEC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__FOEC)->key__ZOEC == (void *)n__0ROB)))) {
+    node__FOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__FOEC)->next__EPEC;
+  };
+  if (((void *)node__FOEC != (void *)NULL)) {
+    result__GOEC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__FOEC)->item__MPEC;
+  };
+  result__2ROB=result__GOEC;
+  if (((void *)result__GOEC == (void *)NULL)) {
+    result__W2YB=NULL;
+    ptr__X2YB=((__POINTER )(NULL));
+    typ_id__22YB= 0;
+    sz__Z2YB=((__UINTEGER_32 )sizeof(__SECTION_));
+    if ((sz__Z2YB ==  0)) {
+      result__W2YB=SECTION___;
+    } else {
+      typ_id__22YB=__SECTION___;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__Z2YB);
+      if ((typ_id__22YB == (__INTEGER)(-  1))) {
+        a__W5FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__X5FH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z2YB + a__W5FH) & (__UINTEGER_32)(~ a__W5FH));
+        ptr_table__GCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X5FH / ((__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__ZPJ(new_size__X5FH);
+          next__FCJH=(void *)((unsigned long)result__HCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5FH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X5FH <<  1)) <=  4096)) {
+              next__FCJH=(void *)((unsigned long)result__HCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X5FH)));
             } else {
-              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)));
+              next__FCJH=new_lab__ZPJ(new_size__X5FH);
+            };
+            ((__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__X2YB=result__HCJH;
+      } else {
+        t__15FH=((__UINTEGER_32 )typ_id__22YB);
+        a__05FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__OCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__Z2YB + a__05FH) & (__UINTEGER_32)(~ a__05FH));
+        ptr_table__LCJH=((__POINTER )(&(table_type[(t__15FH)])));
+        lab_type__NCJH=(__UINTEGER_32)(t__15FH |  1);
+        next__KCJH=((__POINTER )(NULL));
+        result__MCJH=((__POINTER *)ptr_table__LCJH)[ 0];
+        if ((result__MCJH == (void *)NULL)) {
+          result__MCJH=new_lab__ZPJ(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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OCJH <<  1)) <=  4096)) {
+              next__KCJH=(void *)((unsigned long)result__MCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OCJH)));
             } else {
-              next__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)));
+              next__KCJH=new_lab__ZPJ(lab_type__NCJH);
+            };
+            ((__POINTER *)next__KCJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__LCJH)[ 0]=next__KCJH;
+          } else {
+            ((__POINTER *)result__MCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__MCJH=next__KCJH;
+          };
+        };
+        ptr__X2YB=result__MCJH;
+      };
+      result__W2YB=((__SECTION_ *)ptr__X2YB);
+      *(result__W2YB) = *(SECTION___);
+    };
+    result__2ROB=result__W2YB;
+    Self__ZWFC=((__SECTION_ *)result__W2YB);
+    Self__ZWFC->name__NYDC=n__0ROB;
+    Self__ZWFC->type_list__2WFC=NULL;
+    Self__4WFC=((__HASHED_DICTIONARYoSECTION_xSTRING_CONSTANTo *)bucket_name__BSOB);
+    Self__M4HH=((__STRING_CONSTANT *)n__0ROB);
+    result__L4HH= 0;
+    __tmp__N4HH=Self__M4HH->count__DD;
+    Self__O4HH= 1;
+    while ((Self__O4HH <= __tmp__N4HH)) {
+      result__L4HH=(__INTEGER)((__INTEGER)( 5 * result__L4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__M4HH->storage__ZNO)[(__INTEGER)(Self__O4HH -  1)])));
+      Self__O4HH=(__INTEGER)(Self__O4HH +  1);
+    };
+    if ((result__L4HH <  0)) {
+      result__L4HH=(__INTEGER)(~ result__L4HH);
+    };
+    idx__IXFC=(__INTEGER)(result__L4HH % Self__4WFC->capacity__IOEC);
+    node__JXFC=((void **)Self__4WFC->buckets__NOEC)[idx__IXFC];
+    while ((! (((void *)node__JXFC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__JXFC)->key__ZOEC == (void *)n__0ROB)))) {
+      node__JXFC=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__JXFC)->next__EPEC;
+    };
+    if (((void *)node__JXFC == (void *)NULL)) {
+      if ((Self__4WFC->capacity__IOEC == Self__4WFC->count__KYFC)) {
+        idx__D4HD= 0;
+        node1__H4HD=NULL;
+        node2__I4HD=NULL;
+        old_buckets__G4HD=Self__4WFC->buckets__NOEC;
+        new_capacity__E4HD=prime_number_ceiling__T11((__INTEGER)(Self__4WFC->capacity__IOEC +  1));
+        Self__4WFC->buckets__NOEC=create__02XC(new_capacity__E4HD);
+        i__F4HD=(__INTEGER)(Self__4WFC->capacity__IOEC -  1);
+        Self__4WFC->capacity__IOEC=new_capacity__E4HD;
+        while ((i__F4HD >=  0)) {
+          node1__H4HD=((void **)old_buckets__G4HD)[i__F4HD];
+          while (((void *)node1__H4HD != (void *)NULL)) {
+            node2__I4HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__H4HD)->next__EPEC;
+            Self__R4HH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__H4HD)->key__ZOEC);
+            result__Q4HH= 0;
+            __tmp__S4HH=Self__R4HH->count__DD;
+            Self__T4HH= 1;
+            while ((Self__T4HH <= __tmp__S4HH)) {
+              result__Q4HH=(__INTEGER)((__INTEGER)( 5 * result__Q4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__R4HH->storage__ZNO)[(__INTEGER)(Self__T4HH -  1)])));
+              Self__T4HH=(__INTEGER)(Self__T4HH +  1);
+            };
+            if ((result__Q4HH <  0)) {
+              result__Q4HH=(__INTEGER)(~ result__Q4HH);
+            };
+            idx__D4HD=(__INTEGER)(result__Q4HH % Self__4WFC->capacity__IOEC);
+            ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node1__H4HD)->next__EPEC=((void **)Self__4WFC->buckets__NOEC)[idx__D4HD];
+            ((void **)Self__4WFC->buckets__NOEC)[idx__D4HD]=node1__H4HD;
+            node1__H4HD=node2__I4HD;
+          };
+          i__F4HD=(__INTEGER)(i__F4HD -  1);
+        };
+        idx__IXFC=(__INTEGER)(result__L4HH % new_capacity__E4HD);
+      };
+      __tmp__XYFC=((void **)Self__4WFC->buckets__NOEC)[idx__IXFC];
+      result__MAID=NULL;
+      ptr__NAID=((__POINTER )(NULL));
+      typ_id__SAID= 0;
+      sz__PAID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo));
+      if ((sz__PAID ==  0)) {
+        result__MAID=HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+      } else {
+        typ_id__SAID=__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PAID);
+        if ((typ_id__SAID == (__INTEGER)(-  1))) {
+          a__04FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__14FH=(__UINTEGER_32)((__UINTEGER_32)(sz__PAID + a__04FH) & (__UINTEGER_32)(~ a__04FH));
+          ptr_table__QCJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__14FH / ((__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__ZPJ(new_size__14FH);
+            next__PCJH=(void *)((unsigned long)result__RCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__14FH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__14FH <<  1)) <=  4096)) {
+                next__PCJH=(void *)((unsigned long)result__RCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__14FH)));
               } else {
-                next__G4IH=new_lab__QOJ(new_size__S0FH);
+                next__PCJH=new_lab__ZPJ(new_size__14FH);
               };
-              ((__POINTER *)next__G4IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__H4IH)[ 0]=next__G4IH;
+              ((__POINTER *)next__PCJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QCJH)[ 0]=next__PCJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__RCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__RCJH=next__PCJH;
+            };
+          };
+          ptr__NAID=result__RCJH;
+        } else {
+          t__54FH=((__UINTEGER_32 )typ_id__SAID);
+          a__44FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YCJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PAID + a__44FH) & (__UINTEGER_32)(~ a__44FH));
+          ptr_table__VCJH=((__POINTER )(&(table_type[(t__54FH)])));
+          lab_type__XCJH=(__UINTEGER_32)(t__54FH |  1);
+          next__UCJH=((__POINTER )(NULL));
+          result__WCJH=((__POINTER *)ptr_table__VCJH)[ 0];
+          if ((result__WCJH == (void *)NULL)) {
+            result__WCJH=new_lab__ZPJ(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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YCJH <<  1)) <=  4096)) {
+                next__UCJH=(void *)((unsigned long)result__WCJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YCJH)));
               } else {
-                next__L4IH=new_lab__QOJ(lab_type__O4IH);
+                next__UCJH=new_lab__ZPJ(lab_type__XCJH);
               };
-              ((__POINTER *)next__L4IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__M4IH)[ 0]=next__L4IH;
+              ((__POINTER *)next__UCJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VCJH)[ 0]=next__UCJH;
             } else {
-              ((__POINTER *)result__N4IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__N4IH=next__L4IH;
+              ((__POINTER *)result__WCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WCJH=next__UCJH;
             };
           };
-          ptr__M5HD=result__N4IH;
+          ptr__NAID=result__WCJH;
         };
-        result__L5HD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__M5HD);
-        *(result__L5HD) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
+        result__MAID=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)ptr__NAID);
+        *(result__MAID) = *(HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo__);
       };
-      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);
+      Self__WBTD=((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)result__MAID);
+      Self__WBTD->item__MPEC=result__W2YB;
+      Self__WBTD->key__ZOEC=n__0ROB;
+      Self__WBTD->next__EPEC=__tmp__XYFC;
+      node__JXFC=result__MAID;
+      ((void **)Self__4WFC->buckets__NOEC)[idx__IXFC]=result__MAID;
+      Self__4WFC->count__KYFC=(__INTEGER)(Self__4WFC->count__KYFC +  1);
     } else {
-      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__VVFC)->item__YNEC=result__K1YB;
+      ((__HASHED_DICTIONARY_NODEoSECTION_xSTRING_CONSTANTo *)node__JXFC)->item__MPEC=result__W2YB;
     };
   };
-  return(result__SQOB);
+  return(result__2ROB);
 }
 
-static void* read_type_list__DIO(__PARSER *Self__EIO,__BOOLEAN is_section__FIO)
+static void* read_type_list__MJO(__PARSER *Self__NJO,__BOOLEAN is_section__OJO)
 // ({PARSER},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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) {
+  void *ts__SJO,*__tmp__5JO,*__tmp__JLO;
+  void *t__RJO;
+  __POSITION pos__RVXG,pos__TVXG,pos__VVXG;
+  void *lst__QJO,*result__V4HH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__W4HH,*Self__X4HH;
+  __BOOLEAN result__ZCJH;
+  __CHARACTER result__0CJH;
+  lst__QJO=NULL;
+  ts__SJO=NULL;
+  t__RJO=read_type__K5L(Self__NJO,FALSE__);
+  if (((void *)t__RJO != (void *)NULL)) {
+    if (is_section__OJO) {
+      if (t__RJO==NULL) {
+        __tmp__5JO=NULL;
+      } else {
+        switch (((struct ___OBJ *)t__RJO)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          __tmp__WIO=((void *)t__IIO);
+          __tmp__5JO=((void *)t__RJO);
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          __tmp__WIO=((void *)t__IIO);
+          __tmp__5JO=((void *)t__RJO);
         } break;
         case __ITM_TYPE_BLOCK__: {
-          __tmp__WIO=NULL;
+          __tmp__5JO=NULL;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          __tmp__WIO=((void *)t__IIO);
+          __tmp__5JO=((void *)t__RJO);
         } break;
         case __ITM_TYPE_STYLE__: {
-          __tmp__WIO=((void *)t__IIO);
+          __tmp__5JO=((void *)t__RJO);
         } break;
         }
       };
-      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)) {
+      ts__SJO=__tmp__5JO;
+      if (((void *)__tmp__5JO == (void *)NULL)) {
+        pos__RVXG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_277));
+        put_position__LNG(pos__RVXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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);
+    result__V4HH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP)->parent_arrayed_collection__NRP.upper__BSV <  0)) {
+      result__V4HH=create_with_capacity__MCR( 16);
     } else {
-      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);
+      Self__W4HH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+      result__V4HH=((void **)Self__W4HH->parent_arrayed_collection__NRP.storage__XWV)[Self__W4HH->parent_arrayed_collection__NRP.upper__BSV];
+      Self__X4HH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+      Self__X4HH->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(Self__X4HH->parent_arrayed_collection__NRP.upper__BSV -  1);
     };
-    lst__HIO=result__M0HH;
-    add_last__NJV(result__M0HH,t__IIO);
-    while_do__XQP:
+    lst__QJO=result__V4HH;
+    add_last__WKV(result__V4HH,t__RJO);
+    while_do__ASP:
     {
-      result__Q4IH=FALSE__;
+      result__ZCJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__Q4IH=FALSE__;
+        result__ZCJH=FALSE__;
       } else {
-        result__R4IH='\0';
+        result__0CJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__R4IH=((__CHARACTER )(( 0)));
+          result__0CJH=((__CHARACTER )(( 0)));
         } else {
-          result__R4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__0CJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__R4IH == ',')) {
+        if ((result__0CJH == ',')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__Q4IH=TRUE__;
+          result__ZCJH=TRUE__;
         };
       };
-      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)) {
+      if (result__ZCJH) {
+        t__RJO=read_type__K5L(Self__NJO,FALSE__);
+        if (((void *)t__RJO == (void *)NULL)) {
+          pos__TVXG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_265));
+          put_position__LNG(pos__TVXG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        if (is_section__FIO) {
-          if (t__IIO==NULL) {
-            __tmp__AKO=NULL;
+        if (is_section__OJO) {
+          if (t__RJO==NULL) {
+            __tmp__JLO=NULL;
           } else {
-            switch (((struct ___OBJ *)t__IIO)->__id) {
+            switch (((struct ___OBJ *)t__RJO)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__AKO=((void *)t__IIO);
+              __tmp__JLO=((void *)t__RJO);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__AKO=((void *)t__IIO);
+              __tmp__JLO=((void *)t__RJO);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__AKO=NULL;
+              __tmp__JLO=NULL;
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__AKO=((void *)t__IIO);
+              __tmp__JLO=((void *)t__RJO);
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__AKO=((void *)t__IIO);
+              __tmp__JLO=((void *)t__RJO);
             } break;
             }
           };
-          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)) {
+          ts__SJO=__tmp__JLO;
+          if (((void *)__tmp__JLO == (void *)NULL)) {
+            pos__VVXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_277));
+            put_position__LNG(pos__VVXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
         };
-        add_last__NJV(lst__HIO,t__IIO);
-        goto while_do__XQP;
+        add_last__WKV(lst__QJO,t__RJO);
+        goto while_do__ASP;
       };
     };
-    lst__HIO=alias__BRP(result__M0HH);
+    lst__QJO=alias__KSP(result__V4HH);
   };
-  return(lst__HIO);
+  return(lst__QJO);
 }
 
-static __INTEGER hash_code__C10(__FAST_ARRAYoITM_TYPE_MONOo *Self__D10)
+static __INTEGER hash_code__L20(__FAST_ARRAYoITM_TYPE_MONOo *Self__M20)
 // ({FAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER result__O20,result__Y4HH,__tmp__04HH,Self__14HH,__tmp__320;
+  __INTEGER result__34HH,__tmp__54HH,Self__A5HH,result__C5HH;
+  __INTEGER __tmp__E5HH,Self__F5HH,result__H5HH,__tmp__J5HH,Self__K5HH;
+  __INTEGER result__M5HH,__tmp__O5HH,Self__P5HH,__tmp__M30,result__R5HH;
+  __INTEGER __tmp__T5HH,Self__U5HH,result__W5HH,__tmp__Y5HH,Self__Z5HH;
+  __INTEGER result__15HH,__tmp__35HH,Self__45HH;
+  void *__tmp__220,*__tmp__L30;
+  __STRING_CONSTANT *Self__Z4HH,*Self__44HH,*Self__D5HH,*Self__I5HH;
+  __STRING_CONSTANT *Self__N5HH,*Self__S5HH,*Self__X5HH,*Self__25HH;
+  __BOOLEAN __tmp__520;
+  result__O20= 0;
+  if ((! (Self__M20->parent_arrayed_collection__EYC.upper__GFV <  0))) {
+    if (((void *)((void **)Self__M20->parent_arrayed_collection__EYC.storage__NJV)[Self__M20->parent_arrayed_collection__EYC.upper__GFV] != (void *)NULL)) {
+      __tmp__220=((void **)Self__M20->parent_arrayed_collection__EYC.storage__NJV)[Self__M20->parent_arrayed_collection__EYC.upper__GFV];
+      switch (((struct ___OBJ *)__tmp__220)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        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;
+        Self__Z4HH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__220)->parent_itm_type__UBE.name__OVP);
+        result__Y4HH= 0;
+        __tmp__04HH=Self__Z4HH->count__DD;
+        Self__14HH= 1;
+        while ((Self__14HH <= __tmp__04HH)) {
+          result__Y4HH=(__INTEGER)((__INTEGER)( 5 * result__Y4HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__Z4HH->storage__ZNO)[(__INTEGER)(Self__14HH -  1)])));
+          Self__14HH=(__INTEGER)(Self__14HH +  1);
+        };
+        if ((result__Y4HH <  0)) {
+          result__Y4HH=(__INTEGER)(~ result__Y4HH);
+        };
+        __tmp__320=result__Y4HH;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        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;
+        Self__44HH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__220)->name__OVP);
+        result__34HH= 0;
+        __tmp__54HH=Self__44HH->count__DD;
+        Self__A5HH= 1;
+        while ((Self__A5HH <= __tmp__54HH)) {
+          result__34HH=(__INTEGER)((__INTEGER)( 5 * result__34HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__44HH->storage__ZNO)[(__INTEGER)(Self__A5HH -  1)])));
+          Self__A5HH=(__INTEGER)(Self__A5HH +  1);
+        };
+        if ((result__34HH <  0)) {
+          result__34HH=(__INTEGER)(~ result__34HH);
+        };
+        __tmp__320=result__34HH;
       } break;
       case __ITM_TYPE_BLOCK__: {
         print__DID((&__string_278));
         fputc((int)('\n'),stdout);
         exit(( 1));
-        __tmp__U10= 0;
+        __tmp__320= 0;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        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;
+        Self__D5HH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__220)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP);
+        result__C5HH= 0;
+        __tmp__E5HH=Self__D5HH->count__DD;
+        Self__F5HH= 1;
+        while ((Self__F5HH <= __tmp__E5HH)) {
+          result__C5HH=(__INTEGER)((__INTEGER)( 5 * result__C5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__D5HH->storage__ZNO)[(__INTEGER)(Self__F5HH -  1)])));
+          Self__F5HH=(__INTEGER)(Self__F5HH +  1);
+        };
+        if ((result__C5HH <  0)) {
+          result__C5HH=(__INTEGER)(~ result__C5HH);
+        };
+        __tmp__320=result__C5HH;
       } break;
       case __ITM_TYPE_STYLE__: {
-        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;
+        Self__I5HH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__220)->parent_itm_type_simple__FPN.name__OVP);
+        result__H5HH= 0;
+        __tmp__J5HH=Self__I5HH->count__DD;
+        Self__K5HH= 1;
+        while ((Self__K5HH <= __tmp__J5HH)) {
+          result__H5HH=(__INTEGER)((__INTEGER)( 5 * result__H5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__I5HH->storage__ZNO)[(__INTEGER)(Self__K5HH -  1)])));
+          Self__K5HH=(__INTEGER)(Self__K5HH +  1);
+        };
+        if ((result__H5HH <  0)) {
+          result__H5HH=(__INTEGER)(~ result__H5HH);
+        };
+        __tmp__320=result__H5HH;
       } break;
       };
-      result__F10=__tmp__U10;
-      __tmp__W10=TRUE__;
+      result__O20=__tmp__320;
+      __tmp__520=TRUE__;
     } else {
-      __tmp__W10=FALSE__;
+      __tmp__520=FALSE__;
     };
-    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) {
+    if ((! __tmp__520)) {
+      if (((void *)((void **)Self__M20->parent_arrayed_collection__EYC.storage__NJV)[ 0] != (void *)NULL)) {
+        __tmp__L30=((void **)Self__M20->parent_arrayed_collection__EYC.storage__NJV)[ 0];
+        switch (((struct ___OBJ *)__tmp__L30)->__id) {
         case __ITM_TYPE_PARAMETER__: {
-          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;
+          Self__N5HH=((__STRING_CONSTANT *)((__ITM_TYPE_PARAMETER *)__tmp__L30)->parent_itm_type__UBE.name__OVP);
+          result__M5HH= 0;
+          __tmp__O5HH=Self__N5HH->count__DD;
+          Self__P5HH= 1;
+          while ((Self__P5HH <= __tmp__O5HH)) {
+            result__M5HH=(__INTEGER)((__INTEGER)( 5 * result__M5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__N5HH->storage__ZNO)[(__INTEGER)(Self__P5HH -  1)])));
+            Self__P5HH=(__INTEGER)(Self__P5HH +  1);
+          };
+          if ((result__M5HH <  0)) {
+            result__M5HH=(__INTEGER)(~ result__M5HH);
+          };
+          __tmp__M30=result__M5HH;
         } break;
         case __ITM_TYPE_SIMPLE__: {
-          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;
+          Self__S5HH=((__STRING_CONSTANT *)((__ITM_TYPE_SIMPLE *)__tmp__L30)->name__OVP);
+          result__R5HH= 0;
+          __tmp__T5HH=Self__S5HH->count__DD;
+          Self__U5HH= 1;
+          while ((Self__U5HH <= __tmp__T5HH)) {
+            result__R5HH=(__INTEGER)((__INTEGER)( 5 * result__R5HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__S5HH->storage__ZNO)[(__INTEGER)(Self__U5HH -  1)])));
+            Self__U5HH=(__INTEGER)(Self__U5HH +  1);
+          };
+          if ((result__R5HH <  0)) {
+            result__R5HH=(__INTEGER)(~ result__R5HH);
+          };
+          __tmp__M30=result__R5HH;
         } break;
         case __ITM_TYPE_BLOCK__: {
           print__DID((&__string_278));
           fputc((int)('\n'),stdout);
           exit(( 1));
-          __tmp__D20= 0;
+          __tmp__M30= 0;
         } break;
         case __ITM_TYPE_GENERIC__: {
-          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;
+          Self__X5HH=((__STRING_CONSTANT *)((__ITM_TYPE_GENERIC *)__tmp__L30)->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP);
+          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__ZNO)[(__INTEGER)(Self__Z5HH -  1)])));
+            Self__Z5HH=(__INTEGER)(Self__Z5HH +  1);
+          };
+          if ((result__W5HH <  0)) {
+            result__W5HH=(__INTEGER)(~ result__W5HH);
+          };
+          __tmp__M30=result__W5HH;
         } break;
         case __ITM_TYPE_STYLE__: {
-          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;
+          Self__25HH=((__STRING_CONSTANT *)((__ITM_TYPE_STYLE *)__tmp__L30)->parent_itm_type_simple__FPN.name__OVP);
+          result__15HH= 0;
+          __tmp__35HH=Self__25HH->count__DD;
+          Self__45HH= 1;
+          while ((Self__45HH <= __tmp__35HH)) {
+            result__15HH=(__INTEGER)((__INTEGER)( 5 * result__15HH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__25HH->storage__ZNO)[(__INTEGER)(Self__45HH -  1)])));
+            Self__45HH=(__INTEGER)(Self__45HH +  1);
+          };
+          if ((result__15HH <  0)) {
+            result__15HH=(__INTEGER)(~ result__15HH);
+          };
+          __tmp__M30=result__15HH;
         } break;
         };
-        result__F10=__tmp__D20;
+        result__O20=__tmp__M30;
       };
     };
   };
-  return(result__F10);
+  return(result__O20);
 }
 
-static __CHARACTER read_style__FPF()
+static __CHARACTER read_style__OQF()
 // () With resultNo recursive, No inlinable.
 {
-  __CHARACTER result__IPF,result__U4IH,result__X4IH;
-  __BOOLEAN result__T4IH,__tmp__VPF,result__W4IH;
-  result__IPF='\0';
-  result__T4IH=FALSE__;
+  __CHARACTER result__RQF,result__3CJH,result__ADJH;
+  __BOOLEAN result__2CJH,__tmp__4QF,result__5CJH;
+  result__RQF='\0';
+  result__2CJH=FALSE__;
   if ((! read_space__KSD())) {
-    result__T4IH=FALSE__;
+    result__2CJH=FALSE__;
   } else {
-    result__U4IH='\0';
+    result__3CJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__U4IH=((__CHARACTER )(( 0)));
+      result__3CJH=((__CHARACTER )(( 0)));
     } else {
-      result__U4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__3CJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__U4IH == '-')) {
+    if ((result__3CJH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__T4IH=TRUE__;
+      result__2CJH=TRUE__;
     };
   };
-  if (result__T4IH) {
-    result__IPF='-';
+  if (result__2CJH) {
+    result__RQF='-';
     short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
-    __tmp__VPF=TRUE__;
+    __tmp__4QF=TRUE__;
   } else {
-    __tmp__VPF=FALSE__;
+    __tmp__4QF=FALSE__;
   };
-  if ((! __tmp__VPF)) {
-    result__W4IH=FALSE__;
+  if ((! __tmp__4QF)) {
+    result__5CJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__W4IH=FALSE__;
+      result__5CJH=FALSE__;
     } else {
-      result__X4IH='\0';
+      result__ADJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__X4IH=((__CHARACTER )(( 0)));
+        result__ADJH=((__CHARACTER )(( 0)));
       } else {
-        result__X4IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__ADJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__X4IH == '+')) {
+      if ((result__ADJH == '+')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__W4IH=TRUE__;
+        result__5CJH=TRUE__;
       };
     };
-    if (result__W4IH) {
-      result__IPF='+';
+    if (result__5CJH) {
+      result__RQF='+';
       short__token__to__YBD((&__string_132),(__INTEGER)(position__CCC -  1),position__CCC);
     } else {
-      result__IPF=' ';
+      result__RQF=' ';
     };
   };
-  return(result__IPF);
+  return(result__RQF);
 }
 
-static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__GI5B(__INTEGER new_count__II5B)
+static __FAST_ARRAYoITM_ARGUMENTo* create_with_capacity__SJ5B(__INTEGER new_count__UJ5B)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__J15B,ptr_table__DDJH,next__CDJH,result__EDJH;
+  __POINTER ptr_table__IDJH,next__HDJH,result__JDJH;
+  __INTEGER typ_id__O15B;
+  __UINTEGER_32 sz__L15B,a__45FH,new_size__55FH,t__DAGH,a__CAGH;
+  __UINTEGER_32 new_size__LDJH,lab_type__KDJH;
+  __FAST_ARRAYoITM_ARGUMENTo *result__I15B,*Self__LSHC;
+  result__I15B=NULL;
+  ptr__J15B=((__POINTER )(NULL));
+  typ_id__O15B= 0;
+  sz__L15B=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_ARGUMENTo));
+  if ((sz__L15B ==  0)) {
+    result__I15B=FAST_ARRAYoITM_ARGUMENTo__;
   } else {
-    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);
+    typ_id__O15B=__FAST_ARRAYoITM_ARGUMENTo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__L15B);
+    if ((typ_id__O15B == (__INTEGER)(-  1))) {
+      a__45FH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__55FH=(__UINTEGER_32)((__UINTEGER_32)(sz__L15B + a__45FH) & (__UINTEGER_32)(~ a__45FH));
+      ptr_table__DDJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__55FH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__CDJH=((__POINTER )(NULL));
+      result__EDJH=((__POINTER *)ptr_table__DDJH)[ 0];
+      if ((result__EDJH == (void *)NULL)) {
+        result__EDJH=new_lab__ZPJ(new_size__55FH);
+        next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55FH)));
+        ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__55FH <<  1)) <=  4096)) {
+            next__CDJH=(void *)((unsigned long)result__EDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__55FH)));
+          } else {
+            next__CDJH=new_lab__ZPJ(new_size__55FH);
           };
-          ((__POINTER *)next__Z4IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__04IH)[ 0]=next__Z4IH;
+          ((__POINTER *)next__CDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
         } else {
-          ((__POINTER *)result__14IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z4IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__14IH=next__Z4IH;
+          ((__POINTER *)result__EDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EDJH=next__CDJH;
         };
       };
-      ptr__3Z5B=result__14IH;
+      ptr__J15B=result__EDJH;
     } 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;
+      t__DAGH=((__UINTEGER_32 )typ_id__O15B);
+      a__CAGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__LDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__L15B + a__CAGH) & (__UINTEGER_32)(~ a__CAGH));
+      ptr_table__IDJH=((__POINTER )(&(table_type[(t__DAGH)])));
+      lab_type__KDJH=(__UINTEGER_32)(t__DAGH |  1);
+      next__HDJH=((__POINTER )(NULL));
+      result__JDJH=((__POINTER *)ptr_table__IDJH)[ 0];
+      if ((result__JDJH == (void *)NULL)) {
+        result__JDJH=new_lab__ZPJ(lab_type__KDJH);
+        next__HDJH=(void *)((unsigned long)result__JDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDJH)));
+        ((__POINTER *)next__HDJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IDJH)[ 0]=next__HDJH;
       } 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)));
+        next__HDJH=((__POINTER *)result__JDJH)[ 0];
+        if ((next__HDJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JDJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LDJH <<  1)) <=  4096)) {
+            next__HDJH=(void *)((unsigned long)result__JDJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LDJH)));
           } else {
-            next__44IH=new_lab__QOJ(lab_type__B5IH);
+            next__HDJH=new_lab__ZPJ(lab_type__KDJH);
           };
-          ((__POINTER *)next__44IH)[ 0]=NULL;
-          ((__POINTER *)ptr_table__54IH)[ 0]=next__44IH;
+          ((__POINTER *)next__HDJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IDJH)[ 0]=next__HDJH;
         } else {
-          ((__POINTER *)result__A5IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__44IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-          result__A5IH=next__44IH;
+          ((__POINTER *)result__JDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__JDJH=next__HDJH;
         };
       };
-      ptr__3Z5B=result__A5IH;
+      ptr__J15B=result__JDJH;
     };
-    result__2Z5B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__3Z5B);
-    *(result__2Z5B) = *(FAST_ARRAYoITM_ARGUMENTo__);
+    result__I15B=((__FAST_ARRAYoITM_ARGUMENTo *)ptr__J15B);
+    *(result__I15B) = *(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__LSHC=((__FAST_ARRAYoITM_ARGUMENTo *)result__I15B);
+  if ((Self__LSHC->parent_arrayed_collection__AAZB.capacity__L5GC < new_count__UJ5B)) {
+    Self__LSHC->parent_arrayed_collection__AAZB.storage__HAHC=create__HRBD(new_count__UJ5B);
+    Self__LSHC->parent_arrayed_collection__AAZB.capacity__L5GC=new_count__UJ5B;
   };
-  Self__XQHC->parent_arrayed_collection__U4YB.upper__V3GC=(__INTEGER)(-  1);
-  return(result__2Z5B);
+  Self__LSHC->parent_arrayed_collection__AAZB.upper__J5GC=(__INTEGER)(-  1);
+  return(result__I15B);
 }
 
-static void* read_loc_arg__with_self__25GB(__PARSER *Self__35GB,__BOOLEAN mute__45GB,__BOOLEAN self_first__55GB)
+static void* read_loc_arg__with_self__GBHB(__PARSER *Self__HBHB,__BOOLEAN mute__IBHB,__BOOLEAN self_first__JBHB)
 // ({PARSER},{TRUExFALSE},{TRUExFALSE}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__LBHB,*result__D0EE;
+  void *t__MBHB,*t__3ZEE,*__tmp__24EE,*t__BY5B;
+  __POSITION pos__NBHB,pos__BXXG,pos__DXXG,pos__FXXG,pos__HXXG;
+  __POSITION pos__JXXG,pos__WXXG,pos__YXXG,p__5X5B,p__CIMF,pos__C0XG;
+  __POSITION pos__E0XG;
+  void *n__QBHB,*n__AY5B;
+  void *tb__RBHB,*__tmp__FEHB,*tb__E0EE,*__tmp__34EE;
+  __ITM_ARG *result__RDJH,*Self__ZDJH,*result__5CAC,*Self__C0HC;
+  __POINTER ptr__SDJH,ptr_table__4DJH,next__3DJH,result__5DJH;
+  __POINTER ptr_table__DEJH,next__CEJH,result__EEJH,ptr__ADAC;
+  __POINTER ptr_table__TEJH,next__SEJH,result__UEJH,ptr_table__YEJH;
+  __POINTER next__XEJH,result__ZEJH,ptr__DK1F,ptr_table__BFJH;
+  __POINTER next__AFJH,result__CFJH,ptr_table__GFJH,next__FFJH;
+  __POINTER result__HFJH,ptr__UZMF,ptr_table__LFJH,next__KFJH;
+  __POINTER result__MFJH,ptr_table__QFJH,next__PFJH,result__RFJH;
+  __INTEGER typ_id__TDJH,beg__B0EE,Self__KGTF,limit_up__LGTF;
+  __INTEGER typ_id__FDAC,__tmp__XTIG,i__1COG,h__3HQF,idx__4HQF;
+  __INTEGER idx__KI2F,new_capacity__LI2F,i__JI2F,typ_id__IK1F;
+  __INTEGER typ_id__ZZMF,__tmp__SAFE,Self__LIMF;
+  __UINTEGER_32 sz__UDJH,a__VDJH,new_size__WDJH,t__XDJH,a__YDJH;
+  __UINTEGER_32 new_size__GEJH,lab_type__FEJH,sz__CDAC,a__ADGH;
+  __UINTEGER_32 new_size__BDGH,t__FDGH,a__EDGH,new_size__1EJH;
+  __UINTEGER_32 lab_type__0EJH,sz__FK1F,a__5BGH,new_size__ACGH,t__ECGH;
+  __UINTEGER_32 a__DCGH,new_size__JFJH,lab_type__IFJH,sz__WZMF,a__KCGH;
+  __UINTEGER_32 new_size__LCGH,t__PCGH,a__OCGH,new_size__TFJH;
+  __UINTEGER_32 lab_type__SFJH;
+  void *tm__4ZEE;
+  __ITM_ARGS *result__TZMF,*Self__S2PF;
+  __BOOLEAN result__NDJH,__tmp__2BHB,result__ODJH,__tmp__5CHB;
+  __BOOLEAN __tmp__IEHB,__tmp__MEHB,__tmp__RFHB,result__HEJH,mute__C0EE;
+  __BOOLEAN result__LEJH,__tmp__P0EE,result__MEJH,__tmp__M2EE;
+  __BOOLEAN result__PEJH,__tmp__D5EE,__tmp__A5EE,__tmp__G5EE;
+  __BOOLEAN __tmp__BFQF,result__VSIG,result__UFJH;
+  __CHARACTER result__PDJH,result__QV5G,result__IEJH,result__NEJH;
+  __CHARACTER result__VV5G,result__QEJH,result__VFJH;
+  void *type__5ZEE,*result__IRP;
+  void *name__A0EE,*result__AAIH,*result__AHMF,*e__WDQF,*result__JEQF;
+  void *e__WHQF,*e__3EJH,*e__IXRF;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__BAIH,*Self__CAIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__35AB,*Self__TABB;
+  __HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *Self__VDQF,*Self__VHQF;
+  void *node__IEQF,*node__4EJH,*node__RXRF,*node__5HQF,*node1__NI2F;
+  void *node2__OI2F,*__tmp__PJQF;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__SSIG,*o__WSIG,*__tmp__CTIG;
+  void **__tmp__STIG,**__tmp__UTIG,**Self__HCOG;
+  void **old_buckets__MI2F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *result__CK1F;
+  __HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *Self__CE5F;
+  result__LBHB=NULL;
+  t__MBHB=NULL;
+  pos__NBHB=((__POSITION ) 0);
+  n__QBHB=NULL;
+  tb__RBHB=NULL;
+  if (self_first__JBHB) {
+    result__NDJH=read_word__HOF((&__string_58));
     if (is_shorter__LZ) {
-      if (result__E5IH) {
+      if (result__NDJH) {
         if (((void *)(&__string_58) == (void *)(&__string_4))) {
           short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
@@ -20903,212 +20911,212 @@ static void* read_loc_arg__with_self__25GB(__PARSER *Self__35GB,__BOOLEAN mute__
         };
       };
     };
-    __tmp__SAHB=result__E5IH;
+    __tmp__2BHB=result__NDJH;
   } else {
-    __tmp__SAHB=FALSE__;
+    __tmp__2BHB=FALSE__;
   };
-  if ((__tmp__SAHB || ((! self_first__55GB) && read_identifier__12K()))) {
-    pos__DAHB=current_position__XUF();
-    n__GAHB=last_string__V0C;
-    result__F5IH=FALSE__;
+  if ((__tmp__2BHB || ((! self_first__JBHB) && read_identifier__E4K()))) {
+    pos__NBHB=current_position__AWF();
+    n__QBHB=last_string__V0C;
+    result__ODJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__F5IH=FALSE__;
+      result__ODJH=FALSE__;
     } else {
-      result__G5IH='\0';
+      result__PDJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__G5IH=((__CHARACTER )(( 0)));
+        result__PDJH=((__CHARACTER )(( 0)));
       } else {
-        result__G5IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__PDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__G5IH == ':')) {
+      if ((result__PDJH == ':')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__F5IH=TRUE__;
+        result__ODJH=TRUE__;
       };
     };
-    if (result__F5IH) {
-      result__HR5G='\0';
+    if (result__ODJH) {
+      result__QV5G='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__HR5G=((__CHARACTER )(( 0)));
+        result__QV5G=((__CHARACTER )(( 0)));
       } else {
-        result__HR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__QV5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__VBHB=(result__HR5G != '=');
+      __tmp__5CHB=(result__QV5G != '=');
     } else {
-      __tmp__VBHB=FALSE__;
+      __tmp__5CHB=FALSE__;
     };
-    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)) {
+    if (__tmp__5CHB) {
+      t__MBHB=read_type__K5L(Self__HBHB,TRUE__);
+      if (((void *)t__MBHB == (void *)NULL)) {
+        pos__BXXG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_279));
+        put_position__LNG(pos__BXXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      if ((self_first__55GB && ((void *)t__CAHB != (void *)type_self__CQN))) {
+      if ((self_first__JBHB && ((void *)t__MBHB != (void *)type_self__LRN))) {
         if (((void *)((__PROTOTYPE *)object__ZBC)->parent_named__5.name__LI != (void *)(&__string_40))) {
-          __tmp__4CHB=TRUE__;
+          __tmp__IEHB=TRUE__;
         } else {
-          if (t__CAHB==NULL) {
-            __tmp__1CHB=NULL;
+          if (t__MBHB==NULL) {
+            __tmp__FEHB=NULL;
           } else {
-            switch (((struct ___OBJ *)t__CAHB)->__id) {
+            switch (((struct ___OBJ *)t__MBHB)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              __tmp__1CHB=NULL;
+              __tmp__FEHB=NULL;
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              __tmp__1CHB=NULL;
+              __tmp__FEHB=NULL;
             } break;
             case __ITM_TYPE_BLOCK__: {
-              __tmp__1CHB=((void *)t__CAHB);
+              __tmp__FEHB=((void *)t__MBHB);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              __tmp__1CHB=NULL;
+              __tmp__FEHB=NULL;
             } break;
             case __ITM_TYPE_STYLE__: {
-              __tmp__1CHB=NULL;
+              __tmp__FEHB=NULL;
             } break;
             }
           };
-          tb__HAHB=__tmp__1CHB;
-          __tmp__4CHB=((void *)__tmp__1CHB == (void *)NULL);
+          tb__RBHB=__tmp__FEHB;
+          __tmp__IEHB=((void *)__tmp__FEHB == (void *)NULL);
         };
-        __tmp__CDHB=__tmp__4CHB;
+        __tmp__MEHB=__tmp__IEHB;
       } else {
-        __tmp__CDHB=FALSE__;
+        __tmp__MEHB=FALSE__;
       };
-      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)) {
+      if (__tmp__MEHB) {
+        pos__DXXG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_280));
+        put_position__LNG(pos__DXXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      result__RDJH=NULL;
+      ptr__SDJH=((__POINTER )(NULL));
+      typ_id__TDJH= 0;
+      sz__UDJH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+      if ((sz__UDJH ==  0)) {
+        result__RDJH=ITM_ARG__;
+      } else {
+        typ_id__TDJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UDJH);
+        if ((typ_id__TDJH == (__INTEGER)(-  1))) {
+          a__VDJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__WDJH=(__UINTEGER_32)((__UINTEGER_32)(sz__UDJH + a__VDJH) & (__UINTEGER_32)(~ a__VDJH));
+          ptr_table__4DJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WDJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__3DJH=((__POINTER )(NULL));
+          result__5DJH=((__POINTER *)ptr_table__4DJH)[ 0];
+          if ((result__5DJH == (void *)NULL)) {
+            result__5DJH=new_lab__ZPJ(new_size__WDJH);
+            next__3DJH=(void *)((unsigned long)result__5DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDJH)));
+            ((__POINTER *)next__3DJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4DJH)[ 0]=next__3DJH;
+          } else {
+            next__3DJH=((__POINTER *)result__5DJH)[ 0];
+            if ((next__3DJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5DJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WDJH <<  1)) <=  4096)) {
+                next__3DJH=(void *)((unsigned long)result__5DJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WDJH)));
               } else {
-                next__U5IH=new_lab__QOJ(new_size__N5IH);
+                next__3DJH=new_lab__ZPJ(new_size__WDJH);
               };
-              ((__POINTER *)next__U5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__V5IH)[ 0]=next__U5IH;
+              ((__POINTER *)next__3DJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4DJH)[ 0]=next__3DJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__5DJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__5DJH=next__3DJH;
+            };
+          };
+          ptr__SDJH=result__5DJH;
+        } else {
+          t__XDJH=((__UINTEGER_32 )typ_id__TDJH);
+          a__YDJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GEJH=(__UINTEGER_32)((__UINTEGER_32)(sz__UDJH + a__YDJH) & (__UINTEGER_32)(~ a__YDJH));
+          ptr_table__DEJH=((__POINTER )(&(table_type[(t__XDJH)])));
+          lab_type__FEJH=(__UINTEGER_32)(t__XDJH |  1);
+          next__CEJH=((__POINTER )(NULL));
+          result__EEJH=((__POINTER *)ptr_table__DEJH)[ 0];
+          if ((result__EEJH == (void *)NULL)) {
+            result__EEJH=new_lab__ZPJ(lab_type__FEJH);
+            next__CEJH=(void *)((unsigned long)result__EEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEJH)));
+            ((__POINTER *)next__CEJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DEJH)[ 0]=next__CEJH;
+          } else {
+            next__CEJH=((__POINTER *)result__EEJH)[ 0];
+            if ((next__CEJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EEJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GEJH <<  1)) <=  4096)) {
+                next__CEJH=(void *)((unsigned long)result__EEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GEJH)));
               } else {
-                next__Z5IH=new_lab__QOJ(lab_type__25IH);
+                next__CEJH=new_lab__ZPJ(lab_type__FEJH);
               };
-              ((__POINTER *)next__Z5IH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__05IH)[ 0]=next__Z5IH;
+              ((__POINTER *)next__CEJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DEJH)[ 0]=next__CEJH;
             } else {
-              ((__POINTER *)result__15IH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z5IH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__15IH=next__Z5IH;
+              ((__POINTER *)result__EEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EEJH=next__CEJH;
             };
           };
-          ptr__J5IH=result__15IH;
+          ptr__SDJH=result__EEJH;
         };
-        result__I5IH=((__ITM_ARG *)ptr__J5IH);
-        *(result__I5IH) = *(ITM_ARG__);
+        result__RDJH=((__ITM_ARG *)ptr__SDJH);
+        *(result__RDJH) = *(ITM_ARG__);
       };
-      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;
+      Self__ZDJH=((__ITM_ARG *)result__RDJH);
+      Self__ZDJH->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ=pos__NBHB;
+      Self__ZDJH->name__G0HC=n__QBHB;
+      Self__ZDJH->type__H0HC=t__MBHB;
+      result__LBHB=result__RDJH;
       if (is_shorter__LZ) {
-        add__WHHB(short_local__XCC,n__GAHB);
+        add__AJHB(short_local__XCC,n__QBHB);
       };
     } else {
-      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)) {
+      if ((! mute__IBHB)) {
+        pos__FXXG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_281));
+        put_position__LNG(pos__FXXG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__HEHB=TRUE__;
+    __tmp__RFHB=TRUE__;
   } else {
-    __tmp__HEHB=FALSE__;
+    __tmp__RFHB=FALSE__;
   };
-  if ((! __tmp__HEHB)) {
-    result__45IH=FALSE__;
+  if ((! __tmp__RFHB)) {
+    result__HEJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__45IH=FALSE__;
+      result__HEJH=FALSE__;
     } else {
-      result__55IH='\0';
+      result__IEJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__55IH=((__CHARACTER )(( 0)));
+        result__IEJH=((__CHARACTER )(( 0)));
       } else {
-        result__55IH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__IEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__55IH == '(')) {
+      if ((result__IEJH == '(')) {
         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));
+        result__HEJH=TRUE__;
+      };
+    };
+    if (result__HEJH) {
+      t__3ZEE=NULL;
+      tm__4ZEE=NULL;
+      type__5ZEE=NULL;
+      name__A0EE=NULL;
+      beg__B0EE= 0;
+      result__D0EE=NULL;
+      tb__E0EE=NULL;
+      mute__C0EE=mute__IBHB;
+      if (self_first__JBHB) {
+        result__LEJH=read_word__HOF((&__string_58));
         if (is_shorter__LZ) {
-          if (result__CAJH) {
+          if (result__LEJH) {
             if (((void *)(&__string_58) == (void *)(&__string_4))) {
               short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
             } else {
@@ -21116,615 +21124,615 @@ static void* read_loc_arg__with_self__25GB(__PARSER *Self__35GB,__BOOLEAN mute__
             };
           };
         };
-        __tmp__1ZEE=result__CAJH;
+        __tmp__P0EE=result__LEJH;
       } else {
-        __tmp__1ZEE=FALSE__;
+        __tmp__P0EE=FALSE__;
       };
-      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);
+      if ((__tmp__P0EE || read_identifier__E4K())) {
+        result__AAIH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K)->parent_arrayed_collection__C3K.upper__WPU <  0)) {
+          result__AAIH=create_with_capacity__LHRC( 16);
         } else {
-          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);
+          Self__BAIH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K);
+          result__AAIH=((void **)Self__BAIH->parent_arrayed_collection__C3K.storage__GSU)[Self__BAIH->parent_arrayed_collection__C3K.upper__WPU];
+          Self__CAIH=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K);
+          Self__CAIH->parent_arrayed_collection__C3K.upper__WPU=(__INTEGER)(Self__CAIH->parent_arrayed_collection__C3K.upper__WPU -  1);
         };
-        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);
+        name__A0EE=result__AAIH;
+        result__IRP=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP)->parent_arrayed_collection__NRP.upper__BSV <  0)) {
+          result__IRP=create_with_capacity__MCR( 16);
         } else {
-          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);
+          Self__35AB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+          result__IRP=((void **)Self__35AB->parent_arrayed_collection__NRP.storage__XWV)[Self__35AB->parent_arrayed_collection__NRP.upper__BSV];
+          Self__TABB=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+          Self__TABB->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(Self__TABB->parent_arrayed_collection__NRP.upper__BSV -  1);
         };
-        type__LZEE=result__5PP;
-        beg__NZEE= 0;
+        type__5ZEE=result__IRP;
+        beg__B0EE= 0;
         do {
-          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)) {
+          if (((((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.upper__H4OD +  1) !=  0) && (! read_identifier__E4K())) && (! mute__C0EE))) {
+            pos__HXXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_282));
+            put_position__LNG(pos__HXXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          add_last__HAPD(name__MZEE,last_string__V0C);
-          result__DAJH=FALSE__;
+          add_last__35OD(name__A0EE,last_string__V0C);
+          result__MEJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__DAJH=FALSE__;
+            result__MEJH=FALSE__;
           } else {
-            result__EAJH='\0';
+            result__NEJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__EAJH=((__CHARACTER )(( 0)));
+              result__NEJH=((__CHARACTER )(( 0)));
             } else {
-              result__EAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__NEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__EAJH == ':')) {
+            if ((result__NEJH == ':')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__DAJH=TRUE__;
+              result__MEJH=TRUE__;
             };
           };
-          if (result__DAJH) {
-            result__MR5G='\0';
+          if (result__MEJH) {
+            result__VV5G='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__MR5G=((__CHARACTER )(( 0)));
+              result__VV5G=((__CHARACTER )(( 0)));
             } else {
-              result__MR5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__VV5G=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            __tmp__Y1EE=(result__MR5G != '=');
+            __tmp__M2EE=(result__VV5G != '=');
           } else {
-            __tmp__Y1EE=FALSE__;
+            __tmp__M2EE=FALSE__;
           };
-          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)) {
+          if (__tmp__M2EE) {
+            mute__C0EE=FALSE__;
+            t__3ZEE=read_type__K5L(Self__HBHB,TRUE__);
+            if (((void *)t__3ZEE == (void *)NULL)) {
+              pos__JXXG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_283));
+              put_position__LNG(pos__JXXG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 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);
+            Self__KGTF=beg__B0EE;
+            limit_up__LGTF=((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.upper__H4OD;
+            while ((Self__KGTF <= limit_up__LGTF)) {
+              add_last__WKV(type__5ZEE,t__3ZEE);
+              Self__KGTF=(__INTEGER)(Self__KGTF +  1);
             };
-            beg__NZEE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__MZEE)->parent_arrayed_collection__L2I.upper__R4OD +  1);
+            beg__B0EE=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.upper__H4OD +  1);
           };
-          result__GAJH=FALSE__;
+          result__PEJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__GAJH=FALSE__;
+            result__PEJH=FALSE__;
           } else {
-            result__HAJH='\0';
+            result__QEJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__HAJH=((__CHARACTER )(( 0)));
+              result__QEJH=((__CHARACTER )(( 0)));
             } else {
-              result__HAJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__QEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__HAJH == ',')) {
+            if ((result__QEJH == ',')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__GAJH=TRUE__;
+              result__PEJH=TRUE__;
             };
           };
-        } 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)) {
+        } while (result__PEJH);
+        if ((beg__B0EE != (__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__AAIH)->parent_arrayed_collection__U3I.upper__H4OD +  1))) {
+          if ((! mute__C0EE)) {
+            pos__WXXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_283));
+            put_position__LNG(pos__WXXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          free__NO5(result__X1HH);
-          free__XIQ(result__5PP);
+          free__WP5(result__AAIH);
+          free__AKQ(result__IRP);
         } else {
-          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__;
+          if (self_first__JBHB) {
+            if (((void *)((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__IRP)->parent_arrayed_collection__EYC.storage__NJV)[ 0] != (void *)type_self__LRN)) {
+              __tmp__D5EE=TRUE__;
             } else {
               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;
+                __tmp__24EE=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__IRP)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
+                if (__tmp__24EE==NULL) {
+                  __tmp__34EE=NULL;
                 } else {
-                  switch (((struct ___OBJ *)__tmp__I4EE)->__id) {
+                  switch (((struct ___OBJ *)__tmp__24EE)->__id) {
                   case __ITM_TYPE_PARAMETER__: {
-                    __tmp__J4EE=NULL;
+                    __tmp__34EE=NULL;
                   } break;
                   case __ITM_TYPE_SIMPLE__: {
-                    __tmp__J4EE=NULL;
+                    __tmp__34EE=NULL;
                   } break;
                   case __ITM_TYPE_BLOCK__: {
-                    __tmp__J4EE=((void *)__tmp__I4EE);
+                    __tmp__34EE=((void *)__tmp__24EE);
                   } break;
                   case __ITM_TYPE_GENERIC__: {
-                    __tmp__J4EE=NULL;
+                    __tmp__34EE=NULL;
                   } break;
                   case __ITM_TYPE_STYLE__: {
-                    __tmp__J4EE=NULL;
+                    __tmp__34EE=NULL;
                   } break;
                   }
                 };
-                tb__QZEE=__tmp__J4EE;
-                __tmp__M4EE=((void *)__tmp__J4EE == (void *)NULL);
+                tb__E0EE=__tmp__34EE;
+                __tmp__A5EE=((void *)__tmp__34EE == (void *)NULL);
               } else {
-                __tmp__M4EE=FALSE__;
+                __tmp__A5EE=FALSE__;
               };
-              __tmp__P4EE=__tmp__M4EE;
+              __tmp__D5EE=__tmp__A5EE;
             };
-            __tmp__S4EE=__tmp__P4EE;
+            __tmp__G5EE=__tmp__D5EE;
           } else {
-            __tmp__S4EE=FALSE__;
+            __tmp__G5EE=FALSE__;
           };
-          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)) {
+          if (__tmp__G5EE) {
+            pos__YXXG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_280));
+            put_position__LNG(pos__YXXG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          if (((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__AAIH)->parent_arrayed_collection__U3I.upper__H4OD +  1) ==  1)) {
+            p__5X5B=current_position__AWF();
+            n__AY5B=((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)result__AAIH)->parent_arrayed_collection__U3I.storage__3APD)[ 0];
+            t__BY5B=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)result__IRP)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
+            result__5CAC=NULL;
+            ptr__ADAC=((__POINTER )(NULL));
+            typ_id__FDAC= 0;
+            sz__CDAC=((__UINTEGER_32 )sizeof(__ITM_ARG));
+            if ((sz__CDAC ==  0)) {
+              result__5CAC=ITM_ARG__;
             } else {
-              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;
+              typ_id__FDAC=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CDAC);
+              if ((typ_id__FDAC == (__INTEGER)(-  1))) {
+                a__ADGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__BDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__CDAC + a__ADGH) & (__UINTEGER_32)(~ a__ADGH));
+                ptr_table__TEJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__SEJH=((__POINTER )(NULL));
+                result__UEJH=((__POINTER *)ptr_table__TEJH)[ 0];
+                if ((result__UEJH == (void *)NULL)) {
+                  result__UEJH=new_lab__ZPJ(new_size__BDGH);
+                  next__SEJH=(void *)((unsigned long)result__UEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDGH)));
+                  ((__POINTER *)next__SEJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__TEJH)[ 0]=next__SEJH;
                 } else {
-                  next__JAJH=((__POINTER *)result__LAJH)[ 0];
-                  if ((next__JAJH == (void *)NULL)) {
-                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LAJH - (unsigned long)begin_memory__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)));
+                  next__SEJH=((__POINTER *)result__UEJH)[ 0];
+                  if ((next__SEJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UEJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BDGH <<  1)) <=  4096)) {
+                      next__SEJH=(void *)((unsigned long)result__UEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BDGH)));
                     } else {
-                      next__JAJH=new_lab__QOJ(new_size__Y4FH);
+                      next__SEJH=new_lab__ZPJ(new_size__BDGH);
                     };
-                    ((__POINTER *)next__JAJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__KAJH)[ 0]=next__JAJH;
+                    ((__POINTER *)next__SEJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__TEJH)[ 0]=next__SEJH;
                   } else {
-                    ((__POINTER *)result__LAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__LAJH=next__JAJH;
+                    ((__POINTER *)result__UEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__UEJH=next__SEJH;
                   };
                 };
-                ptr__UBAC=result__LAJH;
+                ptr__ADAC=result__UEJH;
               } else {
-                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;
+                t__FDGH=((__UINTEGER_32 )typ_id__FDAC);
+                a__EDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__1EJH=(__UINTEGER_32)((__UINTEGER_32)(sz__CDAC + a__EDGH) & (__UINTEGER_32)(~ a__EDGH));
+                ptr_table__YEJH=((__POINTER )(&(table_type[(t__FDGH)])));
+                lab_type__0EJH=(__UINTEGER_32)(t__FDGH |  1);
+                next__XEJH=((__POINTER )(NULL));
+                result__ZEJH=((__POINTER *)ptr_table__YEJH)[ 0];
+                if ((result__ZEJH == (void *)NULL)) {
+                  result__ZEJH=new_lab__ZPJ(lab_type__0EJH);
+                  next__XEJH=(void *)((unsigned long)result__ZEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EJH)));
+                  ((__POINTER *)next__XEJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__YEJH)[ 0]=next__XEJH;
                 } else {
-                  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)));
+                  next__XEJH=((__POINTER *)result__ZEJH)[ 0];
+                  if ((next__XEJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZEJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__1EJH <<  1)) <=  4096)) {
+                      next__XEJH=(void *)((unsigned long)result__ZEJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EJH)));
                     } else {
-                      next__OAJH=new_lab__QOJ(lab_type__RAJH);
+                      next__XEJH=new_lab__ZPJ(lab_type__0EJH);
                     };
-                    ((__POINTER *)next__OAJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__PAJH)[ 0]=next__OAJH;
+                    ((__POINTER *)next__XEJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__YEJH)[ 0]=next__XEJH;
                   } else {
-                    ((__POINTER *)result__QAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__QAJH=next__OAJH;
+                    ((__POINTER *)result__ZEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__ZEJH=next__XEJH;
                   };
                 };
-                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;
+                ptr__ADAC=result__ZEJH;
+              };
+              result__5CAC=((__ITM_ARG *)ptr__ADAC);
+              *(result__5CAC) = *(ITM_ARG__);
+            };
+            Self__C0HC=((__ITM_ARG *)result__5CAC);
+            Self__C0HC->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ=p__5X5B;
+            Self__C0HC->name__G0HC=n__AY5B;
+            Self__C0HC->type__H0HC=t__BY5B;
+            result__D0EE=result__5CAC;
+            free__WP5(result__AAIH);
+            free__AKQ(result__IRP);
+          } else {
+            result__AHMF=NULL;
+            if ((((__FAST_ARRAYoSTRING_CONSTANTo *)result__AAIH)->parent_arrayed_collection__U3I.upper__H4OD <  0)) {
+              result__AHMF=empty_list__HHMF;
             } else {
-              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:
+              Self__VDQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__RHMF);
+              e__WDQF=result__AAIH;
+              result__JEQF=NULL;
+              node__IEQF=((void **)Self__VDQF->buckets__QEQF)[(__INTEGER)(hash_code__MORF(result__AAIH) % Self__VDQF->capacity__LEQF)];
+              until_do__UPRF:
               {
-                if (((void *)node__35PF == (void *)NULL)) {
-                  __tmp__WAQF=TRUE__;
+                if (((void *)node__IEQF == (void *)NULL)) {
+                  __tmp__BFQF=TRUE__;
                 } else {
-                  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__;
+                  Self__SSIG=((__FAST_ARRAYoSTRING_CONSTANTo *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IEQF)->item__2EQF);
+                  result__VSIG=FALSE__;
+                  o__WSIG=NULL;
+                  if (((void *)Self__SSIG == (void *)e__WDQF)) {
+                    result__VSIG=TRUE__;
                   } else {
-                    if (e__L5PF==NULL) {
-                      __tmp__XOIG=NULL;
+                    if (e__WDQF==NULL) {
+                      __tmp__CTIG=NULL;
                     } else {
-                      __tmp__XOIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__L5PF);
+                      __tmp__CTIG=((__FAST_ARRAYoSTRING_CONSTANTo *)e__WDQF);
                     };
-                    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);
+                    o__WSIG=__tmp__CTIG;
+                    if ((((void *)__tmp__CTIG != (void *)NULL) && (Self__SSIG->parent_arrayed_collection__U3I.upper__H4OD == __tmp__CTIG->parent_arrayed_collection__U3I.upper__H4OD))) {
+                      __tmp__STIG=Self__SSIG->parent_arrayed_collection__U3I.storage__3APD;
+                      __tmp__UTIG=__tmp__CTIG->parent_arrayed_collection__U3I.storage__3APD;
+                      __tmp__XTIG=(__INTEGER)(Self__SSIG->parent_arrayed_collection__U3I.upper__H4OD +  1);
+                      Self__HCOG=((void **)__tmp__STIG);
+                      i__1COG=(__INTEGER)(__tmp__XTIG -  1);
+                      while (((i__1COG >=  0) && ((void *)Self__HCOG[i__1COG] == (void *)((void **)__tmp__UTIG)[i__1COG]))) {
+                        i__1COG=(__INTEGER)(i__1COG -  1);
                       };
-                      result__KOIG=(i__Q4NG <  0);
+                      result__VSIG=(i__1COG <  0);
                     };
                   };
-                  __tmp__WAQF=result__KOIG;
+                  __tmp__BFQF=result__VSIG;
                 };
-                if ((! __tmp__WAQF)) {
-                  node__35PF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__35PF)->next__3AQF;
-                  goto until_do__JLRF;
+                if ((! __tmp__BFQF)) {
+                  node__IEQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IEQF)->next__IFQF;
+                  goto until_do__UPRF;
                 };
               };
-              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;
+              if (((void *)node__IEQF != (void *)NULL)) {
+                result__JEQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__IEQF)->item__2EQF;
+              };
+              result__AHMF=result__JEQF;
+              if (((void *)result__JEQF == (void *)NULL)) {
+                result__AHMF=create_with_capacity__LHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__AAIH)->parent_arrayed_collection__U3I.upper__H4OD +  1));
+                copy__Q1RD(result__AHMF,result__AAIH);
+                Self__VHQF=((__HASHED_SEToFAST_ARRAYoSTRING_CONSTANToo *)bucket__RHMF);
+                e__WHQF=result__AHMF;
+                e__3EJH=result__AHMF;
+                node__4EJH=((void **)Self__VHQF->buckets__QEQF)[(__INTEGER)(hash_code__MORF(result__AHMF) % Self__VHQF->capacity__LEQF)];
+                while ((! (((void *)node__4EJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__4EJH)->item__2EQF == (void *)e__3EJH)))) {
+                  node__4EJH=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__4EJH)->next__IFQF;
                 };
-                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;
+                e__IXRF=result__AHMF;
+                node__RXRF=((void **)Self__VHQF->buckets__QEQF)[(__INTEGER)(hash_code__MORF(result__AHMF) % Self__VHQF->capacity__LEQF)];
+                while ((! (((void *)node__RXRF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__RXRF)->item__2EQF == (void *)e__IXRF)))) {
+                  node__RXRF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__RXRF)->next__IFQF;
                 };
-                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;
+                h__3HQF=hash_code__MORF(result__AHMF);
+                idx__4HQF=(__INTEGER)(h__3HQF % Self__VHQF->capacity__LEQF);
+                node__5HQF=((void **)Self__VHQF->buckets__QEQF)[idx__4HQF];
+                while ((! (((void *)node__5HQF == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__5HQF)->item__2EQF == (void *)e__WHQF)))) {
+                  node__5HQF=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node__5HQF)->next__IFQF;
                 };
-                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;
+                if (((void *)node__5HQF == (void *)NULL)) {
+                  if ((Self__VHQF->capacity__LEQF == Self__VHQF->count__CJQF)) {
+                    idx__KI2F= 0;
+                    node1__NI2F=NULL;
+                    node2__OI2F=NULL;
+                    new_capacity__LI2F=prime_number_ceiling__T11((__INTEGER)(Self__VHQF->capacity__LEQF +  1));
+                    old_buckets__MI2F=Self__VHQF->buckets__QEQF;
+                    Self__VHQF->buckets__QEQF=create__EGUF(new_capacity__LI2F);
+                    i__JI2F=(__INTEGER)(Self__VHQF->capacity__LEQF -  1);
+                    Self__VHQF->capacity__LEQF=new_capacity__LI2F;
+                    while ((i__JI2F >=  0)) {
+                      node1__NI2F=((void **)old_buckets__MI2F)[i__JI2F];
+                      while (((void *)node1__NI2F != (void *)NULL)) {
+                        node2__OI2F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NI2F)->next__IFQF;
+                        idx__KI2F=(__INTEGER)(hash_code__MORF(((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NI2F)->item__2EQF) % Self__VHQF->capacity__LEQF);
+                        ((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)node1__NI2F)->next__IFQF=((void **)Self__VHQF->buckets__QEQF)[idx__KI2F];
+                        ((void **)Self__VHQF->buckets__QEQF)[idx__KI2F]=node1__NI2F;
+                        node1__NI2F=node2__OI2F;
                       };
-                      i__4D2F=(__INTEGER)(i__4D2F -  1);
+                      i__JI2F=(__INTEGER)(i__JI2F -  1);
                     };
-                    idx__TDQF=(__INTEGER)(h__SDQF % Self__KDQF->capacity__AAQF);
+                    idx__4HQF=(__INTEGER)(h__3HQF % Self__VHQF->capacity__LEQF);
                   };
-                  __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__;
+                  __tmp__PJQF=((void **)Self__VHQF->buckets__QEQF)[idx__4HQF];
+                  result__CK1F=NULL;
+                  ptr__DK1F=((__POINTER )(NULL));
+                  typ_id__IK1F= 0;
+                  sz__FK1F=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo));
+                  if ((sz__FK1F ==  0)) {
+                    result__CK1F=HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
                   } else {
-                    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;
+                    typ_id__IK1F=__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__;
+                    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FK1F);
+                    if ((typ_id__IK1F == (__INTEGER)(-  1))) {
+                      a__5BGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__ACGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FK1F + a__5BGH) & (__UINTEGER_32)(~ a__5BGH));
+                      ptr_table__BFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ACGH / ((__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__ZPJ(new_size__ACGH);
+                        next__AFJH=(void *)((unsigned long)result__CFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACGH)));
+                        ((__POINTER *)next__AFJH)[ 0]=NULL;
+                        ((__POINTER *)ptr_table__BFJH)[ 0]=next__AFJH;
                       } else {
-                        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)));
+                        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ACGH <<  1)) <=  4096)) {
+                            next__AFJH=(void *)((unsigned long)result__CFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ACGH)));
                           } else {
-                            next__XAJH=new_lab__QOJ(new_size__X3FH);
+                            next__AFJH=new_lab__ZPJ(new_size__ACGH);
                           };
-                          ((__POINTER *)next__XAJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__YAJH)[ 0]=next__XAJH;
+                          ((__POINTER *)next__AFJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__BFJH)[ 0]=next__AFJH;
                         } else {
-                          ((__POINTER *)result__ZAJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XAJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__ZAJH=next__XAJH;
+                          ((__POINTER *)result__CFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__CFJH=next__AFJH;
                         };
                       };
-                      ptr__YF1F=result__ZAJH;
+                      ptr__DK1F=result__CFJH;
                     } else {
-                      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;
+                      t__ECGH=((__UINTEGER_32 )typ_id__IK1F);
+                      a__DCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                      new_size__JFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FK1F + a__DCGH) & (__UINTEGER_32)(~ a__DCGH));
+                      ptr_table__GFJH=((__POINTER )(&(table_type[(t__ECGH)])));
+                      lab_type__IFJH=(__UINTEGER_32)(t__ECGH |  1);
+                      next__FFJH=((__POINTER )(NULL));
+                      result__HFJH=((__POINTER *)ptr_table__GFJH)[ 0];
+                      if ((result__HFJH == (void *)NULL)) {
+                        result__HFJH=new_lab__ZPJ(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__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)));
+                        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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JFJH <<  1)) <=  4096)) {
+                            next__FFJH=(void *)((unsigned long)result__HFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JFJH)));
                           } else {
-                            next__2AJH=new_lab__QOJ(lab_type__5AJH);
+                            next__FFJH=new_lab__ZPJ(lab_type__IFJH);
                           };
-                          ((__POINTER *)next__2AJH)[ 0]=NULL;
-                          ((__POINTER *)ptr_table__3AJH)[ 0]=next__2AJH;
+                          ((__POINTER *)next__FFJH)[ 0]=NULL;
+                          ((__POINTER *)ptr_table__GFJH)[ 0]=next__FFJH;
                         } else {
-                          ((__POINTER *)result__4AJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2AJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                          result__4AJH=next__2AJH;
+                          ((__POINTER *)result__HFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                          result__HFJH=next__FFJH;
                         };
                       };
-                      ptr__YF1F=result__4AJH;
+                      ptr__DK1F=result__HFJH;
                     };
-                    result__XF1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__YF1F);
-                    *(result__XF1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
+                    result__CK1F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)ptr__DK1F);
+                    *(result__CK1F) = *(HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo__);
                   };
-                  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);
+                  Self__CE5F=((__HASHED_SET_NODEoFAST_ARRAYoSTRING_CONSTANToo *)result__CK1F);
+                  Self__CE5F->item__2EQF=result__AHMF;
+                  Self__CE5F->next__IFQF=__tmp__PJQF;
+                  node__5HQF=result__CK1F;
+                  ((void **)Self__VHQF->buckets__QEQF)[idx__4HQF]=result__CK1F;
+                  Self__VHQF->count__CJQF=(__INTEGER)(Self__VHQF->count__CJQF +  1);
                 };
               };
             };
-            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__;
+            free__WP5(result__AAIH);
+            name__A0EE=result__AHMF;
+            type__5ZEE=alias__KSP(result__IRP);
+            tm__4ZEE=get__GGP(type__5ZEE);
+            p__CIMF=current_position__AWF();
+            result__TZMF=NULL;
+            ptr__UZMF=((__POINTER )(NULL));
+            typ_id__ZZMF= 0;
+            sz__WZMF=((__UINTEGER_32 )sizeof(__ITM_ARGS));
+            if ((sz__WZMF ==  0)) {
+              result__TZMF=ITM_ARGS__;
             } else {
-              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;
+              typ_id__ZZMF=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WZMF);
+              if ((typ_id__ZZMF == (__INTEGER)(-  1))) {
+                a__KCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__LCGH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZMF + a__KCGH) & (__UINTEGER_32)(~ a__KCGH));
+                ptr_table__LFJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LCGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__KFJH=((__POINTER )(NULL));
+                result__MFJH=((__POINTER *)ptr_table__LFJH)[ 0];
+                if ((result__MFJH == (void *)NULL)) {
+                  result__MFJH=new_lab__ZPJ(new_size__LCGH);
+                  next__KFJH=(void *)((unsigned long)result__MFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCGH)));
+                  ((__POINTER *)next__KFJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LFJH)[ 0]=next__KFJH;
                 } else {
-                  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)));
+                  next__KFJH=((__POINTER *)result__MFJH)[ 0];
+                  if ((next__KFJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MFJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LCGH <<  1)) <=  4096)) {
+                      next__KFJH=(void *)((unsigned long)result__MFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LCGH)));
                     } else {
-                      next__BBJH=new_lab__QOJ(new_size__C4FH);
+                      next__KFJH=new_lab__ZPJ(new_size__LCGH);
                     };
-                    ((__POINTER *)next__BBJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__CBJH)[ 0]=next__BBJH;
+                    ((__POINTER *)next__KFJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__LFJH)[ 0]=next__KFJH;
                   } else {
-                    ((__POINTER *)result__DBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__DBJH=next__BBJH;
+                    ((__POINTER *)result__MFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__MFJH=next__KFJH;
                   };
                 };
-                ptr__PVMF=result__DBJH;
+                ptr__UZMF=result__MFJH;
               } else {
-                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;
+                t__PCGH=((__UINTEGER_32 )typ_id__ZZMF);
+                a__OCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__TFJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WZMF + a__OCGH) & (__UINTEGER_32)(~ a__OCGH));
+                ptr_table__QFJH=((__POINTER )(&(table_type[(t__PCGH)])));
+                lab_type__SFJH=(__UINTEGER_32)(t__PCGH |  1);
+                next__PFJH=((__POINTER )(NULL));
+                result__RFJH=((__POINTER *)ptr_table__QFJH)[ 0];
+                if ((result__RFJH == (void *)NULL)) {
+                  result__RFJH=new_lab__ZPJ(lab_type__SFJH);
+                  next__PFJH=(void *)((unsigned long)result__RFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TFJH)));
+                  ((__POINTER *)next__PFJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QFJH)[ 0]=next__PFJH;
                 } else {
-                  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)));
+                  next__PFJH=((__POINTER *)result__RFJH)[ 0];
+                  if ((next__PFJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RFJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__TFJH <<  1)) <=  4096)) {
+                      next__PFJH=(void *)((unsigned long)result__RFJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TFJH)));
                     } else {
-                      next__GBJH=new_lab__QOJ(lab_type__JBJH);
+                      next__PFJH=new_lab__ZPJ(lab_type__SFJH);
                     };
-                    ((__POINTER *)next__GBJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__HBJH)[ 0]=next__GBJH;
+                    ((__POINTER *)next__PFJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__QFJH)[ 0]=next__PFJH;
                   } else {
-                    ((__POINTER *)result__IBJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__IBJH=next__GBJH;
+                    ((__POINTER *)result__RFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__RFJH=next__PFJH;
                   };
                 };
-                ptr__PVMF=result__IBJH;
+                ptr__UZMF=result__RFJH;
               };
-              result__OVMF=((__ITM_ARGS *)ptr__PVMF);
-              *(result__OVMF) = *(ITM_ARGS__);
+              result__TZMF=((__ITM_ARGS *)ptr__UZMF);
+              *(result__TZMF) = *(ITM_ARGS__);
             };
-            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;
+            Self__S2PF=((__ITM_ARGS *)result__TZMF);
+            Self__S2PF->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ=p__CIMF;
+            Self__S2PF->name__W2PF=result__AHMF;
+            Self__S2PF->type__X2PF=tm__4ZEE;
+            result__D0EE=result__TZMF;
           };
           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);
+            __tmp__SAFE=((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.upper__H4OD;
+            Self__LIMF= 0;
+            while ((Self__LIMF <= __tmp__SAFE)) {
+              add__AJHB(short_local__XCC,((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)name__A0EE)->parent_arrayed_collection__U3I.storage__3APD)[Self__LIMF]);
+              Self__LIMF=(__INTEGER)(Self__LIMF +  1);
             };
           };
         };
       };
-      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)) {
+      result__LBHB=result__D0EE;
+      if (((void *)result__D0EE == (void *)NULL)) {
+        if ((! mute__IBHB)) {
+          pos__C0XG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_284));
+          put_position__LNG(pos__C0XG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__LBJH=FALSE__;
+        result__UFJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__LBJH=FALSE__;
+          result__UFJH=FALSE__;
         } else {
-          result__MBJH='\0';
+          result__VFJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__MBJH=((__CHARACTER )(( 0)));
+            result__VFJH=((__CHARACTER )(( 0)));
           } else {
-            result__MBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__VFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__MBJH == ')')) {
+          if ((result__VFJH == ')')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__LBJH=TRUE__;
+            result__UFJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__UFJH)) {
+          pos__E0XG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_262));
+          put_position__LNG(pos__E0XG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
   };
-  return(result__BAHB);
+  return(result__LBHB);
 }
 
-static void* read_slot_operator__MR5B(void *list_arg__OR5B)
+static void* read_slot_operator__YS5B(void *list_arg__0S5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *associativity__4S5B,*name__2S5B,*pretty_name__3S5B;
+  __INTEGER priority__5S5B,typ_id__PKAC;
+  void *arg__AT5B;
+  __POSITION pos__G0XG,pos__I0XG,pos__K0XG,pos__P0XG,pos__R0XG;
+  __POSITION pos__T0XG,__tmp__0X5B;
+  void *__tmp__1X5B;
+  __ITM_SLOT_OPERATOR *result__JKAC,*Self__01HC,*Self__MZHC;
+  __POINTER ptr__KKAC,ptr_table__5FJH,next__4FJH,result__AGJH;
+  __POINTER ptr_table__EGJH,next__DGJH,result__FGJH;
+  __UINTEGER_32 sz__MKAC,a__YCGH,new_size__ZCGH,t__3CGH,a__2CGH;
+  __UINTEGER_32 new_size__HGJH,lab_type__GGJH;
+  __BOOLEAN result__XFJH,result__1FJH,__tmp__5U5B,result__3FJH;
+  __CHARACTER result__YFJH;
+  associativity__4S5B=NULL;
+  priority__5S5B= 0;
+  arg__AT5B=NULL;
+  if ((! read_operator__OKM())) {
+    pos__G0XG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_285));
+    put_position__LNG(pos__G0XG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
   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)) {
+    pos__I0XG=current_position__AWF();
+    put_error__text__BMG( 0,(&__string_286));
+    put_position__LNG(pos__I0XG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  name__QR5B=last_string__V0C;
-  pretty_name__RR5B=name__QR5B;
-  result__OBJH=FALSE__;
+  name__2S5B=last_string__V0C;
+  pretty_name__3S5B=name__2S5B;
+  result__XFJH=FALSE__;
   if ((! read_space__KSD())) {
-    result__OBJH=FALSE__;
+    result__XFJH=FALSE__;
   } else {
-    result__PBJH='\0';
+    result__YFJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__PBJH=((__CHARACTER )(( 0)));
+      result__YFJH=((__CHARACTER )(( 0)));
     } else {
-      result__PBJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__YFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__PBJH == '\'')) {
+    if ((result__YFJH == '\'')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__OBJH=TRUE__;
+      result__XFJH=TRUE__;
     };
   };
-  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)) {
+  if ((! result__XFJH)) {
+    pos__K0XG=current_position__AWF();
+    put_error__text__BMG( 2,(&__string_287));
+    put_position__LNG(pos__K0XG);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  result__SBJH=read_word__4MF((&__string_6));
+  result__1FJH=read_word__HOF((&__string_6));
   if (is_shorter__LZ) {
-    if (result__SBJH) {
+    if (result__1FJH) {
       if (((void *)(&__string_6) == (void *)(&__string_4))) {
         short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
@@ -21732,12 +21740,12 @@ static void* read_slot_operator__MR5B(void *list_arg__OR5B)
       };
     };
   };
-  if (result__SBJH) {
-    __tmp__TT5B=TRUE__;
+  if (result__1FJH) {
+    __tmp__5U5B=TRUE__;
   } else {
-    result__UBJH=read_word__4MF((&__string_5));
+    result__3FJH=read_word__HOF((&__string_5));
     if (is_shorter__LZ) {
-      if (result__UBJH) {
+      if (result__3FJH) {
         if (((void *)(&__string_5) == (void *)(&__string_4))) {
           short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
@@ -21745,914 +21753,914 @@ static void* read_slot_operator__MR5B(void *list_arg__OR5B)
         };
       };
     };
-    __tmp__TT5B=result__UBJH;
+    __tmp__5U5B=result__3FJH;
   };
-  if (__tmp__TT5B) {
-    associativity__SR5B=last_string__V0C;
-    if (read_integer__1XP()) {
-      priority__TR5B=((__INTEGER )last_integer__UNO);
+  if (__tmp__5U5B) {
+    associativity__4S5B=last_string__V0C;
+    if (read_integer__EZP()) {
+      priority__5S5B=((__INTEGER )last_integer__3OO);
     };
   };
-  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)) {
+  if ((((__FAST_ARRAYoITM_ARGUMENTo *)list_arg__0S5B)->parent_arrayed_collection__AAZB.upper__J5GC <  0)) {
+    arg__AT5B=read_loc_arg__with_self__GBHB(PARSER__,FALSE__,TRUE__);
+    if (((void *)arg__AT5B == (void *)NULL)) {
+      pos__P0XG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_288));
+      put_position__LNG(pos__P0XG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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)) {
+    add_last__F5GC(list_arg__0S5B,arg__AT5B);
+    name__2S5B=operator__name__BBO((&__string_83),name__2S5B);
+    if (((void *)associativity__4S5B != (void *)NULL)) {
+      pos__R0XG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_289));
+      put_position__LNG(pos__R0XG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    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)) {
+    arg__AT5B=read_loc_arg__with_self__GBHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__AT5B != (void *)NULL)) {
+      add_last__F5GC(list_arg__0S5B,arg__AT5B);
+      name__2S5B=operator__name__BBO((&__string_81),name__2S5B);
+      if (((void *)associativity__4S5B == (void *)NULL)) {
+        associativity__4S5B=(&__string_6);
+      };
+    } else {
+      name__2S5B=operator__name__BBO((&__string_82),name__2S5B);
+      if (((void *)associativity__4S5B != (void *)NULL)) {
+        pos__T0XG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_290));
+        put_position__LNG(pos__T0XG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  __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__;
+  __tmp__0X5B=current_position__AWF();
+  __tmp__1X5B=last_section__E1C;
+  result__JKAC=NULL;
+  ptr__KKAC=((__POINTER )(NULL));
+  typ_id__PKAC= 0;
+  sz__MKAC=((__UINTEGER_32 )sizeof(__ITM_SLOT_OPERATOR));
+  if ((sz__MKAC ==  0)) {
+    result__JKAC=ITM_SLOT_OPERATOR__;
   } else {
-    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;
+    typ_id__PKAC=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__MKAC);
+    if ((typ_id__PKAC == (__INTEGER)(-  1))) {
+      a__YCGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__ZCGH=(__UINTEGER_32)((__UINTEGER_32)(sz__MKAC + a__YCGH) & (__UINTEGER_32)(~ a__YCGH));
+      ptr_table__5FJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZCGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__4FJH=((__POINTER )(NULL));
+      result__AGJH=((__POINTER *)ptr_table__5FJH)[ 0];
+      if ((result__AGJH == (void *)NULL)) {
+        result__AGJH=new_lab__ZPJ(new_size__ZCGH);
+        next__4FJH=(void *)((unsigned long)result__AGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZCGH)));
+        ((__POINTER *)next__4FJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5FJH)[ 0]=next__4FJH;
+      } else {
+        next__4FJH=((__POINTER *)result__AGJH)[ 0];
+        if ((next__4FJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AGJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZCGH <<  1)) <=  4096)) {
+            next__4FJH=(void *)((unsigned long)result__AGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZCGH)));
+          } else {
+            next__4FJH=new_lab__ZPJ(new_size__ZCGH);
+          };
+          ((__POINTER *)next__4FJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5FJH)[ 0]=next__4FJH;
+        } else {
+          ((__POINTER *)result__AGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__AGJH=next__4FJH;
+        };
+      };
+      ptr__KKAC=result__AGJH;
+    } else {
+      t__3CGH=((__UINTEGER_32 )typ_id__PKAC);
+      a__2CGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__HGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__MKAC + a__2CGH) & (__UINTEGER_32)(~ a__2CGH));
+      ptr_table__EGJH=((__POINTER )(&(table_type[(t__3CGH)])));
+      lab_type__GGJH=(__UINTEGER_32)(t__3CGH |  1);
+      next__DGJH=((__POINTER )(NULL));
+      result__FGJH=((__POINTER *)ptr_table__EGJH)[ 0];
+      if ((result__FGJH == (void *)NULL)) {
+        result__FGJH=new_lab__ZPJ(lab_type__GGJH);
+        next__DGJH=(void *)((unsigned long)result__FGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HGJH)));
+        ((__POINTER *)next__DGJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__EGJH)[ 0]=next__DGJH;
+      } else {
+        next__DGJH=((__POINTER *)result__FGJH)[ 0];
+        if ((next__DGJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FGJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HGJH <<  1)) <=  4096)) {
+            next__DGJH=(void *)((unsigned long)result__FGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HGJH)));
+          } else {
+            next__DGJH=new_lab__ZPJ(lab_type__GGJH);
+          };
+          ((__POINTER *)next__DGJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__EGJH)[ 0]=next__DGJH;
+        } else {
+          ((__POINTER *)result__FGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__FGJH=next__DGJH;
+        };
+      };
+      ptr__KKAC=result__FGJH;
+    };
+    result__JKAC=((__ITM_SLOT_OPERATOR *)ptr__KKAC);
+    *(result__JKAC) = *(ITM_SLOT_OPERATOR__);
+  };
+  Self__01HC=((__ITM_SLOT_OPERATOR *)result__JKAC);
+  Self__01HC->parent_itm_slot__BT5B.parent_named__15.name__LI=name__2S5B;
+  Self__01HC->parent_itm_slot__BT5B.parent_named__15.parent_itm_object__4.position__0BJ=__tmp__0X5B;
+  Self__01HC->parent_itm_slot__BT5B.id_section__F2C=__tmp__1X5B;
+  Self__MZHC=((__ITM_SLOT_OPERATOR *)result__JKAC);
+  if (((void *)associativity__4S5B == (void *)(&__string_6))) {
+    Self__MZHC->priority_and_level__VZHC=priority__5S5B;
   } else {
-    Self__YXHC->priority_and_level__BYHC=(__INTEGER)(- priority__TR5B);
+    Self__MZHC->priority_and_level__VZHC=(__INTEGER)(- priority__5S5B);
   };
-  ((__ITM_SLOT_OPERATOR *)result__3IAC)->pretty_name__MYHC=pretty_name__RR5B;
-  return(result__3IAC);
+  ((__ITM_SLOT_OPERATOR *)result__JKAC)->pretty_name__A0HC=pretty_name__3S5B;
+  return(result__JKAC);
 }
 
-static void add_last__R3GC(__FAST_ARRAYoITM_ARGUMENTo *Self__S3GC,void *element__T3GC)
+static void add_last__F5GC(__FAST_ARRAYoITM_ARGUMENTo *Self__G5GC,void *element__H5GC)
 // ({FAST_ARRAYoITM_ARGUMENTo},{NULLxITM_ARGxITM_ARGS}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__I5GC,__tmp__RAHC,__tmp__0FTD,Self__J5XE;
+  __BOOLEAN __tmp__Y5GC;
+  void **__tmp__QAHC,**new__GFTD;
+  new_capacity__I5GC= 0;
+  if (((__INTEGER)(Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC +  1) <= (__INTEGER)(Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC -  1))) {
+    Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC=(__INTEGER)(Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC +  1);
+    __tmp__Y5GC=TRUE__;
   } else {
-    __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;
+    __tmp__Y5GC=FALSE__;
+  };
+  if ((! __tmp__Y5GC)) {
+    if ((Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC ==  0)) {
+      Self__G5GC->parent_arrayed_collection__AAZB.storage__HAHC=create__HRBD( 2);
+      Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC= 2;
+      Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC= 0;
+    } else {
+      new_capacity__I5GC=(__INTEGER)(Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC <<  1);
+      __tmp__QAHC=Self__G5GC->parent_arrayed_collection__AAZB.storage__HAHC;
+      __tmp__RAHC=Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC;
+      new__GFTD=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__QAHC)),((__UINTEGER_32 )(__INTEGER)(__tmp__RAHC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__I5GC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__0FTD=(__INTEGER)(new_capacity__I5GC -  1);
+      Self__J5XE=__tmp__RAHC;
+      while ((Self__J5XE <= __tmp__0FTD)) {
+        new__GFTD[Self__J5XE]=NULL;
+        Self__J5XE=(__INTEGER)(Self__J5XE +  1);
+      };
+      Self__G5GC->parent_arrayed_collection__AAZB.storage__HAHC=new__GFTD;
+      Self__G5GC->parent_arrayed_collection__AAZB.capacity__L5GC=new_capacity__I5GC;
+      Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC=(__INTEGER)(Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC +  1);
+    };
+  };
+  ((void **)Self__G5GC->parent_arrayed_collection__AAZB.storage__HAHC)[Self__G5GC->parent_arrayed_collection__AAZB.upper__J5GC]=element__H5GC;
 }
 
-static void* read_slot_keyword__ZW5B(void *list_arg__1W5B)
+static void* read_slot_keyword__FY5B(void *list_arg__HY5B)
 // ({NULLxFAST_ARRAYoITM_ARGUMENTo}) With resultNo recursive, No inlinable.
 {
-  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()) {
+  void *n__JY5B,*result__ELP;
+  void *arg__KY5B;
+  void *result__LY5B;
+  __POSITION pos__P2XG,pos__R2XG,p__SGJH;
+  void *result__UNP;
+  void *sec__TGJH;
+  __ITM_SLOT *result__IGJH,*Self__QGJH;
+  __POINTER ptr__JGJH,ptr_table__VGJH,next__UGJH,result__WGJH;
+  __POINTER ptr_table__0GJH,next__ZGJH,result__1GJH;
+  __INTEGER typ_id__KGJH;
+  __UINTEGER_32 sz__LGJH,a__MGJH,new_size__NGJH,t__OGJH,a__PGJH;
+  __UINTEGER_32 new_size__3GJH,lab_type__2GJH;
+  __FAST_ARRAYoSTRINGo *Self__4ZAB,*Self__U0AB;
+  n__JY5B=NULL;
+  arg__KY5B=NULL;
+  result__LY5B=NULL;
+  if (read_identifier__E4K()) {
     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)) {
+    result__ELP=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__FLP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__ELP=create__ZBB( 128);
+    } else {
+      Self__4ZAB=((__FAST_ARRAYoSTRINGo *)free__FLP);
+      result__ELP=((void **)Self__4ZAB->parent_arrayed_collection__RKC.storage__1DT)[Self__4ZAB->parent_arrayed_collection__RKC.upper__UKC];
+      Self__U0AB=((__FAST_ARRAYoSTRINGo *)free__FLP);
+      Self__U0AB->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__U0AB->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__JY5B=result__ELP;
+    copy__35R(result__ELP,last_string__V0C);
+    arg__KY5B=read_loc_arg__with_self__GBHB(PARSER__,FALSE__,FALSE__);
+    if (((void *)arg__KY5B != (void *)NULL)) {
+      add_last__F5GC(list_arg__HY5B,arg__KY5B);
+      if (read_identifier__E4K()) {
+        if (((void *)((__SECTION_ *)last_section__E1C)->name__NYDC == (void *)(&__string_30))) {
+          pos__P2XG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_291));
+          put_position__LNG(pos__P2XG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
         do {
           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)) {
+          append__FLS(n__JY5B,(&__string_112));
+          append__FLS(n__JY5B,last_string__V0C);
+          arg__KY5B=read_loc_arg__with_self__GBHB(PARSER__,FALSE__,FALSE__);
+          if (((void *)arg__KY5B == (void *)NULL)) {
+            pos__R2XG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_168));
+            put_position__LNG(pos__R2XG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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)));
+          add_last__F5GC(list_arg__HY5B,arg__KY5B);
+        } while (read_identifier__E4K());
+      };
+    };
+    result__UNP=get__YWB(result__ELP);
+    add_last__2OV(free__FLP,result__ELP);
+    ((__STRING *)result__ELP)->count__EGC= 0;
+    p__SGJH=current_position__AWF();
+    sec__TGJH=last_section__E1C;
+    result__IGJH=NULL;
+    ptr__JGJH=((__POINTER )(NULL));
+    typ_id__KGJH= 0;
+    sz__LGJH=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__LGJH ==  0)) {
+      result__IGJH=ITM_SLOT__;
+    } else {
+      typ_id__KGJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LGJH);
+      if ((typ_id__KGJH == (__INTEGER)(-  1))) {
+        a__MGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NGJH=(__UINTEGER_32)((__UINTEGER_32)(sz__LGJH + a__MGJH) & (__UINTEGER_32)(~ a__MGJH));
+        ptr_table__VGJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NGJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__UGJH=((__POINTER )(NULL));
+        result__WGJH=((__POINTER *)ptr_table__VGJH)[ 0];
+        if ((result__WGJH == (void *)NULL)) {
+          result__WGJH=new_lab__ZPJ(new_size__NGJH);
+          next__UGJH=(void *)((unsigned long)result__WGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGJH)));
+          ((__POINTER *)next__UGJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VGJH)[ 0]=next__UGJH;
+        } else {
+          next__UGJH=((__POINTER *)result__WGJH)[ 0];
+          if ((next__UGJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WGJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NGJH <<  1)) <=  4096)) {
+              next__UGJH=(void *)((unsigned long)result__WGJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NGJH)));
             } else {
-              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)));
+              next__UGJH=new_lab__ZPJ(new_size__NGJH);
+            };
+            ((__POINTER *)next__UGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VGJH)[ 0]=next__UGJH;
+          } else {
+            ((__POINTER *)result__WGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WGJH=next__UGJH;
+          };
+        };
+        ptr__JGJH=result__WGJH;
+      } else {
+        t__OGJH=((__UINTEGER_32 )typ_id__KGJH);
+        a__PGJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__3GJH=(__UINTEGER_32)((__UINTEGER_32)(sz__LGJH + a__PGJH) & (__UINTEGER_32)(~ a__PGJH));
+        ptr_table__0GJH=((__POINTER )(&(table_type[(t__OGJH)])));
+        lab_type__2GJH=(__UINTEGER_32)(t__OGJH |  1);
+        next__ZGJH=((__POINTER )(NULL));
+        result__1GJH=((__POINTER *)ptr_table__0GJH)[ 0];
+        if ((result__1GJH == (void *)NULL)) {
+          result__1GJH=new_lab__ZPJ(lab_type__2GJH);
+          next__ZGJH=(void *)((unsigned long)result__1GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GJH)));
+          ((__POINTER *)next__ZGJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0GJH)[ 0]=next__ZGJH;
+        } else {
+          next__ZGJH=((__POINTER *)result__1GJH)[ 0];
+          if ((next__ZGJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1GJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3GJH <<  1)) <=  4096)) {
+              next__ZGJH=(void *)((unsigned long)result__1GJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3GJH)));
             } else {
-              next__QCJH=new_lab__QOJ(lab_type__TCJH);
+              next__ZGJH=new_lab__ZPJ(lab_type__2GJH);
             };
-            ((__POINTER *)next__QCJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__RCJH)[ 0]=next__QCJH;
+            ((__POINTER *)next__ZGJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0GJH)[ 0]=next__ZGJH;
           } else {
-            ((__POINTER *)result__SCJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QCJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__SCJH=next__QCJH;
+            ((__POINTER *)result__1GJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__1GJH=next__ZGJH;
           };
         };
-        ptr__ACJH=result__SCJH;
+        ptr__JGJH=result__1GJH;
       };
-      result__5BJH=((__ITM_SLOT *)ptr__ACJH);
-      *(result__5BJH) = *(ITM_SLOT__);
+      result__IGJH=((__ITM_SLOT *)ptr__JGJH);
+      *(result__IGJH) = *(ITM_SLOT__);
     };
-    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;
+    Self__QGJH=((__ITM_SLOT *)result__IGJH);
+    Self__QGJH->parent_named__15.name__LI=result__UNP;
+    Self__QGJH->parent_named__15.parent_itm_object__4.position__0BJ=p__SGJH;
+    Self__QGJH->id_section__F2C=sec__TGJH;
+    result__LY5B=result__IGJH;
   };
-  return(result__5W5B);
+  return(result__LY5B);
 }
 
-static void** create__QPBD(__INTEGER nb_elements__SPBD)
+static void** create__HRBD(__INTEGER nb_elements__JRBD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__HCEH,a__MCEH,new_size__ICEH,new_size2__JCEH,a__IDGH;
+  __UINTEGER_32 new_size__JDGH;
+  __POINTER result__GCEH,ptr_table__5GJH,next__4GJH,result__AHJH;
+  void *result__DHJH;
+  __INTEGER Self__YFXD;
+  void **Result__HEGD;
+  sz__HCEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__JRBD * ((__INTEGER )(sizeof(void *)))));
+  result__GCEH=((__POINTER )(NULL));
+  a__MCEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__ICEH=(__UINTEGER_32)((__UINTEGER_32)(sz__HCEH + a__MCEH) & (__UINTEGER_32)(~ a__MCEH));
+  new_size2__JCEH=(__UINTEGER_32)(new_size__ICEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__JCEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__IDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__JDGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__JCEH + a__IDGH) & (__UINTEGER_32)(~ a__IDGH));
+    ptr_table__5GJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__JDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__4GJH=((__POINTER )(NULL));
+    result__AHJH=((__POINTER *)ptr_table__5GJH)[ 0];
+    if ((result__AHJH == (void *)NULL)) {
+      result__AHJH=new_lab__ZPJ(new_size__JDGH);
+      next__4GJH=(void *)((unsigned long)result__AHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDGH)));
+      ((__POINTER *)next__4GJH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__5GJH)[ 0]=next__4GJH;
+    } else {
+      next__4GJH=((__POINTER *)result__AHJH)[ 0];
+      if ((next__4GJH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AHJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__JDGH <<  1)) <=  4096)) {
+          next__4GJH=(void *)((unsigned long)result__AHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__JDGH)));
+        } else {
+          next__4GJH=new_lab__ZPJ(new_size__JDGH);
+        };
+        ((__POINTER *)next__4GJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5GJH)[ 0]=next__4GJH;
+      } else {
+        ((__POINTER *)result__AHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4GJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__AHJH=next__4GJH;
+      };
+    };
+    ((__POINTER *)result__AHJH)[ 0]=((__POINTER ) 3);
+    result__GCEH=(void *)((unsigned long)result__AHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__DHJH=first_free__BCVB;
+    while ((((void *)result__DHJH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__DHJH)->map_size_and_id__YTB &  4294967292LU) < new_size__ICEH))) {
+      result__DHJH=((__MEMORY *)result__DHJH)->map_next_free__ZTB;
     };
-    if (((void *)result__0CJH == (void *)NULL)) {
-      result__0CJH=new_page__B24();
+    if (((void *)result__DHJH == (void *)NULL)) {
+      result__DHJH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__DHJH,new_size__ICEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__DHJH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__GCEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__DHJH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__HEGD=((void **)result__GCEH);
+  Self__YFXD=(__INTEGER)(nb_elements__JRBD -  1);
+  while ((Self__YFXD >=  0)) {
+    Result__HEGD[Self__YFXD]=NULL;
+    Self__YFXD=(__INTEGER)(Self__YFXD -  1);
   };
-  return(Result__GDGD);
+  return(Result__HEGD);
 }
 
-static void set_argument_list__MAHC(__ITM_SLOT *Self__NAHC,void *p__OAHC)
+static void set_argument_list__ACHC(__ITM_SLOT *Self__BCHC,void *p__CCHC)
 // ({ITM_SLOT},{NULLxFAST_ARRAYoITM_ARGUMENTo}) VoidNo recursive, No inlinable.
 {
-  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__;
+  void *__tmp__KCHC,*__tmp__2CHC,*__tmp__JDHC;
+  __INTEGER __tmp__LCHC;
+  __POSITION __tmp__3CHC,__tmp__KDHC;
+  __SECTION_ *Self__V11G;
+  __BOOLEAN __tmp__PCHC;
+  __FAST_ARRAYoITM_ARGUMENTo *Self__ODGH,*Self__CYID;
+  if (((__INTEGER)(((__FAST_ARRAYoITM_ARGUMENTo *)p__CCHC)->parent_arrayed_collection__AAZB.upper__J5GC +  1) >  1)) {
+    __tmp__PCHC=TRUE__;
   } else {
-    __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;
+    __tmp__KCHC=((void **)((__FAST_ARRAYoITM_ARGUMENTo *)p__CCHC)->parent_arrayed_collection__AAZB.storage__HAHC)[ 0];
+    if (((struct ___OBJ *)__tmp__KCHC)->__id==__ITM_ARG__) {
+      __tmp__LCHC= 1;
     } else {
-      __tmp__XAHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__WAHC)->name__LYPF)->parent_arrayed_collection__L2I.upper__R4OD +  1);
+      __tmp__LCHC=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)((__ITM_ARGS *)__tmp__KCHC)->name__W2PF)->parent_arrayed_collection__U3I.upper__H4OD +  1);
     };
-    __tmp__1AHC=(__tmp__XAHC >  1);
+    __tmp__PCHC=(__tmp__LCHC >  1);
   };
-  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;
+  if (__tmp__PCHC) {
+    if (((void *)((__SECTION_ *)Self__BCHC->id_section__F2C)->name__NYDC == (void *)(&__string_25))) {
+      Self__ODGH=((__FAST_ARRAYoITM_ARGUMENTo *)p__CCHC);
+      __tmp__2CHC=((void **)Self__ODGH->parent_arrayed_collection__AAZB.storage__HAHC)[Self__ODGH->parent_arrayed_collection__AAZB.upper__J5GC];
+      if (((struct ___OBJ *)__tmp__2CHC)->__id==__ITM_ARG__) {
+        __tmp__3CHC=((__ITM_ARG *)__tmp__2CHC)->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ;
       } else {
-        __tmp__JBHC=((__ITM_ARGS *)__tmp__IBHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
+        __tmp__3CHC=((__ITM_ARGS *)__tmp__2CHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
       };
-      put_error__text__YKG( 1,(&__string_234));
-      put_position__CMG(__tmp__JBHC);
-      put_string__CZF(msg_err__3KG);
-      if ((type_error__2KG !=  2)) {
+      put_error__text__BMG( 1,(&__string_234));
+      put_position__LNG(__tmp__3CHC);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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;
+    Self__V11G=((__SECTION_ *)Self__BCHC->id_section__F2C);
+    if ((((void *)Self__V11G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__V11G->name__NYDC == (void *)(&__string_24)))) {
+      Self__CYID=((__FAST_ARRAYoITM_ARGUMENTo *)p__CCHC);
+      __tmp__JDHC=((void **)Self__CYID->parent_arrayed_collection__AAZB.storage__HAHC)[Self__CYID->parent_arrayed_collection__AAZB.upper__J5GC];
+      if (((struct ___OBJ *)__tmp__JDHC)->__id==__ITM_ARG__) {
+        __tmp__KDHC=((__ITM_ARG *)__tmp__JDHC)->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ;
       } else {
-        __tmp__WBHC=((__ITM_ARGS *)__tmp__VBHC)->parent_itm_argument__R5EE.parent_itm_code__N0M.position__RAJ;
+        __tmp__KDHC=((__ITM_ARGS *)__tmp__JDHC)->parent_itm_argument__FAFE.parent_itm_code__W1M.position__0BJ;
       };
-      put_error__text__YKG( 1,(&__string_235));
-      put_position__CMG(__tmp__WBHC);
-      put_string__CZF(msg_err__3KG);
-      if ((type_error__2KG !=  2)) {
+      put_error__text__BMG( 1,(&__string_235));
+      put_position__LNG(__tmp__KDHC);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__NAHC->argument_list__3BHC=p__OAHC;
+  Self__BCHC->argument_list__RDHC=p__CCHC;
 }
 
-static __ITM_TYPE_MULTI* get__3EP(void *lt__5EP)
+static __ITM_TYPE_MULTI* get__GGP(void *lt__IGP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __ITM_TYPE_MULTI *result__KGP,*__tmp__2HP,*result__VZHB;
+  __INTEGER idx__LGP,typ_id__1ZHB,new_capacity__RWAB,__tmp__VXAB;
+  __INTEGER __tmp__1MFC,Self__HYVD;
+  void *__tmp__1HP;
+  __POINTER ptr__WZHB,ptr_table__HHJH,next__GHJH,result__IHJH;
+  __POINTER ptr_table__MHJH,next__LHJH,result__NHJH;
+  __UINTEGER_32 sz__YZHB,a__YDGH,new_size__ZDGH,t__3DGH,a__2DGH;
+  __UINTEGER_32 new_size__PHJH,lab_type__OHJH;
+  __FAST_ARRAYoITM_TYPE_MULTIo *Self__PWAB;
+  __BOOLEAN __tmp__5WAB;
+  void **__tmp__UXAB,**new__HMFC;
+  result__KGP=NULL;
+  idx__LGP= 0;
+  while (((idx__LGP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__RGP)->parent_arrayed_collection__QGP.upper__0GP) && ((void *)((__ITM_TYPE_MULTI *)((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__RGP)->parent_arrayed_collection__QGP.storage__EZV)[idx__LGP])->list_type__EHP != (void *)lt__IGP))) {
+    idx__LGP=(__INTEGER)(idx__LGP +  1);
+  };
+  if ((idx__LGP <= ((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__RGP)->parent_arrayed_collection__QGP.upper__0GP)) {
+    __tmp__1HP=((void **)((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__RGP)->parent_arrayed_collection__QGP.storage__EZV)[idx__LGP];
+    if (__tmp__1HP==NULL) {
+      __tmp__2HP=NULL;
+    } else {
+      __tmp__2HP=((__ITM_TYPE_MULTI *)__tmp__1HP);
+    };
+    result__KGP=__tmp__2HP;
   } else {
-    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)));
+    result__VZHB=NULL;
+    ptr__WZHB=((__POINTER )(NULL));
+    typ_id__1ZHB= 0;
+    sz__YZHB=((__UINTEGER_32 )sizeof(__ITM_TYPE_MULTI));
+    if ((sz__YZHB ==  0)) {
+      result__VZHB=ITM_TYPE_MULTI__;
+    } else {
+      typ_id__1ZHB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YZHB);
+      if ((typ_id__1ZHB == (__INTEGER)(-  1))) {
+        a__YDGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ZDGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YZHB + a__YDGH) & (__UINTEGER_32)(~ a__YDGH));
+        ptr_table__HHJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZDGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__GHJH=((__POINTER )(NULL));
+        result__IHJH=((__POINTER *)ptr_table__HHJH)[ 0];
+        if ((result__IHJH == (void *)NULL)) {
+          result__IHJH=new_lab__ZPJ(new_size__ZDGH);
+          next__GHJH=(void *)((unsigned long)result__IHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZDGH)));
+          ((__POINTER *)next__GHJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__HHJH)[ 0]=next__GHJH;
+        } else {
+          next__GHJH=((__POINTER *)result__IHJH)[ 0];
+          if ((next__GHJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IHJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZDGH <<  1)) <=  4096)) {
+              next__GHJH=(void *)((unsigned long)result__IHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZDGH)));
             } else {
-              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)));
+              next__GHJH=new_lab__ZPJ(new_size__ZDGH);
+            };
+            ((__POINTER *)next__GHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HHJH)[ 0]=next__GHJH;
+          } else {
+            ((__POINTER *)result__IHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__IHJH=next__GHJH;
+          };
+        };
+        ptr__WZHB=result__IHJH;
+      } else {
+        t__3DGH=((__UINTEGER_32 )typ_id__1ZHB);
+        a__2DGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PHJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YZHB + a__2DGH) & (__UINTEGER_32)(~ a__2DGH));
+        ptr_table__MHJH=((__POINTER )(&(table_type[(t__3DGH)])));
+        lab_type__OHJH=(__UINTEGER_32)(t__3DGH |  1);
+        next__LHJH=((__POINTER )(NULL));
+        result__NHJH=((__POINTER *)ptr_table__MHJH)[ 0];
+        if ((result__NHJH == (void *)NULL)) {
+          result__NHJH=new_lab__ZPJ(lab_type__OHJH);
+          next__LHJH=(void *)((unsigned long)result__NHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PHJH)));
+          ((__POINTER *)next__LHJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MHJH)[ 0]=next__LHJH;
+        } else {
+          next__LHJH=((__POINTER *)result__NHJH)[ 0];
+          if ((next__LHJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NHJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PHJH <<  1)) <=  4096)) {
+              next__LHJH=(void *)((unsigned long)result__NHJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PHJH)));
             } else {
-              next__CDJH=new_lab__QOJ(lab_type__FDJH);
+              next__LHJH=new_lab__ZPJ(lab_type__OHJH);
             };
-            ((__POINTER *)next__CDJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DDJH)[ 0]=next__CDJH;
+            ((__POINTER *)next__LHJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MHJH)[ 0]=next__LHJH;
           } else {
-            ((__POINTER *)result__EDJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__EDJH=next__CDJH;
+            ((__POINTER *)result__NHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__NHJH=next__LHJH;
           };
         };
-        ptr__MYHB=result__EDJH;
+        ptr__WZHB=result__NHJH;
       };
-      result__LYHB=((__ITM_TYPE_MULTI *)ptr__MYHB);
-      *(result__LYHB) = *(ITM_TYPE_MULTI__);
+      result__VZHB=((__ITM_TYPE_MULTI *)ptr__WZHB);
+      *(result__VZHB) = *(ITM_TYPE_MULTI__);
     };
-    ((__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__;
+    ((__ITM_TYPE_MULTI *)result__VZHB)->list_type__EHP=lt__IGP;
+    result__KGP=result__VZHB;
+    Self__PWAB=((__FAST_ARRAYoITM_TYPE_MULTIo *)dico__RGP);
+    new_capacity__RWAB= 0;
+    if (((__INTEGER)(Self__PWAB->parent_arrayed_collection__QGP.upper__0GP +  1) <= (__INTEGER)(Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV -  1))) {
+      Self__PWAB->parent_arrayed_collection__QGP.upper__0GP=(__INTEGER)(Self__PWAB->parent_arrayed_collection__QGP.upper__0GP +  1);
+      __tmp__5WAB=TRUE__;
     } else {
-      __tmp__WVAB=FALSE__;
+      __tmp__5WAB=FALSE__;
     };
-    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;
+    if ((! __tmp__5WAB)) {
+      if ((Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV ==  0)) {
+        Self__PWAB->parent_arrayed_collection__QGP.storage__EZV=create__WJXB( 2);
+        Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV= 2;
+        Self__PWAB->parent_arrayed_collection__QGP.upper__0GP= 0;
       } else {
-        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);
+        new_capacity__RWAB=(__INTEGER)(Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV <<  1);
+        __tmp__UXAB=Self__PWAB->parent_arrayed_collection__QGP.storage__EZV;
+        __tmp__VXAB=Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV;
+        new__HMFC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__UXAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__VXAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RWAB * ((__INTEGER )(sizeof(void *)))))));
+        __tmp__1MFC=(__INTEGER)(new_capacity__RWAB -  1);
+        Self__HYVD=__tmp__VXAB;
+        while ((Self__HYVD <= __tmp__1MFC)) {
+          new__HMFC[Self__HYVD]=NULL;
+          Self__HYVD=(__INTEGER)(Self__HYVD +  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);
+        Self__PWAB->parent_arrayed_collection__QGP.storage__EZV=new__HMFC;
+        Self__PWAB->parent_arrayed_collection__QGP.capacity__ZYV=new_capacity__RWAB;
+        Self__PWAB->parent_arrayed_collection__QGP.upper__0GP=(__INTEGER)(Self__PWAB->parent_arrayed_collection__QGP.upper__0GP +  1);
       };
     };
-    ((void **)Self__GVAB->parent_arrayed_collection__HFP.storage__1XV)[Self__GVAB->parent_arrayed_collection__HFP.upper__RFP]=result__LYHB;
+    ((void **)Self__PWAB->parent_arrayed_collection__QGP.storage__EZV)[Self__PWAB->parent_arrayed_collection__QGP.upper__0GP]=result__VZHB;
   };
-  return(result__BFP);
+  return(result__KGP);
 }
 
-static void* read_type__B4L(__PARSER *Self__C4L,__BOOLEAN is_local__D4L)
+static void* read_type__K5L(__PARSER *Self__L5L,__BOOLEAN is_local__M5L)
 // ({PARSER},{TRUExFALSE}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *style__O5L;
+  void *result__P5L;
+  void *typ_arg__R5L,*typ_res__S5L,*typ_arg__ZIN,*typ_res__0IN;
+  __POSITION pos__AAYG,pos__CAYG,pos__EAYG,__tmp__VCM,pos__IAYG;
+  __POSITION pos__HCYG,pos__JCYG;
+  __ITM_TYPE_STYLE *Self__ZEGH;
+  void *result__2IN;
+  __INTEGER idx__3IN,typ_id__JYGB,new_capacity__VJAB,__tmp__ZKAB;
+  __INTEGER __tmp__NKFC,Self__IWVD;
+  __ITM_TYPE_BLOCK *result__DYGB,*Self__MYCC;
+  __POINTER ptr__EYGB,ptr_table__DIJH,next__CIJH,result__EIJH;
+  __POINTER ptr_table__IIJH,next__HIJH,result__JIJH;
+  __UINTEGER_32 sz__GYGB,a__CFGH,new_size__DFGH,t__HFGH,a__GFGH;
+  __UINTEGER_32 new_size__LIJH,lab_type__KIJH;
+  void *lst__Q5L;
+  __BOOLEAN result__QHJH,result__THJH,result__WHJH,result__ZHJH;
+  __BOOLEAN result__2HJH,result__5HJH,__tmp__DKAB,result__NIJH;
+  __BOOLEAN __tmp__UEM,result__PIJH;
+  __CHARACTER result__RHJH,result__UHJH,result__XHJH,result__0HJH;
+  __CHARACTER result__3HJH,result__AIJH;
+  __FAST_ARRAYoITM_TYPE_BLOCKo *Self__TJAB;
+  void **__tmp__YKAB,**new__ZJFC;
+  style__O5L=NULL;
+  result__P5L=NULL;
+  lst__Q5L=NULL;
+  typ_arg__R5L=NULL;
+  typ_res__S5L=NULL;
+  result__QHJH=FALSE__;
   if ((! read_space__KSD())) {
-    result__HDJH=FALSE__;
+    result__QHJH=FALSE__;
   } else {
-    result__IDJH='\0';
+    result__RHJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__IDJH=((__CHARACTER )(( 0)));
+      result__RHJH=((__CHARACTER )(( 0)));
     } else {
-      result__IDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__RHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__IDJH == '{')) {
+    if ((result__RHJH == '{')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__HDJH=TRUE__;
+      result__QHJH=TRUE__;
     };
   };
-  if (result__HDJH) {
-    result__KDJH=FALSE__;
+  if (result__QHJH) {
+    result__THJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__KDJH=FALSE__;
+      result__THJH=FALSE__;
     } else {
-      result__LDJH='\0';
+      result__UHJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__LDJH=((__CHARACTER )(( 0)));
+        result__UHJH=((__CHARACTER )(( 0)));
       } else {
-        result__LDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__UHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__LDJH == '(')) {
+      if ((result__UHJH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__KDJH=TRUE__;
+        result__THJH=TRUE__;
       };
     };
-    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)) {
+    if (result__THJH) {
+      lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
+      if (((void *)lst__Q5L == (void *)NULL)) {
+        pos__AAYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_265));
+        put_position__LNG(pos__AAYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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];
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.upper__GFV +  1) ==  1)) {
+        typ_arg__R5L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
       } else {
-        typ_arg__I4L=get__3EP(lst__H4L);
+        typ_arg__R5L=get__GGP(lst__Q5L);
       };
-      result__NDJH=FALSE__;
+      result__WHJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__NDJH=FALSE__;
+        result__WHJH=FALSE__;
       } else {
-        result__ODJH='\0';
+        result__XHJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ODJH=((__CHARACTER )(( 0)));
+          result__XHJH=((__CHARACTER )(( 0)));
         } else {
-          result__ODJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__XHJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__ODJH == ')')) {
+        if ((result__XHJH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__NDJH=TRUE__;
+          result__WHJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__WHJH)) {
+        pos__CAYG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_262));
+        put_position__LNG(pos__CAYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      result__QDJH=FALSE__;
+      result__ZHJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__QDJH=FALSE__;
+        result__ZHJH=FALSE__;
       } else {
-        result__RDJH='\0';
+        result__0HJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__RDJH=((__CHARACTER )(( 0)));
+          result__0HJH=((__CHARACTER )(( 0)));
         } else {
-          result__RDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__0HJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__RDJH == ';')) {
+        if ((result__0HJH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__QDJH=TRUE__;
+          result__ZHJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__ZHJH)) {
+        pos__EAYG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_242));
+        put_position__LNG(pos__EAYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
+      lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
     } else {
-      lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
-      if (((void *)lst__H4L != (void *)NULL)) {
-        result__TDJH=FALSE__;
+      lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
+      if (((void *)lst__Q5L != (void *)NULL)) {
+        result__2HJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__TDJH=FALSE__;
+          result__2HJH=FALSE__;
         } else {
-          result__UDJH='\0';
+          result__3HJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__UDJH=((__CHARACTER )(( 0)));
+            result__3HJH=((__CHARACTER )(( 0)));
           } else {
-            result__UDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__3HJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__UDJH == ';')) {
+          if ((result__3HJH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__TDJH=TRUE__;
+            result__2HJH=TRUE__;
           };
         };
-        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];
+        if (result__2HJH) {
+          if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.upper__GFV +  1) ==  1)) {
+            typ_arg__R5L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
           } else {
-            typ_arg__I4L=get__3EP(lst__H4L);
-            copy__U4R(string_tmp__VH,(&__string_292));
-            switch (((struct ___OBJ *)typ_arg__I4L)->__id) {
+            typ_arg__R5L=get__GGP(lst__Q5L);
+            copy__35R(string_tmp__VH,(&__string_292));
+            switch (((struct ___OBJ *)typ_arg__R5L)->__id) {
             case __ITM_TYPE_PARAMETER__: {
-              append__2JS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__I4L)->parent_itm_type__LAE.name__FUP);
+              append__FLS(string_tmp__VH,((__ITM_TYPE_PARAMETER *)typ_arg__R5L)->parent_itm_type__UBE.name__OVP);
             } break;
             case __ITM_TYPE_SIMPLE__: {
-              append__2JS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__I4L)->name__FUP);
+              append__FLS(string_tmp__VH,((__ITM_TYPE_SIMPLE *)typ_arg__R5L)->name__OVP);
             } break;
             case __ITM_TYPE_MULTI__: {
-              append_in__BGBC(typ_arg__I4L,string_tmp__VH);
+              append_in__NHBC(typ_arg__R5L,string_tmp__VH);
             } break;
             case __ITM_TYPE_BLOCK__: {
-              append_in__EFPD(typ_arg__I4L,string_tmp__VH);
+              append_in__0EPD(typ_arg__R5L,string_tmp__VH);
             } break;
             case __ITM_TYPE_GENERIC__: {
-              append_in__IGPD(typ_arg__I4L,string_tmp__VH);
+              append_in__4FPD(typ_arg__R5L,string_tmp__VH);
             } break;
             case __ITM_TYPE_STYLE__: {
-              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,' ');
+              Self__ZEGH=((__ITM_TYPE_STYLE *)typ_arg__R5L);
+              if (((void *)Self__ZEGH->style__XVP != (void *)NULL)) {
+                append__FLS(string_tmp__VH,Self__ZEGH->style__XVP);
+                add_last__3IT(string_tmp__VH,' ');
               };
-              append__2JS(string_tmp__VH,Self__QAGH->parent_itm_type_simple__2NN.name__FUP);
+              append__FLS(string_tmp__VH,Self__ZEGH->parent_itm_type_simple__FPN.name__OVP);
             } break;
             };
-            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)) {
+            append__FLS(string_tmp__VH,(&__string_293));
+            __tmp__VCM=current_position__AWF();
+            put_error__text__BMG( 2,string_tmp__VH);
+            put_position__LNG(__tmp__VCM);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          lst__H4L=read_type_list__DIO(Self__C4L,FALSE__);
+          lst__Q5L=read_type_list__MJO(Self__L5L,FALSE__);
         };
       };
     };
-    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];
+    if (((void *)lst__Q5L != (void *)NULL)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.upper__GFV +  1) ==  1)) {
+        typ_res__S5L=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)lst__Q5L)->parent_arrayed_collection__EYC.storage__NJV)[ 0];
       } else {
-        typ_res__J4L=get__3EP(lst__H4L);
+        typ_res__S5L=get__GGP(lst__Q5L);
       };
     };
-    result__WDJH=FALSE__;
+    result__5HJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__WDJH=FALSE__;
+      result__5HJH=FALSE__;
     } else {
-      result__XDJH='\0';
+      result__AIJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__XDJH=((__CHARACTER )(( 0)));
+        result__AIJH=((__CHARACTER )(( 0)));
       } else {
-        result__XDJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__AIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__XDJH == '}')) {
+      if ((result__AIJH == '}')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__WDJH=TRUE__;
+        result__5HJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__5HJH)) {
+      pos__IAYG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_294));
+      put_position__LNG(pos__IAYG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    typ_arg__ZIN=typ_arg__R5L;
+    typ_res__0IN=typ_res__S5L;
+    result__2IN=NULL;
+    idx__3IN= 0;
+    while (((idx__3IN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN)->parent_arrayed_collection__CJN.upper__MJN) && (((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN)->parent_arrayed_collection__CJN.storage__NHV)[idx__3IN])->type_argument__0JN != (void *)typ_arg__ZIN) || ((void *)((__ITM_TYPE_BLOCK *)((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN)->parent_arrayed_collection__CJN.storage__NHV)[idx__3IN])->type_result__EKN != (void *)typ_res__0IN)))) {
+      idx__3IN=(__INTEGER)(idx__3IN +  1);
+    };
+    if ((idx__3IN <= ((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN)->parent_arrayed_collection__CJN.upper__MJN)) {
+      result__2IN=((void **)((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN)->parent_arrayed_collection__CJN.storage__NHV)[idx__3IN];
+    } else {
+      result__DYGB=NULL;
+      ptr__EYGB=((__POINTER )(NULL));
+      typ_id__JYGB= 0;
+      sz__GYGB=((__UINTEGER_32 )sizeof(__ITM_TYPE_BLOCK));
+      if ((sz__GYGB ==  0)) {
+        result__DYGB=ITM_TYPE_BLOCK__;
+      } else {
+        typ_id__JYGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GYGB);
+        if ((typ_id__JYGB == (__INTEGER)(-  1))) {
+          a__CFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__DFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GYGB + a__CFGH) & (__UINTEGER_32)(~ a__CFGH));
+          ptr_table__DIJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DFGH / ((__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__ZPJ(new_size__DFGH);
+            next__CIJH=(void *)((unsigned long)result__EIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DFGH)));
+            ((__POINTER *)next__CIJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
+          } else {
+            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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__DFGH <<  1)) <=  4096)) {
+                next__CIJH=(void *)((unsigned long)result__EIJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DFGH)));
               } else {
-                next__ZDJH=new_lab__QOJ(new_size__0AGH);
+                next__CIJH=new_lab__ZPJ(new_size__DFGH);
               };
-              ((__POINTER *)next__ZDJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__0DJH)[ 0]=next__ZDJH;
+              ((__POINTER *)next__CIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__EIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__EIJH=next__CIJH;
+            };
+          };
+          ptr__EYGB=result__EIJH;
+        } else {
+          t__HFGH=((__UINTEGER_32 )typ_id__JYGB);
+          a__GFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__LIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GYGB + a__GFGH) & (__UINTEGER_32)(~ a__GFGH));
+          ptr_table__IIJH=((__POINTER )(&(table_type[(t__HFGH)])));
+          lab_type__KIJH=(__UINTEGER_32)(t__HFGH |  1);
+          next__HIJH=((__POINTER )(NULL));
+          result__JIJH=((__POINTER *)ptr_table__IIJH)[ 0];
+          if ((result__JIJH == (void *)NULL)) {
+            result__JIJH=new_lab__ZPJ(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__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__GUH)))) &  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__4DJH=new_lab__QOJ(lab_type__BEJH);
+                next__HIJH=new_lab__ZPJ(lab_type__KIJH);
               };
-              ((__POINTER *)next__4DJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__5DJH)[ 0]=next__4DJH;
+              ((__POINTER *)next__HIJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__IIJH)[ 0]=next__HIJH;
             } else {
-              ((__POINTER *)result__AEJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__AEJH=next__4DJH;
+              ((__POINTER *)result__JIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__JIJH=next__HIJH;
             };
           };
-          ptr__0WGB=result__AEJH;
+          ptr__EYGB=result__JIJH;
         };
-        result__ZWGB=((__ITM_TYPE_BLOCK *)ptr__0WGB);
-        *(result__ZWGB) = *(ITM_TYPE_BLOCK__);
+        result__DYGB=((__ITM_TYPE_BLOCK *)ptr__EYGB);
+        *(result__DYGB) = *(ITM_TYPE_BLOCK__);
       };
-      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__;
+      Self__MYCC=((__ITM_TYPE_BLOCK *)result__DYGB);
+      Self__MYCC->type_argument__0JN=typ_arg__R5L;
+      Self__MYCC->type_result__EKN=typ_res__S5L;
+      result__2IN=result__DYGB;
+      Self__TJAB=((__FAST_ARRAYoITM_TYPE_BLOCKo *)dico__DJN);
+      new_capacity__VJAB= 0;
+      if (((__INTEGER)(Self__TJAB->parent_arrayed_collection__CJN.upper__MJN +  1) <= (__INTEGER)(Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV -  1))) {
+        Self__TJAB->parent_arrayed_collection__CJN.upper__MJN=(__INTEGER)(Self__TJAB->parent_arrayed_collection__CJN.upper__MJN +  1);
+        __tmp__DKAB=TRUE__;
       } else {
-        __tmp__0IAB=FALSE__;
+        __tmp__DKAB=FALSE__;
       };
-      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;
+      if ((! __tmp__DKAB)) {
+        if ((Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV ==  0)) {
+          Self__TJAB->parent_arrayed_collection__CJN.storage__NHV=create__RSWB( 2);
+          Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV= 2;
+          Self__TJAB->parent_arrayed_collection__CJN.upper__MJN= 0;
         } else {
-          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);
+          new_capacity__VJAB=(__INTEGER)(Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV <<  1);
+          __tmp__YKAB=Self__TJAB->parent_arrayed_collection__CJN.storage__NHV;
+          __tmp__ZKAB=Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV;
+          new__ZJFC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__YKAB)),((__UINTEGER_32 )(__INTEGER)(__tmp__ZKAB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__VJAB * ((__INTEGER )(sizeof(void *)))))));
+          __tmp__NKFC=(__INTEGER)(new_capacity__VJAB -  1);
+          Self__IWVD=__tmp__ZKAB;
+          while ((Self__IWVD <= __tmp__NKFC)) {
+            new__ZJFC[Self__IWVD]=NULL;
+            Self__IWVD=(__INTEGER)(Self__IWVD +  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);
+          Self__TJAB->parent_arrayed_collection__CJN.storage__NHV=new__ZJFC;
+          Self__TJAB->parent_arrayed_collection__CJN.capacity__CHV=new_capacity__VJAB;
+          Self__TJAB->parent_arrayed_collection__CJN.upper__MJN=(__INTEGER)(Self__TJAB->parent_arrayed_collection__CJN.upper__MJN +  1);
         };
       };
-      ((void **)Self__KIAB->parent_arrayed_collection__ZHN.storage__EGV)[Self__KIAB->parent_arrayed_collection__ZHN.upper__DIN]=result__ZWGB;
+      ((void **)Self__TJAB->parent_arrayed_collection__CJN.storage__NHV)[Self__TJAB->parent_arrayed_collection__CJN.upper__MJN]=result__DYGB;
     };
-    result__G4L=result__THN;
+    result__P5L=result__2IN;
   } else {
-    result__EEJH=read_word__4MF((&__string_9));
+    result__NIJH=read_word__HOF((&__string_9));
     if (is_shorter__LZ) {
-      if (result__EEJH) {
+      if (result__NIJH) {
         if (((void *)(&__string_9) == (void *)(&__string_4))) {
           short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
@@ -22660,12 +22668,12 @@ static void* read_type__B4L(__PARSER *Self__C4L,__BOOLEAN is_local__D4L)
         };
       };
     };
-    if (result__EEJH) {
-      __tmp__LDM=TRUE__;
+    if (result__NIJH) {
+      __tmp__UEM=TRUE__;
     } else {
-      result__GEJH=read_word__4MF((&__string_10));
+      result__PIJH=read_word__HOF((&__string_10));
       if (is_shorter__LZ) {
-        if (result__GEJH) {
+        if (result__PIJH) {
           if (((void *)(&__string_10) == (void *)(&__string_4))) {
             short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
           } else {
@@ -22673,4426 +22681,4426 @@ static void* read_type__B4L(__PARSER *Self__C4L,__BOOLEAN is_local__D4L)
           };
         };
       };
-      __tmp__LDM=result__GEJH;
+      __tmp__UEM=result__PIJH;
     };
-    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)) {
+    if (__tmp__UEM) {
+      style__O5L=last_string__V0C;
+      if ((is_local__M5L && ((void *)last_string__V0C == (void *)(&__string_9)))) {
+        pos__HCYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_295));
+        put_position__LNG(pos__HCYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)) {
+    result__P5L=read_prototype__LLN(Self__L5L,style__O5L);
+    if (((void *)read_contract__4RF(Self__L5L) != (void *)NULL)) {
+      pos__JCYG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_260));
+      put_position__LNG(pos__JCYG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  return(result__G4L);
+  return(result__P5L);
 }
 
-static void set_result_type__D1FC(__ITM_SLOT *Self__E1FC,void *t__F1FC)
+static void set_result_type__X2FC(__ITM_SLOT *Self__Y2FC,void *t__Z2FC)
 // ({ITM_SLOT},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_MULTIxITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *tm__02FC,*__tmp__D3FC;
+  __SECTION_ *Self__111G;
+  __POSITION pos__Q0ID;
+  tm__02FC=NULL;
+  Self__111G=((__SECTION_ *)Self__Y2FC->id_section__F2C);
+  if ((((void *)Self__111G->name__NYDC == (void *)(&__string_23)) || ((void *)Self__111G->name__NYDC == (void *)(&__string_24)))) {
+    if (t__Z2FC==NULL) {
+      __tmp__D3FC=NULL;
+    } else {
+      switch (((struct ___OBJ *)t__Z2FC)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__P1FC=((void *)t__F1FC);
+        __tmp__D3FC=((void *)t__Z2FC);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__P1FC=((void *)t__F1FC);
+        __tmp__D3FC=((void *)t__Z2FC);
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__P1FC=NULL;
+        __tmp__D3FC=NULL;
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__P1FC=((void *)t__F1FC);
+        __tmp__D3FC=((void *)t__Z2FC);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__P1FC=((void *)t__F1FC);
+        __tmp__D3FC=((void *)t__Z2FC);
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__P1FC=((void *)t__F1FC);
+        __tmp__D3FC=((void *)t__Z2FC);
       } break;
       }
     };
-    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)) {
+    tm__02FC=__tmp__D3FC;
+    if (((((void *)__tmp__D3FC == (void *)NULL) || ((void *)__tmp__D3FC == (void *)type_self__LRN)) || ((void *)__tmp__D3FC == (void *)type_void__VUF))) {
+      pos__Q0ID=Self__Y2FC->parent_named__15.parent_itm_object__4.position__0BJ;
+      put_error__text__BMG( 1,(&__string_239));
+      put_position__LNG(pos__Q0ID);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  Self__E1FC->result_type__N2FC=t__F1FC;
+  Self__Y2FC->result_type__B4FC=t__Z2FC;
 }
 
-static void* read_contract__VQF(__PARSER *Self__WQF)
+static void* read_contract__4RF(__PARSER *Self__5RF)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *e__CSF;
+  void *result__DSF;
+  __POSITION p__1IJH,p__AVL,pos__RCYG,pos__TCYG,p__4JJH;
+  __ITM_LIST *result__TIJH;
+  __POINTER ptr__UIJH,ptr_table__3IJH,next__2IJH,result__4IJH;
+  __POINTER ptr_table__CJJH,next__BJJH,result__DJJH,ptr__C1L;
+  __POINTER ptr_table__HJJH,next__GJJH,result__IJJH,ptr_table__MJJH;
+  __POINTER next__LJJH,result__NJJH,ptr__XJJH,ptr_table__AKJH;
+  __POINTER next__5JJH,result__BKJH,ptr_table__FKJH,next__EKJH;
+  __POINTER result__GKJH;
+  __INTEGER typ_id__VIJH,typ_id__H1L,typ_id__YJJH;
+  __UINTEGER_32 sz__WIJH,a__XIJH,new_size__YIJH,t__ZIJH,a__0IJH;
+  __UINTEGER_32 new_size__FJJH,lab_type__EJJH,sz__E1L,a__QFGH;
+  __UINTEGER_32 new_size__RFGH,t__VFGH,a__UFGH,new_size__PJJH;
+  __UINTEGER_32 lab_type__OJJH,sz__ZJJH,a__0JJH,new_size__1JJH,t__2JJH;
+  __UINTEGER_32 a__3JJH,new_size__IKJH,lab_type__HKJH;
+  __ITM_LDOTS *result__B1L;
+  __ITM_PROTOTYPE *result__WJJH;
+  __BOOLEAN continue__BSF,result__QIJH,result__QJJH,result__TJJH;
+  void *lst__JSF,*result__DAIH;
+  __CHARACTER result__RIJH,result__RJJH,result__UJJH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__EAIH,*Self__FAIH;
+  continue__BSF=FALSE__;
+  e__CSF=NULL;
+  result__DSF=NULL;
+  lst__JSF=NULL;
+  result__QIJH=FALSE__;
   if ((! read_space__KSD())) {
-    result__HEJH=FALSE__;
+    result__QIJH=FALSE__;
   } else {
-    result__IEJH='\0';
+    result__RIJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__IEJH=((__CHARACTER )(( 0)));
+      result__RIJH=((__CHARACTER )(( 0)));
     } else {
-      result__IEJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__RIJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__IEJH == '[')) {
+    if ((result__RIJH == '[')) {
       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)));
+      result__QIJH=TRUE__;
+    };
+  };
+  if (result__QIJH) {
+    p__1IJH=current_position__AWF();
+    result__TIJH=NULL;
+    ptr__UIJH=((__POINTER )(NULL));
+    typ_id__VIJH= 0;
+    sz__WIJH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+    if ((sz__WIJH ==  0)) {
+      result__TIJH=ITM_LIST__;
+    } else {
+      typ_id__VIJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WIJH);
+      if ((typ_id__VIJH == (__INTEGER)(-  1))) {
+        a__XIJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YIJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIJH + a__XIJH) & (__UINTEGER_32)(~ a__XIJH));
+        ptr_table__3IJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YIJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__2IJH=((__POINTER )(NULL));
+        result__4IJH=((__POINTER *)ptr_table__3IJH)[ 0];
+        if ((result__4IJH == (void *)NULL)) {
+          result__4IJH=new_lab__ZPJ(new_size__YIJH);
+          next__2IJH=(void *)((unsigned long)result__4IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIJH)));
+          ((__POINTER *)next__2IJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__3IJH)[ 0]=next__2IJH;
+        } else {
+          next__2IJH=((__POINTER *)result__4IJH)[ 0];
+          if ((next__2IJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4IJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YIJH <<  1)) <=  4096)) {
+              next__2IJH=(void *)((unsigned long)result__4IJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YIJH)));
             } else {
-              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)));
+              next__2IJH=new_lab__ZPJ(new_size__YIJH);
+            };
+            ((__POINTER *)next__2IJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3IJH)[ 0]=next__2IJH;
+          } else {
+            ((__POINTER *)result__4IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__4IJH=next__2IJH;
+          };
+        };
+        ptr__UIJH=result__4IJH;
+      } else {
+        t__ZIJH=((__UINTEGER_32 )typ_id__VIJH);
+        a__0IJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__FJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WIJH + a__0IJH) & (__UINTEGER_32)(~ a__0IJH));
+        ptr_table__CJJH=((__POINTER )(&(table_type[(t__ZIJH)])));
+        lab_type__EJJH=(__UINTEGER_32)(t__ZIJH |  1);
+        next__BJJH=((__POINTER )(NULL));
+        result__DJJH=((__POINTER *)ptr_table__CJJH)[ 0];
+        if ((result__DJJH == (void *)NULL)) {
+          result__DJJH=new_lab__ZPJ(lab_type__EJJH);
+          next__BJJH=(void *)((unsigned long)result__DJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJJH)));
+          ((__POINTER *)next__BJJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__CJJH)[ 0]=next__BJJH;
+        } else {
+          next__BJJH=((__POINTER *)result__DJJH)[ 0];
+          if ((next__BJJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DJJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__FJJH <<  1)) <=  4096)) {
+              next__BJJH=(void *)((unsigned long)result__DJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__FJJH)));
             } else {
-              next__YEJH=new_lab__QOJ(lab_type__1EJH);
+              next__BJJH=new_lab__ZPJ(lab_type__EJJH);
             };
-            ((__POINTER *)next__YEJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ZEJH)[ 0]=next__YEJH;
+            ((__POINTER *)next__BJJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CJJH)[ 0]=next__BJJH;
           } else {
-            ((__POINTER *)result__0EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YEJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__0EJH=next__YEJH;
+            ((__POINTER *)result__DJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__DJJH=next__BJJH;
           };
         };
-        ptr__LEJH=result__0EJH;
+        ptr__UIJH=result__DJJH;
       };
-      result__KEJH=((__ITM_LIST *)ptr__LEJH);
-      *(result__KEJH) = *(ITM_LIST__);
+      result__TIJH=((__ITM_LIST *)ptr__UIJH);
+      *(result__TIJH) = *(ITM_LIST__);
     };
-    ((__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);
+    ((__ITM_LIST *)result__TIJH)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ=p__1IJH;
+    last_group__SSF=result__TIJH;
+    result__DSF=result__TIJH;
+    read_def_local__UZH(Self__5RF);
+    result__DAIH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H)->parent_arrayed_collection__X2H.upper__MTT <  0)) {
+      result__DAIH=create_with_capacity__5TI( 16);
     } else {
-      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);
+      Self__EAIH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      result__DAIH=((void **)Self__EAIH->parent_arrayed_collection__X2H.storage__03T)[Self__EAIH->parent_arrayed_collection__X2H.upper__MTT];
+      Self__FAIH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      Self__FAIH->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__FAIH->parent_arrayed_collection__X2H.upper__MTT -  1);
     };
-    lst__ARF=result__01HH;
+    lst__JSF=result__DAIH;
     do {
-      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;
+      e__CSF=read_expr__L3I(Self__5RF);
+      if (((void *)e__CSF == (void *)NULL)) {
+        continue__BSF=read_word__HOF((&__string_7));
+        if (continue__BSF) {
+          p__AVL=current_position__AWF();
+          result__B1L=NULL;
+          ptr__C1L=((__POINTER )(NULL));
+          typ_id__H1L= 0;
+          sz__E1L=((__UINTEGER_32 )sizeof(__ITM_LDOTS));
+          if ((sz__E1L ==  0)) {
+            result__B1L=ITM_LDOTS__;
+          } else {
+            typ_id__H1L=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__E1L);
+            if ((typ_id__H1L == (__INTEGER)(-  1))) {
+              a__QFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__E1L + a__QFGH) & (__UINTEGER_32)(~ a__QFGH));
+              ptr_table__HJJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RFGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__GJJH=((__POINTER )(NULL));
+              result__IJJH=((__POINTER *)ptr_table__HJJH)[ 0];
+              if ((result__IJJH == (void *)NULL)) {
+                result__IJJH=new_lab__ZPJ(new_size__RFGH);
+                next__GJJH=(void *)((unsigned long)result__IJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RFGH)));
+                ((__POINTER *)next__GJJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HJJH)[ 0]=next__GJJH;
               } else {
-                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)));
+                next__GJJH=((__POINTER *)result__IJJH)[ 0];
+                if ((next__GJJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IJJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__RFGH <<  1)) <=  4096)) {
+                    next__GJJH=(void *)((unsigned long)result__IJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RFGH)));
                   } else {
-                    next__3EJH=new_lab__QOJ(new_size__IBGH);
+                    next__GJJH=new_lab__ZPJ(new_size__RFGH);
                   };
-                  ((__POINTER *)next__3EJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__4EJH)[ 0]=next__3EJH;
+                  ((__POINTER *)next__GJJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HJJH)[ 0]=next__GJJH;
                 } else {
-                  ((__POINTER *)result__5EJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3EJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__5EJH=next__3EJH;
+                  ((__POINTER *)result__IJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IJJH=next__GJJH;
                 };
               };
-              ptr__ZZL=result__5EJH;
+              ptr__C1L=result__IJJH;
             } else {
-              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;
+              t__VFGH=((__UINTEGER_32 )typ_id__H1L);
+              a__UFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__PJJH=(__UINTEGER_32)((__UINTEGER_32)(sz__E1L + a__UFGH) & (__UINTEGER_32)(~ a__UFGH));
+              ptr_table__MJJH=((__POINTER )(&(table_type[(t__VFGH)])));
+              lab_type__OJJH=(__UINTEGER_32)(t__VFGH |  1);
+              next__LJJH=((__POINTER )(NULL));
+              result__NJJH=((__POINTER *)ptr_table__MJJH)[ 0];
+              if ((result__NJJH == (void *)NULL)) {
+                result__NJJH=new_lab__ZPJ(lab_type__OJJH);
+                next__LJJH=(void *)((unsigned long)result__NJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJJH)));
+                ((__POINTER *)next__LJJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
               } else {
-                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)));
+                next__LJJH=((__POINTER *)result__NJJH)[ 0];
+                if ((next__LJJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NJJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PJJH <<  1)) <=  4096)) {
+                    next__LJJH=(void *)((unsigned long)result__NJJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PJJH)));
                   } else {
-                    next__CFJH=new_lab__QOJ(lab_type__FFJH);
+                    next__LJJH=new_lab__ZPJ(lab_type__OJJH);
                   };
-                  ((__POINTER *)next__CFJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DFJH)[ 0]=next__CFJH;
+                  ((__POINTER *)next__LJJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__MJJH)[ 0]=next__LJJH;
                 } else {
-                  ((__POINTER *)result__EFJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CFJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__EFJH=next__CFJH;
+                  ((__POINTER *)result__NJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__NJJH=next__LJJH;
                 };
               };
-              ptr__ZZL=result__EFJH;
+              ptr__C1L=result__NJJH;
             };
-            result__YZL=((__ITM_LDOTS *)ptr__ZZL);
-            *(result__YZL) = *(ITM_LDOTS__);
+            result__B1L=((__ITM_LDOTS *)ptr__C1L);
+            *(result__B1L) = *(ITM_LDOTS__);
           };
-          ((__ITM_LDOTS *)result__YZL)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ=p__XTL;
-          add_last__H1U(lst__ARF,result__YZL);
+          ((__ITM_LDOTS *)result__B1L)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ=p__AVL;
+          add_last__Q2U(lst__JSF,result__B1L);
         };
       } else {
-        add_last__H1U(lst__ARF,e__ZQF);
-        result__HFJH=FALSE__;
+        add_last__Q2U(lst__JSF,e__CSF);
+        result__QJJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__HFJH=FALSE__;
+          result__QJJH=FALSE__;
         } else {
-          result__IFJH='\0';
+          result__RJJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__IFJH=((__CHARACTER )(( 0)));
+            result__RJJH=((__CHARACTER )(( 0)));
           } else {
-            result__IFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__RJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__IFJH == ';')) {
+          if ((result__RJJH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__HFJH=TRUE__;
+            result__QJJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__QJJH)) {
+          pos__RCYG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_242));
+          put_position__LNG(pos__RCYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        continue__YQF=TRUE__;
+        continue__BSF=TRUE__;
       };
-    } while (continue__YQF);
-    result__KFJH=FALSE__;
+    } while (continue__BSF);
+    result__TJJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__KFJH=FALSE__;
+      result__TJJH=FALSE__;
     } else {
-      result__LFJH='\0';
+      result__UJJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__LFJH=((__CHARACTER )(( 0)));
+        result__UJJH=((__CHARACTER )(( 0)));
       } else {
-        result__LFJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__UJJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__LFJH == ']')) {
+      if ((result__UJJH == ']')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__KFJH=TRUE__;
+        result__TJJH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__TJJH)) {
+      pos__TCYG=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_296));
+      put_position__LNG(pos__TCYG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__4JJH=current_position__AWF();
+    result__WJJH=NULL;
+    ptr__XJJH=((__POINTER )(NULL));
+    typ_id__YJJH= 0;
+    sz__ZJJH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__ZJJH ==  0)) {
+      result__WJJH=ITM_PROTOTYPE__;
+    } else {
+      typ_id__YJJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZJJH);
+      if ((typ_id__YJJH == (__INTEGER)(-  1))) {
+        a__0JJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__1JJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZJJH + a__0JJH) & (__UINTEGER_32)(~ a__0JJH));
+        ptr_table__AKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1JJH / ((__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__ZPJ(new_size__1JJH);
+          next__5JJH=(void *)((unsigned long)result__BKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1JJH)));
+          ((__POINTER *)next__5JJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__AKJH)[ 0]=next__5JJH;
+        } else {
+          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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__1JJH <<  1)) <=  4096)) {
+              next__5JJH=(void *)((unsigned long)result__BKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1JJH)));
             } else {
-              next__WFJH=new_lab__QOJ(new_size__SFJH);
-            };
-            ((__POINTER *)next__WFJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__XFJH)[ 0]=next__WFJH;
-          } else {
-            ((__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)));
+              next__5JJH=new_lab__ZPJ(new_size__1JJH);
+            };
+            ((__POINTER *)next__5JJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__AKJH)[ 0]=next__5JJH;
+          } else {
+            ((__POINTER *)result__BKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__BKJH=next__5JJH;
+          };
+        };
+        ptr__XJJH=result__BKJH;
+      } else {
+        t__2JJH=((__UINTEGER_32 )typ_id__YJJH);
+        a__3JJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IKJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZJJH + a__3JJH) & (__UINTEGER_32)(~ a__3JJH));
+        ptr_table__FKJH=((__POINTER )(&(table_type[(t__2JJH)])));
+        lab_type__HKJH=(__UINTEGER_32)(t__2JJH |  1);
+        next__EKJH=((__POINTER )(NULL));
+        result__GKJH=((__POINTER *)ptr_table__FKJH)[ 0];
+        if ((result__GKJH == (void *)NULL)) {
+          result__GKJH=new_lab__ZPJ(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__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__GUH)))) &  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__1FJH=new_lab__QOJ(lab_type__4FJH);
+              next__EKJH=new_lab__ZPJ(lab_type__HKJH);
             };
-            ((__POINTER *)next__1FJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__2FJH)[ 0]=next__1FJH;
+            ((__POINTER *)next__EKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
           } else {
-            ((__POINTER *)result__3FJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1FJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__3FJH=next__1FJH;
+            ((__POINTER *)result__GKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__GKJH=next__EKJH;
           };
         };
-        ptr__OFJH=result__3FJH;
+        ptr__XJJH=result__GKJH;
       };
-      result__NFJH=((__ITM_PROTOTYPE *)ptr__OFJH);
-      *(result__NFJH) = *(ITM_PROTOTYPE__);
+      result__WJJH=((__ITM_PROTOTYPE *)ptr__XJJH);
+      *(result__WJJH) = *(ITM_PROTOTYPE__);
     };
-    ((__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);
+    ((__ITM_PROTOTYPE *)result__WJJH)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=p__4JJH;
+    e__CSF=result__WJJH;
+    add_last__Q2U(result__DAIH,result__WJJH);
+    copy__H4H(result__DAIH);
   };
-  return(result__0QF);
+  return(result__DSF);
 }
 
-static void* read_expr__C2I(__PARSER *Self__D2I)
+static void* read_expr__L3I(__PARSER *Self__M3I)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__O3I,*value__P3I,*result__0CL,*expr__1CL,*__tmp__BGL;
+  void *__tmp__IHL,*__tmp__OIL;
+  __INTEGER p__W3I,typ_id__DA1C,typ_id__4KJH,typ_id__RLJH,typ_id__EMJH;
+  __INTEGER typ_id__RNJD,typ_id__P1JD,typ_id__EPJD,last_msg__5CL;
+  __INTEGER first_msg__ADL,typ_id__VNJH,typ_id__3PP,typ_id__UOJH;
+  __INTEGER index__JPJH,__tmp__HPJH,i__KPJH,typ_id__OPJH,__tmp__0F1C;
+  __INTEGER i__3HCD,typ_id__RUO,typ_id__EWO;
+  void *name__X3I,*n__3NJH,*n__UEP;
+  __POSITION p__AFRC,pos__2CYG,p__ELJH,pos__4CYG,pos__ADYG,__tmp__RCJ;
+  __POSITION p__KMJH,pos__EDYG,__tmp__SFJ,__tmp__2FJ,__tmp__FGJ,p__2NJH;
+  __POSITION pos__PDYG,p__TEP,__tmp__FGL,__tmp__LHL,__tmp__SIL;
+  __ITM_LIST_IDF *result__350C;
+  __POINTER ptr__450C,ptr_table__TKJH,next__SKJH,result__UKJH;
+  __POINTER ptr_table__YKJH,next__XKJH,result__ZKJH,ptr__3KJH;
+  __POINTER ptr_table__GLJH,next__FLJH,result__HLJH,ptr_table__LLJH;
+  __POINTER next__KLJH,result__MLJH,ptr__QLJH,ptr_table__ZLJH;
+  __POINTER next__YLJH,result__0LJH,ptr_table__4LJH,next__3LJH;
+  __POINTER result__5LJH,ptr__DMJH,ptr_table__MMJH,next__LMJH;
+  __POINTER result__NMJH,ptr_table__RMJH,next__QMJH,result__SMJH;
+  __POINTER ptr__MNJD,ptr_table__WMJH,next__VMJH,result__XMJH;
+  __POINTER ptr_table__1MJH,next__0MJH,result__2MJH,ptr__K1JD;
+  __POINTER ptr_table__ANJH,next__5MJH,result__BNJH,ptr_table__FNJH;
+  __POINTER next__ENJH,result__GNJH,ptr__5OJD,ptr_table__KNJH;
+  __POINTER next__JNJH,result__LNJH,ptr_table__PNJH,next__ONJH;
+  __POINTER result__QNJH,ptr__UNJH,ptr_table__5NJH,next__4NJH;
+  __POINTER result__AOJH,ptr_table__EOJH,next__DOJH,result__FOJH;
+  __POINTER ptr__YPP,ptr_table__JOJH,next__IOJH,result__KOJH;
+  __POINTER ptr_table__OOJH,next__NOJH,result__POJH,ptr__TOJH;
+  __POINTER ptr_table__2OJH,next__1OJH,result__3OJH,ptr_table__BPJH;
+  __POINTER next__APJH,result__CPJH,ptr__NPJH,ptr_table__WPJH;
+  __POINTER next__VPJH,result__XPJH,ptr_table__1PJH,next__0PJH;
+  __POINTER result__2PJH,ptr__MUO,ptr_table__AQJH,next__5PJH;
+  __POINTER result__BQJH,ptr_table__FQJH,next__EQJH,result__GQJH;
+  __POINTER ptr__5VO,ptr_table__KQJH,next__JQJH,result__LQJH;
+  __POINTER ptr_table__PQJH,next__OQJH,result__QQJH;
+  __UINTEGER_32 sz__AA1C,a__YFGH,new_size__ZFGH,t__3FGH,a__2FGH;
+  __UINTEGER_32 new_size__1KJH,lab_type__0KJH,sz__5KJH,a__ALJH;
+  __UINTEGER_32 new_size__BLJH,t__CLJH,a__DLJH,new_size__OLJH;
+  __UINTEGER_32 lab_type__NLJH,sz__SLJH,a__TLJH,new_size__ULJH,t__VLJH;
+  __UINTEGER_32 a__WLJH,new_size__BMJH,lab_type__AMJH,sz__FMJH,a__GMJH;
+  __UINTEGER_32 new_size__HMJH,t__IMJH,a__JMJH,new_size__UMJH;
+  __UINTEGER_32 lab_type__TMJH,sz__ONJD,a__ZUGH,new_size__0UGH,t__4UGH;
+  __UINTEGER_32 a__3UGH,new_size__4MJH,lab_type__3MJH,sz__M1JD,a__AGGH;
+  __UINTEGER_32 new_size__BGGH,t__FGGH,a__EGGH,new_size__INJH;
+  __UINTEGER_32 lab_type__HNJH,sz__BPJD,a__BVGH,new_size__CVGH,t__GVGH;
+  __UINTEGER_32 a__FVGH,new_size__SNJH,lab_type__RNJH,sz__WNJH,a__XNJH;
+  __UINTEGER_32 new_size__YNJH,t__ZNJH,a__0NJH,new_size__HOJH;
+  __UINTEGER_32 lab_type__GOJH,sz__0PP,a__RVGH,new_size__SVGH,t__WVGH;
+  __UINTEGER_32 a__VVGH,new_size__ROJH,lab_type__QOJH,sz__VOJH,a__WOJH;
+  __UINTEGER_32 new_size__XOJH,t__YOJH,a__ZOJH,new_size__EPJH;
+  __UINTEGER_32 lab_type__DPJH,sz__PPJH,a__QPJH,new_size__RPJH,t__SPJH;
+  __UINTEGER_32 a__TPJH,new_size__4PJH,lab_type__3PJH,sz__OUO,a__HWGH;
+  __UINTEGER_32 new_size__IWGH,t__MWGH,a__LWGH,new_size__IQJH;
+  __UINTEGER_32 lab_type__HQJH,sz__BWO,a__AIGH,new_size__BIGH,t__FIGH;
+  __UINTEGER_32 a__EIGH,new_size__SQJH,lab_type__RQJH;
+  __ITM_WRITE_VALUE *result__2KJH,*result__LNJD;
+  __ITM_WRITE_CAST *result__PLJH,*result__4OJD;
+  __ITM_READ *result__CMJH;
+  __ITM_WRITE_CODE *result__J1JD;
+  void *itm_op__4CL,*__tmp__CGL,*__tmp__JHL,*__tmp__PIL;
+  __ITM_OPERATOR *result__TNJH,*Self__1NJH,*result__XPP,*Self__TKV;
+  __ITM_READ_ARG1 *result__SOJH,*result__MPJH;
+  __ITM_READ_ARG2 *result__LUO;
+  __ITM_EXPRESSION *result__4VO;
+  __CHARACTER affect__Q3I,result__KKJH,result__NKJH,result__QKJH;
+  __BOOLEAN again__R3I,result__JKJH,result__MKJH,result__PKJH;
+  __BOOLEAN __tmp__1AJ,__tmp__3CJ,__tmp__BIL;
+  void *l_assignment__V3I,*result__32K,*result__0ERC;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__0S5,*Self__QT5;
+  void *result__S2H,*l_expr__2CL;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__XK4,*Self__NL4;
+  __FAST_ARRAYoITM_CODEo *Self__FPJH,*Self__QF1C;
+  void **__tmp__GPJH,**Self__IPJH,**__tmp__ZF1C,**Self__MHCD;
+  result__O3I=NULL;
+  value__P3I=NULL;
+  affect__Q3I='\0';
+  again__R3I=FALSE__;
+  l_assignment__V3I=NULL;
+  p__W3I= 0;
+  name__X3I=NULL;
+  old_position__QPI=position__CCC;
+  old_pos_cur__SPI=pos_cur__FCC;
+  old_pos_line__UPI=pos_line__GCC;
+  old_pos_col__WPI=pos_col__HCC;
+  old_short_derive__YPI=short_derive__PCC;
+  result__JKJH=FALSE__;
   if ((! read_space__KSD())) {
-    result__AGJH=FALSE__;
+    result__JKJH=FALSE__;
   } else {
-    result__BGJH='\0';
+    result__KKJH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BGJH=((__CHARACTER )(( 0)));
+      result__KKJH=((__CHARACTER )(( 0)));
     } else {
-      result__BGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__KKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__BGJH == '(')) {
+    if ((result__KKJH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__AGJH=TRUE__;
+      result__JKJH=TRUE__;
     };
   };
-  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);
+  if (result__JKJH) {
+    result__32K=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K)->parent_arrayed_collection__C3K.upper__WPU <  0)) {
+      result__32K=create_with_capacity__LHRC( 16);
     } else {
-      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);
+      Self__0S5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K);
+      result__32K=((void **)Self__0S5->parent_arrayed_collection__C3K.storage__GSU)[Self__0S5->parent_arrayed_collection__C3K.upper__WPU];
+      Self__QT5=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K);
+      Self__QT5->parent_arrayed_collection__C3K.upper__WPU=(__INTEGER)(Self__QT5->parent_arrayed_collection__C3K.upper__WPU -  1);
     };
-    l_assignment__M2I=result__U1K;
+    l_assignment__V3I=result__32K;
     do {
-      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);
+      again__R3I=FALSE__;
+      if (read_identifier__E4K()) {
+        p__W3I=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+        copy__35R(string_tmp2__O4I,last_string__V0C);
+        while (read_identifier__E4K()) {
+          append__FLS(string_tmp2__O4I,(&__string_112));
+          append__FLS(string_tmp2__O4I,last_string__V0C);
+        };
+        name__X3I=get__YWB(string_tmp2__O4I);
+        add_last__35OD(l_assignment__V3I,name__X3I);
         if (is_shorter__LZ) {
-          if ((! fast_has__Q5U(short_local__XCC,name__O2I))) {
-            short__token__to__YBD((&__string_131),p__N2I,position__CCC);
+          if ((! fast_has__ZAV(short_local__XCC,name__X3I))) {
+            short__token__to__YBD((&__string_131),p__W3I,position__CCC);
           };
         };
-        result__DGJH=FALSE__;
+        result__MKJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__DGJH=FALSE__;
+          result__MKJH=FALSE__;
         } else {
-          result__EGJH='\0';
+          result__NKJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__EGJH=((__CHARACTER )(( 0)));
+            result__NKJH=((__CHARACTER )(( 0)));
           } else {
-            result__EGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__NKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__EGJH == ',')) {
+          if ((result__NKJH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__DGJH=TRUE__;
+            result__MKJH=TRUE__;
           };
         };
-        if (result__DGJH) {
-          again__I2I=TRUE__;
+        if (result__MKJH) {
+          again__R3I=TRUE__;
         };
       };
-    } while (again__I2I);
-    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__U1K)->parent_arrayed_collection__L2I.upper__R4OD <  0))) {
-      result__GGJH=FALSE__;
+    } while (again__R3I);
+    if ((! (((__FAST_ARRAYoSTRING_CONSTANTo *)result__32K)->parent_arrayed_collection__U3I.upper__H4OD <  0))) {
+      result__PKJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__GGJH=FALSE__;
+        result__PKJH=FALSE__;
       } else {
-        result__HGJH='\0';
+        result__QKJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__HGJH=((__CHARACTER )(( 0)));
+          result__QKJH=((__CHARACTER )(( 0)));
         } else {
-          result__HGJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__QKJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__HGJH == ')')) {
+        if ((result__QKJH == ')')) {
           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)));
+          result__PKJH=TRUE__;
+        };
+      };
+      __tmp__1AJ=result__PKJH;
+    } else {
+      __tmp__1AJ=FALSE__;
+    };
+    if ((__tmp__1AJ && ((read_symbol__GVJ((&__string_12)) || read_symbol__GVJ((&__string_13))) || read_symbol__GVJ((&__string_14))))) {
+      result__0ERC=create_with_capacity__LHRC((__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)result__32K)->parent_arrayed_collection__U3I.upper__H4OD +  1));
+      copy__Q1RD(result__0ERC,result__32K);
+      free__WP5(result__32K);
+      l_assignment__V3I=result__0ERC;
+      p__AFRC=current_position__AWF();
+      result__350C=NULL;
+      ptr__450C=((__POINTER )(NULL));
+      typ_id__DA1C= 0;
+      sz__AA1C=((__UINTEGER_32 )sizeof(__ITM_LIST_IDF));
+      if ((sz__AA1C ==  0)) {
+        result__350C=ITM_LIST_IDF__;
+      } else {
+        typ_id__DA1C=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AA1C);
+        if ((typ_id__DA1C == (__INTEGER)(-  1))) {
+          a__YFGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__ZFGH=(__UINTEGER_32)((__UINTEGER_32)(sz__AA1C + a__YFGH) & (__UINTEGER_32)(~ a__YFGH));
+          ptr_table__TKJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZFGH / ((__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__ZPJ(new_size__ZFGH);
+            next__SKJH=(void *)((unsigned long)result__UKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFGH)));
+            ((__POINTER *)next__SKJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
+          } else {
+            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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZFGH <<  1)) <=  4096)) {
+                next__SKJH=(void *)((unsigned long)result__UKJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZFGH)));
               } else {
-                next__JGJH=new_lab__QOJ(new_size__QBGH);
+                next__SKJH=new_lab__ZPJ(new_size__ZFGH);
               };
-              ((__POINTER *)next__JGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__KGJH)[ 0]=next__JGJH;
+              ((__POINTER *)next__SKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__UKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__UKJH=next__SKJH;
+            };
+          };
+          ptr__450C=result__UKJH;
+        } else {
+          t__3FGH=((__UINTEGER_32 )typ_id__DA1C);
+          a__2FGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__1KJH=(__UINTEGER_32)((__UINTEGER_32)(sz__AA1C + a__2FGH) & (__UINTEGER_32)(~ a__2FGH));
+          ptr_table__YKJH=((__POINTER )(&(table_type[(t__3FGH)])));
+          lab_type__0KJH=(__UINTEGER_32)(t__3FGH |  1);
+          next__XKJH=((__POINTER )(NULL));
+          result__ZKJH=((__POINTER *)ptr_table__YKJH)[ 0];
+          if ((result__ZKJH == (void *)NULL)) {
+            result__ZKJH=new_lab__ZPJ(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__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__GUH)))) &  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__OGJH=new_lab__QOJ(lab_type__RGJH);
+                next__XKJH=new_lab__ZPJ(lab_type__0KJH);
               };
-              ((__POINTER *)next__OGJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PGJH)[ 0]=next__OGJH;
+              ((__POINTER *)next__XKJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YKJH)[ 0]=next__XKJH;
             } else {
-              ((__POINTER *)result__QGJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OGJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__QGJH=next__OGJH;
+              ((__POINTER *)result__ZKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZKJH=next__XKJH;
             };
           };
-          ptr__H40C=result__QGJH;
+          ptr__450C=result__ZKJH;
         };
-        result__G40C=((__ITM_LIST_IDF *)ptr__H40C);
-        *(result__G40C) = *(ITM_LIST_IDF__);
+        result__350C=((__ITM_LIST_IDF *)ptr__450C);
+        *(result__350C) = *(ITM_LIST_IDF__);
       };
-      ((__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)) {
+      ((__ITM_LIST_IDF *)result__350C)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ=p__AFRC;
+      result__O3I=result__350C;
+      affect__Q3I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[ 0];
+      value__P3I=read_expr__L3I(Self__M3I);
+      if (((void *)value__P3I == (void *)NULL)) {
+        pos__2CYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_240));
+        put_position__LNG(pos__2CYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      if ((affect__Q3I == ':')) {
+        p__ELJH=result__350C->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
+        result__2KJH=NULL;
+        ptr__3KJH=((__POINTER )(NULL));
+        typ_id__4KJH= 0;
+        sz__5KJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+        if ((sz__5KJH ==  0)) {
+          result__2KJH=ITM_WRITE_VALUE__;
+        } else {
+          typ_id__4KJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5KJH);
+          if ((typ_id__4KJH == (__INTEGER)(-  1))) {
+            a__ALJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5KJH + a__ALJH) & (__UINTEGER_32)(~ a__ALJH));
+            ptr_table__GLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BLJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__FLJH=((__POINTER )(NULL));
+            result__HLJH=((__POINTER *)ptr_table__GLJH)[ 0];
+            if ((result__HLJH == (void *)NULL)) {
+              result__HLJH=new_lab__ZPJ(new_size__BLJH);
+              next__FLJH=(void *)((unsigned long)result__HLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLJH)));
+              ((__POINTER *)next__FLJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__GLJH)[ 0]=next__FLJH;
             } 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__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)));
+              next__FLJH=((__POINTER *)result__HLJH)[ 0];
+              if ((next__FLJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HLJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BLJH <<  1)) <=  4096)) {
+                  next__FLJH=(void *)((unsigned long)result__HLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BLJH)));
                 } else {
-                  next__2GJH=new_lab__QOJ(new_size__YGJH);
+                  next__FLJH=new_lab__ZPJ(new_size__BLJH);
                 };
-                ((__POINTER *)next__2GJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__3GJH)[ 0]=next__2GJH;
+                ((__POINTER *)next__FLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__GLJH)[ 0]=next__FLJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__HLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__HLJH=next__FLJH;
+              };
+            };
+            ptr__3KJH=result__HLJH;
+          } else {
+            t__CLJH=((__UINTEGER_32 )typ_id__4KJH);
+            a__DLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OLJH=(__UINTEGER_32)((__UINTEGER_32)(sz__5KJH + a__DLJH) & (__UINTEGER_32)(~ a__DLJH));
+            ptr_table__LLJH=((__POINTER )(&(table_type[(t__CLJH)])));
+            lab_type__NLJH=(__UINTEGER_32)(t__CLJH |  1);
+            next__KLJH=((__POINTER )(NULL));
+            result__MLJH=((__POINTER *)ptr_table__LLJH)[ 0];
+            if ((result__MLJH == (void *)NULL)) {
+              result__MLJH=new_lab__ZPJ(lab_type__NLJH);
+              next__KLJH=(void *)((unsigned long)result__MLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLJH)));
+              ((__POINTER *)next__KLJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__LLJH)[ 0]=next__KLJH;
             } 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__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)));
+              next__KLJH=((__POINTER *)result__MLJH)[ 0];
+              if ((next__KLJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MLJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OLJH <<  1)) <=  4096)) {
+                  next__KLJH=(void *)((unsigned long)result__MLJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OLJH)));
                 } else {
-                  next__BHJH=new_lab__QOJ(lab_type__EHJH);
+                  next__KLJH=new_lab__ZPJ(lab_type__NLJH);
                 };
-                ((__POINTER *)next__BHJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__CHJH)[ 0]=next__BHJH;
+                ((__POINTER *)next__KLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LLJH)[ 0]=next__KLJH;
               } else {
-                ((__POINTER *)result__DHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__DHJH=next__BHJH;
+                ((__POINTER *)result__MLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__MLJH=next__KLJH;
               };
             };
-            ptr__UGJH=result__DHJH;
+            ptr__3KJH=result__MLJH;
           };
-          result__TGJH=((__ITM_WRITE_VALUE *)ptr__UGJH);
-          *(result__TGJH) = *(ITM_WRITE_VALUE__);
+          result__2KJH=((__ITM_WRITE_VALUE *)ptr__3KJH);
+          *(result__2KJH) = *(ITM_WRITE_VALUE__);
         };
-        ((__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;
+        ((__ITM_WRITE_VALUE *)result__2KJH)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ=p__ELJH;
+        result__O3I=result__2KJH;
       };
-      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)) {
+      if ((affect__Q3I == '<')) {
+        pos__4CYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_297));
+        put_position__LNG(pos__4CYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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)) {
+      if ((affect__Q3I == '?')) {
+        pos__ADYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_298));
+        put_position__LNG(pos__ADYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
-        switch (((struct ___OBJ *)result__F2I)->__id) {
+        switch (((struct ___OBJ *)result__O3I)->__id) {
         case __ITM_LIST__: {
-          __tmp__IBJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_LDOTS__: {
-          __tmp__IBJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_PROTOTYPE__: {
-          __tmp__IBJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_LIST_IDF__: {
-          __tmp__IBJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_WRITE_VALUE__: {
-          __tmp__IBJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_WRITE_CAST__: {
-          __tmp__IBJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_READ__: {
-          __tmp__IBJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_WRITE_CODE__: {
-          __tmp__IBJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_OPERATOR__: {
-          __tmp__IBJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_READ_ARG1__: {
-          __tmp__IBJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_READ_ARG2__: {
-          __tmp__IBJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_EXPRESSION__: {
-          __tmp__IBJ=position__054B(result__F2I);
+          __tmp__RCJ=position__GB5B(result__O3I);
         } break;
         case __ITM_OLD__: {
-          __tmp__IBJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_EXTERNAL_TYPE__: {
-          __tmp__IBJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_BLOCK__: {
-          __tmp__IBJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_EXTERNAL__: {
-          __tmp__IBJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_READ_ARGS__: {
-          __tmp__IBJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_REAL__: {
-          __tmp__IBJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_NUMBER__: {
-          __tmp__IBJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_CHARACTER__: {
-          __tmp__IBJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_STRING__: {
-          __tmp__IBJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+          __tmp__RCJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
         } break;
         case __ITM_RESULT__: {
-          __tmp__IBJ=position__2GHC(result__F2I);
+          __tmp__RCJ=position__QIHC(result__O3I);
         } break;
         };
-        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;
+        result__PLJH=NULL;
+        ptr__QLJH=((__POINTER )(NULL));
+        typ_id__RLJH= 0;
+        sz__SLJH=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+        if ((sz__SLJH ==  0)) {
+          result__PLJH=ITM_WRITE_CAST__;
+        } else {
+          typ_id__RLJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SLJH);
+          if ((typ_id__RLJH == (__INTEGER)(-  1))) {
+            a__TLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ULJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SLJH + a__TLJH) & (__UINTEGER_32)(~ a__TLJH));
+            ptr_table__ZLJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ULJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__YLJH=((__POINTER )(NULL));
+            result__0LJH=((__POINTER *)ptr_table__ZLJH)[ 0];
+            if ((result__0LJH == (void *)NULL)) {
+              result__0LJH=new_lab__ZPJ(new_size__ULJH);
+              next__YLJH=(void *)((unsigned long)result__0LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ULJH)));
+              ((__POINTER *)next__YLJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__ZLJH)[ 0]=next__YLJH;
             } else {
-              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)));
+              next__YLJH=((__POINTER *)result__0LJH)[ 0];
+              if ((next__YLJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0LJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ULJH <<  1)) <=  4096)) {
+                  next__YLJH=(void *)((unsigned long)result__0LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ULJH)));
                 } else {
-                  next__PHJH=new_lab__QOJ(new_size__LHJH);
+                  next__YLJH=new_lab__ZPJ(new_size__ULJH);
                 };
-                ((__POINTER *)next__PHJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__QHJH)[ 0]=next__PHJH;
+                ((__POINTER *)next__YLJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ZLJH)[ 0]=next__YLJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__0LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__0LJH=next__YLJH;
+              };
+            };
+            ptr__QLJH=result__0LJH;
+          } else {
+            t__VLJH=((__UINTEGER_32 )typ_id__RLJH);
+            a__WLJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__BMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SLJH + a__WLJH) & (__UINTEGER_32)(~ a__WLJH));
+            ptr_table__4LJH=((__POINTER )(&(table_type[(t__VLJH)])));
+            lab_type__AMJH=(__UINTEGER_32)(t__VLJH |  1);
+            next__3LJH=((__POINTER )(NULL));
+            result__5LJH=((__POINTER *)ptr_table__4LJH)[ 0];
+            if ((result__5LJH == (void *)NULL)) {
+              result__5LJH=new_lab__ZPJ(lab_type__AMJH);
+              next__3LJH=(void *)((unsigned long)result__5LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BMJH)));
+              ((__POINTER *)next__3LJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__4LJH)[ 0]=next__3LJH;
             } else {
-              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)));
+              next__3LJH=((__POINTER *)result__5LJH)[ 0];
+              if ((next__3LJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5LJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BMJH <<  1)) <=  4096)) {
+                  next__3LJH=(void *)((unsigned long)result__5LJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BMJH)));
                 } else {
-                  next__UHJH=new_lab__QOJ(lab_type__XHJH);
+                  next__3LJH=new_lab__ZPJ(lab_type__AMJH);
                 };
-                ((__POINTER *)next__UHJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__VHJH)[ 0]=next__UHJH;
+                ((__POINTER *)next__3LJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__4LJH)[ 0]=next__3LJH;
               } else {
-                ((__POINTER *)result__WHJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UHJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__WHJH=next__UHJH;
+                ((__POINTER *)result__5LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3LJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__5LJH=next__3LJH;
               };
             };
-            ptr__HHJH=result__WHJH;
+            ptr__QLJH=result__5LJH;
           };
-          result__GHJH=((__ITM_WRITE_CAST *)ptr__HHJH);
-          *(result__GHJH) = *(ITM_WRITE_CAST__);
+          result__PLJH=((__ITM_WRITE_CAST *)ptr__QLJH);
+          *(result__PLJH) = *(ITM_WRITE_CAST__);
         };
-        ((__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;
+        ((__ITM_WRITE_CAST *)result__PLJH)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ=__tmp__RCJ;
+        result__O3I=result__PLJH;
       };
     } else {
-      free__NO5(l_assignment__M2I);
+      free__WP5(l_assignment__V3I);
     };
-    __tmp__UBJ=TRUE__;
+    __tmp__3CJ=TRUE__;
   } else {
-    __tmp__UBJ=FALSE__;
+    __tmp__3CJ=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);
+  if ((! __tmp__3CJ)) {
+    if (read_identifier__E4K()) {
+      p__W3I=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+      copy__35R(string_tmp2__O4I,last_string__V0C);
+      while (read_identifier__E4K()) {
+        append__FLS(string_tmp2__O4I,(&__string_112));
+        append__FLS(string_tmp2__O4I,last_string__V0C);
       };
-      name__O2I=get__YWB(string_tmp2__F3I);
+      name__X3I=get__YWB(string_tmp2__O4I);
       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;
+        if ((! fast_has__ZAV(short_local__XCC,name__X3I))) {
+          short__token__to__YBD((&__string_131),p__W3I,position__CCC);
+        };
+      };
+      if (((read_symbol__GVJ((&__string_12)) || read_symbol__GVJ((&__string_13))) || read_symbol__GVJ((&__string_14)))) {
+        p__KMJH=current_position__AWF();
+        result__CMJH=NULL;
+        ptr__DMJH=((__POINTER )(NULL));
+        typ_id__EMJH= 0;
+        sz__FMJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__FMJH ==  0)) {
+          result__CMJH=ITM_READ__;
+        } else {
+          typ_id__EMJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FMJH);
+          if ((typ_id__EMJH == (__INTEGER)(-  1))) {
+            a__GMJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__HMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FMJH + a__GMJH) & (__UINTEGER_32)(~ a__GMJH));
+            ptr_table__MMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HMJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__LMJH=((__POINTER )(NULL));
+            result__NMJH=((__POINTER *)ptr_table__MMJH)[ 0];
+            if ((result__NMJH == (void *)NULL)) {
+              result__NMJH=new_lab__ZPJ(new_size__HMJH);
+              next__LMJH=(void *)((unsigned long)result__NMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMJH)));
+              ((__POINTER *)next__LMJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MMJH)[ 0]=next__LMJH;
             } else {
-              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)));
+              next__LMJH=((__POINTER *)result__NMJH)[ 0];
+              if ((next__LMJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NMJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HMJH <<  1)) <=  4096)) {
+                  next__LMJH=(void *)((unsigned long)result__NMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HMJH)));
                 } else {
-                  next__CIJH=new_lab__QOJ(new_size__4HJH);
+                  next__LMJH=new_lab__ZPJ(new_size__HMJH);
                 };
-                ((__POINTER *)next__CIJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__DIJH)[ 0]=next__CIJH;
+                ((__POINTER *)next__LMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MMJH)[ 0]=next__LMJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__NMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__NMJH=next__LMJH;
+              };
+            };
+            ptr__DMJH=result__NMJH;
+          } else {
+            t__IMJH=((__UINTEGER_32 )typ_id__EMJH);
+            a__JMJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__UMJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FMJH + a__JMJH) & (__UINTEGER_32)(~ a__JMJH));
+            ptr_table__RMJH=((__POINTER )(&(table_type[(t__IMJH)])));
+            lab_type__TMJH=(__UINTEGER_32)(t__IMJH |  1);
+            next__QMJH=((__POINTER )(NULL));
+            result__SMJH=((__POINTER *)ptr_table__RMJH)[ 0];
+            if ((result__SMJH == (void *)NULL)) {
+              result__SMJH=new_lab__ZPJ(lab_type__TMJH);
+              next__QMJH=(void *)((unsigned long)result__SMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMJH)));
+              ((__POINTER *)next__QMJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RMJH)[ 0]=next__QMJH;
             } else {
-              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)));
+              next__QMJH=((__POINTER *)result__SMJH)[ 0];
+              if ((next__QMJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SMJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UMJH <<  1)) <=  4096)) {
+                  next__QMJH=(void *)((unsigned long)result__SMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UMJH)));
                 } else {
-                  next__HIJH=new_lab__QOJ(lab_type__KIJH);
+                  next__QMJH=new_lab__ZPJ(lab_type__TMJH);
                 };
-                ((__POINTER *)next__HIJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IIJH)[ 0]=next__HIJH;
+                ((__POINTER *)next__QMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RMJH)[ 0]=next__QMJH;
               } else {
-                ((__POINTER *)result__JIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__JIJH=next__HIJH;
+                ((__POINTER *)result__SMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SMJH=next__QMJH;
               };
             };
-            ptr__0HJH=result__JIJH;
+            ptr__DMJH=result__SMJH;
           };
-          result__ZHJH=((__ITM_READ *)ptr__0HJH);
-          *(result__ZHJH) = *(ITM_READ__);
+          result__CMJH=((__ITM_READ *)ptr__DMJH);
+          *(result__CMJH) = *(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)) {
+        ((__ITM_READ *)result__CMJH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__KMJH;
+        result__O3I=result__CMJH;
+        affect__Q3I=((__CHARACTER *)((__STRING_CONSTANT *)last_string__V0C)->storage__ZNO)[ 0];
+        value__P3I=read_expr__L3I(Self__M3I);
+        if (((void *)value__P3I == (void *)NULL)) {
+          pos__EDYG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_240));
+          put_position__LNG(pos__EDYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if ((affect__Q3I == ':')) {
+          __tmp__SFJ=result__CMJH->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
+          result__LNJD=NULL;
+          ptr__MNJD=((__POINTER )(NULL));
+          typ_id__RNJD= 0;
+          sz__ONJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_VALUE));
+          if ((sz__ONJD ==  0)) {
+            result__LNJD=ITM_WRITE_VALUE__;
+          } else {
+            typ_id__RNJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ONJD);
+            if ((typ_id__RNJD == (__INTEGER)(-  1))) {
+              a__ZUGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__0UGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONJD + a__ZUGH) & (__UINTEGER_32)(~ a__ZUGH));
+              ptr_table__WMJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0UGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__VMJH=((__POINTER )(NULL));
+              result__XMJH=((__POINTER *)ptr_table__WMJH)[ 0];
+              if ((result__XMJH == (void *)NULL)) {
+                result__XMJH=new_lab__ZPJ(new_size__0UGH);
+                next__VMJH=(void *)((unsigned long)result__XMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UGH)));
+                ((__POINTER *)next__VMJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WMJH)[ 0]=next__VMJH;
               } else {
-                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)));
+                next__VMJH=((__POINTER *)result__XMJH)[ 0];
+                if ((next__VMJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XMJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0UGH <<  1)) <=  4096)) {
+                    next__VMJH=(void *)((unsigned long)result__XMJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0UGH)));
                   } else {
-                    next__MIJH=new_lab__QOJ(new_size__RQGH);
+                    next__VMJH=new_lab__ZPJ(new_size__0UGH);
                   };
-                  ((__POINTER *)next__MIJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NIJH)[ 0]=next__MIJH;
+                  ((__POINTER *)next__VMJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WMJH)[ 0]=next__VMJH;
                 } else {
-                  ((__POINTER *)result__OIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__OIJH=next__MIJH;
+                  ((__POINTER *)result__XMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XMJH=next__VMJH;
                 };
               };
-              ptr__ENJD=result__OIJH;
+              ptr__MNJD=result__XMJH;
             } else {
-              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;
+              t__4UGH=((__UINTEGER_32 )typ_id__RNJD);
+              a__3UGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__4MJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ONJD + a__3UGH) & (__UINTEGER_32)(~ a__3UGH));
+              ptr_table__1MJH=((__POINTER )(&(table_type[(t__4UGH)])));
+              lab_type__3MJH=(__UINTEGER_32)(t__4UGH |  1);
+              next__0MJH=((__POINTER )(NULL));
+              result__2MJH=((__POINTER *)ptr_table__1MJH)[ 0];
+              if ((result__2MJH == (void *)NULL)) {
+                result__2MJH=new_lab__ZPJ(lab_type__3MJH);
+                next__0MJH=(void *)((unsigned long)result__2MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4MJH)));
+                ((__POINTER *)next__0MJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1MJH)[ 0]=next__0MJH;
               } else {
-                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)));
+                next__0MJH=((__POINTER *)result__2MJH)[ 0];
+                if ((next__0MJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2MJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4MJH <<  1)) <=  4096)) {
+                    next__0MJH=(void *)((unsigned long)result__2MJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4MJH)));
                   } else {
-                    next__RIJH=new_lab__QOJ(lab_type__UIJH);
+                    next__0MJH=new_lab__ZPJ(lab_type__3MJH);
                   };
-                  ((__POINTER *)next__RIJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SIJH)[ 0]=next__RIJH;
+                  ((__POINTER *)next__0MJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1MJH)[ 0]=next__0MJH;
                 } else {
-                  ((__POINTER *)result__TIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TIJH=next__RIJH;
+                  ((__POINTER *)result__2MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2MJH=next__0MJH;
                 };
               };
-              ptr__ENJD=result__TIJH;
+              ptr__MNJD=result__2MJH;
             };
-            result__DNJD=((__ITM_WRITE_VALUE *)ptr__ENJD);
-            *(result__DNJD) = *(ITM_WRITE_VALUE__);
+            result__LNJD=((__ITM_WRITE_VALUE *)ptr__MNJD);
+            *(result__LNJD) = *(ITM_WRITE_VALUE__);
           };
-          ((__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;
+          ((__ITM_WRITE_VALUE *)result__LNJD)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ=__tmp__SFJ;
+          result__O3I=result__LNJD;
         };
-        if ((affect__H2I == '<')) {
-          switch (((struct ___OBJ *)result__F2I)->__id) {
+        if ((affect__Q3I == '<')) {
+          switch (((struct ___OBJ *)result__O3I)->__id) {
           case __ITM_LIST__: {
-            __tmp__TEJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__TEJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__TEJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__TEJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__TEJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__TEJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ__: {
-            __tmp__TEJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__TEJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__TEJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__TEJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__TEJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__TEJ=position__054B(result__F2I);
+            __tmp__2FJ=position__GB5B(result__O3I);
           } break;
           case __ITM_OLD__: {
-            __tmp__TEJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__TEJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__TEJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__TEJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__TEJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__TEJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__TEJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__TEJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__TEJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__2FJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__TEJ=position__2GHC(result__F2I);
+            __tmp__2FJ=position__QIHC(result__O3I);
           } break;
           };
-          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;
+          result__J1JD=NULL;
+          ptr__K1JD=((__POINTER )(NULL));
+          typ_id__P1JD= 0;
+          sz__M1JD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CODE));
+          if ((sz__M1JD ==  0)) {
+            result__J1JD=ITM_WRITE_CODE__;
+          } else {
+            typ_id__P1JD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__M1JD);
+            if ((typ_id__P1JD == (__INTEGER)(-  1))) {
+              a__AGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BGGH=(__UINTEGER_32)((__UINTEGER_32)(sz__M1JD + a__AGGH) & (__UINTEGER_32)(~ a__AGGH));
+              ptr_table__ANJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BGGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__5MJH=((__POINTER )(NULL));
+              result__BNJH=((__POINTER *)ptr_table__ANJH)[ 0];
+              if ((result__BNJH == (void *)NULL)) {
+                result__BNJH=new_lab__ZPJ(new_size__BGGH);
+                next__5MJH=(void *)((unsigned long)result__BNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BGGH)));
+                ((__POINTER *)next__5MJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
               } else {
-                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)));
+                next__5MJH=((__POINTER *)result__BNJH)[ 0];
+                if ((next__5MJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BNJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BGGH <<  1)) <=  4096)) {
+                    next__5MJH=(void *)((unsigned long)result__BNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BGGH)));
                   } else {
-                    next__WIJH=new_lab__QOJ(new_size__YBGH);
+                    next__5MJH=new_lab__ZPJ(new_size__BGGH);
                   };
-                  ((__POINTER *)next__WIJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XIJH)[ 0]=next__WIJH;
+                  ((__POINTER *)next__5MJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__ANJH)[ 0]=next__5MJH;
                 } else {
-                  ((__POINTER *)result__YIJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WIJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YIJH=next__WIJH;
+                  ((__POINTER *)result__BNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5MJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__BNJH=next__5MJH;
                 };
               };
-              ptr__C1JD=result__YIJH;
+              ptr__K1JD=result__BNJH;
             } else {
-              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;
+              t__FGGH=((__UINTEGER_32 )typ_id__P1JD);
+              a__EGGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__INJH=(__UINTEGER_32)((__UINTEGER_32)(sz__M1JD + a__EGGH) & (__UINTEGER_32)(~ a__EGGH));
+              ptr_table__FNJH=((__POINTER )(&(table_type[(t__FGGH)])));
+              lab_type__HNJH=(__UINTEGER_32)(t__FGGH |  1);
+              next__ENJH=((__POINTER )(NULL));
+              result__GNJH=((__POINTER *)ptr_table__FNJH)[ 0];
+              if ((result__GNJH == (void *)NULL)) {
+                result__GNJH=new_lab__ZPJ(lab_type__HNJH);
+                next__ENJH=(void *)((unsigned long)result__GNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INJH)));
+                ((__POINTER *)next__ENJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FNJH)[ 0]=next__ENJH;
               } else {
-                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)));
+                next__ENJH=((__POINTER *)result__GNJH)[ 0];
+                if ((next__ENJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GNJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__INJH <<  1)) <=  4096)) {
+                    next__ENJH=(void *)((unsigned long)result__GNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__INJH)));
                   } else {
-                    next__1IJH=new_lab__QOJ(lab_type__4IJH);
+                    next__ENJH=new_lab__ZPJ(lab_type__HNJH);
                   };
-                  ((__POINTER *)next__1IJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2IJH)[ 0]=next__1IJH;
+                  ((__POINTER *)next__ENJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FNJH)[ 0]=next__ENJH;
                 } else {
-                  ((__POINTER *)result__3IJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1IJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__3IJH=next__1IJH;
+                  ((__POINTER *)result__GNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ENJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__GNJH=next__ENJH;
                 };
               };
-              ptr__C1JD=result__3IJH;
+              ptr__K1JD=result__GNJH;
             };
-            result__B1JD=((__ITM_WRITE_CODE *)ptr__C1JD);
-            *(result__B1JD) = *(ITM_WRITE_CODE__);
+            result__J1JD=((__ITM_WRITE_CODE *)ptr__K1JD);
+            *(result__J1JD) = *(ITM_WRITE_CODE__);
           };
-          ((__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;
+          ((__ITM_WRITE_CODE *)result__J1JD)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ=__tmp__2FJ;
+          result__O3I=result__J1JD;
         };
-        if ((affect__H2I == '?')) {
-          switch (((struct ___OBJ *)result__F2I)->__id) {
+        if ((affect__Q3I == '?')) {
+          switch (((struct ___OBJ *)result__O3I)->__id) {
           case __ITM_LIST__: {
-            __tmp__2EJ=((__ITM_LIST *)result__F2I)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_LIST *)result__O3I)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__2EJ=((__ITM_LDOTS *)result__F2I)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_LDOTS *)result__O3I)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__2EJ=((__ITM_PROTOTYPE *)result__F2I)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_PROTOTYPE *)result__O3I)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__2EJ=((__ITM_LIST_IDF *)result__F2I)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_LIST_IDF *)result__O3I)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__2EJ=((__ITM_WRITE_VALUE *)result__F2I)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_WRITE_VALUE *)result__O3I)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__2EJ=((__ITM_WRITE_CAST *)result__F2I)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_WRITE_CAST *)result__O3I)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ__: {
-            __tmp__2EJ=((__ITM_READ *)result__F2I)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_READ *)result__O3I)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__2EJ=((__ITM_WRITE_CODE *)result__F2I)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_WRITE_CODE *)result__O3I)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__2EJ=((__ITM_OPERATOR *)result__F2I)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_OPERATOR *)result__O3I)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__2EJ=((__ITM_READ_ARG1 *)result__F2I)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_READ_ARG1 *)result__O3I)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__2EJ=((__ITM_READ_ARG2 *)result__F2I)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_READ_ARG2 *)result__O3I)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__2EJ=position__054B(result__F2I);
+            __tmp__FGJ=position__GB5B(result__O3I);
           } break;
           case __ITM_OLD__: {
-            __tmp__2EJ=((__ITM_OLD *)result__F2I)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_OLD *)result__O3I)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__2EJ=((__ITM_EXTERNAL_TYPE *)result__F2I)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_EXTERNAL_TYPE *)result__O3I)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__2EJ=((__ITM_LIST *)((__ITM_BLOCK *)result__F2I)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_LIST *)((__ITM_BLOCK *)result__O3I)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__2EJ=((__ITM_EXTERNAL *)result__F2I)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_EXTERNAL *)result__O3I)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__2EJ=((__ITM_READ_ARGS *)result__F2I)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_READ_ARGS *)result__O3I)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_REAL__: {
-            __tmp__2EJ=((__ITM_REAL *)result__F2I)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_REAL *)result__O3I)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__2EJ=((__ITM_NUMBER *)result__F2I)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_NUMBER *)result__O3I)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__2EJ=((__ITM_CHARACTER *)result__F2I)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_CHARACTER *)result__O3I)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_STRING__: {
-            __tmp__2EJ=((__ITM_STRING *)result__F2I)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+            __tmp__FGJ=((__ITM_STRING *)result__O3I)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
           } break;
           case __ITM_RESULT__: {
-            __tmp__2EJ=position__2GHC(result__F2I);
+            __tmp__FGJ=position__QIHC(result__O3I);
           } break;
           };
-          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;
+          result__4OJD=NULL;
+          ptr__5OJD=((__POINTER )(NULL));
+          typ_id__EPJD= 0;
+          sz__BPJD=((__UINTEGER_32 )sizeof(__ITM_WRITE_CAST));
+          if ((sz__BPJD ==  0)) {
+            result__4OJD=ITM_WRITE_CAST__;
+          } else {
+            typ_id__EPJD=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BPJD);
+            if ((typ_id__EPJD == (__INTEGER)(-  1))) {
+              a__BVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BPJD + a__BVGH) & (__UINTEGER_32)(~ a__BVGH));
+              ptr_table__KNJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JNJH=((__POINTER )(NULL));
+              result__LNJH=((__POINTER *)ptr_table__KNJH)[ 0];
+              if ((result__LNJH == (void *)NULL)) {
+                result__LNJH=new_lab__ZPJ(new_size__CVGH);
+                next__JNJH=(void *)((unsigned long)result__LNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVGH)));
+                ((__POINTER *)next__JNJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
               } else {
-                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)));
+                next__JNJH=((__POINTER *)result__LNJH)[ 0];
+                if ((next__JNJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LNJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CVGH <<  1)) <=  4096)) {
+                    next__JNJH=(void *)((unsigned long)result__LNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CVGH)));
                   } else {
-                    next__AJJH=new_lab__QOJ(new_size__ZQGH);
+                    next__JNJH=new_lab__ZPJ(new_size__CVGH);
                   };
-                  ((__POINTER *)next__AJJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BJJH)[ 0]=next__AJJH;
+                  ((__POINTER *)next__JNJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KNJH)[ 0]=next__JNJH;
                 } else {
-                  ((__POINTER *)result__CJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CJJH=next__AJJH;
+                  ((__POINTER *)result__LNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LNJH=next__JNJH;
                 };
               };
-              ptr__XOJD=result__CJJH;
+              ptr__5OJD=result__LNJH;
             } else {
-              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;
+              t__GVGH=((__UINTEGER_32 )typ_id__EPJD);
+              a__FVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BPJD + a__FVGH) & (__UINTEGER_32)(~ a__FVGH));
+              ptr_table__PNJH=((__POINTER )(&(table_type[(t__GVGH)])));
+              lab_type__RNJH=(__UINTEGER_32)(t__GVGH |  1);
+              next__ONJH=((__POINTER )(NULL));
+              result__QNJH=((__POINTER *)ptr_table__PNJH)[ 0];
+              if ((result__QNJH == (void *)NULL)) {
+                result__QNJH=new_lab__ZPJ(lab_type__RNJH);
+                next__ONJH=(void *)((unsigned long)result__QNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNJH)));
+                ((__POINTER *)next__ONJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PNJH)[ 0]=next__ONJH;
               } else {
-                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)));
+                next__ONJH=((__POINTER *)result__QNJH)[ 0];
+                if ((next__ONJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QNJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SNJH <<  1)) <=  4096)) {
+                    next__ONJH=(void *)((unsigned long)result__QNJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SNJH)));
                   } else {
-                    next__FJJH=new_lab__QOJ(lab_type__IJJH);
+                    next__ONJH=new_lab__ZPJ(lab_type__RNJH);
                   };
-                  ((__POINTER *)next__FJJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GJJH)[ 0]=next__FJJH;
+                  ((__POINTER *)next__ONJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PNJH)[ 0]=next__ONJH;
                 } else {
-                  ((__POINTER *)result__HJJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FJJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HJJH=next__FJJH;
+                  ((__POINTER *)result__QNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ONJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QNJH=next__ONJH;
                 };
               };
-              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)));
+              ptr__5OJD=result__QNJH;
+            };
+            result__4OJD=((__ITM_WRITE_CAST *)ptr__5OJD);
+            *(result__4OJD) = *(ITM_WRITE_CAST__);
+          };
+          ((__ITM_WRITE_CAST *)result__4OJD)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ=__tmp__FGJ;
+          result__O3I=result__4OJD;
+        };
+      };
+    };
+  };
+  if (((void *)result__O3I == (void *)NULL)) {
+    restore_context__MBL();
+    result__0CL=NULL;
+    expr__1CL=NULL;
+    itm_op__4CL=NULL;
+    last_msg__5CL= 0;
+    first_msg__ADL= 0;
+    result__S2H=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H)->parent_arrayed_collection__X2H.upper__MTT <  0)) {
+      result__S2H=create_with_capacity__5TI( 16);
+    } else {
+      Self__XK4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      result__S2H=((void **)Self__XK4->parent_arrayed_collection__X2H.storage__03T)[Self__XK4->parent_arrayed_collection__X2H.upper__MTT];
+      Self__NL4=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      Self__NL4->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__NL4->parent_arrayed_collection__X2H.upper__MTT -  1);
+    };
+    l_expr__2CL=result__S2H;
+    while (read_operator__OKM()) {
+      p__2NJH=current_position__AWF();
+      n__3NJH=last_string__V0C;
+      result__TNJH=NULL;
+      ptr__UNJH=((__POINTER )(NULL));
+      typ_id__VNJH= 0;
+      sz__WNJH=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+      if ((sz__WNJH ==  0)) {
+        result__TNJH=ITM_OPERATOR__;
+      } else {
+        typ_id__VNJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__WNJH);
+        if ((typ_id__VNJH == (__INTEGER)(-  1))) {
+          a__XNJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__YNJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WNJH + a__XNJH) & (__UINTEGER_32)(~ a__XNJH));
+          ptr_table__5NJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__YNJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__4NJH=((__POINTER )(NULL));
+          result__AOJH=((__POINTER *)ptr_table__5NJH)[ 0];
+          if ((result__AOJH == (void *)NULL)) {
+            result__AOJH=new_lab__ZPJ(new_size__YNJH);
+            next__4NJH=(void *)((unsigned long)result__AOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YNJH)));
+            ((__POINTER *)next__4NJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__5NJH)[ 0]=next__4NJH;
+          } else {
+            next__4NJH=((__POINTER *)result__AOJH)[ 0];
+            if ((next__4NJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AOJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YNJH <<  1)) <=  4096)) {
+                next__4NJH=(void *)((unsigned long)result__AOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YNJH)));
               } else {
-                next__VJJH=new_lab__QOJ(new_size__PJJH);
+                next__4NJH=new_lab__ZPJ(new_size__YNJH);
               };
-              ((__POINTER *)next__VJJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__WJJH)[ 0]=next__VJJH;
+              ((__POINTER *)next__4NJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5NJH)[ 0]=next__4NJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__AOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4NJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__AOJH=next__4NJH;
+            };
+          };
+          ptr__UNJH=result__AOJH;
+        } else {
+          t__ZNJH=((__UINTEGER_32 )typ_id__VNJH);
+          a__0NJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__HOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__WNJH + a__0NJH) & (__UINTEGER_32)(~ a__0NJH));
+          ptr_table__EOJH=((__POINTER )(&(table_type[(t__ZNJH)])));
+          lab_type__GOJH=(__UINTEGER_32)(t__ZNJH |  1);
+          next__DOJH=((__POINTER )(NULL));
+          result__FOJH=((__POINTER *)ptr_table__EOJH)[ 0];
+          if ((result__FOJH == (void *)NULL)) {
+            result__FOJH=new_lab__ZPJ(lab_type__GOJH);
+            next__DOJH=(void *)((unsigned long)result__FOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOJH)));
+            ((__POINTER *)next__DOJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__EOJH)[ 0]=next__DOJH;
+          } else {
+            next__DOJH=((__POINTER *)result__FOJH)[ 0];
+            if ((next__DOJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FOJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HOJH <<  1)) <=  4096)) {
+                next__DOJH=(void *)((unsigned long)result__FOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HOJH)));
               } else {
-                next__0JJH=new_lab__QOJ(lab_type__3JJH);
+                next__DOJH=new_lab__ZPJ(lab_type__GOJH);
               };
-              ((__POINTER *)next__0JJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__1JJH)[ 0]=next__0JJH;
+              ((__POINTER *)next__DOJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EOJH)[ 0]=next__DOJH;
             } else {
-              ((__POINTER *)result__2JJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__2JJH=next__0JJH;
+              ((__POINTER *)result__FOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__FOJH=next__DOJH;
             };
           };
-          ptr__LJJH=result__2JJH;
+          ptr__UNJH=result__FOJH;
         };
-        result__KJJH=((__ITM_OPERATOR *)ptr__LJJH);
-        *(result__KJJH) = *(ITM_OPERATOR__);
+        result__TNJH=((__ITM_OPERATOR *)ptr__UNJH);
+        *(result__TNJH) = *(ITM_OPERATOR__);
       };
-      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);
+      Self__1NJH=((__ITM_OPERATOR *)result__TNJH);
+      Self__1NJH->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ=p__2NJH;
+      Self__1NJH->name__IGL=n__3NJH;
+      expr__1CL=result__TNJH;
+      add_last__Q2U(l_expr__2CL,result__TNJH);
     };
-    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)) {
+    expr__1CL=read_expr_message__TTL(Self__M3I);
+    if (((void *)expr__1CL == (void *)NULL)) {
+      if ((! (((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.upper__VFL <  0))) {
+        pos__PDYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_240));
+        put_position__LNG(pos__PDYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      free__2SI(result__J1H);
+      free__FUI(result__S2H);
     } else {
-      first_msg__XBL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__J1H)->parent_arrayed_collection__5QF.upper__MEL +  1);
+      first_msg__ADL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.upper__VFL +  1);
       do {
-        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()) {
+        last_msg__5CL=(__INTEGER)(((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.upper__VFL +  1);
+        add_last__Q2U(l_expr__2CL,expr__1CL);
+        if (read_operator__OKM()) {
           do {
-            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__;
+            p__TEP=current_position__AWF();
+            n__UEP=last_string__V0C;
+            result__XPP=NULL;
+            ptr__YPP=((__POINTER )(NULL));
+            typ_id__3PP= 0;
+            sz__0PP=((__UINTEGER_32 )sizeof(__ITM_OPERATOR));
+            if ((sz__0PP ==  0)) {
+              result__XPP=ITM_OPERATOR__;
             } else {
-              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;
+              typ_id__3PP=-1;
+              clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0PP);
+              if ((typ_id__3PP == (__INTEGER)(-  1))) {
+                a__RVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__SVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0PP + a__RVGH) & (__UINTEGER_32)(~ a__RVGH));
+                ptr_table__JOJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                next__IOJH=((__POINTER )(NULL));
+                result__KOJH=((__POINTER *)ptr_table__JOJH)[ 0];
+                if ((result__KOJH == (void *)NULL)) {
+                  result__KOJH=new_lab__ZPJ(new_size__SVGH);
+                  next__IOJH=(void *)((unsigned long)result__KOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVGH)));
+                  ((__POINTER *)next__IOJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__JOJH)[ 0]=next__IOJH;
                 } else {
-                  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)));
+                  next__IOJH=((__POINTER *)result__KOJH)[ 0];
+                  if ((next__IOJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KOJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SVGH <<  1)) <=  4096)) {
+                      next__IOJH=(void *)((unsigned long)result__KOJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SVGH)));
                     } else {
-                      next__5JJH=new_lab__QOJ(new_size__JRGH);
+                      next__IOJH=new_lab__ZPJ(new_size__SVGH);
                     };
-                    ((__POINTER *)next__5JJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__AKJH)[ 0]=next__5JJH;
+                    ((__POINTER *)next__IOJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__JOJH)[ 0]=next__IOJH;
                   } else {
-                    ((__POINTER *)result__BKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5JJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__BKJH=next__5JJH;
+                    ((__POINTER *)result__KOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__KOJH=next__IOJH;
                   };
                 };
-                ptr__POP=result__BKJH;
+                ptr__YPP=result__KOJH;
               } else {
-                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;
+                t__WVGH=((__UINTEGER_32 )typ_id__3PP);
+                a__VVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                new_size__ROJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0PP + a__VVGH) & (__UINTEGER_32)(~ a__VVGH));
+                ptr_table__OOJH=((__POINTER )(&(table_type[(t__WVGH)])));
+                lab_type__QOJH=(__UINTEGER_32)(t__WVGH |  1);
+                next__NOJH=((__POINTER )(NULL));
+                result__POJH=((__POINTER *)ptr_table__OOJH)[ 0];
+                if ((result__POJH == (void *)NULL)) {
+                  result__POJH=new_lab__ZPJ(lab_type__QOJH);
+                  next__NOJH=(void *)((unsigned long)result__POJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ROJH)));
+                  ((__POINTER *)next__NOJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__OOJH)[ 0]=next__NOJH;
                 } else {
-                  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)));
+                  next__NOJH=((__POINTER *)result__POJH)[ 0];
+                  if ((next__NOJH == (void *)NULL)) {
+                    if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__POJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ROJH <<  1)) <=  4096)) {
+                      next__NOJH=(void *)((unsigned long)result__POJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ROJH)));
                     } else {
-                      next__EKJH=new_lab__QOJ(lab_type__HKJH);
+                      next__NOJH=new_lab__ZPJ(lab_type__QOJH);
                     };
-                    ((__POINTER *)next__EKJH)[ 0]=NULL;
-                    ((__POINTER *)ptr_table__FKJH)[ 0]=next__EKJH;
+                    ((__POINTER *)next__NOJH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__OOJH)[ 0]=next__NOJH;
                   } else {
-                    ((__POINTER *)result__GKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                    result__GKJH=next__EKJH;
+                    ((__POINTER *)result__POJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                    result__POJH=next__NOJH;
                   };
                 };
-                ptr__POP=result__GKJH;
+                ptr__YPP=result__POJH;
               };
-              result__OOP=((__ITM_OPERATOR *)ptr__POP);
-              *(result__OOP) = *(ITM_OPERATOR__);
+              result__XPP=((__ITM_OPERATOR *)ptr__YPP);
+              *(result__XPP) = *(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);
+            Self__TKV=((__ITM_OPERATOR *)result__XPP);
+            Self__TKV->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ=p__TEP;
+            Self__TKV->name__IGL=n__UEP;
+            expr__1CL=result__XPP;
+            add_last__Q2U(l_expr__2CL,result__XPP);
+          } while (read_operator__OKM());
+          expr__1CL=read_expr_message__TTL(Self__M3I);
         } else {
-          expr__SBL=NULL;
+          expr__1CL=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;
+      } while (((void *)expr__1CL != (void *)NULL));
+      while ((last_msg__5CL < ((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.upper__VFL)) {
+        __tmp__BGL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.storage__JVT)[(__INTEGER)(last_msg__5CL +  1)];
+        if (__tmp__BGL==NULL) {
+          __tmp__CGL=NULL;
         } else {
-          switch (((struct ___OBJ *)__tmp__YEL)->__id) {
+          switch (((struct ___OBJ *)__tmp__BGL)->__id) {
           case __ITM_LIST__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_LDOTS__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_PROTOTYPE__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_LIST_IDF__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_WRITE_VALUE__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_WRITE_CAST__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_READ__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_WRITE_CODE__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_OPERATOR__: {
-            __tmp__ZEL=((void *)__tmp__YEL);
+            __tmp__CGL=((void *)__tmp__BGL);
           } break;
           case __ITM_READ_ARG1__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_READ_ARG2__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_EXPRESSION__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_OLD__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_EXTERNAL_TYPE__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_BLOCK__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_EXTERNAL__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_READ_ARGS__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_REAL__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_NUMBER__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_CHARACTER__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_STRING__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           case __ITM_RESULT__: {
-            __tmp__ZEL=NULL;
+            __tmp__CGL=NULL;
           } break;
           }
         };
-        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;
+        itm_op__4CL=__tmp__CGL;
+        __tmp__FGL=((__ITM_OPERATOR *)__tmp__CGL)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+        operator__name__BBO((&__string_82),((__ITM_OPERATOR *)__tmp__CGL)->name__IGL);
+        result__SOJH=NULL;
+        ptr__TOJH=((__POINTER )(NULL));
+        typ_id__UOJH= 0;
+        sz__VOJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__VOJH ==  0)) {
+          result__SOJH=ITM_READ_ARG1__;
+        } else {
+          typ_id__UOJH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VOJH);
+          if ((typ_id__UOJH == (__INTEGER)(-  1))) {
+            a__WOJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__XOJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOJH + a__WOJH) & (__UINTEGER_32)(~ a__WOJH));
+            ptr_table__2OJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XOJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__1OJH=((__POINTER )(NULL));
+            result__3OJH=((__POINTER *)ptr_table__2OJH)[ 0];
+            if ((result__3OJH == (void *)NULL)) {
+              result__3OJH=new_lab__ZPJ(new_size__XOJH);
+              next__1OJH=(void *)((unsigned long)result__3OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOJH)));
+              ((__POINTER *)next__1OJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2OJH)[ 0]=next__1OJH;
             } else {
-              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)));
+              next__1OJH=((__POINTER *)result__3OJH)[ 0];
+              if ((next__1OJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3OJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XOJH <<  1)) <=  4096)) {
+                  next__1OJH=(void *)((unsigned long)result__3OJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XOJH)));
                 } else {
-                  next__SKJH=new_lab__QOJ(new_size__OKJH);
+                  next__1OJH=new_lab__ZPJ(new_size__XOJH);
                 };
-                ((__POINTER *)next__SKJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__TKJH)[ 0]=next__SKJH;
+                ((__POINTER *)next__1OJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__2OJH)[ 0]=next__1OJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__3OJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__3OJH=next__1OJH;
+              };
+            };
+            ptr__TOJH=result__3OJH;
+          } else {
+            t__YOJH=((__UINTEGER_32 )typ_id__UOJH);
+            a__ZOJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__EPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VOJH + a__ZOJH) & (__UINTEGER_32)(~ a__ZOJH));
+            ptr_table__BPJH=((__POINTER )(&(table_type[(t__YOJH)])));
+            lab_type__DPJH=(__UINTEGER_32)(t__YOJH |  1);
+            next__APJH=((__POINTER )(NULL));
+            result__CPJH=((__POINTER *)ptr_table__BPJH)[ 0];
+            if ((result__CPJH == (void *)NULL)) {
+              result__CPJH=new_lab__ZPJ(lab_type__DPJH);
+              next__APJH=(void *)((unsigned long)result__CPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPJH)));
+              ((__POINTER *)next__APJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BPJH)[ 0]=next__APJH;
             } else {
-              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)));
+              next__APJH=((__POINTER *)result__CPJH)[ 0];
+              if ((next__APJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CPJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EPJH <<  1)) <=  4096)) {
+                  next__APJH=(void *)((unsigned long)result__CPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EPJH)));
                 } else {
-                  next__XKJH=new_lab__QOJ(lab_type__0KJH);
+                  next__APJH=new_lab__ZPJ(lab_type__DPJH);
                 };
-                ((__POINTER *)next__XKJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__YKJH)[ 0]=next__XKJH;
+                ((__POINTER *)next__APJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__BPJH)[ 0]=next__APJH;
               } else {
-                ((__POINTER *)result__ZKJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XKJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__ZKJH=next__XKJH;
+                ((__POINTER *)result__CPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__APJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__CPJH=next__APJH;
               };
             };
-            ptr__KKJH=result__ZKJH;
+            ptr__TOJH=result__CPJH;
           };
-          result__JKJH=((__ITM_READ_ARG1 *)ptr__KKJH);
-          *(result__JKJH) = *(ITM_READ_ARG1__);
+          result__SOJH=((__ITM_READ_ARG1 *)ptr__TOJH);
+          *(result__SOJH) = *(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);
+        ((__ITM_READ_ARG1 *)result__SOJH)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__FGL;
+        expr__1CL=result__SOJH;
+        ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.storage__JVT)[last_msg__5CL]=result__SOJH;
+        Self__FPJH=((__FAST_ARRAYoITM_CODEo *)l_expr__2CL);
+        index__JPJH=(__INTEGER)(last_msg__5CL +  1);
+        __tmp__GPJH=Self__FPJH->parent_arrayed_collection__ISF.storage__JVT;
+        __tmp__HPJH=Self__FPJH->parent_arrayed_collection__ISF.upper__VFL;
+        Self__IPJH=((void **)__tmp__GPJH);
+        i__KPJH=index__JPJH;
+        while ((i__KPJH != __tmp__HPJH)) {
+          Self__IPJH[i__KPJH]=Self__IPJH[(__INTEGER)(i__KPJH +  1)];
+          i__KPJH=(__INTEGER)(i__KPJH +  1);
         };
-        Self__2KJH->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__2KJH->parent_arrayed_collection__5QF.upper__MEL -  1);
+        Self__FPJH->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__FPJH->parent_arrayed_collection__ISF.upper__VFL -  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;
+      if (((__INTEGER)(last_msg__5CL - first_msg__ADL) <  3)) {
+        while ((first_msg__ADL !=  0)) {
+          __tmp__IHL=((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.storage__JVT)[(__INTEGER)(first_msg__ADL -  1)];
+          if (__tmp__IHL==NULL) {
+            __tmp__JHL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__5FL)->__id) {
+            switch (((struct ___OBJ *)__tmp__IHL)->__id) {
             case __ITM_LIST__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__AGL=((void *)__tmp__5FL);
+              __tmp__JHL=((void *)__tmp__IHL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__AGL=NULL;
+              __tmp__JHL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__4CL=__tmp__JHL;
+          __tmp__LHL=((__ITM_OPERATOR *)__tmp__JHL)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+          operator__name__BBO((&__string_83),((__ITM_OPERATOR *)__tmp__JHL)->name__IGL);
+          result__MPJH=NULL;
+          ptr__NPJH=((__POINTER )(NULL));
+          typ_id__OPJH= 0;
+          sz__PPJH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+          if ((sz__PPJH ==  0)) {
+            result__MPJH=ITM_READ_ARG1__;
+          } else {
+            typ_id__OPJH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__PPJH);
+            if ((typ_id__OPJH == (__INTEGER)(-  1))) {
+              a__QPJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__RPJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PPJH + a__QPJH) & (__UINTEGER_32)(~ a__QPJH));
+              ptr_table__WPJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__RPJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__VPJH=((__POINTER )(NULL));
+              result__XPJH=((__POINTER *)ptr_table__WPJH)[ 0];
+              if ((result__XPJH == (void *)NULL)) {
+                result__XPJH=new_lab__ZPJ(new_size__RPJH);
+                next__VPJH=(void *)((unsigned long)result__XPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RPJH)));
+                ((__POINTER *)next__VPJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WPJH)[ 0]=next__VPJH;
               } else {
-                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)));
+                next__VPJH=((__POINTER *)result__XPJH)[ 0];
+                if ((next__VPJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__XPJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__RPJH <<  1)) <=  4096)) {
+                    next__VPJH=(void *)((unsigned long)result__XPJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__RPJH)));
                   } else {
-                    next__MLJH=new_lab__QOJ(new_size__ILJH);
+                    next__VPJH=new_lab__ZPJ(new_size__RPJH);
                   };
-                  ((__POINTER *)next__MLJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__NLJH)[ 0]=next__MLJH;
+                  ((__POINTER *)next__VPJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__WPJH)[ 0]=next__VPJH;
                 } else {
-                  ((__POINTER *)result__OLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__OLJH=next__MLJH;
+                  ((__POINTER *)result__XPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__XPJH=next__VPJH;
                 };
               };
-              ptr__ELJH=result__OLJH;
+              ptr__NPJH=result__XPJH;
             } else {
-              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;
+              t__SPJH=((__UINTEGER_32 )typ_id__OPJH);
+              a__TPJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__4PJH=(__UINTEGER_32)((__UINTEGER_32)(sz__PPJH + a__TPJH) & (__UINTEGER_32)(~ a__TPJH));
+              ptr_table__1PJH=((__POINTER )(&(table_type[(t__SPJH)])));
+              lab_type__3PJH=(__UINTEGER_32)(t__SPJH |  1);
+              next__0PJH=((__POINTER )(NULL));
+              result__2PJH=((__POINTER *)ptr_table__1PJH)[ 0];
+              if ((result__2PJH == (void *)NULL)) {
+                result__2PJH=new_lab__ZPJ(lab_type__3PJH);
+                next__0PJH=(void *)((unsigned long)result__2PJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4PJH)));
+                ((__POINTER *)next__0PJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1PJH)[ 0]=next__0PJH;
               } else {
-                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)));
+                next__0PJH=((__POINTER *)result__2PJH)[ 0];
+                if ((next__0PJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2PJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__4PJH <<  1)) <=  4096)) {
+                    next__0PJH=(void *)((unsigned long)result__2PJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__4PJH)));
                   } else {
-                    next__RLJH=new_lab__QOJ(lab_type__ULJH);
+                    next__0PJH=new_lab__ZPJ(lab_type__3PJH);
                   };
-                  ((__POINTER *)next__RLJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SLJH)[ 0]=next__RLJH;
+                  ((__POINTER *)next__0PJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1PJH)[ 0]=next__0PJH;
                 } else {
-                  ((__POINTER *)result__TLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TLJH=next__RLJH;
+                  ((__POINTER *)result__2PJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0PJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2PJH=next__0PJH;
                 };
               };
-              ptr__ELJH=result__TLJH;
+              ptr__NPJH=result__2PJH;
             };
-            result__DLJH=((__ITM_READ_ARG1 *)ptr__ELJH);
-            *(result__DLJH) = *(ITM_READ_ARG1__);
+            result__MPJH=((__ITM_READ_ARG1 *)ptr__NPJH);
+            *(result__MPJH) = *(ITM_READ_ARG1__);
           };
-          ((__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);
+          ((__ITM_READ_ARG1 *)result__MPJH)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__LHL;
+          expr__1CL=result__MPJH;
+          ((void **)((__FAST_ARRAYoITM_CODEo *)l_expr__2CL)->parent_arrayed_collection__ISF.storage__JVT)[first_msg__ADL]=result__MPJH;
+          first_msg__ADL=(__INTEGER)(first_msg__ADL -  1);
+          Self__QF1C=((__FAST_ARRAYoITM_CODEo *)l_expr__2CL);
+          __tmp__ZF1C=Self__QF1C->parent_arrayed_collection__ISF.storage__JVT;
+          __tmp__0F1C=Self__QF1C->parent_arrayed_collection__ISF.upper__VFL;
+          Self__MHCD=((void **)__tmp__ZF1C);
+          i__3HCD=first_msg__ADL;
+          while ((i__3HCD != __tmp__0F1C)) {
+            Self__MHCD[i__3HCD]=Self__MHCD[(__INTEGER)(i__3HCD +  1)];
+            i__3HCD=(__INTEGER)(i__3HCD +  1);
           };
-          Self__ZD1C->parent_arrayed_collection__5QF.upper__MEL=(__INTEGER)(Self__ZD1C->parent_arrayed_collection__5QF.upper__MEL -  1);
+          Self__QF1C->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__QF1C->parent_arrayed_collection__ISF.upper__VFL -  1);
         };
       };
-      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__;
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.upper__VFL +  1) ==  1)) {
+        result__0CL=((void **)((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.storage__JVT)[ 0];
+        free__FUI(result__S2H);
+        __tmp__BIL=TRUE__;
       } else {
-        __tmp__YGL=FALSE__;
+        __tmp__BIL=FALSE__;
       };
-      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;
+      if ((! __tmp__BIL)) {
+        if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.upper__VFL +  1) ==  3)) {
+          __tmp__OIL=((void **)((__FAST_ARRAYoITM_CODEo *)result__S2H)->parent_arrayed_collection__ISF.storage__JVT)[ 1];
+          if (__tmp__OIL==NULL) {
+            __tmp__PIL=NULL;
           } else {
-            switch (((struct ___OBJ *)__tmp__FHL)->__id) {
+            switch (((struct ___OBJ *)__tmp__OIL)->__id) {
             case __ITM_LIST__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_LDOTS__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_PROTOTYPE__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_LIST_IDF__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_WRITE_VALUE__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_WRITE_CAST__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_READ__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_WRITE_CODE__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_OPERATOR__: {
-              __tmp__GHL=((void *)__tmp__FHL);
+              __tmp__PIL=((void *)__tmp__OIL);
             } break;
             case __ITM_READ_ARG1__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_READ_ARG2__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_EXPRESSION__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_OLD__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_EXTERNAL_TYPE__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_BLOCK__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_EXTERNAL__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_READ_ARGS__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_REAL__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_NUMBER__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_CHARACTER__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_STRING__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             case __ITM_RESULT__: {
-              __tmp__GHL=NULL;
+              __tmp__PIL=NULL;
             } break;
             }
           };
-          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;
+          itm_op__4CL=__tmp__PIL;
+          __tmp__SIL=((__ITM_OPERATOR *)__tmp__PIL)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
+          operator__name__BBO((&__string_81),((__ITM_OPERATOR *)__tmp__PIL)->name__IGL);
+          result__LUO=NULL;
+          ptr__MUO=((__POINTER )(NULL));
+          typ_id__RUO= 0;
+          sz__OUO=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+          if ((sz__OUO ==  0)) {
+            result__LUO=ITM_READ_ARG2__;
+          } else {
+            typ_id__RUO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__OUO);
+            if ((typ_id__RUO == (__INTEGER)(-  1))) {
+              a__HWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__IWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUO + a__HWGH) & (__UINTEGER_32)(~ a__HWGH));
+              ptr_table__AQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__5PJH=((__POINTER )(NULL));
+              result__BQJH=((__POINTER *)ptr_table__AQJH)[ 0];
+              if ((result__BQJH == (void *)NULL)) {
+                result__BQJH=new_lab__ZPJ(new_size__IWGH);
+                next__5PJH=(void *)((unsigned long)result__BQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWGH)));
+                ((__POINTER *)next__5PJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AQJH)[ 0]=next__5PJH;
               } else {
-                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)));
+                next__5PJH=((__POINTER *)result__BQJH)[ 0];
+                if ((next__5PJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BQJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IWGH <<  1)) <=  4096)) {
+                    next__5PJH=(void *)((unsigned long)result__BQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IWGH)));
                   } else {
-                    next__WLJH=new_lab__QOJ(new_size__5RGH);
+                    next__5PJH=new_lab__ZPJ(new_size__IWGH);
                   };
-                  ((__POINTER *)next__WLJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XLJH)[ 0]=next__WLJH;
+                  ((__POINTER *)next__5PJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AQJH)[ 0]=next__5PJH;
                 } else {
-                  ((__POINTER *)result__YLJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WLJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YLJH=next__WLJH;
+                  ((__POINTER *)result__BQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5PJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__BQJH=next__5PJH;
                 };
               };
-              ptr__DTO=result__YLJH;
+              ptr__MUO=result__BQJH;
             } else {
-              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;
+              t__MWGH=((__UINTEGER_32 )typ_id__RUO);
+              a__LWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__IQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__OUO + a__LWGH) & (__UINTEGER_32)(~ a__LWGH));
+              ptr_table__FQJH=((__POINTER )(&(table_type[(t__MWGH)])));
+              lab_type__HQJH=(__UINTEGER_32)(t__MWGH |  1);
+              next__EQJH=((__POINTER )(NULL));
+              result__GQJH=((__POINTER *)ptr_table__FQJH)[ 0];
+              if ((result__GQJH == (void *)NULL)) {
+                result__GQJH=new_lab__ZPJ(lab_type__HQJH);
+                next__EQJH=(void *)((unsigned long)result__GQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IQJH)));
+                ((__POINTER *)next__EQJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__FQJH)[ 0]=next__EQJH;
               } else {
-                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)));
+                next__EQJH=((__POINTER *)result__GQJH)[ 0];
+                if ((next__EQJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GQJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IQJH <<  1)) <=  4096)) {
+                    next__EQJH=(void *)((unsigned long)result__GQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IQJH)));
                   } else {
-                    next__1LJH=new_lab__QOJ(lab_type__4LJH);
+                    next__EQJH=new_lab__ZPJ(lab_type__HQJH);
                   };
-                  ((__POINTER *)next__1LJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__2LJH)[ 0]=next__1LJH;
+                  ((__POINTER *)next__EQJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__FQJH)[ 0]=next__EQJH;
                 } else {
-                  ((__POINTER *)result__3LJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1LJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__3LJH=next__1LJH;
+                  ((__POINTER *)result__GQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__GQJH=next__EQJH;
                 };
               };
-              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;
+              ptr__MUO=result__GQJH;
+            };
+            result__LUO=((__ITM_READ_ARG2 *)ptr__MUO);
+            *(result__LUO) = *(ITM_READ_ARG2__);
+          };
+          ((__ITM_READ_ARG2 *)result__LUO)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__SIL;
+          result__0CL=result__LUO;
+          free__FUI(result__S2H);
+        } else {
+          l_expr__2CL=copy__H4H(result__S2H);
+          result__4VO=NULL;
+          ptr__5VO=((__POINTER )(NULL));
+          typ_id__EWO= 0;
+          sz__BWO=((__UINTEGER_32 )sizeof(__ITM_EXPRESSION));
+          if ((sz__BWO ==  0)) {
+            result__4VO=ITM_EXPRESSION__;
+          } else {
+            typ_id__EWO=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BWO);
+            if ((typ_id__EWO == (__INTEGER)(-  1))) {
+              a__AIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__BIGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BWO + a__AIGH) & (__UINTEGER_32)(~ a__AIGH));
+              ptr_table__KQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__BIGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__JQJH=((__POINTER )(NULL));
+              result__LQJH=((__POINTER *)ptr_table__KQJH)[ 0];
+              if ((result__LQJH == (void *)NULL)) {
+                result__LQJH=new_lab__ZPJ(new_size__BIGH);
+                next__JQJH=(void *)((unsigned long)result__LQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIGH)));
+                ((__POINTER *)next__JQJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__KQJH)[ 0]=next__JQJH;
               } else {
-                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)));
+                next__JQJH=((__POINTER *)result__LQJH)[ 0];
+                if ((next__JQJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LQJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BIGH <<  1)) <=  4096)) {
+                    next__JQJH=(void *)((unsigned long)result__LQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BIGH)));
                   } else {
-                    next__AMJH=new_lab__QOJ(new_size__YDGH);
+                    next__JQJH=new_lab__ZPJ(new_size__BIGH);
                   };
-                  ((__POINTER *)next__AMJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__BMJH)[ 0]=next__AMJH;
+                  ((__POINTER *)next__JQJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__KQJH)[ 0]=next__JQJH;
                 } else {
-                  ((__POINTER *)result__CMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__CMJH=next__AMJH;
+                  ((__POINTER *)result__LQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__LQJH=next__JQJH;
                 };
               };
-              ptr__WUO=result__CMJH;
+              ptr__5VO=result__LQJH;
             } else {
-              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;
+              t__FIGH=((__UINTEGER_32 )typ_id__EWO);
+              a__EIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__SQJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BWO + a__EIGH) & (__UINTEGER_32)(~ a__EIGH));
+              ptr_table__PQJH=((__POINTER )(&(table_type[(t__FIGH)])));
+              lab_type__RQJH=(__UINTEGER_32)(t__FIGH |  1);
+              next__OQJH=((__POINTER )(NULL));
+              result__QQJH=((__POINTER *)ptr_table__PQJH)[ 0];
+              if ((result__QQJH == (void *)NULL)) {
+                result__QQJH=new_lab__ZPJ(lab_type__RQJH);
+                next__OQJH=(void *)((unsigned long)result__QQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SQJH)));
+                ((__POINTER *)next__OQJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__PQJH)[ 0]=next__OQJH;
               } else {
-                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)));
+                next__OQJH=((__POINTER *)result__QQJH)[ 0];
+                if ((next__OQJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QQJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SQJH <<  1)) <=  4096)) {
+                    next__OQJH=(void *)((unsigned long)result__QQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SQJH)));
                   } else {
-                    next__FMJH=new_lab__QOJ(lab_type__IMJH);
+                    next__OQJH=new_lab__ZPJ(lab_type__RQJH);
                   };
-                  ((__POINTER *)next__FMJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__GMJH)[ 0]=next__FMJH;
+                  ((__POINTER *)next__OQJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__PQJH)[ 0]=next__OQJH;
                 } else {
-                  ((__POINTER *)result__HMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__HMJH=next__FMJH;
+                  ((__POINTER *)result__QQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__QQJH=next__OQJH;
                 };
               };
-              ptr__WUO=result__HMJH;
+              ptr__5VO=result__QQJH;
             };
-            result__VUO=((__ITM_EXPRESSION *)ptr__WUO);
-            *(result__VUO) = *(ITM_EXPRESSION__);
+            result__4VO=((__ITM_EXPRESSION *)ptr__5VO);
+            *(result__4VO) = *(ITM_EXPRESSION__);
           };
-          ((__ITM_EXPRESSION *)result__VUO)->value_list__OFV=l_expr__TBL;
-          result__RBL=result__VUO;
+          ((__ITM_EXPRESSION *)result__4VO)->value_list__XGV=l_expr__2CL;
+          result__0CL=result__4VO;
         };
       };
     };
-    result__F2I=result__RBL;
+    result__O3I=result__0CL;
   };
-  return(result__F2I);
+  return(result__O3I);
 }
 
-static void set_value__type__QDHC(__ITM_SLOT *Self__RDHC,void *e__SDHC,void *p__TDHC)
+static void set_value__type__EFHC(__ITM_SLOT *Self__FFHC,void *e__GFHC,void *p__HFHC)
 // ({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__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) {
+  void *n__ODBD;
+  void *sec__PDBD;
+  __POSITION __tmp__1DBD,__tmp__DEBD,__tmp__XEBD,__tmp__AFBD;
+  __ITM_ARG *result__KAIH,*Self__SAIH;
+  __POINTER ptr__LAIH,ptr_table__UQJH,next__TQJH,result__VQJH;
+  __POINTER ptr_table__ZQJH,next__YQJH,result__0QJH,ptr__5QAC;
+  __POINTER ptr_table__4QJH,next__3QJH,result__5QJH,ptr_table__DRJH;
+  __POINTER next__CRJH,result__ERJH,ptr__WSI,ptr_table__IRJH,next__HRJH;
+  __POINTER result__JRJH,ptr_table__NRJH,next__MRJH,result__ORJH;
+  __POINTER ptr__IFCD,ptr_table__SRJH,next__RRJH,result__TRJH;
+  __POINTER ptr_table__XRJH,next__WRJH,result__YRJH;
+  __INTEGER typ_id__MAIH,typ_id__ERAC,typ_id__1SI,typ_id__NFCD;
+  __UINTEGER_32 sz__NAIH,a__OAIH,new_size__PAIH,t__QAIH,a__RAIH;
+  __UINTEGER_32 new_size__2QJH,lab_type__1QJH,sz__BRAC,a__LIGH;
+  __UINTEGER_32 new_size__MIGH,t__QIGH,a__PIGH,new_size__GRJH;
+  __UINTEGER_32 lab_type__FRJH,sz__YSI,a__HJGH,new_size__IJGH,t__MJGH;
+  __UINTEGER_32 a__LJGH,new_size__QRJH,lab_type__PRJH,sz__KFCD,a__PJGH;
+  __UINTEGER_32 new_size__QJGH,t__UJGH,a__TJGH,new_size__0RJH;
+  __UINTEGER_32 lab_type__ZRJH;
+  __ITM_SLOT *result__4QAC,*Self__D2HC;
+  __ITM_PROTOTYPE *result__VSI;
+  __ITM_READ_ARG1 *result__HFCD;
+  void *larg__QDBD;
+  if ((Self__FFHC->affect__Q5FC != '<')) {
+    copy__35R(string_tmp__VH,(&__string_241));
+    append__FLS(string_tmp__VH,Self__FFHC->parent_named__15.name__LI);
+    n__ODBD=get__YWB(string_tmp__VH);
+    sec__PDBD=get_name__YROB((&__string_27));
+    larg__QDBD=create_with_capacity__SJ5B( 1);
+    switch (((struct ___OBJ *)e__GFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__ECBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__ECBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__ECBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__ECBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__ECBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__ECBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ__: {
-      __tmp__ECBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__ECBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__ECBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__ECBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__ECBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__ECBD=position__054B(e__SDHC);
+      __tmp__1DBD=position__GB5B(e__GFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__ECBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__ECBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__ECBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__ECBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__ECBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__ECBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__ECBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__ECBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__ECBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__1DBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__ECBD=position__2GHC(e__SDHC);
+      __tmp__1DBD=position__QIHC(e__GFHC);
     } break;
     };
-    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)));
+    result__KAIH=NULL;
+    ptr__LAIH=((__POINTER )(NULL));
+    typ_id__MAIH= 0;
+    sz__NAIH=((__UINTEGER_32 )sizeof(__ITM_ARG));
+    if ((sz__NAIH ==  0)) {
+      result__KAIH=ITM_ARG__;
+    } else {
+      typ_id__MAIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NAIH);
+      if ((typ_id__MAIH == (__INTEGER)(-  1))) {
+        a__OAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__PAIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NAIH + a__OAIH) & (__UINTEGER_32)(~ a__OAIH));
+        ptr_table__UQJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PAIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__TQJH=((__POINTER )(NULL));
+        result__VQJH=((__POINTER *)ptr_table__UQJH)[ 0];
+        if ((result__VQJH == (void *)NULL)) {
+          result__VQJH=new_lab__ZPJ(new_size__PAIH);
+          next__TQJH=(void *)((unsigned long)result__VQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PAIH)));
+          ((__POINTER *)next__TQJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UQJH)[ 0]=next__TQJH;
+        } else {
+          next__TQJH=((__POINTER *)result__VQJH)[ 0];
+          if ((next__TQJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VQJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PAIH <<  1)) <=  4096)) {
+              next__TQJH=(void *)((unsigned long)result__VQJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PAIH)));
             } else {
-              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)));
+              next__TQJH=new_lab__ZPJ(new_size__PAIH);
+            };
+            ((__POINTER *)next__TQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UQJH)[ 0]=next__TQJH;
+          } else {
+            ((__POINTER *)result__VQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VQJH=next__TQJH;
+          };
+        };
+        ptr__LAIH=result__VQJH;
+      } else {
+        t__QAIH=((__UINTEGER_32 )typ_id__MAIH);
+        a__RAIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__2QJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NAIH + a__RAIH) & (__UINTEGER_32)(~ a__RAIH));
+        ptr_table__ZQJH=((__POINTER )(&(table_type[(t__QAIH)])));
+        lab_type__1QJH=(__UINTEGER_32)(t__QAIH |  1);
+        next__YQJH=((__POINTER )(NULL));
+        result__0QJH=((__POINTER *)ptr_table__ZQJH)[ 0];
+        if ((result__0QJH == (void *)NULL)) {
+          result__0QJH=new_lab__ZPJ(lab_type__1QJH);
+          next__YQJH=(void *)((unsigned long)result__0QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2QJH)));
+          ((__POINTER *)next__YQJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZQJH)[ 0]=next__YQJH;
+        } else {
+          next__YQJH=((__POINTER *)result__0QJH)[ 0];
+          if ((next__YQJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0QJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2QJH <<  1)) <=  4096)) {
+              next__YQJH=(void *)((unsigned long)result__0QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2QJH)));
             } else {
-              next__PMJH=new_lab__QOJ(lab_type__SMJH);
+              next__YQJH=new_lab__ZPJ(lab_type__1QJH);
             };
-            ((__POINTER *)next__PMJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__QMJH)[ 0]=next__PMJH;
+            ((__POINTER *)next__YQJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZQJH)[ 0]=next__YQJH;
           } else {
-            ((__POINTER *)result__RMJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__RMJH=next__PMJH;
+            ((__POINTER *)result__0QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0QJH=next__YQJH;
           };
         };
-        ptr__C2HH=result__RMJH;
+        ptr__LAIH=result__0QJH;
       };
-      result__B2HH=((__ITM_ARG *)ptr__C2HH);
-      *(result__B2HH) = *(ITM_ARG__);
+      result__KAIH=((__ITM_ARG *)ptr__LAIH);
+      *(result__KAIH) = *(ITM_ARG__);
     };
-    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) {
+    Self__SAIH=((__ITM_ARG *)result__KAIH);
+    Self__SAIH->parent_itm_argument__XEHB.parent_itm_code__W1M.position__0BJ=__tmp__1DBD;
+    Self__SAIH->name__G0HC=(&__string_58);
+    Self__SAIH->type__H0HC=type_self__LRN;
+    add_last__F5GC(larg__QDBD,result__KAIH);
+    switch (((struct ___OBJ *)e__GFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__MCBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__MCBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__MCBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__MCBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__MCBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__MCBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ__: {
-      __tmp__MCBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__MCBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__MCBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__MCBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__MCBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__MCBD=position__054B(e__SDHC);
+      __tmp__DEBD=position__GB5B(e__GFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__MCBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__MCBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__MCBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__MCBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__MCBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__MCBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__MCBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__MCBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__MCBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__DEBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__MCBD=position__2GHC(e__SDHC);
+      __tmp__DEBD=position__QIHC(e__GFHC);
     } break;
     };
-    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)));
+    result__4QAC=NULL;
+    ptr__5QAC=((__POINTER )(NULL));
+    typ_id__ERAC= 0;
+    sz__BRAC=((__UINTEGER_32 )sizeof(__ITM_SLOT));
+    if ((sz__BRAC ==  0)) {
+      result__4QAC=ITM_SLOT__;
+    } else {
+      typ_id__ERAC=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BRAC);
+      if ((typ_id__ERAC == (__INTEGER)(-  1))) {
+        a__LIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MIGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BRAC + a__LIGH) & (__UINTEGER_32)(~ a__LIGH));
+        ptr_table__4QJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MIGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__3QJH=((__POINTER )(NULL));
+        result__5QJH=((__POINTER *)ptr_table__4QJH)[ 0];
+        if ((result__5QJH == (void *)NULL)) {
+          result__5QJH=new_lab__ZPJ(new_size__MIGH);
+          next__3QJH=(void *)((unsigned long)result__5QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIGH)));
+          ((__POINTER *)next__3QJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4QJH)[ 0]=next__3QJH;
+        } else {
+          next__3QJH=((__POINTER *)result__5QJH)[ 0];
+          if ((next__3QJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5QJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MIGH <<  1)) <=  4096)) {
+              next__3QJH=(void *)((unsigned long)result__5QJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MIGH)));
             } else {
-              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)));
+              next__3QJH=new_lab__ZPJ(new_size__MIGH);
+            };
+            ((__POINTER *)next__3QJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4QJH)[ 0]=next__3QJH;
+          } else {
+            ((__POINTER *)result__5QJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3QJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5QJH=next__3QJH;
+          };
+        };
+        ptr__5QAC=result__5QJH;
+      } else {
+        t__QIGH=((__UINTEGER_32 )typ_id__ERAC);
+        a__PIGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__GRJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BRAC + a__PIGH) & (__UINTEGER_32)(~ a__PIGH));
+        ptr_table__DRJH=((__POINTER )(&(table_type[(t__QIGH)])));
+        lab_type__FRJH=(__UINTEGER_32)(t__QIGH |  1);
+        next__CRJH=((__POINTER )(NULL));
+        result__ERJH=((__POINTER *)ptr_table__DRJH)[ 0];
+        if ((result__ERJH == (void *)NULL)) {
+          result__ERJH=new_lab__ZPJ(lab_type__FRJH);
+          next__CRJH=(void *)((unsigned long)result__ERJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GRJH)));
+          ((__POINTER *)next__CRJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DRJH)[ 0]=next__CRJH;
+        } else {
+          next__CRJH=((__POINTER *)result__ERJH)[ 0];
+          if ((next__CRJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ERJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GRJH <<  1)) <=  4096)) {
+              next__CRJH=(void *)((unsigned long)result__ERJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GRJH)));
             } else {
-              next__ZMJH=new_lab__QOJ(lab_type__2MJH);
+              next__CRJH=new_lab__ZPJ(lab_type__FRJH);
             };
-            ((__POINTER *)next__ZMJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__0MJH)[ 0]=next__ZMJH;
+            ((__POINTER *)next__CRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__DRJH)[ 0]=next__CRJH;
           } else {
-            ((__POINTER *)result__1MJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZMJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__1MJH=next__ZMJH;
+            ((__POINTER *)result__ERJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ERJH=next__CRJH;
           };
         };
-        ptr__TPAC=result__1MJH;
+        ptr__5QAC=result__ERJH;
       };
-      result__SPAC=((__ITM_SLOT *)ptr__TPAC);
-      *(result__SPAC) = *(ITM_SLOT__);
+      result__4QAC=((__ITM_SLOT *)ptr__5QAC);
+      *(result__4QAC) = *(ITM_SLOT__);
     };
-    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) {
+    Self__D2HC=((__ITM_SLOT *)result__4QAC);
+    Self__D2HC->parent_named__15.name__LI=n__ODBD;
+    Self__D2HC->parent_named__15.parent_itm_object__4.position__0BJ=__tmp__DEBD;
+    Self__D2HC->id_section__F2C=sec__PDBD;
+    ((__ITM_SLOT *)result__4QAC)->affect__Q5FC='<';
+    set_value__type__EFHC(result__4QAC,e__GFHC,p__HFHC);
+    set_argument_list__ACHC(result__4QAC,larg__QDBD);
+    set_result_type__X2FC(result__4QAC,Self__FFHC->result_type__B4FC);
+    fast_put__to__MNGC(((__PROTOTYPE *)p__HFHC)->slot_list__ASS,result__4QAC,result__4QAC->parent_named__15.name__LI);
+    switch (((struct ___OBJ *)e__GFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__ADBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__ADBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__ADBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__ADBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__ADBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__ADBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ__: {
-      __tmp__ADBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__ADBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__ADBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__ADBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__ADBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__ADBD=position__054B(e__SDHC);
+      __tmp__XEBD=position__GB5B(e__GFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__ADBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__ADBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__ADBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__ADBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__ADBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__ADBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__ADBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__ADBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__ADBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__XEBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__ADBD=position__2GHC(e__SDHC);
+      __tmp__XEBD=position__QIHC(e__GFHC);
     } break;
     };
-    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)));
+    get__QRI(((__PROTOTYPE *)p__HFHC)->parent_named__5.name__LI);
+    result__VSI=NULL;
+    ptr__WSI=((__POINTER )(NULL));
+    typ_id__1SI= 0;
+    sz__YSI=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+    if ((sz__YSI ==  0)) {
+      result__VSI=ITM_PROTOTYPE__;
+    } else {
+      typ_id__1SI=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YSI);
+      if ((typ_id__1SI == (__INTEGER)(-  1))) {
+        a__HJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__IJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YSI + a__HJGH) & (__UINTEGER_32)(~ a__HJGH));
+        ptr_table__IRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__IJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__HRJH=((__POINTER )(NULL));
+        result__JRJH=((__POINTER *)ptr_table__IRJH)[ 0];
+        if ((result__JRJH == (void *)NULL)) {
+          result__JRJH=new_lab__ZPJ(new_size__IJGH);
+          next__HRJH=(void *)((unsigned long)result__JRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJGH)));
+          ((__POINTER *)next__HRJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__IRJH)[ 0]=next__HRJH;
+        } else {
+          next__HRJH=((__POINTER *)result__JRJH)[ 0];
+          if ((next__HRJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JRJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__IJGH <<  1)) <=  4096)) {
+              next__HRJH=(void *)((unsigned long)result__JRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__IJGH)));
             } else {
-              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)));
+              next__HRJH=new_lab__ZPJ(new_size__IJGH);
+            };
+            ((__POINTER *)next__HRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__IRJH)[ 0]=next__HRJH;
+          } else {
+            ((__POINTER *)result__JRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__JRJH=next__HRJH;
+          };
+        };
+        ptr__WSI=result__JRJH;
+      } else {
+        t__MJGH=((__UINTEGER_32 )typ_id__1SI);
+        a__LJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QRJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YSI + a__LJGH) & (__UINTEGER_32)(~ a__LJGH));
+        ptr_table__NRJH=((__POINTER )(&(table_type[(t__MJGH)])));
+        lab_type__PRJH=(__UINTEGER_32)(t__MJGH |  1);
+        next__MRJH=((__POINTER )(NULL));
+        result__ORJH=((__POINTER *)ptr_table__NRJH)[ 0];
+        if ((result__ORJH == (void *)NULL)) {
+          result__ORJH=new_lab__ZPJ(lab_type__PRJH);
+          next__MRJH=(void *)((unsigned long)result__ORJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QRJH)));
+          ((__POINTER *)next__MRJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__NRJH)[ 0]=next__MRJH;
+        } else {
+          next__MRJH=((__POINTER *)result__ORJH)[ 0];
+          if ((next__MRJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ORJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QRJH <<  1)) <=  4096)) {
+              next__MRJH=(void *)((unsigned long)result__ORJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QRJH)));
             } else {
-              next__DNJH=new_lab__QOJ(lab_type__GNJH);
+              next__MRJH=new_lab__ZPJ(lab_type__PRJH);
             };
-            ((__POINTER *)next__DNJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ENJH)[ 0]=next__DNJH;
+            ((__POINTER *)next__MRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__NRJH)[ 0]=next__MRJH;
           } else {
-            ((__POINTER *)result__FNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__FNJH=next__DNJH;
+            ((__POINTER *)result__ORJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__ORJH=next__MRJH;
           };
         };
-        ptr__NRI=result__FNJH;
+        ptr__WSI=result__ORJH;
       };
-      result__MRI=((__ITM_PROTOTYPE *)ptr__NRI);
-      *(result__MRI) = *(ITM_PROTOTYPE__);
+      result__VSI=((__ITM_PROTOTYPE *)ptr__WSI);
+      *(result__VSI) = *(ITM_PROTOTYPE__);
     };
-    ((__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) {
+    ((__ITM_PROTOTYPE *)result__VSI)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__XEBD;
+    switch (((struct ___OBJ *)e__GFHC)->__id) {
     case __ITM_LIST__: {
-      __tmp__JDBD=((__ITM_LIST *)e__SDHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_LIST *)e__GFHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LDOTS__: {
-      __tmp__JDBD=((__ITM_LDOTS *)e__SDHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_LDOTS *)e__GFHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_PROTOTYPE__: {
-      __tmp__JDBD=((__ITM_PROTOTYPE *)e__SDHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_PROTOTYPE *)e__GFHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_LIST_IDF__: {
-      __tmp__JDBD=((__ITM_LIST_IDF *)e__SDHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_LIST_IDF *)e__GFHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_VALUE__: {
-      __tmp__JDBD=((__ITM_WRITE_VALUE *)e__SDHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_WRITE_VALUE *)e__GFHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CAST__: {
-      __tmp__JDBD=((__ITM_WRITE_CAST *)e__SDHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_WRITE_CAST *)e__GFHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ__: {
-      __tmp__JDBD=((__ITM_READ *)e__SDHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_READ *)e__GFHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_WRITE_CODE__: {
-      __tmp__JDBD=((__ITM_WRITE_CODE *)e__SDHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_WRITE_CODE *)e__GFHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_OPERATOR__: {
-      __tmp__JDBD=((__ITM_OPERATOR *)e__SDHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_OPERATOR *)e__GFHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG1__: {
-      __tmp__JDBD=((__ITM_READ_ARG1 *)e__SDHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_READ_ARG1 *)e__GFHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARG2__: {
-      __tmp__JDBD=((__ITM_READ_ARG2 *)e__SDHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_READ_ARG2 *)e__GFHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXPRESSION__: {
-      __tmp__JDBD=position__054B(e__SDHC);
+      __tmp__AFBD=position__GB5B(e__GFHC);
     } break;
     case __ITM_OLD__: {
-      __tmp__JDBD=((__ITM_OLD *)e__SDHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_OLD *)e__GFHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL_TYPE__: {
-      __tmp__JDBD=((__ITM_EXTERNAL_TYPE *)e__SDHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_EXTERNAL_TYPE *)e__GFHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_BLOCK__: {
-      __tmp__JDBD=((__ITM_LIST *)((__ITM_BLOCK *)e__SDHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_LIST *)((__ITM_BLOCK *)e__GFHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_EXTERNAL__: {
-      __tmp__JDBD=((__ITM_EXTERNAL *)e__SDHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_EXTERNAL *)e__GFHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_READ_ARGS__: {
-      __tmp__JDBD=((__ITM_READ_ARGS *)e__SDHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_READ_ARGS *)e__GFHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_REAL__: {
-      __tmp__JDBD=((__ITM_REAL *)e__SDHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_REAL *)e__GFHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_NUMBER__: {
-      __tmp__JDBD=((__ITM_NUMBER *)e__SDHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_NUMBER *)e__GFHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_CHARACTER__: {
-      __tmp__JDBD=((__ITM_CHARACTER *)e__SDHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_CHARACTER *)e__GFHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_STRING__: {
-      __tmp__JDBD=((__ITM_STRING *)e__SDHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+      __tmp__AFBD=((__ITM_STRING *)e__GFHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
     } break;
     case __ITM_RESULT__: {
-      __tmp__JDBD=position__2GHC(e__SDHC);
+      __tmp__AFBD=position__QIHC(e__GFHC);
     } break;
     };
-    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)));
+    result__HFCD=NULL;
+    ptr__IFCD=((__POINTER )(NULL));
+    typ_id__NFCD= 0;
+    sz__KFCD=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+    if ((sz__KFCD ==  0)) {
+      result__HFCD=ITM_READ_ARG1__;
+    } else {
+      typ_id__NFCD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KFCD);
+      if ((typ_id__NFCD == (__INTEGER)(-  1))) {
+        a__PJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__QJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__KFCD + a__PJGH) & (__UINTEGER_32)(~ a__PJGH));
+        ptr_table__SRJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__RRJH=((__POINTER )(NULL));
+        result__TRJH=((__POINTER *)ptr_table__SRJH)[ 0];
+        if ((result__TRJH == (void *)NULL)) {
+          result__TRJH=new_lab__ZPJ(new_size__QJGH);
+          next__RRJH=(void *)((unsigned long)result__TRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QJGH)));
+          ((__POINTER *)next__RRJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SRJH)[ 0]=next__RRJH;
+        } else {
+          next__RRJH=((__POINTER *)result__TRJH)[ 0];
+          if ((next__RRJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__TRJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QJGH <<  1)) <=  4096)) {
+              next__RRJH=(void *)((unsigned long)result__TRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QJGH)));
             } else {
-              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)));
+              next__RRJH=new_lab__ZPJ(new_size__QJGH);
+            };
+            ((__POINTER *)next__RRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SRJH)[ 0]=next__RRJH;
+          } else {
+            ((__POINTER *)result__TRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TRJH=next__RRJH;
+          };
+        };
+        ptr__IFCD=result__TRJH;
+      } else {
+        t__UJGH=((__UINTEGER_32 )typ_id__NFCD);
+        a__TJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0RJH=(__UINTEGER_32)((__UINTEGER_32)(sz__KFCD + a__TJGH) & (__UINTEGER_32)(~ a__TJGH));
+        ptr_table__XRJH=((__POINTER )(&(table_type[(t__UJGH)])));
+        lab_type__ZRJH=(__UINTEGER_32)(t__UJGH |  1);
+        next__WRJH=((__POINTER )(NULL));
+        result__YRJH=((__POINTER *)ptr_table__XRJH)[ 0];
+        if ((result__YRJH == (void *)NULL)) {
+          result__YRJH=new_lab__ZPJ(lab_type__ZRJH);
+          next__WRJH=(void *)((unsigned long)result__YRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RJH)));
+          ((__POINTER *)next__WRJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XRJH)[ 0]=next__WRJH;
+        } else {
+          next__WRJH=((__POINTER *)result__YRJH)[ 0];
+          if ((next__WRJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YRJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0RJH <<  1)) <=  4096)) {
+              next__WRJH=(void *)((unsigned long)result__YRJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0RJH)));
             } else {
-              next__NNJH=new_lab__QOJ(lab_type__QNJH);
+              next__WRJH=new_lab__ZPJ(lab_type__ZRJH);
             };
-            ((__POINTER *)next__NNJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__ONJH)[ 0]=next__NNJH;
+            ((__POINTER *)next__WRJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XRJH)[ 0]=next__WRJH;
           } else {
-            ((__POINTER *)result__PNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PNJH=next__NNJH;
+            ((__POINTER *)result__YRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YRJH=next__WRJH;
           };
         };
-        ptr__HECD=result__PNJH;
+        ptr__IFCD=result__YRJH;
       };
-      result__GECD=((__ITM_READ_ARG1 *)ptr__HECD);
-      *(result__GECD) = *(ITM_READ_ARG1__);
+      result__HFCD=((__ITM_READ_ARG1 *)ptr__IFCD);
+      *(result__HFCD) = *(ITM_READ_ARG1__);
     };
-    ((__ITM_READ_ARG1 *)result__GECD)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=__tmp__JDBD;
+    ((__ITM_READ_ARG1 *)result__HFCD)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=__tmp__AFBD;
   };
 }
 
-static __POSITION position__054B(__ITM_EXPRESSION *Self__154B)
+static __POSITION position__GB5B(__ITM_EXPRESSION *Self__HB5B)
 // ({ITM_EXPRESSION}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__KB5B;
+  __POSITION __tmp__LB5B;
+  __tmp__KB5B=((void **)((__FAST_ARRAYoITM_CODEo *)Self__HB5B->value_list__XGV)->parent_arrayed_collection__ISF.storage__JVT)[ 0];
+  switch (((struct ___OBJ *)__tmp__KB5B)->__id) {
   case __ITM_LIST__: {
-    __tmp__554B=((__ITM_LIST *)__tmp__454B)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_LIST *)__tmp__KB5B)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__554B=((__ITM_LDOTS *)__tmp__454B)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_LDOTS *)__tmp__KB5B)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__554B=((__ITM_PROTOTYPE *)__tmp__454B)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_PROTOTYPE *)__tmp__KB5B)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__554B=((__ITM_LIST_IDF *)__tmp__454B)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_LIST_IDF *)__tmp__KB5B)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__554B=((__ITM_WRITE_VALUE *)__tmp__454B)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_WRITE_VALUE *)__tmp__KB5B)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__554B=((__ITM_WRITE_CAST *)__tmp__454B)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_WRITE_CAST *)__tmp__KB5B)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ__: {
-    __tmp__554B=((__ITM_READ *)__tmp__454B)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_READ *)__tmp__KB5B)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__554B=((__ITM_WRITE_CODE *)__tmp__454B)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_WRITE_CODE *)__tmp__KB5B)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__554B=((__ITM_OPERATOR *)__tmp__454B)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_OPERATOR *)__tmp__KB5B)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__554B=((__ITM_READ_ARG1 *)__tmp__454B)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_READ_ARG1 *)__tmp__KB5B)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__554B=((__ITM_READ_ARG2 *)__tmp__454B)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_READ_ARG2 *)__tmp__KB5B)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__554B=position__054B(__tmp__454B);
+    __tmp__LB5B=position__GB5B(__tmp__KB5B);
   } break;
   case __ITM_OLD__: {
-    __tmp__554B=((__ITM_OLD *)__tmp__454B)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_OLD *)__tmp__KB5B)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__554B=((__ITM_EXTERNAL_TYPE *)__tmp__454B)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_EXTERNAL_TYPE *)__tmp__KB5B)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__554B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__454B)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__KB5B)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__554B=((__ITM_EXTERNAL *)__tmp__454B)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_EXTERNAL *)__tmp__KB5B)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__554B=((__ITM_READ_ARGS *)__tmp__454B)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_READ_ARGS *)__tmp__KB5B)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__554B=((__ITM_REAL *)__tmp__454B)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_REAL *)__tmp__KB5B)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__554B=((__ITM_NUMBER *)__tmp__454B)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_NUMBER *)__tmp__KB5B)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__554B=((__ITM_CHARACTER *)__tmp__454B)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_CHARACTER *)__tmp__KB5B)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__554B=((__ITM_STRING *)__tmp__454B)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__LB5B=((__ITM_STRING *)__tmp__KB5B)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__554B=position__2GHC(__tmp__454B);
+    __tmp__LB5B=position__QIHC(__tmp__KB5B);
   } break;
   };
-  return(__tmp__554B);
+  return(__tmp__LB5B);
 }
 
-static __POSITION position__2GHC(__ITM_RESULT *Self__3GHC)
+static __POSITION position__QIHC(__ITM_RESULT *Self__RIHC)
 // ({ITM_RESULT}) With resultRecursive, No inlinable.
 {
-  void *__tmp__5GHC;
-  __POSITION __tmp__AHHC;
-  __tmp__5GHC=Self__3GHC->value__DJFC;
-  switch (((struct ___OBJ *)__tmp__5GHC)->__id) {
+  void *__tmp__TIHC;
+  __POSITION __tmp__UIHC;
+  __tmp__TIHC=Self__RIHC->value__XKFC;
+  switch (((struct ___OBJ *)__tmp__TIHC)->__id) {
   case __ITM_LIST__: {
-    __tmp__AHHC=((__ITM_LIST *)__tmp__5GHC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_LIST *)__tmp__TIHC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_LDOTS__: {
-    __tmp__AHHC=((__ITM_LDOTS *)__tmp__5GHC)->parent_itm_constant__4RF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_LDOTS *)__tmp__TIHC)->parent_itm_constant__HTF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_PROTOTYPE__: {
-    __tmp__AHHC=((__ITM_PROTOTYPE *)__tmp__5GHC)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_PROTOTYPE *)__tmp__TIHC)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_LIST_IDF__: {
-    __tmp__AHHC=((__ITM_LIST_IDF *)__tmp__5GHC)->parent_itm_code__05I.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_LIST_IDF *)__tmp__TIHC)->parent_itm_code__DBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_VALUE__: {
-    __tmp__AHHC=((__ITM_WRITE_VALUE *)__tmp__5GHC)->parent_itm_write__QAJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_WRITE_VALUE *)__tmp__TIHC)->parent_itm_write__ZBJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_CAST__: {
-    __tmp__AHHC=((__ITM_WRITE_CAST *)__tmp__5GHC)->parent_itm_write__HBJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_WRITE_CAST *)__tmp__TIHC)->parent_itm_write__QCJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ__: {
-    __tmp__AHHC=((__ITM_READ *)__tmp__5GHC)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_READ *)__tmp__TIHC)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_WRITE_CODE__: {
-    __tmp__AHHC=((__ITM_WRITE_CODE *)__tmp__5GHC)->parent_itm_write__SEJ.parent_itm_code__PAJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_WRITE_CODE *)__tmp__TIHC)->parent_itm_write__1FJ.parent_itm_code__YBJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_OPERATOR__: {
-    __tmp__AHHC=((__ITM_OPERATOR *)__tmp__5GHC)->parent_itm_code__UBL.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_OPERATOR *)__tmp__TIHC)->parent_itm_code__3CL.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARG1__: {
-    __tmp__AHHC=((__ITM_READ_ARG1 *)__tmp__5GHC)->parent_itm_read__0EL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_READ_ARG1 *)__tmp__TIHC)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARG2__: {
-    __tmp__AHHC=((__ITM_READ_ARG2 *)__tmp__5GHC)->parent_itm_read__HHL.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_READ_ARG2 *)__tmp__TIHC)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXPRESSION__: {
-    __tmp__AHHC=position__054B(__tmp__5GHC);
+    __tmp__UIHC=position__GB5B(__tmp__TIHC);
   } break;
   case __ITM_OLD__: {
-    __tmp__AHHC=((__ITM_OLD *)__tmp__5GHC)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_OLD *)__tmp__TIHC)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXTERNAL_TYPE__: {
-    __tmp__AHHC=((__ITM_EXTERNAL_TYPE *)__tmp__5GHC)->parent_itm_extern__K0M.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_EXTERNAL_TYPE *)__tmp__TIHC)->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_BLOCK__: {
-    __tmp__AHHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__5GHC)->list__XKDC)->parent_itm_code__I2E.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_LIST *)((__ITM_BLOCK *)__tmp__TIHC)->list__LMDC)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_EXTERNAL__: {
-    __tmp__AHHC=((__ITM_EXTERNAL *)__tmp__5GHC)->parent_itm_extern__PBN.parent_itm_code__J0M.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_EXTERNAL *)__tmp__TIHC)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_READ_ARGS__: {
-    __tmp__AHHC=((__ITM_READ_ARGS *)__tmp__5GHC)->parent_itm_read__F5N.parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_READ_ARGS *)__tmp__TIHC)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_REAL__: {
-    __tmp__AHHC=((__ITM_REAL *)__tmp__5GHC)->parent_itm_constant__ANO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_REAL *)__tmp__TIHC)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_NUMBER__: {
-    __tmp__AHHC=((__ITM_NUMBER *)__tmp__5GHC)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_NUMBER *)__tmp__TIHC)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_CHARACTER__: {
-    __tmp__AHHC=((__ITM_CHARACTER *)__tmp__5GHC)->parent_itm_constant__EOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_CHARACTER *)__tmp__TIHC)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_STRING__: {
-    __tmp__AHHC=((__ITM_STRING *)__tmp__5GHC)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ;
+    __tmp__UIHC=((__ITM_STRING *)__tmp__TIHC)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ;
   } break;
   case __ITM_RESULT__: {
-    __tmp__AHHC=position__2GHC(__tmp__5GHC);
+    __tmp__UIHC=position__QIHC(__tmp__TIHC);
   } break;
   };
-  return(__tmp__AHHC);
+  return(__tmp__UIHC);
 }
 
-static void fast_put__to__YLGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__ZLGC,void *v__0LGC,void *k__1LGC)
+static void fast_put__to__MNGC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__NNGC,void *v__ONGC,void *k__PNGC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxITM_SLOTxITM_SLOT_OPERATOR},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__XAIH,*Self__2AIH;
+  __INTEGER result__WAIH,__tmp__YAIH,Self__ZAIH,idx__XNGC,idx__GOID;
+  __INTEGER new_capacity__HOID,i__IOID,result__1AIH,__tmp__3AIH;
+  __INTEGER Self__4AIH,typ_id__VQID;
+  __POINTER ptr__QQID,ptr_table__2RJH,next__1RJH,result__3RJH;
+  __POINTER ptr_table__BSJH,next__ASJH,result__CSJH;
+  __UINTEGER_32 sz__SQID,a__5IGH,new_size__AJGH,t__EJGH,a__DJGH;
+  __UINTEGER_32 new_size__ESJH,lab_type__DSJH;
+  void *node__YNGC,*node1__KOID,*node2__LOID,*__tmp__GPGC;
+  void **old_buckets__JOID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *result__PQID;
+  __HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *Self__QDTD;
+  Self__XAIH=((__STRING_CONSTANT *)k__PNGC);
+  result__WAIH= 0;
+  __tmp__YAIH=Self__XAIH->count__DD;
+  Self__ZAIH= 1;
+  while ((Self__ZAIH <= __tmp__YAIH)) {
+    result__WAIH=(__INTEGER)((__INTEGER)( 5 * result__WAIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XAIH->storage__ZNO)[(__INTEGER)(Self__ZAIH -  1)])));
+    Self__ZAIH=(__INTEGER)(Self__ZAIH +  1);
+  };
+  if ((result__WAIH <  0)) {
+    result__WAIH=(__INTEGER)(~ result__WAIH);
+  };
+  idx__XNGC=(__INTEGER)(result__WAIH % Self__NNGC->capacity__X3BC);
+  node__YNGC=((void **)Self__NNGC->buckets__OAGC)[idx__XNGC];
+  while ((! (((void *)node__YNGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__YNGC)->key__0AGC == (void *)k__PNGC)))) {
+    node__YNGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__YNGC)->next__FBGC;
+  };
+  if (((void *)node__YNGC == (void *)NULL)) {
+    if ((Self__NNGC->capacity__X3BC == Self__NNGC->count__ZOGC)) {
+      idx__GOID= 0;
+      node1__KOID=NULL;
+      node2__LOID=NULL;
+      old_buckets__JOID=Self__NNGC->buckets__OAGC;
+      new_capacity__HOID=prime_number_ceiling__T11((__INTEGER)(Self__NNGC->capacity__X3BC +  1));
+      Self__NNGC->buckets__OAGC=create__HRSC(new_capacity__HOID);
+      i__IOID=(__INTEGER)(Self__NNGC->capacity__X3BC -  1);
+      Self__NNGC->capacity__X3BC=new_capacity__HOID;
+      while ((i__IOID >=  0)) {
+        node1__KOID=((void **)old_buckets__JOID)[i__IOID];
+        while (((void *)node1__KOID != (void *)NULL)) {
+          node2__LOID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__KOID)->next__FBGC;
+          Self__2AIH=((__STRING_CONSTANT *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__KOID)->key__0AGC);
+          result__1AIH= 0;
+          __tmp__3AIH=Self__2AIH->count__DD;
+          Self__4AIH= 1;
+          while ((Self__4AIH <= __tmp__3AIH)) {
+            result__1AIH=(__INTEGER)((__INTEGER)( 5 * result__1AIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__2AIH->storage__ZNO)[(__INTEGER)(Self__4AIH -  1)])));
+            Self__4AIH=(__INTEGER)(Self__4AIH +  1);
+          };
+          if ((result__1AIH <  0)) {
+            result__1AIH=(__INTEGER)(~ result__1AIH);
+          };
+          idx__GOID=(__INTEGER)(result__1AIH % Self__NNGC->capacity__X3BC);
+          ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node1__KOID)->next__FBGC=((void **)Self__NNGC->buckets__OAGC)[idx__GOID];
+          ((void **)Self__NNGC->buckets__OAGC)[idx__GOID]=node1__KOID;
+          node1__KOID=node2__LOID;
+        };
+        i__IOID=(__INTEGER)(i__IOID -  1);
+      };
+      idx__XNGC=(__INTEGER)(result__WAIH % new_capacity__HOID);
+    };
+    __tmp__GPGC=((void **)Self__NNGC->buckets__OAGC)[idx__XNGC];
+    result__PQID=NULL;
+    ptr__QQID=((__POINTER )(NULL));
+    typ_id__VQID= 0;
+    sz__SQID=((__UINTEGER_32 )sizeof(__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo));
+    if ((sz__SQID ==  0)) {
+      result__PQID=HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+    } else {
+      typ_id__VQID=__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SQID);
+      if ((typ_id__VQID == (__INTEGER)(-  1))) {
+        a__5IGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__AJGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SQID + a__5IGH) & (__UINTEGER_32)(~ a__5IGH));
+        ptr_table__2RJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AJGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__1RJH=((__POINTER )(NULL));
+        result__3RJH=((__POINTER *)ptr_table__2RJH)[ 0];
+        if ((result__3RJH == (void *)NULL)) {
+          result__3RJH=new_lab__ZPJ(new_size__AJGH);
+          next__1RJH=(void *)((unsigned long)result__3RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AJGH)));
+          ((__POINTER *)next__1RJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2RJH)[ 0]=next__1RJH;
+        } else {
+          next__1RJH=((__POINTER *)result__3RJH)[ 0];
+          if ((next__1RJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3RJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__AJGH <<  1)) <=  4096)) {
+              next__1RJH=(void *)((unsigned long)result__3RJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AJGH)));
             } else {
-              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)));
+              next__1RJH=new_lab__ZPJ(new_size__AJGH);
+            };
+            ((__POINTER *)next__1RJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2RJH)[ 0]=next__1RJH;
+          } else {
+            ((__POINTER *)result__3RJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1RJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3RJH=next__1RJH;
+          };
+        };
+        ptr__QQID=result__3RJH;
+      } else {
+        t__EJGH=((__UINTEGER_32 )typ_id__VQID);
+        a__DJGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__ESJH=(__UINTEGER_32)((__UINTEGER_32)(sz__SQID + a__DJGH) & (__UINTEGER_32)(~ a__DJGH));
+        ptr_table__BSJH=((__POINTER )(&(table_type[(t__EJGH)])));
+        lab_type__DSJH=(__UINTEGER_32)(t__EJGH |  1);
+        next__ASJH=((__POINTER )(NULL));
+        result__CSJH=((__POINTER *)ptr_table__BSJH)[ 0];
+        if ((result__CSJH == (void *)NULL)) {
+          result__CSJH=new_lab__ZPJ(lab_type__DSJH);
+          next__ASJH=(void *)((unsigned long)result__CSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESJH)));
+          ((__POINTER *)next__ASJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BSJH)[ 0]=next__ASJH;
+        } else {
+          next__ASJH=((__POINTER *)result__CSJH)[ 0];
+          if ((next__ASJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CSJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ESJH <<  1)) <=  4096)) {
+              next__ASJH=(void *)((unsigned long)result__CSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ESJH)));
             } else {
-              next__XNJH=new_lab__QOJ(lab_type__0NJH);
+              next__ASJH=new_lab__ZPJ(lab_type__DSJH);
             };
-            ((__POINTER *)next__XNJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YNJH)[ 0]=next__XNJH;
+            ((__POINTER *)next__ASJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BSJH)[ 0]=next__ASJH;
           } else {
-            ((__POINTER *)result__ZNJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XNJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZNJH=next__XNJH;
+            ((__POINTER *)result__CSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ASJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CSJH=next__ASJH;
           };
         };
-        ptr__PPID=result__ZNJH;
+        ptr__QQID=result__CSJH;
       };
-      result__OPID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__PPID);
-      *(result__OPID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
+      result__PQID=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)ptr__QQID);
+      *(result__PQID) = *(HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo__);
     };
-    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);
+    Self__QDTD=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)result__PQID);
+    Self__QDTD->item__NBGC=v__ONGC;
+    Self__QDTD->key__0AGC=k__PNGC;
+    Self__QDTD->next__FBGC=__tmp__GPGC;
+    node__YNGC=result__PQID;
+    ((void **)Self__NNGC->buckets__OAGC)[idx__XNGC]=result__PQID;
+    Self__NNGC->count__ZOGC=(__INTEGER)(Self__NNGC->count__ZOGC +  1);
   } else {
-    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__EMGC)->item__Z5FC=v__0LGC;
+    ((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__YNGC)->item__NBGC=v__ONGC;
   };
 }
 
-static void* fast_reference_at__H4FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__I4FC,void *k__J4FC)
+static void* fast_reference_at__15FC(__HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo *Self__25FC,void *k__35FC)
 // ({HASHED_DICTIONARYoITM_SLOTxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *result__IAGC;
+  __STRING_CONSTANT *Self__BBIH;
+  __INTEGER result__ABIH,__tmp__CBIH,Self__DBIH;
+  void *node__HAGC;
+  result__IAGC=NULL;
+  Self__BBIH=((__STRING_CONSTANT *)k__35FC);
+  result__ABIH= 0;
+  __tmp__CBIH=Self__BBIH->count__DD;
+  Self__DBIH= 1;
+  while ((Self__DBIH <= __tmp__CBIH)) {
+    result__ABIH=(__INTEGER)((__INTEGER)( 5 * result__ABIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BBIH->storage__ZNO)[(__INTEGER)(Self__DBIH -  1)])));
+    Self__DBIH=(__INTEGER)(Self__DBIH +  1);
+  };
+  if ((result__ABIH <  0)) {
+    result__ABIH=(__INTEGER)(~ result__ABIH);
+  };
+  node__HAGC=((void **)Self__25FC->buckets__OAGC)[(__INTEGER)(result__ABIH % Self__25FC->capacity__X3BC)];
+  while ((! (((void *)node__HAGC == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__HAGC)->key__0AGC == (void *)k__35FC)))) {
+    node__HAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__HAGC)->next__FBGC;
+  };
+  if (((void *)node__HAGC != (void *)NULL)) {
+    result__IAGC=((__HASHED_DICTIONARY_NODEoITM_SLOTxSTRING_CONSTANTo *)node__HAGC)->item__NBGC;
+  };
+  return(result__IAGC);
 }
 
-static void* fast_reference_at__HFNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__IFNE,void *k__JFNE)
+static void* fast_reference_at__LHNE(__HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *Self__MHNE,void *k__NHNE)
 // ({HASHED_DICTIONARYoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __STRING_CONSTANT *Self__GBIH;
+  __INTEGER result__FBIH,__tmp__HBIH,Self__IBIH;
+  void *result__XHNE;
+  void *node__WHNE;
+  result__XHNE=NULL;
+  Self__GBIH=((__STRING_CONSTANT *)k__NHNE);
+  result__FBIH= 0;
+  __tmp__HBIH=Self__GBIH->count__DD;
+  Self__IBIH= 1;
+  while ((Self__IBIH <= __tmp__HBIH)) {
+    result__FBIH=(__INTEGER)((__INTEGER)( 5 * result__FBIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GBIH->storage__ZNO)[(__INTEGER)(Self__IBIH -  1)])));
+    Self__IBIH=(__INTEGER)(Self__IBIH +  1);
+  };
+  if ((result__FBIH <  0)) {
+    result__FBIH=(__INTEGER)(~ result__FBIH);
+  };
+  node__WHNE=((void **)Self__MHNE->buckets__DAT)[(__INTEGER)(result__FBIH % Self__MHNE->capacity__45S)];
+  while ((! (((void *)node__WHNE == (void *)NULL) || ((void *)((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WHNE)->key__PAT == (void *)k__NHNE)))) {
+    node__WHNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WHNE)->next__0AT;
+  };
+  if (((void *)node__WHNE != (void *)NULL)) {
+    result__XHNE=((__HASHED_DICTIONARY_NODEoLINKED_LISToSTRING_CONSTANToxSTRING_CONSTANTo *)node__WHNE)->item__DV3;
+  };
+  return(result__XHNE);
 }
 
-static void append_in__EFPD(__ITM_TYPE_BLOCK *Self__FFPD,void *buffer__GFPD)
+static void append_in__0EPD(__ITM_TYPE_BLOCK *Self__1EPD,void *buffer__2EPD)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__3EPD,*__tmp__PFPD;
+  void *__tmp__EFPD,*__tmp__OFPD,*__tmp__VFPD;
+  __ITM_TYPE_STYLE *Self__2JGH,*Self__4JGH;
+  typ_mul__3EPD=NULL;
+  add_last__3IT(buffer__2EPD,'{');
+  if (((void *)Self__1EPD->type_argument__0JN != (void *)NULL)) {
+    __tmp__EFPD=Self__1EPD->type_argument__0JN;
+    switch (((struct ___OBJ *)__tmp__EFPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__2JS(buffer__GFPD,((__ITM_TYPE_PARAMETER *)__tmp__OFPD)->parent_itm_type__LAE.name__FUP);
+      append__FLS(buffer__2EPD,((__ITM_TYPE_PARAMETER *)__tmp__EFPD)->parent_itm_type__UBE.name__OVP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__2JS(buffer__GFPD,((__ITM_TYPE_SIMPLE *)__tmp__OFPD)->name__FUP);
+      append__FLS(buffer__2EPD,((__ITM_TYPE_SIMPLE *)__tmp__EFPD)->name__OVP);
     } break;
     case __ITM_TYPE_MULTI__: {
-      append_in__BGBC(__tmp__OFPD,buffer__GFPD);
+      append_in__NHBC(__tmp__EFPD,buffer__2EPD);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__EFPD(__tmp__OFPD,buffer__GFPD);
+      append_in__0EPD(__tmp__EFPD,buffer__2EPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__IGPD(__tmp__OFPD,buffer__GFPD);
+      append_in__4FPD(__tmp__EFPD,buffer__2EPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__2JGH=((__ITM_TYPE_STYLE *)__tmp__EFPD);
+      if (((void *)Self__2JGH->style__XVP != (void *)NULL)) {
+        append__FLS(buffer__2EPD,Self__2JGH->style__XVP);
+        add_last__3IT(buffer__2EPD,' ');
       };
-      append__2JS(buffer__GFPD,Self__TFGH->parent_itm_type_simple__2NN.name__FUP);
+      append__FLS(buffer__2EPD,Self__2JGH->parent_itm_type_simple__FPN.name__OVP);
     } break;
     };
-    add_last__UHT(buffer__GFPD,';');
-    add_last__UHT(buffer__GFPD,' ');
+    add_last__3IT(buffer__2EPD,';');
+    add_last__3IT(buffer__2EPD,' ');
   };
-  if (((void *)Self__FFPD->type_result__1IN != (void *)NULL)) {
-    __tmp__YFPD=Self__FFPD->type_result__1IN;
-    if (__tmp__YFPD==NULL) {
-      __tmp__ZFPD=NULL;
+  if (((void *)Self__1EPD->type_result__EKN != (void *)NULL)) {
+    __tmp__OFPD=Self__1EPD->type_result__EKN;
+    if (__tmp__OFPD==NULL) {
+      __tmp__PFPD=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__YFPD)->__id) {
+      switch (((struct ___OBJ *)__tmp__OFPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__ZFPD=NULL;
+        __tmp__PFPD=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__ZFPD=NULL;
+        __tmp__PFPD=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__ZFPD=((void *)__tmp__YFPD);
+        __tmp__PFPD=((void *)__tmp__OFPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__ZFPD=NULL;
+        __tmp__PFPD=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__ZFPD=NULL;
+        __tmp__PFPD=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__ZFPD=NULL;
+        __tmp__PFPD=NULL;
       } break;
       }
     };
-    typ_mul__HFPD=__tmp__ZFPD;
-    if (((void *)__tmp__ZFPD == (void *)NULL)) {
-      __tmp__5FPD=Self__FFPD->type_result__1IN;
-      switch (((struct ___OBJ *)__tmp__5FPD)->__id) {
+    typ_mul__3EPD=__tmp__PFPD;
+    if (((void *)__tmp__PFPD == (void *)NULL)) {
+      __tmp__VFPD=Self__1EPD->type_result__EKN;
+      switch (((struct ___OBJ *)__tmp__VFPD)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        append__2JS(buffer__GFPD,((__ITM_TYPE_PARAMETER *)__tmp__5FPD)->parent_itm_type__LAE.name__FUP);
+        append__FLS(buffer__2EPD,((__ITM_TYPE_PARAMETER *)__tmp__VFPD)->parent_itm_type__UBE.name__OVP);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        append__2JS(buffer__GFPD,((__ITM_TYPE_SIMPLE *)__tmp__5FPD)->name__FUP);
+        append__FLS(buffer__2EPD,((__ITM_TYPE_SIMPLE *)__tmp__VFPD)->name__OVP);
       } break;
       case __ITM_TYPE_MULTI__: {
-        append_in__BGBC(__tmp__5FPD,buffer__GFPD);
+        append_in__NHBC(__tmp__VFPD,buffer__2EPD);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        append_in__EFPD(__tmp__5FPD,buffer__GFPD);
+        append_in__0EPD(__tmp__VFPD,buffer__2EPD);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        append_in__IGPD(__tmp__5FPD,buffer__GFPD);
+        append_in__4FPD(__tmp__VFPD,buffer__2EPD);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__4JGH=((__ITM_TYPE_STYLE *)__tmp__VFPD);
+        if (((void *)Self__4JGH->style__XVP != (void *)NULL)) {
+          append__FLS(buffer__2EPD,Self__4JGH->style__XVP);
+          add_last__3IT(buffer__2EPD,' ');
         };
-        append__2JS(buffer__GFPD,Self__VFGH->parent_itm_type_simple__2NN.name__FUP);
+        append__FLS(buffer__2EPD,Self__4JGH->parent_itm_type_simple__FPN.name__OVP);
       } break;
       };
     } else {
-      display_raw__ZJIC(__tmp__ZFPD,buffer__GFPD);
+      display_raw__NLIC(__tmp__PFPD,buffer__2EPD);
     };
   };
-  add_last__UHT(buffer__GFPD,'}');
+  add_last__3IT(buffer__2EPD,'}');
 }
 
-static void append_in__IGPD(__ITM_TYPE_GENERIC *Self__JGPD,void *buffer__KGPD)
+static void append_in__4FPD(__ITM_TYPE_GENERIC *Self__5FPD,void *buffer__AGPD)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__RGPD,Self__DYUD;
+  void *__tmp__YGPD,*__tmp__1GPD;
+  __ITM_TYPE_STYLE *Self__DKGH,*Self__3GPD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__DBRB;
+  if (((void *)Self__5FPD->parent_itm_type_style__GPN.style__XVP != (void *)NULL)) {
+    append__FLS(buffer__AGPD,Self__5FPD->parent_itm_type_style__GPN.style__XVP);
+    add_last__3IT(buffer__AGPD,' ');
+  };
+  append__FLS(buffer__AGPD,Self__5FPD->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP);
+  add_last__3IT(buffer__AGPD,'(');
+  __tmp__RGPD=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__5FPD->list_type__BWP)->parent_arrayed_collection__EYC.upper__GFV -  1);
+  Self__DYUD= 0;
+  while ((Self__DYUD <= __tmp__RGPD)) {
+    __tmp__YGPD=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__5FPD->list_type__BWP)->parent_arrayed_collection__EYC.storage__NJV)[Self__DYUD];
+    switch (((struct ___OBJ *)__tmp__YGPD)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__2JS(buffer__KGPD,((__ITM_TYPE_PARAMETER *)__tmp__CHPD)->parent_itm_type__LAE.name__FUP);
+      append__FLS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__YGPD)->parent_itm_type__UBE.name__OVP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__2JS(buffer__KGPD,((__ITM_TYPE_SIMPLE *)__tmp__CHPD)->name__FUP);
+      append__FLS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__YGPD)->name__OVP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__EFPD(__tmp__CHPD,buffer__KGPD);
+      append_in__0EPD(__tmp__YGPD,buffer__AGPD);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__IGPD(__tmp__CHPD,buffer__KGPD);
+      append_in__4FPD(__tmp__YGPD,buffer__AGPD);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__DKGH=((__ITM_TYPE_STYLE *)__tmp__YGPD);
+      if (((void *)Self__DKGH->style__XVP != (void *)NULL)) {
+        append__FLS(buffer__AGPD,Self__DKGH->style__XVP);
+        add_last__3IT(buffer__AGPD,' ');
       };
-      append__2JS(buffer__KGPD,Self__0FGH->parent_itm_type_simple__2NN.name__FUP);
+      append__FLS(buffer__AGPD,Self__DKGH->parent_itm_type_simple__FPN.name__OVP);
     } break;
     };
-    add_last__UHT(buffer__KGPD,',');
-    Self__RYUD=(__INTEGER)(Self__RYUD +  1);
+    add_last__3IT(buffer__AGPD,',');
+    Self__DYUD=(__INTEGER)(Self__DYUD +  1);
   };
-  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) {
+  Self__DBRB=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__5FPD->list_type__BWP);
+  __tmp__1GPD=((void **)Self__DBRB->parent_arrayed_collection__EYC.storage__NJV)[Self__DBRB->parent_arrayed_collection__EYC.upper__GFV];
+  switch (((struct ___OBJ *)__tmp__1GPD)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__2JS(buffer__KGPD,((__ITM_TYPE_PARAMETER *)__tmp__FHPD)->parent_itm_type__LAE.name__FUP);
+    append__FLS(buffer__AGPD,((__ITM_TYPE_PARAMETER *)__tmp__1GPD)->parent_itm_type__UBE.name__OVP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__2JS(buffer__KGPD,((__ITM_TYPE_SIMPLE *)__tmp__FHPD)->name__FUP);
+    append__FLS(buffer__AGPD,((__ITM_TYPE_SIMPLE *)__tmp__1GPD)->name__OVP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__EFPD(__tmp__FHPD,buffer__KGPD);
+    append_in__0EPD(__tmp__1GPD,buffer__AGPD);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__IGPD(__tmp__FHPD,buffer__KGPD);
+    append_in__4FPD(__tmp__1GPD,buffer__AGPD);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__3GPD=((__ITM_TYPE_STYLE *)__tmp__1GPD);
+    if (((void *)Self__3GPD->style__XVP != (void *)NULL)) {
+      append__FLS(buffer__AGPD,Self__3GPD->style__XVP);
+      add_last__3IT(buffer__AGPD,' ');
     };
-    append__2JS(buffer__KGPD,Self__HHPD->parent_itm_type_simple__2NN.name__FUP);
+    append__FLS(buffer__AGPD,Self__3GPD->parent_itm_type_simple__FPN.name__OVP);
   } break;
   };
-  add_last__UHT(buffer__KGPD,')');
+  add_last__3IT(buffer__AGPD,')');
 }
 
-static void put__to__like__3BBG(void *tok__5BBG,void *buf__ACBG,void *key__BCBG)
+static void put__to__like__IGBG(void *tok__KGBG,void *buf__LGBG,void *key__MGBG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__3GBG,Self__JIHG;
+  void *lst__NGBG;
+  lst__NGBG=NULL;
+  if (((void *)key__MGBG != (void *)NULL)) {
+    lst__NGBG=fast_reference_at__LHNE(short_dico__QD,key__MGBG);
+    if (((void *)lst__NGBG != (void *)NULL)) {
+      __tmp__3GBG=((__LINKED_LISToSTRING_CONSTANTo *)lst__NGBG)->parent_linked_collection__LD.upper__MDD;
+      Self__JIHG= 1;
+      while ((Self__JIHG <= __tmp__3GBG)) {
+        if (((void *)item__CZND(lst__NGBG,Self__JIHG) == (void *)NULL)) {
+          append__FLS(buf__LGBG,tok__KGBG);
         } else {
-          append__2JS(buf__ACBG,item__MZND(lst__CCBG,Self__4DHG));
+          append__FLS(buf__LGBG,item__CZND(lst__NGBG,Self__JIHG));
         };
-        Self__4DHG=(__INTEGER)(Self__4DHG +  1);
+        Self__JIHG=(__INTEGER)(Self__JIHG +  1);
       };
     };
   };
 }
 
-static void shorter_in__44AG(__ITM_ARG *Self__54AG,void *buf__A5AG)
+static void shorter_in__JDBG(__ITM_ARG *Self__KDBG,void *buf__LDBG)
 // ({ITM_ARG},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  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));
+  void *__tmp__5DBG;
+  __ITM_TYPE_STYLE *Self__HKGH;
+  if (((void *)Self__KDBG->name__G0HC == (void *)(&__string_58))) {
+    put__to__like__TKGG(Self__KDBG->name__G0HC,buf__LDBG,(&__string_119));
   } else {
-    put__to__like__IGGG(Self__54AG->name__SYHC,buf__A5AG,(&__string_134));
+    put__to__like__TKGG(Self__KDBG->name__G0HC,buf__LDBG,(&__string_134));
   };
-  add_last__UHT(buf__A5AG,':');
-  __tmp__U5AG=Self__54AG->type__TYHC;
-  switch (((struct ___OBJ *)__tmp__U5AG)->__id) {
+  add_last__3IT(buf__LDBG,':');
+  __tmp__5DBG=Self__KDBG->type__H0HC;
+  switch (((struct ___OBJ *)__tmp__5DBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__OIDG(__tmp__U5AG,buf__A5AG);
+    shorter_in__ZMDG(__tmp__5DBG,buf__LDBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__5IDG(__tmp__U5AG,buf__A5AG);
+    shorter_in__KNDG(__tmp__5DBG,buf__LDBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__QJDG(__tmp__U5AG,buf__A5AG);
+    shorter_in__1NDG(__tmp__5DBG,buf__LDBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__YKDG(__tmp__U5AG,buf__A5AG);
+    shorter_in__DPDG(__tmp__5DBG,buf__LDBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__HKGH=((__ITM_TYPE_STYLE *)__tmp__5DBG);
+    if (((void *)Self__HKGH->style__XVP != (void *)NULL)) {
+      put__to__like__HTFG(Self__HKGH->style__XVP,buf__LDBG,(&__string_119));
+      add_last__3IT(buf__LDBG,' ');
     };
-    put__to__like__2OFG(Self__4FGH->parent_itm_type_simple__2NN.name__FUP,buf__A5AG,(&__string_125));
+    put__to__like__HTFG(Self__HKGH->parent_itm_type_simple__FPN.name__OVP,buf__LDBG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__V5AG(__ITM_ARGS *Self__W5AG,void *buf__X5AG)
+static void shorter_in__AEBG(__ITM_ARGS *Self__BEBG,void *buf__CEBG)
 // ({ITM_ARGS},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__JEBG,Self__0QDG;
+  void *__tmp__IFBG,*__tmp__QFBG;
+  __ITM_TYPE_STYLE *Self__1KGH,*Self__5KGH;
+  __FAST_ARRAYoSTRING_CONSTANTo *Self__3QHH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__3KGH;
+  add_last__3IT(buf__CEBG,'(');
+  __tmp__JEBG=(__INTEGER)(((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BEBG->name__W2PF)->parent_arrayed_collection__U3I.upper__H4OD -  1);
+  Self__0QDG= 0;
+  while ((Self__0QDG <= __tmp__JEBG)) {
+    if (((void *)((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BEBG->name__W2PF)->parent_arrayed_collection__U3I.storage__3APD)[Self__0QDG] == (void *)(&__string_58))) {
+      put__to__like__MRDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BEBG->name__W2PF)->parent_arrayed_collection__U3I.storage__3APD)[Self__0QDG],buf__CEBG,(&__string_119));
+    } else {
+      put__to__like__MRDG(((void **)((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BEBG->name__W2PF)->parent_arrayed_collection__U3I.storage__3APD)[Self__0QDG],buf__CEBG,(&__string_134));
+    };
+    add_last__3IT(buf__CEBG,':');
+    __tmp__IFBG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__BEBG->type__X2PF)->list_type__EHP)->parent_arrayed_collection__EYC.storage__NJV)[Self__0QDG];
+    switch (((struct ___OBJ *)__tmp__IFBG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__3ABG,buf__X5AG);
+      shorter_in__ZMDG(__tmp__IFBG,buf__CEBG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__3ABG,buf__X5AG);
+      shorter_in__KNDG(__tmp__IFBG,buf__CEBG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__3ABG,buf__X5AG);
+      shorter_in__1NDG(__tmp__IFBG,buf__CEBG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__3ABG,buf__X5AG);
+      shorter_in__DPDG(__tmp__IFBG,buf__CEBG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__1KGH=((__ITM_TYPE_STYLE *)__tmp__IFBG);
+      if (((void *)Self__1KGH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__1KGH->style__XVP,buf__CEBG,(&__string_119));
+        add_last__3IT(buf__CEBG,' ');
       };
-      put__to__like__2OFG(Self__SGGH->parent_itm_type_simple__2NN.name__FUP,buf__X5AG,(&__string_125));
+      put__to__like__HTFG(Self__1KGH->parent_itm_type_simple__FPN.name__OVP,buf__CEBG,(&__string_125));
     } break;
     };
-    add_last__UHT(buf__X5AG,',');
-    Self__PMDG=(__INTEGER)(Self__PMDG +  1);
+    add_last__3IT(buf__CEBG,',');
+    Self__0QDG=(__INTEGER)(Self__0QDG +  1);
   };
-  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) {
+  Self__3QHH=((__FAST_ARRAYoSTRING_CONSTANTo *)Self__BEBG->name__W2PF);
+  put__to__like__MRDG(((void **)Self__3QHH->parent_arrayed_collection__U3I.storage__3APD)[Self__3QHH->parent_arrayed_collection__U3I.upper__H4OD],buf__CEBG,(&__string_134));
+  add_last__3IT(buf__CEBG,':');
+  Self__3KGH=((__FAST_ARRAYoITM_TYPE_MONOo *)((__ITM_TYPE_MULTI *)Self__BEBG->type__X2PF)->list_type__EHP);
+  __tmp__QFBG=((void **)Self__3KGH->parent_arrayed_collection__EYC.storage__NJV)[Self__3KGH->parent_arrayed_collection__EYC.upper__GFV];
+  switch (((struct ___OBJ *)__tmp__QFBG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__OIDG(__tmp__FBBG,buf__X5AG);
+    shorter_in__ZMDG(__tmp__QFBG,buf__CEBG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__5IDG(__tmp__FBBG,buf__X5AG);
+    shorter_in__KNDG(__tmp__QFBG,buf__CEBG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__QJDG(__tmp__FBBG,buf__X5AG);
+    shorter_in__1NDG(__tmp__QFBG,buf__CEBG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__YKDG(__tmp__FBBG,buf__X5AG);
+    shorter_in__DPDG(__tmp__QFBG,buf__CEBG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__5KGH=((__ITM_TYPE_STYLE *)__tmp__QFBG);
+    if (((void *)Self__5KGH->style__XVP != (void *)NULL)) {
+      put__to__like__HTFG(Self__5KGH->style__XVP,buf__CEBG,(&__string_119));
+      add_last__3IT(buf__CEBG,' ');
     };
-    put__to__like__2OFG(Self__WGGH->parent_itm_type_simple__2NN.name__FUP,buf__X5AG,(&__string_125));
+    put__to__like__HTFG(Self__5KGH->parent_itm_type_simple__FPN.name__OVP,buf__CEBG,(&__string_125));
   } break;
   };
-  add_last__UHT(buf__X5AG,')');
+  add_last__3IT(buf__CEBG,')');
 }
 
-static void shorter_in__OIDG(__ITM_TYPE_PARAMETER *Self__PIDG,void *buf__QIDG)
+static void shorter_in__ZMDG(__ITM_TYPE_PARAMETER *Self__0MDG,void *buf__1MDG)
 // ({ITM_TYPE_PARAMETER},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__QGFG;
-  __INTEGER __tmp__DHFG,Self__2THG;
-  void *lst__TGFG;
-  tok__QGFG=Self__PIDG->parent_itm_type__LAE.name__FUP;
-  lst__TGFG=NULL;
+  void *tok__1KFG;
+  __INTEGER __tmp__OLFG,Self__HYHG;
+  void *lst__4KFG;
+  tok__1KFG=Self__0MDG->parent_itm_type__UBE.name__OVP;
+  lst__4KFG=NULL;
   if (((void *)(&__string_126) != (void *)NULL)) {
-    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);
+    lst__4KFG=fast_reference_at__LHNE(short_dico__QD,(&__string_126));
+    if (((void *)lst__4KFG != (void *)NULL)) {
+      __tmp__OLFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__4KFG)->parent_linked_collection__LD.upper__MDD;
+      Self__HYHG= 1;
+      while ((Self__HYHG <= __tmp__OLFG)) {
+        if (((void *)item__CZND(lst__4KFG,Self__HYHG) == (void *)NULL)) {
+          append__FLS(buf__1MDG,tok__1KFG);
         } else {
-          append__2JS(buf__QIDG,item__MZND(lst__TGFG,Self__2THG));
+          append__FLS(buf__1MDG,item__CZND(lst__4KFG,Self__HYHG));
         };
-        Self__2THG=(__INTEGER)(Self__2THG +  1);
+        Self__HYHG=(__INTEGER)(Self__HYHG +  1);
       };
     };
   };
 }
 
-static void shorter_in__5IDG(__ITM_TYPE_SIMPLE *Self__AJDG,void *buf__BJDG)
+static void shorter_in__KNDG(__ITM_TYPE_SIMPLE *Self__LNDG,void *buf__MNDG)
 // ({ITM_TYPE_SIMPLE},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  void *tok__KIFG;
-  __INTEGER __tmp__3IFG,Self__NUHG;
-  void *lst__NIFG;
-  tok__KIFG=Self__AJDG->name__FUP;
-  lst__NIFG=NULL;
+  void *tok__VMFG;
+  __INTEGER __tmp__INFG,Self__YYHG;
+  void *lst__YMFG;
+  tok__VMFG=Self__LNDG->name__OVP;
+  lst__YMFG=NULL;
   if (((void *)(&__string_125) != (void *)NULL)) {
-    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);
+    lst__YMFG=fast_reference_at__LHNE(short_dico__QD,(&__string_125));
+    if (((void *)lst__YMFG != (void *)NULL)) {
+      __tmp__INFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__YMFG)->parent_linked_collection__LD.upper__MDD;
+      Self__YYHG= 1;
+      while ((Self__YYHG <= __tmp__INFG)) {
+        if (((void *)item__CZND(lst__YMFG,Self__YYHG) == (void *)NULL)) {
+          append__FLS(buf__MNDG,tok__VMFG);
         } else {
-          append__2JS(buf__BJDG,item__MZND(lst__NIFG,Self__NUHG));
+          append__FLS(buf__MNDG,item__CZND(lst__YMFG,Self__YYHG));
         };
-        Self__NUHG=(__INTEGER)(Self__NUHG +  1);
+        Self__YYHG=(__INTEGER)(Self__YYHG +  1);
       };
     };
   };
 }
 
-static void shorter_raw_in__ARFG(__ITM_TYPE_MULTI *Self__BRFG,void *buf__CRFG)
+static void shorter_raw_in__LVFG(__ITM_TYPE_MULTI *Self__MVFG,void *buf__NVFG)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__UVFG,Self__COGG;
+  void *__tmp__1VFG,*__tmp__4VFG;
+  __ITM_TYPE_STYLE *Self__ELGH,*Self__ILGH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__GLGH;
+  __tmp__UVFG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__MVFG->list_type__EHP)->parent_arrayed_collection__EYC.upper__GFV -  1);
+  Self__COGG= 0;
+  while ((Self__COGG <= __tmp__UVFG)) {
+    __tmp__1VFG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__MVFG->list_type__EHP)->parent_arrayed_collection__EYC.storage__NJV)[Self__COGG];
+    switch (((struct ___OBJ *)__tmp__1VFG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__QRFG,buf__CRFG);
+      shorter_in__ZMDG(__tmp__1VFG,buf__NVFG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__QRFG,buf__CRFG);
+      shorter_in__KNDG(__tmp__1VFG,buf__NVFG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__QRFG,buf__CRFG);
+      shorter_in__1NDG(__tmp__1VFG,buf__NVFG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__QRFG,buf__CRFG);
+      shorter_in__DPDG(__tmp__1VFG,buf__NVFG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__ELGH=((__ITM_TYPE_STYLE *)__tmp__1VFG);
+      if (((void *)Self__ELGH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__ELGH->style__XVP,buf__NVFG,(&__string_119));
+        add_last__3IT(buf__NVFG,' ');
       };
-      put__to__like__2OFG(Self__1GGH->parent_itm_type_simple__2NN.name__FUP,buf__CRFG,(&__string_125));
+      put__to__like__HTFG(Self__ELGH->parent_itm_type_simple__FPN.name__OVP,buf__NVFG,(&__string_125));
     } break;
     };
-    add_last__UHT(buf__CRFG,',');
-    Self__XJGG=(__INTEGER)(Self__XJGG +  1);
+    add_last__3IT(buf__NVFG,',');
+    Self__COGG=(__INTEGER)(Self__COGG +  1);
   };
-  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) {
+  Self__GLGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__MVFG->list_type__EHP);
+  __tmp__4VFG=((void **)Self__GLGH->parent_arrayed_collection__EYC.storage__NJV)[Self__GLGH->parent_arrayed_collection__EYC.upper__GFV];
+  switch (((struct ___OBJ *)__tmp__4VFG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__OIDG(__tmp__TRFG,buf__CRFG);
+    shorter_in__ZMDG(__tmp__4VFG,buf__NVFG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__5IDG(__tmp__TRFG,buf__CRFG);
+    shorter_in__KNDG(__tmp__4VFG,buf__NVFG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__QJDG(__tmp__TRFG,buf__CRFG);
+    shorter_in__1NDG(__tmp__4VFG,buf__NVFG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__YKDG(__tmp__TRFG,buf__CRFG);
+    shorter_in__DPDG(__tmp__4VFG,buf__NVFG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__ILGH=((__ITM_TYPE_STYLE *)__tmp__4VFG);
+    if (((void *)Self__ILGH->style__XVP != (void *)NULL)) {
+      put__to__like__HTFG(Self__ILGH->style__XVP,buf__NVFG,(&__string_119));
+      add_last__3IT(buf__NVFG,' ');
     };
-    put__to__like__2OFG(Self__5GGH->parent_itm_type_simple__2NN.name__FUP,buf__CRFG,(&__string_125));
+    put__to__like__HTFG(Self__ILGH->parent_itm_type_simple__FPN.name__OVP,buf__NVFG,(&__string_125));
   } break;
   };
 }
 
-static void shorter_in__QJDG(__ITM_TYPE_BLOCK *Self__RJDG,void *buf__SJDG)
+static void shorter_in__1NDG(__ITM_TYPE_BLOCK *Self__2NDG,void *buf__3NDG)
 // ({ITM_TYPE_BLOCK},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *typ_mul__4NDG,*__tmp__SODG;
+  void *__tmp__HODG,*__tmp__RODG,*__tmp__YODG;
+  __ITM_TYPE_MULTI *Self__4KYG,*Self__ALYG;
+  __ITM_TYPE_STYLE *Self__KLGH,*Self__MLGH;
+  typ_mul__4NDG=NULL;
+  put__to__like__FOFG((&__string_299),buf__3NDG);
+  if (((void *)Self__2NDG->type_argument__0JN != (void *)NULL)) {
+    __tmp__HODG=Self__2NDG->type_argument__0JN;
+    switch (((struct ___OBJ *)__tmp__HODG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__2JDG,buf__SJDG);
+      shorter_in__ZMDG(__tmp__HODG,buf__3NDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__2JDG,buf__SJDG);
+      shorter_in__KNDG(__tmp__HODG,buf__3NDG);
     } break;
     case __ITM_TYPE_MULTI__: {
-      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,')');
+      Self__4KYG=((__ITM_TYPE_MULTI *)__tmp__HODG);
+      add_last__3IT(buf__3NDG,'(');
+      shorter_raw_in__LVFG(Self__4KYG,buf__3NDG);
+      add_last__3IT(buf__3NDG,')');
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__2JDG,buf__SJDG);
+      shorter_in__1NDG(__tmp__HODG,buf__3NDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__2JDG,buf__SJDG);
+      shorter_in__DPDG(__tmp__HODG,buf__3NDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__KLGH=((__ITM_TYPE_STYLE *)__tmp__HODG);
+      if (((void *)Self__KLGH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__KLGH->style__XVP,buf__3NDG,(&__string_119));
+        add_last__3IT(buf__3NDG,' ');
       };
-      put__to__like__2OFG(Self__BHGH->parent_itm_type_simple__2NN.name__FUP,buf__SJDG,(&__string_125));
+      put__to__like__HTFG(Self__KLGH->parent_itm_type_simple__FPN.name__OVP,buf__3NDG,(&__string_125));
     } break;
     };
-    add_last__UHT(buf__SJDG,';');
-    add_last__UHT(buf__SJDG,' ');
+    add_last__3IT(buf__3NDG,';');
+    add_last__3IT(buf__3NDG,' ');
   };
-  if (((void *)Self__RJDG->type_result__1IN != (void *)NULL)) {
-    __tmp__GKDG=Self__RJDG->type_result__1IN;
-    if (__tmp__GKDG==NULL) {
-      __tmp__HKDG=NULL;
+  if (((void *)Self__2NDG->type_result__EKN != (void *)NULL)) {
+    __tmp__RODG=Self__2NDG->type_result__EKN;
+    if (__tmp__RODG==NULL) {
+      __tmp__SODG=NULL;
     } else {
-      switch (((struct ___OBJ *)__tmp__GKDG)->__id) {
+      switch (((struct ___OBJ *)__tmp__RODG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        __tmp__HKDG=NULL;
+        __tmp__SODG=NULL;
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        __tmp__HKDG=NULL;
+        __tmp__SODG=NULL;
       } break;
       case __ITM_TYPE_MULTI__: {
-        __tmp__HKDG=((void *)__tmp__GKDG);
+        __tmp__SODG=((void *)__tmp__RODG);
       } break;
       case __ITM_TYPE_BLOCK__: {
-        __tmp__HKDG=NULL;
+        __tmp__SODG=NULL;
       } break;
       case __ITM_TYPE_GENERIC__: {
-        __tmp__HKDG=NULL;
+        __tmp__SODG=NULL;
       } break;
       case __ITM_TYPE_STYLE__: {
-        __tmp__HKDG=NULL;
+        __tmp__SODG=NULL;
       } break;
       }
     };
-    typ_mul__TJDG=__tmp__HKDG;
-    if (((void *)__tmp__HKDG == (void *)NULL)) {
-      __tmp__NKDG=Self__RJDG->type_result__1IN;
-      switch (((struct ___OBJ *)__tmp__NKDG)->__id) {
+    typ_mul__4NDG=__tmp__SODG;
+    if (((void *)__tmp__SODG == (void *)NULL)) {
+      __tmp__YODG=Self__2NDG->type_result__EKN;
+      switch (((struct ___OBJ *)__tmp__YODG)->__id) {
       case __ITM_TYPE_PARAMETER__: {
-        shorter_in__OIDG(__tmp__NKDG,buf__SJDG);
+        shorter_in__ZMDG(__tmp__YODG,buf__3NDG);
       } break;
       case __ITM_TYPE_SIMPLE__: {
-        shorter_in__5IDG(__tmp__NKDG,buf__SJDG);
+        shorter_in__KNDG(__tmp__YODG,buf__3NDG);
       } break;
       case __ITM_TYPE_MULTI__: {
-        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,')');
+        Self__ALYG=((__ITM_TYPE_MULTI *)__tmp__YODG);
+        add_last__3IT(buf__3NDG,'(');
+        shorter_raw_in__LVFG(Self__ALYG,buf__3NDG);
+        add_last__3IT(buf__3NDG,')');
       } break;
       case __ITM_TYPE_BLOCK__: {
-        shorter_in__QJDG(__tmp__NKDG,buf__SJDG);
+        shorter_in__1NDG(__tmp__YODG,buf__3NDG);
       } break;
       case __ITM_TYPE_GENERIC__: {
-        shorter_in__YKDG(__tmp__NKDG,buf__SJDG);
+        shorter_in__DPDG(__tmp__YODG,buf__3NDG);
       } break;
       case __ITM_TYPE_STYLE__: {
-        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,' ');
+        Self__MLGH=((__ITM_TYPE_STYLE *)__tmp__YODG);
+        if (((void *)Self__MLGH->style__XVP != (void *)NULL)) {
+          put__to__like__HTFG(Self__MLGH->style__XVP,buf__3NDG,(&__string_119));
+          add_last__3IT(buf__3NDG,' ');
         };
-        put__to__like__2OFG(Self__DHGH->parent_itm_type_simple__2NN.name__FUP,buf__SJDG,(&__string_125));
+        put__to__like__HTFG(Self__MLGH->parent_itm_type_simple__FPN.name__OVP,buf__3NDG,(&__string_125));
       } break;
       };
     } else {
-      shorter_raw_in__ARFG(__tmp__HKDG,buf__SJDG);
+      shorter_raw_in__LVFG(__tmp__SODG,buf__3NDG);
     };
   };
-  put__to__like__0JFG((&__string_300),buf__SJDG);
+  put__to__like__FOFG((&__string_300),buf__3NDG);
 }
 
-static void shorter_in__YKDG(__ITM_TYPE_GENERIC *Self__ZKDG,void *buf__0KDG)
+static void shorter_in__DPDG(__ITM_TYPE_GENERIC *Self__EPDG,void *buf__FPDG)
 // ({ITM_TYPE_GENERIC},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__0PDG,Self__KSFG;
+  void *__tmp__BQDG,*__tmp__EQDG;
+  __ITM_TYPE_STYLE *Self__RLGH,*Self__GQDG;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__TLGH;
+  if (((void *)Self__EPDG->parent_itm_type_style__GPN.style__XVP != (void *)NULL)) {
+    put__to__like__YQFG(Self__EPDG->parent_itm_type_style__GPN.style__XVP,buf__FPDG,(&__string_119));
+    add_last__3IT(buf__FPDG,' ');
+  };
+  put__to__like__YQFG(Self__EPDG->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP,buf__FPDG,(&__string_125));
+  add_last__3IT(buf__FPDG,'(');
+  __tmp__0PDG=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__EPDG->list_type__BWP)->parent_arrayed_collection__EYC.upper__GFV -  1);
+  Self__KSFG= 0;
+  while ((Self__KSFG <= __tmp__0PDG)) {
+    __tmp__BQDG=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__EPDG->list_type__BWP)->parent_arrayed_collection__EYC.storage__NJV)[Self__KSFG];
+    switch (((struct ___OBJ *)__tmp__BQDG)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      shorter_in__OIDG(__tmp__WLDG,buf__0KDG);
+      shorter_in__ZMDG(__tmp__BQDG,buf__FPDG);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      shorter_in__5IDG(__tmp__WLDG,buf__0KDG);
+      shorter_in__KNDG(__tmp__BQDG,buf__FPDG);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      shorter_in__QJDG(__tmp__WLDG,buf__0KDG);
+      shorter_in__1NDG(__tmp__BQDG,buf__FPDG);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      shorter_in__YKDG(__tmp__WLDG,buf__0KDG);
+      shorter_in__DPDG(__tmp__BQDG,buf__FPDG);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__RLGH=((__ITM_TYPE_STYLE *)__tmp__BQDG);
+      if (((void *)Self__RLGH->style__XVP != (void *)NULL)) {
+        put__to__like__HTFG(Self__RLGH->style__XVP,buf__FPDG,(&__string_119));
+        add_last__3IT(buf__FPDG,' ');
       };
-      put__to__like__2OFG(Self__IHGH->parent_itm_type_simple__2NN.name__FUP,buf__0KDG,(&__string_125));
+      put__to__like__HTFG(Self__RLGH->parent_itm_type_simple__FPN.name__OVP,buf__FPDG,(&__string_125));
     } break;
     };
-    add_last__UHT(buf__0KDG,',');
-    Self__5NFG=(__INTEGER)(Self__5NFG +  1);
+    add_last__3IT(buf__FPDG,',');
+    Self__KSFG=(__INTEGER)(Self__KSFG +  1);
   };
-  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) {
+  Self__TLGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__EPDG->list_type__BWP);
+  __tmp__EQDG=((void **)Self__TLGH->parent_arrayed_collection__EYC.storage__NJV)[Self__TLGH->parent_arrayed_collection__EYC.upper__GFV];
+  switch (((struct ___OBJ *)__tmp__EQDG)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    shorter_in__OIDG(__tmp__ZLDG,buf__0KDG);
+    shorter_in__ZMDG(__tmp__EQDG,buf__FPDG);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    shorter_in__5IDG(__tmp__ZLDG,buf__0KDG);
+    shorter_in__KNDG(__tmp__EQDG,buf__FPDG);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    shorter_in__QJDG(__tmp__ZLDG,buf__0KDG);
+    shorter_in__1NDG(__tmp__EQDG,buf__FPDG);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    shorter_in__YKDG(__tmp__ZLDG,buf__0KDG);
+    shorter_in__DPDG(__tmp__EQDG,buf__FPDG);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__GQDG=((__ITM_TYPE_STYLE *)__tmp__EQDG);
+    if (((void *)Self__GQDG->style__XVP != (void *)NULL)) {
+      put__to__like__HTFG(Self__GQDG->style__XVP,buf__FPDG,(&__string_119));
+      add_last__3IT(buf__FPDG,' ');
     };
-    put__to__like__2OFG(Self__1LDG->parent_itm_type_simple__2NN.name__FUP,buf__0KDG,(&__string_125));
+    put__to__like__HTFG(Self__GQDG->parent_itm_type_simple__FPN.name__OVP,buf__FPDG,(&__string_125));
   } break;
   };
-  add_last__UHT(buf__0KDG,')');
+  add_last__3IT(buf__FPDG,')');
 }
 
-static void put__to__like__2OFG(void *tok__4OFG,void *buf__5OFG,void *key__APFG)
+static void put__to__like__HTFG(void *tok__JTFG,void *buf__KTFG,void *key__LTFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__2TFG,Self__L0HG;
+  void *lst__MTFG;
+  lst__MTFG=NULL;
+  if (((void *)key__LTFG != (void *)NULL)) {
+    lst__MTFG=fast_reference_at__LHNE(short_dico__QD,key__LTFG);
+    if (((void *)lst__MTFG != (void *)NULL)) {
+      __tmp__2TFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__MTFG)->parent_linked_collection__LD.upper__MDD;
+      Self__L0HG= 1;
+      while ((Self__L0HG <= __tmp__2TFG)) {
+        if (((void *)item__CZND(lst__MTFG,Self__L0HG) == (void *)NULL)) {
+          append__FLS(buf__KTFG,tok__JTFG);
         } else {
-          append__2JS(buf__5OFG,item__MZND(lst__BPFG,Self__AWHG));
+          append__FLS(buf__KTFG,item__CZND(lst__MTFG,Self__L0HG));
         };
-        Self__AWHG=(__INTEGER)(Self__AWHG +  1);
+        Self__L0HG=(__INTEGER)(Self__L0HG +  1);
       };
     };
   };
 }
 
-static void put__to__like__GPDG(void *tok__IPDG,void *buf__JPDG,void *key__KPDG)
+static void put__to__like__RTDG(void *tok__TTDG,void *buf__UTDG,void *key__VTDG)
 // ({NULLxSTRING_CONSTANTxSTRING},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__GUDG,Self__SVHG;
+  void *lst__WTDG;
+  lst__WTDG=NULL;
+  if (((void *)key__VTDG != (void *)NULL)) {
+    lst__WTDG=fast_reference_at__LHNE(short_dico__QD,key__VTDG);
+    if (((void *)lst__WTDG != (void *)NULL)) {
+      __tmp__GUDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__WTDG)->parent_linked_collection__LD.upper__MDD;
+      Self__SVHG= 1;
+      while ((Self__SVHG <= __tmp__GUDG)) {
+        if (((void *)item__CZND(lst__WTDG,Self__SVHG) == (void *)NULL)) {
+          append__FLS(buf__UTDG,tok__TTDG);
         } else {
-          append__2JS(buf__JPDG,item__MZND(lst__LPDG,Self__HRHG));
+          append__FLS(buf__UTDG,item__CZND(lst__WTDG,Self__SVHG));
         };
-        Self__HRHG=(__INTEGER)(Self__HRHG +  1);
+        Self__SVHG=(__INTEGER)(Self__SVHG +  1);
       };
     };
   };
 }
 
-static void set_path__JJT(__DIRECTORY_UNIX *Self__KJT,void *n__LJT)
+static void set_path__SKT(__DIRECTORY_UNIX *Self__TKT,void *n__UKT)
 // ({DIRECTORY_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__KBIH,*Self__ZEEH,*Self__2EEH,*result__SBIH;
+  __STRING_CONSTANT *Self__XRSG;
+  __POINTER ptr__LBIH,ptr_table__GSJH,next__FSJH,result__HSJH;
+  __POINTER ptr_table__LSJH,next__KSJH,result__MSJH,ptr__TBIH;
+  __POINTER ptr_table__QSJH,next__PSJH,result__RSJH,ptr_table__VSJH;
+  __POINTER next__USJH,result__WSJH,ptr__GHAH;
+  __INTEGER typ_id__MBIH,c__1EEH,Self__MMGH,idx__ARHH,idx__VKT;
+  __INTEGER typ_id__UBIH,__tmp__LLT;
+  __UINTEGER_32 sz__NBIH,a__OBIH,new_size__PBIH,t__QBIH,a__RBIH;
+  __UINTEGER_32 new_size__OSJH,lab_type__NSJH,sz__VBIH,a__WBIH;
+  __UINTEGER_32 new_size__XBIH,t__YBIH,a__ZBIH,new_size__YSJH;
+  __UINTEGER_32 lab_type__XSJH;
+  void *__tmp__DLT;
+  __CHARACTER *Self__NMGH,*model__OMGH,*Self__CRHH,*__tmp__HLT;
+  result__KBIH=NULL;
+  ptr__LBIH=((__POINTER )(NULL));
+  typ_id__MBIH= 0;
+  sz__NBIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__NBIH ==  0)) {
+    result__KBIH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__MBIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NBIH);
+    if ((typ_id__MBIH == (__INTEGER)(-  1))) {
+      a__OBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__PBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NBIH + a__OBIH) & (__UINTEGER_32)(~ a__OBIH));
+      ptr_table__GSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PBIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__FSJH=((__POINTER )(NULL));
+      result__HSJH=((__POINTER *)ptr_table__GSJH)[ 0];
+      if ((result__HSJH == (void *)NULL)) {
+        result__HSJH=new_lab__ZPJ(new_size__PBIH);
+        next__FSJH=(void *)((unsigned long)result__HSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBIH)));
+        ((__POINTER *)next__FSJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__GSJH)[ 0]=next__FSJH;
+      } else {
+        next__FSJH=((__POINTER *)result__HSJH)[ 0];
+        if ((next__FSJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__HSJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PBIH <<  1)) <=  4096)) {
+            next__FSJH=(void *)((unsigned long)result__HSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PBIH)));
+          } else {
+            next__FSJH=new_lab__ZPJ(new_size__PBIH);
+          };
+          ((__POINTER *)next__FSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__GSJH)[ 0]=next__FSJH;
+        } else {
+          ((__POINTER *)result__HSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__FSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__HSJH=next__FSJH;
+        };
+      };
+      ptr__LBIH=result__HSJH;
+    } else {
+      t__QBIH=((__UINTEGER_32 )typ_id__MBIH);
+      a__RBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__OSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NBIH + a__RBIH) & (__UINTEGER_32)(~ a__RBIH));
+      ptr_table__LSJH=((__POINTER )(&(table_type[(t__QBIH)])));
+      lab_type__NSJH=(__UINTEGER_32)(t__QBIH |  1);
+      next__KSJH=((__POINTER )(NULL));
+      result__MSJH=((__POINTER *)ptr_table__LSJH)[ 0];
+      if ((result__MSJH == (void *)NULL)) {
+        result__MSJH=new_lab__ZPJ(lab_type__NSJH);
+        next__KSJH=(void *)((unsigned long)result__MSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSJH)));
+        ((__POINTER *)next__KSJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__LSJH)[ 0]=next__KSJH;
+      } else {
+        next__KSJH=((__POINTER *)result__MSJH)[ 0];
+        if ((next__KSJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__MSJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OSJH <<  1)) <=  4096)) {
+            next__KSJH=(void *)((unsigned long)result__MSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OSJH)));
+          } else {
+            next__KSJH=new_lab__ZPJ(lab_type__NSJH);
+          };
+          ((__POINTER *)next__KSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__LSJH)[ 0]=next__KSJH;
+        } else {
+          ((__POINTER *)result__MSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__MSJH=next__KSJH;
+        };
+      };
+      ptr__LBIH=result__MSJH;
+    };
+    result__KBIH=((__STRING_CONSTANT *)ptr__LBIH);
+    *(result__KBIH) = *(STRING_CONSTANT__);
+  };
+  Self__ZEEH=((__STRING_CONSTANT *)result__KBIH);
+  c__1EEH=((__STRING *)n__UKT)->count__EGC;
+  if ((c__1EEH !=  0)) {
+    Self__ZEEH->storage__ZNO=create__3IEB((__INTEGER)(c__1EEH +  1));
+    Self__NMGH=((__CHARACTER *)Self__ZEEH->storage__ZNO);
+    model__OMGH=((__STRING *)n__UKT)->storage__F5R;
+    Self__MMGH=(__INTEGER)(c__1EEH -  1);
+    while ((Self__MMGH >=  0)) {
+      Self__NMGH[Self__MMGH]=((__CHARACTER *)model__OMGH)[Self__MMGH];
+      Self__MMGH=(__INTEGER)(Self__MMGH -  1);
+    };
+    ((__CHARACTER *)Self__ZEEH->storage__ZNO)[c__1EEH]='\0';
+    Self__ZEEH->count__DD=c__1EEH;
+  };
+  Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.path__BD=result__KBIH;
+  Self__2EEH=((__STRING_CONSTANT *)Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.path__BD);
+  Self__CRHH=((__CHARACTER *)Self__2EEH->storage__ZNO);
+  idx__ARHH=(__INTEGER)(Self__2EEH->count__DD -  1);
+  while ((! ((idx__ARHH <  0) || ('/' == Self__CRHH[idx__ARHH])))) {
+    idx__ARHH=(__INTEGER)(idx__ARHH -  1);
+  };
+  idx__VKT=(__INTEGER)( 1 + idx__ARHH);
+  if (((void *)Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT == (void *)NULL)) {
+    result__SBIH=NULL;
+    ptr__TBIH=((__POINTER )(NULL));
+    typ_id__UBIH= 0;
+    sz__VBIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__VBIH ==  0)) {
+      result__SBIH=STRING_CONSTANT__;
+    } else {
+      typ_id__UBIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VBIH);
+      if ((typ_id__UBIH == (__INTEGER)(-  1))) {
+        a__WBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XBIH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBIH + a__WBIH) & (__UINTEGER_32)(~ a__WBIH));
+        ptr_table__QSJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__XBIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__PSJH=((__POINTER )(NULL));
+        result__RSJH=((__POINTER *)ptr_table__QSJH)[ 0];
+        if ((result__RSJH == (void *)NULL)) {
+          result__RSJH=new_lab__ZPJ(new_size__XBIH);
+          next__PSJH=(void *)((unsigned long)result__RSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBIH)));
+          ((__POINTER *)next__PSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__QSJH)[ 0]=next__PSJH;
+        } else {
+          next__PSJH=((__POINTER *)result__RSJH)[ 0];
+          if ((next__PSJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RSJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XBIH <<  1)) <=  4096)) {
+              next__PSJH=(void *)((unsigned long)result__RSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XBIH)));
             } else {
-              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)));
+              next__PSJH=new_lab__ZPJ(new_size__XBIH);
+            };
+            ((__POINTER *)next__PSJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__QSJH)[ 0]=next__PSJH;
+          } else {
+            ((__POINTER *)result__RSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__RSJH=next__PSJH;
+          };
+        };
+        ptr__TBIH=result__RSJH;
+      } else {
+        t__YBIH=((__UINTEGER_32 )typ_id__UBIH);
+        a__ZBIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__YSJH=(__UINTEGER_32)((__UINTEGER_32)(sz__VBIH + a__ZBIH) & (__UINTEGER_32)(~ a__ZBIH));
+        ptr_table__VSJH=((__POINTER )(&(table_type[(t__YBIH)])));
+        lab_type__XSJH=(__UINTEGER_32)(t__YBIH |  1);
+        next__USJH=((__POINTER )(NULL));
+        result__WSJH=((__POINTER *)ptr_table__VSJH)[ 0];
+        if ((result__WSJH == (void *)NULL)) {
+          result__WSJH=new_lab__ZPJ(lab_type__XSJH);
+          next__USJH=(void *)((unsigned long)result__WSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSJH)));
+          ((__POINTER *)next__USJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__VSJH)[ 0]=next__USJH;
+        } else {
+          next__USJH=((__POINTER *)result__WSJH)[ 0];
+          if ((next__USJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WSJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YSJH <<  1)) <=  4096)) {
+              next__USJH=(void *)((unsigned long)result__WSJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YSJH)));
             } else {
-              next__LOJH=new_lab__QOJ(lab_type__OOJH);
+              next__USJH=new_lab__ZPJ(lab_type__XSJH);
             };
-            ((__POINTER *)next__LOJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__MOJH)[ 0]=next__LOJH;
+            ((__POINTER *)next__USJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VSJH)[ 0]=next__USJH;
           } else {
-            ((__POINTER *)result__NOJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LOJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__NOJH=next__LOJH;
+            ((__POINTER *)result__WSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__USJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__WSJH=next__USJH;
           };
         };
-        ptr__K3HH=result__NOJH;
+        ptr__TBIH=result__WSJH;
       };
-      result__J3HH=((__STRING_CONSTANT *)ptr__K3HH);
-      *(result__J3HH) = *(STRING_CONSTANT__);
+      result__SBIH=((__STRING_CONSTANT *)ptr__TBIH);
+      *(result__SBIH) = *(STRING_CONSTANT__);
     };
-    Self__KJT->parent_entry_unix__GFD.parent_entry__FFD.name__QJT=result__J3HH;
+    Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT=result__SBIH;
   };
-  __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;
+  __tmp__DLT=Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT;
+  ptr__GHAH=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->storage__ZNO));
+  ptr__GHAH=(void *)((unsigned long)ptr__GHAH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__VKT)));
+  __tmp__HLT=((__CHARACTER *)ptr__GHAH);
+  __tmp__LLT=(__INTEGER)(((__STRING_CONSTANT *)Self__TKT->parent_entry_unix__GFD.parent_entry__FFD.path__BD)->count__DD - idx__VKT);
+  Self__XRSG=((__STRING_CONSTANT *)__tmp__DLT);
+  Self__XRSG->storage__ZNO=__tmp__HLT;
+  Self__XRSG->count__DD=__tmp__LLT;
 }
 
-static void set_path__EKT(__FILE_UNIX *Self__FKT,void *n__GKT)
+static void set_path__NLT(__FILE_UNIX *Self__OLT,void *n__PLT)
 // ({FILE_UNIX},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __STRING_CONSTANT *result__0BIH,*Self__BFEH,*Self__EFEH,*result__CCIH;
+  __STRING_CONSTANT *Self__2RSG;
+  __POINTER ptr__1BIH,ptr_table__0SJH,next__ZSJH,result__1SJH;
+  __POINTER ptr_table__5SJH,next__4SJH,result__ATJH,ptr__DCIH;
+  __POINTER ptr_table__ETJH,next__DTJH,result__FTJH,ptr_table__JTJH;
+  __POINTER next__ITJH,result__KTJH,ptr__JLY;
+  __INTEGER typ_id__2BIH,c__DFEH,Self__XMGH,idx__FRHH,idx__QLT;
+  __INTEGER typ_id__ECIH,__tmp__FMT;
+  __UINTEGER_32 sz__3BIH,a__4BIH,new_size__5BIH,t__ACIH,a__BCIH;
+  __UINTEGER_32 new_size__CTJH,lab_type__BTJH,sz__FCIH,a__GCIH;
+  __UINTEGER_32 new_size__HCIH,t__ICIH,a__JCIH,new_size__MTJH;
+  __UINTEGER_32 lab_type__LTJH;
+  void *__tmp__3LT;
+  __CHARACTER *Self__YMGH,*model__ZMGH,*Self__HRHH,*__tmp__BMT;
+  result__0BIH=NULL;
+  ptr__1BIH=((__POINTER )(NULL));
+  typ_id__2BIH= 0;
+  sz__3BIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+  if ((sz__3BIH ==  0)) {
+    result__0BIH=STRING_CONSTANT__;
   } else {
-    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)));
+    typ_id__2BIH=-1;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3BIH);
+    if ((typ_id__2BIH == (__INTEGER)(-  1))) {
+      a__4BIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__5BIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3BIH + a__4BIH) & (__UINTEGER_32)(~ a__4BIH));
+      ptr_table__0SJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5BIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__ZSJH=((__POINTER )(NULL));
+      result__1SJH=((__POINTER *)ptr_table__0SJH)[ 0];
+      if ((result__1SJH == (void *)NULL)) {
+        result__1SJH=new_lab__ZPJ(new_size__5BIH);
+        next__ZSJH=(void *)((unsigned long)result__1SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BIH)));
+        ((__POINTER *)next__ZSJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__0SJH)[ 0]=next__ZSJH;
+      } else {
+        next__ZSJH=((__POINTER *)result__1SJH)[ 0];
+        if ((next__ZSJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1SJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__5BIH <<  1)) <=  4096)) {
+            next__ZSJH=(void *)((unsigned long)result__1SJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5BIH)));
+          } else {
+            next__ZSJH=new_lab__ZPJ(new_size__5BIH);
+          };
+          ((__POINTER *)next__ZSJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__0SJH)[ 0]=next__ZSJH;
+        } else {
+          ((__POINTER *)result__1SJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__1SJH=next__ZSJH;
+        };
+      };
+      ptr__1BIH=result__1SJH;
+    } else {
+      t__ACIH=((__UINTEGER_32 )typ_id__2BIH);
+      a__BCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__CTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__3BIH + a__BCIH) & (__UINTEGER_32)(~ a__BCIH));
+      ptr_table__5SJH=((__POINTER )(&(table_type[(t__ACIH)])));
+      lab_type__BTJH=(__UINTEGER_32)(t__ACIH |  1);
+      next__4SJH=((__POINTER )(NULL));
+      result__ATJH=((__POINTER *)ptr_table__5SJH)[ 0];
+      if ((result__ATJH == (void *)NULL)) {
+        result__ATJH=new_lab__ZPJ(lab_type__BTJH);
+        next__4SJH=(void *)((unsigned long)result__ATJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTJH)));
+        ((__POINTER *)next__4SJH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__5SJH)[ 0]=next__4SJH;
+      } else {
+        next__4SJH=((__POINTER *)result__ATJH)[ 0];
+        if ((next__4SJH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ATJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CTJH <<  1)) <=  4096)) {
+            next__4SJH=(void *)((unsigned long)result__ATJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CTJH)));
+          } else {
+            next__4SJH=new_lab__ZPJ(lab_type__BTJH);
+          };
+          ((__POINTER *)next__4SJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__5SJH)[ 0]=next__4SJH;
+        } else {
+          ((__POINTER *)result__ATJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4SJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__ATJH=next__4SJH;
+        };
+      };
+      ptr__1BIH=result__ATJH;
+    };
+    result__0BIH=((__STRING_CONSTANT *)ptr__1BIH);
+    *(result__0BIH) = *(STRING_CONSTANT__);
+  };
+  Self__BFEH=((__STRING_CONSTANT *)result__0BIH);
+  c__DFEH=((__STRING *)n__PLT)->count__EGC;
+  if ((c__DFEH !=  0)) {
+    Self__BFEH->storage__ZNO=create__3IEB((__INTEGER)(c__DFEH +  1));
+    Self__YMGH=((__CHARACTER *)Self__BFEH->storage__ZNO);
+    model__ZMGH=((__STRING *)n__PLT)->storage__F5R;
+    Self__XMGH=(__INTEGER)(c__DFEH -  1);
+    while ((Self__XMGH >=  0)) {
+      Self__YMGH[Self__XMGH]=((__CHARACTER *)model__ZMGH)[Self__XMGH];
+      Self__XMGH=(__INTEGER)(Self__XMGH -  1);
+    };
+    ((__CHARACTER *)Self__BFEH->storage__ZNO)[c__DFEH]='\0';
+    Self__BFEH->count__DD=c__DFEH;
+  };
+  Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.path__BD=result__0BIH;
+  Self__EFEH=((__STRING_CONSTANT *)Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.path__BD);
+  Self__HRHH=((__CHARACTER *)Self__EFEH->storage__ZNO);
+  idx__FRHH=(__INTEGER)(Self__EFEH->count__DD -  1);
+  while ((! ((idx__FRHH <  0) || ('/' == Self__HRHH[idx__FRHH])))) {
+    idx__FRHH=(__INTEGER)(idx__FRHH -  1);
+  };
+  idx__QLT=(__INTEGER)( 1 + idx__FRHH);
+  if (((void *)Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT == (void *)NULL)) {
+    result__CCIH=NULL;
+    ptr__DCIH=((__POINTER )(NULL));
+    typ_id__ECIH= 0;
+    sz__FCIH=((__UINTEGER_32 )sizeof(__STRING_CONSTANT));
+    if ((sz__FCIH ==  0)) {
+      result__CCIH=STRING_CONSTANT__;
+    } else {
+      typ_id__ECIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FCIH);
+      if ((typ_id__ECIH == (__INTEGER)(-  1))) {
+        a__GCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__HCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__FCIH + a__GCIH) & (__UINTEGER_32)(~ a__GCIH));
+        ptr_table__ETJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__HCIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__DTJH=((__POINTER )(NULL));
+        result__FTJH=((__POINTER *)ptr_table__ETJH)[ 0];
+        if ((result__FTJH == (void *)NULL)) {
+          result__FTJH=new_lab__ZPJ(new_size__HCIH);
+          next__DTJH=(void *)((unsigned long)result__FTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HCIH)));
+          ((__POINTER *)next__DTJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ETJH)[ 0]=next__DTJH;
+        } else {
+          next__DTJH=((__POINTER *)result__FTJH)[ 0];
+          if ((next__DTJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FTJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HCIH <<  1)) <=  4096)) {
+              next__DTJH=(void *)((unsigned long)result__FTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HCIH)));
             } else {
-              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)));
+              next__DTJH=new_lab__ZPJ(new_size__HCIH);
+            };
+            ((__POINTER *)next__DTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ETJH)[ 0]=next__DTJH;
+          } else {
+            ((__POINTER *)result__FTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__FTJH=next__DTJH;
+          };
+        };
+        ptr__DCIH=result__FTJH;
+      } else {
+        t__ICIH=((__UINTEGER_32 )typ_id__ECIH);
+        a__JCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__MTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__FCIH + a__JCIH) & (__UINTEGER_32)(~ a__JCIH));
+        ptr_table__JTJH=((__POINTER )(&(table_type[(t__ICIH)])));
+        lab_type__LTJH=(__UINTEGER_32)(t__ICIH |  1);
+        next__ITJH=((__POINTER )(NULL));
+        result__KTJH=((__POINTER *)ptr_table__JTJH)[ 0];
+        if ((result__KTJH == (void *)NULL)) {
+          result__KTJH=new_lab__ZPJ(lab_type__LTJH);
+          next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTJH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MTJH <<  1)) <=  4096)) {
+              next__ITJH=(void *)((unsigned long)result__KTJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MTJH)));
             } else {
-              next__5OJH=new_lab__QOJ(lab_type__CPJH);
+              next__ITJH=new_lab__ZPJ(lab_type__LTJH);
             };
-            ((__POINTER *)next__5OJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__APJH)[ 0]=next__5OJH;
+            ((__POINTER *)next__ITJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
           } else {
-            ((__POINTER *)result__BPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5OJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__BPJH=next__5OJH;
+            ((__POINTER *)result__KTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ITJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__KTJH=next__ITJH;
           };
         };
-        ptr__03HH=result__BPJH;
+        ptr__DCIH=result__KTJH;
       };
-      result__Z3HH=((__STRING_CONSTANT *)ptr__03HH);
-      *(result__Z3HH) = *(STRING_CONSTANT__);
+      result__CCIH=((__STRING_CONSTANT *)ptr__DCIH);
+      *(result__CCIH) = *(STRING_CONSTANT__);
     };
-    Self__FKT->parent_entry_unix__05E.parent_entry__FFD.name__QJT=result__Z3HH;
+    Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT=result__CCIH;
   };
-  __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;
+  __tmp__3LT=Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT;
+  ptr__JLY=((__POINTER )((__CHARACTER *)((__STRING_CONSTANT *)Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->storage__ZNO));
+  ptr__JLY=(void *)((unsigned long)ptr__JLY - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )idx__QLT)));
+  __tmp__BMT=((__CHARACTER *)ptr__JLY);
+  __tmp__FMT=(__INTEGER)(((__STRING_CONSTANT *)Self__OLT->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->count__DD - idx__QLT);
+  Self__2RSG=((__STRING_CONSTANT *)__tmp__3LT);
+  Self__2RSG->storage__ZNO=__tmp__BMT;
+  Self__2RSG->count__DD=__tmp__FMT;
 }
 
-static void insert_string__to__NTU(__STRING *Self__OTU,void *s__PTU,__INTEGER i__QTU)
+static void insert_string__to__WUU(__STRING *Self__XUU,void *s__YUU,__INTEGER i__ZUU)
 // ({STRING},{NULLxSTRING_CONSTANTxSTRING},{INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER j__0UU,__tmp__NVU,dest__MRHH,src_capacity__QRHH,i2__LRHH;
+  __INTEGER i1__NRHH;
+  __CHARACTER *__tmp__3VU,*__tmp__4VU,*Self__ORHH,*src__PRHH;
+  j__0UU=Self__XUU->count__EGC;
+  if (((struct ___OBJ *)s__YUU)->__id==__STRING_CONSTANT__) {
+    __tmp__NVU=((__STRING_CONSTANT *)s__YUU)->count__DD;
   } else {
-    __tmp__EUU=((__STRING *)s__PTU)->count__EGC;
+    __tmp__NVU=((__STRING *)s__YUU)->count__EGC;
   };
-  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);
+  resize__UUZ(Self__XUU,(__INTEGER)(j__0UU + __tmp__NVU));
+  if ((i__ZUU <= j__0UU)) {
+    move__to__by__MVCC(Self__XUU->storage__F5R,(__INTEGER)(i__ZUU -  1),(__INTEGER)(j__0UU -  1),__tmp__NVU);
   };
-  __tmp__UUU=Self__OTU->storage__23R;
-  if (((struct ___OBJ *)s__PTU)->__id==__STRING_CONSTANT__) {
-    __tmp__VUU=((__STRING_CONSTANT *)s__PTU)->storage__QMO;
+  __tmp__3VU=Self__XUU->storage__F5R;
+  if (((struct ___OBJ *)s__YUU)->__id==__STRING_CONSTANT__) {
+    __tmp__4VU=((__STRING_CONSTANT *)s__YUU)->storage__ZNO;
   } else {
-    __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);
+    __tmp__4VU=((__STRING *)s__YUU)->storage__F5R;
+  };
+  Self__ORHH=((__CHARACTER *)__tmp__3VU);
+  src__PRHH=__tmp__4VU;
+  dest__MRHH=(__INTEGER)(i__ZUU -  1);
+  src_capacity__QRHH=__tmp__NVU;
+  i2__LRHH= 0;
+  i1__NRHH=dest__MRHH;
+  while ((i2__LRHH != src_capacity__QRHH)) {
+    Self__ORHH[i1__NRHH]=((__CHARACTER *)src__PRHH)[i2__LRHH];
+    i2__LRHH=(__INTEGER)(i2__LRHH +  1);
+    i1__NRHH=(__INTEGER)(i1__NRHH +  1);
   };
 }
 
-static void read_escape_character__JWKF()
+static void read_escape_character__AZKF()
 // () VoidNo recursive, No inlinable.
 {
-  __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';
+  __INTEGER val__DZKF;
+  __STRING *Self__BNGH;
+  __POSITION pos__5TYG,pos__MUYG,pos__ZUYG,pos__1UYG;
+  __CHARACTER result__NKAH,result__SKAH,result__2KAH,result__BLAH;
+  __CHARACTER result__GLAH,result__PLAH,result__YLAH,result__3LAH;
+  __CHARACTER result__CMAH,result__HMAH,result__MMAH,result__RMAH;
+  __CHARACTER result__WMAH,result__1MAH,result__ANAH,result__FNAH;
+  __CHARACTER result__KNAH,result__PNAH,result__UNAH,result__ZNAH;
+  __CHARACTER result__BOAH,result__GOAH;
+  __BOOLEAN __tmp__2ZKF,__tmp__Q0KF,__tmp__D1KF,__tmp__Y3KF,__tmp__Z3KF;
+  __BOOLEAN __tmp__03KF,__tmp__13KF,__tmp__23KF,__tmp__33KF,__tmp__43KF;
+  __BOOLEAN __tmp__53KF,__tmp__A4KF,__tmp__B4KF,__tmp__M4KF;
+  val__DZKF= 0;
+  result__NKAH='\0';
   if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-    result__EGAH=((__CHARACTER )(( 0)));
+    result__NKAH=((__CHARACTER )(( 0)));
   } else {
-    result__EGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+    result__NKAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
   };
-  if ((((((((result__EGAH == ' ') || (result__EGAH == '\t')) || (result__EGAH == '\n')) || (result__EGAH == '\r')) || (result__EGAH == '\0')) || (result__EGAH == '\f')) || (result__EGAH == '\v'))) {
+  if ((((((((result__NKAH == ' ') || (result__NKAH == '\t')) || (result__NKAH == '\n')) || (result__NKAH == '\r')) || (result__NKAH == '\0')) || (result__NKAH == '\f')) || (result__NKAH == '\v'))) {
     position__CCC=(__INTEGER)(position__CCC +  1);
-    until_do__KCNF:
+    until_do__PGNF:
     {
-      result__JGAH='\0';
+      result__SKAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JGAH=((__CHARACTER )(( 0)));
+        result__SKAH=((__CHARACTER )(( 0)));
       } else {
-        result__JGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__SKAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__JGAH == ((__CHARACTER )(( 0))))) {
-        __tmp__FXKF=TRUE__;
+      if ((result__SKAH == ((__CHARACTER )(( 0))))) {
+        __tmp__2ZKF=TRUE__;
       } else {
-        result__TGAH='\0';
+        result__2KAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__TGAH=((__CHARACTER )(( 0)));
+          result__2KAH=((__CHARACTER )(( 0)));
         } else {
-          result__TGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__2KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__FXKF=(! (((((((result__TGAH == ' ') || (result__TGAH == '\t')) || (result__TGAH == '\n')) || (result__TGAH == '\r')) || (result__TGAH == '\0')) || (result__TGAH == '\f')) || (result__TGAH == '\v')));
+        __tmp__2ZKF=(! (((((((result__2KAH == ' ') || (result__2KAH == '\t')) || (result__2KAH == '\n')) || (result__2KAH == '\r')) || (result__2KAH == '\0')) || (result__2KAH == '\f')) || (result__2KAH == '\v')));
       };
-      if ((! __tmp__FXKF)) {
+      if ((! __tmp__2ZKF)) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__KCNF;
+        goto until_do__PGNF;
       };
     };
-    result__YGAH='\0';
+    result__BLAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__YGAH=((__CHARACTER )(( 0)));
+      result__BLAH=((__CHARACTER )(( 0)));
     } else {
-      result__YGAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__BLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__YGAH == '\\')) {
-      Self__YIGH=((__STRING *)string_tmp__VH);
-      if (( 1 > Self__YIGH->count__EGC)) {
-        Self__YIGH->count__EGC= 0;
+    if ((result__BLAH == '\\')) {
+      Self__BNGH=((__STRING *)string_tmp__VH);
+      if (( 1 > Self__BNGH->count__EGC)) {
+        Self__BNGH->count__EGC= 0;
       } else {
-        Self__YIGH->count__EGC=(__INTEGER)(Self__YIGH->count__EGC -  1);
+        Self__BNGH->count__EGC=(__INTEGER)(Self__BNGH->count__EGC -  1);
       };
       position__CCC=(__INTEGER)(position__CCC +  1);
-      __tmp__ZXKF=TRUE__;
+      __tmp__Q0KF=TRUE__;
     } else {
-      __tmp__ZXKF=FALSE__;
+      __tmp__Q0KF=FALSE__;
     };
-    if ((! __tmp__ZXKF)) {
-      result__3GAH='\0';
+    if ((! __tmp__Q0KF)) {
+      result__GLAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__3GAH=((__CHARACTER )(( 0)));
+        result__GLAH=((__CHARACTER )(( 0)));
       } else {
-        result__3GAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__GLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      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)) {
+      if ((result__GLAH != ((__CHARACTER )(( 0))))) {
+        pos__5TYG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_301));
+        put_position__LNG(pos__5TYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    __tmp__MYKF=TRUE__;
+    __tmp__D1KF=TRUE__;
   } else {
-    __tmp__MYKF=FALSE__;
+    __tmp__D1KF=FALSE__;
   };
-  if ((! __tmp__MYKF)) {
-    result__GHAH='\0';
+  if ((! __tmp__D1KF)) {
+    result__PLAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__GHAH=((__CHARACTER )(( 0)));
+      result__PLAH=((__CHARACTER )(( 0)));
     } else {
-      result__GHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__PLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__GHAH != ((__CHARACTER )(( 0))))) {
-      result__PHAH='\0';
+    if ((result__PLAH != ((__CHARACTER )(( 0))))) {
+      result__YLAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__PHAH=((__CHARACTER )(( 0)));
+        result__YLAH=((__CHARACTER )(( 0)));
       } else {
-        result__PHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__YLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__PHAH == 'a')) {
-        __tmp__B1KF=TRUE__;
+      if ((result__YLAH == 'a')) {
+        __tmp__Y3KF=TRUE__;
       } else {
-        result__UHAH='\0';
+        result__3LAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__UHAH=((__CHARACTER )(( 0)));
+          result__3LAH=((__CHARACTER )(( 0)));
         } else {
-          result__UHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__3LAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__B1KF=(result__UHAH == 'b');
+        __tmp__Y3KF=(result__3LAH == 'b');
       };
-      if (__tmp__B1KF) {
-        __tmp__C1KF=TRUE__;
+      if (__tmp__Y3KF) {
+        __tmp__Z3KF=TRUE__;
       } else {
-        result__ZHAH='\0';
+        result__CMAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__ZHAH=((__CHARACTER )(( 0)));
+          result__CMAH=((__CHARACTER )(( 0)));
         } else {
-          result__ZHAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__CMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__C1KF=(result__ZHAH == 'f');
+        __tmp__Z3KF=(result__CMAH == 'f');
       };
-      if (__tmp__C1KF) {
-        __tmp__D1KF=TRUE__;
+      if (__tmp__Z3KF) {
+        __tmp__03KF=TRUE__;
       } else {
-        result__4HAH='\0';
+        result__HMAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__4HAH=((__CHARACTER )(( 0)));
+          result__HMAH=((__CHARACTER )(( 0)));
         } else {
-          result__4HAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__HMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__D1KF=(result__4HAH == 'n');
+        __tmp__03KF=(result__HMAH == 'n');
       };
-      if (__tmp__D1KF) {
-        __tmp__E1KF=TRUE__;
+      if (__tmp__03KF) {
+        __tmp__13KF=TRUE__;
       } else {
-        result__DIAH='\0';
+        result__MMAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DIAH=((__CHARACTER )(( 0)));
+          result__MMAH=((__CHARACTER )(( 0)));
         } else {
-          result__DIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__MMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__E1KF=(result__DIAH == 'r');
+        __tmp__13KF=(result__MMAH == 'r');
       };
-      if (__tmp__E1KF) {
-        __tmp__F1KF=TRUE__;
+      if (__tmp__13KF) {
+        __tmp__23KF=TRUE__;
       } else {
-        result__IIAH='\0';
+        result__RMAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__IIAH=((__CHARACTER )(( 0)));
+          result__RMAH=((__CHARACTER )(( 0)));
         } else {
-          result__IIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__RMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__F1KF=(result__IIAH == 't');
+        __tmp__23KF=(result__RMAH == 't');
       };
-      if (__tmp__F1KF) {
-        __tmp__G1KF=TRUE__;
+      if (__tmp__23KF) {
+        __tmp__33KF=TRUE__;
       } else {
-        result__NIAH='\0';
+        result__WMAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__NIAH=((__CHARACTER )(( 0)));
+          result__WMAH=((__CHARACTER )(( 0)));
         } else {
-          result__NIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__WMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__G1KF=(result__NIAH == 'v');
+        __tmp__33KF=(result__WMAH == 'v');
       };
-      if (__tmp__G1KF) {
-        __tmp__H1KF=TRUE__;
+      if (__tmp__33KF) {
+        __tmp__43KF=TRUE__;
       } else {
-        result__SIAH='\0';
+        result__1MAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__SIAH=((__CHARACTER )(( 0)));
+          result__1MAH=((__CHARACTER )(( 0)));
         } else {
-          result__SIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__1MAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__H1KF=(result__SIAH == '\\');
+        __tmp__43KF=(result__1MAH == '\\');
       };
-      if (__tmp__H1KF) {
-        __tmp__I1KF=TRUE__;
+      if (__tmp__43KF) {
+        __tmp__53KF=TRUE__;
       } else {
-        result__XIAH='\0';
+        result__ANAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XIAH=((__CHARACTER )(( 0)));
+          result__ANAH=((__CHARACTER )(( 0)));
         } else {
-          result__XIAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__ANAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__I1KF=(result__XIAH == '?');
+        __tmp__53KF=(result__ANAH == '?');
       };
-      if (__tmp__I1KF) {
-        __tmp__J1KF=TRUE__;
+      if (__tmp__53KF) {
+        __tmp__A4KF=TRUE__;
       } else {
-        result__2IAH='\0';
+        result__FNAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2IAH=((__CHARACTER )(( 0)));
+          result__FNAH=((__CHARACTER )(( 0)));
         } else {
-          result__2IAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__FNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__J1KF=(result__2IAH == '\'');
+        __tmp__A4KF=(result__FNAH == '\'');
       };
-      if (__tmp__J1KF) {
-        __tmp__K1KF=TRUE__;
+      if (__tmp__A4KF) {
+        __tmp__B4KF=TRUE__;
       } else {
-        result__BJAH='\0';
+        result__KNAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__BJAH=((__CHARACTER )(( 0)));
+          result__KNAH=((__CHARACTER )(( 0)));
         } else {
-          result__BJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__KNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__K1KF=(result__BJAH == '\"');
+        __tmp__B4KF=(result__KNAH == '\"');
       };
-      if (__tmp__K1KF) {
-        result__GJAH='\0';
+      if (__tmp__B4KF) {
+        result__PNAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__GJAH=((__CHARACTER )(( 0)));
+          result__PNAH=((__CHARACTER )(( 0)));
         } else {
-          result__GJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__PNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__GJAH);
+        add_last__3IT(string_tmp__VH,result__PNAH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__V1KF=TRUE__;
+        __tmp__M4KF=TRUE__;
       } else {
-        __tmp__V1KF=FALSE__;
+        __tmp__M4KF=FALSE__;
       };
-      if ((! __tmp__V1KF)) {
-        result__LJAH='\0';
+      if ((! __tmp__M4KF)) {
+        result__UNAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__LJAH=((__CHARACTER )(( 0)));
+          result__UNAH=((__CHARACTER )(( 0)));
         } else {
-          result__LJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__UNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if (((((__INTEGER_8 )result__LJAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__LJAH) <= ((__INTEGER_8 )'9')))) {
-          result__QJAH='\0';
+        if (((((__INTEGER_8 )result__UNAH) >= ((__INTEGER_8 )'0')) && (((__INTEGER_8 )result__UNAH) <= ((__INTEGER_8 )'9')))) {
+          result__ZNAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__QJAH=((__CHARACTER )(( 0)));
+            result__ZNAH=((__CHARACTER )(( 0)));
           } else {
-            result__QJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__ZNAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          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 ((((result__ZNAH == '0') && (position__CCC < ((__STRING *)source__5BC)->count__EGC)) && (! is_hexadecimal_digit__GMJE(((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)((__INTEGER)(position__CCC +  1) -  1)])))) {
+            result__BOAH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__YJAH=((__CHARACTER )(( 0)));
+              result__BOAH=((__CHARACTER )(( 0)));
             } else {
-              result__YJAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__BOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__UHT(string_tmp__VH,result__YJAH);
+            add_last__3IT(string_tmp__VH,result__BOAH);
             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)) {
+            copy__35R(string_tmp2__O4I,string_tmp__VH);
+            read_integer__EZP();
+            copy__35R(string_tmp__VH,string_tmp2__O4I);
+            if ((last_integer__3OO >  255)) {
+              pos__MUYG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_302));
+              put_position__LNG(pos__MUYG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            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';
+            val__DZKF=((__INTEGER )last_integer__3OO);
+            add_last__3IT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__DZKF >>  6)) + ((__INTEGER_8 )'0'))))));
+            add_last__3IT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)((__INTEGER)(val__DZKF &  63) >>  3)) + ((__INTEGER_8 )'0'))))));
+            add_last__3IT(string_tmp__VH,((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(val__DZKF &  7)) + ((__INTEGER_8 )'0'))))));
+            result__GOAH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__3JAH=((__CHARACTER )(( 0)));
+              result__GOAH=((__CHARACTER )(( 0)));
             } else {
-              result__3JAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__GOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__3JAH == '\\')) {
+            if ((result__GOAH == '\\')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
             } else {
-              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)) {
+              pos__ZUYG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_303));
+              put_position__LNG(pos__ZUYG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
           };
         } else {
-          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)) {
+          pos__1UYG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_301));
+          put_position__LNG(pos__1UYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
@@ -27101,327 +27109,327 @@ static void read_escape_character__JWKF()
   };
 }
 
-static __BOOLEAN read_cap_identifier__MWJ()
+static __BOOLEAN read_cap_identifier__VXJ()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER posold__YXJ,idx__ZXJ;
+  __POSITION pos__OWYG;
+  __BOOLEAN result__0XJ,__tmp__IYJ,result__2IEH,__tmp__2ZJ,result__LJEH;
+  __BOOLEAN result__SJEH,__tmp__YZJ,__tmp__ZZJ,result__4JEH,__tmp__M0J;
+  __CHARACTER result__IPAH,result__SPAH,result__XPAH,result__AQAH;
+  __CHARACTER result__FQAH,result__KQAH,result__PQAH;
+  posold__YXJ= 0;
+  idx__ZXJ= 0;
+  result__0XJ=FALSE__;
   if ((! read_space__KSD())) {
-    __tmp__5WJ=TRUE__;
+    __tmp__IYJ=TRUE__;
   } else {
-    result__5KAH='\0';
+    result__IPAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__5KAH=((__CHARACTER )(( 0)));
+      result__IPAH=((__CHARACTER )(( 0)));
     } else {
-      result__5KAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__IPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__TEEH=FALSE__;
-    if ((((__INTEGER_8 )result__5KAH) >= ((__INTEGER_8 )'A'))) {
-      result__TEEH=(((__INTEGER_8 )result__5KAH) <= ((__INTEGER_8 )'Z'));
+    result__2IEH=FALSE__;
+    if ((((__INTEGER_8 )result__IPAH) >= ((__INTEGER_8 )'A'))) {
+      result__2IEH=(((__INTEGER_8 )result__IPAH) <= ((__INTEGER_8 )'Z'));
     };
-    __tmp__5WJ=(! result__TEEH);
+    __tmp__IYJ=(! result__2IEH);
   };
-  if (__tmp__5WJ) {
-    result__RWJ=FALSE__;
+  if (__tmp__IYJ) {
+    result__0XJ=FALSE__;
   } else {
-    posold__PWJ=position__CCC;
+    posold__YXJ=position__CCC;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__JLAH='\0';
+    result__SPAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__JLAH=((__CHARACTER )(( 0)));
+      result__SPAH=((__CHARACTER )(( 0)));
     } else {
-      result__JLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__SPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__UHT(string_tmp__VH,result__JLAH);
+    add_last__3IT(string_tmp__VH,result__SPAH);
     position__CCC=(__INTEGER)(position__CCC +  1);
-    is_parameter_type__WGE=TRUE__;
-    until_do__HSZE:
+    is_parameter_type__5HE=TRUE__;
+    until_do__TUZE:
     {
-      result__OLAH='\0';
+      result__XPAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__OLAH=((__CHARACTER )(( 0)));
+        result__XPAH=((__CHARACTER )(( 0)));
       } else {
-        result__OLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__XPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__OLAH == ((__CHARACTER )(( 0))))) {
-        __tmp__TYJ=TRUE__;
+      if ((result__XPAH == ((__CHARACTER )(( 0))))) {
+        __tmp__2ZJ=TRUE__;
       } else {
-        result__XLAH='\0';
+        result__AQAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XLAH=((__CHARACTER )(( 0)));
+          result__AQAH=((__CHARACTER )(( 0)));
         } else {
-          result__XLAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__AQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__CFEH=FALSE__;
-        if ((((__INTEGER_8 )result__XLAH) >= ((__INTEGER_8 )'A'))) {
-          result__CFEH=(((__INTEGER_8 )result__XLAH) <= ((__INTEGER_8 )'Z'));
+        result__LJEH=FALSE__;
+        if ((((__INTEGER_8 )result__AQAH) >= ((__INTEGER_8 )'A'))) {
+          result__LJEH=(((__INTEGER_8 )result__AQAH) <= ((__INTEGER_8 )'Z'));
         };
-        if ((! result__CFEH)) {
-          result__2LAH='\0';
+        if ((! result__LJEH)) {
+          result__FQAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2LAH=((__CHARACTER )(( 0)));
+            result__FQAH=((__CHARACTER )(( 0)));
           } else {
-            result__2LAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__FQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__JFEH=FALSE__;
-          if ((((__INTEGER_8 )result__2LAH) >= ((__INTEGER_8 )'0'))) {
-            result__JFEH=(((__INTEGER_8 )result__2LAH) <= ((__INTEGER_8 )'9'));
+          result__SJEH=FALSE__;
+          if ((((__INTEGER_8 )result__FQAH) >= ((__INTEGER_8 )'0'))) {
+            result__SJEH=(((__INTEGER_8 )result__FQAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__PYJ=(! result__JFEH);
+          __tmp__YZJ=(! result__SJEH);
         } else {
-          __tmp__PYJ=FALSE__;
+          __tmp__YZJ=FALSE__;
         };
-        if (__tmp__PYJ) {
-          result__BMAH='\0';
+        if (__tmp__YZJ) {
+          result__KQAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__BMAH=((__CHARACTER )(( 0)));
+            result__KQAH=((__CHARACTER )(( 0)));
           } else {
-            result__BMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__KQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__QYJ=(result__BMAH != '_');
+          __tmp__ZZJ=(result__KQAH != '_');
         } else {
-          __tmp__QYJ=FALSE__;
+          __tmp__ZZJ=FALSE__;
         };
-        __tmp__TYJ=__tmp__QYJ;
+        __tmp__2ZJ=__tmp__ZZJ;
       };
-      if ((! __tmp__TYJ)) {
-        result__GMAH='\0';
+      if ((! __tmp__2ZJ)) {
+        result__PQAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__GMAH=((__CHARACTER )(( 0)));
+          result__PQAH=((__CHARACTER )(( 0)));
         } else {
-          result__GMAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__PQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        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'));
+        if (is_parameter_type__5HE) {
+          result__4JEH=FALSE__;
+          if ((((__INTEGER_8 )result__PQAH) >= ((__INTEGER_8 )'0'))) {
+            result__4JEH=(((__INTEGER_8 )result__PQAH) <= ((__INTEGER_8 )'9'));
           };
-          __tmp__DZJ=result__VFEH;
+          __tmp__M0J=result__4JEH;
         } else {
-          __tmp__DZJ=FALSE__;
+          __tmp__M0J=FALSE__;
         };
-        is_parameter_type__WGE=__tmp__DZJ;
-        add_last__UHT(string_tmp__VH,result__GMAH);
+        is_parameter_type__5HE=__tmp__M0J;
+        add_last__3IT(string_tmp__VH,result__PQAH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto until_do__HSZE;
+        goto until_do__TUZE;
       };
     };
-    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)) {
+    idx__ZXJ=first_substring_index__BVZE(string_tmp__VH);
+    if ((idx__ZXJ !=  0)) {
+      position__CCC=(__INTEGER)(posold__YXJ + idx__ZXJ);
+      pos__OWYG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_207));
+      put_position__LNG(pos__OWYG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
     last_string__V0C=get__YWB(string_tmp__VH);
-    result__RWJ=TRUE__;
+    result__0XJ=TRUE__;
   };
-  return(result__RWJ);
+  return(result__0XJ);
 }
 
-static void add_last__C5AC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__D5AC,void *element__E5AC)
+static void add_last__OABC(__FAST_ARRAYoITM_TYPE_PARAMETERo *Self__PABC,void *element__QABC)
 // ({FAST_ARRAYoITM_TYPE_PARAMETERo},{NULLxITM_TYPE_PARAMETER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__RABC,__tmp__0BBC,__tmp__UYSD,Self__K3XE;
+  __BOOLEAN __tmp__BBBC;
+  void **__tmp__ZBBC,**new__AYSD;
+  new_capacity__RABC= 0;
+  if (((__INTEGER)(Self__PABC->parent_arrayed_collection__KKE.upper__SABC +  1) <= (__INTEGER)(Self__PABC->parent_arrayed_collection__KKE.capacity__UABC -  1))) {
+    Self__PABC->parent_arrayed_collection__KKE.upper__SABC=(__INTEGER)(Self__PABC->parent_arrayed_collection__KKE.upper__SABC +  1);
+    __tmp__BBBC=TRUE__;
   } else {
-    __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;
+    __tmp__BBBC=FALSE__;
+  };
+  if ((! __tmp__BBBC)) {
+    if ((Self__PABC->parent_arrayed_collection__KKE.capacity__UABC ==  0)) {
+      Self__PABC->parent_arrayed_collection__KKE.storage__QBBC=create__4Z1C( 2);
+      Self__PABC->parent_arrayed_collection__KKE.capacity__UABC= 2;
+      Self__PABC->parent_arrayed_collection__KKE.upper__SABC= 0;
+    } else {
+      new_capacity__RABC=(__INTEGER)(Self__PABC->parent_arrayed_collection__KKE.capacity__UABC <<  1);
+      __tmp__ZBBC=Self__PABC->parent_arrayed_collection__KKE.storage__QBBC;
+      __tmp__0BBC=Self__PABC->parent_arrayed_collection__KKE.capacity__UABC;
+      new__AYSD=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__ZBBC)),((__UINTEGER_32 )(__INTEGER)(__tmp__0BBC * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__RABC * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__UYSD=(__INTEGER)(new_capacity__RABC -  1);
+      Self__K3XE=__tmp__0BBC;
+      while ((Self__K3XE <= __tmp__UYSD)) {
+        new__AYSD[Self__K3XE]=NULL;
+        Self__K3XE=(__INTEGER)(Self__K3XE +  1);
+      };
+      Self__PABC->parent_arrayed_collection__KKE.storage__QBBC=new__AYSD;
+      Self__PABC->parent_arrayed_collection__KKE.capacity__UABC=new_capacity__RABC;
+      Self__PABC->parent_arrayed_collection__KKE.upper__SABC=(__INTEGER)(Self__PABC->parent_arrayed_collection__KKE.upper__SABC +  1);
+    };
+  };
+  ((void **)Self__PABC->parent_arrayed_collection__KKE.storage__QBBC)[Self__PABC->parent_arrayed_collection__KKE.upper__SABC]=element__QABC;
 }
 
-static __BOOLEAN read_external__1OO()
+static __BOOLEAN read_external__EQO()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER pos_old__IQO;
+  __BOOLEAN result__HQO,__tmp__TQO;
+  __CHARACTER result__ESAH,result__OSAH,result__XSAH,result__2SAH;
+  __CHARACTER result__BTAH,result__GTAH,result__LTAH,result__UTAH;
+  result__HQO=FALSE__;
+  pos_old__IQO= 0;
   if ((! read_space__KSD())) {
-    __tmp__KPO=TRUE__;
+    __tmp__TQO=TRUE__;
   } else {
-    result__1NAH='\0';
+    result__ESAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__1NAH=((__CHARACTER )(( 0)));
+      result__ESAH=((__CHARACTER )(( 0)));
     } else {
-      result__1NAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__ESAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    __tmp__KPO=(result__1NAH != '`');
+    __tmp__TQO=(result__ESAH != '`');
   };
-  if (__tmp__KPO) {
-    result__4OO=FALSE__;
+  if (__tmp__TQO) {
+    result__HQO=FALSE__;
   } else {
-    pos_old__5OO=position__CCC;
+    pos_old__IQO=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    until_do__NGRC:
+    until_do__EIRC:
     {
-      result__FOAH='\0';
+      result__OSAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__FOAH=((__CHARACTER )(( 0)));
+        result__OSAH=((__CHARACTER )(( 0)));
       } else {
-        result__FOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__OSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__OOAH='\0';
+      result__XSAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__OOAH=((__CHARACTER )(( 0)));
+        result__XSAH=((__CHARACTER )(( 0)));
       } else {
-        result__OOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__XSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((! ((result__FOAH == ((__CHARACTER )(( 0)))) | (result__OOAH == '`')))) {
-        result__TOAH='\0';
+      if ((! ((result__OSAH == ((__CHARACTER )(( 0)))) | (result__XSAH == '`')))) {
+        result__2SAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__TOAH=((__CHARACTER )(( 0)));
+          result__2SAH=((__CHARACTER )(( 0)));
         } else {
-          result__TOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__2SAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__TOAH);
-        result__YOAH='\0';
+        add_last__3IT(string_tmp__VH,result__2SAH);
+        result__BTAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__YOAH=((__CHARACTER )(( 0)));
+          result__BTAH=((__CHARACTER )(( 0)));
         } else {
-          result__YOAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__BTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__YOAH == '\\')) {
+        if ((result__BTAH == '\\')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__3OAH='\0';
+          result__GTAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__3OAH=((__CHARACTER )(( 0)));
+            result__GTAH=((__CHARACTER )(( 0)));
           } else {
-            result__3OAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__GTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__3OAH);
-          result__CPAH='\0';
+          add_last__3IT(string_tmp__VH,result__GTAH);
+          result__LTAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__CPAH=((__CHARACTER )(( 0)));
+            result__LTAH=((__CHARACTER )(( 0)));
           } else {
-            result__CPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__LTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__CPAH != ((__CHARACTER )(( 0))))) {
+          if ((result__LTAH != ((__CHARACTER )(( 0))))) {
             position__CCC=(__INTEGER)(position__CCC +  1);
           };
         } else {
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        goto until_do__NGRC;
+        goto until_do__EIRC;
       };
     };
-    result__LPAH='\0';
+    result__UTAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__LPAH=((__CHARACTER )(( 0)));
+      result__UTAH=((__CHARACTER )(( 0)));
     } else {
-      result__LPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__UTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__LPAH != ((__CHARACTER )(( 0))))) {
+    if ((result__UTAH != ((__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);
+      result__HQO=TRUE__;
+      short__token__to__YBD((&__string_65),pos_old__IQO,position__CCC);
     } else {
-      result__4OO=FALSE__;
+      result__HQO=FALSE__;
     };
   };
-  return(result__4OO);
+  return(result__HQO);
 }
 
-static void* read_expr_primary__D0M(__PARSER *Self__E0M)
+static void* read_expr_primary__M1M(__PARSER *Self__N1M)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__P1M;
+  void *type__Q1M;
+  void *group_sav__V1M,*lst__HHHB;
+  __POSITION p__XTJH,pos__YYYG,p__ZIAB,p__SCIH,p__DVJH,pos__0YYG,p__QZH;
+  __POSITION pos__2YYG,pos__EZYG,__tmp__ZCN,__tmp__BDN,pos__SZYG;
+  __POSITION pos__UZYG,pos__WZYG,pos__YZYG;
+  __ITM_READ *result__PTJH,*result__WVGB;
+  __POINTER ptr__QTJH,ptr_table__ZTJH,next__YTJH,result__0TJH;
+  __POINTER ptr_table__4TJH,next__3TJH,result__5TJH,ptr__XVGB;
+  __POINTER ptr_table__FUJH,next__EUJH,result__GUJH,ptr_table__KUJH;
+  __POINTER next__JUJH,result__LUJH,ptr__LCIH,ptr_table__PUJH;
+  __POINTER next__OUJH,result__QUJH,ptr_table__UUJH,next__TUJH;
+  __POINTER result__VUJH,ptr__2UJH,ptr_table__FVJH,next__EVJH;
+  __POINTER result__GVJH,ptr_table__KVJH,next__JVJH,result__LVJH;
+  __POINTER ptr__EOI,ptr_table__VVJH,next__UVJH,result__WVJH;
+  __POINTER ptr_table__0VJH,next__ZVJH,result__1VJH,ptr__5EMB;
+  __POINTER ptr_table__CWJH,next__BWJH,result__DWJH,ptr_table__HWJH;
+  __POINTER next__GWJH,result__IWJH,ptr__EUTB,ptr_table__SWJH;
+  __POINTER next__RWJH,result__TWJH,ptr_table__XWJH,next__WWJH;
+  __POINTER result__YWJH,ptr__YVTB,ptr_table__5WJH,next__4WJH;
+  __POINTER result__AXJH,ptr_table__EXJH,next__DXJH,result__FXJH;
+  __INTEGER typ_id__RTJH,typ_id__2VGB,typ_id__MCIH,typ_id__3UJH;
+  __INTEGER typ_id__JOI,typ_id__EFMB,typ_id__JUTB,typ_id__3VTB;
+  __UINTEGER_32 sz__STJH,a__TTJH,new_size__UTJH,t__VTJH,a__WTJH;
+  __UINTEGER_32 new_size__BUJH,lab_type__AUJH,sz__ZVGB,a__JVGH;
+  __UINTEGER_32 new_size__KVGH,t__OVGH,a__NVGH,new_size__NUJH;
+  __UINTEGER_32 lab_type__MUJH,sz__NCIH,a__OCIH,new_size__PCIH,t__QCIH;
+  __UINTEGER_32 a__RCIH,new_size__XUJH,lab_type__WUJH,sz__4UJH,a__5UJH;
+  __UINTEGER_32 new_size__AVJH,t__BVJH,a__CVJH,new_size__NVJH;
+  __UINTEGER_32 lab_type__MVJH,sz__GOI,a__RTGH,new_size__STGH,t__WTGH;
+  __UINTEGER_32 a__VTGH,new_size__3VJH,lab_type__2VJH,sz__BFMB,a__LNGH;
+  __UINTEGER_32 new_size__MNGH,t__QNGH,a__PNGH,new_size__KWJH;
+  __UINTEGER_32 lab_type__JWJH,sz__GUTB,a__TNGH,new_size__UNGH,t__YNGH;
+  __UINTEGER_32 a__XNGH,new_size__0WJH,lab_type__ZWJH,sz__0VTB,a__1NGH;
+  __UINTEGER_32 new_size__2NGH,t__AOGH,a__5NGH,new_size__HXJH;
+  __UINTEGER_32 lab_type__GXJH;
+  __ITM_PROTOTYPE *result__KCIH;
+  __ITM_LIST *result__1UJH,*result__DOI;
+  __ITM_BLOCK *result__4EMB;
+  __ITM_EXTERNAL *result__DUTB;
+  __ITM_EXTERNAL_TYPE *result__XVTB,*Self__KZEC;
+  __BOOLEAN result__OTJH,__tmp__F2M,__tmp__I4M,result__DUJH;
+  __BOOLEAN result__KLEH,__tmp__X4M,result__FXN,__tmp__F5M,__tmp__CAN;
+  __BOOLEAN result__YUJH,result__OVJH,__tmp__FCN,result__RVJH;
+  __BOOLEAN result__4VJH,result__LWJH,result__OWJH,result__1WJH;
+  __BOOLEAN result__IXJH,result__LXJH,result__OXJH,__tmp__1EN;
+  __CHARACTER result__3TAH,result__CUAH,result__HUAH,result__ZUJH;
+  __CHARACTER result__PVJH,result__SVJH,result__5VJH,result__MWJH;
+  __CHARACTER result__PWJH,result__2WJH,result__JXJH,result__MXJH;
+  __CHARACTER result__PXJH;
+  result__P1M=NULL;
+  type__Q1M=NULL;
+  group_sav__V1M=NULL;
+  result__OTJH=read_word__HOF((&__string_58));
   if (is_shorter__LZ) {
-    if (result__FPJH) {
+    if (result__OTJH) {
       if (((void *)(&__string_58) == (void *)(&__string_4))) {
         short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
@@ -27429,89 +27437,89 @@ static void* read_expr_primary__D0M(__PARSER *Self__E0M)
       };
     };
   };
-  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)));
+  if (result__OTJH) {
+    p__XTJH=current_position__AWF();
+    result__PTJH=NULL;
+    ptr__QTJH=((__POINTER )(NULL));
+    typ_id__RTJH= 0;
+    sz__STJH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__STJH ==  0)) {
+      result__PTJH=ITM_READ__;
+    } else {
+      typ_id__RTJH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__STJH);
+      if ((typ_id__RTJH == (__INTEGER)(-  1))) {
+        a__TTJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__UTJH=(__UINTEGER_32)((__UINTEGER_32)(sz__STJH + a__TTJH) & (__UINTEGER_32)(~ a__TTJH));
+        ptr_table__ZTJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UTJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__YTJH=((__POINTER )(NULL));
+        result__0TJH=((__POINTER *)ptr_table__ZTJH)[ 0];
+        if ((result__0TJH == (void *)NULL)) {
+          result__0TJH=new_lab__ZPJ(new_size__UTJH);
+          next__YTJH=(void *)((unsigned long)result__0TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTJH)));
+          ((__POINTER *)next__YTJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__ZTJH)[ 0]=next__YTJH;
+        } else {
+          next__YTJH=((__POINTER *)result__0TJH)[ 0];
+          if ((next__YTJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__0TJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UTJH <<  1)) <=  4096)) {
+              next__YTJH=(void *)((unsigned long)result__0TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UTJH)));
             } else {
-              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)));
+              next__YTJH=new_lab__ZPJ(new_size__UTJH);
+            };
+            ((__POINTER *)next__YTJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__ZTJH)[ 0]=next__YTJH;
+          } else {
+            ((__POINTER *)result__0TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__0TJH=next__YTJH;
+          };
+        };
+        ptr__QTJH=result__0TJH;
+      } else {
+        t__VTJH=((__UINTEGER_32 )typ_id__RTJH);
+        a__WTJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__BUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__STJH + a__WTJH) & (__UINTEGER_32)(~ a__WTJH));
+        ptr_table__4TJH=((__POINTER )(&(table_type[(t__VTJH)])));
+        lab_type__AUJH=(__UINTEGER_32)(t__VTJH |  1);
+        next__3TJH=((__POINTER )(NULL));
+        result__5TJH=((__POINTER *)ptr_table__4TJH)[ 0];
+        if ((result__5TJH == (void *)NULL)) {
+          result__5TJH=new_lab__ZPJ(lab_type__AUJH);
+          next__3TJH=(void *)((unsigned long)result__5TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUJH)));
+          ((__POINTER *)next__3TJH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4TJH)[ 0]=next__3TJH;
+        } else {
+          next__3TJH=((__POINTER *)result__5TJH)[ 0];
+          if ((next__3TJH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5TJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__BUJH <<  1)) <=  4096)) {
+              next__3TJH=(void *)((unsigned long)result__5TJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__BUJH)));
             } else {
-              next__UPJH=new_lab__QOJ(lab_type__XPJH);
+              next__3TJH=new_lab__ZPJ(lab_type__AUJH);
             };
-            ((__POINTER *)next__UPJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__VPJH)[ 0]=next__UPJH;
+            ((__POINTER *)next__3TJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__4TJH)[ 0]=next__3TJH;
           } else {
-            ((__POINTER *)result__WPJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UPJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__WPJH=next__UPJH;
+            ((__POINTER *)result__5TJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3TJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__5TJH=next__3TJH;
           };
         };
-        ptr__HPJH=result__WPJH;
+        ptr__QTJH=result__5TJH;
       };
-      result__GPJH=((__ITM_READ *)ptr__HPJH);
-      *(result__GPJH) = *(ITM_READ__);
+      result__PTJH=((__ITM_READ *)ptr__QTJH);
+      *(result__PTJH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__GPJH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__OPJH;
-    result__G0M=result__GPJH;
-    __tmp__20M=TRUE__;
+    ((__ITM_READ *)result__PTJH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__XTJH;
+    result__P1M=result__PTJH;
+    __tmp__F2M=TRUE__;
   } else {
-    __tmp__20M=FALSE__;
+    __tmp__F2M=FALSE__;
   };
-  if (__tmp__20M) {
-    __tmp__52M=TRUE__;
+  if (__tmp__F2M) {
+    __tmp__I4M=TRUE__;
   } else {
-    result__0PJH=read_word__4MF((&__string_11));
+    result__DUJH=read_word__HOF((&__string_11));
     if (is_shorter__LZ) {
-      if (result__0PJH) {
+      if (result__DUJH) {
         if (((void *)(&__string_11) == (void *)(&__string_4))) {
           short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
         } else {
@@ -27519,4336 +27527,4336 @@ static void* read_expr_primary__D0M(__PARSER *Self__E0M)
         };
       };
     };
-    if (result__0PJH) {
-      result__UPAH='\0';
+    if (result__DUJH) {
+      result__3TAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__UPAH=((__CHARACTER )(( 0)));
+        result__3TAH=((__CHARACTER )(( 0)));
       } else {
-        result__UPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__3TAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__UPAH == '_')) {
+      if ((result__3TAH == '_')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        copy__U4R(string_tmp__VH,(&__string_11));
-        add_last__UHT(string_tmp__VH,'_');
-        while_do__CTQB:
+        copy__35R(string_tmp__VH,(&__string_11));
+        add_last__3IT(string_tmp__VH,'_');
+        while_do__OUQB:
         {
-          result__ZPAH='\0';
+          result__CUAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ZPAH=((__CHARACTER )(( 0)));
+            result__CUAH=((__CHARACTER )(( 0)));
           } else {
-            result__ZPAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__CUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__BHEH=FALSE__;
-          if ((((__INTEGER_8 )result__ZPAH) >= ((__INTEGER_8 )'0'))) {
-            result__BHEH=(((__INTEGER_8 )result__ZPAH) <= ((__INTEGER_8 )'9'));
+          result__KLEH=FALSE__;
+          if ((((__INTEGER_8 )result__CUAH) >= ((__INTEGER_8 )'0'))) {
+            result__KLEH=(((__INTEGER_8 )result__CUAH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__BHEH) {
-            result__4PAH='\0';
+          if (result__KLEH) {
+            result__HUAH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__4PAH=((__CHARACTER )(( 0)));
+              result__HUAH=((__CHARACTER )(( 0)));
             } else {
-              result__4PAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__HUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__UHT(string_tmp__VH,result__4PAH);
+            add_last__3IT(string_tmp__VH,result__HUAH);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__CTQB;
+            goto while_do__OUQB;
           };
         };
         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)) {
+          pos__YYYG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_304));
+          put_position__LNG(pos__YYYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
         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)));
+      p__ZIAB=current_position__AWF();
+      result__WVGB=NULL;
+      ptr__XVGB=((__POINTER )(NULL));
+      typ_id__2VGB= 0;
+      sz__ZVGB=((__UINTEGER_32 )sizeof(__ITM_READ));
+      if ((sz__ZVGB ==  0)) {
+        result__WVGB=ITM_READ__;
+      } else {
+        typ_id__2VGB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZVGB);
+        if ((typ_id__2VGB == (__INTEGER)(-  1))) {
+          a__JVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KVGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZVGB + a__JVGH) & (__UINTEGER_32)(~ a__JVGH));
+          ptr_table__FUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KVGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__EUJH=((__POINTER )(NULL));
+          result__GUJH=((__POINTER *)ptr_table__FUJH)[ 0];
+          if ((result__GUJH == (void *)NULL)) {
+            result__GUJH=new_lab__ZPJ(new_size__KVGH);
+            next__EUJH=(void *)((unsigned long)result__GUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVGH)));
+            ((__POINTER *)next__EUJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FUJH)[ 0]=next__EUJH;
+          } else {
+            next__EUJH=((__POINTER *)result__GUJH)[ 0];
+            if ((next__EUJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GUJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KVGH <<  1)) <=  4096)) {
+                next__EUJH=(void *)((unsigned long)result__GUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KVGH)));
               } else {
-                next__1PJH=new_lab__QOJ(new_size__BRGH);
+                next__EUJH=new_lab__ZPJ(new_size__KVGH);
               };
-              ((__POINTER *)next__1PJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2PJH)[ 0]=next__1PJH;
+              ((__POINTER *)next__EUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FUJH)[ 0]=next__EUJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__GUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GUJH=next__EUJH;
+            };
+          };
+          ptr__XVGB=result__GUJH;
+        } else {
+          t__OVGH=((__UINTEGER_32 )typ_id__2VGB);
+          a__NVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__NUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZVGB + a__NVGH) & (__UINTEGER_32)(~ a__NVGH));
+          ptr_table__KUJH=((__POINTER )(&(table_type[(t__OVGH)])));
+          lab_type__MUJH=(__UINTEGER_32)(t__OVGH |  1);
+          next__JUJH=((__POINTER )(NULL));
+          result__LUJH=((__POINTER *)ptr_table__KUJH)[ 0];
+          if ((result__LUJH == (void *)NULL)) {
+            result__LUJH=new_lab__ZPJ(lab_type__MUJH);
+            next__JUJH=(void *)((unsigned long)result__LUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUJH)));
+            ((__POINTER *)next__JUJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KUJH)[ 0]=next__JUJH;
+          } else {
+            next__JUJH=((__POINTER *)result__LUJH)[ 0];
+            if ((next__JUJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LUJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NUJH <<  1)) <=  4096)) {
+                next__JUJH=(void *)((unsigned long)result__LUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NUJH)));
               } else {
-                next__AQJH=new_lab__QOJ(lab_type__DQJH);
+                next__JUJH=new_lab__ZPJ(lab_type__MUJH);
               };
-              ((__POINTER *)next__AQJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__BQJH)[ 0]=next__AQJH;
+              ((__POINTER *)next__JUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KUJH)[ 0]=next__JUJH;
             } else {
-              ((__POINTER *)result__CQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__CQJH=next__AQJH;
+              ((__POINTER *)result__LUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LUJH=next__JUJH;
             };
           };
-          ptr__NUGB=result__CQJH;
+          ptr__XVGB=result__LUJH;
         };
-        result__MUGB=((__ITM_READ *)ptr__NUGB);
-        *(result__MUGB) = *(ITM_READ__);
+        result__WVGB=((__ITM_READ *)ptr__XVGB);
+        *(result__WVGB) = *(ITM_READ__);
       };
-      ((__ITM_READ *)result__MUGB)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__QHAB;
-      result__G0M=result__MUGB;
+      ((__ITM_READ *)result__WVGB)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__ZIAB;
+      result__P1M=result__WVGB;
     };
-    __tmp__52M=result__0PJH;
+    __tmp__I4M=result__DUJH;
   };
-  if (__tmp__52M) {
-    __tmp__O3M=TRUE__;
+  if (__tmp__I4M) {
+    __tmp__X4M=TRUE__;
   } else {
-    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)));
+    type__Q1M=read_prototype__LLN(Self__N1M,NULL);
+    result__FXN=((void *)type__Q1M != (void *)NULL);
+    if (result__FXN) {
+      p__SCIH=current_position__AWF();
+      result__KCIH=NULL;
+      ptr__LCIH=((__POINTER )(NULL));
+      typ_id__MCIH= 0;
+      sz__NCIH=((__UINTEGER_32 )sizeof(__ITM_PROTOTYPE));
+      if ((sz__NCIH ==  0)) {
+        result__KCIH=ITM_PROTOTYPE__;
+      } else {
+        typ_id__MCIH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NCIH);
+        if ((typ_id__MCIH == (__INTEGER)(-  1))) {
+          a__OCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__PCIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCIH + a__OCIH) & (__UINTEGER_32)(~ a__OCIH));
+          ptr_table__PUJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PCIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__OUJH=((__POINTER )(NULL));
+          result__QUJH=((__POINTER *)ptr_table__PUJH)[ 0];
+          if ((result__QUJH == (void *)NULL)) {
+            result__QUJH=new_lab__ZPJ(new_size__PCIH);
+            next__OUJH=(void *)((unsigned long)result__QUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCIH)));
+            ((__POINTER *)next__OUJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PUJH)[ 0]=next__OUJH;
+          } else {
+            next__OUJH=((__POINTER *)result__QUJH)[ 0];
+            if ((next__OUJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QUJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PCIH <<  1)) <=  4096)) {
+                next__OUJH=(void *)((unsigned long)result__QUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PCIH)));
               } else {
-                next__FQJH=new_lab__QOJ(new_size__G4HH);
+                next__OUJH=new_lab__ZPJ(new_size__PCIH);
               };
-              ((__POINTER *)next__FQJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__GQJH)[ 0]=next__FQJH;
+              ((__POINTER *)next__OUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__PUJH)[ 0]=next__OUJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__QUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__QUJH=next__OUJH;
+            };
+          };
+          ptr__LCIH=result__QUJH;
+        } else {
+          t__QCIH=((__UINTEGER_32 )typ_id__MCIH);
+          a__RCIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__XUJH=(__UINTEGER_32)((__UINTEGER_32)(sz__NCIH + a__RCIH) & (__UINTEGER_32)(~ a__RCIH));
+          ptr_table__UUJH=((__POINTER )(&(table_type[(t__QCIH)])));
+          lab_type__WUJH=(__UINTEGER_32)(t__QCIH |  1);
+          next__TUJH=((__POINTER )(NULL));
+          result__VUJH=((__POINTER *)ptr_table__UUJH)[ 0];
+          if ((result__VUJH == (void *)NULL)) {
+            result__VUJH=new_lab__ZPJ(lab_type__WUJH);
+            next__TUJH=(void *)((unsigned long)result__VUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUJH)));
+            ((__POINTER *)next__TUJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UUJH)[ 0]=next__TUJH;
+          } else {
+            next__TUJH=((__POINTER *)result__VUJH)[ 0];
+            if ((next__TUJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VUJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XUJH <<  1)) <=  4096)) {
+                next__TUJH=(void *)((unsigned long)result__VUJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XUJH)));
               } else {
-                next__KQJH=new_lab__QOJ(lab_type__NQJH);
+                next__TUJH=new_lab__ZPJ(lab_type__WUJH);
               };
-              ((__POINTER *)next__KQJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__LQJH)[ 0]=next__KQJH;
+              ((__POINTER *)next__TUJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__UUJH)[ 0]=next__TUJH;
             } else {
-              ((__POINTER *)result__MQJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KQJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__MQJH=next__KQJH;
+              ((__POINTER *)result__VUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__VUJH=next__TUJH;
             };
           };
-          ptr__C4HH=result__MQJH;
+          ptr__LCIH=result__VUJH;
         };
-        result__B4HH=((__ITM_PROTOTYPE *)ptr__C4HH);
-        *(result__B4HH) = *(ITM_PROTOTYPE__);
+        result__KCIH=((__ITM_PROTOTYPE *)ptr__LCIH);
+        *(result__KCIH) = *(ITM_PROTOTYPE__);
       };
-      ((__ITM_PROTOTYPE *)result__B4HH)->parent_itm_constant__KTF.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=p__J4HH;
-      result__G0M=result__B4HH;
+      ((__ITM_PROTOTYPE *)result__KCIH)->parent_itm_constant__TUF.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=p__SCIH;
+      result__P1M=result__KCIH;
     };
-    __tmp__O3M=result__2VN;
+    __tmp__X4M=result__FXN;
   };
-  if (__tmp__O3M) {
-    __tmp__23M=TRUE__;
+  if (__tmp__X4M) {
+    __tmp__F5M=TRUE__;
   } else {
-    result__G0M=read_constant__WMO();
-    __tmp__23M=((void *)result__G0M != (void *)NULL);
+    result__P1M=read_constant__5NO();
+    __tmp__F5M=((void *)result__P1M != (void *)NULL);
   };
-  if (__tmp__23M) {
-    __tmp__Z4M=TRUE__;
+  if (__tmp__F5M) {
+    __tmp__CAN=TRUE__;
   } else {
-    result__PQJH=FALSE__;
+    result__YUJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__PQJH=FALSE__;
+      result__YUJH=FALSE__;
     } else {
-      result__QQJH='\0';
+      result__ZUJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__QQJH=((__CHARACTER )(( 0)));
+        result__ZUJH=((__CHARACTER )(( 0)));
       } else {
-        result__QQJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__ZUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__QQJH == '(')) {
+      if ((result__ZUJH == '(')) {
         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)));
+        result__YUJH=TRUE__;
+      };
+    };
+    if (result__YUJH) {
+      group_sav__V1M=last_group__SSF;
+      p__DVJH=current_position__AWF();
+      result__1UJH=NULL;
+      ptr__2UJH=((__POINTER )(NULL));
+      typ_id__3UJH= 0;
+      sz__4UJH=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__4UJH ==  0)) {
+        result__1UJH=ITM_LIST__;
+      } else {
+        typ_id__3UJH=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__4UJH);
+        if ((typ_id__3UJH == (__INTEGER)(-  1))) {
+          a__5UJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UJH + a__5UJH) & (__UINTEGER_32)(~ a__5UJH));
+          ptr_table__FVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__AVJH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__EVJH=((__POINTER )(NULL));
+          result__GVJH=((__POINTER *)ptr_table__FVJH)[ 0];
+          if ((result__GVJH == (void *)NULL)) {
+            result__GVJH=new_lab__ZPJ(new_size__AVJH);
+            next__EVJH=(void *)((unsigned long)result__GVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVJH)));
+            ((__POINTER *)next__EVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__FVJH)[ 0]=next__EVJH;
+          } else {
+            next__EVJH=((__POINTER *)result__GVJH)[ 0];
+            if ((next__EVJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__GVJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__AVJH <<  1)) <=  4096)) {
+                next__EVJH=(void *)((unsigned long)result__GVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AVJH)));
               } else {
-                next__1QJH=new_lab__QOJ(new_size__XQJH);
+                next__EVJH=new_lab__ZPJ(new_size__AVJH);
               };
-              ((__POINTER *)next__1QJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2QJH)[ 0]=next__1QJH;
+              ((__POINTER *)next__EVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__FVJH)[ 0]=next__EVJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__GVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__EVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__GVJH=next__EVJH;
+            };
+          };
+          ptr__2UJH=result__GVJH;
+        } else {
+          t__BVJH=((__UINTEGER_32 )typ_id__3UJH);
+          a__CVJH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__NVJH=(__UINTEGER_32)((__UINTEGER_32)(sz__4UJH + a__CVJH) & (__UINTEGER_32)(~ a__CVJH));
+          ptr_table__KVJH=((__POINTER )(&(table_type[(t__BVJH)])));
+          lab_type__MVJH=(__UINTEGER_32)(t__BVJH |  1);
+          next__JVJH=((__POINTER )(NULL));
+          result__LVJH=((__POINTER *)ptr_table__KVJH)[ 0];
+          if ((result__LVJH == (void *)NULL)) {
+            result__LVJH=new_lab__ZPJ(lab_type__MVJH);
+            next__JVJH=(void *)((unsigned long)result__LVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NVJH)));
+            ((__POINTER *)next__JVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KVJH)[ 0]=next__JVJH;
+          } else {
+            next__JVJH=((__POINTER *)result__LVJH)[ 0];
+            if ((next__JVJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LVJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NVJH <<  1)) <=  4096)) {
+                next__JVJH=(void *)((unsigned long)result__LVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NVJH)));
               } else {
-                next__ARJH=new_lab__QOJ(lab_type__DRJH);
+                next__JVJH=new_lab__ZPJ(lab_type__MVJH);
               };
-              ((__POINTER *)next__ARJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__BRJH)[ 0]=next__ARJH;
+              ((__POINTER *)next__JVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__KVJH)[ 0]=next__JVJH;
             } else {
-              ((__POINTER *)result__CRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ARJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__CRJH=next__ARJH;
+              ((__POINTER *)result__LVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__LVJH=next__JVJH;
             };
           };
-          ptr__TQJH=result__CRJH;
+          ptr__2UJH=result__LVJH;
         };
-        result__SQJH=((__ITM_LIST *)ptr__TQJH);
-        *(result__SQJH) = *(ITM_LIST__);
+        result__1UJH=((__ITM_LIST *)ptr__2UJH);
+        *(result__1UJH) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__1UJH)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ=p__DVJH;
+      last_group__SSF=result__1UJH;
+      result__P1M=result__1UJH;
+      read_group__H4GB(Self__N1M);
+      result__OVJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__FRJH=FALSE__;
+        result__OVJH=FALSE__;
       } else {
-        result__GRJH='\0';
+        result__PVJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__GRJH=((__CHARACTER )(( 0)));
+          result__PVJH=((__CHARACTER )(( 0)));
         } else {
-          result__GRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__PVJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__GRJH == ')')) {
+        if ((result__PVJH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__FRJH=TRUE__;
+          result__OVJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__OVJH)) {
+        pos__0YYG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_262));
+        put_position__LNG(pos__0YYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      last_group__JRF=group_sav__M0M;
+      last_group__SSF=group_sav__V1M;
     };
-    __tmp__Z4M=result__PQJH;
+    __tmp__CAN=result__YUJH;
   };
-  if (__tmp__Z4M) {
-    __tmp__2AN=TRUE__;
+  if (__tmp__CAN) {
+    __tmp__FCN=TRUE__;
   } else {
-    result__IRJH=FALSE__;
+    result__RVJH=FALSE__;
     if ((! read_space__KSD())) {
-      result__IRJH=FALSE__;
+      result__RVJH=FALSE__;
     } else {
-      result__JRJH='\0';
+      result__SVJH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JRJH=((__CHARACTER )(( 0)));
+        result__SVJH=((__CHARACTER )(( 0)));
       } else {
-        result__JRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__SVJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__JRJH == '{')) {
+      if ((result__SVJH == '{')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__IRJH=TRUE__;
+        result__RVJH=TRUE__;
       };
     };
-    if (result__IRJH) {
+    if (result__RVJH) {
       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)));
+      group_sav__V1M=last_group__SSF;
+      p__QZH=current_position__AWF();
+      result__DOI=NULL;
+      ptr__EOI=((__POINTER )(NULL));
+      typ_id__JOI= 0;
+      sz__GOI=((__UINTEGER_32 )sizeof(__ITM_LIST));
+      if ((sz__GOI ==  0)) {
+        result__DOI=ITM_LIST__;
+      } else {
+        typ_id__JOI=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GOI);
+        if ((typ_id__JOI == (__INTEGER)(-  1))) {
+          a__RTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__STGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GOI + a__RTGH) & (__UINTEGER_32)(~ a__RTGH));
+          ptr_table__VVJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__STGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__UVJH=((__POINTER )(NULL));
+          result__WVJH=((__POINTER *)ptr_table__VVJH)[ 0];
+          if ((result__WVJH == (void *)NULL)) {
+            result__WVJH=new_lab__ZPJ(new_size__STGH);
+            next__UVJH=(void *)((unsigned long)result__WVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__STGH)));
+            ((__POINTER *)next__UVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__VVJH)[ 0]=next__UVJH;
+          } else {
+            next__UVJH=((__POINTER *)result__WVJH)[ 0];
+            if ((next__UVJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WVJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__STGH <<  1)) <=  4096)) {
+                next__UVJH=(void *)((unsigned long)result__WVJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__STGH)));
               } else {
-                next__LRJH=new_lab__QOJ(new_size__JPGH);
+                next__UVJH=new_lab__ZPJ(new_size__STGH);
               };
-              ((__POINTER *)next__LRJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__MRJH)[ 0]=next__LRJH;
+              ((__POINTER *)next__UVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VVJH)[ 0]=next__UVJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__WVJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__WVJH=next__UVJH;
+            };
+          };
+          ptr__EOI=result__WVJH;
+        } else {
+          t__WTGH=((__UINTEGER_32 )typ_id__JOI);
+          a__VTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__3VJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GOI + a__VTGH) & (__UINTEGER_32)(~ a__VTGH));
+          ptr_table__0VJH=((__POINTER )(&(table_type[(t__WTGH)])));
+          lab_type__2VJH=(__UINTEGER_32)(t__WTGH |  1);
+          next__ZVJH=((__POINTER )(NULL));
+          result__1VJH=((__POINTER *)ptr_table__0VJH)[ 0];
+          if ((result__1VJH == (void *)NULL)) {
+            result__1VJH=new_lab__ZPJ(lab_type__2VJH);
+            next__ZVJH=(void *)((unsigned long)result__1VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VJH)));
+            ((__POINTER *)next__ZVJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__0VJH)[ 0]=next__ZVJH;
+          } else {
+            next__ZVJH=((__POINTER *)result__1VJH)[ 0];
+            if ((next__ZVJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1VJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__3VJH <<  1)) <=  4096)) {
+                next__ZVJH=(void *)((unsigned long)result__1VJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__3VJH)));
               } else {
-                next__QRJH=new_lab__QOJ(lab_type__TRJH);
+                next__ZVJH=new_lab__ZPJ(lab_type__2VJH);
               };
-              ((__POINTER *)next__QRJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__RRJH)[ 0]=next__QRJH;
+              ((__POINTER *)next__ZVJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0VJH)[ 0]=next__ZVJH;
             } else {
-              ((__POINTER *)result__SRJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QRJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__SRJH=next__QRJH;
+              ((__POINTER *)result__1VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__1VJH=next__ZVJH;
             };
           };
-          ptr__1MI=result__SRJH;
+          ptr__EOI=result__1VJH;
         };
-        result__0MI=((__ITM_LIST *)ptr__1MI);
-        *(result__0MI) = *(ITM_LIST__);
+        result__DOI=((__ITM_LIST *)ptr__EOI);
+        *(result__DOI) = *(ITM_LIST__);
       };
-      ((__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__;
+      ((__ITM_LIST *)result__DOI)->parent_itm_code__R3E.parent_itm_object__OBE.position__0BJ=p__QZH;
+      last_group__SSF=result__DOI;
+      old_position__QPI=position__CCC;
+      old_pos_cur__SPI=pos_cur__FCC;
+      old_pos_line__UPI=pos_line__GCC;
+      old_pos_col__WPI=pos_col__HCC;
+      old_short_derive__YPI=short_derive__PCC;
+      if (((void *)read_loc_arg__with_self__GBHB(Self__N1M,TRUE__,FALSE__) != (void *)NULL)) {
+        result__4VJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__VRJH=FALSE__;
+          result__4VJH=FALSE__;
         } else {
-          result__WRJH='\0';
+          result__5VJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WRJH=((__CHARACTER )(( 0)));
+            result__5VJH=((__CHARACTER )(( 0)));
           } else {
-            result__WRJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__5VJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__WRJH == ';')) {
+          if ((result__5VJH == ';')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__VRJH=TRUE__;
+            result__4VJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__4VJH)) {
+          pos__2YYG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_242));
+          put_position__LNG(pos__2YYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        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)));
+        restore_context__MBL();
+      };
+      lst__HHHB=last_group__SSF;
+      result__4EMB=NULL;
+      ptr__5EMB=((__POINTER )(NULL));
+      typ_id__EFMB= 0;
+      sz__BFMB=((__UINTEGER_32 )sizeof(__ITM_BLOCK));
+      if ((sz__BFMB ==  0)) {
+        result__4EMB=ITM_BLOCK__;
+      } else {
+        typ_id__EFMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__BFMB);
+        if ((typ_id__EFMB == (__INTEGER)(-  1))) {
+          a__LNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__MNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__BFMB + a__LNGH) & (__UINTEGER_32)(~ a__LNGH));
+          ptr_table__CWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MNGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__BWJH=((__POINTER )(NULL));
+          result__DWJH=((__POINTER *)ptr_table__CWJH)[ 0];
+          if ((result__DWJH == (void *)NULL)) {
+            result__DWJH=new_lab__ZPJ(new_size__MNGH);
+            next__BWJH=(void *)((unsigned long)result__DWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MNGH)));
+            ((__POINTER *)next__BWJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__CWJH)[ 0]=next__BWJH;
+          } else {
+            next__BWJH=((__POINTER *)result__DWJH)[ 0];
+            if ((next__BWJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DWJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MNGH <<  1)) <=  4096)) {
+                next__BWJH=(void *)((unsigned long)result__DWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MNGH)));
               } else {
-                next__YRJH=new_lab__QOJ(new_size__DJGH);
+                next__BWJH=new_lab__ZPJ(new_size__MNGH);
               };
-              ((__POINTER *)next__YRJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__ZRJH)[ 0]=next__YRJH;
+              ((__POINTER *)next__BWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__CWJH)[ 0]=next__BWJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__DWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__DWJH=next__BWJH;
+            };
+          };
+          ptr__5EMB=result__DWJH;
+        } else {
+          t__QNGH=((__UINTEGER_32 )typ_id__EFMB);
+          a__PNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KWJH=(__UINTEGER_32)((__UINTEGER_32)(sz__BFMB + a__PNGH) & (__UINTEGER_32)(~ a__PNGH));
+          ptr_table__HWJH=((__POINTER )(&(table_type[(t__QNGH)])));
+          lab_type__JWJH=(__UINTEGER_32)(t__QNGH |  1);
+          next__GWJH=((__POINTER )(NULL));
+          result__IWJH=((__POINTER *)ptr_table__HWJH)[ 0];
+          if ((result__IWJH == (void *)NULL)) {
+            result__IWJH=new_lab__ZPJ(lab_type__JWJH);
+            next__GWJH=(void *)((unsigned long)result__IWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWJH)));
+            ((__POINTER *)next__GWJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__HWJH)[ 0]=next__GWJH;
+          } else {
+            next__GWJH=((__POINTER *)result__IWJH)[ 0];
+            if ((next__GWJH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IWJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KWJH <<  1)) <=  4096)) {
+                next__GWJH=(void *)((unsigned long)result__IWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KWJH)));
               } else {
-                next__3RJH=new_lab__QOJ(lab_type__ASJH);
+                next__GWJH=new_lab__ZPJ(lab_type__JWJH);
               };
-              ((__POINTER *)next__3RJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__4RJH)[ 0]=next__3RJH;
+              ((__POINTER *)next__GWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__HWJH)[ 0]=next__GWJH;
             } else {
-              ((__POINTER *)result__5RJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3RJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__5RJH=next__3RJH;
+              ((__POINTER *)result__IWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__IWJH=next__GWJH;
             };
           };
-          ptr__VDMB=result__5RJH;
+          ptr__5EMB=result__IWJH;
         };
-        result__UDMB=((__ITM_BLOCK *)ptr__VDMB);
-        *(result__UDMB) = *(ITM_BLOCK__);
+        result__4EMB=((__ITM_BLOCK *)ptr__5EMB);
+        *(result__4EMB) = *(ITM_BLOCK__);
       };
-      ((__ITM_BLOCK *)result__UDMB)->list__XKDC=lst__3FHB;
-      result__G0M=result__UDMB;
-      read_group__32GB(Self__E0M);
-      result__CSJH=FALSE__;
+      ((__ITM_BLOCK *)result__4EMB)->list__LMDC=lst__HHHB;
+      result__P1M=result__4EMB;
+      read_group__H4GB(Self__N1M);
+      result__LWJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__CSJH=FALSE__;
+        result__LWJH=FALSE__;
       } else {
-        result__DSJH='\0';
+        result__MWJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__DSJH=((__CHARACTER )(( 0)));
+          result__MWJH=((__CHARACTER )(( 0)));
         } else {
-          result__DSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__MWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__DSJH == '}')) {
+        if ((result__MWJH == '}')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__CSJH=TRUE__;
+          result__LWJH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__LWJH)) {
+        pos__EZYG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_294));
+        put_position__LNG(pos__EZYG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
       short__token__to__YBD((&__string_133),(__INTEGER)(position__CCC -  1),position__CCC);
-      last_group__JRF=group_sav__M0M;
+      last_group__SSF=group_sav__V1M;
     };
-    __tmp__2AN=result__IRJH;
+    __tmp__FCN=result__RVJH;
   };
-  if ((! __tmp__2AN)) {
-    if (read_external__1OO()) {
-      result__FSJH=FALSE__;
+  if ((! __tmp__FCN)) {
+    if (read_external__EQO()) {
+      result__OWJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__FSJH=FALSE__;
+        result__OWJH=FALSE__;
       } else {
-        result__GSJH='\0';
+        result__PWJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__GSJH=((__CHARACTER )(( 0)));
+          result__PWJH=((__CHARACTER )(( 0)));
         } else {
-          result__GSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__PWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__GSJH == ':')) {
+        if ((result__PWJH == ':')) {
           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;
+          result__OWJH=TRUE__;
+        };
+      };
+      if ((! result__OWJH)) {
+        __tmp__ZCN=current_position__AWF();
+        result__DUTB=NULL;
+        ptr__EUTB=((__POINTER )(NULL));
+        typ_id__JUTB= 0;
+        sz__GUTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL));
+        if ((sz__GUTB ==  0)) {
+          result__DUTB=ITM_EXTERNAL__;
+        } else {
+          typ_id__JUTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GUTB);
+          if ((typ_id__JUTB == (__INTEGER)(-  1))) {
+            a__TNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__UNGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUTB + a__TNGH) & (__UINTEGER_32)(~ a__TNGH));
+            ptr_table__SWJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__UNGH / ((__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__ZPJ(new_size__UNGH);
+              next__RWJH=(void *)((unsigned long)result__TWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNGH)));
+              ((__POINTER *)next__RWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SWJH)[ 0]=next__RWJH;
             } else {
-              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)));
+              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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UNGH <<  1)) <=  4096)) {
+                  next__RWJH=(void *)((unsigned long)result__TWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UNGH)));
                 } else {
-                  next__ISJH=new_lab__QOJ(new_size__LJGH);
+                  next__RWJH=new_lab__ZPJ(new_size__UNGH);
                 };
-                ((__POINTER *)next__ISJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JSJH)[ 0]=next__ISJH;
+                ((__POINTER *)next__RWJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SWJH)[ 0]=next__RWJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__TWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__TWJH=next__RWJH;
+              };
+            };
+            ptr__EUTB=result__TWJH;
+          } else {
+            t__YNGH=((__UINTEGER_32 )typ_id__JUTB);
+            a__XNGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0WJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GUTB + a__XNGH) & (__UINTEGER_32)(~ a__XNGH));
+            ptr_table__XWJH=((__POINTER )(&(table_type[(t__YNGH)])));
+            lab_type__ZWJH=(__UINTEGER_32)(t__YNGH |  1);
+            next__WWJH=((__POINTER )(NULL));
+            result__YWJH=((__POINTER *)ptr_table__XWJH)[ 0];
+            if ((result__YWJH == (void *)NULL)) {
+              result__YWJH=new_lab__ZPJ(lab_type__ZWJH);
+              next__WWJH=(void *)((unsigned long)result__YWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WJH)));
+              ((__POINTER *)next__WWJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XWJH)[ 0]=next__WWJH;
             } else {
-              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)));
+              next__WWJH=((__POINTER *)result__YWJH)[ 0];
+              if ((next__WWJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YWJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0WJH <<  1)) <=  4096)) {
+                  next__WWJH=(void *)((unsigned long)result__YWJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WJH)));
                 } else {
-                  next__NSJH=new_lab__QOJ(lab_type__QSJH);
+                  next__WWJH=new_lab__ZPJ(lab_type__ZWJH);
                 };
-                ((__POINTER *)next__NSJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__OSJH)[ 0]=next__NSJH;
+                ((__POINTER *)next__WWJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XWJH)[ 0]=next__WWJH;
               } else {
-                ((__POINTER *)result__PSJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NSJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__PSJH=next__NSJH;
+                ((__POINTER *)result__YWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YWJH=next__WWJH;
               };
             };
-            ptr__YSTB=result__PSJH;
+            ptr__EUTB=result__YWJH;
           };
-          result__XSTB=((__ITM_EXTERNAL *)ptr__YSTB);
-          *(result__XSTB) = *(ITM_EXTERNAL__);
+          result__DUTB=((__ITM_EXTERNAL *)ptr__EUTB);
+          *(result__DUTB) = *(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;
+        ((__ITM_EXTERNAL *)result__DUTB)->parent_itm_extern__YCN.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ=__tmp__ZCN;
+        result__P1M=result__DUTB;
       } else {
-        __tmp__YBN=current_position__XUF();
-        result__SSJH=FALSE__;
+        __tmp__BDN=current_position__AWF();
+        result__1WJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__SSJH=FALSE__;
+          result__1WJH=FALSE__;
         } else {
-          result__TSJH='\0';
+          result__2WJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__TSJH=((__CHARACTER )(( 0)));
+            result__2WJH=((__CHARACTER )(( 0)));
           } else {
-            result__TSJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__2WJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__TSJH == '(')) {
+          if ((result__2WJH == '(')) {
             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;
+            result__1WJH=TRUE__;
+          };
+        };
+        result__XVTB=NULL;
+        ptr__YVTB=((__POINTER )(NULL));
+        typ_id__3VTB= 0;
+        sz__0VTB=((__UINTEGER_32 )sizeof(__ITM_EXTERNAL_TYPE));
+        if ((sz__0VTB ==  0)) {
+          result__XVTB=ITM_EXTERNAL_TYPE__;
+        } else {
+          typ_id__3VTB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__0VTB);
+          if ((typ_id__3VTB == (__INTEGER)(-  1))) {
+            a__1NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__2NGH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VTB + a__1NGH) & (__UINTEGER_32)(~ a__1NGH));
+            ptr_table__5WJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__2NGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__4WJH=((__POINTER )(NULL));
+            result__AXJH=((__POINTER *)ptr_table__5WJH)[ 0];
+            if ((result__AXJH == (void *)NULL)) {
+              result__AXJH=new_lab__ZPJ(new_size__2NGH);
+              next__4WJH=(void *)((unsigned long)result__AXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NGH)));
+              ((__POINTER *)next__4WJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
             } else {
-              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)));
+              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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__2NGH <<  1)) <=  4096)) {
+                  next__4WJH=(void *)((unsigned long)result__AXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__2NGH)));
                 } else {
-                  next__VSJH=new_lab__QOJ(new_size__TJGH);
+                  next__4WJH=new_lab__ZPJ(new_size__2NGH);
                 };
-                ((__POINTER *)next__VSJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WSJH)[ 0]=next__VSJH;
+                ((__POINTER *)next__4WJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5WJH)[ 0]=next__4WJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__AXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__AXJH=next__4WJH;
+              };
+            };
+            ptr__YVTB=result__AXJH;
+          } else {
+            t__AOGH=((__UINTEGER_32 )typ_id__3VTB);
+            a__5NGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__HXJH=(__UINTEGER_32)((__UINTEGER_32)(sz__0VTB + a__5NGH) & (__UINTEGER_32)(~ a__5NGH));
+            ptr_table__EXJH=((__POINTER )(&(table_type[(t__AOGH)])));
+            lab_type__GXJH=(__UINTEGER_32)(t__AOGH |  1);
+            next__DXJH=((__POINTER )(NULL));
+            result__FXJH=((__POINTER *)ptr_table__EXJH)[ 0];
+            if ((result__FXJH == (void *)NULL)) {
+              result__FXJH=new_lab__ZPJ(lab_type__GXJH);
+              next__DXJH=(void *)((unsigned long)result__FXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HXJH)));
+              ((__POINTER *)next__DXJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EXJH)[ 0]=next__DXJH;
             } else {
-              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)));
+              next__DXJH=((__POINTER *)result__FXJH)[ 0];
+              if ((next__DXJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FXJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__HXJH <<  1)) <=  4096)) {
+                  next__DXJH=(void *)((unsigned long)result__FXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__HXJH)));
                 } else {
-                  next__0SJH=new_lab__QOJ(lab_type__3SJH);
+                  next__DXJH=new_lab__ZPJ(lab_type__GXJH);
                 };
-                ((__POINTER *)next__0SJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__1SJH)[ 0]=next__0SJH;
+                ((__POINTER *)next__DXJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EXJH)[ 0]=next__DXJH;
               } else {
-                ((__POINTER *)result__2SJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0SJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__2SJH=next__0SJH;
+                ((__POINTER *)result__FXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__FXJH=next__DXJH;
               };
             };
-            ptr__MUTB=result__2SJH;
+            ptr__YVTB=result__FXJH;
           };
-          result__LUTB=((__ITM_EXTERNAL_TYPE *)ptr__MUTB);
-          *(result__LUTB) = *(ITM_EXTERNAL_TYPE__);
+          result__XVTB=((__ITM_EXTERNAL_TYPE *)ptr__YVTB);
+          *(result__XVTB) = *(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)) {
+        Self__KZEC=((__ITM_EXTERNAL_TYPE *)result__XVTB);
+        Self__KZEC->parent_itm_extern__T1M.parent_itm_code__S1M.parent_itm_object__OBE.position__0BJ=__tmp__BDN;
+        Self__KZEC->is_persistant__QEN=result__1WJH;
+        type__Q1M=read_type__K5L(Self__N1M,FALSE__);
+        if (((void *)type__Q1M == (void *)NULL)) {
+          pos__SZYG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_279));
+          put_position__LNG(pos__SZYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__5SJH=FALSE__;
+        result__IXJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__5SJH=FALSE__;
+          result__IXJH=FALSE__;
         } else {
-          result__ATJH='\0';
+          result__JXJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__ATJH=((__CHARACTER )(( 0)));
+            result__JXJH=((__CHARACTER )(( 0)));
           } else {
-            result__ATJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__JXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__ATJH == '{')) {
+          if ((result__JXJH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__5SJH=TRUE__;
+            result__IXJH=TRUE__;
           };
         };
-        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)) {
+        if (result__IXJH) {
+          if (((void *)read_type_list__MJO(Self__N1M,FALSE__) == (void *)NULL)) {
+            pos__UZYG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_305));
+            put_position__LNG(pos__UZYG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          result__CTJH=FALSE__;
+          result__LXJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__CTJH=FALSE__;
+            result__LXJH=FALSE__;
           } else {
-            result__DTJH='\0';
+            result__MXJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__DTJH=((__CHARACTER )(( 0)));
+              result__MXJH=((__CHARACTER )(( 0)));
             } else {
-              result__DTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__MXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__DTJH == '}')) {
+            if ((result__MXJH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__CTJH=TRUE__;
+              result__LXJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__LXJH)) {
+            pos__WZYG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_294));
+            put_position__LNG(pos__WZYG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
         };
-        if (result__LUTB->is_persistant__HDN) {
-          result__FTJH=FALSE__;
+        if (result__XVTB->is_persistant__QEN) {
+          result__OXJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__FTJH=FALSE__;
+            result__OXJH=FALSE__;
           } else {
-            result__GTJH='\0';
+            result__PXJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__GTJH=((__CHARACTER )(( 0)));
+              result__PXJH=((__CHARACTER )(( 0)));
             } else {
-              result__GTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__PXJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__GTJH == ')')) {
+            if ((result__PXJH == ')')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__FTJH=TRUE__;
+              result__OXJH=TRUE__;
             };
           };
-          __tmp__SDN=(! result__FTJH);
+          __tmp__1EN=(! result__OXJH);
         } else {
-          __tmp__SDN=FALSE__;
+          __tmp__1EN=FALSE__;
         };
-        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)) {
+        if (__tmp__1EN) {
+          pos__YZYG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_262));
+          put_position__LNG(pos__YZYG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__G0M=result__LUTB;
+        result__P1M=result__XVTB;
       };
     };
   };
-  return(result__G0M);
+  return(result__P1M);
 }
 
-static __BOOLEAN read_integer__1XP()
+static __BOOLEAN read_integer__EZP()
 // () With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER_64 result__IOJE,__tmp__0OJE,result__1SPE,result__RMRE;
+  __INTEGER pos_old__IZP,__tmp__TOJE,Self__SGOE,result__ELSE,j__MRPE;
+  __INTEGER __tmp__GTPE,Self__2OQE,i__1KRE,__tmp__2MRE,Self__AQSE;
+  __INTEGER state__4NRE,value__5NRE,i__3NRE,state__ZVRE,result__2VRE;
+  __INTEGER i__YVRE;
+  __STRING *Self__GOJE,*Self__WMEH,*Self__BOGH,*Self__JRPE,*Self__ZSPE;
+  __STRING *Self__ZKRE,*Self__PMRE,*Self__1NRE,*Self__WVRE;
+  __POSITION pos__50YG,pos__S1YG,pos__B2YG;
+  __BOOLEAN result__HZP,result__WLEH,__tmp__TZP,__tmp__N0P,__tmp__1LSE;
+  __BOOLEAN result__LRPE,__tmp__ESPE,result__TXTE,__tmp__V2P;
+  __BOOLEAN result__2KRE,negative__AORE,result__BORE,__tmp__PPRE;
+  __BOOLEAN result__31PG,__tmp__1PRE,result__K2PG,result__4UEH;
+  __BOOLEAN __tmp__PQRE,__tmp__ORRE,result__G3FF,result__CVEH;
+  __BOOLEAN __tmp__CURE,result__Y3FF,result__GVEH,__tmp__PTRE;
+  __BOOLEAN negative__1VRE,__tmp__IXRE,result__M3PG,__tmp__1XRE;
+  __BOOLEAN __tmp__QYRE,result__G5FF,__tmp__XZRE,result__Y5FF;
+  __BOOLEAN result__SNEH;
+  __CHARACTER result__MUAH,result__WUAH,result__1UAH,result__AVAH;
+  __CHARACTER result__FVAH,result__KVAH,result__PVAH,Self__CLSE;
+  __CHARACTER result__SWAH,Self__RXTE,result__NXAH,Self__W1FF;
+  __CHARACTER result__XXAH,cc__CORE,cc__0VRE;
+  result__HZP=FALSE__;
+  pos_old__IZP= 0;
   if (read_space__KSD()) {
-    result__DQAH='\0';
+    result__MUAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__DQAH=((__CHARACTER )(( 0)));
+      result__MUAH=((__CHARACTER )(( 0)));
     } else {
-      result__DQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__MUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__NHEH=FALSE__;
-    if ((((__INTEGER_8 )result__DQAH) >= ((__INTEGER_8 )'0'))) {
-      result__NHEH=(((__INTEGER_8 )result__DQAH) <= ((__INTEGER_8 )'9'));
+    result__WLEH=FALSE__;
+    if ((((__INTEGER_8 )result__MUAH) >= ((__INTEGER_8 )'0'))) {
+      result__WLEH=(((__INTEGER_8 )result__MUAH) <= ((__INTEGER_8 )'9'));
     };
-    __tmp__KYP=result__NHEH;
+    __tmp__TZP=result__WLEH;
   } else {
-    __tmp__KYP=FALSE__;
+    __tmp__TZP=FALSE__;
   };
-  if (__tmp__KYP) {
-    result__4XP=TRUE__;
+  if (__tmp__TZP) {
+    result__HZP=TRUE__;
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__NQAH='\0';
+    result__WUAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__NQAH=((__CHARACTER )(( 0)));
+      result__WUAH=((__CHARACTER )(( 0)));
     } else {
-      result__NQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__WUAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__UHT(string_tmp__VH,result__NQAH);
-    pos_old__5XP=position__CCC;
+    add_last__3IT(string_tmp__VH,result__WUAH);
+    pos_old__IZP=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__CB0D:
+    while_do__UA0D:
     {
-      result__SQAH='\0';
+      result__1UAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__SQAH=((__CHARACTER )(( 0)));
+        result__1UAH=((__CHARACTER )(( 0)));
       } else {
-        result__SQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__1UAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if (is_hexadecimal_digit__3LJE(result__SQAH)) {
-        __tmp__EZP=TRUE__;
+      if (is_hexadecimal_digit__GMJE(result__1UAH)) {
+        __tmp__N0P=TRUE__;
       } else {
-        result__XQAH='\0';
+        result__AVAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__XQAH=((__CHARACTER )(( 0)));
+          result__AVAH=((__CHARACTER )(( 0)));
         } else {
-          result__XQAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__AVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__EZP=(result__XQAH == '_');
+        __tmp__N0P=(result__AVAH == '_');
       };
-      if (__tmp__EZP) {
-        result__2QAH='\0';
+      if (__tmp__N0P) {
+        result__FVAH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__2QAH=((__CHARACTER )(( 0)));
+          result__FVAH=((__CHARACTER )(( 0)));
         } else {
-          result__2QAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__FVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__2QAH != '_')) {
-          result__BRAH='\0';
+        if ((result__FVAH != '_')) {
+          result__KVAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__BRAH=((__CHARACTER )(( 0)));
+            result__KVAH=((__CHARACTER )(( 0)));
           } else {
-            result__BRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__KVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__BRAH);
+          add_last__3IT(string_tmp__VH,result__KVAH);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__CB0D;
+        goto while_do__UA0D;
       };
     };
-    result__GRAH='\0';
+    result__PVAH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__GRAH=((__CHARACTER )(( 0)));
+      result__PVAH=((__CHARACTER )(( 0)));
     } else {
-      result__GRAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__PVAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    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__;
+    if ((result__PVAH == 'h')) {
+      Self__GOJE=((__STRING *)string_tmp__VH);
+      result__IOJE= 0;
+      __tmp__TOJE=Self__GOJE->count__EGC;
+      Self__SGOE= 1;
+      while ((Self__SGOE <= __tmp__TOJE)) {
+        __tmp__0OJE=(__INTEGER_64)(result__IOJE <<  4);
+        Self__CLSE=((__CHARACTER *)Self__GOJE->storage__F5R)[(__INTEGER)(Self__SGOE -  1)];
+        result__ELSE= 0;
+        if ((((__INTEGER_8 )Self__CLSE) < ((__INTEGER_8 )'A'))) {
+          result__ELSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CLSE) -  48));
+          __tmp__1LSE=TRUE__;
         } else {
-          __tmp__1JSE=FALSE__;
+          __tmp__1LSE=FALSE__;
         };
-        if ((! __tmp__1JSE)) {
-          if ((((__INTEGER_8 )Self__CJSE) < ((__INTEGER_8 )'a'))) {
-            result__EJSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CJSE) -  55));
+        if ((! __tmp__1LSE)) {
+          if ((((__INTEGER_8 )Self__CLSE) < ((__INTEGER_8 )'a'))) {
+            result__ELSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CLSE) -  55));
           } else {
-            result__EJSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CJSE) -  87));
+            result__ELSE=((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )Self__CLSE) -  87));
           };
         };
-        result__5NJE=(__INTEGER_64)(__tmp__ROJE | ((__INTEGER_64 )result__EJSE));
-        Self__OEOE=(__INTEGER)(Self__OEOE +  1);
+        result__IOJE=(__INTEGER_64)(__tmp__0OJE | ((__INTEGER_64 )result__ELSE));
+        Self__SGOE=(__INTEGER)(Self__SGOE +  1);
       };
-      last_integer__UNO=result__5NJE;
+      last_integer__3OO=result__IOJE;
       position__CCC=(__INTEGER)(position__CCC +  1);
     } else {
-      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;
+      Self__WMEH=((__STRING *)string_tmp__VH);
+      if ((((__INTEGER_8 )((__CHARACTER *)Self__WMEH->storage__F5R)[(__INTEGER)(Self__WMEH->count__EGC -  1)]) > ((__INTEGER_8 )'9'))) {
+        Self__BOGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__BOGH->count__EGC)) {
+          Self__BOGH->count__EGC= 0;
         } else {
-          Self__YJGH->count__EGC=(__INTEGER)(Self__YJGH->count__EGC -  1);
+          Self__BOGH->count__EGC=(__INTEGER)(Self__BOGH->count__EGC -  1);
         };
         position__CCC=(__INTEGER)(position__CCC -  1);
       };
-      result__JSAH='\0';
+      result__SWAH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JSAH=((__CHARACTER )(( 0)));
+        result__SWAH=((__CHARACTER )(( 0)));
       } else {
-        result__JSAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__SWAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      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 ((result__SWAH == 'o')) {
+        Self__JRPE=((__STRING *)string_tmp__VH);
+        result__LRPE=FALSE__;
+        j__MRPE= 0;
+        if ((Self__JRPE->count__EGC !=  0)) {
+          j__MRPE= 1;
+          until_do__PNSE:
           {
-            if ((j__XOPE > Self__UOPE->count__EGC)) {
-              __tmp__PPPE=TRUE__;
+            if ((j__MRPE > Self__JRPE->count__EGC)) {
+              __tmp__ESPE=TRUE__;
             } else {
-              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'));
+              Self__RXTE=((__CHARACTER *)Self__JRPE->storage__F5R)[(__INTEGER)(j__MRPE -  1)];
+              result__TXTE=FALSE__;
+              if ((((__INTEGER_8 )Self__RXTE) >= ((__INTEGER_8 )'0'))) {
+                result__TXTE=(((__INTEGER_8 )Self__RXTE) <= ((__INTEGER_8 )'7'));
               };
-              __tmp__PPPE=(! result__TVTE);
+              __tmp__ESPE=(! result__TXTE);
             };
-            if ((! __tmp__PPPE)) {
-              j__XOPE=(__INTEGER)(j__XOPE +  1);
-              goto until_do__PLSE;
+            if ((! __tmp__ESPE)) {
+              j__MRPE=(__INTEGER)(j__MRPE +  1);
+              goto until_do__PNSE;
             };
           };
-          result__WOPE=(j__XOPE > Self__UOPE->count__EGC);
+          result__LRPE=(j__MRPE > Self__JRPE->count__EGC);
         };
-        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)) {
+        if ((! result__LRPE)) {
+          pos__50YG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_306));
+          put_position__LNG(pos__50YG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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);
+        Self__ZSPE=((__STRING *)string_tmp__VH);
+        result__1SPE= 0;
+        __tmp__GTPE=Self__ZSPE->count__EGC;
+        Self__2OQE= 1;
+        while ((Self__2OQE <= __tmp__GTPE)) {
+          result__1SPE=(__INTEGER_64)((__INTEGER_64)(result__1SPE <<  3) | ((__INTEGER_64 )((__INTEGER )(__INTEGER_8)(((__INTEGER_8 )((__CHARACTER *)Self__ZSPE->storage__F5R)[(__INTEGER)(Self__2OQE -  1)]) -  48))));
+          Self__2OQE=(__INTEGER)(Self__2OQE +  1);
         };
-        last_integer__UNO=result__GQPE;
+        last_integer__3OO=result__1SPE;
         position__CCC=(__INTEGER)(position__CCC +  1);
-        __tmp__M1P=TRUE__;
+        __tmp__V2P=TRUE__;
       } else {
-        __tmp__M1P=FALSE__;
+        __tmp__V2P=FALSE__;
       };
-      if ((! __tmp__M1P)) {
-        result__ETAH='\0';
+      if ((! __tmp__V2P)) {
+        result__NXAH='\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)) {
+          result__NXAH=((__CHARACTER )(( 0)));
+        } else {
+          result__NXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
+        };
+        if ((result__NXAH == 'b')) {
+          Self__ZKRE=((__STRING *)string_tmp__VH);
+          i__1KRE=Self__ZKRE->count__EGC;
+          result__2KRE=TRUE__;
+          while ((! ((! result__2KRE) || (i__1KRE ==  0)))) {
+            Self__W1FF=((__CHARACTER *)Self__ZKRE->storage__F5R)[(__INTEGER)(i__1KRE -  1)];
+            result__2KRE=((Self__W1FF == '0') || (Self__W1FF == '1'));
+            i__1KRE=(__INTEGER)(i__1KRE -  1);
+          };
+          if ((! result__2KRE)) {
+            pos__S1YG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_307));
+            put_position__LNG(pos__S1YG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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__PMRE=((__STRING *)string_tmp__VH);
+          result__RMRE= 0;
+          __tmp__2MRE=Self__PMRE->count__EGC;
+          Self__AQSE= 1;
+          while ((Self__AQSE <= __tmp__2MRE)) {
+            result__RMRE=(__INTEGER_64)(result__RMRE <<  1);
+            if ((((__CHARACTER *)Self__PMRE->storage__F5R)[(__INTEGER)(Self__AQSE -  1)] == '1')) {
+              result__RMRE=(__INTEGER_64)(~ (__INTEGER_64)((__INTEGER_64)(~ result__RMRE) &  -2));
             };
-            Self__AOSE=(__INTEGER)(Self__AOSE +  1);
+            Self__AQSE=(__INTEGER)(Self__AQSE +  1);
           };
-          last_integer__UNO=result__PKRE;
+          last_integer__3OO=result__RMRE;
           position__CCC=(__INTEGER)(position__CCC +  1);
         } else {
-          result__OTAH='\0';
+          result__XXAH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__OTAH=((__CHARACTER )(( 0)));
+            result__XXAH=((__CHARACTER )(( 0)));
           } else {
-            result__OTAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__XXAH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__OTAH == 'd')) {
+          if ((result__XXAH == '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__;
+          Self__1NRE=((__STRING *)string_tmp__VH);
+          state__4NRE= 0;
+          value__5NRE= 0;
+          negative__AORE=FALSE__;
+          result__BORE=FALSE__;
+          cc__CORE='\0';
+          i__3NRE= 1;
+          while ((! ((state__4NRE ==  4) || (i__3NRE > Self__1NRE->count__EGC)))) {
+            cc__CORE=((__CHARACTER *)Self__1NRE->storage__F5R)[(__INTEGER)(i__3NRE -  1)];
+            if ((state__4NRE ==  0)) {
+              if ((((((((cc__CORE == ' ') || (cc__CORE == '\t')) || (cc__CORE == '\n')) || (cc__CORE == '\r')) || (cc__CORE == '\0')) || (cc__CORE == '\f')) || (cc__CORE == '\v'))) {
+                __tmp__PPRE=TRUE__;
               } else {
-                result__SXPG=(cc__AMRE == '+');
-                if (result__SXPG) {
-                  state__2LRE= 1;
+                result__31PG=(cc__CORE == '+');
+                if (result__31PG) {
+                  state__4NRE= 1;
                 };
-                __tmp__NNRE=result__SXPG;
+                __tmp__PPRE=result__31PG;
               };
-              if (__tmp__NNRE) {
-                __tmp__ZNRE=TRUE__;
+              if (__tmp__PPRE) {
+                __tmp__1PRE=TRUE__;
               } else {
-                result__5XPG=(cc__AMRE == '-');
-                if (result__5XPG) {
-                  negative__4LRE=TRUE__;
-                  state__2LRE= 1;
+                result__K2PG=(cc__CORE == '-');
+                if (result__K2PG) {
+                  negative__AORE=TRUE__;
+                  state__4NRE= 1;
                 };
-                __tmp__ZNRE=result__5XPG;
+                __tmp__1PRE=result__K2PG;
               };
-              if ((! __tmp__ZNRE)) {
-                result__VQEH=FALSE__;
-                if ((((__INTEGER_8 )cc__AMRE) >= ((__INTEGER_8 )'0'))) {
-                  result__VQEH=(((__INTEGER_8 )cc__AMRE) <= ((__INTEGER_8 )'9'));
+              if ((! __tmp__1PRE)) {
+                result__4UEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CORE) >= ((__INTEGER_8 )'0'))) {
+                  result__4UEH=(((__INTEGER_8 )cc__CORE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__VQEH) {
-                  value__3LRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48);
-                  state__2LRE= 2;
+                if (result__4UEH) {
+                  value__5NRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48);
+                  state__4NRE= 2;
                 } else {
-                  state__2LRE= 4;
+                  state__4NRE= 4;
                 };
               };
-              __tmp__NORE=TRUE__;
+              __tmp__PQRE=TRUE__;
             } else {
-              __tmp__NORE=FALSE__;
+              __tmp__PQRE=FALSE__;
             };
-            if (__tmp__NORE) {
-              __tmp__MPRE=TRUE__;
+            if (__tmp__PQRE) {
+              __tmp__ORRE=TRUE__;
             } else {
-              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'));
+              result__G3FF=(state__4NRE ==  1);
+              if (result__G3FF) {
+                result__CVEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CORE) >= ((__INTEGER_8 )'0'))) {
+                  result__CVEH=(((__INTEGER_8 )cc__CORE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__ZQEH) {
-                  value__3LRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48);
-                  if (negative__4LRE) {
-                    value__3LRE=(__INTEGER)(- value__3LRE);
+                if (result__CVEH) {
+                  value__5NRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48);
+                  if (negative__AORE) {
+                    value__5NRE=(__INTEGER)(- value__5NRE);
                   };
-                  state__2LRE= 2;
+                  state__4NRE= 2;
                 } else {
-                  state__2LRE= 4;
+                  state__4NRE= 4;
                 };
               };
-              __tmp__MPRE=result__P0FF;
+              __tmp__ORRE=result__G3FF;
             };
-            if (__tmp__MPRE) {
-              __tmp__ASRE=TRUE__;
+            if (__tmp__ORRE) {
+              __tmp__CURE=TRUE__;
             } else {
-              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'));
+              result__Y3FF=(state__4NRE ==  2);
+              if (result__Y3FF) {
+                result__GVEH=FALSE__;
+                if ((((__INTEGER_8 )cc__CORE) >= ((__INTEGER_8 )'0'))) {
+                  result__GVEH=(((__INTEGER_8 )cc__CORE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__3QEH) {
-                  if (negative__4LRE) {
-                    value__3LRE=(__INTEGER)((__INTEGER)( 10 * value__3LRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48));
+                if (result__GVEH) {
+                  if (negative__AORE) {
+                    value__5NRE=(__INTEGER)((__INTEGER)( 10 * value__5NRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48));
                   } else {
-                    value__3LRE=(__INTEGER)((__INTEGER)( 10 * value__3LRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__AMRE)) -  48));
+                    value__5NRE=(__INTEGER)((__INTEGER)( 10 * value__5NRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__CORE)) -  48));
                   };
-                  if (((negative__4LRE && (value__3LRE >  0)) || ((! negative__4LRE) && (value__3LRE <  0)))) {
-                    state__2LRE= 4;
+                  if (((negative__AORE && (value__5NRE >  0)) || ((! negative__AORE) && (value__5NRE <  0)))) {
+                    state__4NRE= 4;
                   };
-                  __tmp__NRRE=TRUE__;
+                  __tmp__PTRE=TRUE__;
                 } else {
-                  __tmp__NRRE=FALSE__;
+                  __tmp__PTRE=FALSE__;
                 };
-                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;
+                if ((! __tmp__PTRE)) {
+                  if ((((((((cc__CORE == ' ') || (cc__CORE == '\t')) || (cc__CORE == '\n')) || (cc__CORE == '\r')) || (cc__CORE == '\0')) || (cc__CORE == '\f')) || (cc__CORE == '\v'))) {
+                    state__4NRE= 3;
                   } else {
-                    state__2LRE= 4;
+                    state__4NRE= 4;
                   };
                 };
               };
-              __tmp__ASRE=result__B1FF;
+              __tmp__CURE=result__Y3FF;
             };
-            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;
+            if ((! __tmp__CURE)) {
+              if ((state__4NRE ==  3)) {
+                if ((! (((((((cc__CORE == ' ') || (cc__CORE == '\t')) || (cc__CORE == '\n')) || (cc__CORE == '\r')) || (cc__CORE == '\0')) || (cc__CORE == '\f')) || (cc__CORE == '\v')))) {
+                  state__4NRE= 4;
                 };
               };
             };
-            i__1LRE=(__INTEGER)(i__1LRE +  1);
+            i__3NRE=(__INTEGER)(i__3NRE +  1);
           };
-          if (((state__2LRE !=  0) && (state__2LRE !=  4))) {
-            result__5LRE=TRUE__;
+          if (((state__4NRE !=  0) && (state__4NRE !=  4))) {
+            result__BORE=TRUE__;
           };
-          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)) {
+          if ((! result__BORE)) {
+            pos__B2YG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_308));
+            put_position__LNG(pos__B2YG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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__;
+          Self__WVRE=((__STRING *)string_tmp__VH);
+          state__ZVRE= 0;
+          cc__0VRE='\0';
+          negative__1VRE=FALSE__;
+          result__2VRE= 0;
+          i__YVRE= 1;
+          while ((i__YVRE <= Self__WVRE->count__EGC)) {
+            cc__0VRE=((__CHARACTER *)Self__WVRE->storage__F5R)[(__INTEGER)(i__YVRE -  1)];
+            if ((state__ZVRE ==  0)) {
+              if ((((((((cc__0VRE == ' ') || (cc__0VRE == '\t')) || (cc__0VRE == '\n')) || (cc__0VRE == '\r')) || (cc__0VRE == '\0')) || (cc__0VRE == '\f')) || (cc__0VRE == '\v'))) {
+                __tmp__IXRE=TRUE__;
               } else {
-                result__BZPG=(cc__YTRE == '+');
-                if (result__BZPG) {
-                  state__XTRE= 1;
+                result__M3PG=(cc__0VRE == '+');
+                if (result__M3PG) {
+                  state__ZVRE= 1;
                 };
-                __tmp__GVRE=result__BZPG;
+                __tmp__IXRE=result__M3PG;
               };
-              if ((! __tmp__GVRE)) {
-                if ((cc__YTRE == '-')) {
-                  negative__ZTRE=TRUE__;
-                  state__XTRE= 1;
+              if ((! __tmp__IXRE)) {
+                if ((cc__0VRE == '-')) {
+                  negative__1VRE=TRUE__;
+                  state__ZVRE= 1;
                 } else {
-                  result__0TRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48);
-                  state__XTRE= 2;
+                  result__2VRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48);
+                  state__ZVRE= 2;
                 };
               };
-              __tmp__ZVRE=TRUE__;
+              __tmp__1XRE=TRUE__;
             } else {
-              __tmp__ZVRE=FALSE__;
+              __tmp__1XRE=FALSE__;
             };
-            if (__tmp__ZVRE) {
-              __tmp__OWRE=TRUE__;
+            if (__tmp__1XRE) {
+              __tmp__QYRE=TRUE__;
             } else {
-              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);
+              result__G5FF=(state__ZVRE ==  1);
+              if (result__G5FF) {
+                result__2VRE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48);
+                if (negative__1VRE) {
+                  result__2VRE=(__INTEGER)(- result__2VRE);
                 };
-                state__XTRE= 2;
+                state__ZVRE= 2;
               };
-              __tmp__OWRE=result__P2FF;
+              __tmp__QYRE=result__G5FF;
             };
-            if (__tmp__OWRE) {
-              __tmp__VXRE=TRUE__;
+            if (__tmp__QYRE) {
+              __tmp__XZRE=TRUE__;
             } else {
-              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'));
+              result__Y5FF=(state__ZVRE ==  2);
+              if (result__Y5FF) {
+                result__SNEH=FALSE__;
+                if ((((__INTEGER_8 )cc__0VRE) >= ((__INTEGER_8 )'0'))) {
+                  result__SNEH=(((__INTEGER_8 )cc__0VRE) <= ((__INTEGER_8 )'9'));
                 };
-                if (result__JJEH) {
-                  if (negative__ZTRE) {
-                    result__0TRE=(__INTEGER)((__INTEGER)( 10 * result__0TRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48));
+                if (result__SNEH) {
+                  if (negative__1VRE) {
+                    result__2VRE=(__INTEGER)((__INTEGER)( 10 * result__2VRE) - (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48));
                   } else {
-                    result__0TRE=(__INTEGER)((__INTEGER)( 10 * result__0TRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__YTRE)) -  48));
+                    result__2VRE=(__INTEGER)((__INTEGER)( 10 * result__2VRE) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )cc__0VRE)) -  48));
                   };
                 } else {
-                  state__XTRE= 3;
+                  state__ZVRE= 3;
                 };
               };
-              __tmp__VXRE=result__B3FF;
+              __tmp__XZRE=result__Y5FF;
             };
-            if ((! __tmp__VXRE)) {
-              if ((state__XTRE ==  3)) {
-                i__WTRE=Self__UTRE->count__EGC;
+            if ((! __tmp__XZRE)) {
+              if ((state__ZVRE ==  3)) {
+                i__YVRE=Self__WVRE->count__EGC;
               };
             };
-            i__WTRE=(__INTEGER)(i__WTRE +  1);
+            i__YVRE=(__INTEGER)(i__YVRE +  1);
           };
-          last_integer__UNO=((__INTEGER_64 )result__0TRE);
+          last_integer__3OO=((__INTEGER_64 )result__2VRE);
         };
       };
     };
   };
-  if (result__4XP) {
-    short__token__to__YBD((&__string_121),pos_old__5XP,position__CCC);
+  if (result__HZP) {
+    short__token__to__YBD((&__string_121),pos_old__IZP,position__CCC);
   };
-  return(result__4XP);
+  return(result__HZP);
 }
 
-static void* readlip_expr__PQPB()
+static void* readlip_expr__ZRPB()
 // () With resultRecursive, No inlinable.
 {
-  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)) {
+  void *result__2RPB,*val__3RPB,*result__RMYC,*val__ZMYC;
+  void *nam__4RPB;
+  __POSITION pos__M2YG,p__YL3B,pos__U2YG,pos__W2YG,pos__Y2YG,pos__02YG;
+  __POSITION pos__22YG,pos__42YG,p__HNID,p__XVHE,pos__M3YG;
+  __LIP_AFFECT *result__VW4B,*Self__UHHC;
+  __POINTER ptr__WW4B,ptr_table__SXJH,next__RXJH,result__TXJH;
+  __POINTER ptr_table__XXJH,next__WXJH,result__YXJH,ptr__ESKD;
+  __POINTER ptr_table__RYJH,next__QYJH,result__SYJH,ptr_table__WYJH;
+  __POINTER next__VYJH,result__XYJH,ptr__XBNE,ptr_table__1YJH;
+  __POINTER next__0YJH,result__2YJH,ptr_table__AZJH,next__5YJH;
+  __POINTER result__BZJH;
+  __INTEGER typ_id__1W4B,typ_id__JSKD,typ_id__2BNE;
+  __UINTEGER_32 sz__YW4B,a__FOGH,new_size__GOGH,t__KOGH,a__JOGH;
+  __UINTEGER_32 new_size__0XJH,lab_type__ZXJH,sz__GSKD,a__NOGH;
+  __UINTEGER_32 new_size__OOGH,t__SOGH,a__ROGH,new_size__ZYJH;
+  __UINTEGER_32 lab_type__YYJH,sz__ZBNE,a__VOGH,new_size__WOGH,t__0OGH;
+  __UINTEGER_32 a__ZOGH,new_size__DZJH,lab_type__CZJH;
+  __LIP_IF *result__DSKD,*Self__0QTD;
+  __LIP_PRINT *result__WBNE,*Self__BOWE;
+  __BOOLEAN result__1XJH,__tmp__STPB,result__4XJH,result__BYJH;
+  __BOOLEAN result__EYJH,result__HYJH,result__KYJH,result__NYJH;
+  __BOOLEAN __tmp__LQYC;
+  __CHARACTER result__2XJH,result__5XJH,result__CYJH,result__FYJH;
+  __CHARACTER result__IYJH,result__LYJH,result__OYJH;
+  void *the__XMYC,*els__YMYC,*result__TCIH,*result__NLID;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__UCIH,*Self__VCIH,*Self__BH5D;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__XH5D;
+  result__2RPB=NULL;
+  val__3RPB=NULL;
+  nam__4RPB=NULL;
+  old_position__QPI=position__CCC;
+  old_pos_cur__SPI=pos_cur__FCC;
+  old_pos_line__UPI=pos_line__GCC;
+  old_pos_col__WPI=pos_col__HCC;
+  old_short_derive__YPI=short_derive__PCC;
+  if (read_identifier__E4K()) {
+    nam__4RPB=last_string__V0C;
+    if (read_symbol__GVJ((&__string_12))) {
+      val__3RPB=readlip_expr_operator__NMZB(PARSER__);
+      if (((void *)val__3RPB == (void *)NULL)) {
+        pos__M2YG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_240));
+        put_position__LNG(pos__M2YG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      p__YL3B=current_position__AWF();
+      result__VW4B=NULL;
+      ptr__WW4B=((__POINTER )(NULL));
+      typ_id__1W4B= 0;
+      sz__YW4B=((__UINTEGER_32 )sizeof(__LIP_AFFECT));
+      if ((sz__YW4B ==  0)) {
+        result__VW4B=LIP_AFFECT__;
+      } else {
+        typ_id__1W4B=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YW4B);
+        if ((typ_id__1W4B == (__INTEGER)(-  1))) {
+          a__FOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__GOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YW4B + a__FOGH) & (__UINTEGER_32)(~ a__FOGH));
+          ptr_table__SXJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__GOGH / ((__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__ZPJ(new_size__GOGH);
+            next__RXJH=(void *)((unsigned long)result__TXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOGH)));
+            ((__POINTER *)next__RXJH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
+          } else {
+            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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GOGH <<  1)) <=  4096)) {
+                next__RXJH=(void *)((unsigned long)result__TXJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GOGH)));
               } else {
-                next__ITJH=new_lab__QOJ(new_size__3JGH);
+                next__RXJH=new_lab__ZPJ(new_size__GOGH);
               };
-              ((__POINTER *)next__ITJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__JTJH)[ 0]=next__ITJH;
+              ((__POINTER *)next__RXJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__TXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__TXJH=next__RXJH;
+            };
+          };
+          ptr__WW4B=result__TXJH;
+        } else {
+          t__KOGH=((__UINTEGER_32 )typ_id__1W4B);
+          a__JOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0XJH=(__UINTEGER_32)((__UINTEGER_32)(sz__YW4B + a__JOGH) & (__UINTEGER_32)(~ a__JOGH));
+          ptr_table__XXJH=((__POINTER )(&(table_type[(t__KOGH)])));
+          lab_type__ZXJH=(__UINTEGER_32)(t__KOGH |  1);
+          next__WXJH=((__POINTER )(NULL));
+          result__YXJH=((__POINTER *)ptr_table__XXJH)[ 0];
+          if ((result__YXJH == (void *)NULL)) {
+            result__YXJH=new_lab__ZPJ(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__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__GUH)))) &  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__NTJH=new_lab__QOJ(lab_type__QTJH);
+                next__WXJH=new_lab__ZPJ(lab_type__ZXJH);
               };
-              ((__POINTER *)next__NTJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__OTJH)[ 0]=next__NTJH;
+              ((__POINTER *)next__WXJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XXJH)[ 0]=next__WXJH;
             } else {
-              ((__POINTER *)result__PTJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NTJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__PTJH=next__NTJH;
+              ((__POINTER *)result__YXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__YXJH=next__WXJH;
             };
           };
-          ptr__KV4B=result__PTJH;
+          ptr__WW4B=result__YXJH;
         };
-        result__JV4B=((__LIP_AFFECT *)ptr__KV4B);
-        *(result__JV4B) = *(LIP_AFFECT__);
+        result__VW4B=((__LIP_AFFECT *)ptr__WW4B);
+        *(result__VW4B) = *(LIP_AFFECT__);
       };
-      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;
+      Self__UHHC=((__LIP_AFFECT *)result__VW4B);
+      Self__UHHC->parent_lip_code__ZSPB.parent_itm_object__WBE.position__0BJ=p__YL3B;
+      Self__UHHC->name__BGFC=nam__4RPB;
+      Self__UHHC->value__TGFC=val__3RPB;
+      result__2RPB=result__VW4B;
     } else {
-      restore_context__DAL();
+      restore_context__MBL();
     };
   };
-  if (((void *)result__SQPB == (void *)NULL)) {
-    result__SQPB=readlip_expr_operator__BLZB(PARSER__);
-    if (((void *)result__SQPB != (void *)NULL)) {
-      result__STJH=FALSE__;
+  if (((void *)result__2RPB == (void *)NULL)) {
+    result__2RPB=readlip_expr_operator__NMZB(PARSER__);
+    if (((void *)result__2RPB != (void *)NULL)) {
+      result__1XJH=FALSE__;
       if ((! read_space__KSD())) {
-        result__STJH=FALSE__;
+        result__1XJH=FALSE__;
       } else {
-        result__TTJH='\0';
+        result__2XJH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__TTJH=((__CHARACTER )(( 0)));
+          result__2XJH=((__CHARACTER )(( 0)));
         } else {
-          result__TTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__2XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__TTJH == '.')) {
+        if ((result__2XJH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__STJH=TRUE__;
+          result__1XJH=TRUE__;
         };
       };
-      __tmp__ISPB=result__STJH;
+      __tmp__STPB=result__1XJH;
     } else {
-      __tmp__ISPB=FALSE__;
+      __tmp__STPB=FALSE__;
     };
-    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);
+    if (__tmp__STPB) {
+      result__RMYC=NULL;
+      the__XMYC=NULL;
+      els__YMYC=NULL;
+      val__ZMYC=NULL;
+      if (read_word__HOF((&__string_89))) {
+        result__TCIH=NULL;
+        if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID)->parent_arrayed_collection__SLID.upper__0OTD <  0)) {
+          result__TCIH=create_with_capacity__QRKD( 16);
         } else {
-          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);
+          Self__UCIH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID);
+          result__TCIH=((void **)Self__UCIH->parent_arrayed_collection__SLID.storage__XBUD)[Self__UCIH->parent_arrayed_collection__SLID.upper__0OTD];
+          Self__VCIH=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID);
+          Self__VCIH->parent_arrayed_collection__SLID.upper__0OTD=(__INTEGER)(Self__VCIH->parent_arrayed_collection__SLID.upper__0OTD -  1);
         };
-        the__ALYC=result__K4HH;
-        result__VTJH=FALSE__;
+        the__XMYC=result__TCIH;
+        result__4XJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__VTJH=FALSE__;
+          result__4XJH=FALSE__;
         } else {
-          result__WTJH='\0';
+          result__5XJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WTJH=((__CHARACTER )(( 0)));
+            result__5XJH=((__CHARACTER )(( 0)));
           } else {
-            result__WTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__5XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__WTJH == '{')) {
+          if ((result__5XJH == '{')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__VTJH=TRUE__;
+            result__4XJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__4XJH)) {
+          pos__U2YG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_273));
+          put_position__LNG(pos__U2YG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        while_do__HLID:
+        while_do__IMID:
         {
-          val__CLYC=readlip_expr__PQPB();
-          if (((void *)val__CLYC != (void *)NULL)) {
-            add_last__CKUD(the__ALYC,val__CLYC);
-            result__YTJH=FALSE__;
+          val__ZMYC=readlip_expr__ZRPB();
+          if (((void *)val__ZMYC != (void *)NULL)) {
+            add_last__UJUD(the__XMYC,val__ZMYC);
+            result__BYJH=FALSE__;
             if ((! read_space__KSD())) {
-              result__YTJH=FALSE__;
+              result__BYJH=FALSE__;
             } else {
-              result__ZTJH='\0';
+              result__CYJH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__ZTJH=((__CHARACTER )(( 0)));
+                result__CYJH=((__CHARACTER )(( 0)));
               } else {
-                result__ZTJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__CYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__ZTJH == ';')) {
+              if ((result__CYJH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__YTJH=TRUE__;
+                result__BYJH=TRUE__;
               };
             };
-            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)) {
+            if ((! result__BYJH)) {
+              pos__W2YG=current_position__AWF();
+              put_error__text__BMG( 2,(&__string_167));
+              put_position__LNG(pos__W2YG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
-            goto while_do__HLID;
+            goto while_do__IMID;
           };
         };
-        result__1TJH=FALSE__;
+        result__EYJH=FALSE__;
         if ((! read_space__KSD())) {
-          result__1TJH=FALSE__;
+          result__EYJH=FALSE__;
         } else {
-          result__2TJH='\0';
+          result__FYJH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2TJH=((__CHARACTER )(( 0)));
+            result__FYJH=((__CHARACTER )(( 0)));
           } else {
-            result__2TJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__FYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__2TJH == '}')) {
+          if ((result__FYJH == '}')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__1TJH=TRUE__;
+            result__EYJH=TRUE__;
           };
         };
-        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)) {
+        if ((! result__EYJH)) {
+          pos__Y2YG=current_position__AWF();
+          put_error__text__BMG( 2,(&__string_273));
+          put_position__LNG(pos__Y2YG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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);
+        the__XMYC=copy__VMID(result__TCIH);
+        if (read_word__HOF((&__string_90))) {
+          result__NLID=NULL;
+          if ((((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID)->parent_arrayed_collection__SLID.upper__0OTD <  0)) {
+            result__NLID=create_with_capacity__QRKD( 16);
           } else {
-            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);
+            Self__BH5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID);
+            result__NLID=((void **)Self__BH5D->parent_arrayed_collection__SLID.storage__XBUD)[Self__BH5D->parent_arrayed_collection__SLID.upper__0OTD];
+            Self__XH5D=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID);
+            Self__XH5D->parent_arrayed_collection__SLID.upper__0OTD=(__INTEGER)(Self__XH5D->parent_arrayed_collection__SLID.upper__0OTD -  1);
           };
-          els__BLYC=result__MKID;
-          result__4TJH=FALSE__;
+          els__YMYC=result__NLID;
+          result__HYJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__4TJH=FALSE__;
+            result__HYJH=FALSE__;
           } else {
-            result__5TJH='\0';
+            result__IYJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__5TJH=((__CHARACTER )(( 0)));
+              result__IYJH=((__CHARACTER )(( 0)));
             } else {
-              result__5TJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__IYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__5TJH == '{')) {
+            if ((result__IYJH == '{')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__4TJH=TRUE__;
+              result__HYJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__HYJH)) {
+            pos__02YG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_273));
+            put_position__LNG(pos__02YG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          while_do__Z3LD:
+          while_do__R3LD:
           {
-            val__CLYC=readlip_expr__PQPB();
-            if (((void *)val__CLYC != (void *)NULL)) {
-              add_last__CKUD(els__BLYC,val__CLYC);
-              result__BUJH=FALSE__;
+            val__ZMYC=readlip_expr__ZRPB();
+            if (((void *)val__ZMYC != (void *)NULL)) {
+              add_last__UJUD(els__YMYC,val__ZMYC);
+              result__KYJH=FALSE__;
               if ((! read_space__KSD())) {
-                result__BUJH=FALSE__;
+                result__KYJH=FALSE__;
               } else {
-                result__CUJH='\0';
+                result__LYJH='\0';
                 if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                  result__CUJH=((__CHARACTER )(( 0)));
+                  result__LYJH=((__CHARACTER )(( 0)));
                 } else {
-                  result__CUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                  result__LYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
                 };
-                if ((result__CUJH == ';')) {
+                if ((result__LYJH == ';')) {
                   position__CCC=(__INTEGER)(position__CCC +  1);
-                  result__BUJH=TRUE__;
+                  result__KYJH=TRUE__;
                 };
               };
-              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)) {
+              if ((! result__KYJH)) {
+                pos__22YG=current_position__AWF();
+                put_error__text__BMG( 2,(&__string_167));
+                put_position__LNG(pos__22YG);
+                put_string__L0F(msg_err__GMG);
+                if ((type_error__FMG !=  2)) {
                   exit(( 1));
                 };
               };
-              goto while_do__Z3LD;
+              goto while_do__R3LD;
             };
           };
-          result__EUJH=FALSE__;
+          result__NYJH=FALSE__;
           if ((! read_space__KSD())) {
-            result__EUJH=FALSE__;
+            result__NYJH=FALSE__;
           } else {
-            result__FUJH='\0';
+            result__OYJH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__FUJH=((__CHARACTER )(( 0)));
+              result__OYJH=((__CHARACTER )(( 0)));
             } else {
-              result__FUJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__OYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            if ((result__FUJH == '}')) {
+            if ((result__OYJH == '}')) {
               position__CCC=(__INTEGER)(position__CCC +  1);
-              result__EUJH=TRUE__;
+              result__NYJH=TRUE__;
             };
           };
-          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)) {
+          if ((! result__NYJH)) {
+            pos__42YG=current_position__AWF();
+            put_error__text__BMG( 2,(&__string_273));
+            put_position__LNG(pos__42YG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
-          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;
+          els__YMYC=copy__VMID(result__NLID);
+        };
+        p__HNID=current_position__AWF();
+        result__DSKD=NULL;
+        ptr__ESKD=((__POINTER )(NULL));
+        typ_id__JSKD= 0;
+        sz__GSKD=((__UINTEGER_32 )sizeof(__LIP_IF));
+        if ((sz__GSKD ==  0)) {
+          result__DSKD=LIP_IF__;
+        } else {
+          typ_id__JSKD=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__GSKD);
+          if ((typ_id__JSKD == (__INTEGER)(-  1))) {
+            a__NOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__OOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__GSKD + a__NOGH) & (__UINTEGER_32)(~ a__NOGH));
+            ptr_table__RYJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__OOGH / ((__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__ZPJ(new_size__OOGH);
+              next__QYJH=(void *)((unsigned long)result__SYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOGH)));
+              ((__POINTER *)next__QYJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RYJH)[ 0]=next__QYJH;
             } else {
-              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)));
+              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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__OOGH <<  1)) <=  4096)) {
+                  next__QYJH=(void *)((unsigned long)result__SYJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__OOGH)));
                 } else {
-                  next__HUJH=new_lab__QOJ(new_size__FKGH);
+                  next__QYJH=new_lab__ZPJ(new_size__OOGH);
                 };
-                ((__POINTER *)next__HUJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__IUJH)[ 0]=next__HUJH;
+                ((__POINTER *)next__QYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RYJH)[ 0]=next__QYJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__SYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__SYJH=next__QYJH;
+              };
+            };
+            ptr__ESKD=result__SYJH;
+          } else {
+            t__SOGH=((__UINTEGER_32 )typ_id__JSKD);
+            a__ROGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__ZYJH=(__UINTEGER_32)((__UINTEGER_32)(sz__GSKD + a__ROGH) & (__UINTEGER_32)(~ a__ROGH));
+            ptr_table__WYJH=((__POINTER )(&(table_type[(t__SOGH)])));
+            lab_type__YYJH=(__UINTEGER_32)(t__SOGH |  1);
+            next__VYJH=((__POINTER )(NULL));
+            result__XYJH=((__POINTER *)ptr_table__WYJH)[ 0];
+            if ((result__XYJH == (void *)NULL)) {
+              result__XYJH=new_lab__ZPJ(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__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)));
+              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__GUH)))) &  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__MUJH=new_lab__QOJ(lab_type__PUJH);
+                  next__VYJH=new_lab__ZPJ(lab_type__YYJH);
                 };
-                ((__POINTER *)next__MUJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__NUJH)[ 0]=next__MUJH;
+                ((__POINTER *)next__VYJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__WYJH)[ 0]=next__VYJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__XYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__XYJH=next__VYJH;
+              };
+            };
+            ptr__ESKD=result__XYJH;
+          };
+          result__DSKD=((__LIP_IF *)ptr__ESKD);
+          *(result__DSKD) = *(LIP_IF__);
+        };
+        Self__0QTD=((__LIP_IF *)result__DSKD);
+        Self__0QTD->parent_lip_code__HQYC.parent_itm_object__WBE.position__0BJ=p__HNID;
+        Self__0QTD->condition__MBQD=result__2RPB;
+        Self__0QTD->then__CCQD=the__XMYC;
+        Self__0QTD->else__ZCQD=els__YMYC;
+        result__RMYC=result__DSKD;
+        __tmp__LQYC=TRUE__;
+      } else {
+        __tmp__LQYC=FALSE__;
+      };
+      if ((! __tmp__LQYC)) {
+        if (read_word__HOF((&__string_91))) {
+          p__XVHE=current_position__AWF();
+          result__WBNE=NULL;
+          ptr__XBNE=((__POINTER )(NULL));
+          typ_id__2BNE= 0;
+          sz__ZBNE=((__UINTEGER_32 )sizeof(__LIP_PRINT));
+          if ((sz__ZBNE ==  0)) {
+            result__WBNE=LIP_PRINT__;
+          } else {
+            typ_id__2BNE=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZBNE);
+            if ((typ_id__2BNE == (__INTEGER)(-  1))) {
+              a__VOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__WOGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBNE + a__VOGH) & (__UINTEGER_32)(~ a__VOGH));
+              ptr_table__1YJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WOGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__0YJH=((__POINTER )(NULL));
+              result__2YJH=((__POINTER *)ptr_table__1YJH)[ 0];
+              if ((result__2YJH == (void *)NULL)) {
+                result__2YJH=new_lab__ZPJ(new_size__WOGH);
+                next__0YJH=(void *)((unsigned long)result__2YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WOGH)));
+                ((__POINTER *)next__0YJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__1YJH)[ 0]=next__0YJH;
               } else {
-                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)));
+                next__0YJH=((__POINTER *)result__2YJH)[ 0];
+                if ((next__0YJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__2YJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WOGH <<  1)) <=  4096)) {
+                    next__0YJH=(void *)((unsigned long)result__2YJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WOGH)));
                   } else {
-                    next__RUJH=new_lab__QOJ(new_size__NKGH);
+                    next__0YJH=new_lab__ZPJ(new_size__WOGH);
                   };
-                  ((__POINTER *)next__RUJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__SUJH)[ 0]=next__RUJH;
+                  ((__POINTER *)next__0YJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__1YJH)[ 0]=next__0YJH;
                 } else {
-                  ((__POINTER *)result__TUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__TUJH=next__RUJH;
+                  ((__POINTER *)result__2YJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__0YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__2YJH=next__0YJH;
                 };
               };
-              ptr__T5ME=result__TUJH;
+              ptr__XBNE=result__2YJH;
             } else {
-              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;
+              t__0OGH=((__UINTEGER_32 )typ_id__2BNE);
+              a__ZOGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__DZJH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZBNE + a__ZOGH) & (__UINTEGER_32)(~ a__ZOGH));
+              ptr_table__AZJH=((__POINTER )(&(table_type[(t__0OGH)])));
+              lab_type__CZJH=(__UINTEGER_32)(t__0OGH |  1);
+              next__5YJH=((__POINTER )(NULL));
+              result__BZJH=((__POINTER *)ptr_table__AZJH)[ 0];
+              if ((result__BZJH == (void *)NULL)) {
+                result__BZJH=new_lab__ZPJ(lab_type__CZJH);
+                next__5YJH=(void *)((unsigned long)result__BZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZJH)));
+                ((__POINTER *)next__5YJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__AZJH)[ 0]=next__5YJH;
               } else {
-                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)));
+                next__5YJH=((__POINTER *)result__BZJH)[ 0];
+                if ((next__5YJH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__BZJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__DZJH <<  1)) <=  4096)) {
+                    next__5YJH=(void *)((unsigned long)result__BZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZJH)));
                   } else {
-                    next__WUJH=new_lab__QOJ(lab_type__ZUJH);
+                    next__5YJH=new_lab__ZPJ(lab_type__CZJH);
                   };
-                  ((__POINTER *)next__WUJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__XUJH)[ 0]=next__WUJH;
+                  ((__POINTER *)next__5YJH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__AZJH)[ 0]=next__5YJH;
                 } else {
-                  ((__POINTER *)result__YUJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WUJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__YUJH=next__WUJH;
+                  ((__POINTER *)result__BZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__5YJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__BZJH=next__5YJH;
                 };
               };
-              ptr__T5ME=result__YUJH;
+              ptr__XBNE=result__BZJH;
             };
-            result__S5ME=((__LIP_PRINT *)ptr__T5ME);
-            *(result__S5ME) = *(LIP_PRINT__);
+            result__WBNE=((__LIP_PRINT *)ptr__XBNE);
+            *(result__WBNE) = *(LIP_PRINT__);
           };
-          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;
+          Self__BOWE=((__LIP_PRINT *)result__WBNE);
+          Self__BOWE->parent_lip_code__ZQYC.parent_itm_object__WBE.position__0BJ=p__XVHE;
+          Self__BOWE->message__IQUE=result__2RPB;
+          result__RMYC=result__WBNE;
         };
       };
-      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)) {
+      result__2RPB=result__RMYC;
+      if (((void *)result__RMYC == (void *)NULL)) {
+        pos__M3YG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_276));
+        put_position__LNG(pos__M3YG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
   };
-  return(result__SQPB);
+  return(result__2RPB);
 }
 
-static void run__HEFC(__LIP_AFFECT *Self__IEFC)
+static void run__1FFC(__LIP_AFFECT *Self__2FFC)
 // ({LIP_AFFECT}) VoidNo recursive, No inlinable.
 {
-  __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)) {
+  __POSITION pos__B51G,pos__GK5C;
+  void *__tmp__UGFC;
+  void *__tmp__VGFC,*__tmp__FZJH,*__tmp__GZJH;
+  __LIP_INTEGER *Self__HZJH;
+  __LIP_STRING *Self__IZJH;
+  if (((void *)fast_reference_at__4SRD(list_data__IONC,Self__2FFC->name__BGFC) == (void *)NULL)) {
+    copy__35R(string_tmp__VH,(&__string_309));
+    append__FLS(string_tmp__VH,Self__2FFC->name__BGFC);
+    append__FLS(string_tmp__VH,(&__string_310));
+    pos__B51G=Self__2FFC->parent_lip_code__ZSPB.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,string_tmp__VH);
+    put_position__LNG(pos__B51G);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  __tmp__AFFC=Self__IEFC->value__5EFC;
-  switch (((struct ___OBJ *)__tmp__AFFC)->__id) {
+  __tmp__UGFC=Self__2FFC->value__TGFC;
+  switch (((struct ___OBJ *)__tmp__UGFC)->__id) {
   case __LIP_BINARY__: {
-    __tmp__BFFC=run_expr__2XQD(__tmp__AFFC);
+    __tmp__VGFC=run_expr__SXQD(__tmp__UGFC);
   } break;
   case __LIP_UNARY__: {
-    __tmp__BFFC=run_expr__10QD(__tmp__AFFC);
+    __tmp__VGFC=run_expr__R0QD(__tmp__UGFC);
   } break;
   case __LIP_CALL__: {
-    __tmp__BFFC=run_expr__DQUE(__tmp__AFFC);
+    __tmp__VGFC=run_expr__DSUE(__tmp__UGFC);
   } break;
   case __LIP_VALUE__: {
-    __tmp__2UJH=((__LIP_VALUE *)__tmp__AFFC)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__2UJH)->__id) {
+    __tmp__FZJH=((__LIP_VALUE *)__tmp__UGFC)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__FZJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__3UJH=((__LIP_BOOLEAN *)__tmp__2UJH);
+      __tmp__GZJH=((__LIP_BOOLEAN *)__tmp__FZJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__4UJH=((__LIP_INTEGER *)__tmp__2UJH);
-      __tmp__3UJH=get__LRSE(Self__4UJH,Self__4UJH->value__ZD4F);
+      Self__HZJH=((__LIP_INTEGER *)__tmp__FZJH);
+      __tmp__GZJH=get__LTSE(Self__HZJH,Self__HZJH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__5UJH=((__LIP_STRING *)__tmp__2UJH);
-      __tmp__3UJH=get__PVFF(Self__5UJH,Self__5UJH->value__RLUE);
+      Self__IZJH=((__LIP_STRING *)__tmp__FZJH);
+      __tmp__GZJH=get__GYFF(Self__IZJH,Self__IZJH->value__RNUE);
     } break;
     };
-    __tmp__BFFC=__tmp__3UJH;
+    __tmp__VGFC=__tmp__GZJH;
   } break;
   };
   print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-  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)) {
+  pos__GK5C=Self__2FFC->parent_lip_code__ZSPB.parent_itm_object__WBE.position__0BJ;
+  put_error__text__BMG( 1,(&__string_279));
+  put_position__LNG(pos__GK5C);
+  put_string__L0F(msg_err__GMG);
+  if ((type_error__FMG !=  2)) {
     exit(( 1));
   };
-  switch (((struct ___OBJ *)__tmp__BFFC)->__id) {
+  switch (((struct ___OBJ *)__tmp__VGFC)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__RY3F(__tmp__BFFC);
+    free__223F(__tmp__VGFC);
   } break;
   case __LIP_STRING__: {
-    free__52HG(__tmp__BFFC);
+    free__KBIG(__tmp__VGFC);
   } break;
   };
 }
 
-static void run__RJUE(__LIP_CALL *Self__SJUE)
+static void run__RLUE(__LIP_CALL *Self__SLUE)
 // ({LIP_CALL}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *val__VLUE,*__tmp__BMUE,*__tmp__KZJH,*__tmp__LZJH;
+  void *str__WLUE,*__tmp__GNUE,*__tmp__OOUE;
+  void *path__XLUE,*n__0UKF;
+  void *__tmp__AMUE;
+  __LIP_INTEGER *Self__MZJH;
+  __LIP_STRING *Self__NZJH;
+  __POSITION pos__BUKF,pos__E51G,pos__H51G,pos__K51G,pos__N51G;
+  __STRING_CONSTANT *Self__1OGH;
+  __STRING *Self__2OGH,*Self__4OGH;
+  void *result__3UKF;
+  __INTEGER j__2UKF;
+  __BOOLEAN is_rec__YLUE,__tmp__YMUE,__tmp__AOUE,result__TPXE;
+  __BOOLEAN __tmp__0VKF;
+  val__VLUE=NULL;
+  str__WLUE=NULL;
+  path__XLUE=NULL;
+  is_rec__YLUE=FALSE__;
+  if (((void *)Self__SLUE->argument__ZLUE != (void *)NULL)) {
+    __tmp__AMUE=Self__SLUE->argument__ZLUE;
+    switch (((struct ___OBJ *)__tmp__AMUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__BKUE=run_expr__2XQD(__tmp__AKUE);
+      __tmp__BMUE=run_expr__SXQD(__tmp__AMUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__BKUE=run_expr__10QD(__tmp__AKUE);
+      __tmp__BMUE=run_expr__R0QD(__tmp__AMUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__BKUE=run_expr__DQUE(__tmp__AKUE);
+      __tmp__BMUE=run_expr__DSUE(__tmp__AMUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__BVJH=((__LIP_VALUE *)__tmp__AKUE)->value__DUUE;
-      switch (((struct ___OBJ *)__tmp__BVJH)->__id) {
+      __tmp__KZJH=((__LIP_VALUE *)__tmp__AMUE)->value__DWUE;
+      switch (((struct ___OBJ *)__tmp__KZJH)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__CVJH=((__LIP_BOOLEAN *)__tmp__BVJH);
+        __tmp__LZJH=((__LIP_BOOLEAN *)__tmp__KZJH);
       } break;
       case __LIP_INTEGER__: {
-        Self__DVJH=((__LIP_INTEGER *)__tmp__BVJH);
-        __tmp__CVJH=get__LRSE(Self__DVJH,Self__DVJH->value__ZD4F);
+        Self__MZJH=((__LIP_INTEGER *)__tmp__KZJH);
+        __tmp__LZJH=get__LTSE(Self__MZJH,Self__MZJH->value__EI4F);
       } break;
       case __LIP_STRING__: {
-        Self__EVJH=((__LIP_STRING *)__tmp__BVJH);
-        __tmp__CVJH=get__PVFF(Self__EVJH,Self__EVJH->value__RLUE);
+        Self__NZJH=((__LIP_STRING *)__tmp__KZJH);
+        __tmp__LZJH=get__GYFF(Self__NZJH,Self__NZJH->value__RNUE);
       } break;
       };
-      __tmp__BKUE=__tmp__CVJH;
+      __tmp__BMUE=__tmp__LZJH;
     } break;
     };
-    val__VJUE=__tmp__BKUE;
+    val__VLUE=__tmp__BMUE;
   };
-  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)) {
+  if (((void *)Self__SLUE->name__EMUE == (void *)(&__string_92))) {
+    if (((void *)val__VLUE != (void *)NULL)) {
+      pos__BUKF=Self__SLUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+      put_error__text__BMG( 2,(&__string_311));
+      put_position__LNG(pos__BUKF);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
     exit(( 1));
-    __tmp__YKUE=TRUE__;
+    __tmp__YMUE=TRUE__;
   } else {
-    __tmp__YKUE=FALSE__;
+    __tmp__YMUE=FALSE__;
   };
-  if (__tmp__YKUE) {
-    __tmp__AMUE=TRUE__;
+  if (__tmp__YMUE) {
+    __tmp__AOUE=TRUE__;
   } else {
-    result__HNXE=((void *)Self__SJUE->name__EKUE == (void *)(&__string_94));
-    if (result__HNXE) {
-      if (val__VJUE==NULL) {
-        __tmp__GLUE=NULL;
+    result__TPXE=((void *)Self__SLUE->name__EMUE == (void *)(&__string_94));
+    if (result__TPXE) {
+      if (val__VLUE==NULL) {
+        __tmp__GNUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__VJUE)->__id) {
+        switch (((struct ___OBJ *)val__VLUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__GLUE=NULL;
+          __tmp__GNUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__GLUE=NULL;
+          __tmp__GNUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__GLUE=((void *)val__VJUE);
+          __tmp__GNUE=((void *)val__VLUE);
         } break;
         }
       };
-      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)) {
+      str__WLUE=__tmp__GNUE;
+      if (((void *)__tmp__GNUE == (void *)NULL)) {
+        pos__E51G=Self__SLUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 1,(&__string_312));
+        put_position__LNG(pos__E51G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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;
+      path__XLUE=((__LIP_STRING *)__tmp__GNUE)->value__RNUE;
+      Self__1OGH=((__STRING_CONSTANT *)path__XLUE);
+      if ((((__CHARACTER *)Self__1OGH->storage__ZNO)[(__INTEGER)(Self__1OGH->count__DD -  1)] == '*')) {
+        copy__35R(string_tmp__VH,path__XLUE);
+        Self__2OGH=((__STRING *)string_tmp__VH);
+        if (( 1 > Self__2OGH->count__EGC)) {
+          Self__2OGH->count__EGC= 0;
         } else {
-          Self__TKGH->count__EGC=(__INTEGER)(Self__TKGH->count__EGC -  1);
+          Self__2OGH->count__EGC=(__INTEGER)(Self__2OGH->count__EGC -  1);
         };
-        path__XJUE=get__YWB(string_tmp__VH);
-        is_rec__YJUE=TRUE__;
+        path__XLUE=get__YWB(string_tmp__VH);
+        is_rec__YLUE=TRUE__;
       };
-      load_directory__is_recursive__5YWF(Self__SJUE,path__XJUE,is_rec__YJUE);
+      load_directory__is_recursive__K3WF(Self__SLUE,path__XLUE,is_rec__YLUE);
     };
-    __tmp__AMUE=result__HNXE;
+    __tmp__AOUE=result__TPXE;
   };
-  if ((! __tmp__AMUE)) {
-    if (((void *)Self__SJUE->name__EKUE == (void *)(&__string_93))) {
-      if (val__VJUE==NULL) {
-        __tmp__OMUE=NULL;
+  if ((! __tmp__AOUE)) {
+    if (((void *)Self__SLUE->name__EMUE == (void *)(&__string_93))) {
+      if (val__VLUE==NULL) {
+        __tmp__OOUE=NULL;
       } else {
-        switch (((struct ___OBJ *)val__VJUE)->__id) {
+        switch (((struct ___OBJ *)val__VLUE)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__OMUE=NULL;
+          __tmp__OOUE=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__OMUE=NULL;
+          __tmp__OOUE=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__OMUE=((void *)val__VJUE);
+          __tmp__OOUE=((void *)val__VLUE);
         } break;
         }
       };
-      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)) {
+      str__WLUE=__tmp__OOUE;
+      if (((void *)__tmp__OOUE == (void *)NULL)) {
+        pos__H51G=Self__SLUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 1,(&__string_312));
+        put_position__LNG(pos__H51G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
       ((__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';
+      append_in__EIIG(__tmp__OOUE,string_tmp__VH);
+      Self__4OGH=((__STRING *)string_tmp__VH);
+      if ((Self__4OGH->capacity__24R > Self__4OGH->count__EGC)) {
+        ((__CHARACTER *)Self__4OGH->storage__F5R)[Self__4OGH->count__EGC]='\0';
       } else {
-        add_last__UHT(Self__VKGH,'\0');
-        Self__VKGH->count__EGC=(__INTEGER)(Self__VKGH->count__EGC -  1);
+        add_last__3IT(Self__4OGH,'\0');
+        Self__4OGH->count__EGC=(__INTEGER)(Self__4OGH->count__EGC -  1);
       };
-      system(((char*)((Self__VKGH->storage__23R))));
+      system(((char*)((Self__4OGH->storage__F5R))));
     } else {
-      n__DSKF=Self__SJUE->name__EKUE;
-      result__GSKF=NULL;
-      j__FSKF= 0;
-      while_do__4ZLF:
+      n__0UKF=Self__SLUE->name__EMUE;
+      result__3UKF=NULL;
+      j__2UKF= 0;
+      while_do__O3LF:
       {
-        if ((j__FSKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__MSKF)->parent_arrayed_collection__LSKF.upper__VSKF)) {
+        if ((j__2UKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__DVKF)->parent_arrayed_collection__CVKF.upper__MVKF)) {
           print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-          __tmp__DTKF=((void *)NULL != (void *)n__DSKF);
+          __tmp__0VKF=((void *)NULL != (void *)n__0UKF);
         } else {
-          __tmp__DTKF=FALSE__;
+          __tmp__0VKF=FALSE__;
         };
-        if (__tmp__DTKF) {
-          j__FSKF=(__INTEGER)(j__FSKF +  1);
-          goto while_do__4ZLF;
+        if (__tmp__0VKF) {
+          j__2UKF=(__INTEGER)(j__2UKF +  1);
+          goto while_do__O3LF;
         };
       };
-      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 ((j__2UKF <= ((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__DVKF)->parent_arrayed_collection__CVKF.upper__MVKF)) {
+        result__3UKF=((void **)((__FAST_ARRAYoLIP_SLOT_CODEo *)list_method__DVKF)->parent_arrayed_collection__CVKF.storage__S3PF)[j__2UKF];
       };
-      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)) {
+      if (((void *)result__3UKF == (void *)NULL)) {
+        copy__35R(string_tmp__VH,(&__string_309));
+        append__FLS(string_tmp__VH,Self__SLUE->name__EMUE);
+        append__FLS(string_tmp__VH,(&__string_310));
+        pos__K51G=Self__SLUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 1,string_tmp__VH);
+        put_position__LNG(pos__K51G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      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)) {
+      pos__N51G=Self__SLUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+      put_error__text__BMG( 1,(&__string_313));
+      put_position__LNG(pos__N51G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   };
-  if (((void *)val__VJUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__VJUE)->__id) {
+  if (((void *)val__VLUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__VLUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__RY3F(val__VJUE);
+      free__223F(val__VLUE);
     } break;
     case __LIP_STRING__: {
-      free__52HG(val__VJUE);
+      free__KBIG(val__VLUE);
     } break;
     };
   };
 }
 
-static void run__SBQD(__LIP_IF *Self__TBQD)
+static void run__IBQD(__LIP_IF *Self__JBQD)
 // ({LIP_IF}) VoidRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__NBQD,*__tmp__RCQD,*__tmp__NDQD;
+  __POSITION __tmp__GYAH,pos__R51G,pos__V51G,pos__Y51G,__tmp__Y3YG;
+  __POSITION __tmp__03YG,__tmp__151G,__tmp__B4YG,__tmp__D4YG;
+  __POSITION __tmp__YQUE;
+  void *__tmp__OBQD,*__tmp__PZJH,*__tmp__QZJH;
+  __LIP_INTEGER *Self__RZJH;
+  __LIP_STRING *Self__SZJH;
+  void *__tmp__QBQD,*val__LBQD;
+  __INTEGER __tmp__KCQD,Self__FXAG,__tmp__GDQD,Self__UEEF;
+  __BOOLEAN __tmp__UCQD;
+  __tmp__NBQD=Self__JBQD->condition__MBQD;
+  switch (((struct ___OBJ *)__tmp__NBQD)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__GYAH=((__LIP_AFFECT *)__tmp__NBQD)->parent_lip_code__ZSPB.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(__tmp__GYAH);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__YBQD=NULL;
+    __tmp__OBQD=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__YBQD=run_expr__2XQD(__tmp__XBQD);
+    __tmp__OBQD=run_expr__SXQD(__tmp__NBQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__YBQD=run_expr__10QD(__tmp__XBQD);
+    __tmp__OBQD=run_expr__R0QD(__tmp__NBQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__YBQD=run_expr__DQUE(__tmp__XBQD);
+    __tmp__OBQD=run_expr__DSUE(__tmp__NBQD);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__R51G=((__LIP_IF *)__tmp__NBQD)->parent_lip_code__HQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(pos__R51G);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__YBQD=NULL;
+    __tmp__OBQD=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__V51G=((__LIP_PRINT *)__tmp__NBQD)->parent_lip_code__ZQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(pos__V51G);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__YBQD=NULL;
+    __tmp__OBQD=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__GVJH=((__LIP_VALUE *)__tmp__XBQD)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__GVJH)->__id) {
+    __tmp__PZJH=((__LIP_VALUE *)__tmp__NBQD)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__PZJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__HVJH=((__LIP_BOOLEAN *)__tmp__GVJH);
+      __tmp__QZJH=((__LIP_BOOLEAN *)__tmp__PZJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__IVJH=((__LIP_INTEGER *)__tmp__GVJH);
-      __tmp__HVJH=get__LRSE(Self__IVJH,Self__IVJH->value__ZD4F);
+      Self__RZJH=((__LIP_INTEGER *)__tmp__PZJH);
+      __tmp__QZJH=get__LTSE(Self__RZJH,Self__RZJH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__JVJH=((__LIP_STRING *)__tmp__GVJH);
-      __tmp__HVJH=get__PVFF(Self__JVJH,Self__JVJH->value__RLUE);
+      Self__SZJH=((__LIP_STRING *)__tmp__PZJH);
+      __tmp__QZJH=get__GYFF(Self__SZJH,Self__SZJH->value__RNUE);
     } break;
     };
-    __tmp__YBQD=__tmp__HVJH;
+    __tmp__OBQD=__tmp__QZJH;
   } break;
   };
-  if (__tmp__YBQD==NULL) {
-    __tmp__0BQD=NULL;
+  if (__tmp__OBQD==NULL) {
+    __tmp__QBQD=NULL;
   } else {
-    switch (((struct ___OBJ *)__tmp__YBQD)->__id) {
+    switch (((struct ___OBJ *)__tmp__OBQD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__0BQD=((void *)__tmp__YBQD);
+      __tmp__QBQD=((void *)__tmp__OBQD);
     } break;
     case __LIP_INTEGER__: {
-      __tmp__0BQD=NULL;
+      __tmp__QBQD=NULL;
     } break;
     case __LIP_STRING__: {
-      __tmp__0BQD=NULL;
+      __tmp__QBQD=NULL;
     } break;
     }
   };
-  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)) {
+  val__LBQD=__tmp__QBQD;
+  if (((void *)__tmp__QBQD == (void *)NULL)) {
+    pos__Y51G=Self__JBQD->parent_lip_code__HQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_315));
+    put_position__LNG(pos__Y51G);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  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) {
+  if (((__LIP_BOOLEAN *)__tmp__QBQD)->value__1BQD) {
+    __tmp__KCQD=((__FAST_ARRAYoLIP_CODEo *)Self__JBQD->then__CCQD)->parent_arrayed_collection__WMYC.upper__ICQD;
+    Self__FXAG= 0;
+    while ((Self__FXAG <= __tmp__KCQD)) {
+      __tmp__RCQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__JBQD->then__CCQD)->parent_arrayed_collection__WMYC.storage__RQTD)[Self__FXAG];
+      switch (((struct ___OBJ *)__tmp__RCQD)->__id) {
       case __LIP_AFFECT__: {
-        run__HEFC(__tmp__1CQD);
+        run__1FFC(__tmp__RCQD);
       } break;
       case __LIP_BINARY__: {
-        __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)) {
+        __tmp__Y3YG=((__LIP_BINARY *)__tmp__RCQD)->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 2,(&__string_274));
+        put_position__LNG(__tmp__Y3YG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_UNARY__: {
-        __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)) {
+        __tmp__03YG=((__LIP_UNARY *)__tmp__RCQD)->parent_lip_code__MZ4B.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 2,(&__string_274));
+        put_position__LNG(__tmp__03YG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       } break;
       case __LIP_CALL__: {
-        run__RJUE(__tmp__1CQD);
+        run__RLUE(__tmp__RCQD);
       } break;
       case __LIP_IF__: {
-        run__SBQD(__tmp__1CQD);
+        run__IBQD(__tmp__RCQD);
       } break;
       case __LIP_PRINT__: {
-        run__FOUE(__tmp__1CQD);
+        run__FQUE(__tmp__RCQD);
       } break;
       case __LIP_VALUE__: {
-        __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)) {
+        __tmp__151G=((__LIP_VALUE *)__tmp__RCQD)->parent_lip_code__4EFE.parent_itm_object__WBE.position__0BJ;
+        put_error__text__BMG( 2,(&__string_274));
+        put_position__LNG(__tmp__151G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       } break;
       };
-      Self__0SAG=(__INTEGER)(Self__0SAG +  1);
+      Self__FXAG=(__INTEGER)(Self__FXAG +  1);
     };
-    __tmp__4CQD=TRUE__;
+    __tmp__UCQD=TRUE__;
   } else {
-    __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) {
+    __tmp__UCQD=FALSE__;
+  };
+  if ((! __tmp__UCQD)) {
+    if (((void *)Self__JBQD->else__ZCQD != (void *)NULL)) {
+      __tmp__GDQD=((__FAST_ARRAYoLIP_CODEo *)Self__JBQD->else__ZCQD)->parent_arrayed_collection__WMYC.upper__ICQD;
+      Self__UEEF= 0;
+      while ((Self__UEEF <= __tmp__GDQD)) {
+        __tmp__NDQD=((void **)((__FAST_ARRAYoLIP_CODEo *)Self__JBQD->else__ZCQD)->parent_arrayed_collection__WMYC.storage__RQTD)[Self__UEEF];
+        switch (((struct ___OBJ *)__tmp__NDQD)->__id) {
         case __LIP_AFFECT__: {
-          run__HEFC(__tmp__XDQD);
+          run__1FFC(__tmp__NDQD);
         } break;
         case __LIP_BINARY__: {
-          __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)) {
+          __tmp__B4YG=((__LIP_BINARY *)__tmp__NDQD)->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ;
+          put_error__text__BMG( 2,(&__string_274));
+          put_position__LNG(__tmp__B4YG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_UNARY__: {
-          __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)) {
+          __tmp__D4YG=((__LIP_UNARY *)__tmp__NDQD)->parent_lip_code__MZ4B.parent_itm_object__WBE.position__0BJ;
+          put_error__text__BMG( 2,(&__string_274));
+          put_position__LNG(__tmp__D4YG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         } break;
         case __LIP_CALL__: {
-          run__RJUE(__tmp__XDQD);
+          run__RLUE(__tmp__NDQD);
         } break;
         case __LIP_IF__: {
-          run__SBQD(__tmp__XDQD);
+          run__IBQD(__tmp__NDQD);
         } break;
         case __LIP_PRINT__: {
-          run__FOUE(__tmp__XDQD);
+          run__FQUE(__tmp__NDQD);
         } break;
         case __LIP_VALUE__: {
-          __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)) {
+          __tmp__YQUE=((__LIP_VALUE *)__tmp__NDQD)->parent_lip_code__4EFE.parent_itm_object__WBE.position__0BJ;
+          put_error__text__BMG( 2,(&__string_274));
+          put_position__LNG(__tmp__YQUE);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         } break;
         };
-        Self__ICEF=(__INTEGER)(Self__ICEF +  1);
+        Self__UEEF=(__INTEGER)(Self__UEEF +  1);
       };
     };
   };
 }
 
-static void run__FOUE(__LIP_PRINT *Self__GOUE)
+static void run__FQUE(__LIP_PRINT *Self__GQUE)
 // ({LIP_PRINT}) VoidNo recursive, No inlinable.
 {
-  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) {
+  void *__tmp__JQUE;
+  __POSITION __tmp__RZVE,pos__WXDE,pos__351G,pos__10XE;
+  void *__tmp__KQUE,*__tmp__UZJH,*__tmp__VZJH;
+  __LIP_INTEGER *Self__WZJH;
+  __LIP_STRING *Self__XZJH,*Self__1HIG;
+  __INTEGER Self__TV5F;
+  __BOOLEAN __tmp__0V5F;
+  __tmp__JQUE=Self__GQUE->message__IQUE;
+  switch (((struct ___OBJ *)__tmp__JQUE)->__id) {
   case __LIP_AFFECT__: {
-    __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)) {
+    __tmp__RZVE=((__LIP_AFFECT *)__tmp__JQUE)->parent_lip_code__ZSPB.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(__tmp__RZVE);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__KOUE=NULL;
+    __tmp__KQUE=NULL;
   } break;
   case __LIP_BINARY__: {
-    __tmp__KOUE=run_expr__2XQD(__tmp__JOUE);
+    __tmp__KQUE=run_expr__SXQD(__tmp__JQUE);
   } break;
   case __LIP_UNARY__: {
-    __tmp__KOUE=run_expr__10QD(__tmp__JOUE);
+    __tmp__KQUE=run_expr__R0QD(__tmp__JQUE);
   } break;
   case __LIP_CALL__: {
-    __tmp__KOUE=run_expr__DQUE(__tmp__JOUE);
+    __tmp__KQUE=run_expr__DSUE(__tmp__JQUE);
   } break;
   case __LIP_IF__: {
-    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)) {
+    pos__WXDE=((__LIP_IF *)__tmp__JQUE)->parent_lip_code__HQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(pos__WXDE);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__KOUE=NULL;
+    __tmp__KQUE=NULL;
   } break;
   case __LIP_PRINT__: {
-    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)) {
+    pos__351G=((__LIP_PRINT *)__tmp__JQUE)->parent_lip_code__ZQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_314));
+    put_position__LNG(pos__351G);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
-    __tmp__KOUE=NULL;
+    __tmp__KQUE=NULL;
   } break;
   case __LIP_VALUE__: {
-    __tmp__LVJH=((__LIP_VALUE *)__tmp__JOUE)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__LVJH)->__id) {
+    __tmp__UZJH=((__LIP_VALUE *)__tmp__JQUE)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__UZJH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__MVJH=((__LIP_BOOLEAN *)__tmp__LVJH);
+      __tmp__VZJH=((__LIP_BOOLEAN *)__tmp__UZJH);
     } break;
     case __LIP_INTEGER__: {
-      Self__NVJH=((__LIP_INTEGER *)__tmp__LVJH);
-      __tmp__MVJH=get__LRSE(Self__NVJH,Self__NVJH->value__ZD4F);
+      Self__WZJH=((__LIP_INTEGER *)__tmp__UZJH);
+      __tmp__VZJH=get__LTSE(Self__WZJH,Self__WZJH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__OVJH=((__LIP_STRING *)__tmp__LVJH);
-      __tmp__MVJH=get__PVFF(Self__OVJH,Self__OVJH->value__RLUE);
+      Self__XZJH=((__LIP_STRING *)__tmp__UZJH);
+      __tmp__VZJH=get__GYFF(Self__XZJH,Self__XZJH->value__RNUE);
     } break;
     };
-    __tmp__KOUE=__tmp__MVJH;
+    __tmp__KQUE=__tmp__VZJH;
   } break;
   };
-  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)) {
+  if (((void *)__tmp__KQUE == (void *)NULL)) {
+    pos__10XE=Self__GQUE->parent_lip_code__ZQYC.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_279));
+    put_position__LNG(pos__10XE);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  switch (((struct ___OBJ *)__tmp__KOUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__KQUE)->__id) {
   case __LIP_BOOLEAN__: {
-    if (((__LIP_BOOLEAN *)__tmp__KOUE)->value__FCQD) {
+    if (((__LIP_BOOLEAN *)__tmp__KQUE)->value__1BQD) {
       print__DID((&__string_42));
     } else {
       print__DID((&__string_43));
     };
   } break;
   case __LIP_INTEGER__: {
-    Self__IR5F=((__LIP_INTEGER *)__tmp__KOUE)->value__ZD4F;
-    if ((Self__IR5F ==  0)) {
+    Self__TV5F=((__LIP_INTEGER *)__tmp__KQUE)->value__EI4F;
+    if ((Self__TV5F ==  0)) {
       fputc((int)('0'),stdout);
-      __tmp__PR5F=TRUE__;
+      __tmp__0V5F=TRUE__;
     } else {
-      __tmp__PR5F=FALSE__;
+      __tmp__0V5F=FALSE__;
     };
-    if ((! __tmp__PR5F)) {
-      if ((Self__IR5F <  0)) {
+    if ((! __tmp__0V5F)) {
+      if ((Self__TV5F <  0)) {
         fputc((int)('-'),stdout);
-        print_positif__J2KG((__INTEGER)(- Self__IR5F));
+        print_positif__UALG((__INTEGER)(- Self__TV5F));
       } else {
-        print_positif__J2KG(Self__IR5F);
+        print_positif__UALG(Self__TV5F);
       };
     };
   } break;
   case __LIP_STRING__: {
-    Self__QDIG=((__LIP_STRING *)__tmp__KOUE);
+    Self__1HIG=((__LIP_STRING *)__tmp__KQUE);
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    append_in__ZDIG(Self__QDIG,string_tmp__VH);
-    put_string__WEF(((__STRING *)string_tmp__VH));
+    append_in__EIIG(Self__1HIG,string_tmp__VH);
+    put_string__5FF(((__STRING *)string_tmp__VH));
   } break;
   };
-  switch (((struct ___OBJ *)__tmp__KOUE)->__id) {
+  switch (((struct ___OBJ *)__tmp__KQUE)->__id) {
   case __LIP_BOOLEAN__: {
   } break;
   case __LIP_INTEGER__: {
-    free__RY3F(__tmp__KOUE);
+    free__223F(__tmp__KQUE);
   } break;
   case __LIP_STRING__: {
-    free__52HG(__tmp__KOUE);
+    free__KBIG(__tmp__KQUE);
   } break;
   };
 }
 
-static void add_last__NJV(__FAST_ARRAYoITM_TYPE_MONOo *Self__OJV,void *element__PJV)
+static void add_last__WKV(__FAST_ARRAYoITM_TYPE_MONOo *Self__XKV,void *element__YKV)
 // ({FAST_ARRAYoITM_TYPE_MONOo},{NULLxITM_TYPE_PARAMETERxITM_TYPE_SIMPLExITM_TYPE_BLOCKxITM_TYPE_GENERICxITM_TYPE_STYLE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__ZKV,__tmp__4LV,__tmp__AGEC,Self__TJVD;
+  __BOOLEAN __tmp__ILV;
+  void **__tmp__3LV,**new__MFEC;
+  new_capacity__ZKV= 0;
+  if (((__INTEGER)(Self__XKV->parent_arrayed_collection__EYC.upper__GFV +  1) <= (__INTEGER)(Self__XKV->parent_arrayed_collection__EYC.capacity__1KV -  1))) {
+    Self__XKV->parent_arrayed_collection__EYC.upper__GFV=(__INTEGER)(Self__XKV->parent_arrayed_collection__EYC.upper__GFV +  1);
+    __tmp__ILV=TRUE__;
   } else {
-    __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;
+    __tmp__ILV=FALSE__;
+  };
+  if ((! __tmp__ILV)) {
+    if ((Self__XKV->parent_arrayed_collection__EYC.capacity__1KV ==  0)) {
+      Self__XKV->parent_arrayed_collection__EYC.storage__NJV=create__35QB( 2);
+      Self__XKV->parent_arrayed_collection__EYC.capacity__1KV= 2;
+      Self__XKV->parent_arrayed_collection__EYC.upper__GFV= 0;
+    } else {
+      new_capacity__ZKV=(__INTEGER)(Self__XKV->parent_arrayed_collection__EYC.capacity__1KV <<  1);
+      __tmp__3LV=Self__XKV->parent_arrayed_collection__EYC.storage__NJV;
+      __tmp__4LV=Self__XKV->parent_arrayed_collection__EYC.capacity__1KV;
+      new__MFEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__3LV)),((__UINTEGER_32 )(__INTEGER)(__tmp__4LV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZKV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__AGEC=(__INTEGER)(new_capacity__ZKV -  1);
+      Self__TJVD=__tmp__4LV;
+      while ((Self__TJVD <= __tmp__AGEC)) {
+        new__MFEC[Self__TJVD]=NULL;
+        Self__TJVD=(__INTEGER)(Self__TJVD +  1);
+      };
+      Self__XKV->parent_arrayed_collection__EYC.storage__NJV=new__MFEC;
+      Self__XKV->parent_arrayed_collection__EYC.capacity__1KV=new_capacity__ZKV;
+      Self__XKV->parent_arrayed_collection__EYC.upper__GFV=(__INTEGER)(Self__XKV->parent_arrayed_collection__EYC.upper__GFV +  1);
+    };
+  };
+  ((void **)Self__XKV->parent_arrayed_collection__EYC.storage__NJV)[Self__XKV->parent_arrayed_collection__EYC.upper__GFV]=element__YKV;
 }
 
-static void* alias__BRP(void *tmp__DRP)
+static void* alias__KSP(void *tmp__MSP)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) With resultNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER __tmp__A3PD,i__SN2E,new_capacity__1CW,other_upper__0CW;
+  __INTEGER Self__FNKC,h__2DW,idx__3DW,idx__DTRB,new_capacity__ETRB;
+  __INTEGER i__CTRB,typ_id__5INB;
+  __POINTER ptr__0INB,ptr_table__3ZJH,next__2ZJH,result__4ZJH;
+  __POINTER ptr_table__C0JH,next__B0JH,result__D0JH;
+  __UINTEGER_32 sz__2INB,a__PQGH,new_size__QQGH,t__UQGH,a__TQGH;
+  __UINTEGER_32 new_size__F0JH,lab_type__E0JH;
+  void *result__OSP,*result__L2V,*e__VDW,*e__ZZJH,*e__WJ1;
+  __HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *Self__X1V,*Self__UDW;
+  void *node__K2V,*node__0ZJH,*node__5J1,*node__4DW,*node1__GTRB;
+  void *node2__HTRB,*__tmp__OFW;
+  __BOOLEAN __tmp__D3V,result__41PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__11PD,*o__51PD,*__tmp__L2PD;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__YCW;
+  void **__tmp__12PD,**__tmp__32PD,**Self__4M2E,**__tmp__ODW,**__tmp__QDW;
+  void **Self__D3CC;
+  void **old_buckets__FTRB;
+  __HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *result__ZINB,*Self__4RDC;
+  result__OSP=NULL;
+  if ((((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__MSP)->parent_arrayed_collection__EYC.upper__GFV <  0)) {
+    result__OSP=empty_list__VSP;
   } else {
-    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:
+    Self__X1V=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__ATP);
+    result__L2V=NULL;
+    node__K2V=((void **)Self__X1V->buckets__S2V)[(__INTEGER)(hash_code__L20(tmp__MSP) % Self__X1V->capacity__N2V)];
+    until_do__T30:
     {
-      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;
+      if (((void *)node__K2V == (void *)NULL)) {
+        __tmp__D3V=TRUE__;
+      } else {
+        Self__11PD=((__FAST_ARRAYoITM_TYPE_MONOo *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__K2V)->item__42V);
+        result__41PD=FALSE__;
+        o__51PD=NULL;
+        if (((void *)Self__11PD == (void *)tmp__MSP)) {
+          result__41PD=TRUE__;
+        } else {
+          if (tmp__MSP==NULL) {
+            __tmp__L2PD=NULL;
+          } else {
+            __tmp__L2PD=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__MSP);
+          };
+          o__51PD=__tmp__L2PD;
+          if ((((void *)__tmp__L2PD != (void *)NULL) && (Self__11PD->parent_arrayed_collection__EYC.upper__GFV == __tmp__L2PD->parent_arrayed_collection__EYC.upper__GFV))) {
+            __tmp__12PD=Self__11PD->parent_arrayed_collection__EYC.storage__NJV;
+            __tmp__32PD=__tmp__L2PD->parent_arrayed_collection__EYC.storage__NJV;
+            __tmp__A3PD=(__INTEGER)(Self__11PD->parent_arrayed_collection__EYC.upper__GFV +  1);
+            Self__4M2E=((void **)__tmp__12PD);
+            i__SN2E=(__INTEGER)(__tmp__A3PD -  1);
+            while (((i__SN2E >=  0) && ((void *)Self__4M2E[i__SN2E] == (void *)((void **)__tmp__32PD)[i__SN2E]))) {
+              i__SN2E=(__INTEGER)(i__SN2E -  1);
+            };
+            result__41PD=(i__SN2E <  0);
+          };
+        };
+        __tmp__D3V=result__41PD;
+      };
+      if ((! __tmp__D3V)) {
+        node__K2V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__K2V)->next__K3V;
+        goto until_do__T30;
+      };
+    };
+    if (((void *)node__K2V != (void *)NULL)) {
+      result__L2V=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__K2V)->item__42V;
+    };
+    result__OSP=result__L2V;
+    if (((void *)result__L2V == (void *)NULL)) {
+      result__OSP=create_with_capacity__MCR((__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__MSP)->parent_arrayed_collection__EYC.upper__GFV +  1));
+      Self__YCW=((__FAST_ARRAYoITM_TYPE_MONOo *)result__OSP);
+      new_capacity__1CW= 0;
+      other_upper__0CW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__MSP)->parent_arrayed_collection__EYC.upper__GFV;
+      if ((other_upper__0CW >=  0)) {
+        new_capacity__1CW=(__INTEGER)(other_upper__0CW +  1);
+        if ((Self__YCW->parent_arrayed_collection__EYC.capacity__1KV < new_capacity__1CW)) {
+          Self__YCW->parent_arrayed_collection__EYC.storage__NJV=create__35QB(new_capacity__1CW);
+          Self__YCW->parent_arrayed_collection__EYC.capacity__1KV=new_capacity__1CW;
+        };
+        __tmp__ODW=Self__YCW->parent_arrayed_collection__EYC.storage__NJV;
+        __tmp__QDW=((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__MSP)->parent_arrayed_collection__EYC.storage__NJV;
+        Self__D3CC=((void **)__tmp__ODW);
+        Self__FNKC=other_upper__0CW;
+        while ((Self__FNKC >=  0)) {
+          Self__D3CC[Self__FNKC]=((void **)__tmp__QDW)[Self__FNKC];
+          Self__FNKC=(__INTEGER)(Self__FNKC -  1);
+        };
+      };
+      Self__YCW->parent_arrayed_collection__EYC.upper__GFV=other_upper__0CW;
+      Self__UDW=((__HASHED_SEToFAST_ARRAYoITM_TYPE_MONOoo *)bucket__ATP);
+      e__VDW=result__OSP;
+      e__ZZJH=result__OSP;
+      node__0ZJH=((void **)Self__UDW->buckets__S2V)[(__INTEGER)(hash_code__L20(result__OSP) % Self__UDW->capacity__N2V)];
+      while ((! (((void *)node__0ZJH == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__0ZJH)->item__42V == (void *)e__ZZJH)))) {
+        node__0ZJH=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__0ZJH)->next__K3V;
+      };
+      e__WJ1=result__OSP;
+      node__5J1=((void **)Self__UDW->buckets__S2V)[(__INTEGER)(hash_code__L20(result__OSP) % Self__UDW->capacity__N2V)];
+      while ((! (((void *)node__5J1 == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__5J1)->item__42V == (void *)e__WJ1)))) {
+        node__5J1=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__5J1)->next__K3V;
+      };
+      h__2DW=hash_code__L20(result__OSP);
+      idx__3DW=(__INTEGER)(h__2DW % Self__UDW->capacity__N2V);
+      node__4DW=((void **)Self__UDW->buckets__S2V)[idx__3DW];
+      while ((! (((void *)node__4DW == (void *)NULL) || ((void *)((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__4DW)->item__42V == (void *)e__VDW)))) {
+        node__4DW=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node__4DW)->next__K3V;
+      };
+      if (((void *)node__4DW == (void *)NULL)) {
+        if ((Self__UDW->capacity__N2V == Self__UDW->count__BFW)) {
+          idx__DTRB= 0;
+          node1__GTRB=NULL;
+          node2__HTRB=NULL;
+          new_capacity__ETRB=prime_number_ceiling__T11((__INTEGER)(Self__UDW->capacity__N2V +  1));
+          old_buckets__FTRB=Self__UDW->buckets__S2V;
+          Self__UDW->buckets__S2V=create__XWBB(new_capacity__ETRB);
+          i__CTRB=(__INTEGER)(Self__UDW->capacity__N2V -  1);
+          Self__UDW->capacity__N2V=new_capacity__ETRB;
+          while ((i__CTRB >=  0)) {
+            node1__GTRB=((void **)old_buckets__FTRB)[i__CTRB];
+            while (((void *)node1__GTRB != (void *)NULL)) {
+              node2__HTRB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__GTRB)->next__K3V;
+              idx__DTRB=(__INTEGER)(hash_code__L20(((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__GTRB)->item__42V) % Self__UDW->capacity__N2V);
+              ((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)node1__GTRB)->next__K3V=((void **)Self__UDW->buckets__S2V)[idx__DTRB];
+              ((void **)Self__UDW->buckets__S2V)[idx__DTRB]=node1__GTRB;
+              node1__GTRB=node2__HTRB;
+            };
+            i__CTRB=(__INTEGER)(i__CTRB -  1);
+          };
+          idx__3DW=(__INTEGER)(h__2DW % Self__UDW->capacity__N2V);
+        };
+        __tmp__OFW=((void **)Self__UDW->buckets__S2V)[idx__3DW];
+        result__ZINB=NULL;
+        ptr__0INB=((__POINTER )(NULL));
+        typ_id__5INB= 0;
+        sz__2INB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo));
+        if ((sz__2INB ==  0)) {
+          result__ZINB=HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+        } else {
+          typ_id__5INB=__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2INB);
+          if ((typ_id__5INB == (__INTEGER)(-  1))) {
+            a__PQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__QQGH=(__UINTEGER_32)((__UINTEGER_32)(sz__2INB + a__PQGH) & (__UINTEGER_32)(~ a__PQGH));
+            ptr_table__3ZJH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__QQGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__2ZJH=((__POINTER )(NULL));
+            result__4ZJH=((__POINTER *)ptr_table__3ZJH)[ 0];
+            if ((result__4ZJH == (void *)NULL)) {
+              result__4ZJH=new_lab__ZPJ(new_size__QQGH);
+              next__2ZJH=(void *)((unsigned long)result__4ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QQGH)));
+              ((__POINTER *)next__2ZJH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3ZJH)[ 0]=next__2ZJH;
             } else {
-              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)));
+              next__2ZJH=((__POINTER *)result__4ZJH)[ 0];
+              if ((next__2ZJH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4ZJH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__QQGH <<  1)) <=  4096)) {
+                  next__2ZJH=(void *)((unsigned long)result__4ZJH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__QQGH)));
                 } else {
-                  next__TVJH=new_lab__QOJ(new_size__HMGH);
+                  next__2ZJH=new_lab__ZPJ(new_size__QQGH);
                 };
-                ((__POINTER *)next__TVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__UVJH)[ 0]=next__TVJH;
+                ((__POINTER *)next__2ZJH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__3ZJH)[ 0]=next__2ZJH;
               } else {
-                ((__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;
+                ((__POINTER *)result__4ZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2ZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__4ZJH=next__2ZJH;
+              };
+            };
+            ptr__0INB=result__4ZJH;
+          } else {
+            t__UQGH=((__UINTEGER_32 )typ_id__5INB);
+            a__TQGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__F0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__2INB + a__TQGH) & (__UINTEGER_32)(~ a__TQGH));
+            ptr_table__C0JH=((__POINTER )(&(table_type[(t__UQGH)])));
+            lab_type__E0JH=(__UINTEGER_32)(t__UQGH |  1);
+            next__B0JH=((__POINTER )(NULL));
+            result__D0JH=((__POINTER *)ptr_table__C0JH)[ 0];
+            if ((result__D0JH == (void *)NULL)) {
+              result__D0JH=new_lab__ZPJ(lab_type__E0JH);
+              next__B0JH=(void *)((unsigned long)result__D0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F0JH)));
+              ((__POINTER *)next__B0JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__C0JH)[ 0]=next__B0JH;
             } else {
-              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)));
+              next__B0JH=((__POINTER *)result__D0JH)[ 0];
+              if ((next__B0JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__D0JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__F0JH <<  1)) <=  4096)) {
+                  next__B0JH=(void *)((unsigned long)result__D0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__F0JH)));
                 } else {
-                  next__YVJH=new_lab__QOJ(lab_type__1VJH);
+                  next__B0JH=new_lab__ZPJ(lab_type__E0JH);
                 };
-                ((__POINTER *)next__YVJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ZVJH)[ 0]=next__YVJH;
+                ((__POINTER *)next__B0JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__C0JH)[ 0]=next__B0JH;
               } else {
-                ((__POINTER *)result__0VJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YVJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__0VJH=next__YVJH;
+                ((__POINTER *)result__D0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__D0JH=next__B0JH;
               };
             };
-            ptr__QHNB=result__0VJH;
+            ptr__0INB=result__D0JH;
           };
-          result__PHNB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__QHNB);
-          *(result__PHNB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
+          result__ZINB=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)ptr__0INB);
+          *(result__ZINB) = *(HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo__);
         };
-        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);
+        Self__4RDC=((__HASHED_SET_NODEoFAST_ARRAYoITM_TYPE_MONOoo *)result__ZINB);
+        Self__4RDC->item__42V=result__OSP;
+        Self__4RDC->next__K3V=__tmp__OFW;
+        node__4DW=result__ZINB;
+        ((void **)Self__UDW->buckets__S2V)[idx__3DW]=result__ZINB;
+        Self__UDW->count__BFW=(__INTEGER)(Self__UDW->count__BFW +  1);
       };
     };
   };
-  free__XIQ(tmp__DRP);
-  return(result__FRP);
+  free__AKQ(tmp__MSP);
+  return(result__OSP);
 }
 
-static void add__WHHB(__HASHED_SEToSTRING_CONSTANTo *Self__XHHB,void *e__YHHB)
+static void add__AJHB(__HASHED_SEToSTRING_CONSTANTo *Self__BJHB,void *e__CJHB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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)));
+  __STRING_CONSTANT *Self__XCIH,*Self__2CIH;
+  __INTEGER result__WCIH,__tmp__YCIH,Self__ZCIH,idx__KJHB,idx__GO0B;
+  __INTEGER new_capacity__HO0B,i__FO0B,result__1CIH,__tmp__3CIH;
+  __INTEGER Self__4CIH,typ_id__X1WB;
+  __POINTER ptr__S1WB,ptr_table__H0JH,next__G0JH,result__I0JH;
+  __POINTER ptr_table__M0JH,next__L0JH,result__N0JH;
+  __UINTEGER_32 sz__U1WB,a__JRGH,new_size__KRGH,t__ORGH,a__NRGH;
+  __UINTEGER_32 new_size__P0JH,lab_type__O0JH;
+  void *node__LJHB,*node1__JO0B,*node2__KO0B,*__tmp__0KHB;
+  void **old_buckets__IO0B;
+  __HASHED_SET_NODEoSTRING_CONSTANTo *result__R1WB,*Self__3KFC;
+  has__RIMB(Self__BJHB,e__CJHB);
+  has__RIMB(Self__BJHB,e__CJHB);
+  Self__XCIH=((__STRING_CONSTANT *)e__CJHB);
+  result__WCIH= 0;
+  __tmp__YCIH=Self__XCIH->count__DD;
+  Self__ZCIH= 1;
+  while ((Self__ZCIH <= __tmp__YCIH)) {
+    result__WCIH=(__INTEGER)((__INTEGER)( 5 * result__WCIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__XCIH->storage__ZNO)[(__INTEGER)(Self__ZCIH -  1)])));
+    Self__ZCIH=(__INTEGER)(Self__ZCIH +  1);
+  };
+  if ((result__WCIH <  0)) {
+    result__WCIH=(__INTEGER)(~ result__WCIH);
+  };
+  idx__KJHB=(__INTEGER)(result__WCIH % Self__BJHB->capacity__OFT);
+  node__LJHB=((void **)Self__BJHB->buckets__LBV)[idx__KJHB];
+  while ((! (((void *)node__LJHB == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__LJHB)->item__XBV,e__CJHB)))) {
+    node__LJHB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__LJHB)->next__CCV;
+  };
+  if (((void *)node__LJHB == (void *)NULL)) {
+    if ((Self__BJHB->capacity__OFT == Self__BJHB->count__UEY)) {
+      idx__GO0B= 0;
+      node1__JO0B=NULL;
+      node2__KO0B=NULL;
+      new_capacity__HO0B=prime_number_ceiling__T11((__INTEGER)(Self__BJHB->capacity__OFT +  1));
+      old_buckets__IO0B=Self__BJHB->buckets__LBV;
+      Self__BJHB->buckets__LBV=create__PZ3(new_capacity__HO0B);
+      i__FO0B=(__INTEGER)(Self__BJHB->capacity__OFT -  1);
+      Self__BJHB->capacity__OFT=new_capacity__HO0B;
+      while ((i__FO0B >=  0)) {
+        node1__JO0B=((void **)old_buckets__IO0B)[i__FO0B];
+        while (((void *)node1__JO0B != (void *)NULL)) {
+          node2__KO0B=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__JO0B)->next__CCV;
+          Self__2CIH=((__STRING_CONSTANT *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__JO0B)->item__XBV);
+          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__ZNO)[(__INTEGER)(Self__4CIH -  1)])));
+            Self__4CIH=(__INTEGER)(Self__4CIH +  1);
+          };
+          if ((result__1CIH <  0)) {
+            result__1CIH=(__INTEGER)(~ result__1CIH);
+          };
+          idx__GO0B=(__INTEGER)(result__1CIH % Self__BJHB->capacity__OFT);
+          ((__HASHED_SET_NODEoSTRING_CONSTANTo *)node1__JO0B)->next__CCV=((void **)Self__BJHB->buckets__LBV)[idx__GO0B];
+          ((void **)Self__BJHB->buckets__LBV)[idx__GO0B]=node1__JO0B;
+          node1__JO0B=node2__KO0B;
+        };
+        i__FO0B=(__INTEGER)(i__FO0B -  1);
+      };
+      idx__KJHB=(__INTEGER)(result__WCIH % new_capacity__HO0B);
+    };
+    __tmp__0KHB=((void **)Self__BJHB->buckets__LBV)[idx__KJHB];
+    result__R1WB=NULL;
+    ptr__S1WB=((__POINTER )(NULL));
+    typ_id__X1WB= 0;
+    sz__U1WB=((__UINTEGER_32 )sizeof(__HASHED_SET_NODEoSTRING_CONSTANTo));
+    if ((sz__U1WB ==  0)) {
+      result__R1WB=HASHED_SET_NODEoSTRING_CONSTANTo__;
+    } else {
+      typ_id__X1WB=__HASHED_SET_NODEoSTRING_CONSTANTo__;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__U1WB);
+      if ((typ_id__X1WB == (__INTEGER)(-  1))) {
+        a__JRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__KRGH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1WB + a__JRGH) & (__UINTEGER_32)(~ a__JRGH));
+        ptr_table__H0JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KRGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__G0JH=((__POINTER )(NULL));
+        result__I0JH=((__POINTER *)ptr_table__H0JH)[ 0];
+        if ((result__I0JH == (void *)NULL)) {
+          result__I0JH=new_lab__ZPJ(new_size__KRGH);
+          next__G0JH=(void *)((unsigned long)result__I0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRGH)));
+          ((__POINTER *)next__G0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__H0JH)[ 0]=next__G0JH;
+        } else {
+          next__G0JH=((__POINTER *)result__I0JH)[ 0];
+          if ((next__G0JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I0JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KRGH <<  1)) <=  4096)) {
+              next__G0JH=(void *)((unsigned long)result__I0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KRGH)));
             } else {
-              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)));
+              next__G0JH=new_lab__ZPJ(new_size__KRGH);
+            };
+            ((__POINTER *)next__G0JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__H0JH)[ 0]=next__G0JH;
+          } else {
+            ((__POINTER *)result__I0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__I0JH=next__G0JH;
+          };
+        };
+        ptr__S1WB=result__I0JH;
+      } else {
+        t__ORGH=((__UINTEGER_32 )typ_id__X1WB);
+        a__NRGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__P0JH=(__UINTEGER_32)((__UINTEGER_32)(sz__U1WB + a__NRGH) & (__UINTEGER_32)(~ a__NRGH));
+        ptr_table__M0JH=((__POINTER )(&(table_type[(t__ORGH)])));
+        lab_type__O0JH=(__UINTEGER_32)(t__ORGH |  1);
+        next__L0JH=((__POINTER )(NULL));
+        result__N0JH=((__POINTER *)ptr_table__M0JH)[ 0];
+        if ((result__N0JH == (void *)NULL)) {
+          result__N0JH=new_lab__ZPJ(lab_type__O0JH);
+          next__L0JH=(void *)((unsigned long)result__N0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P0JH)));
+          ((__POINTER *)next__L0JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__M0JH)[ 0]=next__L0JH;
+        } else {
+          next__L0JH=((__POINTER *)result__N0JH)[ 0];
+          if ((next__L0JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N0JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P0JH <<  1)) <=  4096)) {
+              next__L0JH=(void *)((unsigned long)result__N0JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P0JH)));
             } else {
-              next__CWJH=new_lab__QOJ(lab_type__FWJH);
+              next__L0JH=new_lab__ZPJ(lab_type__O0JH);
             };
-            ((__POINTER *)next__CWJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DWJH)[ 0]=next__CWJH;
+            ((__POINTER *)next__L0JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__M0JH)[ 0]=next__L0JH;
           } else {
-            ((__POINTER *)result__EWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__EWJH=next__CWJH;
+            ((__POINTER *)result__N0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__N0JH=next__L0JH;
           };
         };
-        ptr__G0WB=result__EWJH;
+        ptr__S1WB=result__N0JH;
       };
-      result__F0WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__G0WB);
-      *(result__F0WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
+      result__R1WB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)ptr__S1WB);
+      *(result__R1WB) = *(HASHED_SET_NODEoSTRING_CONSTANTo__);
     };
-    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);
+    Self__3KFC=((__HASHED_SET_NODEoSTRING_CONSTANTo *)result__R1WB);
+    Self__3KFC->item__XBV=e__CJHB;
+    Self__3KFC->next__CCV=__tmp__0KHB;
+    node__LJHB=result__R1WB;
+    ((void **)Self__BJHB->buckets__LBV)[idx__KJHB]=result__R1WB;
+    Self__BJHB->count__UEY=(__INTEGER)(Self__BJHB->count__UEY +  1);
   };
 }
 
-static void add_last__HAPD(__FAST_ARRAYoSTRING_CONSTANTo *Self__IAPD,void *element__JAPD)
+static void add_last__35OD(__FAST_ARRAYoSTRING_CONSTANTo *Self__45OD,void *element__55OD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__AAPD,__tmp__HBPD,__tmp__MRWE,Self__GRQF;
+  __BOOLEAN __tmp__PAPD;
+  void **__tmp__GBPD,**new__YQWE;
+  new_capacity__AAPD= 0;
+  if (((__INTEGER)(Self__45OD->parent_arrayed_collection__U3I.upper__H4OD +  1) <= (__INTEGER)(Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD -  1))) {
+    Self__45OD->parent_arrayed_collection__U3I.upper__H4OD=(__INTEGER)(Self__45OD->parent_arrayed_collection__U3I.upper__H4OD +  1);
+    __tmp__PAPD=TRUE__;
   } else {
-    __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;
+    __tmp__PAPD=FALSE__;
+  };
+  if ((! __tmp__PAPD)) {
+    if ((Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD ==  0)) {
+      Self__45OD->parent_arrayed_collection__U3I.storage__3APD=create__TIHE( 2);
+      Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD= 2;
+      Self__45OD->parent_arrayed_collection__U3I.upper__H4OD= 0;
+    } else {
+      new_capacity__AAPD=(__INTEGER)(Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD <<  1);
+      __tmp__GBPD=Self__45OD->parent_arrayed_collection__U3I.storage__3APD;
+      __tmp__HBPD=Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD;
+      new__YQWE=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__GBPD)),((__UINTEGER_32 )(__INTEGER)(__tmp__HBPD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__AAPD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__MRWE=(__INTEGER)(new_capacity__AAPD -  1);
+      Self__GRQF=__tmp__HBPD;
+      while ((Self__GRQF <= __tmp__MRWE)) {
+        new__YQWE[Self__GRQF]=NULL;
+        Self__GRQF=(__INTEGER)(Self__GRQF +  1);
+      };
+      Self__45OD->parent_arrayed_collection__U3I.storage__3APD=new__YQWE;
+      Self__45OD->parent_arrayed_collection__U3I.capacity__CAPD=new_capacity__AAPD;
+      Self__45OD->parent_arrayed_collection__U3I.upper__H4OD=(__INTEGER)(Self__45OD->parent_arrayed_collection__U3I.upper__H4OD +  1);
+    };
+  };
+  ((void **)Self__45OD->parent_arrayed_collection__U3I.storage__3APD)[Self__45OD->parent_arrayed_collection__U3I.upper__H4OD]=element__55OD;
 }
 
-static void free__NO5(void *tmp__PO5)
+static void free__WP5(void *tmp__YP5)
 // ({NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__SDGB,__tmp__WEGB,__tmp__UGGC,Self__24VD;
+  __FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *Self__QDGB;
+  __BOOLEAN __tmp__AEGB;
+  void **__tmp__VEGB,**new__AGGC;
+  ((__FAST_ARRAYoSTRING_CONSTANTo *)tmp__YP5)->parent_arrayed_collection__U3I.upper__H4OD=(__INTEGER)(-  1);
+  Self__QDGB=((__FAST_ARRAYoFAST_ARRAYoSTRING_CONSTANToo *)free_list__D3K);
+  new_capacity__SDGB= 0;
+  if (((__INTEGER)(Self__QDGB->parent_arrayed_collection__C3K.upper__WPU +  1) <= (__INTEGER)(Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU -  1))) {
+    Self__QDGB->parent_arrayed_collection__C3K.upper__WPU=(__INTEGER)(Self__QDGB->parent_arrayed_collection__C3K.upper__WPU +  1);
+    __tmp__AEGB=TRUE__;
   } else {
-    __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;
+    __tmp__AEGB=FALSE__;
+  };
+  if ((! __tmp__AEGB)) {
+    if ((Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU ==  0)) {
+      Self__QDGB->parent_arrayed_collection__C3K.storage__GSU=create__A2ZB( 2);
+      Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU= 2;
+      Self__QDGB->parent_arrayed_collection__C3K.upper__WPU= 0;
+    } else {
+      new_capacity__SDGB=(__INTEGER)(Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU <<  1);
+      __tmp__VEGB=Self__QDGB->parent_arrayed_collection__C3K.storage__GSU;
+      __tmp__WEGB=Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU;
+      new__AGGC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__VEGB)),((__UINTEGER_32 )(__INTEGER)(__tmp__WEGB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__SDGB * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__UGGC=(__INTEGER)(new_capacity__SDGB -  1);
+      Self__24VD=__tmp__WEGB;
+      while ((Self__24VD <= __tmp__UGGC)) {
+        new__AGGC[Self__24VD]=NULL;
+        Self__24VD=(__INTEGER)(Self__24VD +  1);
+      };
+      Self__QDGB->parent_arrayed_collection__C3K.storage__GSU=new__AGGC;
+      Self__QDGB->parent_arrayed_collection__C3K.capacity__1RU=new_capacity__SDGB;
+      Self__QDGB->parent_arrayed_collection__C3K.upper__WPU=(__INTEGER)(Self__QDGB->parent_arrayed_collection__C3K.upper__WPU +  1);
+    };
+  };
+  ((void **)Self__QDGB->parent_arrayed_collection__C3K.storage__GSU)[Self__QDGB->parent_arrayed_collection__C3K.upper__WPU]=tmp__YP5;
 }
 
-static void free__XIQ(void *tmp__ZIQ)
+static void free__AKQ(void *tmp__CKQ)
 // ({NULLxFAST_ARRAYoITM_TYPE_MONOo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__0VV,__tmp__BXV,__tmp__QJEC,Self__RNVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__YVV;
+  __BOOLEAN __tmp__JWV;
+  void **__tmp__AXV,**new__2IEC;
+  ((__FAST_ARRAYoITM_TYPE_MONOo *)tmp__CKQ)->parent_arrayed_collection__EYC.upper__GFV=(__INTEGER)(-  1);
+  Self__YVV=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+  new_capacity__0VV= 0;
+  if (((__INTEGER)(Self__YVV->parent_arrayed_collection__NRP.upper__BSV +  1) <= (__INTEGER)(Self__YVV->parent_arrayed_collection__NRP.capacity__2VV -  1))) {
+    Self__YVV->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(Self__YVV->parent_arrayed_collection__NRP.upper__BSV +  1);
+    __tmp__JWV=TRUE__;
   } else {
-    __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;
+    __tmp__JWV=FALSE__;
+  };
+  if ((! __tmp__JWV)) {
+    if ((Self__YVV->parent_arrayed_collection__NRP.capacity__2VV ==  0)) {
+      Self__YVV->parent_arrayed_collection__NRP.storage__XWV=create__WHRB( 2);
+      Self__YVV->parent_arrayed_collection__NRP.capacity__2VV= 2;
+      Self__YVV->parent_arrayed_collection__NRP.upper__BSV= 0;
+    } else {
+      new_capacity__0VV=(__INTEGER)(Self__YVV->parent_arrayed_collection__NRP.capacity__2VV <<  1);
+      __tmp__AXV=Self__YVV->parent_arrayed_collection__NRP.storage__XWV;
+      __tmp__BXV=Self__YVV->parent_arrayed_collection__NRP.capacity__2VV;
+      new__2IEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__AXV)),((__UINTEGER_32 )(__INTEGER)(__tmp__BXV * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__0VV * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__QJEC=(__INTEGER)(new_capacity__0VV -  1);
+      Self__RNVD=__tmp__BXV;
+      while ((Self__RNVD <= __tmp__QJEC)) {
+        new__2IEC[Self__RNVD]=NULL;
+        Self__RNVD=(__INTEGER)(Self__RNVD +  1);
+      };
+      Self__YVV->parent_arrayed_collection__NRP.storage__XWV=new__2IEC;
+      Self__YVV->parent_arrayed_collection__NRP.capacity__2VV=new_capacity__0VV;
+      Self__YVV->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(Self__YVV->parent_arrayed_collection__NRP.upper__BSV +  1);
+    };
+  };
+  ((void **)Self__YVV->parent_arrayed_collection__NRP.storage__XWV)[Self__YVV->parent_arrayed_collection__NRP.upper__BSV]=tmp__CKQ;
 }
 
-static __INTEGER hash_code__BKRF(__FAST_ARRAYoSTRING_CONSTANTo *Self__CKRF)
+static __INTEGER hash_code__MORF(__FAST_ARRAYoSTRING_CONSTANTo *Self__NORF)
 // ({FAST_ARRAYoSTRING_CONSTANTo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER result__PORF,result__ADIH,__tmp__CDIH,Self__DDIH;
+  __INTEGER result__FDIH,__tmp__HDIH,Self__IDIH;
+  __STRING_CONSTANT *Self__BDIH,*Self__GDIH;
+  __BOOLEAN __tmp__APRF;
+  result__PORF= 0;
+  if ((! (Self__NORF->parent_arrayed_collection__U3I.upper__H4OD <  0))) {
+    if (((void *)((void **)Self__NORF->parent_arrayed_collection__U3I.storage__3APD)[Self__NORF->parent_arrayed_collection__U3I.upper__H4OD] != (void *)NULL)) {
+      Self__BDIH=((__STRING_CONSTANT *)((void **)Self__NORF->parent_arrayed_collection__U3I.storage__3APD)[Self__NORF->parent_arrayed_collection__U3I.upper__H4OD]);
+      result__ADIH= 0;
+      __tmp__CDIH=Self__BDIH->count__DD;
+      Self__DDIH= 1;
+      while ((Self__DDIH <= __tmp__CDIH)) {
+        result__ADIH=(__INTEGER)((__INTEGER)( 5 * result__ADIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__BDIH->storage__ZNO)[(__INTEGER)(Self__DDIH -  1)])));
+        Self__DDIH=(__INTEGER)(Self__DDIH +  1);
+      };
+      if ((result__ADIH <  0)) {
+        result__ADIH=(__INTEGER)(~ result__ADIH);
+      };
+      result__PORF=result__ADIH;
+      __tmp__APRF=TRUE__;
+    } else {
+      __tmp__APRF=FALSE__;
+    };
+    if ((! __tmp__APRF)) {
+      if (((void *)((void **)Self__NORF->parent_arrayed_collection__U3I.storage__3APD)[ 0] != (void *)NULL)) {
+        Self__GDIH=((__STRING_CONSTANT *)((void **)Self__NORF->parent_arrayed_collection__U3I.storage__3APD)[ 0]);
+        result__FDIH= 0;
+        __tmp__HDIH=Self__GDIH->count__DD;
+        Self__IDIH= 1;
+        while ((Self__IDIH <= __tmp__HDIH)) {
+          result__FDIH=(__INTEGER)((__INTEGER)( 5 * result__FDIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__GDIH->storage__ZNO)[(__INTEGER)(Self__IDIH -  1)])));
+          Self__IDIH=(__INTEGER)(Self__IDIH +  1);
+        };
+        if ((result__FDIH <  0)) {
+          result__FDIH=(__INTEGER)(~ result__FDIH);
+        };
+        result__PORF=result__FDIH;
+      };
+    };
+  };
+  return(result__PORF);
 }
 
-static void copy__W1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__X1RD,void *other__Y1RD)
+static void copy__Q1RD(__FAST_ARRAYoSTRING_CONSTANTo *Self__R1RD,void *other__S1RD)
 // ({FAST_ARRAYoSTRING_CONSTANTo},{NULLxFAST_ARRAYoSTRING_CONSTANTo}) VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER new_capacity__U1RD,other_upper__T1RD,Self__IIYE;
+  void **__tmp__H2RD,**__tmp__J2RD,**Self__OIWE;
+  new_capacity__U1RD= 0;
+  other_upper__T1RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__S1RD)->parent_arrayed_collection__U3I.upper__H4OD;
+  if ((other_upper__T1RD >=  0)) {
+    new_capacity__U1RD=(__INTEGER)(other_upper__T1RD +  1);
+    if ((Self__R1RD->parent_arrayed_collection__U3I.capacity__CAPD < new_capacity__U1RD)) {
+      Self__R1RD->parent_arrayed_collection__U3I.storage__3APD=create__TIHE(new_capacity__U1RD);
+      Self__R1RD->parent_arrayed_collection__U3I.capacity__CAPD=new_capacity__U1RD;
+    };
+    __tmp__H2RD=Self__R1RD->parent_arrayed_collection__U3I.storage__3APD;
+    __tmp__J2RD=((__FAST_ARRAYoSTRING_CONSTANTo *)other__S1RD)->parent_arrayed_collection__U3I.storage__3APD;
+    Self__OIWE=((void **)__tmp__H2RD);
+    Self__IIYE=other_upper__T1RD;
+    while ((Self__IIYE >=  0)) {
+      Self__OIWE[Self__IIYE]=((void **)__tmp__J2RD)[Self__IIYE];
+      Self__IIYE=(__INTEGER)(Self__IIYE -  1);
+    };
+  };
+  Self__R1RD->parent_arrayed_collection__U3I.upper__H4OD=other_upper__T1RD;
 }
 
-static __BOOLEAN read_operator__FJM()
+static __BOOLEAN read_operator__OKM()
 // () With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER old_pos__SKM,__tmp__3NO,i__X1O;
+  __POSITION pos__PKZG;
+  __BOOLEAN result__RKM,__tmp__NLM;
+  __CHARACTER result__BDBH,result__KDBH,ch__XNO,result__PDBH;
+  __CHARACTER *__tmp__0NO,*Self__L1O;
+  result__RKM=FALSE__;
   read_space__KSD();
-  old_pos__JJM=position__CCC;
+  old_pos__SKM=position__CCC;
   ((__STRING *)string_tmp__VH)->count__EGC= 0;
-  until_do__WUM:
+  until_do__5VM:
   {
-    result__Y4AH='\0';
+    result__BDBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__Y4AH=((__CHARACTER )(( 0)));
+      result__BDBH=((__CHARACTER )(( 0)));
     } else {
-      result__Y4AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__BDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__Y4AH == ((__CHARACTER )(( 0))))) {
-      __tmp__EKM=TRUE__;
+    if ((result__BDBH == ((__CHARACTER )(( 0))))) {
+      __tmp__NLM=TRUE__;
     } else {
-      result__B5AH='\0';
+      result__KDBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__B5AH=((__CHARACTER )(( 0)));
+        result__KDBH=((__CHARACTER )(( 0)));
       } else {
-        result__B5AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__KDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  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);
+      ch__XNO=result__KDBH;
+      __tmp__0NO=((__STRING_CONSTANT *)(&__string_316))->storage__ZNO;
+      __tmp__3NO=(__INTEGER)(((__STRING_CONSTANT *)(&__string_316))->count__DD -  1);
+      Self__L1O=((__CHARACTER *)__tmp__0NO);
+      i__X1O=__tmp__3NO;
+      while ((! ((i__X1O <  0) || (ch__XNO == Self__L1O[i__X1O])))) {
+        i__X1O=(__INTEGER)(i__X1O -  1);
       };
-      __tmp__EKM=(i__O0O <  0);
+      __tmp__NLM=(i__X1O <  0);
     };
-    if ((! __tmp__EKM)) {
-      result__G5AH='\0';
+    if ((! __tmp__NLM)) {
+      result__PDBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__G5AH=((__CHARACTER )(( 0)));
+        result__PDBH=((__CHARACTER )(( 0)));
       } else {
-        result__G5AH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__PDBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      add_last__UHT(string_tmp__VH,result__G5AH);
+      add_last__3IT(string_tmp__VH,result__PDBH);
       position__CCC=(__INTEGER)(position__CCC +  1);
-      goto until_do__WUM;
+      goto until_do__5VM;
     };
   };
   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)) {
+      pos__PKZG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_286));
+      put_position__LNG(pos__PKZG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    short__token__to__YBD((&__string_124),old_pos__JJM,position__CCC);
-    result__IJM=TRUE__;
+    short__token__to__YBD((&__string_124),old_pos__SKM,position__CCC);
+    result__RKM=TRUE__;
   };
-  return(result__IJM);
+  return(result__RKM);
 }
 
-static void* operator__name__Y5N(void *typ__05N,void *op__15N)
+static void* operator__name__BBO(void *typ__DBO,void *op__EBO)
 // ({STRING_CONSTANT},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER __tmp__LBO,Self__STO;
+  __CHARACTER c__GBO;
+  __BOOLEAN __tmp__ZBO,__tmp__GCO,result__BNHB,__tmp__TCO,result__TNHB;
+  __BOOLEAN __tmp__ADO,result__FOHB,__tmp__NDO,result__XOHB,__tmp__0DO;
+  __BOOLEAN result__JPHB,__tmp__HEO,result__1PHB,__tmp__UEO;
+  __BOOLEAN result__NQHB,__tmp__BFO,result__5QHB,__tmp__OFO;
+  __BOOLEAN result__RRHB,__tmp__1FO,result__DSHB,__tmp__IGO;
+  __BOOLEAN result__VSHB,__tmp__VGO,result__HTHB,__tmp__CHO;
+  __BOOLEAN result__ZTHB,__tmp__PHO,result__LUHB,__tmp__2HO;
+  __BOOLEAN result__3UHB,__tmp__JIO,result__PVHB;
+  c__GBO='\0';
+  copy__35R(string_tmp__VH,typ__DBO);
+  __tmp__LBO=((__STRING_CONSTANT *)op__EBO)->count__DD;
+  Self__STO= 1;
+  while ((Self__STO <= __tmp__LBO)) {
+    c__GBO=((__CHARACTER *)((__STRING_CONSTANT *)op__EBO)->storage__ZNO)[(__INTEGER)(Self__STO -  1)];
+    if ((c__GBO == '+')) {
+      append__FLS(string_tmp__VH,(&__string_188));
+      __tmp__ZBO=TRUE__;
     } else {
-      __tmp__QAO=FALSE__;
+      __tmp__ZBO=FALSE__;
     };
-    if (__tmp__QAO) {
-      __tmp__3AO=TRUE__;
+    if (__tmp__ZBO) {
+      __tmp__GCO=TRUE__;
     } else {
-      result__XLHB=(c__35N == '-');
-      if (result__XLHB) {
-        append__2JS(string_tmp__VH,(&__string_189));
+      result__BNHB=(c__GBO == '-');
+      if (result__BNHB) {
+        append__FLS(string_tmp__VH,(&__string_189));
       };
-      __tmp__3AO=result__XLHB;
+      __tmp__GCO=result__BNHB;
     };
-    if (__tmp__3AO) {
-      __tmp__KBO=TRUE__;
+    if (__tmp__GCO) {
+      __tmp__TCO=TRUE__;
     } else {
-      result__JMHB=(c__35N == '~');
-      if (result__JMHB) {
-        append__2JS(string_tmp__VH,(&__string_190));
+      result__TNHB=(c__GBO == '~');
+      if (result__TNHB) {
+        append__FLS(string_tmp__VH,(&__string_190));
       };
-      __tmp__KBO=result__JMHB;
+      __tmp__TCO=result__TNHB;
     };
-    if (__tmp__KBO) {
-      __tmp__XBO=TRUE__;
+    if (__tmp__TCO) {
+      __tmp__ADO=TRUE__;
     } else {
-      result__1MHB=(c__35N == '!');
-      if (result__1MHB) {
-        append__2JS(string_tmp__VH,(&__string_191));
+      result__FOHB=(c__GBO == '!');
+      if (result__FOHB) {
+        append__FLS(string_tmp__VH,(&__string_191));
       };
-      __tmp__XBO=result__1MHB;
+      __tmp__ADO=result__FOHB;
     };
-    if (__tmp__XBO) {
-      __tmp__ECO=TRUE__;
+    if (__tmp__ADO) {
+      __tmp__NDO=TRUE__;
     } else {
-      result__NNHB=(c__35N == '/');
-      if (result__NNHB) {
-        append__2JS(string_tmp__VH,(&__string_192));
+      result__XOHB=(c__GBO == '/');
+      if (result__XOHB) {
+        append__FLS(string_tmp__VH,(&__string_192));
       };
-      __tmp__ECO=result__NNHB;
+      __tmp__NDO=result__XOHB;
     };
-    if (__tmp__ECO) {
-      __tmp__RCO=TRUE__;
+    if (__tmp__NDO) {
+      __tmp__0DO=TRUE__;
     } else {
-      result__5NHB=(c__35N == '*');
-      if (result__5NHB) {
-        append__2JS(string_tmp__VH,(&__string_193));
+      result__JPHB=(c__GBO == '*');
+      if (result__JPHB) {
+        append__FLS(string_tmp__VH,(&__string_193));
       };
-      __tmp__RCO=result__5NHB;
+      __tmp__0DO=result__JPHB;
     };
-    if (__tmp__RCO) {
-      __tmp__4CO=TRUE__;
+    if (__tmp__0DO) {
+      __tmp__HEO=TRUE__;
     } else {
-      result__ROHB=(c__35N == '^');
-      if (result__ROHB) {
-        append__2JS(string_tmp__VH,(&__string_194));
+      result__1PHB=(c__GBO == '^');
+      if (result__1PHB) {
+        append__FLS(string_tmp__VH,(&__string_194));
       };
-      __tmp__4CO=result__ROHB;
+      __tmp__HEO=result__1PHB;
     };
-    if (__tmp__4CO) {
-      __tmp__LDO=TRUE__;
+    if (__tmp__HEO) {
+      __tmp__UEO=TRUE__;
     } else {
-      result__DPHB=(c__35N == '%');
-      if (result__DPHB) {
-        append__2JS(string_tmp__VH,(&__string_195));
+      result__NQHB=(c__GBO == '%');
+      if (result__NQHB) {
+        append__FLS(string_tmp__VH,(&__string_195));
       };
-      __tmp__LDO=result__DPHB;
+      __tmp__UEO=result__NQHB;
     };
-    if (__tmp__LDO) {
-      __tmp__YDO=TRUE__;
+    if (__tmp__UEO) {
+      __tmp__BFO=TRUE__;
     } else {
-      result__VPHB=(c__35N == '>');
-      if (result__VPHB) {
-        append__2JS(string_tmp__VH,(&__string_196));
+      result__5QHB=(c__GBO == '>');
+      if (result__5QHB) {
+        append__FLS(string_tmp__VH,(&__string_196));
       };
-      __tmp__YDO=result__VPHB;
+      __tmp__BFO=result__5QHB;
     };
-    if (__tmp__YDO) {
-      __tmp__FEO=TRUE__;
+    if (__tmp__BFO) {
+      __tmp__OFO=TRUE__;
     } else {
-      result__HQHB=(c__35N == '<');
-      if (result__HQHB) {
-        append__2JS(string_tmp__VH,(&__string_197));
+      result__RRHB=(c__GBO == '<');
+      if (result__RRHB) {
+        append__FLS(string_tmp__VH,(&__string_197));
       };
-      __tmp__FEO=result__HQHB;
+      __tmp__OFO=result__RRHB;
     };
-    if (__tmp__FEO) {
-      __tmp__SEO=TRUE__;
+    if (__tmp__OFO) {
+      __tmp__1FO=TRUE__;
     } else {
-      result__ZQHB=(c__35N == '=');
-      if (result__ZQHB) {
-        append__2JS(string_tmp__VH,(&__string_198));
+      result__DSHB=(c__GBO == '=');
+      if (result__DSHB) {
+        append__FLS(string_tmp__VH,(&__string_198));
       };
-      __tmp__SEO=result__ZQHB;
+      __tmp__1FO=result__DSHB;
     };
-    if (__tmp__SEO) {
-      __tmp__5EO=TRUE__;
+    if (__tmp__1FO) {
+      __tmp__IGO=TRUE__;
     } else {
-      result__LRHB=(c__35N == '\\');
-      if (result__LRHB) {
-        append__2JS(string_tmp__VH,(&__string_199));
+      result__VSHB=(c__GBO == '\\');
+      if (result__VSHB) {
+        append__FLS(string_tmp__VH,(&__string_199));
       };
-      __tmp__5EO=result__LRHB;
+      __tmp__IGO=result__VSHB;
     };
-    if (__tmp__5EO) {
-      __tmp__MFO=TRUE__;
+    if (__tmp__IGO) {
+      __tmp__VGO=TRUE__;
     } else {
-      result__3RHB=(c__35N == '|');
-      if (result__3RHB) {
-        append__2JS(string_tmp__VH,(&__string_200));
+      result__HTHB=(c__GBO == '|');
+      if (result__HTHB) {
+        append__FLS(string_tmp__VH,(&__string_200));
       };
-      __tmp__MFO=result__3RHB;
+      __tmp__VGO=result__HTHB;
     };
-    if (__tmp__MFO) {
-      __tmp__ZFO=TRUE__;
+    if (__tmp__VGO) {
+      __tmp__CHO=TRUE__;
     } else {
-      result__PSHB=(c__35N == '&');
-      if (result__PSHB) {
-        append__2JS(string_tmp__VH,(&__string_201));
+      result__ZTHB=(c__GBO == '&');
+      if (result__ZTHB) {
+        append__FLS(string_tmp__VH,(&__string_201));
       };
-      __tmp__ZFO=result__PSHB;
+      __tmp__CHO=result__ZTHB;
     };
-    if (__tmp__ZFO) {
-      __tmp__GGO=TRUE__;
+    if (__tmp__CHO) {
+      __tmp__PHO=TRUE__;
     } else {
-      result__BTHB=(c__35N == '$');
-      if (result__BTHB) {
-        append__2JS(string_tmp__VH,(&__string_202));
+      result__LUHB=(c__GBO == '$');
+      if (result__LUHB) {
+        append__FLS(string_tmp__VH,(&__string_202));
       };
-      __tmp__GGO=result__BTHB;
+      __tmp__PHO=result__LUHB;
     };
-    if (__tmp__GGO) {
-      __tmp__TGO=TRUE__;
+    if (__tmp__PHO) {
+      __tmp__2HO=TRUE__;
     } else {
-      result__TTHB=(c__35N == '#');
-      if (result__TTHB) {
-        append__2JS(string_tmp__VH,(&__string_203));
+      result__3UHB=(c__GBO == '#');
+      if (result__3UHB) {
+        append__FLS(string_tmp__VH,(&__string_203));
       };
-      __tmp__TGO=result__TTHB;
+      __tmp__2HO=result__3UHB;
     };
-    if (__tmp__TGO) {
-      __tmp__AHO=TRUE__;
+    if (__tmp__2HO) {
+      __tmp__JIO=TRUE__;
     } else {
-      result__FUHB=(c__35N == '@');
-      if (result__FUHB) {
-        append__2JS(string_tmp__VH,(&__string_204));
+      result__PVHB=(c__GBO == '@');
+      if (result__PVHB) {
+        append__FLS(string_tmp__VH,(&__string_204));
       };
-      __tmp__AHO=result__FUHB;
+      __tmp__JIO=result__PVHB;
     };
-    if ((! __tmp__AHO)) {
-      if ((c__35N == '?')) {
-        append__2JS(string_tmp__VH,(&__string_205));
+    if ((! __tmp__JIO)) {
+      if ((c__GBO == '?')) {
+        append__FLS(string_tmp__VH,(&__string_205));
       };
     };
-    Self__JSO=(__INTEGER)(Self__JSO +  1);
+    Self__STO=(__INTEGER)(Self__STO +  1);
   };
   return(get__YWB(string_tmp__VH));
 }
 
-static void append_in__BGBC(__ITM_TYPE_MULTI *Self__CGBC,void *buffer__DGBC)
+static void append_in__NHBC(__ITM_TYPE_MULTI *Self__OHBC,void *buffer__PHBC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  add_last__UHT(buffer__DGBC,'(');
-  display_raw__ZJIC(Self__CGBC,buffer__DGBC);
-  add_last__UHT(buffer__DGBC,')');
+  add_last__3IT(buffer__PHBC,'(');
+  display_raw__NLIC(Self__OHBC,buffer__PHBC);
+  add_last__3IT(buffer__PHBC,')');
 }
 
-static void* read_prototype__CKN(__PARSER *Self__DKN,void *styl__EKN)
+static void* read_prototype__LLN(__PARSER *Self__MLN,void *styl__NLN)
 // ({PARSER},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *nam__PLN,*n__QUP,*n__ALR;
+  void *result__RLN,*result__SRQ;
+  __INTEGER old_pos__TLN,old_derive__ULN,sav_derive__VLN;
+  __INTEGER pos_before__WLN,idx__VUP,typ_id__YLIB,new_capacity__DDBB;
+  __INTEGER __tmp__HEBB,__tmp__POFC,Self__G0VD,typ_id__MDIH,idx__ELR;
+  __INTEGER typ_id__D3IB,new_capacity__KBCB,__tmp__OCCB,__tmp__LSFC;
+  __INTEGER Self__F2VD;
+  __POSITION pos__ULZG,pos__WLZG,pos__YLZG,pos__0LZG,pos__ZNZG;
+  __POSITION __tmp__GQN,__tmp__IRN;
+  __ITM_TYPE_GENERIC *result__UUP,*__tmp__3WP,*result__SLIB,*Self__O1CC;
+  void *__tmp__2WP;
+  __POINTER ptr__TLIB,ptr_table__00JH,next__Z0JH,result__10JH;
+  __POINTER ptr_table__50JH,next__40JH,result__A1JH,ptr__LDIH;
+  __POINTER ptr_table__H1JH,next__G1JH,result__I1JH,ptr_table__M1JH;
+  __POINTER next__L1JH,result__N1JH,ptr__42IB,ptr_table__R1JH;
+  __POINTER next__Q1JH,result__S1JH,ptr_table__W1JH,next__V1JH;
+  __POINTER result__X1JH;
+  __UINTEGER_32 sz__VLIB,a__VSGH,new_size__WSGH,t__0SGH,a__ZSGH;
+  __UINTEGER_32 new_size__C1JH,lab_type__B1JH,sz__NDIH,a__ODIH;
+  __UINTEGER_32 new_size__PDIH,t__QDIH,a__RDIH,new_size__P1JH;
+  __UINTEGER_32 lab_type__O1JH,sz__A3IB,a__DTGH,new_size__ETGH,t__ITGH;
+  __UINTEGER_32 a__HTGH,new_size__Z1JH,lab_type__Y1JH;
+  void *result__PPEH;
+  __ITM_TYPE_PARAMETER *result__KDIH,*Self__SDIH;
+  __ITM_TYPE_STYLE *result__DLR,*__tmp__5MR,*result__32IB,*Self__A5CC;
+  void *__tmp__4MR;
+  void *genericity__QLN,*result__1RHH,*lt__SUP;
+  __BOOLEAN continue__XLN,result__Q0JH,result__T0JH,__tmp__ESQ;
+  __BOOLEAN result__W0JH,__tmp__RDBB,result__D1JH,__tmp__NQN;
+  __BOOLEAN __tmp__YBCB;
+  __CHARACTER result__R0JH,result__U0JH,result__X0JH,result__E1JH;
+  __FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *Self__2RHH,*Self__3RHH;
+  __FAST_ARRAYoITM_TYPE_GENERICo *Self__BDBB;
+  void **__tmp__GEBB,**new__1NFC;
+  __FAST_ARRAYoITM_TYPE_STYLEo *Self__IBCB;
+  void **__tmp__NCCB,**new__XRFC;
+  nam__PLN=NULL;
+  genericity__QLN=NULL;
+  result__RLN=NULL;
+  old_pos__TLN= 0;
+  old_derive__ULN= 0;
+  sav_derive__VLN= 0;
+  pos_before__WLN= 0;
+  continue__XLN=FALSE__;
+  if (read_cap_identifier__VXJ()) {
+    old_pos__TLN=position__CCC;
+    old_derive__ULN=short_derive__PCC;
+    copy__35R(string_tmp2__O4I,last_string__V0C);
     do {
-      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)) {
+      continue__XLN=read_word__HOF((&__string_7));
+      if (continue__XLN) {
+        if ((! read_cap_identifier__VXJ())) {
+          pos__ULZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_317));
+          put_position__LNG(pos__ULZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        append__2JS(string_tmp2__F3I,(&__string_7));
-        append__2JS(string_tmp2__F3I,last_string__V0C);
+        append__FLS(string_tmp2__O4I,(&__string_7));
+        append__FLS(string_tmp2__O4I,last_string__V0C);
       } else {
-        pos_before__NKN=position__CCC;
-        result__HWJH=FALSE__;
+        pos_before__WLN=position__CCC;
+        result__Q0JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__HWJH=FALSE__;
+          result__Q0JH=FALSE__;
         } else {
-          result__IWJH='\0';
+          result__R0JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__IWJH=((__CHARACTER )(( 0)));
+            result__R0JH=((__CHARACTER )(( 0)));
           } else {
-            result__IWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__R0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__IWJH == '.')) {
+          if ((result__R0JH == '.')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__HWJH=TRUE__;
+            result__Q0JH=TRUE__;
           };
         };
-        if ((result__HWJH && read_cap_identifier__MWJ())) {
-          continue__OKN=TRUE__;
-          add_last__UHT(string_tmp2__F3I,'.');
-          append__2JS(string_tmp2__F3I,last_string__V0C);
+        if ((result__Q0JH && read_cap_identifier__VXJ())) {
+          continue__XLN=TRUE__;
+          add_last__3IT(string_tmp2__O4I,'.');
+          append__FLS(string_tmp2__O4I,last_string__V0C);
         } else {
-          position__CCC=pos_before__NKN;
+          position__CCC=pos_before__WLN;
         };
       };
-    } while (continue__OKN);
-    nam__GKN=get__YWB(string_tmp2__F3I);
-    result__KWJH=FALSE__;
+    } while (continue__XLN);
+    nam__PLN=get__YWB(string_tmp2__O4I);
+    result__T0JH=FALSE__;
     if ((! read_space__KSD())) {
-      result__KWJH=FALSE__;
+      result__T0JH=FALSE__;
     } else {
-      result__LWJH='\0';
+      result__U0JH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__LWJH=((__CHARACTER )(( 0)));
+        result__U0JH=((__CHARACTER )(( 0)));
       } else {
-        result__LWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__U0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__LWJH == '(')) {
+      if ((result__U0JH == '(')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__KWJH=TRUE__;
+        result__T0JH=TRUE__;
       };
     };
-    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);
+    if (result__T0JH) {
+      result__1RHH=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP)->parent_arrayed_collection__NRP.upper__BSV <  0)) {
+        result__1RHH=create_with_capacity__MCR( 16);
       } else {
-        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);
+        Self__2RHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+        result__1RHH=((void **)Self__2RHH->parent_arrayed_collection__NRP.storage__XWV)[Self__2RHH->parent_arrayed_collection__NRP.upper__BSV];
+        Self__3RHH=((__FAST_ARRAYoFAST_ARRAYoITM_TYPE_MONOoo *)free_list__ORP);
+        Self__3RHH->parent_arrayed_collection__NRP.upper__BSV=(__INTEGER)(Self__3RHH->parent_arrayed_collection__NRP.upper__BSV -  1);
       };
-      genericity__HKN=result__SNHH;
+      genericity__QLN=result__1RHH;
       do {
-        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)) {
+        result__SRQ=read_type__K5L(Self__MLN,FALSE__);
+        if (((void *)result__SRQ == (void *)NULL)) {
+          if (((void *)read_constant__5NO() != (void *)NULL)) {
+            pos__WLZG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_318));
+            put_position__LNG(pos__WLZG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
-            __tmp__1QQ=TRUE__;
+            __tmp__ESQ=TRUE__;
           } else {
-            __tmp__1QQ=FALSE__;
+            __tmp__ESQ=FALSE__;
           };
-          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)) {
+          if ((! __tmp__ESQ)) {
+            if (read_identifier__E4K()) {
+              pos__YLZG=current_position__AWF();
+              put_error__text__BMG( 0,(&__string_319));
+              put_position__LNG(pos__YLZG);
+              put_string__L0F(msg_err__GMG);
+              if ((type_error__FMG !=  2)) {
                 exit(( 1));
               };
             };
           };
         };
-        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)) {
+        if (((void *)result__SRQ == (void *)NULL)) {
+          pos__0LZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_259));
+          put_position__LNG(pos__0LZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__NJV(genericity__HKN,result__JQQ);
-        result__NWJH=FALSE__;
+        add_last__WKV(genericity__QLN,result__SRQ);
+        result__W0JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__NWJH=FALSE__;
+          result__W0JH=FALSE__;
         } else {
-          result__OWJH='\0';
+          result__X0JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__OWJH=((__CHARACTER )(( 0)));
+            result__X0JH=((__CHARACTER )(( 0)));
           } else {
-            result__OWJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__X0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__OWJH == ',')) {
+          if ((result__X0JH == ',')) {
             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;
+            result__W0JH=TRUE__;
+          };
+        };
+      } while (result__W0JH);
+      genericity__QLN=alias__KSP(result__1RHH);
+      n__QUP=nam__PLN;
+      lt__SUP=genericity__QLN;
+      result__UUP=NULL;
+      idx__VUP= 0;
+      while (((idx__VUP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.upper__EVP) && ((((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.storage__04V)[idx__VUP])->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP != (void *)n__QUP) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.storage__04V)[idx__VUP])->parent_itm_type_style__GPN.style__XVP != (void *)styl__NLN)) || ((void *)((__ITM_TYPE_GENERIC *)((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.storage__04V)[idx__VUP])->list_type__BWP != (void *)lt__SUP)))) {
+        idx__VUP=(__INTEGER)(idx__VUP +  1);
+      };
+      if ((idx__VUP <= ((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.upper__EVP)) {
+        __tmp__2WP=((void **)((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP)->parent_arrayed_collection__0UP.storage__04V)[idx__VUP];
+        if (__tmp__2WP==NULL) {
+          __tmp__3WP=NULL;
+        } else {
+          __tmp__3WP=((__ITM_TYPE_GENERIC *)__tmp__2WP);
+        };
+        result__UUP=__tmp__3WP;
+      } else {
+        result__SLIB=NULL;
+        ptr__TLIB=((__POINTER )(NULL));
+        typ_id__YLIB= 0;
+        sz__VLIB=((__UINTEGER_32 )sizeof(__ITM_TYPE_GENERIC));
+        if ((sz__VLIB ==  0)) {
+          result__SLIB=ITM_TYPE_GENERIC__;
+        } else {
+          typ_id__YLIB=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__VLIB);
+          if ((typ_id__YLIB == (__INTEGER)(-  1))) {
+            a__VSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WSGH=(__UINTEGER_32)((__UINTEGER_32)(sz__VLIB + a__VSGH) & (__UINTEGER_32)(~ a__VSGH));
+            ptr_table__00JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WSGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__Z0JH=((__POINTER )(NULL));
+            result__10JH=((__POINTER *)ptr_table__00JH)[ 0];
+            if ((result__10JH == (void *)NULL)) {
+              result__10JH=new_lab__ZPJ(new_size__WSGH);
+              next__Z0JH=(void *)((unsigned long)result__10JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WSGH)));
+              ((__POINTER *)next__Z0JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
             } else {
-              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)));
+              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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WSGH <<  1)) <=  4096)) {
+                  next__Z0JH=(void *)((unsigned long)result__10JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WSGH)));
                 } else {
-                  next__QWJH=new_lab__QOJ(new_size__NOGH);
+                  next__Z0JH=new_lab__ZPJ(new_size__WSGH);
                 };
-                ((__POINTER *)next__QWJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__RWJH)[ 0]=next__QWJH;
+                ((__POINTER *)next__Z0JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
               } else {
-                ((__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;
+                ((__POINTER *)result__10JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__10JH=next__Z0JH;
+              };
+            };
+            ptr__TLIB=result__10JH;
+          } else {
+            t__0SGH=((__UINTEGER_32 )typ_id__YLIB);
+            a__ZSGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__C1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__VLIB + a__ZSGH) & (__UINTEGER_32)(~ a__ZSGH));
+            ptr_table__50JH=((__POINTER )(&(table_type[(t__0SGH)])));
+            lab_type__B1JH=(__UINTEGER_32)(t__0SGH |  1);
+            next__40JH=((__POINTER )(NULL));
+            result__A1JH=((__POINTER *)ptr_table__50JH)[ 0];
+            if ((result__A1JH == (void *)NULL)) {
+              result__A1JH=new_lab__ZPJ(lab_type__B1JH);
+              next__40JH=(void *)((unsigned long)result__A1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C1JH)));
+              ((__POINTER *)next__40JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__50JH)[ 0]=next__40JH;
             } else {
-              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)));
+              next__40JH=((__POINTER *)result__A1JH)[ 0];
+              if ((next__40JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A1JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__C1JH <<  1)) <=  4096)) {
+                  next__40JH=(void *)((unsigned long)result__A1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C1JH)));
                 } else {
-                  next__VWJH=new_lab__QOJ(lab_type__YWJH);
+                  next__40JH=new_lab__ZPJ(lab_type__B1JH);
                 };
-                ((__POINTER *)next__VWJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__WWJH)[ 0]=next__VWJH;
+                ((__POINTER *)next__40JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__50JH)[ 0]=next__40JH;
               } else {
-                ((__POINTER *)result__XWJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VWJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__XWJH=next__VWJH;
+                ((__POINTER *)result__A1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__40JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__A1JH=next__40JH;
               };
             };
-            ptr__JKIB=result__XWJH;
+            ptr__TLIB=result__A1JH;
           };
-          result__IKIB=((__ITM_TYPE_GENERIC *)ptr__JKIB);
-          *(result__IKIB) = *(ITM_TYPE_GENERIC__);
+          result__SLIB=((__ITM_TYPE_GENERIC *)ptr__TLIB);
+          *(result__SLIB) = *(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__;
+        Self__O1CC=((__ITM_TYPE_GENERIC *)result__SLIB);
+        Self__O1CC->parent_itm_type_style__GPN.parent_itm_type_simple__FPN.name__OVP=nam__PLN;
+        Self__O1CC->parent_itm_type_style__GPN.style__XVP=styl__NLN;
+        Self__O1CC->list_type__BWP=genericity__QLN;
+        result__UUP=result__SLIB;
+        Self__BDBB=((__FAST_ARRAYoITM_TYPE_GENERICo *)dico__1UP);
+        new_capacity__DDBB= 0;
+        if (((__INTEGER)(Self__BDBB->parent_arrayed_collection__0UP.upper__EVP +  1) <= (__INTEGER)(Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V -  1))) {
+          Self__BDBB->parent_arrayed_collection__0UP.upper__EVP=(__INTEGER)(Self__BDBB->parent_arrayed_collection__0UP.upper__EVP +  1);
+          __tmp__RDBB=TRUE__;
         } else {
-          __tmp__ICBB=FALSE__;
+          __tmp__RDBB=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;
+        if ((! __tmp__RDBB)) {
+          if ((Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V ==  0)) {
+            Self__BDBB->parent_arrayed_collection__0UP.storage__04V=create__QQXB( 2);
+            Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V= 2;
+            Self__BDBB->parent_arrayed_collection__0UP.upper__EVP= 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);
+            new_capacity__DDBB=(__INTEGER)(Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V <<  1);
+            __tmp__GEBB=Self__BDBB->parent_arrayed_collection__0UP.storage__04V;
+            __tmp__HEBB=Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V;
+            new__1NFC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__GEBB)),((__UINTEGER_32 )(__INTEGER)(__tmp__HEBB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__DDBB * ((__INTEGER )(sizeof(void *)))))));
+            __tmp__POFC=(__INTEGER)(new_capacity__DDBB -  1);
+            Self__G0VD=__tmp__HEBB;
+            while ((Self__G0VD <= __tmp__POFC)) {
+              new__1NFC[Self__G0VD]=NULL;
+              Self__G0VD=(__INTEGER)(Self__G0VD +  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);
+            Self__BDBB->parent_arrayed_collection__0UP.storage__04V=new__1NFC;
+            Self__BDBB->parent_arrayed_collection__0UP.capacity__P4V=new_capacity__DDBB;
+            Self__BDBB->parent_arrayed_collection__0UP.upper__EVP=(__INTEGER)(Self__BDBB->parent_arrayed_collection__0UP.upper__EVP +  1);
           };
         };
-        ((void **)Self__YBBB->parent_arrayed_collection__RTP.storage__R3V)[Self__YBBB->parent_arrayed_collection__RTP.upper__1TP]=result__IKIB;
+        ((void **)Self__BDBB->parent_arrayed_collection__0UP.storage__04V)[Self__BDBB->parent_arrayed_collection__0UP.upper__EVP]=result__SLIB;
       };
-      result__IKN=result__LTP;
-      result__0WJH=FALSE__;
+      result__RLN=result__UUP;
+      result__D1JH=FALSE__;
       if ((! read_space__KSD())) {
-        result__0WJH=FALSE__;
+        result__D1JH=FALSE__;
       } else {
-        result__1WJH='\0';
+        result__E1JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__1WJH=((__CHARACTER )(( 0)));
+          result__E1JH=((__CHARACTER )(( 0)));
         } else {
-          result__1WJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__E1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__1WJH == ')')) {
+        if ((result__E1JH == ')')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__0WJH=TRUE__;
+          result__D1JH=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)) {
+      if ((! result__D1JH)) {
+        pos__ZNZG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_262));
+        put_position__LNG(pos__ZNZG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     } else {
-      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)) {
+      if (is_parameter_type__5HE) {
+        if (((void *)styl__NLN != (void *)NULL)) {
+          copy__35R(string_tmp__VH,(&__string_320));
+          append__FLS(string_tmp__VH,styl__NLN);
+          append__FLS(string_tmp__VH,(&__string_321));
+          __tmp__GQN=current_position__AWF();
+          put_error__text__BMG( 2,string_tmp__VH);
+          put_position__LNG(__tmp__GQN);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        result__PPEH=fast_reference_at__2YT(dico__5RI,nam__PLN);
+        if (((void *)result__PPEH == (void *)NULL)) {
+          result__KDIH=NULL;
+          ptr__LDIH=((__POINTER )(NULL));
+          typ_id__MDIH= 0;
+          sz__NDIH=((__UINTEGER_32 )sizeof(__ITM_TYPE_PARAMETER));
+          if ((sz__NDIH ==  0)) {
+            result__KDIH=ITM_TYPE_PARAMETER__;
+          } else {
+            typ_id__MDIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__NDIH);
+            if ((typ_id__MDIH == (__INTEGER)(-  1))) {
+              a__ODIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__PDIH=(__UINTEGER_32)((__UINTEGER_32)(sz__NDIH + a__ODIH) & (__UINTEGER_32)(~ a__ODIH));
+              ptr_table__H1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__PDIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__G1JH=((__POINTER )(NULL));
+              result__I1JH=((__POINTER *)ptr_table__H1JH)[ 0];
+              if ((result__I1JH == (void *)NULL)) {
+                result__I1JH=new_lab__ZPJ(new_size__PDIH);
+                next__G1JH=(void *)((unsigned long)result__I1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PDIH)));
+                ((__POINTER *)next__G1JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__H1JH)[ 0]=next__G1JH;
               } else {
-                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)));
+                next__G1JH=((__POINTER *)result__I1JH)[ 0];
+                if ((next__G1JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__I1JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__PDIH <<  1)) <=  4096)) {
+                    next__G1JH=(void *)((unsigned long)result__I1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__PDIH)));
                   } else {
-                    next__3WJH=new_lab__QOJ(new_size__G5HH);
+                    next__G1JH=new_lab__ZPJ(new_size__PDIH);
                   };
-                  ((__POINTER *)next__3WJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__4WJH)[ 0]=next__3WJH;
+                  ((__POINTER *)next__G1JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__H1JH)[ 0]=next__G1JH;
                 } else {
-                  ((__POINTER *)result__5WJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3WJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__5WJH=next__3WJH;
+                  ((__POINTER *)result__I1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__I1JH=next__G1JH;
                 };
               };
-              ptr__C5HH=result__5WJH;
+              ptr__LDIH=result__I1JH;
             } else {
-              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;
+              t__QDIH=((__UINTEGER_32 )typ_id__MDIH);
+              a__RDIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__P1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__NDIH + a__RDIH) & (__UINTEGER_32)(~ a__RDIH));
+              ptr_table__M1JH=((__POINTER )(&(table_type[(t__QDIH)])));
+              lab_type__O1JH=(__UINTEGER_32)(t__QDIH |  1);
+              next__L1JH=((__POINTER )(NULL));
+              result__N1JH=((__POINTER *)ptr_table__M1JH)[ 0];
+              if ((result__N1JH == (void *)NULL)) {
+                result__N1JH=new_lab__ZPJ(lab_type__O1JH);
+                next__L1JH=(void *)((unsigned long)result__N1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1JH)));
+                ((__POINTER *)next__L1JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__M1JH)[ 0]=next__L1JH;
               } else {
-                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)));
+                next__L1JH=((__POINTER *)result__N1JH)[ 0];
+                if ((next__L1JH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__N1JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P1JH <<  1)) <=  4096)) {
+                    next__L1JH=(void *)((unsigned long)result__N1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P1JH)));
                   } else {
-                    next__CXJH=new_lab__QOJ(lab_type__FXJH);
+                    next__L1JH=new_lab__ZPJ(lab_type__O1JH);
                   };
-                  ((__POINTER *)next__CXJH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DXJH)[ 0]=next__CXJH;
+                  ((__POINTER *)next__L1JH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__M1JH)[ 0]=next__L1JH;
                 } else {
-                  ((__POINTER *)result__EXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__EXJH=next__CXJH;
+                  ((__POINTER *)result__N1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__N1JH=next__L1JH;
                 };
               };
-              ptr__C5HH=result__EXJH;
+              ptr__LDIH=result__N1JH;
             };
-            result__B5HH=((__ITM_TYPE_PARAMETER *)ptr__C5HH);
-            *(result__B5HH) = *(ITM_TYPE_PARAMETER__);
+            result__KDIH=((__ITM_TYPE_PARAMETER *)ptr__LDIH);
+            *(result__KDIH) = *(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;
+          Self__SDIH=((__ITM_TYPE_PARAMETER *)result__KDIH);
+          Self__SDIH->parent_itm_type__UBE.name__OVP=nam__PLN;
+          fast_put__to__PLZ(dico__5RI,Self__SDIH,nam__PLN);
+          result__PPEH=result__KDIH;
         };
-        result__IKN=result__GLEH;
-        __tmp__EPN=TRUE__;
+        result__RLN=result__PPEH;
+        __tmp__NQN=TRUE__;
       } else {
-        __tmp__EPN=FALSE__;
+        __tmp__NQN=FALSE__;
       };
-      if ((! __tmp__EPN)) {
-        if (((void *)styl__EKN == (void *)NULL)) {
-          result__IKN=get__HQI(nam__GKN);
+      if ((! __tmp__NQN)) {
+        if (((void *)styl__NLN == (void *)NULL)) {
+          result__RLN=get__QRI(nam__PLN);
         } 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)) {
+          if (((void *)nam__PLN == (void *)(&__string_1))) {
+            copy__35R(string_tmp__VH,(&__string_320));
+            append__FLS(string_tmp__VH,styl__NLN);
+            append__FLS(string_tmp__VH,(&__string_322));
+            __tmp__IRN=current_position__AWF();
+            put_error__text__BMG( 2,string_tmp__VH);
+            put_position__LNG(__tmp__IRN);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
-            result__IKN=type_self__CQN;
+            result__RLN=type_self__LRN;
           } else {
-            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);
+            n__ALR=nam__PLN;
+            result__DLR=NULL;
+            idx__ELR= 0;
+            while (((idx__ELR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR)->parent_arrayed_collection__JLR.upper__TLR) && (((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR)->parent_arrayed_collection__JLR.storage__CJW)[idx__ELR])->parent_itm_type_simple__FPN.name__OVP != (void *)n__ALR) || ((void *)((__ITM_TYPE_STYLE *)((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR)->parent_arrayed_collection__JLR.storage__CJW)[idx__ELR])->style__XVP != (void *)styl__NLN)))) {
+              idx__ELR=(__INTEGER)(idx__ELR +  1);
             };
-            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;
+            if ((idx__ELR <= ((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR)->parent_arrayed_collection__JLR.upper__TLR)) {
+              __tmp__4MR=((void **)((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR)->parent_arrayed_collection__JLR.storage__CJW)[idx__ELR];
+              if (__tmp__4MR==NULL) {
+                __tmp__5MR=NULL;
               } else {
-                __tmp__WLR=((__ITM_TYPE_STYLE *)__tmp__VLR);
+                __tmp__5MR=((__ITM_TYPE_STYLE *)__tmp__4MR);
               };
-              result__0JR=__tmp__WLR;
+              result__DLR=__tmp__5MR;
             } else {
-              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__;
+              result__32IB=NULL;
+              ptr__42IB=((__POINTER )(NULL));
+              typ_id__D3IB= 0;
+              sz__A3IB=((__UINTEGER_32 )sizeof(__ITM_TYPE_STYLE));
+              if ((sz__A3IB ==  0)) {
+                result__32IB=ITM_TYPE_STYLE__;
               } else {
-                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;
+                typ_id__D3IB=-1;
+                clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__A3IB);
+                if ((typ_id__D3IB == (__INTEGER)(-  1))) {
+                  a__DTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__ETGH=(__UINTEGER_32)((__UINTEGER_32)(sz__A3IB + a__DTGH) & (__UINTEGER_32)(~ a__DTGH));
+                  ptr_table__R1JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ETGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+                  next__Q1JH=((__POINTER )(NULL));
+                  result__S1JH=((__POINTER *)ptr_table__R1JH)[ 0];
+                  if ((result__S1JH == (void *)NULL)) {
+                    result__S1JH=new_lab__ZPJ(new_size__ETGH);
+                    next__Q1JH=(void *)((unsigned long)result__S1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETGH)));
+                    ((__POINTER *)next__Q1JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__R1JH)[ 0]=next__Q1JH;
                   } else {
-                    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)));
+                    next__Q1JH=((__POINTER *)result__S1JH)[ 0];
+                    if ((next__Q1JH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__S1JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ETGH <<  1)) <=  4096)) {
+                        next__Q1JH=(void *)((unsigned long)result__S1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ETGH)));
                       } else {
-                        next__HXJH=new_lab__QOJ(new_size__1OGH);
+                        next__Q1JH=new_lab__ZPJ(new_size__ETGH);
                       };
-                      ((__POINTER *)next__HXJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__IXJH)[ 0]=next__HXJH;
+                      ((__POINTER *)next__Q1JH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__R1JH)[ 0]=next__Q1JH;
                     } else {
-                      ((__POINTER *)result__JXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__JXJH=next__HXJH;
+                      ((__POINTER *)result__S1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__S1JH=next__Q1JH;
                     };
                   };
-                  ptr__U1IB=result__JXJH;
+                  ptr__42IB=result__S1JH;
                 } else {
-                  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;
+                  t__ITGH=((__UINTEGER_32 )typ_id__D3IB);
+                  a__HTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+                  new_size__Z1JH=(__UINTEGER_32)((__UINTEGER_32)(sz__A3IB + a__HTGH) & (__UINTEGER_32)(~ a__HTGH));
+                  ptr_table__W1JH=((__POINTER )(&(table_type[(t__ITGH)])));
+                  lab_type__Y1JH=(__UINTEGER_32)(t__ITGH |  1);
+                  next__V1JH=((__POINTER )(NULL));
+                  result__X1JH=((__POINTER *)ptr_table__W1JH)[ 0];
+                  if ((result__X1JH == (void *)NULL)) {
+                    result__X1JH=new_lab__ZPJ(lab_type__Y1JH);
+                    next__V1JH=(void *)((unsigned long)result__X1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1JH)));
+                    ((__POINTER *)next__V1JH)[ 0]=NULL;
+                    ((__POINTER *)ptr_table__W1JH)[ 0]=next__V1JH;
                   } else {
-                    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)));
+                    next__V1JH=((__POINTER *)result__X1JH)[ 0];
+                    if ((next__V1JH == (void *)NULL)) {
+                      if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__X1JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Z1JH <<  1)) <=  4096)) {
+                        next__V1JH=(void *)((unsigned long)result__X1JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z1JH)));
                       } else {
-                        next__MXJH=new_lab__QOJ(lab_type__PXJH);
+                        next__V1JH=new_lab__ZPJ(lab_type__Y1JH);
                       };
-                      ((__POINTER *)next__MXJH)[ 0]=NULL;
-                      ((__POINTER *)ptr_table__NXJH)[ 0]=next__MXJH;
+                      ((__POINTER *)next__V1JH)[ 0]=NULL;
+                      ((__POINTER *)ptr_table__W1JH)[ 0]=next__V1JH;
                     } else {
-                      ((__POINTER *)result__OXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                      result__OXJH=next__MXJH;
+                      ((__POINTER *)result__X1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                      result__X1JH=next__V1JH;
                     };
                   };
-                  ptr__U1IB=result__OXJH;
+                  ptr__42IB=result__X1JH;
                 };
-                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__;
+                result__32IB=((__ITM_TYPE_STYLE *)ptr__42IB);
+                *(result__32IB) = *(ITM_TYPE_STYLE__);
+              };
+              Self__A5CC=((__ITM_TYPE_STYLE *)result__32IB);
+              Self__A5CC->parent_itm_type_simple__FPN.name__OVP=nam__PLN;
+              Self__A5CC->style__XVP=styl__NLN;
+              result__DLR=result__32IB;
+              Self__IBCB=((__FAST_ARRAYoITM_TYPE_STYLEo *)dico__KLR);
+              new_capacity__KBCB= 0;
+              if (((__INTEGER)(Self__IBCB->parent_arrayed_collection__JLR.upper__TLR +  1) <= (__INTEGER)(Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW -  1))) {
+                Self__IBCB->parent_arrayed_collection__JLR.upper__TLR=(__INTEGER)(Self__IBCB->parent_arrayed_collection__JLR.upper__TLR +  1);
+                __tmp__YBCB=TRUE__;
               } else {
-                __tmp__PACB=FALSE__;
+                __tmp__YBCB=FALSE__;
               };
-              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;
+              if ((! __tmp__YBCB)) {
+                if ((Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW ==  0)) {
+                  Self__IBCB->parent_arrayed_collection__JLR.storage__CJW=create__2FYB( 2);
+                  Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW= 2;
+                  Self__IBCB->parent_arrayed_collection__JLR.upper__TLR= 0;
                 } else {
-                  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);
+                  new_capacity__KBCB=(__INTEGER)(Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW <<  1);
+                  __tmp__NCCB=Self__IBCB->parent_arrayed_collection__JLR.storage__CJW;
+                  __tmp__OCCB=Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW;
+                  new__XRFC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__NCCB)),((__UINTEGER_32 )(__INTEGER)(__tmp__OCCB * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__KBCB * ((__INTEGER )(sizeof(void *)))))));
+                  __tmp__LSFC=(__INTEGER)(new_capacity__KBCB -  1);
+                  Self__F2VD=__tmp__OCCB;
+                  while ((Self__F2VD <= __tmp__LSFC)) {
+                    new__XRFC[Self__F2VD]=NULL;
+                    Self__F2VD=(__INTEGER)(Self__F2VD +  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);
+                  Self__IBCB->parent_arrayed_collection__JLR.storage__CJW=new__XRFC;
+                  Self__IBCB->parent_arrayed_collection__JLR.capacity__XIW=new_capacity__KBCB;
+                  Self__IBCB->parent_arrayed_collection__JLR.upper__TLR=(__INTEGER)(Self__IBCB->parent_arrayed_collection__JLR.upper__TLR +  1);
                 };
               };
-              ((void **)Self__55BB->parent_arrayed_collection__AKR.storage__ZHW)[Self__55BB->parent_arrayed_collection__AKR.upper__KKR]=result__T1IB;
+              ((void **)Self__IBCB->parent_arrayed_collection__JLR.storage__CJW)[Self__IBCB->parent_arrayed_collection__JLR.upper__TLR]=result__32IB;
             };
-            result__IKN=result__0JR;
+            result__RLN=result__DLR;
           };
         };
       };
     };
     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);
+      sav_derive__VLN=short_derive__PCC;
+      short_derive__PCC=old_derive__ULN;
+      if ((((void *)result__RLN == (void *)type_self__LRN) || ((void *)result__RLN == (void *)type_null__DSN))) {
+        short__token__to__YBD((&__string_126),(__INTEGER)(old_pos__TLN - ((__STRING_CONSTANT *)nam__PLN)->count__DD),old_pos__TLN);
       } else {
-        short__token__to__YBD((&__string_125),(__INTEGER)(old_pos__KKN - ((__STRING_CONSTANT *)nam__GKN)->count__DD),old_pos__KKN);
+        short__token__to__YBD((&__string_125),(__INTEGER)(old_pos__TLN - ((__STRING_CONSTANT *)nam__PLN)->count__DD),old_pos__TLN);
       };
-      short_derive__PCC=(__INTEGER)(sav_derive__MKN + (__INTEGER)(short_derive__PCC - old_derive__LKN));
+      short_derive__PCC=(__INTEGER)(sav_derive__VLN + (__INTEGER)(short_derive__PCC - old_derive__ULN));
     };
   };
-  return(result__IKN);
+  return(result__RLN);
 }
 
-static void read_def_local__LYH(__PARSER *Self__MYH)
+static void read_def_local__UZH(__PARSER *Self__VZH)
 // ({PARSER}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER beg__LWK,typ_id__1TN,Self__WCAB,limit_up__XCAB,__tmp__P0K;
+  __INTEGER Self__L0N,__tmp__1DIH,Self__2DIH,__tmp__I5OD,Self__XQUD;
+  __POSITION pos__FQZG,__tmp__XXK,pos__NQZG,pos__0QZG,pos__BRZG;
+  void *__tmp__YXK;
+  __ITM_LOCAL *result__VTN,*Self__WAV;
+  __POINTER ptr__WTN,ptr_table__11JH,next__01JH,result__21JH;
+  __POINTER ptr_table__A2JH,next__51JH,result__B2JH;
+  __UINTEGER_32 sz__YTN,a__ZTGH,new_size__0TGH,t__4TGH,a__3TGH;
+  __UINTEGER_32 new_size__D2JH,lab_type__C2JH;
+  __CHARACTER styl__5ZH,result__F2JH,result__DHBH,result__I2JH;
+  __CHARACTER result__L2JH;
+  void *result__UDIH,*local_list__3ZH,*result__XDIH,*static_list__4ZH;
+  void *result__KWK,*result__2PI;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__VDIH,*Self__WDIH;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__YDIH,*Self__ZDIH,*Self__AO4;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__WO4;
+  __BOOLEAN mute__MWK,result__E2JH,__tmp__DYK,result__H2JH,result__K2JH;
+  __FAST_ARRAYoITM_LOCALo *Self__3DIH,*Self__34OD;
+  void *other__0DIH,*other__44OD;
+  old_position__QPI=position__CCC;
+  old_pos_cur__SPI=pos_cur__FCC;
+  old_pos_line__UPI=pos_line__GCC;
+  old_pos_col__WPI=pos_col__HCC;
+  old_short_derive__YPI=short_derive__PCC;
+  styl__5ZH=read_style__OQF();
+  result__UDIH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI)->parent_arrayed_collection__BQI.upper__NYT <  0)) {
+    result__UDIH=create_with_capacity__THK( 16);
   } else {
-    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);
+    Self__VDIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+    result__UDIH=((void **)Self__VDIH->parent_arrayed_collection__BQI.storage__DGU)[Self__VDIH->parent_arrayed_collection__BQI.upper__NYT];
+    Self__WDIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+    Self__WDIH->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(Self__WDIH->parent_arrayed_collection__BQI.upper__NYT -  1);
+  };
+  local_list__3ZH=result__UDIH;
+  result__XDIH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI)->parent_arrayed_collection__BQI.upper__NYT <  0)) {
+    result__XDIH=create_with_capacity__THK( 16);
   } else {
-    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;
+    Self__YDIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+    result__XDIH=((void **)Self__YDIH->parent_arrayed_collection__BQI.storage__DGU)[Self__YDIH->parent_arrayed_collection__BQI.upper__NYT];
+    Self__ZDIH=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+    Self__ZDIH->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(Self__ZDIH->parent_arrayed_collection__BQI.upper__NYT -  1);
+  };
+  static_list__4ZH=result__XDIH;
+  while ((styl__5ZH != ' ')) {
+    result__KWK=NULL;
+    beg__LWK= 0;
+    mute__MWK=TRUE__;
+    if (read_identifier__E4K()) {
+      result__2PI=NULL;
+      if ((((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI)->parent_arrayed_collection__BQI.upper__NYT <  0)) {
+        result__2PI=create_with_capacity__THK( 16);
+      } else {
+        Self__AO4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+        result__2PI=((void **)Self__AO4->parent_arrayed_collection__BQI.storage__DGU)[Self__AO4->parent_arrayed_collection__BQI.upper__NYT];
+        Self__WO4=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+        Self__WO4->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(Self__WO4->parent_arrayed_collection__BQI.upper__NYT -  1);
+      };
+      result__KWK=result__2PI;
+      beg__LWK= 0;
       do {
-        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)) {
+        if (((((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK +  1) !=  0) && (! read_identifier__E4K())) && (! mute__MWK))) {
+          pos__FQZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_323));
+          put_position__LNG(pos__FQZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        __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;
+        __tmp__XXK=current_position__AWF();
+        __tmp__YXK=last_string__V0C;
+        result__VTN=NULL;
+        ptr__WTN=((__POINTER )(NULL));
+        typ_id__1TN= 0;
+        sz__YTN=((__UINTEGER_32 )sizeof(__ITM_LOCAL));
+        if ((sz__YTN ==  0)) {
+          result__VTN=ITM_LOCAL__;
+        } else {
+          typ_id__1TN=__ITM_LOCAL__;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__YTN);
+          if ((typ_id__1TN == (__INTEGER)(-  1))) {
+            a__ZTGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0TGH=(__UINTEGER_32)((__UINTEGER_32)(sz__YTN + a__ZTGH) & (__UINTEGER_32)(~ a__ZTGH));
+            ptr_table__11JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0TGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__01JH=((__POINTER )(NULL));
+            result__21JH=((__POINTER *)ptr_table__11JH)[ 0];
+            if ((result__21JH == (void *)NULL)) {
+              result__21JH=new_lab__ZPJ(new_size__0TGH);
+              next__01JH=(void *)((unsigned long)result__21JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TGH)));
+              ((__POINTER *)next__01JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__11JH)[ 0]=next__01JH;
             } else {
-              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)));
+              next__01JH=((__POINTER *)result__21JH)[ 0];
+              if ((next__01JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__21JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0TGH <<  1)) <=  4096)) {
+                  next__01JH=(void *)((unsigned long)result__21JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0TGH)));
                 } else {
-                  next__RXJH=new_lab__QOJ(new_size__RPGH);
+                  next__01JH=new_lab__ZPJ(new_size__0TGH);
                 };
-                ((__POINTER *)next__RXJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__SXJH)[ 0]=next__RXJH;
+                ((__POINTER *)next__01JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__11JH)[ 0]=next__01JH;
               } else {
-                ((__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;
+                ((__POINTER *)result__21JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__01JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__21JH=next__01JH;
+              };
+            };
+            ptr__WTN=result__21JH;
+          } else {
+            t__4TGH=((__UINTEGER_32 )typ_id__1TN);
+            a__3TGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__D2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__YTN + a__3TGH) & (__UINTEGER_32)(~ a__3TGH));
+            ptr_table__A2JH=((__POINTER )(&(table_type[(t__4TGH)])));
+            lab_type__C2JH=(__UINTEGER_32)(t__4TGH |  1);
+            next__51JH=((__POINTER )(NULL));
+            result__B2JH=((__POINTER *)ptr_table__A2JH)[ 0];
+            if ((result__B2JH == (void *)NULL)) {
+              result__B2JH=new_lab__ZPJ(lab_type__C2JH);
+              next__51JH=(void *)((unsigned long)result__B2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2JH)));
+              ((__POINTER *)next__51JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__A2JH)[ 0]=next__51JH;
             } else {
-              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)));
+              next__51JH=((__POINTER *)result__B2JH)[ 0];
+              if ((next__51JH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__B2JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__D2JH <<  1)) <=  4096)) {
+                  next__51JH=(void *)((unsigned long)result__B2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D2JH)));
                 } else {
-                  next__WXJH=new_lab__QOJ(lab_type__ZXJH);
+                  next__51JH=new_lab__ZPJ(lab_type__C2JH);
                 };
-                ((__POINTER *)next__WXJH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__XXJH)[ 0]=next__WXJH;
+                ((__POINTER *)next__51JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__A2JH)[ 0]=next__51JH;
               } else {
-                ((__POINTER *)result__YXJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WXJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__YXJH=next__WXJH;
+                ((__POINTER *)result__B2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__51JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__B2JH=next__51JH;
               };
             };
-            ptr__NSN=result__YXJH;
+            ptr__WTN=result__B2JH;
           };
-          result__MSN=((__ITM_LOCAL *)ptr__NSN);
-          *(result__MSN) = *(ITM_LOCAL__);
+          result__VTN=((__ITM_LOCAL *)ptr__WTN);
+          *(result__VTN) = *(ITM_LOCAL__);
         };
-        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__;
+        Self__WAV=((__ITM_LOCAL *)result__VTN);
+        Self__WAV->name__X0K=__tmp__YXK;
+        Self__WAV->parent_itm_object__WZH.position__0BJ=__tmp__XXK;
+        add_last__BZU(result__KWK,result__VTN);
+        result__E2JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__1XJH=FALSE__;
+          result__E2JH=FALSE__;
         } else {
-          result__2XJH='\0';
+          result__F2JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__2XJH=((__CHARACTER )(( 0)));
+            result__F2JH=((__CHARACTER )(( 0)));
           } else {
-            result__2XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__F2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__2XJH == ':')) {
+          if ((result__F2JH == ':')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__1XJH=TRUE__;
+            result__E2JH=TRUE__;
           };
         };
-        if (result__1XJH) {
-          result__0CBH='\0';
+        if (result__E2JH) {
+          result__DHBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__0CBH=((__CHARACTER )(( 0)));
+            result__DHBH=((__CHARACTER )(( 0)));
           } else {
-            result__0CBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__DHBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__0WK=(result__0CBH != '=');
+          __tmp__DYK=(result__DHBH != '=');
         } else {
-          __tmp__0WK=FALSE__;
+          __tmp__DYK=FALSE__;
         };
-        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)) {
+        if (__tmp__DYK) {
+          mute__MWK=FALSE__;
+          if (((void *)read_type__K5L(Self__VZH,TRUE__) == (void *)NULL)) {
+            pos__NQZG=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_324));
+            put_position__LNG(pos__NQZG);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 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);
+          Self__WCAB=beg__LWK;
+          limit_up__XCAB=((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK;
+          while ((Self__WCAB <= limit_up__XCAB)) {
+            Self__WCAB=(__INTEGER)(Self__WCAB +  1);
           };
-          beg__CVK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__BVK)->parent_arrayed_collection__SYH.upper__LXK +  1);
+          beg__LWK=(__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK +  1);
         };
-        result__4XJH=FALSE__;
+        result__H2JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__4XJH=FALSE__;
+          result__H2JH=FALSE__;
         } else {
-          result__5XJH='\0';
+          result__I2JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5XJH=((__CHARACTER )(( 0)));
+            result__I2JH=((__CHARACTER )(( 0)));
           } else {
-            result__5XJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__I2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__5XJH == ',')) {
+          if ((result__I2JH == ',')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__4XJH=TRUE__;
+            result__H2JH=TRUE__;
           };
         };
-      } 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;
+      } while (result__H2JH);
+      if ((beg__LWK != (__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)result__2PI)->parent_arrayed_collection__1ZH.upper__UYK +  1))) {
+        if (mute__MWK) {
+          free__ZHK(result__2PI);
+          result__KWK=NULL;
         } else {
-          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)) {
+          pos__0QZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_324));
+          put_position__LNG(pos__0QZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       } else {
-        result__BVK=copy__Z0J(result__BVK);
+        result__KWK=copy__C2J(result__KWK);
         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);
+          __tmp__P0K=((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK;
+          Self__L0N= 0;
+          while ((Self__L0N <= __tmp__P0K)) {
+            add__AJHB(short_local__XCC,((__ITM_LOCAL *)((void **)((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.storage__4HU)[Self__L0N])->name__X0K);
+            Self__L0N=(__INTEGER)(Self__L0N +  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);
+    if (((void *)result__KWK != (void *)NULL)) {
+      if ((styl__5ZH == '+')) {
+        Self__3DIH=((__FAST_ARRAYoITM_LOCALo *)local_list__3ZH);
+        other__0DIH=result__KWK;
+        __tmp__1DIH=((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK;
+        Self__2DIH= 0;
+        while ((Self__2DIH <= __tmp__1DIH)) {
+          add_last__BZU(Self__3DIH,((void **)((__FAST_ARRAYoITM_LOCALo *)other__0DIH)->parent_arrayed_collection__1ZH.storage__4HU)[Self__2DIH]);
+          Self__2DIH=(__INTEGER)(Self__2DIH +  1);
         };
       } else {
-        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);
+        Self__34OD=((__FAST_ARRAYoITM_LOCALo *)static_list__4ZH);
+        other__44OD=result__KWK;
+        __tmp__I5OD=((__FAST_ARRAYoITM_LOCALo *)result__KWK)->parent_arrayed_collection__1ZH.upper__UYK;
+        Self__XQUD= 0;
+        while ((Self__XQUD <= __tmp__I5OD)) {
+          add_last__BZU(Self__34OD,((void **)((__FAST_ARRAYoITM_LOCALo *)other__44OD)->parent_arrayed_collection__1ZH.storage__4HU)[Self__XQUD]);
+          Self__XQUD=(__INTEGER)(Self__XQUD +  1);
         };
       };
-      result__BYJH=FALSE__;
+      result__K2JH=FALSE__;
       if ((! read_space__KSD())) {
-        result__BYJH=FALSE__;
+        result__K2JH=FALSE__;
       } else {
-        result__CYJH='\0';
+        result__L2JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__CYJH=((__CHARACTER )(( 0)));
+          result__L2JH=((__CHARACTER )(( 0)));
         } else {
-          result__CYJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__L2JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__CYJH == ';')) {
+        if ((result__L2JH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__BYJH=TRUE__;
+          result__K2JH=TRUE__;
         };
       };
-      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)) {
+      if ((! result__K2JH)) {
+        pos__BRZG=current_position__AWF();
+        put_error__text__BMG( 2,(&__string_242));
+        put_position__LNG(pos__BRZG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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();
+      old_position__QPI=position__CCC;
+      old_pos_cur__SPI=pos_cur__FCC;
+      old_pos_line__UPI=pos_line__GCC;
+      old_pos_col__WPI=pos_col__HCC;
+      old_short_derive__YPI=short_derive__PCC;
+      styl__5ZH=read_style__OQF();
     } else {
-      restore_context__DAL();
-      styl__WYH=' ';
+      restore_context__MBL();
+      styl__5ZH=' ';
     };
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__L5HH)->parent_arrayed_collection__SYH.upper__LXK <  0)) {
-    free__QGK(result__L5HH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__UDIH)->parent_arrayed_collection__1ZH.upper__UYK <  0)) {
+    free__ZHK(result__UDIH);
   } else {
-    copy__Z0J(result__L5HH);
+    copy__C2J(result__UDIH);
   };
-  if ((((__FAST_ARRAYoITM_LOCALo *)result__O5HH)->parent_arrayed_collection__SYH.upper__LXK <  0)) {
-    free__QGK(result__O5HH);
+  if ((((__FAST_ARRAYoITM_LOCALo *)result__XDIH)->parent_arrayed_collection__1ZH.upper__UYK <  0)) {
+    free__ZHK(result__XDIH);
   } else {
-    copy__Z0J(result__O5HH);
+    copy__C2J(result__XDIH);
   };
 }
 
-static __FAST_ARRAYoITM_CODEo* create_with_capacity__WSI(__INTEGER new_count__YSI)
+static __FAST_ARRAYoITM_CODEo* create_with_capacity__5TI(__INTEGER new_count__BUI)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__3IJ,ptr_table__O2JH,next__N2JH,result__P2JH;
+  __POINTER ptr_table__T2JH,next__S2JH,result__U2JH;
+  __INTEGER typ_id__CJJ;
+  __UINTEGER_32 sz__5IJ,a__CZGH,new_size__DZGH,t__HZGH,a__GZGH;
+  __UINTEGER_32 new_size__W2JH,lab_type__V2JH;
+  __FAST_ARRAYoITM_CODEo *result__2IJ,*Self__D1T;
+  result__2IJ=NULL;
+  ptr__3IJ=((__POINTER )(NULL));
+  typ_id__CJJ= 0;
+  sz__5IJ=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_CODEo));
+  if ((sz__5IJ ==  0)) {
+    result__2IJ=FAST_ARRAYoITM_CODEo__;
   } else {
-    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);
+    typ_id__CJJ=__FAST_ARRAYoITM_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5IJ);
+    if ((typ_id__CJJ == (__INTEGER)(-  1))) {
+      a__CZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__DZGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5IJ + a__CZGH) & (__UINTEGER_32)(~ a__CZGH));
+      ptr_table__O2JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__DZGH / ((__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__ZPJ(new_size__DZGH);
+        next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZGH)));
+        ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__DZGH <<  1)) <=  4096)) {
+            next__N2JH=(void *)((unsigned long)result__P2JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__DZGH)));
+          } else {
+            next__N2JH=new_lab__ZPJ(new_size__DZGH);
+          };
+          ((__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__3IJ=result__P2JH;
+    } else {
+      t__HZGH=((__UINTEGER_32 )typ_id__CJJ);
+      a__GZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__W2JH=(__UINTEGER_32)((__UINTEGER_32)(sz__5IJ + a__GZGH) & (__UINTEGER_32)(~ a__GZGH));
+      ptr_table__T2JH=((__POINTER )(&(table_type[(t__HZGH)])));
+      lab_type__V2JH=(__UINTEGER_32)(t__HZGH |  1);
+      next__S2JH=((__POINTER )(NULL));
+      result__U2JH=((__POINTER *)ptr_table__T2JH)[ 0];
+      if ((result__U2JH == (void *)NULL)) {
+        result__U2JH=new_lab__ZPJ(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__GUH)))) &  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__ZPJ(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__3IJ=result__U2JH;
+    };
+    result__2IJ=((__FAST_ARRAYoITM_CODEo *)ptr__3IJ);
+    *(result__2IJ) = *(FAST_ARRAYoITM_CODEo__);
+  };
+  Self__D1T=((__FAST_ARRAYoITM_CODEo *)result__2IJ);
+  if ((Self__D1T->parent_arrayed_collection__ISF.capacity__4UT < new_count__BUI)) {
+    Self__D1T->parent_arrayed_collection__ISF.storage__JVT=create__RRQB(new_count__BUI);
+    Self__D1T->parent_arrayed_collection__ISF.capacity__4UT=new_count__BUI;
+  };
+  Self__D1T->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(-  1);
+  return(result__2IJ);
 }
 
-static void add_last__H1U(__FAST_ARRAYoITM_CODEo *Self__I1U,void *element__J1U)
+static void add_last__Q2U(__FAST_ARRAYoITM_CODEo *Self__R2U,void *element__S2U)
 // ({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__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__;
+  __INTEGER new_capacity__T2U,__tmp__X3U,__tmp__PDEC,Self__UHVD;
+  __BOOLEAN __tmp__B3U;
+  void **__tmp__W3U,**new__1CEC;
+  new_capacity__T2U= 0;
+  if (((__INTEGER)(Self__R2U->parent_arrayed_collection__ISF.upper__VFL +  1) <= (__INTEGER)(Self__R2U->parent_arrayed_collection__ISF.capacity__4UT -  1))) {
+    Self__R2U->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__R2U->parent_arrayed_collection__ISF.upper__VFL +  1);
+    __tmp__B3U=TRUE__;
   } else {
-    __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;
+    __tmp__B3U=FALSE__;
+  };
+  if ((! __tmp__B3U)) {
+    if ((Self__R2U->parent_arrayed_collection__ISF.capacity__4UT ==  0)) {
+      Self__R2U->parent_arrayed_collection__ISF.storage__JVT=create__RRQB( 2);
+      Self__R2U->parent_arrayed_collection__ISF.capacity__4UT= 2;
+      Self__R2U->parent_arrayed_collection__ISF.upper__VFL= 0;
+    } else {
+      new_capacity__T2U=(__INTEGER)(Self__R2U->parent_arrayed_collection__ISF.capacity__4UT <<  1);
+      __tmp__W3U=Self__R2U->parent_arrayed_collection__ISF.storage__JVT;
+      __tmp__X3U=Self__R2U->parent_arrayed_collection__ISF.capacity__4UT;
+      new__1CEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__W3U)),((__UINTEGER_32 )(__INTEGER)(__tmp__X3U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__T2U * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__PDEC=(__INTEGER)(new_capacity__T2U -  1);
+      Self__UHVD=__tmp__X3U;
+      while ((Self__UHVD <= __tmp__PDEC)) {
+        new__1CEC[Self__UHVD]=NULL;
+        Self__UHVD=(__INTEGER)(Self__UHVD +  1);
+      };
+      Self__R2U->parent_arrayed_collection__ISF.storage__JVT=new__1CEC;
+      Self__R2U->parent_arrayed_collection__ISF.capacity__4UT=new_capacity__T2U;
+      Self__R2U->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(Self__R2U->parent_arrayed_collection__ISF.upper__VFL +  1);
+    };
+  };
+  ((void **)Self__R2U->parent_arrayed_collection__ISF.storage__JVT)[Self__R2U->parent_arrayed_collection__ISF.upper__VFL]=element__S2U;
 }
 
-static void* copy__42H(void *tmp__A3H)
+static void* copy__H4H(void *tmp__J4H)
 // ({NULLxFAST_ARRAYoITM_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__VUT,other_upper__UUT,Self__R3JC;
+  void *result__L4H;
+  __FAST_ARRAYoITM_CODEo *Self__SUT;
+  void **__tmp__MVT,**__tmp__OVT,**Self__DQCC;
+  result__L4H=create_with_capacity__5TI((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)tmp__J4H)->parent_arrayed_collection__ISF.upper__VFL +  1));
+  Self__SUT=((__FAST_ARRAYoITM_CODEo *)result__L4H);
+  new_capacity__VUT= 0;
+  other_upper__UUT=((__FAST_ARRAYoITM_CODEo *)tmp__J4H)->parent_arrayed_collection__ISF.upper__VFL;
+  if ((other_upper__UUT >=  0)) {
+    new_capacity__VUT=(__INTEGER)(other_upper__UUT +  1);
+    if ((Self__SUT->parent_arrayed_collection__ISF.capacity__4UT < new_capacity__VUT)) {
+      Self__SUT->parent_arrayed_collection__ISF.storage__JVT=create__RRQB(new_capacity__VUT);
+      Self__SUT->parent_arrayed_collection__ISF.capacity__4UT=new_capacity__VUT;
+    };
+    __tmp__MVT=Self__SUT->parent_arrayed_collection__ISF.storage__JVT;
+    __tmp__OVT=((__FAST_ARRAYoITM_CODEo *)tmp__J4H)->parent_arrayed_collection__ISF.storage__JVT;
+    Self__DQCC=((void **)__tmp__MVT);
+    Self__R3JC=other_upper__UUT;
+    while ((Self__R3JC >=  0)) {
+      Self__DQCC[Self__R3JC]=((void **)__tmp__OVT)[Self__R3JC];
+      Self__R3JC=(__INTEGER)(Self__R3JC -  1);
+    };
+  };
+  Self__SUT->parent_arrayed_collection__ISF.upper__VFL=other_upper__UUT;
+  free__FUI(tmp__J4H);
+  return(result__L4H);
 }
 
-static __BOOLEAN fast_has__Q5U(__HASHED_SEToSTRING_CONSTANTo *Self__R5U,void *e__S5U)
+static __BOOLEAN fast_has__ZAV(__HASHED_SEToSTRING_CONSTANTo *Self__0AV,void *e__1AV)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__AEIH;
+  __INTEGER result__5DIH,__tmp__BEIH,Self__CEIH;
+  void *node__FBV;
+  Self__AEIH=((__STRING_CONSTANT *)e__1AV);
+  result__5DIH= 0;
+  __tmp__BEIH=Self__AEIH->count__DD;
+  Self__CEIH= 1;
+  while ((Self__CEIH <= __tmp__BEIH)) {
+    result__5DIH=(__INTEGER)((__INTEGER)( 5 * result__5DIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__AEIH->storage__ZNO)[(__INTEGER)(Self__CEIH -  1)])));
+    Self__CEIH=(__INTEGER)(Self__CEIH +  1);
+  };
+  if ((result__5DIH <  0)) {
+    result__5DIH=(__INTEGER)(~ result__5DIH);
+  };
+  node__FBV=((void **)Self__0AV->buckets__LBV)[(__INTEGER)(result__5DIH % Self__0AV->capacity__OFT)];
+  while ((! (((void *)node__FBV == (void *)NULL) || ((void *)((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__FBV)->item__XBV == (void *)e__1AV)))) {
+    node__FBV=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__FBV)->next__CCV;
+  };
+  return(((void *)node__FBV != (void *)NULL));
 }
 
-static void restore_context__DAL()
+static void restore_context__MBL()
 // () VoidNo recursive, No inlinable.
 {
-  __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;
+  __INTEGER beg__OBL,end__EEIH,len__GEIH,__tmp__HEIH,__tmp__JEIH;
+  __INTEGER Self__KEIH,__tmp__ACL,__tmp__DCL,Self__AKM;
+  __STRING *Self__IEIH;
+  beg__OBL= 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;
+    beg__OBL=(__INTEGER)(old_position__QPI + old_short_derive__YPI);
+    Self__IEIH=((__STRING *)output_code__SI);
+    end__EEIH=(__INTEGER)((__INTEGER)(position__CCC + short_derive__PCC) -  1);
+    len__GEIH=(__INTEGER)((__INTEGER)(end__EEIH - beg__OBL) +  1);
+    if ((len__GEIH >  0)) {
+      __tmp__HEIH=(__INTEGER)(end__EEIH +  1);
+      __tmp__JEIH=Self__IEIH->count__EGC;
+      Self__KEIH=__tmp__HEIH;
+      while ((Self__KEIH <= __tmp__JEIH)) {
+        ((__CHARACTER *)Self__IEIH->storage__F5R)[(__INTEGER)((__INTEGER)(Self__KEIH - len__GEIH) -  1)]=((__CHARACTER *)Self__IEIH->storage__F5R)[(__INTEGER)(Self__KEIH -  1)];
+        Self__KEIH=(__INTEGER)(Self__KEIH +  1);
+      };
+      Self__IEIH->count__EGC=(__INTEGER)(Self__IEIH->count__EGC - len__GEIH);
+    };
+    __tmp__ACL=old_position__QPI;
+    __tmp__DCL=(__INTEGER)(position__CCC -  1);
+    Self__AKM=__tmp__ACL;
+    while ((Self__AKM <= __tmp__DCL)) {
+      add_last__3IT(token__TCD,((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(Self__AKM -  1)]);
+      Self__AKM=(__INTEGER)(Self__AKM +  1);
+    };
+    insert_string__to__WUU(output_code__SI,token__TCD,beg__OBL);
+    short_derive__PCC=old_short_derive__YPI;
+  };
+  position__CCC=old_position__QPI;
+  pos_cur__FCC=old_pos_cur__SPI;
+  pos_line__GCC=old_pos_line__UPI;
+  pos_col__HCC=old_pos_col__WPI;
 }
 
-static void* read_expr_message__KSL(__PARSER *Self__LSL)
+static void* read_expr_message__TTL(__PARSER *Self__UTL)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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));
+  void *result__JZL,*result__WTL;
+  __POSITION pos__RUZG,p__Z35,pos__ZUZG;
+  __ITM_OLD *result__PQGB;
+  __POINTER ptr__QQGB,ptr_table__02JH,next__Z2JH,result__12JH;
+  __POINTER ptr_table__52JH,next__42JH,result__A3JH;
+  __INTEGER typ_id__VQGB;
+  __UINTEGER_32 sz__SQGB,a__ZVGH,new_size__0VGH,t__4VGH,a__3VGH;
+  __UINTEGER_32 new_size__C3JH,lab_type__B3JH;
+  __BOOLEAN result__Y2JH,result__D3JH;
+  __CHARACTER result__E3JH;
+  result__JZL=NULL;
+  result__Y2JH=read_word__HOF((&__string_8));
   if (is_shorter__LZ) {
-    if (result__PYJH) {
+    if (result__Y2JH) {
       if (((void *)(&__string_8) == (void *)(&__string_4))) {
         short__token__to__YBD((&__string_120),(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD),position__CCC);
       } else {
@@ -31856,5301 +31864,5301 @@ static void* read_expr_message__KSL(__PARSER *Self__LSL)
       };
     };
   };
-  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)) {
+  if (result__Y2JH) {
+    if (((void *)read_expr__L3I(Self__UTL) == (void *)NULL)) {
+      pos__RUZG=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_325));
+      put_position__LNG(pos__RUZG);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    p__Z35=current_position__AWF();
+    result__PQGB=NULL;
+    ptr__QQGB=((__POINTER )(NULL));
+    typ_id__VQGB= 0;
+    sz__SQGB=((__UINTEGER_32 )sizeof(__ITM_OLD));
+    if ((sz__SQGB ==  0)) {
+      result__PQGB=ITM_OLD__;
+    } else {
+      typ_id__VQGB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__SQGB);
+      if ((typ_id__VQGB == (__INTEGER)(-  1))) {
+        a__ZVGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0VGH=(__UINTEGER_32)((__UINTEGER_32)(sz__SQGB + a__ZVGH) & (__UINTEGER_32)(~ a__ZVGH));
+        ptr_table__02JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0VGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__Z2JH=((__POINTER )(NULL));
+        result__12JH=((__POINTER *)ptr_table__02JH)[ 0];
+        if ((result__12JH == (void *)NULL)) {
+          result__12JH=new_lab__ZPJ(new_size__0VGH);
+          next__Z2JH=(void *)((unsigned long)result__12JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VGH)));
+          ((__POINTER *)next__Z2JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__02JH)[ 0]=next__Z2JH;
+        } else {
+          next__Z2JH=((__POINTER *)result__12JH)[ 0];
+          if ((next__Z2JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__12JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0VGH <<  1)) <=  4096)) {
+              next__Z2JH=(void *)((unsigned long)result__12JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0VGH)));
             } else {
-              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)));
+              next__Z2JH=new_lab__ZPJ(new_size__0VGH);
+            };
+            ((__POINTER *)next__Z2JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__02JH)[ 0]=next__Z2JH;
+          } else {
+            ((__POINTER *)result__12JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__12JH=next__Z2JH;
+          };
+        };
+        ptr__QQGB=result__12JH;
+      } else {
+        t__4VGH=((__UINTEGER_32 )typ_id__VQGB);
+        a__3VGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__C3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__SQGB + a__3VGH) & (__UINTEGER_32)(~ a__3VGH));
+        ptr_table__52JH=((__POINTER )(&(table_type[(t__4VGH)])));
+        lab_type__B3JH=(__UINTEGER_32)(t__4VGH |  1);
+        next__42JH=((__POINTER )(NULL));
+        result__A3JH=((__POINTER *)ptr_table__52JH)[ 0];
+        if ((result__A3JH == (void *)NULL)) {
+          result__A3JH=new_lab__ZPJ(lab_type__B3JH);
+          next__42JH=(void *)((unsigned long)result__A3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C3JH)));
+          ((__POINTER *)next__42JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__52JH)[ 0]=next__42JH;
+        } else {
+          next__42JH=((__POINTER *)result__A3JH)[ 0];
+          if ((next__42JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__A3JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__C3JH <<  1)) <=  4096)) {
+              next__42JH=(void *)((unsigned long)result__A3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__C3JH)));
             } else {
-              next__VYJH=new_lab__QOJ(lab_type__YYJH);
+              next__42JH=new_lab__ZPJ(lab_type__B3JH);
             };
-            ((__POINTER *)next__VYJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__WYJH)[ 0]=next__VYJH;
+            ((__POINTER *)next__42JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__52JH)[ 0]=next__42JH;
           } else {
-            ((__POINTER *)result__XYJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__VYJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__XYJH=next__VYJH;
+            ((__POINTER *)result__A3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__42JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__A3JH=next__42JH;
           };
         };
-        ptr__GPGB=result__XYJH;
+        ptr__QQGB=result__A3JH;
       };
-      result__FPGB=((__ITM_OLD *)ptr__GPGB);
-      *(result__FPGB) = *(ITM_OLD__);
+      result__PQGB=((__ITM_OLD *)ptr__QQGB);
+      *(result__PQGB) = *(ITM_OLD__);
     };
-    ((__ITM_OLD *)result__FPGB)->parent_itm_code__VYL.parent_itm_object__FAE.position__RAJ=p__Q25;
-    result__AYL=result__FPGB;
+    ((__ITM_OLD *)result__PQGB)->parent_itm_code__4ZL.parent_itm_object__OBE.position__0BJ=p__Z35;
+    result__JZL=result__PQGB;
   } else {
-    result__AYL=read_expr_primary__D0M(Self__LSL);
-    if (((void *)result__AYL == (void *)NULL)) {
-      result__AYL=read_send_msg__H0N(Self__LSL,NULL);
+    result__JZL=read_expr_primary__M1M(Self__UTL);
+    if (((void *)result__JZL == (void *)NULL)) {
+      result__JZL=read_send_msg__Q1N(Self__UTL,NULL);
     };
   };
-  result__NSL=result__AYL;
-  if (((void *)result__AYL != (void *)NULL)) {
-    while_do__DVM:
+  result__WTL=result__JZL;
+  if (((void *)result__JZL != (void *)NULL)) {
+    while_do__MWM:
     {
-      result__0YJH=FALSE__;
+      result__D3JH=FALSE__;
       if ((! read_space__KSD())) {
-        result__0YJH=FALSE__;
+        result__D3JH=FALSE__;
       } else {
-        result__1YJH='\0';
+        result__E3JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__1YJH=((__CHARACTER )(( 0)));
+          result__E3JH=((__CHARACTER )(( 0)));
         } else {
-          result__1YJH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__E3JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__1YJH == '.')) {
+        if ((result__E3JH == '.')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__0YJH=TRUE__;
+          result__D3JH=TRUE__;
         };
       };
-      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)) {
+      if (result__D3JH) {
+        result__WTL=read_send_msg__Q1N(Self__UTL,result__WTL);
+        if (((void *)result__WTL == (void *)NULL)) {
+          pos__ZUZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_326));
+          put_position__LNG(pos__ZUZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        goto while_do__DVM;
+        goto while_do__MWM;
       };
     };
   };
-  return(result__NSL);
+  return(result__WTL);
 }
 
-static void free__2SI(void *tmp__4SI)
+static void free__FUI(void *tmp__HUI)
 // ({NULLxFAST_ARRAYoITM_CODEo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__22T,__tmp__E4T,__tmp__P3DC,Self__XBVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__02T;
+  __BOOLEAN __tmp__L3T;
+  void **__tmp__D4T,**new__12DC;
+  ((__FAST_ARRAYoITM_CODEo *)tmp__HUI)->parent_arrayed_collection__ISF.upper__VFL=(__INTEGER)(-  1);
+  Self__02T=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+  new_capacity__22T= 0;
+  if (((__INTEGER)(Self__02T->parent_arrayed_collection__X2H.upper__MTT +  1) <= (__INTEGER)(Self__02T->parent_arrayed_collection__X2H.capacity__42T -  1))) {
+    Self__02T->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__02T->parent_arrayed_collection__X2H.upper__MTT +  1);
+    __tmp__L3T=TRUE__;
   } else {
-    __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;
+    __tmp__L3T=FALSE__;
+  };
+  if ((! __tmp__L3T)) {
+    if ((Self__02T->parent_arrayed_collection__X2H.capacity__42T ==  0)) {
+      Self__02T->parent_arrayed_collection__X2H.storage__03T=create__4ZPB( 2);
+      Self__02T->parent_arrayed_collection__X2H.capacity__42T= 2;
+      Self__02T->parent_arrayed_collection__X2H.upper__MTT= 0;
+    } else {
+      new_capacity__22T=(__INTEGER)(Self__02T->parent_arrayed_collection__X2H.capacity__42T <<  1);
+      __tmp__D4T=Self__02T->parent_arrayed_collection__X2H.storage__03T;
+      __tmp__E4T=Self__02T->parent_arrayed_collection__X2H.capacity__42T;
+      new__12DC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__D4T)),((__UINTEGER_32 )(__INTEGER)(__tmp__E4T * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__22T * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__P3DC=(__INTEGER)(new_capacity__22T -  1);
+      Self__XBVD=__tmp__E4T;
+      while ((Self__XBVD <= __tmp__P3DC)) {
+        new__12DC[Self__XBVD]=NULL;
+        Self__XBVD=(__INTEGER)(Self__XBVD +  1);
+      };
+      Self__02T->parent_arrayed_collection__X2H.storage__03T=new__12DC;
+      Self__02T->parent_arrayed_collection__X2H.capacity__42T=new_capacity__22T;
+      Self__02T->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__02T->parent_arrayed_collection__X2H.upper__MTT +  1);
+    };
+  };
+  ((void **)Self__02T->parent_arrayed_collection__X2H.storage__03T)[Self__02T->parent_arrayed_collection__X2H.upper__MTT]=tmp__HUI;
 }
 
-static void display_raw__ZJIC(__ITM_TYPE_MULTI *Self__0JIC,void *buffer__1JIC)
+static void display_raw__NLIC(__ITM_TYPE_MULTI *Self__OLIC,void *buffer__PLIC)
 // ({ITM_TYPE_MULTI},{NULLxSTRING}) VoidRecursive, No inlinable.
 {
-  __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) {
+  __INTEGER __tmp__WLIC,Self__BLRC;
+  void *__tmp__3LIC,*__tmp__AMIC;
+  __ITM_TYPE_STYLE *Self__IQEH,*Self__KQEH;
+  __FAST_ARRAYoITM_TYPE_MONOo *Self__NWGH;
+  __tmp__WLIC=(__INTEGER)(((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OLIC->list_type__EHP)->parent_arrayed_collection__EYC.upper__GFV -  1);
+  Self__BLRC= 0;
+  while ((Self__BLRC <= __tmp__WLIC)) {
+    __tmp__3LIC=((void **)((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OLIC->list_type__EHP)->parent_arrayed_collection__EYC.storage__NJV)[Self__BLRC];
+    switch (((struct ___OBJ *)__tmp__3LIC)->__id) {
     case __ITM_TYPE_PARAMETER__: {
-      append__2JS(buffer__1JIC,((__ITM_TYPE_PARAMETER *)__tmp__JKIC)->parent_itm_type__LAE.name__FUP);
+      append__FLS(buffer__PLIC,((__ITM_TYPE_PARAMETER *)__tmp__3LIC)->parent_itm_type__UBE.name__OVP);
     } break;
     case __ITM_TYPE_SIMPLE__: {
-      append__2JS(buffer__1JIC,((__ITM_TYPE_SIMPLE *)__tmp__JKIC)->name__FUP);
+      append__FLS(buffer__PLIC,((__ITM_TYPE_SIMPLE *)__tmp__3LIC)->name__OVP);
     } break;
     case __ITM_TYPE_BLOCK__: {
-      append_in__EFPD(__tmp__JKIC,buffer__1JIC);
+      append_in__0EPD(__tmp__3LIC,buffer__PLIC);
     } break;
     case __ITM_TYPE_GENERIC__: {
-      append_in__IGPD(__tmp__JKIC,buffer__1JIC);
+      append_in__4FPD(__tmp__3LIC,buffer__PLIC);
     } break;
     case __ITM_TYPE_STYLE__: {
-      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,' ');
+      Self__IQEH=((__ITM_TYPE_STYLE *)__tmp__3LIC);
+      if (((void *)Self__IQEH->style__XVP != (void *)NULL)) {
+        append__FLS(buffer__PLIC,Self__IQEH->style__XVP);
+        add_last__3IT(buffer__PLIC,' ');
       };
-      append__2JS(buffer__1JIC,Self__5LEH->parent_itm_type_simple__2NN.name__FUP);
+      append__FLS(buffer__PLIC,Self__IQEH->parent_itm_type_simple__FPN.name__OVP);
     } break;
     };
-    add_last__UHT(buffer__1JIC,',');
-    Self__KJRC=(__INTEGER)(Self__KJRC +  1);
+    add_last__3IT(buffer__PLIC,',');
+    Self__BLRC=(__INTEGER)(Self__BLRC +  1);
   };
-  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) {
+  Self__NWGH=((__FAST_ARRAYoITM_TYPE_MONOo *)Self__OLIC->list_type__EHP);
+  __tmp__AMIC=((void **)Self__NWGH->parent_arrayed_collection__EYC.storage__NJV)[Self__NWGH->parent_arrayed_collection__EYC.upper__GFV];
+  switch (((struct ___OBJ *)__tmp__AMIC)->__id) {
   case __ITM_TYPE_PARAMETER__: {
-    append__2JS(buffer__1JIC,((__ITM_TYPE_PARAMETER *)__tmp__MKIC)->parent_itm_type__LAE.name__FUP);
+    append__FLS(buffer__PLIC,((__ITM_TYPE_PARAMETER *)__tmp__AMIC)->parent_itm_type__UBE.name__OVP);
   } break;
   case __ITM_TYPE_SIMPLE__: {
-    append__2JS(buffer__1JIC,((__ITM_TYPE_SIMPLE *)__tmp__MKIC)->name__FUP);
+    append__FLS(buffer__PLIC,((__ITM_TYPE_SIMPLE *)__tmp__AMIC)->name__OVP);
   } break;
   case __ITM_TYPE_BLOCK__: {
-    append_in__EFPD(__tmp__MKIC,buffer__1JIC);
+    append_in__0EPD(__tmp__AMIC,buffer__PLIC);
   } break;
   case __ITM_TYPE_GENERIC__: {
-    append_in__IGPD(__tmp__MKIC,buffer__1JIC);
+    append_in__4FPD(__tmp__AMIC,buffer__PLIC);
   } break;
   case __ITM_TYPE_STYLE__: {
-    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,' ');
+    Self__KQEH=((__ITM_TYPE_STYLE *)__tmp__AMIC);
+    if (((void *)Self__KQEH->style__XVP != (void *)NULL)) {
+      append__FLS(buffer__PLIC,Self__KQEH->style__XVP);
+      add_last__3IT(buffer__PLIC,' ');
     };
-    append__2JS(buffer__1JIC,Self__BMEH->parent_itm_type_simple__2NN.name__FUP);
+    append__FLS(buffer__PLIC,Self__KQEH->parent_itm_type_simple__FPN.name__OVP);
   } break;
   };
 }
 
-static void put__to__like__IGGG(void *tok__KGGG,void *buf__LGGG,void *key__MGGG)
+static void put__to__like__TKGG(void *tok__VKGG,void *buf__WKGG,void *key__XKGG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__ILGG,Self__41HG;
+  void *lst__YKGG;
+  lst__YKGG=NULL;
+  if (((void *)key__XKGG != (void *)NULL)) {
+    lst__YKGG=fast_reference_at__LHNE(short_dico__QD,key__XKGG);
+    if (((void *)lst__YKGG != (void *)NULL)) {
+      __tmp__ILGG=((__LINKED_LISToSTRING_CONSTANTo *)lst__YKGG)->parent_linked_collection__LD.upper__MDD;
+      Self__41HG= 1;
+      while ((Self__41HG <= __tmp__ILGG)) {
+        if (((void *)item__CZND(lst__YKGG,Self__41HG) == (void *)NULL)) {
+          append__FLS(buf__WKGG,tok__VKGG);
         } else {
-          append__2JS(buf__LGGG,item__MZND(lst__NGGG,Self__TXHG));
+          append__FLS(buf__WKGG,item__CZND(lst__YKGG,Self__41HG));
         };
-        Self__TXHG=(__INTEGER)(Self__TXHG +  1);
+        Self__41HG=(__INTEGER)(Self__41HG +  1);
       };
     };
   };
 }
 
-static void put__to__like__BNDG(void *tok__DNDG,void *buf__ENDG,void *key__FNDG)
+static void put__to__like__MRDG(void *tok__ORDG,void *buf__PRDG,void *key__QRDG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__BSDG,Self__WUHG;
+  void *lst__RRDG;
+  lst__RRDG=NULL;
+  if (((void *)key__QRDG != (void *)NULL)) {
+    lst__RRDG=fast_reference_at__LHNE(short_dico__QD,key__QRDG);
+    if (((void *)lst__RRDG != (void *)NULL)) {
+      __tmp__BSDG=((__LINKED_LISToSTRING_CONSTANTo *)lst__RRDG)->parent_linked_collection__LD.upper__MDD;
+      Self__WUHG= 1;
+      while ((Self__WUHG <= __tmp__BSDG)) {
+        if (((void *)item__CZND(lst__RRDG,Self__WUHG) == (void *)NULL)) {
+          append__FLS(buf__PRDG,tok__ORDG);
         } else {
-          append__2JS(buf__ENDG,item__MZND(lst__GNDG,Self__LQHG));
+          append__FLS(buf__PRDG,item__CZND(lst__RRDG,Self__WUHG));
         };
-        Self__LQHG=(__INTEGER)(Self__LQHG +  1);
+        Self__WUHG=(__INTEGER)(Self__WUHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__0JFG(void *tok__2JFG,void *buf__3JFG)
+static void put__to__like__FOFG(void *tok__HOFG,void *buf__IOFG)
 // ({STRING_CONSTANT},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __INTEGER __tmp__PKFG,Self__4UHG;
-  void *lst__5JFG;
-  lst__5JFG=NULL;
+  __INTEGER __tmp__0OFG,Self__JZHG;
+  void *lst__KOFG;
+  lst__KOFG=NULL;
   if (((void *)(&__string_133) != (void *)NULL)) {
-    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);
+    lst__KOFG=fast_reference_at__LHNE(short_dico__QD,(&__string_133));
+    if (((void *)lst__KOFG != (void *)NULL)) {
+      __tmp__0OFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__KOFG)->parent_linked_collection__LD.upper__MDD;
+      Self__JZHG= 1;
+      while ((Self__JZHG <= __tmp__0OFG)) {
+        if (((void *)item__CZND(lst__KOFG,Self__JZHG) == (void *)NULL)) {
+          append__FLS(buf__IOFG,tok__HOFG);
         } else {
-          append__2JS(buf__3JFG,item__MZND(lst__5JFG,Self__4UHG));
+          append__FLS(buf__IOFG,item__CZND(lst__KOFG,Self__JZHG));
         };
-        Self__4UHG=(__INTEGER)(Self__4UHG +  1);
+        Self__JZHG=(__INTEGER)(Self__JZHG +  1);
       };
     };
   };
 }
 
-static void put__to__like__NMFG(void *tok__PMFG,void *buf__QMFG,void *key__RMFG)
+static void put__to__like__YQFG(void *tok__0QFG,void *buf__1QFG,void *key__2QFG)
 // ({NULLxSTRING_CONSTANT},{NULLxSTRING},{STRING_CONSTANT}) VoidNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER __tmp__NRFG,Self__0ZHG;
+  void *lst__3QFG;
+  lst__3QFG=NULL;
+  if (((void *)key__2QFG != (void *)NULL)) {
+    lst__3QFG=fast_reference_at__LHNE(short_dico__QD,key__2QFG);
+    if (((void *)lst__3QFG != (void *)NULL)) {
+      __tmp__NRFG=((__LINKED_LISToSTRING_CONSTANTo *)lst__3QFG)->parent_linked_collection__LD.upper__MDD;
+      Self__0ZHG= 1;
+      while ((Self__0ZHG <= __tmp__NRFG)) {
+        if (((void *)item__CZND(lst__3QFG,Self__0ZHG) == (void *)NULL)) {
+          append__FLS(buf__1QFG,tok__0QFG);
         } else {
-          append__2JS(buf__QMFG,item__MZND(lst__SMFG,Self__PVHG));
+          append__FLS(buf__1QFG,item__CZND(lst__3QFG,Self__0ZHG));
         };
-        Self__PVHG=(__INTEGER)(Self__PVHG +  1);
+        Self__0ZHG=(__INTEGER)(Self__0ZHG +  1);
       };
     };
   };
 }
 
-static __BOOLEAN is_hexadecimal_digit__3LJE(__CHARACTER Self__4LJE)
+static __BOOLEAN is_hexadecimal_digit__GMJE(__CHARACTER Self__HMJE)
 // ({CHARACTER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __BOOLEAN result__JMJE,result__OQEH,__tmp__RMJE,__tmp__ANJE;
+  __BOOLEAN result__CEOE;
+  result__JMJE=FALSE__;
+  result__OQEH=FALSE__;
+  if ((((__INTEGER_8 )Self__HMJE) >= ((__INTEGER_8 )'0'))) {
+    result__OQEH=(((__INTEGER_8 )Self__HMJE) <= ((__INTEGER_8 )'9'));
+  };
+  if (result__OQEH) {
+    result__JMJE=TRUE__;
+    __tmp__RMJE=TRUE__;
   } else {
-    __tmp__IMJE=FALSE__;
+    __tmp__RMJE=FALSE__;
   };
-  if (__tmp__IMJE) {
-    __tmp__XMJE=TRUE__;
+  if (__tmp__RMJE) {
+    __tmp__ANJE=TRUE__;
   } else {
-    result__4BOE=(((__INTEGER_8 )Self__4LJE) >= ((__INTEGER_8 )'a'));
-    if (result__4BOE) {
-      result__AMJE=(((__INTEGER_8 )Self__4LJE) <= ((__INTEGER_8 )'f'));
+    result__CEOE=(((__INTEGER_8 )Self__HMJE) >= ((__INTEGER_8 )'a'));
+    if (result__CEOE) {
+      result__JMJE=(((__INTEGER_8 )Self__HMJE) <= ((__INTEGER_8 )'f'));
     };
-    __tmp__XMJE=result__4BOE;
+    __tmp__ANJE=result__CEOE;
   };
-  if ((! __tmp__XMJE)) {
-    if ((((__INTEGER_8 )Self__4LJE) >= ((__INTEGER_8 )'A'))) {
-      result__AMJE=(((__INTEGER_8 )Self__4LJE) <= ((__INTEGER_8 )'F'));
+  if ((! __tmp__ANJE)) {
+    if ((((__INTEGER_8 )Self__HMJE) >= ((__INTEGER_8 )'A'))) {
+      result__JMJE=(((__INTEGER_8 )Self__HMJE) <= ((__INTEGER_8 )'F'));
     };
   };
-  return(result__AMJE);
+  return(result__JMJE);
 }
 
-static void* read_constant__WMO()
+static void* read_constant__5NO()
 // () With resultNo recursive, No inlinable.
 {
-  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;
+  void *result__COO;
+  __INTEGER pos_old__T2O,typ_id__CNQ,typ_id__UNMB,old_pos__E5P;
+  __INTEGER count__F5P,typ_id__IPMB,typ_id__2QMB;
+  __POSITION pos__W1ZG,__tmp__KOO,__tmp__2OO,pos__W2ZG,pos__Y2ZG;
+  __POSITION __tmp__OPO,__tmp__5PO;
+  __ITM_REAL *result__2MQ;
+  __POINTER ptr__3MQ,ptr_table__H3JH,next__G3JH,result__I3JH;
+  __POINTER ptr_table__M3JH,next__L3JH,result__N3JH,ptr__PNMB;
+  __POINTER ptr_table__R3JH,next__Q3JH,result__S3JH,ptr_table__W3JH;
+  __POINTER next__V3JH,result__X3JH,ptr__DPMB,ptr_table__13JH;
+  __POINTER next__03JH,result__23JH,ptr_table__A4JH,next__53JH;
+  __POINTER result__B4JH,ptr__XQMB,ptr_table__F4JH,next__E4JH;
+  __POINTER result__G4JH,ptr_table__K4JH,next__J4JH,result__L4JH;
+  __UINTEGER_32 sz__5MQ,a__RWGH,new_size__SWGH,t__WWGH,a__VWGH;
+  __UINTEGER_32 new_size__P3JH,lab_type__O3JH,sz__RNMB,a__ZWGH;
+  __UINTEGER_32 new_size__0WGH,t__4WGH,a__3WGH,new_size__Z3JH;
+  __UINTEGER_32 lab_type__Y3JH,sz__FPMB,a__BXGH,new_size__CXGH,t__GXGH;
+  __UINTEGER_32 a__FXGH,new_size__D4JH,lab_type__C4JH,sz__ZQMB,a__JXGH;
+  __UINTEGER_32 new_size__KXGH,t__OXGH,a__NXGH,new_size__N4JH;
+  __UINTEGER_32 lab_type__M4JH;
+  __ITM_NUMBER *result__ONMB;
+  __ITM_CHARACTER *result__CPMB;
+  __ITM_STRING *result__WQMB;
+  __BOOLEAN result__S2O,result__WQEH,__tmp__42O,result__CREH,__tmp__Y3O;
+  __BOOLEAN result__0REH,result__GSEH,__tmp__FAP,result__CTEH;
+  __BOOLEAN result__OTEH,__tmp__POO,__tmp__BPO,result__FDP,__tmp__SPO;
+  __BOOLEAN result__D5P,__tmp__P5P,__tmp__OAQ,__tmp__PAQ;
+  __CHARACTER result__KOBH,result__UOBH,result__ZOBH,result__4OBH;
+  __CHARACTER result__DPBH,result__IPBH,result__NPBH,result__SPBH;
+  __CHARACTER result__XPBH,result__2PBH,result__BQBH,result__GQBH;
+  __CHARACTER result__LQBH,result__QQBH,result__VQBH,result__0QBH;
+  __CHARACTER result__5QBH,result__ERBH,result__JRBH,result__ORBH;
+  __CHARACTER result__YRBH,result__BSBH,result__GSBH,result__LSBH;
+  __CHARACTER result__QSBH,result__VSBH;
+  result__COO=NULL;
+  result__S2O=FALSE__;
+  pos_old__T2O= 0;
   if (read_space__KSD()) {
-    result__BKBH='\0';
+    result__KOBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__BKBH=((__CHARACTER )(( 0)));
+      result__KOBH=((__CHARACTER )(( 0)));
     } else {
-      result__BKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__KOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    result__NMEH=FALSE__;
-    if ((((__INTEGER_8 )result__BKBH) >= ((__INTEGER_8 )'0'))) {
-      result__NMEH=(((__INTEGER_8 )result__BKBH) <= ((__INTEGER_8 )'9'));
+    result__WQEH=FALSE__;
+    if ((((__INTEGER_8 )result__KOBH) >= ((__INTEGER_8 )'0'))) {
+      result__WQEH=(((__INTEGER_8 )result__KOBH) <= ((__INTEGER_8 )'9'));
     };
-    __tmp__V1O=result__NMEH;
+    __tmp__42O=result__WQEH;
   } else {
-    __tmp__V1O=FALSE__;
+    __tmp__42O=FALSE__;
   };
-  if (__tmp__V1O) {
+  if (__tmp__42O) {
     ((__STRING *)string_tmp__VH)->count__EGC= 0;
-    result__LKBH='\0';
+    result__UOBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__LKBH=((__CHARACTER )(( 0)));
+      result__UOBH=((__CHARACTER )(( 0)));
     } else {
-      result__LKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__UOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    add_last__UHT(string_tmp__VH,result__LKBH);
-    pos_old__K1O=position__CCC;
+    add_last__3IT(string_tmp__VH,result__UOBH);
+    pos_old__T2O=position__CCC;
     position__CCC=(__INTEGER)(position__CCC +  1);
-    while_do__55ZD:
+    while_do__R5ZD:
     {
-      result__QKBH='\0';
+      result__ZOBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__QKBH=((__CHARACTER )(( 0)));
+        result__ZOBH=((__CHARACTER )(( 0)));
       } else {
-        result__QKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__ZOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__ZMEH=FALSE__;
-      if ((((__INTEGER_8 )result__QKBH) >= ((__INTEGER_8 )'0'))) {
-        result__ZMEH=(((__INTEGER_8 )result__QKBH) <= ((__INTEGER_8 )'9'));
+      result__CREH=FALSE__;
+      if ((((__INTEGER_8 )result__ZOBH) >= ((__INTEGER_8 )'0'))) {
+        result__CREH=(((__INTEGER_8 )result__ZOBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__ZMEH) {
-        __tmp__P2O=TRUE__;
+      if (result__CREH) {
+        __tmp__Y3O=TRUE__;
       } else {
-        result__VKBH='\0';
+        result__4OBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__VKBH=((__CHARACTER )(( 0)));
+          result__4OBH=((__CHARACTER )(( 0)));
         } else {
-          result__VKBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__4OBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        __tmp__P2O=(result__VKBH == '_');
+        __tmp__Y3O=(result__4OBH == '_');
       };
-      if (__tmp__P2O) {
-        result__0KBH='\0';
+      if (__tmp__Y3O) {
+        result__DPBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__0KBH=((__CHARACTER )(( 0)));
+          result__DPBH=((__CHARACTER )(( 0)));
         } else {
-          result__0KBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__DPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__0KBH != '_')) {
-          result__5KBH='\0';
+        if ((result__DPBH != '_')) {
+          result__IPBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__5KBH=((__CHARACTER )(( 0)));
+            result__IPBH=((__CHARACTER )(( 0)));
           } else {
-            result__5KBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__IPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__5KBH);
+          add_last__3IT(string_tmp__VH,result__IPBH);
         };
         position__CCC=(__INTEGER)(position__CCC +  1);
-        goto while_do__55ZD;
+        goto while_do__R5ZD;
       };
     };
-    result__ELBH='\0';
+    result__NPBH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__ELBH=((__CHARACTER )(( 0)));
+      result__NPBH=((__CHARACTER )(( 0)));
     } else {
-      result__ELBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__NPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__ELBH == '.')) {
-      add_last__UHT(string_tmp__VH,'.');
+    if ((result__NPBH == '.')) {
+      add_last__3IT(string_tmp__VH,'.');
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__JLBH='\0';
+      result__SPBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__JLBH=((__CHARACTER )(( 0)));
+        result__SPBH=((__CHARACTER )(( 0)));
       } else {
-        result__JLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__SPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      result__RNEH=FALSE__;
-      if ((((__INTEGER_8 )result__JLBH) >= ((__INTEGER_8 )'0'))) {
-        result__RNEH=(((__INTEGER_8 )result__JLBH) <= ((__INTEGER_8 )'9'));
+      result__0REH=FALSE__;
+      if ((((__INTEGER_8 )result__SPBH) >= ((__INTEGER_8 )'0'))) {
+        result__0REH=(((__INTEGER_8 )result__SPBH) <= ((__INTEGER_8 )'9'));
       };
-      if (result__RNEH) {
-        result__J1O=TRUE__;
-        result__OLBH='\0';
+      if (result__0REH) {
+        result__S2O=TRUE__;
+        result__XPBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__OLBH=((__CHARACTER )(( 0)));
+          result__XPBH=((__CHARACTER )(( 0)));
         } else {
-          result__OLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__XPBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        add_last__UHT(string_tmp__VH,result__OLBH);
+        add_last__3IT(string_tmp__VH,result__XPBH);
         position__CCC=(__INTEGER)(position__CCC +  1);
-        while_do__RLPE:
+        while_do__GOPE:
         {
-          result__TLBH='\0';
+          result__2PBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__TLBH=((__CHARACTER )(( 0)));
+            result__2PBH=((__CHARACTER )(( 0)));
           } else {
-            result__TLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__2PBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          result__3NEH=FALSE__;
-          if ((((__INTEGER_8 )result__TLBH) >= ((__INTEGER_8 )'0'))) {
-            result__3NEH=(((__INTEGER_8 )result__TLBH) <= ((__INTEGER_8 )'9'));
+          result__GSEH=FALSE__;
+          if ((((__INTEGER_8 )result__2PBH) >= ((__INTEGER_8 )'0'))) {
+            result__GSEH=(((__INTEGER_8 )result__2PBH) <= ((__INTEGER_8 )'9'));
           };
-          if (result__3NEH) {
-            result__YLBH='\0';
+          if (result__GSEH) {
+            result__BQBH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__YLBH=((__CHARACTER )(( 0)));
+              result__BQBH=((__CHARACTER )(( 0)));
             } else {
-              result__YLBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__BQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            add_last__UHT(string_tmp__VH,result__YLBH);
+            add_last__3IT(string_tmp__VH,result__BQBH);
             position__CCC=(__INTEGER)(position__CCC +  1);
-            goto while_do__RLPE;
+            goto while_do__GOPE;
           };
         };
       };
-      result__3LBH='\0';
+      result__GQBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__3LBH=((__CHARACTER )(( 0)));
+        result__GQBH=((__CHARACTER )(( 0)));
       } else {
-        result__3LBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__GQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__3LBH == 'E')) {
-        result__J1O=TRUE__;
-        add_last__UHT(string_tmp__VH,'E');
+      if ((result__GQBH == 'E')) {
+        result__S2O=TRUE__;
+        add_last__3IT(string_tmp__VH,'E');
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__CMBH='\0';
+        result__LQBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__CMBH=((__CHARACTER )(( 0)));
+          result__LQBH=((__CHARACTER )(( 0)));
         } else {
-          result__CMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__LQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__CMBH == '+')) {
-          __tmp__24O=TRUE__;
+        if ((result__LQBH == '+')) {
+          __tmp__FAP=TRUE__;
         } else {
-          result__HMBH='\0';
+          result__QQBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__HMBH=((__CHARACTER )(( 0)));
+            result__QQBH=((__CHARACTER )(( 0)));
           } else {
-            result__HMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__QQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__24O=(result__HMBH == '-');
+          __tmp__FAP=(result__QQBH == '-');
         };
-        if (__tmp__24O) {
-          result__MMBH='\0';
+        if (__tmp__FAP) {
+          result__VQBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__MMBH=((__CHARACTER )(( 0)));
+            result__VQBH=((__CHARACTER )(( 0)));
           } else {
-            result__MMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__VQBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__MMBH);
+          add_last__3IT(string_tmp__VH,result__VQBH);
           position__CCC=(__INTEGER)(position__CCC +  1);
         };
-        result__RMBH='\0';
+        result__0QBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__RMBH=((__CHARACTER )(( 0)));
+          result__0QBH=((__CHARACTER )(( 0)));
         } else {
-          result__RMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__0QBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        result__ZOEH=FALSE__;
-        if ((((__INTEGER_8 )result__RMBH) >= ((__INTEGER_8 )'0'))) {
-          result__ZOEH=(((__INTEGER_8 )result__RMBH) <= ((__INTEGER_8 )'9'));
+        result__CTEH=FALSE__;
+        if ((((__INTEGER_8 )result__0QBH) >= ((__INTEGER_8 )'0'))) {
+          result__CTEH=(((__INTEGER_8 )result__0QBH) <= ((__INTEGER_8 )'9'));
         };
-        if (result__ZOEH) {
-          result__WMBH='\0';
+        if (result__CTEH) {
+          result__5QBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WMBH=((__CHARACTER )(( 0)));
+            result__5QBH=((__CHARACTER )(( 0)));
           } else {
-            result__WMBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__5QBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__WMBH);
+          add_last__3IT(string_tmp__VH,result__5QBH);
           position__CCC=(__INTEGER)(position__CCC +  1);
-          while_do__HHRE:
+          while_do__JJRE:
           {
-            result__1MBH='\0';
+            result__ERBH='\0';
             if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-              result__1MBH=((__CHARACTER )(( 0)));
+              result__ERBH=((__CHARACTER )(( 0)));
             } else {
-              result__1MBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+              result__ERBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
             };
-            result__FPEH=FALSE__;
-            if ((((__INTEGER_8 )result__1MBH) >= ((__INTEGER_8 )'0'))) {
-              result__FPEH=(((__INTEGER_8 )result__1MBH) <= ((__INTEGER_8 )'9'));
+            result__OTEH=FALSE__;
+            if ((((__INTEGER_8 )result__ERBH) >= ((__INTEGER_8 )'0'))) {
+              result__OTEH=(((__INTEGER_8 )result__ERBH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__FPEH) {
-              result__ANBH='\0';
+            if (result__OTEH) {
+              result__JRBH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__ANBH=((__CHARACTER )(( 0)));
+                result__JRBH=((__CHARACTER )(( 0)));
               } else {
-                result__ANBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__JRBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              add_last__UHT(string_tmp__VH,result__ANBH);
+              add_last__3IT(string_tmp__VH,result__JRBH);
               position__CCC=(__INTEGER)(position__CCC +  1);
-              goto while_do__HHRE;
+              goto while_do__JJRE;
             };
           };
         } else {
-          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)) {
+          pos__W1ZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_327));
+          put_position__LNG(pos__W1ZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
     };
-    if (result__J1O) {
+    if (result__S2O) {
       get__YWB(string_tmp__VH);
     } else {
-      position__CCC=pos_old__K1O;
-    };
-  };
-  if (result__J1O) {
-    short__token__to__YBD((&__string_121),pos_old__K1O,position__CCC);
-  };
-  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__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__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)));
+      position__CCC=pos_old__T2O;
+    };
+  };
+  if (result__S2O) {
+    short__token__to__YBD((&__string_121),pos_old__T2O,position__CCC);
+  };
+  if (result__S2O) {
+    __tmp__KOO=current_position__AWF();
+    result__2MQ=NULL;
+    ptr__3MQ=((__POINTER )(NULL));
+    typ_id__CNQ= 0;
+    sz__5MQ=((__UINTEGER_32 )sizeof(__ITM_REAL));
+    if ((sz__5MQ ==  0)) {
+      result__2MQ=ITM_REAL__;
+    } else {
+      typ_id__CNQ=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__5MQ);
+      if ((typ_id__CNQ == (__INTEGER)(-  1))) {
+        a__RWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__SWGH=(__UINTEGER_32)((__UINTEGER_32)(sz__5MQ + a__RWGH) & (__UINTEGER_32)(~ a__RWGH));
+        ptr_table__H3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__SWGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__G3JH=((__POINTER )(NULL));
+        result__I3JH=((__POINTER *)ptr_table__H3JH)[ 0];
+        if ((result__I3JH == (void *)NULL)) {
+          result__I3JH=new_lab__ZPJ(new_size__SWGH);
+          next__G3JH=(void *)((unsigned long)result__I3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWGH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__SWGH <<  1)) <=  4096)) {
+              next__G3JH=(void *)((unsigned long)result__I3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__SWGH)));
             } else {
-              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)));
+              next__G3JH=new_lab__ZPJ(new_size__SWGH);
+            };
+            ((__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__3MQ=result__I3JH;
+      } else {
+        t__WWGH=((__UINTEGER_32 )typ_id__CNQ);
+        a__VWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__P3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__5MQ + a__VWGH) & (__UINTEGER_32)(~ a__VWGH));
+        ptr_table__M3JH=((__POINTER )(&(table_type[(t__WWGH)])));
+        lab_type__O3JH=(__UINTEGER_32)(t__WWGH |  1);
+        next__L3JH=((__POINTER )(NULL));
+        result__N3JH=((__POINTER *)ptr_table__M3JH)[ 0];
+        if ((result__N3JH == (void *)NULL)) {
+          result__N3JH=new_lab__ZPJ(lab_type__O3JH);
+          next__L3JH=(void *)((unsigned long)result__N3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3JH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__P3JH <<  1)) <=  4096)) {
+              next__L3JH=(void *)((unsigned long)result__N3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__P3JH)));
             } else {
-              next__CZJH=new_lab__QOJ(lab_type__FZJH);
+              next__L3JH=new_lab__ZPJ(lab_type__O3JH);
             };
-            ((__POINTER *)next__CZJH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__DZJH)[ 0]=next__CZJH;
+            ((__POINTER *)next__L3JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__M3JH)[ 0]=next__L3JH;
           } else {
-            ((__POINTER *)result__EZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__EZJH=next__CZJH;
+            ((__POINTER *)result__N3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__L3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__N3JH=next__L3JH;
           };
         };
-        ptr__ULQ=result__EZJH;
+        ptr__3MQ=result__N3JH;
       };
-      result__TLQ=((__ITM_REAL *)ptr__ULQ);
-      *(result__TLQ) = *(ITM_REAL__);
+      result__2MQ=((__ITM_REAL *)ptr__3MQ);
+      *(result__2MQ) = *(ITM_REAL__);
     };
-    ((__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__;
+    ((__ITM_REAL *)result__2MQ)->parent_itm_constant__JOO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__KOO;
+    result__COO=result__2MQ;
+    __tmp__POO=TRUE__;
   } else {
-    __tmp__GNO=FALSE__;
+    __tmp__POO=FALSE__;
   };
-  if (__tmp__GNO) {
-    __tmp__YNO=TRUE__;
+  if (__tmp__POO) {
+    __tmp__BPO=TRUE__;
   } else {
-    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)));
+    result__FDP=read_integer__EZP();
+    if (result__FDP) {
+      __tmp__2OO=current_position__AWF();
+      result__ONMB=NULL;
+      ptr__PNMB=((__POINTER )(NULL));
+      typ_id__UNMB= 0;
+      sz__RNMB=((__UINTEGER_32 )sizeof(__ITM_NUMBER));
+      if ((sz__RNMB ==  0)) {
+        result__ONMB=ITM_NUMBER__;
+      } else {
+        typ_id__UNMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__RNMB);
+        if ((typ_id__UNMB == (__INTEGER)(-  1))) {
+          a__ZWGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__0WGH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNMB + a__ZWGH) & (__UINTEGER_32)(~ a__ZWGH));
+          ptr_table__R3JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__0WGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__Q3JH=((__POINTER )(NULL));
+          result__S3JH=((__POINTER *)ptr_table__R3JH)[ 0];
+          if ((result__S3JH == (void *)NULL)) {
+            result__S3JH=new_lab__ZPJ(new_size__0WGH);
+            next__Q3JH=(void *)((unsigned long)result__S3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WGH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0WGH <<  1)) <=  4096)) {
+                next__Q3JH=(void *)((unsigned long)result__S3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0WGH)));
               } else {
-                next__HZJH=new_lab__QOJ(new_size__RSGH);
+                next__Q3JH=new_lab__ZPJ(new_size__0WGH);
               };
-              ((__POINTER *)next__HZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IZJH)[ 0]=next__HZJH;
+              ((__POINTER *)next__Q3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__R3JH)[ 0]=next__Q3JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__S3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Q3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__S3JH=next__Q3JH;
+            };
+          };
+          ptr__PNMB=result__S3JH;
+        } else {
+          t__4WGH=((__UINTEGER_32 )typ_id__UNMB);
+          a__3WGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__Z3JH=(__UINTEGER_32)((__UINTEGER_32)(sz__RNMB + a__3WGH) & (__UINTEGER_32)(~ a__3WGH));
+          ptr_table__W3JH=((__POINTER )(&(table_type[(t__4WGH)])));
+          lab_type__Y3JH=(__UINTEGER_32)(t__4WGH |  1);
+          next__V3JH=((__POINTER )(NULL));
+          result__X3JH=((__POINTER *)ptr_table__W3JH)[ 0];
+          if ((result__X3JH == (void *)NULL)) {
+            result__X3JH=new_lab__ZPJ(lab_type__Y3JH);
+            next__V3JH=(void *)((unsigned long)result__X3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3JH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Z3JH <<  1)) <=  4096)) {
+                next__V3JH=(void *)((unsigned long)result__X3JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z3JH)));
               } else {
-                next__MZJH=new_lab__QOJ(lab_type__PZJH);
+                next__V3JH=new_lab__ZPJ(lab_type__Y3JH);
               };
-              ((__POINTER *)next__MZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__NZJH)[ 0]=next__MZJH;
+              ((__POINTER *)next__V3JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__W3JH)[ 0]=next__V3JH;
             } else {
-              ((__POINTER *)result__OZJH)[ 0]=(void *)((unsigned long)((__POINTER *)next__MZJH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__OZJH=next__MZJH;
+              ((__POINTER *)result__X3JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__V3JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__X3JH=next__V3JH;
             };
           };
-          ptr__FMMB=result__OZJH;
+          ptr__PNMB=result__X3JH;
         };
-        result__EMMB=((__ITM_NUMBER *)ptr__FMMB);
-        *(result__EMMB) = *(ITM_NUMBER__);
+        result__ONMB=((__ITM_NUMBER *)ptr__PNMB);
+        *(result__ONMB) = *(ITM_NUMBER__);
       };
-      ((__ITM_NUMBER *)result__EMMB)->parent_itm_constant__SNO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__TNO;
-      result__ZMO=result__EMMB;
+      ((__ITM_NUMBER *)result__ONMB)->parent_itm_constant__1OO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__2OO;
+      result__COO=result__ONMB;
     };
-    __tmp__YNO=result__2BP;
+    __tmp__BPO=result__FDP;
   };
-  if (__tmp__YNO) {
-    __tmp__JOO=TRUE__;
+  if (__tmp__BPO) {
+    __tmp__SPO=TRUE__;
   } else {
-    result__03P=FALSE__;
-    old_pos__13P= 0;
-    count__23P= 0;
+    result__D5P=FALSE__;
+    old_pos__E5P= 0;
+    count__F5P= 0;
     if (read_space__KSD()) {
-      result__FNBH='\0';
+      result__ORBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__FNBH=((__CHARACTER )(( 0)));
+        result__ORBH=((__CHARACTER )(( 0)));
       } else {
-        result__FNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__ORBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      __tmp__G4P=(result__FNBH == '\'');
+      __tmp__P5P=(result__ORBH == '\'');
     } else {
-      __tmp__G4P=FALSE__;
+      __tmp__P5P=FALSE__;
     };
-    if (__tmp__G4P) {
-      old_pos__13P=position__CCC;
+    if (__tmp__P5P) {
+      old_pos__E5P=position__CCC;
       position__CCC=(__INTEGER)(position__CCC +  1);
       ((__STRING *)string_tmp__VH)->count__EGC= 0;
-      until_do__1HRC:
+      until_do__SJRC:
       {
-        result__PNBH='\0';
+        result__YRBH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__PNBH=((__CHARACTER )(( 0)));
+          result__YRBH=((__CHARACTER )(( 0)));
         } else {
-          result__PNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__YRBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__PNBH == ((__CHARACTER )(( 0))))) {
-          __tmp__F5P=TRUE__;
+        if ((result__YRBH == ((__CHARACTER )(( 0))))) {
+          __tmp__OAQ=TRUE__;
         } else {
-          result__YNBH='\0';
+          result__BSBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__YNBH=((__CHARACTER )(( 0)));
+            result__BSBH=((__CHARACTER )(( 0)));
           } else {
-            result__YNBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__BSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__F5P=(result__YNBH == '\n');
+          __tmp__OAQ=(result__BSBH == '\n');
         };
-        if (__tmp__F5P) {
-          __tmp__G5P=TRUE__;
+        if (__tmp__OAQ) {
+          __tmp__PAQ=TRUE__;
         } else {
-          result__3NBH='\0';
+          result__GSBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__3NBH=((__CHARACTER )(( 0)));
+            result__GSBH=((__CHARACTER )(( 0)));
           } else {
-            result__3NBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__GSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          __tmp__G5P=(result__3NBH == '\'');
+          __tmp__PAQ=(result__GSBH == '\'');
         };
-        if ((! __tmp__G5P)) {
-          result__COBH='\0';
+        if ((! __tmp__PAQ)) {
+          result__LSBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__COBH=((__CHARACTER )(( 0)));
+            result__LSBH=((__CHARACTER )(( 0)));
           } else {
-            result__COBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__LSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          add_last__UHT(string_tmp__VH,result__COBH);
-          result__HOBH='\0';
+          add_last__3IT(string_tmp__VH,result__LSBH);
+          result__QSBH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__HOBH=((__CHARACTER )(( 0)));
+            result__QSBH=((__CHARACTER )(( 0)));
           } else {
-            result__HOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__QSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__HOBH == '\\')) {
+          if ((result__QSBH == '\\')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            read_escape_character__JWKF();
-            count__23P=(__INTEGER)(count__23P +  1);
+            read_escape_character__AZKF();
+            count__F5P=(__INTEGER)(count__F5P +  1);
           } else {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            count__23P=(__INTEGER)(count__23P +  1);
+            count__F5P=(__INTEGER)(count__F5P +  1);
           };
-          goto until_do__1HRC;
+          goto until_do__SJRC;
         };
       };
-      result__MOBH='\0';
+      result__VSBH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__MOBH=((__CHARACTER )(( 0)));
+        result__VSBH=((__CHARACTER )(( 0)));
       } else {
-        result__MOBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__VSBH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__MOBH == '\'')) {
+      if ((result__VSBH == '\'')) {
         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)) {
+        if ((count__F5P !=  1)) {
+          position__CCC=begin_position__I5D;
+          pos__W2ZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_328));
+          put_position__LNG(pos__W2ZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__03P=TRUE__;
-        short__token__to__YBD((&__string_122),old_pos__13P,position__CCC);
+        result__D5P=TRUE__;
+        short__token__to__YBD((&__string_122),old_pos__E5P,position__CCC);
       } else {
-        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)) {
+        position__CCC=begin_position__I5D;
+        pos__Y2ZG=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_329));
+        put_position__LNG(pos__Y2ZG);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
     };
-    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)));
+    if (result__D5P) {
+      __tmp__OPO=current_position__AWF();
+      result__CPMB=NULL;
+      ptr__DPMB=((__POINTER )(NULL));
+      typ_id__IPMB= 0;
+      sz__FPMB=((__UINTEGER_32 )sizeof(__ITM_CHARACTER));
+      if ((sz__FPMB ==  0)) {
+        result__CPMB=ITM_CHARACTER__;
+      } else {
+        typ_id__IPMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__FPMB);
+        if ((typ_id__IPMB == (__INTEGER)(-  1))) {
+          a__BXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__CXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPMB + a__BXGH) & (__UINTEGER_32)(~ a__BXGH));
+          ptr_table__13JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__03JH=((__POINTER )(NULL));
+          result__23JH=((__POINTER *)ptr_table__13JH)[ 0];
+          if ((result__23JH == (void *)NULL)) {
+            result__23JH=new_lab__ZPJ(new_size__CXGH);
+            next__03JH=(void *)((unsigned long)result__23JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXGH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CXGH <<  1)) <=  4096)) {
+                next__03JH=(void *)((unsigned long)result__23JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CXGH)));
               } else {
-                next__RZJH=new_lab__QOJ(new_size__ZSGH);
+                next__03JH=new_lab__ZPJ(new_size__CXGH);
               };
-              ((__POINTER *)next__RZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__SZJH)[ 0]=next__RZJH;
+              ((__POINTER *)next__03JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__13JH)[ 0]=next__03JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__23JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__03JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__23JH=next__03JH;
+            };
+          };
+          ptr__DPMB=result__23JH;
+        } else {
+          t__GXGH=((__UINTEGER_32 )typ_id__IPMB);
+          a__FXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__D4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__FPMB + a__FXGH) & (__UINTEGER_32)(~ a__FXGH));
+          ptr_table__A4JH=((__POINTER )(&(table_type[(t__GXGH)])));
+          lab_type__C4JH=(__UINTEGER_32)(t__GXGH |  1);
+          next__53JH=((__POINTER )(NULL));
+          result__B4JH=((__POINTER *)ptr_table__A4JH)[ 0];
+          if ((result__B4JH == (void *)NULL)) {
+            result__B4JH=new_lab__ZPJ(lab_type__C4JH);
+            next__53JH=(void *)((unsigned long)result__B4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D4JH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__D4JH <<  1)) <=  4096)) {
+                next__53JH=(void *)((unsigned long)result__B4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__D4JH)));
               } else {
-                next__WZJH=new_lab__QOJ(lab_type__ZZJH);
+                next__53JH=new_lab__ZPJ(lab_type__C4JH);
               };
-              ((__POINTER *)next__WZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__XZJH)[ 0]=next__WZJH;
+              ((__POINTER *)next__53JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__A4JH)[ 0]=next__53JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__B4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__53JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__B4JH=next__53JH;
+            };
+          };
+          ptr__DPMB=result__B4JH;
+        };
+        result__CPMB=((__ITM_CHARACTER *)ptr__DPMB);
+        *(result__CPMB) = *(ITM_CHARACTER__);
+      };
+      ((__ITM_CHARACTER *)result__CPMB)->parent_itm_constant__NPO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__OPO;
+      result__COO=result__CPMB;
+    };
+    __tmp__SPO=result__D5P;
+  };
+  if ((! __tmp__SPO)) {
+    if (read_string__PCQ()) {
+      __tmp__5PO=current_position__AWF();
+      result__WQMB=NULL;
+      ptr__XQMB=((__POINTER )(NULL));
+      typ_id__2QMB= 0;
+      sz__ZQMB=((__UINTEGER_32 )sizeof(__ITM_STRING));
+      if ((sz__ZQMB ==  0)) {
+        result__WQMB=ITM_STRING__;
+      } else {
+        typ_id__2QMB=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZQMB);
+        if ((typ_id__2QMB == (__INTEGER)(-  1))) {
+          a__JXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__KXGH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZQMB + a__JXGH) & (__UINTEGER_32)(~ a__JXGH));
+          ptr_table__F4JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KXGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__E4JH=((__POINTER )(NULL));
+          result__G4JH=((__POINTER *)ptr_table__F4JH)[ 0];
+          if ((result__G4JH == (void *)NULL)) {
+            result__G4JH=new_lab__ZPJ(new_size__KXGH);
+            next__E4JH=(void *)((unsigned long)result__G4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXGH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KXGH <<  1)) <=  4096)) {
+                next__E4JH=(void *)((unsigned long)result__G4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KXGH)));
               } else {
-                next__1ZJH=new_lab__QOJ(new_size__BTGH);
+                next__E4JH=new_lab__ZPJ(new_size__KXGH);
               };
-              ((__POINTER *)next__1ZJH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__2ZJH)[ 0]=next__1ZJH;
+              ((__POINTER *)next__E4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__F4JH)[ 0]=next__E4JH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__G4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__E4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__G4JH=next__E4JH;
+            };
+          };
+          ptr__XQMB=result__G4JH;
+        } else {
+          t__OXGH=((__UINTEGER_32 )typ_id__2QMB);
+          a__NXGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__N4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZQMB + a__NXGH) & (__UINTEGER_32)(~ a__NXGH));
+          ptr_table__K4JH=((__POINTER )(&(table_type[(t__OXGH)])));
+          lab_type__M4JH=(__UINTEGER_32)(t__OXGH |  1);
+          next__J4JH=((__POINTER )(NULL));
+          result__L4JH=((__POINTER *)ptr_table__K4JH)[ 0];
+          if ((result__L4JH == (void *)NULL)) {
+            result__L4JH=new_lab__ZPJ(lab_type__M4JH);
+            next__J4JH=(void *)((unsigned long)result__L4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4JH)));
+            ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__N4JH <<  1)) <=  4096)) {
+                next__J4JH=(void *)((unsigned long)result__L4JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__N4JH)));
               } else {
-                next__A0JH=new_lab__QOJ(lab_type__D0JH);
+                next__J4JH=new_lab__ZPJ(lab_type__M4JH);
               };
-              ((__POINTER *)next__A0JH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__B0JH)[ 0]=next__A0JH;
+              ((__POINTER *)next__J4JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__K4JH)[ 0]=next__J4JH;
             } else {
-              ((__POINTER *)result__C0JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__C0JH=next__A0JH;
+              ((__POINTER *)result__L4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__L4JH=next__J4JH;
             };
           };
-          ptr__NPMB=result__C0JH;
+          ptr__XQMB=result__L4JH;
         };
-        result__MPMB=((__ITM_STRING *)ptr__NPMB);
-        *(result__MPMB) = *(ITM_STRING__);
+        result__WQMB=((__ITM_STRING *)ptr__XQMB);
+        *(result__WQMB) = *(ITM_STRING__);
       };
-      ((__ITM_STRING *)result__MPMB)->parent_itm_constant__VOO.parent_itm_code__JTF.parent_itm_object__FAE.position__RAJ=__tmp__WOO;
-      result__ZMO=result__MPMB;
+      ((__ITM_STRING *)result__WQMB)->parent_itm_constant__4PO.parent_itm_code__SUF.parent_itm_object__OBE.position__0BJ=__tmp__5PO;
+      result__COO=result__WQMB;
     };
   };
-  return(result__ZMO);
+  return(result__COO);
 }
 
-static void* read_group__32GB(__PARSER *Self__42GB)
+static void* read_group__H4GB(__PARSER *Self__I4GB)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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);
+  void *e__K4GB;
+  __ITM_RESULT *result__U4JH,*result__HWWB;
+  __POINTER ptr__V4JH,ptr_table__44JH,next__34JH,result__54JH;
+  __POINTER ptr_table__D5JH,next__C5JH,result__E5JH,ptr__IWWB;
+  __POINTER ptr_table__O5JH,next__N5JH,result__P5JH,ptr_table__T5JH;
+  __POINTER next__S5JH,result__U5JH;
+  __INTEGER typ_id__W4JH,typ_id__NWWB;
+  __UINTEGER_32 sz__X4JH,a__Y4JH,new_size__Z4JH,t__04JH,a__14JH;
+  __UINTEGER_32 new_size__G5JH,lab_type__F5JH,sz__KWWB,a__Y0GH;
+  __UINTEGER_32 new_size__Z0GH,t__30GH,a__20GH,new_size__W5JH;
+  __UINTEGER_32 lab_type__V5JH;
+  __POSITION pos__G3ZG;
+  void *result__USHH,*result__L4GB;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__VSHH,*Self__WSHH;
+  __BOOLEAN result__O4JH,__tmp__04GB,result__R4JH,result__H5JH;
+  __BOOLEAN __tmp__BAHB,result__K5JH;
+  __CHARACTER result__P4JH,result__S4JH,result__I5JH,result__L5JH;
+  read_def_local__UZH(Self__I4GB);
+  result__USHH=NULL;
+  if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H)->parent_arrayed_collection__X2H.upper__MTT <  0)) {
+    result__USHH=create_with_capacity__5TI( 16);
   } else {
-    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:
+    Self__VSHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+    result__USHH=((void **)Self__VSHH->parent_arrayed_collection__X2H.storage__03T)[Self__VSHH->parent_arrayed_collection__X2H.upper__MTT];
+    Self__WSHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+    Self__WSHH->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__WSHH->parent_arrayed_collection__X2H.upper__MTT -  1);
+  };
+  result__L4GB=result__USHH;
+  e__K4GB=read_expr__L3I(Self__I4GB);
+  while_do__0DMB:
   {
-    if (((void *)e__A3GB != (void *)NULL)) {
-      result__F0JH=FALSE__;
+    if (((void *)e__K4GB != (void *)NULL)) {
+      result__O4JH=FALSE__;
       if ((! read_space__KSD())) {
-        result__F0JH=FALSE__;
+        result__O4JH=FALSE__;
       } else {
-        result__G0JH='\0';
+        result__P4JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__G0JH=((__CHARACTER )(( 0)));
+          result__P4JH=((__CHARACTER )(( 0)));
         } else {
-          result__G0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__P4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__G0JH == ';')) {
+        if ((result__P4JH == ';')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__F0JH=TRUE__;
+          result__O4JH=TRUE__;
         };
       };
-      __tmp__Q3GB=result__F0JH;
+      __tmp__04GB=result__O4JH;
     } else {
-      __tmp__Q3GB=FALSE__;
+      __tmp__04GB=FALSE__;
     };
-    if (__tmp__Q3GB) {
-      add_last__H1U(result__B3GB,e__A3GB);
-      e__A3GB=read_expr__C2I(Self__42GB);
-      goto while_do__QCMB;
+    if (__tmp__04GB) {
+      add_last__Q2U(result__L4GB,e__K4GB);
+      e__K4GB=read_expr__L3I(Self__I4GB);
+      goto while_do__0DMB;
     };
   };
-  if (((void *)e__A3GB != (void *)NULL)) {
-    result__I0JH=FALSE__;
+  if (((void *)e__K4GB != (void *)NULL)) {
+    result__R4JH=FALSE__;
     if ((! read_space__KSD())) {
-      result__I0JH=FALSE__;
+      result__R4JH=FALSE__;
     } else {
-      result__J0JH='\0';
+      result__S4JH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__J0JH=((__CHARACTER )(( 0)));
+        result__S4JH=((__CHARACTER )(( 0)));
       } else {
-        result__J0JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__S4JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__J0JH == ',')) {
+      if ((result__S4JH == ',')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__I0JH=TRUE__;
+        result__R4JH=TRUE__;
       };
     };
-    if (result__I0JH) {
+    if (result__R4JH) {
       do {
-        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;
+        result__U4JH=NULL;
+        ptr__V4JH=((__POINTER )(NULL));
+        typ_id__W4JH= 0;
+        sz__X4JH=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+        if ((sz__X4JH ==  0)) {
+          result__U4JH=ITM_RESULT__;
+        } else {
+          typ_id__W4JH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__X4JH);
+          if ((typ_id__W4JH == (__INTEGER)(-  1))) {
+            a__Y4JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__Z4JH=(__UINTEGER_32)((__UINTEGER_32)(sz__X4JH + a__Y4JH) & (__UINTEGER_32)(~ a__Y4JH));
+            ptr_table__44JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z4JH / ((__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__ZPJ(new_size__Z4JH);
+              next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4JH)));
+              ((__POINTER *)next__34JH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
             } else {
-              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)));
+              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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Z4JH <<  1)) <=  4096)) {
+                  next__34JH=(void *)((unsigned long)result__54JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z4JH)));
                 } else {
-                  next__U0JH=new_lab__QOJ(new_size__Q0JH);
+                  next__34JH=new_lab__ZPJ(new_size__Z4JH);
                 };
-                ((__POINTER *)next__U0JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__V0JH)[ 0]=next__U0JH;
+                ((__POINTER *)next__34JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__44JH)[ 0]=next__34JH;
               } else {
-                ((__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;
+                ((__POINTER *)result__54JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__34JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__54JH=next__34JH;
+              };
+            };
+            ptr__V4JH=result__54JH;
+          } else {
+            t__04JH=((__UINTEGER_32 )typ_id__W4JH);
+            a__14JH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__G5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__X4JH + a__14JH) & (__UINTEGER_32)(~ a__14JH));
+            ptr_table__D5JH=((__POINTER )(&(table_type[(t__04JH)])));
+            lab_type__F5JH=(__UINTEGER_32)(t__04JH |  1);
+            next__C5JH=((__POINTER )(NULL));
+            result__E5JH=((__POINTER *)ptr_table__D5JH)[ 0];
+            if ((result__E5JH == (void *)NULL)) {
+              result__E5JH=new_lab__ZPJ(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__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)));
+              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__GUH)))) &  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__Z0JH=new_lab__QOJ(lab_type__20JH);
+                  next__C5JH=new_lab__ZPJ(lab_type__F5JH);
                 };
-                ((__POINTER *)next__Z0JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__00JH)[ 0]=next__Z0JH;
+                ((__POINTER *)next__C5JH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__D5JH)[ 0]=next__C5JH;
               } else {
-                ((__POINTER *)result__10JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Z0JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__10JH=next__Z0JH;
+                ((__POINTER *)result__E5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__C5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__E5JH=next__C5JH;
               };
             };
-            ptr__M0JH=result__10JH;
+            ptr__V4JH=result__E5JH;
           };
-          result__L0JH=((__ITM_RESULT *)ptr__M0JH);
-          *(result__L0JH) = *(ITM_RESULT__);
+          result__U4JH=((__ITM_RESULT *)ptr__V4JH);
+          *(result__U4JH) = *(ITM_RESULT__);
         };
-        ((__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:
+        ((__ITM_RESULT *)result__U4JH)->value__XKFC=e__K4GB;
+        add_last__Q2U(result__L4GB,result__U4JH);
+        e__K4GB=read_expr__L3I(Self__I4GB);
+        while_do__1Y3B:
         {
-          if (((void *)e__A3GB != (void *)NULL)) {
-            result__40JH=FALSE__;
+          if (((void *)e__K4GB != (void *)NULL)) {
+            result__H5JH=FALSE__;
             if ((! read_space__KSD())) {
-              result__40JH=FALSE__;
+              result__H5JH=FALSE__;
             } else {
-              result__50JH='\0';
+              result__I5JH='\0';
               if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-                result__50JH=((__CHARACTER )(( 0)));
+                result__I5JH=((__CHARACTER )(( 0)));
               } else {
-                result__50JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+                result__I5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
               };
-              if ((result__50JH == ';')) {
+              if ((result__I5JH == ';')) {
                 position__CCC=(__INTEGER)(position__CCC +  1);
-                result__40JH=TRUE__;
+                result__H5JH=TRUE__;
               };
             };
-            __tmp__X4GB=result__40JH;
+            __tmp__BAHB=result__H5JH;
           } else {
-            __tmp__X4GB=FALSE__;
+            __tmp__BAHB=FALSE__;
           };
-          if (__tmp__X4GB) {
-            add_last__H1U(result__B3GB,e__A3GB);
-            e__A3GB=read_expr__C2I(Self__42GB);
-            goto while_do__PX3B;
+          if (__tmp__BAHB) {
+            add_last__Q2U(result__L4GB,e__K4GB);
+            e__K4GB=read_expr__L3I(Self__I4GB);
+            goto while_do__1Y3B;
           };
         };
-        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)) {
+        if (((void *)e__K4GB == (void *)NULL)) {
+          pos__G3ZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_330));
+          put_position__LNG(pos__G3ZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        result__B1JH=FALSE__;
+        result__K5JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__B1JH=FALSE__;
+          result__K5JH=FALSE__;
         } else {
-          result__C1JH='\0';
+          result__L5JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__C1JH=((__CHARACTER )(( 0)));
+            result__L5JH=((__CHARACTER )(( 0)));
           } else {
-            result__C1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__L5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__C1JH == ',')) {
+          if ((result__L5JH == ',')) {
             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)));
+            result__K5JH=TRUE__;
+          };
+        };
+      } while (result__K5JH);
+    };
+    result__HWWB=NULL;
+    ptr__IWWB=((__POINTER )(NULL));
+    typ_id__NWWB= 0;
+    sz__KWWB=((__UINTEGER_32 )sizeof(__ITM_RESULT));
+    if ((sz__KWWB ==  0)) {
+      result__HWWB=ITM_RESULT__;
+    } else {
+      typ_id__NWWB=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KWWB);
+      if ((typ_id__NWWB == (__INTEGER)(-  1))) {
+        a__Y0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Z0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__KWWB + a__Y0GH) & (__UINTEGER_32)(~ a__Y0GH));
+        ptr_table__O5JH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Z0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__N5JH=((__POINTER )(NULL));
+        result__P5JH=((__POINTER *)ptr_table__O5JH)[ 0];
+        if ((result__P5JH == (void *)NULL)) {
+          result__P5JH=new_lab__ZPJ(new_size__Z0GH);
+          next__N5JH=(void *)((unsigned long)result__P5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z0GH)));
+          ((__POINTER *)next__N5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__O5JH)[ 0]=next__N5JH;
+        } else {
+          next__N5JH=((__POINTER *)result__P5JH)[ 0];
+          if ((next__N5JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__P5JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Z0GH <<  1)) <=  4096)) {
+              next__N5JH=(void *)((unsigned long)result__P5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Z0GH)));
             } else {
-              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)));
+              next__N5JH=new_lab__ZPJ(new_size__Z0GH);
+            };
+            ((__POINTER *)next__N5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__O5JH)[ 0]=next__N5JH;
+          } else {
+            ((__POINTER *)result__P5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__N5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__P5JH=next__N5JH;
+          };
+        };
+        ptr__IWWB=result__P5JH;
+      } else {
+        t__30GH=((__UINTEGER_32 )typ_id__NWWB);
+        a__20GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__W5JH=(__UINTEGER_32)((__UINTEGER_32)(sz__KWWB + a__20GH) & (__UINTEGER_32)(~ a__20GH));
+        ptr_table__T5JH=((__POINTER )(&(table_type[(t__30GH)])));
+        lab_type__V5JH=(__UINTEGER_32)(t__30GH |  1);
+        next__S5JH=((__POINTER )(NULL));
+        result__U5JH=((__POINTER *)ptr_table__T5JH)[ 0];
+        if ((result__U5JH == (void *)NULL)) {
+          result__U5JH=new_lab__ZPJ(lab_type__V5JH);
+          next__S5JH=(void *)((unsigned long)result__U5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5JH)));
+          ((__POINTER *)next__S5JH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__T5JH)[ 0]=next__S5JH;
+        } else {
+          next__S5JH=((__POINTER *)result__U5JH)[ 0];
+          if ((next__S5JH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__U5JH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__W5JH <<  1)) <=  4096)) {
+              next__S5JH=(void *)((unsigned long)result__U5JH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__W5JH)));
             } else {
-              next__J1JH=new_lab__QOJ(lab_type__M1JH);
+              next__S5JH=new_lab__ZPJ(lab_type__V5JH);
             };
-            ((__POINTER *)next__J1JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__K1JH)[ 0]=next__J1JH;
+            ((__POINTER *)next__S5JH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__T5JH)[ 0]=next__S5JH;
           } else {
-            ((__POINTER *)result__L1JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__J1JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__L1JH=next__J1JH;
+            ((__POINTER *)result__U5JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__S5JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__U5JH=next__S5JH;
           };
         };
-        ptr__2UWB=result__L1JH;
+        ptr__IWWB=result__U5JH;
       };
-      result__1UWB=((__ITM_RESULT *)ptr__2UWB);
-      *(result__1UWB) = *(ITM_RESULT__);
+      result__HWWB=((__ITM_RESULT *)ptr__IWWB);
+      *(result__HWWB) = *(ITM_RESULT__);
     };
-    ((__ITM_RESULT *)result__1UWB)->value__DJFC=e__A3GB;
-    e__A3GB=result__1UWB;
-    add_last__H1U(result__LOHH,result__1UWB);
+    ((__ITM_RESULT *)result__HWWB)->value__XKFC=e__K4GB;
+    e__K4GB=result__HWWB;
+    add_last__Q2U(result__USHH,result__HWWB);
   };
-  return(copy__42H(result__LOHH));
+  return(copy__H4H(result__USHH));
 }
 
-static void* readlip_expr_operator__BLZB(__PARSER *Self__CLZB)
+static void* readlip_expr_operator__NMZB(__PARSER *Self__OMZB)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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:
+  void *right__RMZB,*result__QMZB;
+  __POSITION pos__23ZG,p__GAKH,p__3AKH;
+  __LIP_BINARY *result__35JH,*Self__FAKH,*result__UAKH,*Self__2AKH;
+  __POINTER ptr__45JH,ptr_table__LAKH,next__KAKH,result__MAKH;
+  __POINTER ptr_table__QAKH,next__PAKH,result__RAKH,ptr__VAKH;
+  __POINTER ptr_table__CBKH,next__BBKH,result__DBKH,ptr_table__HBKH;
+  __POINTER next__GBKH,result__IBKH;
+  __INTEGER typ_id__55JH,typ_id__WAKH;
+  __UINTEGER_32 sz__AAKH,a__BAKH,new_size__CAKH,t__DAKH,a__EAKH;
+  __UINTEGER_32 new_size__TAKH,lab_type__SAKH,sz__XAKH,a__YAKH;
+  __UINTEGER_32 new_size__ZAKH,t__0AKH,a__1AKH,new_size__KBKH;
+  __UINTEGER_32 lab_type__JBKH;
+  __BOOLEAN result__X5JH,__tmp__GNZB,result__05JH;
+  __CHARACTER result__Y5JH,result__15JH;
+  right__RMZB=NULL;
+  result__QMZB=readlip_expr_cmp__BZ1B(Self__OMZB);
+  if (((void *)result__QMZB != (void *)NULL)) {
+    while_do__Q04B:
     {
-      result__O1JH=FALSE__;
+      result__X5JH=FALSE__;
       if ((! read_space__KSD())) {
-        result__O1JH=FALSE__;
+        result__X5JH=FALSE__;
       } else {
-        result__P1JH='\0';
+        result__Y5JH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__P1JH=((__CHARACTER )(( 0)));
+          result__Y5JH=((__CHARACTER )(( 0)));
         } else {
-          result__P1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__Y5JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__P1JH == '|')) {
+        if ((result__Y5JH == '|')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__O1JH=TRUE__;
+          result__X5JH=TRUE__;
         };
       };
-      if (result__O1JH) {
-        __tmp__0LZB=TRUE__;
+      if (result__X5JH) {
+        __tmp__GNZB=TRUE__;
       } else {
-        result__R1JH=FALSE__;
+        result__05JH=FALSE__;
         if ((! read_space__KSD())) {
-          result__R1JH=FALSE__;
+          result__05JH=FALSE__;
         } else {
-          result__S1JH='\0';
+          result__15JH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__S1JH=((__CHARACTER )(( 0)));
+            result__15JH=((__CHARACTER )(( 0)));
           } else {
-            result__S1JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__15JH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__S1JH == '&')) {
+          if ((result__15JH == '&')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__R1JH=TRUE__;
+            result__05JH=TRUE__;
           };
         };
-        __tmp__0LZB=result__R1JH;
+        __tmp__GNZB=result__05JH;
       };
-      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)) {
+      if (__tmp__GNZB) {
+        right__RMZB=readlip_expr_cmp__BZ1B(Self__OMZB);
+        if (((void *)right__RMZB == (void *)NULL)) {
+          pos__23ZG=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_240));
+          put_position__LNG(pos__23ZG);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__X5JH) {
+          p__GAKH=current_position__AWF();
+          result__35JH=NULL;
+          ptr__45JH=((__POINTER )(NULL));
+          typ_id__55JH= 0;
+          sz__AAKH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__AAKH ==  0)) {
+            result__35JH=LIP_BINARY__;
+          } else {
+            typ_id__55JH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__AAKH);
+            if ((typ_id__55JH == (__INTEGER)(-  1))) {
+              a__BAKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__CAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__AAKH + a__BAKH) & (__UINTEGER_32)(~ a__BAKH));
+              ptr_table__LAKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__CAKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__KAKH=((__POINTER )(NULL));
+              result__MAKH=((__POINTER *)ptr_table__LAKH)[ 0];
+              if ((result__MAKH == (void *)NULL)) {
+                result__MAKH=new_lab__ZPJ(new_size__CAKH);
+                next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAKH)));
+                ((__POINTER *)next__KAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
               } else {
-                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)));
+                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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CAKH <<  1)) <=  4096)) {
+                    next__KAKH=(void *)((unsigned long)result__MAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CAKH)));
                   } else {
-                    next__B2JH=new_lab__QOJ(new_size__Z1JH);
+                    next__KAKH=new_lab__ZPJ(new_size__CAKH);
                   };
-                  ((__POINTER *)next__B2JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__C2JH)[ 0]=next__B2JH;
+                  ((__POINTER *)next__KAKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__LAKH)[ 0]=next__KAKH;
                 } else {
-                  ((__POINTER *)result__D2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__B2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__D2JH=next__B2JH;
+                  ((__POINTER *)result__MAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__KAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__MAKH=next__KAKH;
                 };
               };
-              ptr__V1JH=result__D2JH;
+              ptr__45JH=result__MAKH;
             } else {
-              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;
+              t__DAKH=((__UINTEGER_32 )typ_id__55JH);
+              a__EAKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__TAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__AAKH + a__EAKH) & (__UINTEGER_32)(~ a__EAKH));
+              ptr_table__QAKH=((__POINTER )(&(table_type[(t__DAKH)])));
+              lab_type__SAKH=(__UINTEGER_32)(t__DAKH |  1);
+              next__PAKH=((__POINTER )(NULL));
+              result__RAKH=((__POINTER *)ptr_table__QAKH)[ 0];
+              if ((result__RAKH == (void *)NULL)) {
+                result__RAKH=new_lab__ZPJ(lab_type__SAKH);
+                next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TAKH)));
+                ((__POINTER *)next__PAKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
               } else {
-                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)));
+                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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__TAKH <<  1)) <=  4096)) {
+                    next__PAKH=(void *)((unsigned long)result__RAKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__TAKH)));
                   } else {
-                    next__G2JH=new_lab__QOJ(lab_type__J2JH);
+                    next__PAKH=new_lab__ZPJ(lab_type__SAKH);
                   };
-                  ((__POINTER *)next__G2JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__H2JH)[ 0]=next__G2JH;
+                  ((__POINTER *)next__PAKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__QAKH)[ 0]=next__PAKH;
                 } else {
-                  ((__POINTER *)result__I2JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__G2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__I2JH=next__G2JH;
+                  ((__POINTER *)result__RAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__RAKH=next__PAKH;
                 };
               };
-              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;
+              ptr__45JH=result__RAKH;
+            };
+            result__35JH=((__LIP_BINARY *)ptr__45JH);
+            *(result__35JH) = *(LIP_BINARY__);
+          };
+          Self__FAKH=((__LIP_BINARY *)result__35JH);
+          Self__FAKH->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ=p__GAKH;
+          Self__FAKH->left__YXQD=result__QMZB;
+          Self__FAKH->right__1XQD=right__RMZB;
+          Self__FAKH->operator__4XQD='|';
+          result__QMZB=result__35JH;
+        } else {
+          p__3AKH=current_position__AWF();
+          result__UAKH=NULL;
+          ptr__VAKH=((__POINTER )(NULL));
+          typ_id__WAKH= 0;
+          sz__XAKH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__XAKH ==  0)) {
+            result__UAKH=LIP_BINARY__;
+          } else {
+            typ_id__WAKH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__XAKH);
+            if ((typ_id__WAKH == (__INTEGER)(-  1))) {
+              a__YAKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__ZAKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XAKH + a__YAKH) & (__UINTEGER_32)(~ a__YAKH));
+              ptr_table__CBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__ZAKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__BBKH=((__POINTER )(NULL));
+              result__DBKH=((__POINTER *)ptr_table__CBKH)[ 0];
+              if ((result__DBKH == (void *)NULL)) {
+                result__DBKH=new_lab__ZPJ(new_size__ZAKH);
+                next__BBKH=(void *)((unsigned long)result__DBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZAKH)));
+                ((__POINTER *)next__BBKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CBKH)[ 0]=next__BBKH;
               } else {
-                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)));
+                next__BBKH=((__POINTER *)result__DBKH)[ 0];
+                if ((next__BBKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DBKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__ZAKH <<  1)) <=  4096)) {
+                    next__BBKH=(void *)((unsigned long)result__DBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__ZAKH)));
                   } else {
-                    next__Y2JH=new_lab__QOJ(new_size__Q2JH);
+                    next__BBKH=new_lab__ZPJ(new_size__ZAKH);
                   };
-                  ((__POINTER *)next__Y2JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__Z2JH)[ 0]=next__Y2JH;
+                  ((__POINTER *)next__BBKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CBKH)[ 0]=next__BBKH;
                 } else {
-                  ((__POINTER *)result__02JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__Y2JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__02JH=next__Y2JH;
+                  ((__POINTER *)result__DBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__DBKH=next__BBKH;
                 };
               };
-              ptr__M2JH=result__02JH;
+              ptr__VAKH=result__DBKH;
             } else {
-              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;
+              t__0AKH=((__UINTEGER_32 )typ_id__WAKH);
+              a__1AKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__XAKH + a__1AKH) & (__UINTEGER_32)(~ a__1AKH));
+              ptr_table__HBKH=((__POINTER )(&(table_type[(t__0AKH)])));
+              lab_type__JBKH=(__UINTEGER_32)(t__0AKH |  1);
+              next__GBKH=((__POINTER )(NULL));
+              result__IBKH=((__POINTER *)ptr_table__HBKH)[ 0];
+              if ((result__IBKH == (void *)NULL)) {
+                result__IBKH=new_lab__ZPJ(lab_type__JBKH);
+                next__GBKH=(void *)((unsigned long)result__IBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBKH)));
+                ((__POINTER *)next__GBKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HBKH)[ 0]=next__GBKH;
               } else {
-                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)));
+                next__GBKH=((__POINTER *)result__IBKH)[ 0];
+                if ((next__GBKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IBKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KBKH <<  1)) <=  4096)) {
+                    next__GBKH=(void *)((unsigned long)result__IBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KBKH)));
                   } else {
-                    next__32JH=new_lab__QOJ(lab_type__A3JH);
+                    next__GBKH=new_lab__ZPJ(lab_type__JBKH);
                   };
-                  ((__POINTER *)next__32JH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__42JH)[ 0]=next__32JH;
+                  ((__POINTER *)next__GBKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HBKH)[ 0]=next__GBKH;
                 } else {
-                  ((__POINTER *)result__52JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__32JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__52JH=next__32JH;
+                  ((__POINTER *)result__IBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IBKH=next__GBKH;
                 };
               };
-              ptr__M2JH=result__52JH;
+              ptr__VAKH=result__IBKH;
             };
-            result__L2JH=((__LIP_BINARY *)ptr__M2JH);
-            *(result__L2JH) = *(LIP_BINARY__);
+            result__UAKH=((__LIP_BINARY *)ptr__VAKH);
+            *(result__UAKH) = *(LIP_BINARY__);
           };
-          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;
+          Self__2AKH=((__LIP_BINARY *)result__UAKH);
+          Self__2AKH->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ=p__3AKH;
+          Self__2AKH->left__YXQD=result__QMZB;
+          Self__2AKH->right__1XQD=right__RMZB;
+          Self__2AKH->operator__4XQD='&';
+          result__QMZB=result__UAKH;
         };
-        goto while_do__EZ4B;
+        goto while_do__Q04B;
       };
     };
   };
-  return(result__ELZB);
+  return(result__QMZB);
 }
 
-static __FAST_ARRAYoLIP_CODEo* create_with_capacity__IRKD(__INTEGER new_count__KRKD)
+static __FAST_ARRAYoLIP_CODEo* create_with_capacity__QRKD(__INTEGER new_count__SRKD)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__F2LD,ptr_table__MBKH,next__LBKH,result__NBKH;
+  __POINTER ptr_table__RBKH,next__QBKH,result__SBKH;
+  __INTEGER typ_id__K2LD;
+  __UINTEGER_32 sz__H2LD,a__I1GH,new_size__J1GH,t__N1GH,a__M1GH;
+  __UINTEGER_32 new_size__UBKH,lab_type__TBKH;
+  __FAST_ARRAYoLIP_CODEo *result__E2LD,*Self__A5TD;
+  result__E2LD=NULL;
+  ptr__F2LD=((__POINTER )(NULL));
+  typ_id__K2LD= 0;
+  sz__H2LD=((__UINTEGER_32 )sizeof(__FAST_ARRAYoLIP_CODEo));
+  if ((sz__H2LD ==  0)) {
+    result__E2LD=FAST_ARRAYoLIP_CODEo__;
   } else {
-    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);
+    typ_id__K2LD=__FAST_ARRAYoLIP_CODEo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__H2LD);
+    if ((typ_id__K2LD == (__INTEGER)(-  1))) {
+      a__I1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__J1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__H2LD + a__I1GH) & (__UINTEGER_32)(~ a__I1GH));
+      ptr_table__MBKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__J1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__LBKH=((__POINTER )(NULL));
+      result__NBKH=((__POINTER *)ptr_table__MBKH)[ 0];
+      if ((result__NBKH == (void *)NULL)) {
+        result__NBKH=new_lab__ZPJ(new_size__J1GH);
+        next__LBKH=(void *)((unsigned long)result__NBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1GH)));
+        ((__POINTER *)next__LBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__MBKH)[ 0]=next__LBKH;
+      } else {
+        next__LBKH=((__POINTER *)result__NBKH)[ 0];
+        if ((next__LBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NBKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__J1GH <<  1)) <=  4096)) {
+            next__LBKH=(void *)((unsigned long)result__NBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__J1GH)));
+          } else {
+            next__LBKH=new_lab__ZPJ(new_size__J1GH);
+          };
+          ((__POINTER *)next__LBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__MBKH)[ 0]=next__LBKH;
+        } else {
+          ((__POINTER *)result__NBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__NBKH=next__LBKH;
+        };
+      };
+      ptr__F2LD=result__NBKH;
+    } else {
+      t__N1GH=((__UINTEGER_32 )typ_id__K2LD);
+      a__M1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__UBKH=(__UINTEGER_32)((__UINTEGER_32)(sz__H2LD + a__M1GH) & (__UINTEGER_32)(~ a__M1GH));
+      ptr_table__RBKH=((__POINTER )(&(table_type[(t__N1GH)])));
+      lab_type__TBKH=(__UINTEGER_32)(t__N1GH |  1);
+      next__QBKH=((__POINTER )(NULL));
+      result__SBKH=((__POINTER *)ptr_table__RBKH)[ 0];
+      if ((result__SBKH == (void *)NULL)) {
+        result__SBKH=new_lab__ZPJ(lab_type__TBKH);
+        next__QBKH=(void *)((unsigned long)result__SBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBKH)));
+        ((__POINTER *)next__QBKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__RBKH)[ 0]=next__QBKH;
+      } else {
+        next__QBKH=((__POINTER *)result__SBKH)[ 0];
+        if ((next__QBKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SBKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UBKH <<  1)) <=  4096)) {
+            next__QBKH=(void *)((unsigned long)result__SBKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UBKH)));
+          } else {
+            next__QBKH=new_lab__ZPJ(lab_type__TBKH);
+          };
+          ((__POINTER *)next__QBKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__RBKH)[ 0]=next__QBKH;
+        } else {
+          ((__POINTER *)result__SBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__SBKH=next__QBKH;
+        };
+      };
+      ptr__F2LD=result__SBKH;
+    };
+    result__E2LD=((__FAST_ARRAYoLIP_CODEo *)ptr__F2LD);
+    *(result__E2LD) = *(FAST_ARRAYoLIP_CODEo__);
+  };
+  Self__A5TD=((__FAST_ARRAYoLIP_CODEo *)result__E2LD);
+  if ((Self__A5TD->parent_arrayed_collection__WMYC.capacity__GQTD < new_count__SRKD)) {
+    Self__A5TD->parent_arrayed_collection__WMYC.storage__RQTD=create__ATIE(new_count__SRKD);
+    Self__A5TD->parent_arrayed_collection__WMYC.capacity__GQTD=new_count__SRKD;
+  };
+  Self__A5TD->parent_arrayed_collection__WMYC.upper__ICQD=(__INTEGER)(-  1);
+  return(result__E2LD);
 }
 
-static void add_last__CKUD(__FAST_ARRAYoLIP_CODEo *Self__DKUD,void *element__EKUD)
+static void add_last__UJUD(__FAST_ARRAYoLIP_CODEo *Self__VJUD,void *element__WJUD)
 // ({FAST_ARRAYoLIP_CODEo},{NULLxLIP_AFFECTxLIP_BINARYxLIP_UNARYxLIP_CALLxLIP_IFxLIP_PRINTxLIP_VALUE}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__XJUD,__tmp__1KUD,__tmp__4VWE,Self__2VQF;
+  __BOOLEAN __tmp__FKUD;
+  void **__tmp__0KUD,**new__KVWE;
+  new_capacity__XJUD= 0;
+  if (((__INTEGER)(Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD +  1) <= (__INTEGER)(Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD -  1))) {
+    Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD=(__INTEGER)(Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD +  1);
+    __tmp__FKUD=TRUE__;
   } else {
-    __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;
+    __tmp__FKUD=FALSE__;
+  };
+  if ((! __tmp__FKUD)) {
+    if ((Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD ==  0)) {
+      Self__VJUD->parent_arrayed_collection__WMYC.storage__RQTD=create__ATIE( 2);
+      Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD= 2;
+      Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD= 0;
+    } else {
+      new_capacity__XJUD=(__INTEGER)(Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD <<  1);
+      __tmp__0KUD=Self__VJUD->parent_arrayed_collection__WMYC.storage__RQTD;
+      __tmp__1KUD=Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD;
+      new__KVWE=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__0KUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__1KUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__XJUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__4VWE=(__INTEGER)(new_capacity__XJUD -  1);
+      Self__2VQF=__tmp__1KUD;
+      while ((Self__2VQF <= __tmp__4VWE)) {
+        new__KVWE[Self__2VQF]=NULL;
+        Self__2VQF=(__INTEGER)(Self__2VQF +  1);
+      };
+      Self__VJUD->parent_arrayed_collection__WMYC.storage__RQTD=new__KVWE;
+      Self__VJUD->parent_arrayed_collection__WMYC.capacity__GQTD=new_capacity__XJUD;
+      Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD=(__INTEGER)(Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD +  1);
+    };
+  };
+  ((void **)Self__VJUD->parent_arrayed_collection__WMYC.storage__RQTD)[Self__VJUD->parent_arrayed_collection__WMYC.upper__ICQD]=element__WJUD;
 }
 
-static void* copy__ULID(void *tmp__WLID)
+static void* copy__VMID(void *tmp__XMID)
 // ({NULLxFAST_ARRAYoLIP_CODEo}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__3PTD,other_upper__2PTD,Self__KNYE;
+  __INTEGER new_capacity__ZAUD,__tmp__BCUD,__tmp__KUWE,Self__3TQF;
+  void *result__ZMID;
+  __FAST_ARRAYoLIP_CODEo *Self__0PTD;
+  void **__tmp__UQTD,**__tmp__WQTD,**Self__LLWE;
+  __FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *Self__XAUD;
+  __BOOLEAN __tmp__IBUD;
+  void **__tmp__ACUD,**new__WTWE;
+  result__ZMID=create_with_capacity__QRKD((__INTEGER)(((__FAST_ARRAYoLIP_CODEo *)tmp__XMID)->parent_arrayed_collection__WMYC.upper__ICQD +  1));
+  Self__0PTD=((__FAST_ARRAYoLIP_CODEo *)result__ZMID);
+  new_capacity__3PTD= 0;
+  other_upper__2PTD=((__FAST_ARRAYoLIP_CODEo *)tmp__XMID)->parent_arrayed_collection__WMYC.upper__ICQD;
+  if ((other_upper__2PTD >=  0)) {
+    new_capacity__3PTD=(__INTEGER)(other_upper__2PTD +  1);
+    if ((Self__0PTD->parent_arrayed_collection__WMYC.capacity__GQTD < new_capacity__3PTD)) {
+      Self__0PTD->parent_arrayed_collection__WMYC.storage__RQTD=create__ATIE(new_capacity__3PTD);
+      Self__0PTD->parent_arrayed_collection__WMYC.capacity__GQTD=new_capacity__3PTD;
+    };
+    __tmp__UQTD=Self__0PTD->parent_arrayed_collection__WMYC.storage__RQTD;
+    __tmp__WQTD=((__FAST_ARRAYoLIP_CODEo *)tmp__XMID)->parent_arrayed_collection__WMYC.storage__RQTD;
+    Self__LLWE=((void **)__tmp__UQTD);
+    Self__KNYE=other_upper__2PTD;
+    while ((Self__KNYE >=  0)) {
+      Self__LLWE[Self__KNYE]=((void **)__tmp__WQTD)[Self__KNYE];
+      Self__KNYE=(__INTEGER)(Self__KNYE -  1);
+    };
+  };
+  Self__0PTD->parent_arrayed_collection__WMYC.upper__ICQD=other_upper__2PTD;
+  ((__FAST_ARRAYoLIP_CODEo *)tmp__XMID)->parent_arrayed_collection__WMYC.upper__ICQD=(__INTEGER)(-  1);
+  Self__XAUD=((__FAST_ARRAYoFAST_ARRAYoLIP_CODEoo *)free_list__TLID);
+  new_capacity__ZAUD= 0;
+  if (((__INTEGER)(Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD +  1) <= (__INTEGER)(Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD -  1))) {
+    Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD=(__INTEGER)(Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD +  1);
+    __tmp__IBUD=TRUE__;
   } else {
-    __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);
+    __tmp__IBUD=FALSE__;
+  };
+  if ((! __tmp__IBUD)) {
+    if ((Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD ==  0)) {
+      Self__XAUD->parent_arrayed_collection__SLID.storage__XBUD=create__UYIE( 2);
+      Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD= 2;
+      Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD= 0;
+    } else {
+      new_capacity__ZAUD=(__INTEGER)(Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD <<  1);
+      __tmp__ACUD=Self__XAUD->parent_arrayed_collection__SLID.storage__XBUD;
+      __tmp__BCUD=Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD;
+      new__WTWE=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__ACUD)),((__UINTEGER_32 )(__INTEGER)(__tmp__BCUD * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZAUD * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__KUWE=(__INTEGER)(new_capacity__ZAUD -  1);
+      Self__3TQF=__tmp__BCUD;
+      while ((Self__3TQF <= __tmp__KUWE)) {
+        new__WTWE[Self__3TQF]=NULL;
+        Self__3TQF=(__INTEGER)(Self__3TQF +  1);
+      };
+      Self__XAUD->parent_arrayed_collection__SLID.storage__XBUD=new__WTWE;
+      Self__XAUD->parent_arrayed_collection__SLID.capacity__1AUD=new_capacity__ZAUD;
+      Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD=(__INTEGER)(Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD +  1);
+    };
+  };
+  ((void **)Self__XAUD->parent_arrayed_collection__SLID.storage__XBUD)[Self__XAUD->parent_arrayed_collection__SLID.upper__0OTD]=tmp__XMID;
+  return(result__ZMID);
 }
 
-static void* fast_reference_at__ETRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__FTRD,void *k__GTRD)
+static void* fast_reference_at__4SRD(__HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo *Self__5SRD,void *k__ATRD)
 // ({HASHED_DICTIONARYoLIP_SLOT_DATAxSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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:
+  __STRING_CONSTANT *Self__NEIH;
+  __INTEGER result__MEIH,__tmp__OEIH,Self__PEIH;
+  void *node__KTRD;
+  __BOOLEAN __tmp__CURD;
+  Self__NEIH=((__STRING_CONSTANT *)k__ATRD);
+  result__MEIH= 0;
+  __tmp__OEIH=Self__NEIH->count__DD;
+  Self__PEIH= 1;
+  while ((Self__PEIH <= __tmp__OEIH)) {
+    result__MEIH=(__INTEGER)((__INTEGER)( 5 * result__MEIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__NEIH->storage__ZNO)[(__INTEGER)(Self__PEIH -  1)])));
+    Self__PEIH=(__INTEGER)(Self__PEIH +  1);
+  };
+  if ((result__MEIH <  0)) {
+    result__MEIH=(__INTEGER)(~ result__MEIH);
+  };
+  node__KTRD=((void **)Self__5SRD->buckets__STRD)[(__INTEGER)(result__MEIH % Self__5SRD->capacity__NTRD)];
+  until_do__GGWD:
   {
-    if (((void *)node__QTRD == (void *)NULL)) {
-      __tmp__IURD=TRUE__;
+    if (((void *)node__KTRD == (void *)NULL)) {
+      __tmp__CURD=TRUE__;
     } else {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      __tmp__IURD=((void *)NULL == (void *)k__GTRD);
+      __tmp__CURD=((void *)NULL == (void *)k__ATRD);
     };
-    if ((! __tmp__IURD)) {
+    if ((! __tmp__CURD)) {
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      node__QTRD=NULL;
-      goto until_do__UGWD;
+      node__KTRD=NULL;
+      goto until_do__GGWD;
     };
   };
-  if (((void *)node__QTRD != (void *)NULL)) {
+  if (((void *)node__KTRD != (void *)NULL)) {
     print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
   };
   return(NULL);
 }
 
-static void* run_expr__2XQD(__LIP_BINARY *Self__3XQD)
+static void* run_expr__SXQD(__LIP_BINARY *Self__TXQD)
 // ({LIP_BINARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *result__VXQD,*__tmp__0XQD,*__tmp__WBKH,*__tmp__XBKH,*__tmp__3XQD;
+  void *__tmp__1BKH,*__tmp__2BKH,*result__P33F,*__tmp__FYQD;
+  void *result__533F,*result__R43F,*__tmp__MYQD,*result__B53F;
+  void *result__T53F,*__tmp__TYQD,*result__DA4F,*result__WCIG;
+  void *result__VA4F,*__tmp__0YQD,*result__FB4F,*result__HDIG;
+  void *__tmp__BZQD,*result__HC4F,*__tmp__IZQD,*result__JD4F;
+  void *__tmp__PZQD,*result__LE4F,*__tmp__WZQD,*result__NF4F;
+  void *__tmp__3ZQD,*result__PG4F,*result__2FIG,*__tmp__E0QD;
+  void *result__RH4F;
+  void *__tmp__ZXQD,*__tmp__2XQD;
+  __LIP_INTEGER *Self__YBKH,*Self__3BKH,*Self__233F,*__tmp__C43F;
+  __LIP_INTEGER *s__A43F,*Self__443F,*__tmp__E53F,*s__C53F,*Self__AA4F;
+  __LIP_INTEGER *__tmp__GA4F,*s__EA4F,*Self__CB4F,*__tmp__IB4F,*s__GB4F;
+  __LIP_INTEGER *Self__EC4F,*__tmp__KC4F,*s__IC4F,*Self__GD4F;
+  __LIP_INTEGER *__tmp__MD4F,*s__KD4F,*Self__IE4F,*__tmp__OE4F,*s__ME4F;
+  __LIP_INTEGER *Self__KF4F,*__tmp__QF4F,*s__OF4F,*Self__MG4F;
+  __LIP_INTEGER *__tmp__SG4F,*s__QG4F,*Self__OH4F,*__tmp__UH4F,*s__SH4F;
+  __LIP_STRING *Self__ZBKH,*Self__4BKH,*__tmp__XBIG,*s__VBIG;
+  __LIP_STRING *__tmp__ICIG,*s__GCIG,*Self__TCIG,*__tmp__ZCIG,*s__XCIG;
+  __LIP_STRING *Self__EDIG,*__tmp__KDIG,*s__IDIG,*__tmp__1DIG,*s__ZDIG;
+  __LIP_STRING *__tmp__MEIG,*s__KEIG,*__tmp__3EIG,*s__1EIG,*__tmp__OFIG;
+  __LIP_STRING *s__MFIG,*Self__ZFIG,*__tmp__5FIG,*s__3FIG,*__tmp__QGIG;
+  __LIP_STRING *s__OGIG;
+  __LIP_BOOLEAN *Self__M33F,*__tmp__S33F,*s__Q33F,*Self__O43F;
+  __LIP_BOOLEAN *__tmp__U43F,*s__S43F,*Self__Q53F,*__tmp__W53F,*s__U53F;
+  __LIP_BOOLEAN *Self__SA4F,*__tmp__YA4F,*s__WA4F,*__tmp__0B4F,*s__YB4F;
+  __LIP_BOOLEAN *__tmp__2C4F,*s__0C4F,*__tmp__4D4F,*s__2D4F,*__tmp__AF4F;
+  __LIP_BOOLEAN *s__4E4F,*__tmp__CG4F,*s__AG4F,*__tmp__EH4F,*s__CH4F;
+  void *result__QVEH,*result__SVEH,*result__UVEH,*result__WVEH;
+  void *result__YVEH,*result__0VEH,*result__2VEH,*result__4VEH;
+  void *result__AWEH,*result__CWEH,*result__EWEH,*result__GWEH;
+  __POSITION __tmp__N0QD;
+  __CHARACTER Self__RRVD;
+  __BOOLEAN b__RVEH,b__TVEH,b__VVEH,b__XVEH,b__ZVEH,b__1VEH,b__3VEH;
+  __BOOLEAN b__5VEH,b__BWEH,b__DWEH,b__FWEH,b__HWEH;
+  result__VXQD=NULL;
+  __tmp__ZXQD=Self__TXQD->left__YXQD;
+  switch (((struct ___OBJ *)__tmp__ZXQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__EYQD=run_expr__2XQD(__tmp__DYQD);
+    __tmp__0XQD=run_expr__SXQD(__tmp__ZXQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__EYQD=run_expr__10QD(__tmp__DYQD);
+    __tmp__0XQD=run_expr__R0QD(__tmp__ZXQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__EYQD=run_expr__DQUE(__tmp__DYQD);
+    __tmp__0XQD=run_expr__DSUE(__tmp__ZXQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__N3JH=((__LIP_VALUE *)__tmp__DYQD)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__N3JH)->__id) {
+    __tmp__WBKH=((__LIP_VALUE *)__tmp__ZXQD)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__WBKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__O3JH=((__LIP_BOOLEAN *)__tmp__N3JH);
+      __tmp__XBKH=((__LIP_BOOLEAN *)__tmp__WBKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__P3JH=((__LIP_INTEGER *)__tmp__N3JH);
-      __tmp__O3JH=get__LRSE(Self__P3JH,Self__P3JH->value__ZD4F);
+      Self__YBKH=((__LIP_INTEGER *)__tmp__WBKH);
+      __tmp__XBKH=get__LTSE(Self__YBKH,Self__YBKH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__Q3JH=((__LIP_STRING *)__tmp__N3JH);
-      __tmp__O3JH=get__PVFF(Self__Q3JH,Self__Q3JH->value__RLUE);
+      Self__ZBKH=((__LIP_STRING *)__tmp__WBKH);
+      __tmp__XBKH=get__GYFF(Self__ZBKH,Self__ZBKH->value__RNUE);
     } break;
     };
-    __tmp__EYQD=__tmp__O3JH;
+    __tmp__0XQD=__tmp__XBKH;
   } break;
   };
-  __tmp__GYQD=Self__3XQD->right__FYQD;
-  switch (((struct ___OBJ *)__tmp__GYQD)->__id) {
+  __tmp__2XQD=Self__TXQD->right__1XQD;
+  switch (((struct ___OBJ *)__tmp__2XQD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__HYQD=run_expr__2XQD(__tmp__GYQD);
+    __tmp__3XQD=run_expr__SXQD(__tmp__2XQD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__HYQD=run_expr__10QD(__tmp__GYQD);
+    __tmp__3XQD=run_expr__R0QD(__tmp__2XQD);
   } break;
   case __LIP_CALL__: {
-    __tmp__HYQD=run_expr__DQUE(__tmp__GYQD);
+    __tmp__3XQD=run_expr__DSUE(__tmp__2XQD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__S3JH=((__LIP_VALUE *)__tmp__GYQD)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__S3JH)->__id) {
+    __tmp__1BKH=((__LIP_VALUE *)__tmp__2XQD)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__1BKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__T3JH=((__LIP_BOOLEAN *)__tmp__S3JH);
+      __tmp__2BKH=((__LIP_BOOLEAN *)__tmp__1BKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__U3JH=((__LIP_INTEGER *)__tmp__S3JH);
-      __tmp__T3JH=get__LRSE(Self__U3JH,Self__U3JH->value__ZD4F);
+      Self__3BKH=((__LIP_INTEGER *)__tmp__1BKH);
+      __tmp__2BKH=get__LTSE(Self__3BKH,Self__3BKH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__V3JH=((__LIP_STRING *)__tmp__S3JH);
-      __tmp__T3JH=get__PVFF(Self__V3JH,Self__V3JH->value__RLUE);
+      Self__4BKH=((__LIP_STRING *)__tmp__1BKH);
+      __tmp__2BKH=get__GYFF(Self__4BKH,Self__4BKH->value__RNUE);
     } break;
     };
-    __tmp__HYQD=__tmp__T3JH;
+    __tmp__3XQD=__tmp__2BKH;
   } break;
   };
-  Self__5RVD=Self__3XQD->operator__IYQD;
-  if ((Self__5RVD == '|')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  Self__RRVD=Self__TXQD->operator__4XQD;
+  if ((Self__RRVD == '|')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__BZ3F=((__LIP_BOOLEAN *)__tmp__EYQD);
-      result__EZ3F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__HZ3F=NULL;
+      Self__M33F=((__LIP_BOOLEAN *)__tmp__0XQD);
+      result__P33F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__S33F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HZ3F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__S33F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HZ3F=NULL;
+          __tmp__S33F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__HZ3F=NULL;
+          __tmp__S33F=NULL;
         } break;
         }
       };
-      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;
+      s__Q33F=__tmp__S33F;
+      if (((void *)__tmp__S33F != (void *)NULL)) {
+        b__RVEH=(Self__M33F->value__1BQD | __tmp__S33F->value__1BQD);
+        result__QVEH=NULL;
+        if (b__RVEH) {
+          result__QVEH=true__4RLF;
         } else {
-          result__HREH=LIP_BOOLEAN__;
+          result__QVEH=LIP_BOOLEAN__;
         };
-        result__EZ3F=result__HREH;
+        result__P33F=result__QVEH;
       };
-      __tmp__PYQD=result__EZ3F;
+      __tmp__FYQD=result__P33F;
     } break;
     case __LIP_INTEGER__: {
-      Self__RZ3F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__UZ3F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__XZ3F=NULL;
+      Self__233F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__533F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__C43F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XZ3F=NULL;
+          __tmp__C43F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XZ3F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__C43F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__XZ3F=NULL;
+          __tmp__C43F=NULL;
         } break;
         }
       };
-      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;
+      s__A43F=__tmp__C43F;
+      if (((void *)__tmp__C43F != (void *)NULL)) {
+        Self__233F->value__EI4F=(__INTEGER)(Self__233F->value__EI4F | __tmp__C43F->value__EI4F);
+        free__223F(__tmp__C43F);
+        result__533F=Self__233F;
       };
-      __tmp__PYQD=result__UZ3F;
+      __tmp__FYQD=result__533F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__M3HG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__XBIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__M3HG=NULL;
+          __tmp__XBIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__M3HG=NULL;
+          __tmp__XBIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__M3HG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__XBIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__K3HG=__tmp__M3HG;
-      __tmp__PYQD=NULL;
+      s__VBIG=__tmp__XBIG;
+      __tmp__FYQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__PYQD;
+    result__VXQD=__tmp__FYQD;
   };
-  if ((Self__5RVD == '&')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '&')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__D03F=((__LIP_BOOLEAN *)__tmp__EYQD);
-      result__G03F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__J03F=NULL;
+      Self__O43F=((__LIP_BOOLEAN *)__tmp__0XQD);
+      result__R43F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__U43F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__J03F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__U43F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__J03F=NULL;
+          __tmp__U43F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__J03F=NULL;
+          __tmp__U43F=NULL;
         } break;
         }
       };
-      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;
+      s__S43F=__tmp__U43F;
+      if (((void *)__tmp__U43F != (void *)NULL)) {
+        b__TVEH=(Self__O43F->value__1BQD & __tmp__U43F->value__1BQD);
+        result__SVEH=NULL;
+        if (b__TVEH) {
+          result__SVEH=true__4RLF;
         } else {
-          result__JREH=LIP_BOOLEAN__;
+          result__SVEH=LIP_BOOLEAN__;
         };
-        result__G03F=result__JREH;
+        result__R43F=result__SVEH;
       };
-      __tmp__WYQD=result__G03F;
+      __tmp__MYQD=result__R43F;
     } break;
     case __LIP_INTEGER__: {
-      Self__T03F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__W03F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__Z03F=NULL;
+      Self__443F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__B53F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__E53F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__Z03F=NULL;
+          __tmp__E53F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__Z03F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__E53F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__Z03F=NULL;
+          __tmp__E53F=NULL;
         } break;
         }
       };
-      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;
+      s__C53F=__tmp__E53F;
+      if (((void *)__tmp__E53F != (void *)NULL)) {
+        Self__443F->value__EI4F=(__INTEGER)(Self__443F->value__EI4F & __tmp__E53F->value__EI4F);
+        free__223F(__tmp__E53F);
+        result__B53F=Self__443F;
       };
-      __tmp__WYQD=result__W03F;
+      __tmp__MYQD=result__B53F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__33HG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__ICIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__33HG=NULL;
+          __tmp__ICIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__33HG=NULL;
+          __tmp__ICIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__33HG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__ICIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__13HG=__tmp__33HG;
-      __tmp__WYQD=NULL;
+      s__GCIG=__tmp__ICIG;
+      __tmp__MYQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__WYQD;
+    result__VXQD=__tmp__MYQD;
   };
-  if ((Self__5RVD == '=')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '=')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__F13F=((__LIP_BOOLEAN *)__tmp__EYQD);
-      result__I13F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__L13F=NULL;
+      Self__Q53F=((__LIP_BOOLEAN *)__tmp__0XQD);
+      result__T53F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__W53F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__L13F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__W53F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__L13F=NULL;
+          __tmp__W53F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__L13F=NULL;
+          __tmp__W53F=NULL;
         } break;
         }
       };
-      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;
+      s__U53F=__tmp__W53F;
+      if (((void *)__tmp__W53F != (void *)NULL)) {
+        b__VVEH=(Self__Q53F->value__1BQD == __tmp__W53F->value__1BQD);
+        result__UVEH=NULL;
+        if (b__VVEH) {
+          result__UVEH=true__4RLF;
         } else {
-          result__LREH=LIP_BOOLEAN__;
+          result__UVEH=LIP_BOOLEAN__;
         };
-        result__I13F=result__LREH;
+        result__T53F=result__UVEH;
       };
-      __tmp__3YQD=result__I13F;
+      __tmp__TYQD=result__T53F;
     } break;
     case __LIP_INTEGER__: {
-      Self__V13F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__Y13F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__113F=NULL;
+      Self__AA4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__DA4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__GA4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__113F=NULL;
+          __tmp__GA4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__113F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__GA4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__113F=NULL;
+          __tmp__GA4F=NULL;
         } break;
         }
       };
-      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;
+      s__EA4F=__tmp__GA4F;
+      if (((void *)__tmp__GA4F != (void *)NULL)) {
+        free__223F(__tmp__GA4F);
+        free__223F(Self__AA4F);
+        b__XVEH=(Self__AA4F->value__EI4F == __tmp__GA4F->value__EI4F);
+        result__WVEH=NULL;
+        if (b__XVEH) {
+          result__WVEH=true__4RLF;
         } else {
-          result__NREH=LIP_BOOLEAN__;
+          result__WVEH=LIP_BOOLEAN__;
         };
-        result__Y13F=result__NREH;
+        result__DA4F=result__WVEH;
       };
-      __tmp__3YQD=result__Y13F;
+      __tmp__TYQD=result__DA4F;
     } break;
     case __LIP_STRING__: {
-      Self__I4HG=((__LIP_STRING *)__tmp__EYQD);
-      result__L4HG=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__O4HG=NULL;
+      Self__TCIG=((__LIP_STRING *)__tmp__0XQD);
+      result__WCIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__ZCIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__O4HG=NULL;
+          __tmp__ZCIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__O4HG=NULL;
+          __tmp__ZCIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__O4HG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__ZCIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      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;
+      s__XCIG=__tmp__ZCIG;
+      if (((void *)__tmp__ZCIG != (void *)NULL)) {
+        free__KBIG(__tmp__ZCIG);
+        free__KBIG(Self__TCIG);
+        b__ZVEH=((void *)Self__TCIG->value__RNUE == (void *)__tmp__ZCIG->value__RNUE);
+        result__YVEH=NULL;
+        if (b__ZVEH) {
+          result__YVEH=true__4RLF;
         } else {
-          result__PREH=LIP_BOOLEAN__;
+          result__YVEH=LIP_BOOLEAN__;
         };
-        result__L4HG=result__PREH;
+        result__WCIG=result__YVEH;
       };
-      __tmp__3YQD=result__L4HG;
+      __tmp__TYQD=result__WCIG;
     } break;
     };
-    result__5XQD=__tmp__3YQD;
+    result__VXQD=__tmp__TYQD;
   };
-  if ((Self__5RVD == 'E')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == 'E')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      Self__H23F=((__LIP_BOOLEAN *)__tmp__EYQD);
-      result__K23F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__N23F=NULL;
+      Self__SA4F=((__LIP_BOOLEAN *)__tmp__0XQD);
+      result__VA4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__YA4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__N23F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__YA4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__N23F=NULL;
+          __tmp__YA4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__N23F=NULL;
+          __tmp__YA4F=NULL;
         } break;
         }
       };
-      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;
+      s__WA4F=__tmp__YA4F;
+      if (((void *)__tmp__YA4F != (void *)NULL)) {
+        b__1VEH=(Self__SA4F->value__1BQD != __tmp__YA4F->value__1BQD);
+        result__0VEH=NULL;
+        if (b__1VEH) {
+          result__0VEH=true__4RLF;
         } else {
-          result__RREH=LIP_BOOLEAN__;
+          result__0VEH=LIP_BOOLEAN__;
         };
-        result__K23F=result__RREH;
+        result__VA4F=result__0VEH;
       };
-      __tmp__EZQD=result__K23F;
+      __tmp__0YQD=result__VA4F;
     } break;
     case __LIP_INTEGER__: {
-      Self__X23F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__023F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__323F=NULL;
+      Self__CB4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__FB4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__IB4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__323F=NULL;
+          __tmp__IB4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__323F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__IB4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__323F=NULL;
+          __tmp__IB4F=NULL;
         } break;
         }
       };
-      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;
+      s__GB4F=__tmp__IB4F;
+      if (((void *)__tmp__IB4F != (void *)NULL)) {
+        free__223F(__tmp__IB4F);
+        free__223F(Self__CB4F);
+        b__3VEH=(Self__CB4F->value__EI4F != __tmp__IB4F->value__EI4F);
+        result__2VEH=NULL;
+        if (b__3VEH) {
+          result__2VEH=true__4RLF;
         } else {
-          result__TREH=LIP_BOOLEAN__;
+          result__2VEH=LIP_BOOLEAN__;
         };
-        result__023F=result__TREH;
+        result__FB4F=result__2VEH;
       };
-      __tmp__EZQD=result__023F;
+      __tmp__0YQD=result__FB4F;
     } break;
     case __LIP_STRING__: {
-      Self__Z4HG=((__LIP_STRING *)__tmp__EYQD);
-      result__24HG=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__54HG=NULL;
+      Self__EDIG=((__LIP_STRING *)__tmp__0XQD);
+      result__HDIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__KDIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__54HG=NULL;
+          __tmp__KDIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__54HG=NULL;
+          __tmp__KDIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__54HG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__KDIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      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;
+      s__IDIG=__tmp__KDIG;
+      if (((void *)__tmp__KDIG != (void *)NULL)) {
+        free__KBIG(__tmp__KDIG);
+        free__KBIG(Self__EDIG);
+        b__5VEH=((void *)Self__EDIG->value__RNUE != (void *)__tmp__KDIG->value__RNUE);
+        result__4VEH=NULL;
+        if (b__5VEH) {
+          result__4VEH=true__4RLF;
         } else {
-          result__VREH=LIP_BOOLEAN__;
+          result__4VEH=LIP_BOOLEAN__;
         };
-        result__24HG=result__VREH;
+        result__HDIG=result__4VEH;
       };
-      __tmp__EZQD=result__24HG;
+      __tmp__0YQD=result__HDIG;
     } break;
     };
-    result__5XQD=__tmp__EZQD;
+    result__VXQD=__tmp__0YQD;
   };
-  if ((Self__5RVD == '>')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '>')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__P33F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__0B4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__P33F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__0B4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__P33F=NULL;
+          __tmp__0B4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__P33F=NULL;
+          __tmp__0B4F=NULL;
         } break;
         }
       };
-      s__N33F=__tmp__P33F;
-      __tmp__LZQD=NULL;
+      s__YB4F=__tmp__0B4F;
+      __tmp__BZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__Z33F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__233F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__533F=NULL;
+      Self__EC4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__HC4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__KC4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__533F=NULL;
+          __tmp__KC4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__533F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__KC4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__533F=NULL;
+          __tmp__KC4F=NULL;
         } break;
         }
       };
-      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;
+      s__IC4F=__tmp__KC4F;
+      if (((void *)__tmp__KC4F != (void *)NULL)) {
+        free__223F(__tmp__KC4F);
+        free__223F(Self__EC4F);
+        b__BWEH=(Self__EC4F->value__EI4F > __tmp__KC4F->value__EI4F);
+        result__AWEH=NULL;
+        if (b__BWEH) {
+          result__AWEH=true__4RLF;
         } else {
-          result__XREH=LIP_BOOLEAN__;
+          result__AWEH=LIP_BOOLEAN__;
         };
-        result__233F=result__XREH;
+        result__HC4F=result__AWEH;
       };
-      __tmp__LZQD=result__233F;
+      __tmp__BZQD=result__HC4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__Q5HG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__1DIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__Q5HG=NULL;
+          __tmp__1DIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__Q5HG=NULL;
+          __tmp__1DIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__Q5HG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__1DIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__O5HG=__tmp__Q5HG;
-      __tmp__LZQD=NULL;
+      s__ZDIG=__tmp__1DIG;
+      __tmp__BZQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__LZQD;
+    result__VXQD=__tmp__BZQD;
   };
-  if ((Self__5RVD == '<')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '<')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__R43F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__2C4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__R43F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__2C4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__R43F=NULL;
+          __tmp__2C4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__R43F=NULL;
+          __tmp__2C4F=NULL;
         } break;
         }
       };
-      s__P43F=__tmp__R43F;
-      __tmp__SZQD=NULL;
+      s__0C4F=__tmp__2C4F;
+      __tmp__IZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__143F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__443F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__B53F=NULL;
+      Self__GD4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__JD4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__MD4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__B53F=NULL;
+          __tmp__MD4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__B53F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__MD4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__B53F=NULL;
+          __tmp__MD4F=NULL;
         } break;
         }
       };
-      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;
+      s__KD4F=__tmp__MD4F;
+      if (((void *)__tmp__MD4F != (void *)NULL)) {
+        free__223F(__tmp__MD4F);
+        free__223F(Self__GD4F);
+        b__DWEH=(Self__GD4F->value__EI4F < __tmp__MD4F->value__EI4F);
+        result__CWEH=NULL;
+        if (b__DWEH) {
+          result__CWEH=true__4RLF;
         } else {
-          result__ZREH=LIP_BOOLEAN__;
+          result__CWEH=LIP_BOOLEAN__;
         };
-        result__443F=result__ZREH;
+        result__JD4F=result__CWEH;
       };
-      __tmp__SZQD=result__443F;
+      __tmp__IZQD=result__JD4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__BAIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__MEIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__BAIG=NULL;
+          __tmp__MEIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__BAIG=NULL;
+          __tmp__MEIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__BAIG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__MEIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__55HG=__tmp__BAIG;
-      __tmp__SZQD=NULL;
+      s__KEIG=__tmp__MEIG;
+      __tmp__IZQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__SZQD;
+    result__VXQD=__tmp__IZQD;
   };
-  if ((Self__5RVD == 'S')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == 'S')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__T53F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__4D4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__T53F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__4D4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__T53F=NULL;
+          __tmp__4D4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__T53F=NULL;
+          __tmp__4D4F=NULL;
         } break;
         }
       };
-      s__R53F=__tmp__T53F;
-      __tmp__ZZQD=NULL;
+      s__2D4F=__tmp__4D4F;
+      __tmp__PZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__353F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__AA4F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__DA4F=NULL;
+      Self__IE4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__LE4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__OE4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__DA4F=NULL;
+          __tmp__OE4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__DA4F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__OE4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__DA4F=NULL;
+          __tmp__OE4F=NULL;
         } break;
         }
       };
-      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;
+      s__ME4F=__tmp__OE4F;
+      if (((void *)__tmp__OE4F != (void *)NULL)) {
+        free__223F(__tmp__OE4F);
+        free__223F(Self__IE4F);
+        b__FWEH=(Self__IE4F->value__EI4F >= __tmp__OE4F->value__EI4F);
+        result__EWEH=NULL;
+        if (b__FWEH) {
+          result__EWEH=true__4RLF;
         } else {
-          result__1REH=LIP_BOOLEAN__;
+          result__EWEH=LIP_BOOLEAN__;
         };
-        result__AA4F=result__1REH;
+        result__LE4F=result__EWEH;
       };
-      __tmp__ZZQD=result__AA4F;
+      __tmp__PZQD=result__LE4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__SAIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__3EIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__SAIG=NULL;
+          __tmp__3EIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__SAIG=NULL;
+          __tmp__3EIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__SAIG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__3EIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__QAIG=__tmp__SAIG;
-      __tmp__ZZQD=NULL;
+      s__1EIG=__tmp__3EIG;
+      __tmp__PZQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__ZZQD;
+    result__VXQD=__tmp__PZQD;
   };
-  if ((Self__5RVD == 'I')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == 'I')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__VA4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__AF4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__VA4F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__AF4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__VA4F=NULL;
+          __tmp__AF4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__VA4F=NULL;
+          __tmp__AF4F=NULL;
         } break;
         }
       };
-      s__TA4F=__tmp__VA4F;
-      __tmp__A0QD=NULL;
+      s__4E4F=__tmp__AF4F;
+      __tmp__WZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__5A4F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__CB4F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__FB4F=NULL;
+      Self__KF4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__NF4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__QF4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FB4F=NULL;
+          __tmp__QF4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FB4F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__QF4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__FB4F=NULL;
+          __tmp__QF4F=NULL;
         } break;
         }
       };
-      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;
+      s__OF4F=__tmp__QF4F;
+      if (((void *)__tmp__QF4F != (void *)NULL)) {
+        free__223F(__tmp__QF4F);
+        free__223F(Self__KF4F);
+        b__HWEH=(Self__KF4F->value__EI4F <= __tmp__QF4F->value__EI4F);
+        result__GWEH=NULL;
+        if (b__HWEH) {
+          result__GWEH=true__4RLF;
         } else {
-          result__3REH=LIP_BOOLEAN__;
+          result__GWEH=LIP_BOOLEAN__;
         };
-        result__CB4F=result__3REH;
+        result__NF4F=result__GWEH;
       };
-      __tmp__A0QD=result__CB4F;
+      __tmp__WZQD=result__NF4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__DBIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__OFIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__DBIG=NULL;
+          __tmp__OFIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__DBIG=NULL;
+          __tmp__OFIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__DBIG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__OFIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__BBIG=__tmp__DBIG;
-      __tmp__A0QD=NULL;
+      s__MFIG=__tmp__OFIG;
+      __tmp__WZQD=NULL;
     } break;
     };
-    result__5XQD=__tmp__A0QD;
+    result__VXQD=__tmp__WZQD;
   };
-  if ((Self__5RVD == '+')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '+')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__XB4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__CG4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__XB4F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__CG4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__XB4F=NULL;
+          __tmp__CG4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__XB4F=NULL;
+          __tmp__CG4F=NULL;
         } break;
         }
       };
-      s__VB4F=__tmp__XB4F;
-      __tmp__H0QD=NULL;
+      s__AG4F=__tmp__CG4F;
+      __tmp__3ZQD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__BC4F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__EC4F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__HC4F=NULL;
+      Self__MG4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__PG4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__SG4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__HC4F=NULL;
+          __tmp__SG4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__HC4F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__SG4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__HC4F=NULL;
+          __tmp__SG4F=NULL;
         } break;
         }
       };
-      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;
+      s__QG4F=__tmp__SG4F;
+      if (((void *)__tmp__SG4F != (void *)NULL)) {
+        Self__MG4F->value__EI4F=(__INTEGER)(Self__MG4F->value__EI4F + __tmp__SG4F->value__EI4F);
+        free__223F(__tmp__SG4F);
+        result__PG4F=Self__MG4F;
       };
-      __tmp__H0QD=result__EC4F;
+      __tmp__3ZQD=result__PG4F;
     } break;
     case __LIP_STRING__: {
-      Self__OBIG=((__LIP_STRING *)__tmp__EYQD);
-      result__RBIG=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__UBIG=NULL;
+      Self__ZFIG=((__LIP_STRING *)__tmp__0XQD);
+      result__2FIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__5FIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__UBIG=NULL;
+          __tmp__5FIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__UBIG=NULL;
+          __tmp__5FIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__UBIG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__5FIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      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;
+      s__3FIG=__tmp__5FIG;
+      if (((void *)__tmp__5FIG != (void *)NULL)) {
+        copy__35R(string_tmp__VH,Self__ZFIG->value__RNUE);
+        append__FLS(string_tmp__VH,__tmp__5FIG->value__RNUE);
+        Self__ZFIG->value__RNUE=get__YWB(string_tmp__VH);
+        free__KBIG(__tmp__5FIG);
+        result__2FIG=Self__ZFIG;
       };
-      __tmp__H0QD=result__RBIG;
+      __tmp__3ZQD=result__2FIG;
     } break;
     };
-    result__5XQD=__tmp__H0QD;
+    result__VXQD=__tmp__3ZQD;
   };
-  if ((Self__5RVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__EYQD)->__id) {
+  if ((Self__RRVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__0XQD)->__id) {
     case __LIP_BOOLEAN__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__ZC4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__EH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__ZC4F=((__LIP_BOOLEAN *)__tmp__HYQD);
+          __tmp__EH4F=((__LIP_BOOLEAN *)__tmp__3XQD);
         } break;
         case __LIP_INTEGER__: {
-          __tmp__ZC4F=NULL;
+          __tmp__EH4F=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__ZC4F=NULL;
+          __tmp__EH4F=NULL;
         } break;
         }
       };
-      s__XC4F=__tmp__ZC4F;
-      __tmp__O0QD=NULL;
+      s__CH4F=__tmp__EH4F;
+      __tmp__E0QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__DD4F=((__LIP_INTEGER *)__tmp__EYQD);
-      result__GD4F=NULL;
-      if (__tmp__HYQD==NULL) {
-        __tmp__JD4F=NULL;
+      Self__OH4F=((__LIP_INTEGER *)__tmp__0XQD);
+      result__RH4F=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__UH4F=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__JD4F=NULL;
+          __tmp__UH4F=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__JD4F=((__LIP_INTEGER *)__tmp__HYQD);
+          __tmp__UH4F=((__LIP_INTEGER *)__tmp__3XQD);
         } break;
         case __LIP_STRING__: {
-          __tmp__JD4F=NULL;
+          __tmp__UH4F=NULL;
         } break;
         }
       };
-      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;
+      s__SH4F=__tmp__UH4F;
+      if (((void *)__tmp__UH4F != (void *)NULL)) {
+        Self__OH4F->value__EI4F=(__INTEGER)(Self__OH4F->value__EI4F - __tmp__UH4F->value__EI4F);
+        free__223F(__tmp__UH4F);
+        result__RH4F=Self__OH4F;
       };
-      __tmp__O0QD=result__GD4F;
+      __tmp__E0QD=result__RH4F;
     } break;
     case __LIP_STRING__: {
-      if (__tmp__HYQD==NULL) {
-        __tmp__FCIG=NULL;
+      if (__tmp__3XQD==NULL) {
+        __tmp__QGIG=NULL;
       } else {
-        switch (((struct ___OBJ *)__tmp__HYQD)->__id) {
+        switch (((struct ___OBJ *)__tmp__3XQD)->__id) {
         case __LIP_BOOLEAN__: {
-          __tmp__FCIG=NULL;
+          __tmp__QGIG=NULL;
         } break;
         case __LIP_INTEGER__: {
-          __tmp__FCIG=NULL;
+          __tmp__QGIG=NULL;
         } break;
         case __LIP_STRING__: {
-          __tmp__FCIG=((__LIP_STRING *)__tmp__HYQD);
+          __tmp__QGIG=((__LIP_STRING *)__tmp__3XQD);
         } break;
         }
       };
-      s__DCIG=__tmp__FCIG;
-      __tmp__O0QD=NULL;
+      s__OGIG=__tmp__QGIG;
+      __tmp__E0QD=NULL;
     } break;
     };
-    result__5XQD=__tmp__O0QD;
+    result__VXQD=__tmp__E0QD;
   };
-  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)) {
+  if (((void *)result__VXQD == (void *)NULL)) {
+    __tmp__N0QD=Self__TXQD->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_279));
+    put_position__LNG(__tmp__N0QD);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__5XQD);
+  return(result__VXQD);
 }
 
-static void* run_expr__10QD(__LIP_UNARY *Self__20QD)
+static void* run_expr__R0QD(__LIP_UNARY *Self__S0QD)
 // ({LIP_UNARY}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *__tmp__W0QD;
+  void *__tmp__X0QD,*__tmp__ACKH,*__tmp__BCKH,*result__U0QD,*__tmp__50QD;
+  void *__tmp__G1QD;
+  __LIP_INTEGER *Self__CCKH,*Self__CI4F,*Self__PI4F;
+  __LIP_STRING *Self__DCKH;
+  void *result__ZRLF;
+  __POSITION __tmp__P1QD;
+  __CHARACTER Self__BUVD;
+  __BOOLEAN b__XRLF;
+  __tmp__W0QD=Self__S0QD->value__V0QD;
+  switch (((struct ___OBJ *)__tmp__W0QD)->__id) {
   case __LIP_BINARY__: {
-    __tmp__B1QD=run_expr__2XQD(__tmp__A1QD);
+    __tmp__X0QD=run_expr__SXQD(__tmp__W0QD);
   } break;
   case __LIP_UNARY__: {
-    __tmp__B1QD=run_expr__10QD(__tmp__A1QD);
+    __tmp__X0QD=run_expr__R0QD(__tmp__W0QD);
   } break;
   case __LIP_CALL__: {
-    __tmp__B1QD=run_expr__DQUE(__tmp__A1QD);
+    __tmp__X0QD=run_expr__DSUE(__tmp__W0QD);
   } break;
   case __LIP_VALUE__: {
-    __tmp__X3JH=((__LIP_VALUE *)__tmp__A1QD)->value__DUUE;
-    switch (((struct ___OBJ *)__tmp__X3JH)->__id) {
+    __tmp__ACKH=((__LIP_VALUE *)__tmp__W0QD)->value__DWUE;
+    switch (((struct ___OBJ *)__tmp__ACKH)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__Y3JH=((__LIP_BOOLEAN *)__tmp__X3JH);
+      __tmp__BCKH=((__LIP_BOOLEAN *)__tmp__ACKH);
     } break;
     case __LIP_INTEGER__: {
-      Self__Z3JH=((__LIP_INTEGER *)__tmp__X3JH);
-      __tmp__Y3JH=get__LRSE(Self__Z3JH,Self__Z3JH->value__ZD4F);
+      Self__CCKH=((__LIP_INTEGER *)__tmp__ACKH);
+      __tmp__BCKH=get__LTSE(Self__CCKH,Self__CCKH->value__EI4F);
     } break;
     case __LIP_STRING__: {
-      Self__03JH=((__LIP_STRING *)__tmp__X3JH);
-      __tmp__Y3JH=get__PVFF(Self__03JH,Self__03JH->value__RLUE);
+      Self__DCKH=((__LIP_STRING *)__tmp__ACKH);
+      __tmp__BCKH=get__GYFF(Self__DCKH,Self__DCKH->value__RNUE);
     } break;
     };
-    __tmp__B1QD=__tmp__Y3JH;
+    __tmp__X0QD=__tmp__BCKH;
   } break;
   };
-  result__40QD=__tmp__B1QD;
-  Self__PUVD=Self__20QD->operator__C1QD;
-  if ((Self__PUVD == '-')) {
-    switch (((struct ___OBJ *)__tmp__B1QD)->__id) {
+  result__U0QD=__tmp__X0QD;
+  Self__BUVD=Self__S0QD->operator__Y0QD;
+  if ((Self__BUVD == '-')) {
+    switch (((struct ___OBJ *)__tmp__X0QD)->__id) {
     case __LIP_BOOLEAN__: {
-      __tmp__J1QD=NULL;
+      __tmp__50QD=NULL;
     } break;
     case __LIP_INTEGER__: {
-      Self__XD4F=((__LIP_INTEGER *)__tmp__B1QD);
-      Self__XD4F->value__ZD4F=(__INTEGER)(- Self__XD4F->value__ZD4F);
-      __tmp__J1QD=Self__XD4F;
+      Self__CI4F=((__LIP_INTEGER *)__tmp__X0QD);
+      Self__CI4F->value__EI4F=(__INTEGER)(- Self__CI4F->value__EI4F);
+      __tmp__50QD=Self__CI4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__J1QD=NULL;
+      __tmp__50QD=NULL;
     } break;
     };
-    result__40QD=__tmp__J1QD;
+    result__U0QD=__tmp__50QD;
   };
-  if ((Self__PUVD == '!')) {
-    switch (((struct ___OBJ *)result__40QD)->__id) {
+  if ((Self__BUVD == '!')) {
+    switch (((struct ___OBJ *)result__U0QD)->__id) {
     case __LIP_BOOLEAN__: {
-      b__HOLF=(! ((__LIP_BOOLEAN *)result__40QD)->value__FCQD);
-      result__JOLF=NULL;
-      if (b__HOLF) {
-        result__JOLF=true__OOLF;
+      b__XRLF=(! ((__LIP_BOOLEAN *)result__U0QD)->value__1BQD);
+      result__ZRLF=NULL;
+      if (b__XRLF) {
+        result__ZRLF=true__4RLF;
       } else {
-        result__JOLF=LIP_BOOLEAN__;
+        result__ZRLF=LIP_BOOLEAN__;
       };
-      __tmp__Q1QD=result__JOLF;
+      __tmp__G1QD=result__ZRLF;
     } break;
     case __LIP_INTEGER__: {
-      Self__EE4F=((__LIP_INTEGER *)result__40QD);
-      Self__EE4F->value__ZD4F=(__INTEGER)(~ Self__EE4F->value__ZD4F);
-      __tmp__Q1QD=Self__EE4F;
+      Self__PI4F=((__LIP_INTEGER *)result__U0QD);
+      Self__PI4F->value__EI4F=(__INTEGER)(~ Self__PI4F->value__EI4F);
+      __tmp__G1QD=Self__PI4F;
     } break;
     case __LIP_STRING__: {
-      __tmp__Q1QD=NULL;
+      __tmp__G1QD=NULL;
     } break;
     };
-    result__40QD=__tmp__Q1QD;
+    result__U0QD=__tmp__G1QD;
   };
-  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)) {
+  if (((void *)result__U0QD == (void *)NULL)) {
+    __tmp__P1QD=Self__S0QD->parent_lip_code__MZ4B.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 1,(&__string_279));
+    put_position__LNG(__tmp__P1QD);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
-  return(result__40QD);
+  return(result__U0QD);
 }
 
-static void* run_expr__DQUE(__LIP_CALL *Self__EQUE)
+static void* run_expr__DSUE(__LIP_CALL *Self__ESUE)
 // ({LIP_CALL}) With resultRecursive, No inlinable.
 {
-  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) {
+  void *str__HSUE,*__tmp__3SUE;
+  void *val__ISUE,*result__JSUE,*__tmp__SSUE,*__tmp__EWUE,*__tmp__FWUE;
+  void *__tmp__RSUE;
+  __LIP_INTEGER *Self__PL4F;
+  __LIP_STRING *Self__AIIG;
+  __POSITION pos__KB2G,pos__BXKF;
+  __STRING *Self__1XGH;
+  __INTEGER state__JAXF,Self__NSGG;
+  __BOOLEAN __tmp__OTUE,__tmp__AUUE,result__DSXE,sign__KAXF,__tmp__2BXF;
+  __BOOLEAN result__IWEH,__tmp__JCXF,result__U5PG,__tmp__2CXF;
+  __BOOLEAN result__MWEH,result__QWEH,result__UWEH,result__VWEH;
+  __CHARACTER Self__PXBH,Self__JWEH,Self__QXBH,Self__NWEH,Self__RWEH;
+  __CHARACTER mem__F5LF;
+  __FAST_ARRAYoLIP_SLOT_DATAo *Self__V1PF;
+  str__HSUE=NULL;
+  val__ISUE=NULL;
+  result__JSUE=NULL;
+  if (((void *)Self__ESUE->argument__ZLUE != (void *)NULL)) {
+    __tmp__RSUE=Self__ESUE->argument__ZLUE;
+    switch (((struct ___OBJ *)__tmp__RSUE)->__id) {
     case __LIP_BINARY__: {
-      __tmp__SQUE=run_expr__2XQD(__tmp__RQUE);
+      __tmp__SSUE=run_expr__SXQD(__tmp__RSUE);
     } break;
     case __LIP_UNARY__: {
-      __tmp__SQUE=run_expr__10QD(__tmp__RQUE);
+      __tmp__SSUE=run_expr__R0QD(__tmp__RSUE);
     } break;
     case __LIP_CALL__: {
-      __tmp__SQUE=run_expr__DQUE(__tmp__RQUE);
+      __tmp__SSUE=run_expr__DSUE(__tmp__RSUE);
     } break;
     case __LIP_VALUE__: {
-      __tmp__EUUE=((__LIP_VALUE *)__tmp__RQUE)->value__DUUE;
-      switch (((struct ___OBJ *)__tmp__EUUE)->__id) {
+      __tmp__EWUE=((__LIP_VALUE *)__tmp__RSUE)->value__DWUE;
+      switch (((struct ___OBJ *)__tmp__EWUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__FUUE=((__LIP_BOOLEAN *)__tmp__EUUE);
+        __tmp__FWUE=((__LIP_BOOLEAN *)__tmp__EWUE);
       } break;
       case __LIP_INTEGER__: {
-        Self__EH4F=((__LIP_INTEGER *)__tmp__EUUE);
-        __tmp__FUUE=get__LRSE(Self__EH4F,Self__EH4F->value__ZD4F);
+        Self__PL4F=((__LIP_INTEGER *)__tmp__EWUE);
+        __tmp__FWUE=get__LTSE(Self__PL4F,Self__PL4F->value__EI4F);
       } break;
       case __LIP_STRING__: {
-        Self__VDIG=((__LIP_STRING *)__tmp__EUUE);
-        __tmp__FUUE=get__PVFF(Self__VDIG,Self__VDIG->value__RLUE);
+        Self__AIIG=((__LIP_STRING *)__tmp__EWUE);
+        __tmp__FWUE=get__GYFF(Self__AIIG,Self__AIIG->value__RNUE);
       } break;
       };
-      __tmp__SQUE=__tmp__FUUE;
+      __tmp__SSUE=__tmp__FWUE;
     } break;
     };
-    val__IQUE=__tmp__SQUE;
+    val__ISUE=__tmp__SSUE;
   };
-  if (((void *)Self__EQUE->name__EKUE == (void *)(&__string_93))) {
-    if (val__IQUE==NULL) {
-      __tmp__3QUE=NULL;
+  if (((void *)Self__ESUE->name__EMUE == (void *)(&__string_93))) {
+    if (val__ISUE==NULL) {
+      __tmp__3SUE=NULL;
     } else {
-      switch (((struct ___OBJ *)val__IQUE)->__id) {
+      switch (((struct ___OBJ *)val__ISUE)->__id) {
       case __LIP_BOOLEAN__: {
-        __tmp__3QUE=NULL;
+        __tmp__3SUE=NULL;
       } break;
       case __LIP_INTEGER__: {
-        __tmp__3QUE=NULL;
+        __tmp__3SUE=NULL;
       } break;
       case __LIP_STRING__: {
-        __tmp__3QUE=((void *)val__IQUE);
+        __tmp__3SUE=((void *)val__ISUE);
       } break;
       }
     };
-    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)) {
+    str__HSUE=__tmp__3SUE;
+    if (((void *)__tmp__3SUE == (void *)NULL)) {
+      pos__KB2G=Self__ESUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+      put_error__text__BMG( 1,(&__string_312));
+      put_position__LNG(pos__KB2G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
     ((__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';
+    append_in__EIIG(__tmp__3SUE,string_tmp__VH);
+    Self__1XGH=((__STRING *)string_tmp__VH);
+    if ((Self__1XGH->capacity__24R > Self__1XGH->count__EGC)) {
+      ((__CHARACTER *)Self__1XGH->storage__F5R)[Self__1XGH->count__EGC]='\0';
     } else {
-      add_last__UHT(Self__STGH,'\0');
-      Self__STGH->count__EGC=(__INTEGER)(Self__STGH->count__EGC -  1);
+      add_last__3IT(Self__1XGH,'\0');
+      Self__1XGH->count__EGC=(__INTEGER)(Self__1XGH->count__EGC -  1);
     };
-    result__JQUE=get__LRSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__STGH->storage__23R)))))));
-    __tmp__ORUE=TRUE__;
+    result__JSUE=get__LTSE(LIP_INTEGER__,((__INTEGER )(system(((char*)((Self__1XGH->storage__F5R)))))));
+    __tmp__OTUE=TRUE__;
   } else {
-    __tmp__ORUE=FALSE__;
+    __tmp__OTUE=FALSE__;
   };
-  if (__tmp__ORUE) {
-    __tmp__ASUE=TRUE__;
+  if (__tmp__OTUE) {
+    __tmp__AUUE=TRUE__;
   } else {
-    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__;
+    result__DSXE=((void *)Self__ESUE->name__EMUE == (void *)(&__string_106));
+    if (result__DSXE) {
+      state__JAXF= 0;
+      sign__KAXF=FALSE__;
+      while ((state__JAXF <=  2)) {
+        if (push_back_flag__OTMF) {
+          push_back_flag__OTMF=FALSE__;
         } else {
-          memory__31LF=((__CHARACTER )(fgetc(stdin)));
+          memory__N5LF=((__CHARACTER )(fgetc(stdin)));
         };
-        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__;
+        if ((state__JAXF ==  0)) {
+          Self__PXBH=memory__N5LF;
+          if ((((((((Self__PXBH == ' ') || (Self__PXBH == '\t')) || (Self__PXBH == '\n')) || (Self__PXBH == '\r')) || (Self__PXBH == '\0')) || (Self__PXBH == '\f')) || (Self__PXBH == '\v'))) {
+            __tmp__2BXF=TRUE__;
           } else {
-            Self__ASEH=memory__31LF;
-            result__5REH=FALSE__;
-            if ((((__INTEGER_8 )Self__ASEH) >= ((__INTEGER_8 )'0'))) {
-              result__5REH=(((__INTEGER_8 )Self__ASEH) <= ((__INTEGER_8 )'9'));
+            Self__JWEH=memory__N5LF;
+            result__IWEH=FALSE__;
+            if ((((__INTEGER_8 )Self__JWEH) >= ((__INTEGER_8 )'0'))) {
+              result__IWEH=(((__INTEGER_8 )Self__JWEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__5REH) {
-              last_integer__1RUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48);
-              state__41WF= 2;
+            if (result__IWEH) {
+              last_integer__1TUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48);
+              state__JAXF= 2;
             };
-            __tmp__R3WF=result__5REH;
+            __tmp__2BXF=result__IWEH;
           };
-          if (__tmp__R3WF) {
-            __tmp__43WF=TRUE__;
+          if (__tmp__2BXF) {
+            __tmp__JCXF=TRUE__;
           } else {
-            result__J1PG=(memory__31LF == '-');
-            if (result__J1PG) {
-              sign__51WF=TRUE__;
-              state__41WF= 1;
+            result__U5PG=(memory__N5LF == '-');
+            if (result__U5PG) {
+              sign__KAXF=TRUE__;
+              state__JAXF= 1;
             };
-            __tmp__43WF=result__J1PG;
+            __tmp__JCXF=result__U5PG;
           };
-          if ((! __tmp__43WF)) {
-            if ((memory__31LF == '+')) {
-              state__41WF= 1;
+          if ((! __tmp__JCXF)) {
+            if ((memory__N5LF == '+')) {
+              state__JAXF= 1;
             } else {
-              state__41WF= 4;
+              state__JAXF= 4;
             };
           };
-          __tmp__R4WF=TRUE__;
+          __tmp__2CXF=TRUE__;
         } else {
-          __tmp__R4WF=FALSE__;
+          __tmp__2CXF=FALSE__;
         };
-        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 ((! __tmp__2CXF)) {
+          if ((state__JAXF ==  1)) {
+            Self__QXBH=memory__N5LF;
+            if ((! (((((((Self__QXBH == ' ') || (Self__QXBH == '\t')) || (Self__QXBH == '\n')) || (Self__QXBH == '\r')) || (Self__QXBH == '\0')) || (Self__QXBH == '\f')) || (Self__QXBH == '\v')))) {
+              Self__NWEH=memory__N5LF;
+              result__MWEH=FALSE__;
+              if ((((__INTEGER_8 )Self__NWEH) >= ((__INTEGER_8 )'0'))) {
+                result__MWEH=(((__INTEGER_8 )Self__NWEH) <= ((__INTEGER_8 )'9'));
               };
-              if (result__DSEH) {
-                last_integer__1RUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48);
-                state__41WF= 2;
+              if (result__MWEH) {
+                last_integer__1TUE=(__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48);
+                state__JAXF= 2;
               } else {
-                state__41WF= 4;
+                state__JAXF= 4;
               };
             };
           } else {
-            Self__ISEH=memory__31LF;
-            result__HSEH=FALSE__;
-            if ((((__INTEGER_8 )Self__ISEH) >= ((__INTEGER_8 )'0'))) {
-              result__HSEH=(((__INTEGER_8 )Self__ISEH) <= ((__INTEGER_8 )'9'));
+            Self__RWEH=memory__N5LF;
+            result__QWEH=FALSE__;
+            if ((((__INTEGER_8 )Self__RWEH) >= ((__INTEGER_8 )'0'))) {
+              result__QWEH=(((__INTEGER_8 )Self__RWEH) <= ((__INTEGER_8 )'9'));
             };
-            if (result__HSEH) {
-              last_integer__1RUE=(__INTEGER)((__INTEGER)(last_integer__1RUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__31LF)) -  48));
+            if (result__QWEH) {
+              last_integer__1TUE=(__INTEGER)((__INTEGER)(last_integer__1TUE *  10) + (__INTEGER)(((__INTEGER )((__INTEGER_8 )memory__N5LF)) -  48));
             } else {
-              state__41WF= 3;
+              state__JAXF= 3;
             };
           };
         };
-        result__LSEH=FALSE__;
-        if ((! push_back_flag__JPMF)) {
-          result__LSEH=(memory__31LF == ((__CHARACTER )(EOF)));
+        result__UWEH=FALSE__;
+        if ((! push_back_flag__OTMF)) {
+          result__UWEH=(memory__N5LF == ((__CHARACTER )(EOF)));
         };
-        if (result__LSEH) {
-          Self__COGG=state__41WF;
-          if (((state__41WF >=  0) && (state__41WF <=  1))) {
-            state__41WF= 4;
+        if (result__UWEH) {
+          Self__NSGG=state__JAXF;
+          if (((state__JAXF >=  0) && (state__JAXF <=  1))) {
+            state__JAXF= 4;
           };
-          if (((Self__COGG >=  2) && (Self__COGG <=  3))) {
-            state__41WF= 3;
+          if (((Self__NSGG >=  2) && (Self__NSGG <=  3))) {
+            state__JAXF= 3;
           };
         };
       };
-      result__MSEH=FALSE__;
-      if ((! push_back_flag__JPMF)) {
-        result__MSEH=(memory__31LF == ((__CHARACTER )(EOF)));
+      result__VWEH=FALSE__;
+      if ((! push_back_flag__OTMF)) {
+        result__VWEH=(memory__N5LF == ((__CHARACTER )(EOF)));
       };
-      if (result__MSEH) {
-        push_back_flag__JPMF=TRUE__;
+      if (result__VWEH) {
+        push_back_flag__OTMF=TRUE__;
       };
-      if ((state__41WF ==  4)) {
+      if ((state__JAXF ==  4)) {
         print__DID((&__string_331));
         print__DID((&__string_220));
         fputc((int)('\n'),stdout);
         exit(( 1));
       };
-      if (sign__51WF) {
-        last_integer__1RUE=(__INTEGER)(- last_integer__1RUE);
+      if (sign__KAXF) {
+        last_integer__1TUE=(__INTEGER)(- last_integer__1TUE);
       };
-      result__JQUE=get__LRSE(LIP_INTEGER__,last_integer__1RUE);
+      result__JSUE=get__LTSE(LIP_INTEGER__,last_integer__1TUE);
     };
-    __tmp__ASUE=result__XPXE;
+    __tmp__AUUE=result__DSXE;
   };
-  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__;
+  if ((! __tmp__AUUE)) {
+    if (((void *)Self__ESUE->name__EMUE == (void *)(&__string_107))) {
+      ((__STRING *)last_string__NUUE)->count__EGC= 0;
+      mem__F5LF='\0';
+      if (push_back_flag__OTMF) {
+        push_back_flag__OTMF=FALSE__;
       } else {
-        memory__31LF=((__CHARACTER )(fgetc(stdin)));
+        memory__N5LF=((__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)));
+      if (((memory__N5LF != '\n') && (memory__N5LF != ((__CHARACTER )(EOF))))) {
+        add_last__3IT(((__STRING *)last_string__NUUE),memory__N5LF);
+        mem__F5LF=((__CHARACTER )(fgetc(stdin)));
+        while ((! ((mem__F5LF == ((__CHARACTER )(EOF))) || (mem__F5LF == '\n')))) {
+          add_last__3IT(((__STRING *)last_string__NUUE),mem__F5LF);
+          mem__F5LF=((__CHARACTER )(fgetc(stdin)));
         };
-        memory__31LF=mem__V1LF;
+        memory__N5LF=mem__F5LF;
       };
-      result__JQUE=get__PVFF(LIP_STRING__,get__YWB(last_string__NSUE));
+      result__JSUE=get__GYFF(LIP_STRING__,get__YWB(last_string__NUUE));
     } else {
-      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)) {
+      if (((void *)fast_reference_at__4SRD(list_data__IONC,Self__ESUE->name__EMUE) == (void *)NULL)) {
+        Self__V1PF=((__FAST_ARRAYoLIP_SLOT_DATAo *)stack__DVUE);
+        if (((void *)((void **)Self__V1PF->parent_arrayed_collection__CVUE.storage__RCQF)[Self__V1PF->parent_arrayed_collection__CVUE.upper__51PF] == (void *)NULL)) {
+          copy__35R(string_tmp__VH,(&__string_309));
+          append__FLS(string_tmp__VH,Self__ESUE->name__EMUE);
+          append__FLS(string_tmp__VH,(&__string_310));
+          pos__BXKF=Self__ESUE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+          put_error__text__BMG( 1,string_tmp__VH);
+          put_position__LNG(pos__BXKF);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
       };
       print_string("Call on NULL\n(Use `-D' option)\n"); die_with_code(1);
-      result__JQUE=NULL;
+      result__JSUE=NULL;
     };
   };
-  if (((void *)val__IQUE != (void *)NULL)) {
-    switch (((struct ___OBJ *)val__IQUE)->__id) {
+  if (((void *)val__ISUE != (void *)NULL)) {
+    switch (((struct ___OBJ *)val__ISUE)->__id) {
     case __LIP_BOOLEAN__: {
     } break;
     case __LIP_INTEGER__: {
-      free__RY3F(val__IQUE);
+      free__223F(val__ISUE);
     } break;
     case __LIP_STRING__: {
-      free__52HG(val__IQUE);
+      free__KBIG(val__ISUE);
     } break;
     };
   };
-  return(result__JQUE);
+  return(result__JSUE);
 }
 
-static void* get__LRSE(__LIP_INTEGER *Self__MRSE,__INTEGER i__NRSE)
+static void* get__LTSE(__LIP_INTEGER *Self__MTSE,__INTEGER i__NTSE)
 // ({LIP_INTEGER},{INTEGER}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__PTSE;
+  __LIP_INTEGER *result__HUSF;
+  __POINTER ptr__IUSF,ptr_table__FCKH,next__ECKH,result__GCKH;
+  __POINTER ptr_table__KCKH,next__JCKH,result__LCKH;
+  __INTEGER typ_id__NUSF;
+  __UINTEGER_32 sz__KUSF,a__X1GH,new_size__Y1GH,t__21GH,a__11GH;
+  __UINTEGER_32 new_size__NCKH,lab_type__MCKH;
+  __FAST_ARRAYoLIP_INTEGERo *Self__223E,*Self__S33E;
+  result__PTSE=NULL;
+  if ((((__FAST_ARRAYoLIP_INTEGERo *)storage__VTSE)->parent_arrayed_collection__UTSE.upper__RCXE <  0)) {
+    result__HUSF=NULL;
+    ptr__IUSF=((__POINTER )(NULL));
+    typ_id__NUSF= 0;
+    sz__KUSF=((__UINTEGER_32 )sizeof(__LIP_INTEGER));
+    if ((sz__KUSF ==  0)) {
+      result__HUSF=Self__MTSE;
+    } else {
+      typ_id__NUSF=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KUSF);
+      if ((typ_id__NUSF == (__INTEGER)(-  1))) {
+        a__X1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__Y1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__KUSF + a__X1GH) & (__UINTEGER_32)(~ a__X1GH));
+        ptr_table__FCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Y1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__ECKH=((__POINTER )(NULL));
+        result__GCKH=((__POINTER *)ptr_table__FCKH)[ 0];
+        if ((result__GCKH == (void *)NULL)) {
+          result__GCKH=new_lab__ZPJ(new_size__Y1GH);
+          next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1GH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Y1GH <<  1)) <=  4096)) {
+              next__ECKH=(void *)((unsigned long)result__GCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Y1GH)));
             } else {
-              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)));
+              next__ECKH=new_lab__ZPJ(new_size__Y1GH);
+            };
+            ((__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__IUSF=result__GCKH;
+      } else {
+        t__21GH=((__UINTEGER_32 )typ_id__NUSF);
+        a__11GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__NCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KUSF + a__11GH) & (__UINTEGER_32)(~ a__11GH));
+        ptr_table__KCKH=((__POINTER )(&(table_type[(t__21GH)])));
+        lab_type__MCKH=(__UINTEGER_32)(t__21GH |  1);
+        next__JCKH=((__POINTER )(NULL));
+        result__LCKH=((__POINTER *)ptr_table__KCKH)[ 0];
+        if ((result__LCKH == (void *)NULL)) {
+          result__LCKH=new_lab__ZPJ(lab_type__MCKH);
+          next__JCKH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NCKH)));
+          ((__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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NCKH <<  1)) <=  4096)) {
+              next__JCKH=(void *)((unsigned long)result__LCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NCKH)));
             } else {
-              next__A4JH=new_lab__QOJ(lab_type__D4JH);
+              next__JCKH=new_lab__ZPJ(lab_type__MCKH);
             };
-            ((__POINTER *)next__A4JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__B4JH)[ 0]=next__A4JH;
+            ((__POINTER *)next__JCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__KCKH)[ 0]=next__JCKH;
           } else {
-            ((__POINTER *)result__C4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__A4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__C4JH=next__A4JH;
+            ((__POINTER *)result__LCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__LCKH=next__JCKH;
           };
         };
-        ptr__3PSF=result__C4JH;
+        ptr__IUSF=result__LCKH;
       };
-      result__2PSF=((__LIP_INTEGER *)ptr__3PSF);
-      *(result__2PSF) = *(Self__MRSE);
+      result__HUSF=((__LIP_INTEGER *)ptr__IUSF);
+      *(result__HUSF) = *(Self__MTSE);
     };
-    result__PRSE=result__2PSF;
+    result__PTSE=result__HUSF;
   } else {
-    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);
+    Self__223E=((__FAST_ARRAYoLIP_INTEGERo *)storage__VTSE);
+    result__PTSE=((void **)Self__223E->parent_arrayed_collection__UTSE.storage__4GXE)[Self__223E->parent_arrayed_collection__UTSE.upper__RCXE];
+    Self__S33E=((__FAST_ARRAYoLIP_INTEGERo *)storage__VTSE);
+    Self__S33E->parent_arrayed_collection__UTSE.upper__RCXE=(__INTEGER)(Self__S33E->parent_arrayed_collection__UTSE.upper__RCXE -  1);
   };
-  ((__LIP_INTEGER *)result__PRSE)->value__ZD4F=i__NRSE;
-  return(result__PRSE);
+  ((__LIP_INTEGER *)result__PTSE)->value__EI4F=i__NTSE;
+  return(result__PTSE);
 }
 
-static void* get__PVFF(__LIP_STRING *Self__QVFF,void *str__RVFF)
+static void* get__GYFF(__LIP_STRING *Self__HYFF,void *str__IYFF)
 // ({LIP_STRING},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  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)));
+  void *result__KYFF;
+  __LIP_STRING *result__ALBG;
+  __POINTER ptr__BLBG,ptr_table__PCKH,next__OCKH,result__QCKH;
+  __POINTER ptr_table__UCKH,next__TCKH,result__VCKH;
+  __INTEGER typ_id__GLBG;
+  __UINTEGER_32 sz__DLBG,a__51GH,new_size__A2GH,t__E2GH,a__D2GH;
+  __UINTEGER_32 new_size__XCKH,lab_type__WCKH;
+  __FAST_ARRAYoLIP_STRINGo *Self__HITF,*Self__3ITF;
+  result__KYFF=NULL;
+  if ((((__FAST_ARRAYoLIP_STRINGo *)storage__QYFF)->parent_arrayed_collection__PYFF.upper__VSPF <  0)) {
+    result__ALBG=NULL;
+    ptr__BLBG=((__POINTER )(NULL));
+    typ_id__GLBG= 0;
+    sz__DLBG=((__UINTEGER_32 )sizeof(__LIP_STRING));
+    if ((sz__DLBG ==  0)) {
+      result__ALBG=Self__HYFF;
+    } else {
+      typ_id__GLBG=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__DLBG);
+      if ((typ_id__GLBG == (__INTEGER)(-  1))) {
+        a__51GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__A2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__DLBG + a__51GH) & (__UINTEGER_32)(~ a__51GH));
+        ptr_table__PCKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__A2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__OCKH=((__POINTER )(NULL));
+        result__QCKH=((__POINTER *)ptr_table__PCKH)[ 0];
+        if ((result__QCKH == (void *)NULL)) {
+          result__QCKH=new_lab__ZPJ(new_size__A2GH);
+          next__OCKH=(void *)((unsigned long)result__QCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2GH)));
+          ((__POINTER *)next__OCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__PCKH)[ 0]=next__OCKH;
+        } else {
+          next__OCKH=((__POINTER *)result__QCKH)[ 0];
+          if ((next__OCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__QCKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__A2GH <<  1)) <=  4096)) {
+              next__OCKH=(void *)((unsigned long)result__QCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__A2GH)));
             } else {
-              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)));
+              next__OCKH=new_lab__ZPJ(new_size__A2GH);
+            };
+            ((__POINTER *)next__OCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__PCKH)[ 0]=next__OCKH;
+          } else {
+            ((__POINTER *)result__QCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__OCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__QCKH=next__OCKH;
+          };
+        };
+        ptr__BLBG=result__QCKH;
+      } else {
+        t__E2GH=((__UINTEGER_32 )typ_id__GLBG);
+        a__D2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__XCKH=(__UINTEGER_32)((__UINTEGER_32)(sz__DLBG + a__D2GH) & (__UINTEGER_32)(~ a__D2GH));
+        ptr_table__UCKH=((__POINTER )(&(table_type[(t__E2GH)])));
+        lab_type__WCKH=(__UINTEGER_32)(t__E2GH |  1);
+        next__TCKH=((__POINTER )(NULL));
+        result__VCKH=((__POINTER *)ptr_table__UCKH)[ 0];
+        if ((result__VCKH == (void *)NULL)) {
+          result__VCKH=new_lab__ZPJ(lab_type__WCKH);
+          next__TCKH=(void *)((unsigned long)result__VCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCKH)));
+          ((__POINTER *)next__TCKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__UCKH)[ 0]=next__TCKH;
+        } else {
+          next__TCKH=((__POINTER *)result__VCKH)[ 0];
+          if ((next__TCKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__VCKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__XCKH <<  1)) <=  4096)) {
+              next__TCKH=(void *)((unsigned long)result__VCKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__XCKH)));
             } else {
-              next__K4JH=new_lab__QOJ(lab_type__N4JH);
+              next__TCKH=new_lab__ZPJ(lab_type__WCKH);
             };
-            ((__POINTER *)next__K4JH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__L4JH)[ 0]=next__K4JH;
+            ((__POINTER *)next__TCKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__UCKH)[ 0]=next__TCKH;
           } else {
-            ((__POINTER *)result__M4JH)[ 0]=(void *)((unsigned long)((__POINTER *)next__K4JH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__M4JH=next__K4JH;
+            ((__POINTER *)result__VCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__VCKH=next__TCKH;
           };
         };
-        ptr__WGBG=result__M4JH;
+        ptr__BLBG=result__VCKH;
       };
-      result__VGBG=((__LIP_STRING *)ptr__WGBG);
-      *(result__VGBG) = *(Self__QVFF);
+      result__ALBG=((__LIP_STRING *)ptr__BLBG);
+      *(result__ALBG) = *(Self__HYFF);
     };
-    result__TVFF=result__VGBG;
+    result__KYFF=result__ALBG;
   } else {
-    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);
+    Self__HITF=((__FAST_ARRAYoLIP_STRINGo *)storage__QYFF);
+    result__KYFF=((void **)Self__HITF->parent_arrayed_collection__PYFF.storage__I0PF)[Self__HITF->parent_arrayed_collection__PYFF.upper__VSPF];
+    Self__3ITF=((__FAST_ARRAYoLIP_STRINGo *)storage__QYFF);
+    Self__3ITF->parent_arrayed_collection__PYFF.upper__VSPF=(__INTEGER)(Self__3ITF->parent_arrayed_collection__PYFF.upper__VSPF -  1);
   };
-  ((__LIP_STRING *)result__TVFF)->value__RLUE=str__RVFF;
-  return(result__TVFF);
+  ((__LIP_STRING *)result__KYFF)->value__RNUE=str__IYFF;
+  return(result__KYFF);
 }
 
-static void free__RY3F(__LIP_INTEGER *Self__SY3F)
+static void free__223F(__LIP_INTEGER *Self__323F)
 // ({LIP_INTEGER}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__ZN5F,__tmp__3O5F,__tmp__LXGG,Self__ICJG;
+  __FAST_ARRAYoLIP_INTEGERo *Self__XN5F;
+  __BOOLEAN __tmp__HO5F;
+  void **__tmp__2O5F,**new__XWGG;
+  Self__XN5F=((__FAST_ARRAYoLIP_INTEGERo *)storage__VTSE);
+  new_capacity__ZN5F= 0;
+  if (((__INTEGER)(Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE +  1) <= (__INTEGER)(Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE -  1))) {
+    Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE=(__INTEGER)(Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE +  1);
+    __tmp__HO5F=TRUE__;
   } else {
-    __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;
+    __tmp__HO5F=FALSE__;
+  };
+  if ((! __tmp__HO5F)) {
+    if ((Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE ==  0)) {
+      Self__XN5F->parent_arrayed_collection__UTSE.storage__4GXE=create__SIGF( 2);
+      Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE= 2;
+      Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE= 0;
+    } else {
+      new_capacity__ZN5F=(__INTEGER)(Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE <<  1);
+      __tmp__2O5F=Self__XN5F->parent_arrayed_collection__UTSE.storage__4GXE;
+      __tmp__3O5F=Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE;
+      new__XWGG=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__2O5F)),((__UINTEGER_32 )(__INTEGER)(__tmp__3O5F * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__ZN5F * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__LXGG=(__INTEGER)(new_capacity__ZN5F -  1);
+      Self__ICJG=__tmp__3O5F;
+      while ((Self__ICJG <= __tmp__LXGG)) {
+        new__XWGG[Self__ICJG]=NULL;
+        Self__ICJG=(__INTEGER)(Self__ICJG +  1);
+      };
+      Self__XN5F->parent_arrayed_collection__UTSE.storage__4GXE=new__XWGG;
+      Self__XN5F->parent_arrayed_collection__UTSE.capacity__TGXE=new_capacity__ZN5F;
+      Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE=(__INTEGER)(Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE +  1);
+    };
+  };
+  ((void **)Self__XN5F->parent_arrayed_collection__UTSE.storage__4GXE)[Self__XN5F->parent_arrayed_collection__UTSE.upper__RCXE]=Self__323F;
 }
 
-static void free__52HG(__LIP_STRING *Self__A3HG)
+static void free__KBIG(__LIP_STRING *Self__LBIG)
 // ({LIP_STRING}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__E0IG,__tmp__I1IG,__tmp__1CMG,Self__OONG;
+  __FAST_ARRAYoLIP_STRINGo *Self__C0IG;
+  __BOOLEAN __tmp__S0IG;
+  void **__tmp__H1IG,**new__HCMG;
+  Self__C0IG=((__FAST_ARRAYoLIP_STRINGo *)storage__QYFF);
+  new_capacity__E0IG= 0;
+  if (((__INTEGER)(Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF +  1) <= (__INTEGER)(Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF -  1))) {
+    Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF=(__INTEGER)(Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF +  1);
+    __tmp__S0IG=TRUE__;
   } else {
-    __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;
+    __tmp__S0IG=FALSE__;
+  };
+  if ((! __tmp__S0IG)) {
+    if ((Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF ==  0)) {
+      Self__C0IG->parent_arrayed_collection__PYFF.storage__I0PF=create__5JYF( 2);
+      Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF= 2;
+      Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF= 0;
+    } else {
+      new_capacity__E0IG=(__INTEGER)(Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF <<  1);
+      __tmp__H1IG=Self__C0IG->parent_arrayed_collection__PYFF.storage__I0PF;
+      __tmp__I1IG=Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF;
+      new__HCMG=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__H1IG)),((__UINTEGER_32 )(__INTEGER)(__tmp__I1IG * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__E0IG * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__1CMG=(__INTEGER)(new_capacity__E0IG -  1);
+      Self__OONG=__tmp__I1IG;
+      while ((Self__OONG <= __tmp__1CMG)) {
+        new__HCMG[Self__OONG]=NULL;
+        Self__OONG=(__INTEGER)(Self__OONG +  1);
+      };
+      Self__C0IG->parent_arrayed_collection__PYFF.storage__I0PF=new__HCMG;
+      Self__C0IG->parent_arrayed_collection__PYFF.capacity__3ZPF=new_capacity__E0IG;
+      Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF=(__INTEGER)(Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF +  1);
+    };
+  };
+  ((void **)Self__C0IG->parent_arrayed_collection__PYFF.storage__I0PF)[Self__C0IG->parent_arrayed_collection__PYFF.upper__VSPF]=Self__LBIG;
 }
 
-static void load_directory__is_recursive__5YWF(__LIP_CALL *Self__AZWF,void *path__BZWF,__BOOLEAN is_rec__CZWF)
+static void load_directory__is_recursive__K3WF(__LIP_CALL *Self__L3WF,void *path__M3WF,__BOOLEAN is_rec__N3WF)
 // ({LIP_CALL},{NULLxSTRING_CONSTANT},{TRUExFALSE}) VoidRecursive, No inlinable.
 {
-  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;
+  void *dir__P3WF,*__tmp__I4WF;
+  void *entry__O3WF;
+  __FILE_UNIX *Self__30BH;
+  __INTEGER __tmp__M4WF,Self__B0NG,i1__ZCKH,i2__0CKH;
+  void *__tmp__T4WF,*__tmp__24WF,*__tmp__T5WF;
+  __STRING_CONSTANT *Self__1CKH;
+  __POSITION __tmp__BAXF;
+  __BOOLEAN __tmp__W3WF,__tmp__A4WF,__tmp__33WF,__tmp__B4WF;
+  __BOOLEAN result__YCKH,__tmp__54WF,__tmp__J5WF,__tmp__M5WF;
+  dir__P3WF=NULL;
   if (FILE_SYSTEM__->parent_directory__2FD==0) {
   } else {
     parent_directory__1ED();
   };
-  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);
+  entry__O3WF=get_entry__GZAC(path__M3WF);
+  if (((void *)entry__O3WF != (void *)NULL)) {
+    if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__W3WF=((void *)((__DIRECTORY_UNIX *)entry__O3WF) != (void *)NULL);
     } else {
-      __tmp__LZWF=FALSE__;
+      __tmp__W3WF=FALSE__;
     };
-    __tmp__VZWF=__tmp__LZWF;
+    __tmp__A4WF=__tmp__W3WF;
   } else {
-    __tmp__VZWF=FALSE__;
+    __tmp__A4WF=FALSE__;
   };
-  if (__tmp__VZWF) {
-    if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
-      __tmp__SZWF=open__PDRD(entry__DZWF);
+  if (__tmp__A4WF) {
+    if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+      __tmp__33WF=open__FDRD(entry__O3WF);
     } else {
-      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);
+      Self__30BH=((__FILE_UNIX *)entry__O3WF);
+      Self__30BH->stream__QHRD=((__POINTER )(fopen((char*)(((__STRING_CONSTANT *)Self__30BH->parent_entry_unix__DBF.parent_entry__FFD.path__BD)->storage__ZNO),"r+b")));
+      __tmp__33WF=(Self__30BH->stream__QHRD != (void *)NULL);
     };
-    __tmp__WZWF=__tmp__SZWF;
+    __tmp__B4WF=__tmp__33WF;
   } else {
-    __tmp__WZWF=FALSE__;
+    __tmp__B4WF=FALSE__;
   };
-  if (__tmp__WZWF) {
-    if (entry__DZWF==NULL) {
-      __tmp__3ZWF=NULL;
+  if (__tmp__B4WF) {
+    if (entry__O3WF==NULL) {
+      __tmp__I4WF=NULL;
     } else {
-      switch (((struct ___OBJ *)entry__DZWF)->__id) {
+      switch (((struct ___OBJ *)entry__O3WF)->__id) {
       case __DIRECTORY_UNIX__: {
-        __tmp__3ZWF=((void *)entry__DZWF);
+        __tmp__I4WF=((void *)entry__O3WF);
       } break;
       case __FILE_UNIX__: {
-        __tmp__3ZWF=NULL;
+        __tmp__I4WF=NULL;
       } break;
       }
     };
-    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;
+    dir__P3WF=__tmp__I4WF;
+    __tmp__M4WF=((__LINKED_LISToENTRYo *)((__DIRECTORY_UNIX *)__tmp__I4WF)->parent_directory__HFD.list__UDRD)->parent_linked_collection__TDRD.upper__YM3D;
+    Self__B0NG= 1;
+    while ((Self__B0NG <= __tmp__M4WF)) {
+      entry__O3WF=item__NYPE(dir__P3WF,Self__B0NG);
+      if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+        __tmp__T4WF=((__DIRECTORY_UNIX *)entry__O3WF)->parent_entry_unix__GFD.parent_entry__FFD.name__ZKT;
       } else {
-        __tmp__I0WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.name__QJT;
+        __tmp__T4WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.name__ZKT;
       };
-      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);
+      Self__1CKH=((__STRING_CONSTANT *)__tmp__T4WF);
+      result__YCKH=FALSE__;
+      i1__ZCKH= 0;
+      i2__0CKH= 0;
+      if ((((__STRING_CONSTANT *)(&__string_159))->count__DD <= Self__1CKH->count__DD)) {
+        i1__ZCKH=(__INTEGER)((__INTEGER)(Self__1CKH->count__DD - ((__STRING_CONSTANT *)(&__string_159))->count__DD) +  1);
+        i2__0CKH= 1;
+        while ((! (((i1__ZCKH > Self__1CKH->count__DD) || (i2__0CKH > ((__STRING_CONSTANT *)(&__string_159))->count__DD)) || (((__CHARACTER *)Self__1CKH->storage__ZNO)[(__INTEGER)(i1__ZCKH -  1)] != ((__CHARACTER *)((__STRING_CONSTANT *)(&__string_159))->storage__ZNO)[(__INTEGER)(i2__0CKH -  1)])))) {
+          i1__ZCKH=(__INTEGER)(i1__ZCKH +  1);
+          i2__0CKH=(__INTEGER)(i2__0CKH +  1);
         };
-        result__P4JH=(i1__Q4JH > Self__S4JH->count__DD);
+        result__YCKH=(i1__ZCKH > Self__1CKH->count__DD);
       };
-      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;
+      if (result__YCKH) {
+        if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+          __tmp__24WF=((__DIRECTORY_UNIX *)entry__O3WF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
         } else {
-          __tmp__R0WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+          __tmp__24WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
         };
-        add_last__HAPD(path_file__P0WF,__tmp__R0WF);
-        __tmp__U0WF=TRUE__;
+        add_last__35OD(path_file__04WF,__tmp__24WF);
+        __tmp__54WF=TRUE__;
       } else {
-        __tmp__U0WF=FALSE__;
+        __tmp__54WF=FALSE__;
       };
-      if ((! __tmp__U0WF)) {
-        if (is_rec__CZWF) {
-          if (((struct ___OBJ *)entry__DZWF)->__id==__DIRECTORY_UNIX__) {
-            __tmp__40WF=((void *)((__DIRECTORY_UNIX *)entry__DZWF) != (void *)NULL);
+      if ((! __tmp__54WF)) {
+        if (is_rec__N3WF) {
+          if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__J5WF=((void *)((__DIRECTORY_UNIX *)entry__O3WF) != (void *)NULL);
           } else {
-            __tmp__40WF=FALSE__;
+            __tmp__J5WF=FALSE__;
           };
-          __tmp__B1WF=__tmp__40WF;
+          __tmp__M5WF=__tmp__J5WF;
         } else {
-          __tmp__B1WF=FALSE__;
+          __tmp__M5WF=FALSE__;
         };
-        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;
+        if (__tmp__M5WF) {
+          if (((struct ___OBJ *)entry__O3WF)->__id==__DIRECTORY_UNIX__) {
+            __tmp__T5WF=((__DIRECTORY_UNIX *)entry__O3WF)->parent_entry_unix__GFD.parent_entry__FFD.path__BD;
           } else {
-            __tmp__I1WF=((__FILE_UNIX *)entry__DZWF)->parent_entry_unix__05E.parent_entry__FFD.path__BD;
+            __tmp__T5WF=((__FILE_UNIX *)entry__O3WF)->parent_entry_unix__DBF.parent_entry__FFD.path__BD;
           };
-          load_directory__is_recursive__5YWF(Self__AZWF,__tmp__I1WF,TRUE__);
+          load_directory__is_recursive__K3WF(Self__L3WF,__tmp__T5WF,TRUE__);
         };
       };
-      Self__WVNG=(__INTEGER)(Self__WVNG +  1);
+      Self__B0NG=(__INTEGER)(Self__B0NG +  1);
     };
   } else {
-    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)) {
+    copy__35R(string_tmp__VH,(&__string_332));
+    append__FLS(string_tmp__VH,path__M3WF);
+    append__FLS(string_tmp__VH,(&__string_293));
+    __tmp__BAXF=Self__L3WF->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ;
+    put_error__text__BMG( 2,string_tmp__VH);
+    put_position__LNG(__tmp__BAXF);
+    put_string__L0F(msg_err__GMG);
+    if ((type_error__FMG !=  2)) {
       exit(( 1));
     };
   };
 }
 
-static void append_in__ZDIG(__LIP_STRING *Self__0DIG,void *str__1DIG)
+static void append_in__EIIG(__LIP_STRING *Self__FIIG,void *str__GIIG)
 // ({LIP_STRING},{NULLxSTRING}) VoidNo recursive, No inlinable.
 {
-  __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');
+  __INTEGER i__HIIG;
+  __CHARACTER car__IIIG;
+  car__IIIG='\0';
+  i__HIIG= 1;
+  while ((i__HIIG <= ((__STRING_CONSTANT *)Self__FIIG->value__RNUE)->count__DD)) {
+    car__IIIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__FIIG->value__RNUE)->storage__ZNO)[(__INTEGER)(i__HIIG -  1)];
+    if ((car__IIIG == '\\')) {
+      i__HIIG=(__INTEGER)(i__HIIG +  1);
+      if ((i__HIIG <= ((__STRING_CONSTANT *)Self__FIIG->value__RNUE)->count__DD)) {
+        car__IIIG=((__CHARACTER *)((__STRING_CONSTANT *)Self__FIIG->value__RNUE)->storage__ZNO)[(__INTEGER)(i__HIIG -  1)];
+        if ((car__IIIG == 'a')) {
+          add_last__3IT(str__GIIG,'\a');
         };
-        if ((car__3DIG == 'b')) {
-          add_last__UHT(str__1DIG,'\b');
+        if ((car__IIIG == 'b')) {
+          add_last__3IT(str__GIIG,'\b');
         };
-        if ((car__3DIG == 'f')) {
-          add_last__UHT(str__1DIG,'\f');
+        if ((car__IIIG == 'f')) {
+          add_last__3IT(str__GIIG,'\f');
         };
-        if ((car__3DIG == 'n')) {
-          add_last__UHT(str__1DIG,'\n');
+        if ((car__IIIG == 'n')) {
+          add_last__3IT(str__GIIG,'\n');
         };
-        if ((car__3DIG == 'r')) {
-          add_last__UHT(str__1DIG,'\r');
+        if ((car__IIIG == 'r')) {
+          add_last__3IT(str__GIIG,'\r');
         };
-        if ((car__3DIG == 't')) {
-          add_last__UHT(str__1DIG,'\t');
+        if ((car__IIIG == 't')) {
+          add_last__3IT(str__GIIG,'\t');
         };
-        if ((car__3DIG == 'v')) {
-          add_last__UHT(str__1DIG,'\v');
+        if ((car__IIIG == 'v')) {
+          add_last__3IT(str__GIIG,'\v');
         };
-        if ((car__3DIG == '\\')) {
-          add_last__UHT(str__1DIG,'\\');
+        if ((car__IIIG == '\\')) {
+          add_last__3IT(str__GIIG,'\\');
         };
-        if ((car__3DIG == '?')) {
-          add_last__UHT(str__1DIG,'\?');
+        if ((car__IIIG == '?')) {
+          add_last__3IT(str__GIIG,'\?');
         };
-        if ((car__3DIG == '\'')) {
-          add_last__UHT(str__1DIG,'\'');
+        if ((car__IIIG == '\'')) {
+          add_last__3IT(str__GIIG,'\'');
         };
-        if ((car__3DIG == '\"')) {
-          add_last__UHT(str__1DIG,'\"');
+        if ((car__IIIG == '\"')) {
+          add_last__3IT(str__GIIG,'\"');
         };
       } else {
-        add_last__UHT(str__1DIG,car__3DIG);
+        add_last__3IT(str__GIIG,car__IIIG);
       };
     } else {
-      add_last__UHT(str__1DIG,car__3DIG);
+      add_last__3IT(str__GIIG,car__IIIG);
     };
-    i__2DIG=(__INTEGER)(i__2DIG +  1);
+    i__HIIG=(__INTEGER)(i__HIIG +  1);
   };
 }
 
-static void print_positif__J2KG(__INTEGER Self__K2KG)
+static void print_positif__UALG(__INTEGER Self__VALG)
 // ({INTEGER}) VoidRecursive, No inlinable.
 {
-  __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);
+  __INTEGER val__4ALG;
+  __CHARACTER char__3ALG;
+  char__3ALG=((__CHARACTER )(((__INTEGER_8)(((__INTEGER_8 )(__INTEGER)(Self__VALG %  10)) + ((__INTEGER_8 )'0')))));
+  val__4ALG=(__INTEGER)(Self__VALG /  10);
+  if ((val__4ALG !=  0)) {
+    print_positif__UALG(val__4ALG);
+  };
+  fputc((int)(char__3ALG),stdout);
 }
 
-static __BOOLEAN has__HHMB(__HASHED_SEToSTRING_CONSTANTo *Self__IHMB,void *e__JHMB)
+static __BOOLEAN has__RIMB(__HASHED_SEToSTRING_CONSTANTo *Self__SIMB,void *e__TIMB)
 // ({HASHED_SEToSTRING_CONSTANTo},{NULLxSTRING_CONSTANT}) With resultNo recursive, No inlinable.
 {
-  __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));
+  __STRING_CONSTANT *Self__SEIH;
+  __INTEGER result__REIH,__tmp__TEIH,Self__UEIH;
+  void *node__2IMB;
+  Self__SEIH=((__STRING_CONSTANT *)e__TIMB);
+  result__REIH= 0;
+  __tmp__TEIH=Self__SEIH->count__DD;
+  Self__UEIH= 1;
+  while ((Self__UEIH <= __tmp__TEIH)) {
+    result__REIH=(__INTEGER)((__INTEGER)( 5 * result__REIH) + ((__INTEGER )((__INTEGER_8 )((__CHARACTER *)Self__SEIH->storage__ZNO)[(__INTEGER)(Self__UEIH -  1)])));
+    Self__UEIH=(__INTEGER)(Self__UEIH +  1);
+  };
+  if ((result__REIH <  0)) {
+    result__REIH=(__INTEGER)(~ result__REIH);
+  };
+  node__2IMB=((void **)Self__SIMB->buckets__LBV)[(__INTEGER)(result__REIH % Self__SIMB->capacity__OFT)];
+  while ((! (((void *)node__2IMB == (void *)NULL) || __infix_equal_equal__02DB(((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__2IMB)->item__XBV,e__TIMB)))) {
+    node__2IMB=((__HASHED_SET_NODEoSTRING_CONSTANTo *)node__2IMB)->next__CCV;
+  };
+  return(((void *)node__2IMB != (void *)NULL));
 }
 
-static __FAST_ARRAYoITM_LOCALo* create_with_capacity__KGK(__INTEGER new_count__MGK)
+static __FAST_ARRAYoITM_LOCALo* create_with_capacity__THK(__INTEGER new_count__VHK)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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__;
+  __POINTER ptr__R1K,ptr_table__4CKH,next__3CKH,result__5CKH;
+  __POINTER ptr_table__DDKH,next__CDKH,result__EDKH;
+  __INTEGER typ_id__W1K;
+  __UINTEGER_32 sz__T1K,a__H2GH,new_size__I2GH,t__M2GH,a__L2GH;
+  __UINTEGER_32 new_size__GDKH,lab_type__FDKH;
+  __FAST_ARRAYoITM_LOCALo *result__Q1K,*Self__VJU;
+  result__Q1K=NULL;
+  ptr__R1K=((__POINTER )(NULL));
+  typ_id__W1K= 0;
+  sz__T1K=((__UINTEGER_32 )sizeof(__FAST_ARRAYoITM_LOCALo));
+  if ((sz__T1K ==  0)) {
+    result__Q1K=FAST_ARRAYoITM_LOCALo__;
   } else {
-    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);
+    typ_id__W1K=__FAST_ARRAYoITM_LOCALo__;
+    clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__T1K);
+    if ((typ_id__W1K == (__INTEGER)(-  1))) {
+      a__H2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__I2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__T1K + a__H2GH) & (__UINTEGER_32)(~ a__H2GH));
+      ptr_table__4CKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__I2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+      next__3CKH=((__POINTER )(NULL));
+      result__5CKH=((__POINTER *)ptr_table__4CKH)[ 0];
+      if ((result__5CKH == (void *)NULL)) {
+        result__5CKH=new_lab__ZPJ(new_size__I2GH);
+        next__3CKH=(void *)((unsigned long)result__5CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2GH)));
+        ((__POINTER *)next__3CKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__4CKH)[ 0]=next__3CKH;
+      } else {
+        next__3CKH=((__POINTER *)result__5CKH)[ 0];
+        if ((next__3CKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__5CKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__I2GH <<  1)) <=  4096)) {
+            next__3CKH=(void *)((unsigned long)result__5CKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__I2GH)));
+          } else {
+            next__3CKH=new_lab__ZPJ(new_size__I2GH);
+          };
+          ((__POINTER *)next__3CKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__4CKH)[ 0]=next__3CKH;
+        } else {
+          ((__POINTER *)result__5CKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3CKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__5CKH=next__3CKH;
+        };
+      };
+      ptr__R1K=result__5CKH;
+    } else {
+      t__M2GH=((__UINTEGER_32 )typ_id__W1K);
+      a__L2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+      new_size__GDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__T1K + a__L2GH) & (__UINTEGER_32)(~ a__L2GH));
+      ptr_table__DDKH=((__POINTER )(&(table_type[(t__M2GH)])));
+      lab_type__FDKH=(__UINTEGER_32)(t__M2GH |  1);
+      next__CDKH=((__POINTER )(NULL));
+      result__EDKH=((__POINTER *)ptr_table__DDKH)[ 0];
+      if ((result__EDKH == (void *)NULL)) {
+        result__EDKH=new_lab__ZPJ(lab_type__FDKH);
+        next__CDKH=(void *)((unsigned long)result__EDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDKH)));
+        ((__POINTER *)next__CDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__DDKH)[ 0]=next__CDKH;
+      } else {
+        next__CDKH=((__POINTER *)result__EDKH)[ 0];
+        if ((next__CDKH == (void *)NULL)) {
+          if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__EDKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__GDKH <<  1)) <=  4096)) {
+            next__CDKH=(void *)((unsigned long)result__EDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__GDKH)));
+          } else {
+            next__CDKH=new_lab__ZPJ(lab_type__FDKH);
+          };
+          ((__POINTER *)next__CDKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__DDKH)[ 0]=next__CDKH;
+        } else {
+          ((__POINTER *)result__EDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+          result__EDKH=next__CDKH;
+        };
+      };
+      ptr__R1K=result__EDKH;
+    };
+    result__Q1K=((__FAST_ARRAYoITM_LOCALo *)ptr__R1K);
+    *(result__Q1K) = *(FAST_ARRAYoITM_LOCALo__);
+  };
+  Self__VJU=((__FAST_ARRAYoITM_LOCALo *)result__Q1K);
+  if ((Self__VJU->parent_arrayed_collection__1ZH.capacity__THU < new_count__VHK)) {
+    Self__VJU->parent_arrayed_collection__1ZH.storage__4HU=create__RPQB(new_count__VHK);
+    Self__VJU->parent_arrayed_collection__1ZH.capacity__THU=new_count__VHK;
+  };
+  Self__VJU->parent_arrayed_collection__1ZH.upper__UYK=(__INTEGER)(-  1);
+  return(result__Q1K);
 }
 
-static void add_last__YXU(__FAST_ARRAYoITM_LOCALo *Self__ZXU,void *element__0XU)
+static void add_last__BZU(__FAST_ARRAYoITM_LOCALo *Self__CZU,void *element__DZU)
 // ({FAST_ARRAYoITM_LOCALo},{NULLxITM_LOCAL}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__EZU,__tmp__I0U,__tmp__1BEC,Self__VFVD;
+  __BOOLEAN __tmp__SZU;
+  void **__tmp__H0U,**new__HBEC;
+  new_capacity__EZU= 0;
+  if (((__INTEGER)(Self__CZU->parent_arrayed_collection__1ZH.upper__UYK +  1) <= (__INTEGER)(Self__CZU->parent_arrayed_collection__1ZH.capacity__THU -  1))) {
+    Self__CZU->parent_arrayed_collection__1ZH.upper__UYK=(__INTEGER)(Self__CZU->parent_arrayed_collection__1ZH.upper__UYK +  1);
+    __tmp__SZU=TRUE__;
   } else {
-    __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;
+    __tmp__SZU=FALSE__;
+  };
+  if ((! __tmp__SZU)) {
+    if ((Self__CZU->parent_arrayed_collection__1ZH.capacity__THU ==  0)) {
+      Self__CZU->parent_arrayed_collection__1ZH.storage__4HU=create__RPQB( 2);
+      Self__CZU->parent_arrayed_collection__1ZH.capacity__THU= 2;
+      Self__CZU->parent_arrayed_collection__1ZH.upper__UYK= 0;
+    } else {
+      new_capacity__EZU=(__INTEGER)(Self__CZU->parent_arrayed_collection__1ZH.capacity__THU <<  1);
+      __tmp__H0U=Self__CZU->parent_arrayed_collection__1ZH.storage__4HU;
+      __tmp__I0U=Self__CZU->parent_arrayed_collection__1ZH.capacity__THU;
+      new__HBEC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__H0U)),((__UINTEGER_32 )(__INTEGER)(__tmp__I0U * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__EZU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__1BEC=(__INTEGER)(new_capacity__EZU -  1);
+      Self__VFVD=__tmp__I0U;
+      while ((Self__VFVD <= __tmp__1BEC)) {
+        new__HBEC[Self__VFVD]=NULL;
+        Self__VFVD=(__INTEGER)(Self__VFVD +  1);
+      };
+      Self__CZU->parent_arrayed_collection__1ZH.storage__4HU=new__HBEC;
+      Self__CZU->parent_arrayed_collection__1ZH.capacity__THU=new_capacity__EZU;
+      Self__CZU->parent_arrayed_collection__1ZH.upper__UYK=(__INTEGER)(Self__CZU->parent_arrayed_collection__1ZH.upper__UYK +  1);
+    };
+  };
+  ((void **)Self__CZU->parent_arrayed_collection__1ZH.storage__4HU)[Self__CZU->parent_arrayed_collection__1ZH.upper__UYK]=element__DZU;
 }
 
-static void free__QGK(void *tmp__SGK)
+static void free__ZHK(void *tmp__1HK)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) VoidNo recursive, No inlinable.
 {
-  __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__;
+  __INTEGER new_capacity__OLU,__tmp__SMU,__tmp__P5DC,Self__WDVD;
+  __FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *Self__MLU;
+  __BOOLEAN __tmp__2LU;
+  void **__tmp__RMU,**new__14DC;
+  ((__FAST_ARRAYoITM_LOCALo *)tmp__1HK)->parent_arrayed_collection__1ZH.upper__UYK=(__INTEGER)(-  1);
+  Self__MLU=((__FAST_ARRAYoFAST_ARRAYoITM_LOCALoo *)free_list__CQI);
+  new_capacity__OLU= 0;
+  if (((__INTEGER)(Self__MLU->parent_arrayed_collection__BQI.upper__NYT +  1) <= (__INTEGER)(Self__MLU->parent_arrayed_collection__BQI.capacity__YFU -  1))) {
+    Self__MLU->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(Self__MLU->parent_arrayed_collection__BQI.upper__NYT +  1);
+    __tmp__2LU=TRUE__;
   } else {
-    __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;
+    __tmp__2LU=FALSE__;
+  };
+  if ((! __tmp__2LU)) {
+    if ((Self__MLU->parent_arrayed_collection__BQI.capacity__YFU ==  0)) {
+      Self__MLU->parent_arrayed_collection__BQI.storage__DGU=create__OFQB( 2);
+      Self__MLU->parent_arrayed_collection__BQI.capacity__YFU= 2;
+      Self__MLU->parent_arrayed_collection__BQI.upper__NYT= 0;
+    } else {
+      new_capacity__OLU=(__INTEGER)(Self__MLU->parent_arrayed_collection__BQI.capacity__YFU <<  1);
+      __tmp__RMU=Self__MLU->parent_arrayed_collection__BQI.storage__DGU;
+      __tmp__SMU=Self__MLU->parent_arrayed_collection__BQI.capacity__YFU;
+      new__14DC=((void **)realloc_dynamic__old_size__new_size__LELC(((__POINTER )((void **)__tmp__RMU)),((__UINTEGER_32 )(__INTEGER)(__tmp__SMU * ((__INTEGER )(sizeof(void *))))),((__UINTEGER_32 )(__INTEGER)(new_capacity__OLU * ((__INTEGER )(sizeof(void *)))))));
+      __tmp__P5DC=(__INTEGER)(new_capacity__OLU -  1);
+      Self__WDVD=__tmp__SMU;
+      while ((Self__WDVD <= __tmp__P5DC)) {
+        new__14DC[Self__WDVD]=NULL;
+        Self__WDVD=(__INTEGER)(Self__WDVD +  1);
+      };
+      Self__MLU->parent_arrayed_collection__BQI.storage__DGU=new__14DC;
+      Self__MLU->parent_arrayed_collection__BQI.capacity__YFU=new_capacity__OLU;
+      Self__MLU->parent_arrayed_collection__BQI.upper__NYT=(__INTEGER)(Self__MLU->parent_arrayed_collection__BQI.upper__NYT +  1);
+    };
+  };
+  ((void **)Self__MLU->parent_arrayed_collection__BQI.storage__DGU)[Self__MLU->parent_arrayed_collection__BQI.upper__NYT]=tmp__1HK;
 }
 
-static void* copy__Z0J(void *tmp__10J)
+static void* copy__C2J(void *tmp__E2J)
 // ({NULLxFAST_ARRAYoITM_LOCALo}) With resultNo recursive, No inlinable.
 {
-  __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);
+  __INTEGER new_capacity__KHU,other_upper__JHU,Self__A5JC;
+  void *result__G2J;
+  __FAST_ARRAYoITM_LOCALo *Self__HHU;
+  void **__tmp__BIU,**__tmp__DIU,**Self__WSCC;
+  result__G2J=create_with_capacity__THK((__INTEGER)(((__FAST_ARRAYoITM_LOCALo *)tmp__E2J)->parent_arrayed_collection__1ZH.upper__UYK +  1));
+  Self__HHU=((__FAST_ARRAYoITM_LOCALo *)result__G2J);
+  new_capacity__KHU= 0;
+  other_upper__JHU=((__FAST_ARRAYoITM_LOCALo *)tmp__E2J)->parent_arrayed_collection__1ZH.upper__UYK;
+  if ((other_upper__JHU >=  0)) {
+    new_capacity__KHU=(__INTEGER)(other_upper__JHU +  1);
+    if ((Self__HHU->parent_arrayed_collection__1ZH.capacity__THU < new_capacity__KHU)) {
+      Self__HHU->parent_arrayed_collection__1ZH.storage__4HU=create__RPQB(new_capacity__KHU);
+      Self__HHU->parent_arrayed_collection__1ZH.capacity__THU=new_capacity__KHU;
+    };
+    __tmp__BIU=Self__HHU->parent_arrayed_collection__1ZH.storage__4HU;
+    __tmp__DIU=((__FAST_ARRAYoITM_LOCALo *)tmp__E2J)->parent_arrayed_collection__1ZH.storage__4HU;
+    Self__WSCC=((void **)__tmp__BIU);
+    Self__A5JC=other_upper__JHU;
+    while ((Self__A5JC >=  0)) {
+      Self__WSCC[Self__A5JC]=((void **)__tmp__DIU)[Self__A5JC];
+      Self__A5JC=(__INTEGER)(Self__A5JC -  1);
+    };
+  };
+  Self__HHU->parent_arrayed_collection__1ZH.upper__UYK=other_upper__JHU;
+  free__ZHK(tmp__E2J);
+  return(result__G2J);
 }
 
-static void** create__FQQB(__INTEGER nb_elements__HQQB)
+static void** create__RRQB(__INTEGER nb_elements__TRQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__3XEH,a__CYEH,new_size__4XEH,new_size2__5XEH,a__KZGH;
+  __UINTEGER_32 new_size__LZGH;
+  __POINTER result__2XEH,ptr_table__IDKH,next__HDKH,result__JDKH;
+  void *result__MDKH;
+  __INTEGER Self__U1MC;
+  void **Result__WMTB;
+  sz__3XEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TRQB * ((__INTEGER )(sizeof(void *)))));
+  result__2XEH=((__POINTER )(NULL));
+  a__CYEH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__4XEH=(__UINTEGER_32)((__UINTEGER_32)(sz__3XEH + a__CYEH) & (__UINTEGER_32)(~ a__CYEH));
+  new_size2__5XEH=(__UINTEGER_32)(new_size__4XEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__5XEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__KZGH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__LZGH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__5XEH + a__KZGH) & (__UINTEGER_32)(~ a__KZGH));
+    ptr_table__IDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__LZGH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__HDKH=((__POINTER )(NULL));
+    result__JDKH=((__POINTER *)ptr_table__IDKH)[ 0];
+    if ((result__JDKH == (void *)NULL)) {
+      result__JDKH=new_lab__ZPJ(new_size__LZGH);
+      next__HDKH=(void *)((unsigned long)result__JDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LZGH)));
+      ((__POINTER *)next__HDKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__IDKH)[ 0]=next__HDKH;
+    } else {
+      next__HDKH=((__POINTER *)result__JDKH)[ 0];
+      if ((next__HDKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__JDKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__LZGH <<  1)) <=  4096)) {
+          next__HDKH=(void *)((unsigned long)result__JDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__LZGH)));
+        } else {
+          next__HDKH=new_lab__ZPJ(new_size__LZGH);
+        };
+        ((__POINTER *)next__HDKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__IDKH)[ 0]=next__HDKH;
+      } else {
+        ((__POINTER *)result__JDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__JDKH=next__HDKH;
+      };
+    };
+    ((__POINTER *)result__JDKH)[ 0]=((__POINTER ) 3);
+    result__2XEH=(void *)((unsigned long)result__JDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__MDKH=first_free__BCVB;
+    while ((((void *)result__MDKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__MDKH)->map_size_and_id__YTB &  4294967292LU) < new_size__4XEH))) {
+      result__MDKH=((__MEMORY *)result__MDKH)->map_next_free__ZTB;
     };
-    if (((void *)result__D5JH == (void *)NULL)) {
-      result__D5JH=new_page__B24();
+    if (((void *)result__MDKH == (void *)NULL)) {
+      result__MDKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__MDKH,new_size__4XEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__MDKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__2XEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__MDKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__WMTB=((void **)result__2XEH);
+  Self__U1MC=(__INTEGER)(nb_elements__TRQB -  1);
+  while ((Self__U1MC >=  0)) {
+    Result__WMTB[Self__U1MC]=NULL;
+    Self__U1MC=(__INTEGER)(Self__U1MC -  1);
   };
-  return(Result__KLTB);
+  return(Result__WMTB);
 }
 
-static void* read_send_msg__H0N(__PARSER *Self__I0N,void *first_arg__J0N)
+static void* read_send_msg__Q1N(__PARSER *Self__R1N,void *first_arg__S1N)
 // ({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__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()) {
+  void *result__U1N,*arg__Y1N,*tmp__VMRB;
+  void *n__W1N,*result__PZGH;
+  __INTEGER p1__Z1N,p2__01N,old_derive__11N,sav_derive__21N;
+  __INTEGER typ_id__YEIH,typ_id__BFIH,typ_id__KFIH,Self__21YC;
+  __INTEGER typ_id__U5Q;
+  __POSITION pos__EP0G,p__4EIH,p__HFIH,p__QFIH,p__B2Q;
+  __ITM_READ *result__WEIH;
+  __POINTER ptr__XEIH,ptr_table__QDKH,next__PDKH,result__RDKH;
+  __POINTER ptr_table__VDKH,next__UDKH,result__WDKH,ptr__AFIH;
+  __POINTER ptr_table__0DKH,next__ZDKH,result__1DKH,ptr_table__5DKH;
+  __POINTER next__4DKH,result__AEKH,ptr__JFIH,ptr_table__EEKH;
+  __POINTER next__DEKH,result__FEKH,ptr_table__JEKH,next__IEKH;
+  __POINTER result__KEKH,ptr__P5Q,ptr_table__OEKH,next__NEKH;
+  __POINTER result__PEKH,ptr_table__TEKH,next__SEKH,result__UEKH;
+  __UINTEGER_32 sz__ZEIH,a__0EIH,new_size__1EIH,t__2EIH,a__3EIH;
+  __UINTEGER_32 new_size__YDKH,lab_type__XDKH,sz__CFIH,a__DFIH;
+  __UINTEGER_32 new_size__EFIH,t__FFIH,a__GFIH,new_size__CEKH;
+  __UINTEGER_32 lab_type__BEKH,sz__LFIH,a__MFIH,new_size__NFIH,t__OFIH;
+  __UINTEGER_32 a__PFIH,new_size__MEKH,lab_type__LEKH,sz__R5Q,a__Q0GH;
+  __UINTEGER_32 new_size__R0GH,t__V0GH,a__U0GH,new_size__WEKH;
+  __UINTEGER_32 lab_type__VEKH;
+  __ITM_READ_ARG1 *result__5EIH;
+  __ITM_READ_ARG2 *result__IFIH;
+  __ITM_READ_ARGS *result__O5Q;
+  void *l_arg__X1N,*result__JTHH;
+  __FAST_ARRAYoSTRINGo *Self__QZGH,*Self__SZGH;
+  __FAST_ARRAYoFAST_ARRAYoITM_CODEoo *Self__KTHH,*Self__LTHH;
+  __BOOLEAN __tmp__W5N;
+  __FAST_ARRAYoITM_CODEo *Self__Z5V;
+  result__U1N=NULL;
+  n__W1N=NULL;
+  l_arg__X1N=NULL;
+  arg__Y1N=NULL;
+  p1__Z1N= 0;
+  p2__01N= 0;
+  old_derive__11N= 0;
+  sav_derive__21N= 0;
+  if (read_identifier__E4K()) {
+    p1__Z1N=(__INTEGER)(position__CCC - ((__STRING_CONSTANT *)last_string__V0C)->count__DD);
+    p2__01N=position__CCC;
+    old_derive__11N=short_derive__PCC;
+    result__PZGH=NULL;
+    if ((((__FAST_ARRAYoSTRINGo *)free__FLP)->parent_arrayed_collection__RKC.upper__UKC <  0)) {
+      result__PZGH=create__ZBB( 128);
+    } else {
+      Self__QZGH=((__FAST_ARRAYoSTRINGo *)free__FLP);
+      result__PZGH=((void **)Self__QZGH->parent_arrayed_collection__RKC.storage__1DT)[Self__QZGH->parent_arrayed_collection__RKC.upper__UKC];
+      Self__SZGH=((__FAST_ARRAYoSTRINGo *)free__FLP);
+      Self__SZGH->parent_arrayed_collection__RKC.upper__UKC=(__INTEGER)(Self__SZGH->parent_arrayed_collection__RKC.upper__UKC -  1);
+    };
+    n__W1N=result__PZGH;
+    copy__35R(result__PZGH,last_string__V0C);
+    result__JTHH=NULL;
+    if ((((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H)->parent_arrayed_collection__X2H.upper__MTT <  0)) {
+      result__JTHH=create_with_capacity__5TI( 16);
+    } else {
+      Self__KTHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      result__JTHH=((void **)Self__KTHH->parent_arrayed_collection__X2H.storage__03T)[Self__KTHH->parent_arrayed_collection__X2H.upper__MTT];
+      Self__LTHH=((__FAST_ARRAYoFAST_ARRAYoITM_CODEoo *)free_list__Y2H);
+      Self__LTHH->parent_arrayed_collection__X2H.upper__MTT=(__INTEGER)(Self__LTHH->parent_arrayed_collection__X2H.upper__MTT -  1);
+    };
+    l_arg__X1N=result__JTHH;
+    arg__Y1N=read_argument__XLP(Self__R1N);
+    if (((void *)arg__Y1N != (void *)NULL)) {
+      add_last__Q2U(result__JTHH,arg__Y1N);
+      while (read_identifier__E4K()) {
         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)) {
+        append__FLS(n__W1N,(&__string_112));
+        append__FLS(n__W1N,last_string__V0C);
+        arg__Y1N=read_argument__XLP(Self__R1N);
+        if (((void *)arg__Y1N == (void *)NULL)) {
+          pos__EP0G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_333));
+          put_position__LNG(pos__EP0G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        add_last__H1U(l_arg__O0N,arg__P0N);
+        add_last__Q2U(l_arg__X1N,arg__Y1N);
       };
     };
-    get__YWB(result__GVGH);
-    add_last__TNV(free__2JP,result__GVGH);
-    ((__STRING *)result__GVGH)->count__EGC= 0;
+    get__YWB(result__PZGH);
+    add_last__2OV(free__FLP,result__PZGH);
+    ((__STRING *)result__PZGH)->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;
+      if ((((! (((__FAST_ARRAYoITM_CODEo *)result__JTHH)->parent_arrayed_collection__ISF.upper__VFL <  0)) || ((void *)first_arg__S1N != (void *)NULL)) || (! fast_has__ZAV(short_local__XCC,last_string__V0C)))) {
+        sav_derive__21N=short_derive__PCC;
+        short_derive__PCC=old_derive__11N;
+        short__token__to__YBD((&__string_131),p1__Z1N,p2__01N);
+        short_derive__PCC=(__INTEGER)(sav_derive__21N + (__INTEGER)(short_derive__PCC - old_derive__11N));
+      };
+    };
+    if ((((__FAST_ARRAYoITM_CODEo *)result__JTHH)->parent_arrayed_collection__ISF.upper__VFL <  0)) {
+      if (((void *)first_arg__S1N == (void *)NULL)) {
+        p__4EIH=current_position__AWF();
+        result__WEIH=NULL;
+        ptr__XEIH=((__POINTER )(NULL));
+        typ_id__YEIH= 0;
+        sz__ZEIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+        if ((sz__ZEIH ==  0)) {
+          result__WEIH=ITM_READ__;
+        } else {
+          typ_id__YEIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__ZEIH);
+          if ((typ_id__YEIH == (__INTEGER)(-  1))) {
+            a__0EIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__1EIH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZEIH + a__0EIH) & (__UINTEGER_32)(~ a__0EIH));
+            ptr_table__QDKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__1EIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__PDKH=((__POINTER )(NULL));
+            result__RDKH=((__POINTER *)ptr_table__QDKH)[ 0];
+            if ((result__RDKH == (void *)NULL)) {
+              result__RDKH=new_lab__ZPJ(new_size__1EIH);
+              next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EIH)));
+              ((__POINTER *)next__PDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
             } else {
-              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)));
+              next__PDKH=((__POINTER *)result__RDKH)[ 0];
+              if ((next__PDKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__RDKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__1EIH <<  1)) <=  4096)) {
+                  next__PDKH=(void *)((unsigned long)result__RDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__1EIH)));
                 } else {
-                  next__G5JH=new_lab__QOJ(new_size__SAIH);
+                  next__PDKH=new_lab__ZPJ(new_size__1EIH);
                 };
-                ((__POINTER *)next__G5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__H5JH)[ 0]=next__G5JH;
+                ((__POINTER *)next__PDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__QDKH)[ 0]=next__PDKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__RDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__PDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__RDKH=next__PDKH;
+              };
+            };
+            ptr__XEIH=result__RDKH;
+          } else {
+            t__2EIH=((__UINTEGER_32 )typ_id__YEIH);
+            a__3EIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__YDKH=(__UINTEGER_32)((__UINTEGER_32)(sz__ZEIH + a__3EIH) & (__UINTEGER_32)(~ a__3EIH));
+            ptr_table__VDKH=((__POINTER )(&(table_type[(t__2EIH)])));
+            lab_type__XDKH=(__UINTEGER_32)(t__2EIH |  1);
+            next__UDKH=((__POINTER )(NULL));
+            result__WDKH=((__POINTER *)ptr_table__VDKH)[ 0];
+            if ((result__WDKH == (void *)NULL)) {
+              result__WDKH=new_lab__ZPJ(lab_type__XDKH);
+              next__UDKH=(void *)((unsigned long)result__WDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDKH)));
+              ((__POINTER *)next__UDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
             } else {
-              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)));
+              next__UDKH=((__POINTER *)result__WDKH)[ 0];
+              if ((next__UDKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__WDKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__YDKH <<  1)) <=  4096)) {
+                  next__UDKH=(void *)((unsigned long)result__WDKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__YDKH)));
                 } else {
-                  next__L5JH=new_lab__QOJ(lab_type__O5JH);
+                  next__UDKH=new_lab__ZPJ(lab_type__XDKH);
                 };
-                ((__POINTER *)next__L5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__M5JH)[ 0]=next__L5JH;
+                ((__POINTER *)next__UDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__VDKH)[ 0]=next__UDKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__WDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__UDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__WDKH=next__UDKH;
+              };
+            };
+            ptr__XEIH=result__WDKH;
+          };
+          result__WEIH=((__ITM_READ *)ptr__XEIH);
+          *(result__WEIH) = *(ITM_READ__);
+        };
+        ((__ITM_READ *)result__WEIH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__4EIH;
+        result__U1N=result__WEIH;
+      } else {
+        p__HFIH=current_position__AWF();
+        result__5EIH=NULL;
+        ptr__AFIH=((__POINTER )(NULL));
+        typ_id__BFIH= 0;
+        sz__CFIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG1));
+        if ((sz__CFIH ==  0)) {
+          result__5EIH=ITM_READ_ARG1__;
+        } else {
+          typ_id__BFIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__CFIH);
+          if ((typ_id__BFIH == (__INTEGER)(-  1))) {
+            a__DFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__EFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__CFIH + a__DFIH) & (__UINTEGER_32)(~ a__DFIH));
+            ptr_table__0DKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__EFIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__ZDKH=((__POINTER )(NULL));
+            result__1DKH=((__POINTER *)ptr_table__0DKH)[ 0];
+            if ((result__1DKH == (void *)NULL)) {
+              result__1DKH=new_lab__ZPJ(new_size__EFIH);
+              next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EFIH)));
+              ((__POINTER *)next__ZDKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
             } else {
-              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)));
+              next__ZDKH=((__POINTER *)result__1DKH)[ 0];
+              if ((next__ZDKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__1DKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EFIH <<  1)) <=  4096)) {
+                  next__ZDKH=(void *)((unsigned long)result__1DKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EFIH)));
                 } else {
-                  next__Q5JH=new_lab__QOJ(new_size__1AIH);
+                  next__ZDKH=new_lab__ZPJ(new_size__EFIH);
                 };
-                ((__POINTER *)next__Q5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__R5JH)[ 0]=next__Q5JH;
+                ((__POINTER *)next__ZDKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__0DKH)[ 0]=next__ZDKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__1DKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__ZDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__1DKH=next__ZDKH;
+              };
+            };
+            ptr__AFIH=result__1DKH;
+          } else {
+            t__FFIH=((__UINTEGER_32 )typ_id__BFIH);
+            a__GFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__CEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__CFIH + a__GFIH) & (__UINTEGER_32)(~ a__GFIH));
+            ptr_table__5DKH=((__POINTER )(&(table_type[(t__FFIH)])));
+            lab_type__BEKH=(__UINTEGER_32)(t__FFIH |  1);
+            next__4DKH=((__POINTER )(NULL));
+            result__AEKH=((__POINTER *)ptr_table__5DKH)[ 0];
+            if ((result__AEKH == (void *)NULL)) {
+              result__AEKH=new_lab__ZPJ(lab_type__BEKH);
+              next__4DKH=(void *)((unsigned long)result__AEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEKH)));
+              ((__POINTER *)next__4DKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
             } else {
-              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)));
+              next__4DKH=((__POINTER *)result__AEKH)[ 0];
+              if ((next__4DKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__AEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__CEKH <<  1)) <=  4096)) {
+                  next__4DKH=(void *)((unsigned long)result__AEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__CEKH)));
                 } else {
-                  next__V5JH=new_lab__QOJ(lab_type__Y5JH);
+                  next__4DKH=new_lab__ZPJ(lab_type__BEKH);
                 };
-                ((__POINTER *)next__V5JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__W5JH)[ 0]=next__V5JH;
+                ((__POINTER *)next__4DKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__5DKH)[ 0]=next__4DKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__AEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__4DKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__AEKH=next__4DKH;
+              };
+            };
+            ptr__AFIH=result__AEKH;
+          };
+          result__5EIH=((__ITM_READ_ARG1 *)ptr__AFIH);
+          *(result__5EIH) = *(ITM_READ_ARG1__);
+        };
+        ((__ITM_READ_ARG1 *)result__5EIH)->parent_itm_read__DGL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__HFIH;
+        result__U1N=result__5EIH;
+      };
+      free__FUI(result__JTHH);
+      __tmp__W5N=TRUE__;
+    } else {
+      __tmp__W5N=FALSE__;
+    };
+    if ((! __tmp__W5N)) {
+      if (((__INTEGER)(((__FAST_ARRAYoITM_CODEo *)result__JTHH)->parent_arrayed_collection__ISF.upper__VFL +  1) ==  1)) {
+        p__QFIH=current_position__AWF();
+        result__IFIH=NULL;
+        ptr__JFIH=((__POINTER )(NULL));
+        typ_id__KFIH= 0;
+        sz__LFIH=((__UINTEGER_32 )sizeof(__ITM_READ_ARG2));
+        if ((sz__LFIH ==  0)) {
+          result__IFIH=ITM_READ_ARG2__;
+        } else {
+          typ_id__KFIH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LFIH);
+          if ((typ_id__KFIH == (__INTEGER)(-  1))) {
+            a__MFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__NFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__LFIH + a__MFIH) & (__UINTEGER_32)(~ a__MFIH));
+            ptr_table__EEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__NFIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__DEKH=((__POINTER )(NULL));
+            result__FEKH=((__POINTER *)ptr_table__EEKH)[ 0];
+            if ((result__FEKH == (void *)NULL)) {
+              result__FEKH=new_lab__ZPJ(new_size__NFIH);
+              next__DEKH=(void *)((unsigned long)result__FEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFIH)));
+              ((__POINTER *)next__DEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__EEKH)[ 0]=next__DEKH;
             } else {
-              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)));
+              next__DEKH=((__POINTER *)result__FEKH)[ 0];
+              if ((next__DEKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__FEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__NFIH <<  1)) <=  4096)) {
+                  next__DEKH=(void *)((unsigned long)result__FEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__NFIH)));
                 } else {
-                  next__05JH=new_lab__QOJ(new_size__EBIH);
+                  next__DEKH=new_lab__ZPJ(new_size__NFIH);
                 };
-                ((__POINTER *)next__05JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__15JH)[ 0]=next__05JH;
+                ((__POINTER *)next__DEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__EEKH)[ 0]=next__DEKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__FEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__DEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__FEKH=next__DEKH;
+              };
+            };
+            ptr__JFIH=result__FEKH;
+          } else {
+            t__OFIH=((__UINTEGER_32 )typ_id__KFIH);
+            a__PFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__MEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LFIH + a__PFIH) & (__UINTEGER_32)(~ a__PFIH));
+            ptr_table__JEKH=((__POINTER )(&(table_type[(t__OFIH)])));
+            lab_type__LEKH=(__UINTEGER_32)(t__OFIH |  1);
+            next__IEKH=((__POINTER )(NULL));
+            result__KEKH=((__POINTER *)ptr_table__JEKH)[ 0];
+            if ((result__KEKH == (void *)NULL)) {
+              result__KEKH=new_lab__ZPJ(lab_type__LEKH);
+              next__IEKH=(void *)((unsigned long)result__KEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEKH)));
+              ((__POINTER *)next__IEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__JEKH)[ 0]=next__IEKH;
             } else {
-              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)));
+              next__IEKH=((__POINTER *)result__KEKH)[ 0];
+              if ((next__IEKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__KEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MEKH <<  1)) <=  4096)) {
+                  next__IEKH=(void *)((unsigned long)result__KEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MEKH)));
                 } else {
-                  next__55JH=new_lab__QOJ(lab_type__CAKH);
+                  next__IEKH=new_lab__ZPJ(lab_type__LEKH);
                 };
-                ((__POINTER *)next__55JH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__AAKH)[ 0]=next__55JH;
+                ((__POINTER *)next__IEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__JEKH)[ 0]=next__IEKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__KEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__IEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__KEKH=next__IEKH;
+              };
+            };
+            ptr__JFIH=result__KEKH;
+          };
+          result__IFIH=((__ITM_READ_ARG2 *)ptr__JFIH);
+          *(result__IFIH) = *(ITM_READ_ARG2__);
+        };
+        ((__ITM_READ_ARG2 *)result__IFIH)->parent_itm_read__QIL.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__QFIH;
+        result__U1N=result__IFIH;
+        free__FUI(result__JTHH);
+      } else {
+        Self__Z5V=((__FAST_ARRAYoITM_CODEo *)result__JTHH);
+        add_last__Q2U(Self__Z5V,first_arg__S1N);
+        if ((Self__Z5V->parent_arrayed_collection__ISF.upper__VFL !=  0)) {
+          if ((Self__Z5V->parent_arrayed_collection__ISF.upper__VFL ==  1)) {
+            tmp__VMRB=((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[ 0];
+            ((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[ 0]=((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[ 1];
+            ((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[ 1]=tmp__VMRB;
+          } else {
+            Self__21YC=(__INTEGER)(Self__Z5V->parent_arrayed_collection__ISF.upper__VFL -  1);
+            while ((Self__21YC >=  0)) {
+              ((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[(__INTEGER)(Self__21YC +  1)]=((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[Self__21YC];
+              ((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[Self__21YC]=NULL;
+              Self__21YC=(__INTEGER)(Self__21YC -  1);
+            };
+            ((void **)Self__Z5V->parent_arrayed_collection__ISF.storage__JVT)[ 0]=first_arg__S1N;
+          };
+        };
+        l_arg__X1N=copy__H4H(result__JTHH);
+        p__B2Q=current_position__AWF();
+        result__O5Q=NULL;
+        ptr__P5Q=((__POINTER )(NULL));
+        typ_id__U5Q= 0;
+        sz__R5Q=((__UINTEGER_32 )sizeof(__ITM_READ_ARGS));
+        if ((sz__R5Q ==  0)) {
+          result__O5Q=ITM_READ_ARGS__;
+        } else {
+          typ_id__U5Q=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__R5Q);
+          if ((typ_id__U5Q == (__INTEGER)(-  1))) {
+            a__Q0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__R0GH=(__UINTEGER_32)((__UINTEGER_32)(sz__R5Q + a__Q0GH) & (__UINTEGER_32)(~ a__Q0GH));
+            ptr_table__OEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__R0GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__NEKH=((__POINTER )(NULL));
+            result__PEKH=((__POINTER *)ptr_table__OEKH)[ 0];
+            if ((result__PEKH == (void *)NULL)) {
+              result__PEKH=new_lab__ZPJ(new_size__R0GH);
+              next__NEKH=(void *)((unsigned long)result__PEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0GH)));
+              ((__POINTER *)next__NEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__OEKH)[ 0]=next__NEKH;
             } else {
-              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)));
+              next__NEKH=((__POINTER *)result__PEKH)[ 0];
+              if ((next__NEKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__PEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__R0GH <<  1)) <=  4096)) {
+                  next__NEKH=(void *)((unsigned long)result__PEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R0GH)));
                 } else {
-                  next__EAKH=new_lab__QOJ(new_size__IWGH);
+                  next__NEKH=new_lab__ZPJ(new_size__R0GH);
                 };
-                ((__POINTER *)next__EAKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__FAKH)[ 0]=next__EAKH;
+                ((__POINTER *)next__NEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__OEKH)[ 0]=next__NEKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__PEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__PEKH=next__NEKH;
+              };
+            };
+            ptr__P5Q=result__PEKH;
+          } else {
+            t__V0GH=((__UINTEGER_32 )typ_id__U5Q);
+            a__U0GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__WEKH=(__UINTEGER_32)((__UINTEGER_32)(sz__R5Q + a__U0GH) & (__UINTEGER_32)(~ a__U0GH));
+            ptr_table__TEKH=((__POINTER )(&(table_type[(t__V0GH)])));
+            lab_type__VEKH=(__UINTEGER_32)(t__V0GH |  1);
+            next__SEKH=((__POINTER )(NULL));
+            result__UEKH=((__POINTER *)ptr_table__TEKH)[ 0];
+            if ((result__UEKH == (void *)NULL)) {
+              result__UEKH=new_lab__ZPJ(lab_type__VEKH);
+              next__SEKH=(void *)((unsigned long)result__UEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WEKH)));
+              ((__POINTER *)next__SEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__TEKH)[ 0]=next__SEKH;
             } else {
-              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)));
+              next__SEKH=((__POINTER *)result__UEKH)[ 0];
+              if ((next__SEKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__UEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WEKH <<  1)) <=  4096)) {
+                  next__SEKH=(void *)((unsigned long)result__UEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WEKH)));
                 } else {
-                  next__JAKH=new_lab__QOJ(lab_type__MAKH);
+                  next__SEKH=new_lab__ZPJ(lab_type__VEKH);
                 };
-                ((__POINTER *)next__JAKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__KAKH)[ 0]=next__JAKH;
+                ((__POINTER *)next__SEKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__TEKH)[ 0]=next__SEKH;
               } else {
-                ((__POINTER *)result__LAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                result__LAKH=next__JAKH;
+                ((__POINTER *)result__UEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__SEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__UEKH=next__SEKH;
               };
             };
-            ptr__G4Q=result__LAKH;
+            ptr__P5Q=result__UEKH;
           };
-          result__F4Q=((__ITM_READ_ARGS *)ptr__G4Q);
-          *(result__F4Q) = *(ITM_READ_ARGS__);
+          result__O5Q=((__ITM_READ_ARGS *)ptr__P5Q);
+          *(result__O5Q) = *(ITM_READ_ARGS__);
         };
-        ((__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;
+        ((__ITM_READ_ARGS *)result__O5Q)->parent_itm_read__OAO.parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__B2Q;
+        result__U1N=result__O5Q;
       };
     };
   };
-  return(result__L0N);
+  return(result__U1N);
 }
 
-static void* readlip_expr_cmp__VX1B(__PARSER *Self__WX1B)
+static void* readlip_expr_cmp__BZ1B(__PARSER *Self__CZ1B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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)) {
+  void *right__FZ1B,*result__EZ1B;
+  void *op__GZ1B;
+  __POSITION pos__BS0G,p__OVBD;
+  __STRING_CONSTANT *Self__4TBD;
+  __LIP_BINARY *result__IIGD,*Self__TVSD;
+  __POINTER ptr__JIGD,ptr_table__YEKH,next__XEKH,result__ZEKH;
+  __POINTER ptr_table__3EKH,next__2EKH,result__4EKH;
+  __INTEGER typ_id__OIGD;
+  __UINTEGER_32 sz__LIGD,a__A1GH,new_size__B1GH,t__F1GH,a__E1GH;
+  __UINTEGER_32 new_size__AFKH,lab_type__5EKH;
+  __CHARACTER type__HZ1B;
+  right__FZ1B=NULL;
+  op__GZ1B=NULL;
+  type__HZ1B='\0';
+  result__EZ1B=readlip_expr_binary__4L3B(Self__CZ1B);
+  if (((void *)result__EZ1B != (void *)NULL)) {
+    while ((((((read_symbol__GVJ((&__string_19)) || read_symbol__GVJ((&__string_21))) || read_symbol__GVJ((&__string_17))) || read_symbol__GVJ((&__string_16))) || read_symbol__GVJ((&__string_18))) || read_symbol__GVJ((&__string_20)))) {
+      op__GZ1B=last_string__V0C;
+      right__FZ1B=readlip_expr_binary__4L3B(Self__CZ1B);
+      if (((void *)right__FZ1B == (void *)NULL)) {
+        pos__BS0G=current_position__AWF();
+        put_error__text__BMG( 0,(&__string_240));
+        put_position__LNG(pos__BS0G);
+        put_string__L0F(msg_err__GMG);
+        if ((type_error__FMG !=  2)) {
           exit(( 1));
         };
       };
-      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)));
+      Self__4TBD=((__STRING_CONSTANT *)op__GZ1B);
+      if (((void *)Self__4TBD == (void *)(&__string_19))) {
+        type__HZ1B='S';
+      };
+      if (((void *)Self__4TBD == (void *)(&__string_21))) {
+        type__HZ1B='I';
+      };
+      if (((void *)Self__4TBD == (void *)(&__string_17))) {
+        type__HZ1B='E';
+      };
+      if (((void *)Self__4TBD == (void *)(&__string_16))) {
+        type__HZ1B='=';
+      };
+      if (((void *)Self__4TBD == (void *)(&__string_18))) {
+        type__HZ1B='>';
+      };
+      if (((void *)Self__4TBD == (void *)(&__string_20))) {
+        type__HZ1B='<';
+      };
+      p__OVBD=current_position__AWF();
+      result__IIGD=NULL;
+      ptr__JIGD=((__POINTER )(NULL));
+      typ_id__OIGD= 0;
+      sz__LIGD=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+      if ((sz__LIGD ==  0)) {
+        result__IIGD=LIP_BINARY__;
+      } else {
+        typ_id__OIGD=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__LIGD);
+        if ((typ_id__OIGD == (__INTEGER)(-  1))) {
+          a__A1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__B1GH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIGD + a__A1GH) & (__UINTEGER_32)(~ a__A1GH));
+          ptr_table__YEKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__B1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__XEKH=((__POINTER )(NULL));
+          result__ZEKH=((__POINTER *)ptr_table__YEKH)[ 0];
+          if ((result__ZEKH == (void *)NULL)) {
+            result__ZEKH=new_lab__ZPJ(new_size__B1GH);
+            next__XEKH=(void *)((unsigned long)result__ZEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1GH)));
+            ((__POINTER *)next__XEKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__YEKH)[ 0]=next__XEKH;
+          } else {
+            next__XEKH=((__POINTER *)result__ZEKH)[ 0];
+            if ((next__XEKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__ZEKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__B1GH <<  1)) <=  4096)) {
+                next__XEKH=(void *)((unsigned long)result__ZEKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__B1GH)));
               } else {
-                next__OAKH=new_lab__QOJ(new_size__YWGH);
+                next__XEKH=new_lab__ZPJ(new_size__B1GH);
               };
-              ((__POINTER *)next__OAKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__PAKH)[ 0]=next__OAKH;
+              ((__POINTER *)next__XEKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__YEKH)[ 0]=next__XEKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__ZEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__ZEKH=next__XEKH;
+            };
+          };
+          ptr__JIGD=result__ZEKH;
+        } else {
+          t__F1GH=((__UINTEGER_32 )typ_id__OIGD);
+          a__E1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__AFKH=(__UINTEGER_32)((__UINTEGER_32)(sz__LIGD + a__E1GH) & (__UINTEGER_32)(~ a__E1GH));
+          ptr_table__3EKH=((__POINTER )(&(table_type[(t__F1GH)])));
+          lab_type__5EKH=(__UINTEGER_32)(t__F1GH |  1);
+          next__2EKH=((__POINTER )(NULL));
+          result__4EKH=((__POINTER *)ptr_table__3EKH)[ 0];
+          if ((result__4EKH == (void *)NULL)) {
+            result__4EKH=new_lab__ZPJ(lab_type__5EKH);
+            next__2EKH=(void *)((unsigned long)result__4EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AFKH)));
+            ((__POINTER *)next__2EKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__3EKH)[ 0]=next__2EKH;
+          } else {
+            next__2EKH=((__POINTER *)result__4EKH)[ 0];
+            if ((next__2EKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__4EKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__AFKH <<  1)) <=  4096)) {
+                next__2EKH=(void *)((unsigned long)result__4EKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__AFKH)));
               } else {
-                next__TAKH=new_lab__QOJ(lab_type__WAKH);
+                next__2EKH=new_lab__ZPJ(lab_type__5EKH);
               };
-              ((__POINTER *)next__TAKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__UAKH)[ 0]=next__TAKH;
+              ((__POINTER *)next__2EKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__3EKH)[ 0]=next__2EKH;
             } else {
-              ((__POINTER *)result__VAKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__TAKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__VAKH=next__TAKH;
+              ((__POINTER *)result__4EKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__2EKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__4EKH=next__2EKH;
             };
           };
-          ptr__IHGD=result__VAKH;
+          ptr__JIGD=result__4EKH;
         };
-        result__HHGD=((__LIP_BINARY *)ptr__IHGD);
-        *(result__HHGD) = *(LIP_BINARY__);
+        result__IIGD=((__LIP_BINARY *)ptr__JIGD);
+        *(result__IIGD) = *(LIP_BINARY__);
       };
-      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;
+      Self__TVSD=((__LIP_BINARY *)result__IIGD);
+      Self__TVSD->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ=p__OVBD;
+      Self__TVSD->left__YXQD=result__EZ1B;
+      Self__TVSD->right__1XQD=right__FZ1B;
+      Self__TVSD->operator__4XQD=type__HZ1B;
+      result__EZ1B=result__IIGD;
     };
   };
-  return(result__YX1B);
+  return(result__EZ1B);
 }
 
-static void** create__XSIE(__INTEGER nb_elements__ZSIE)
+static void** create__ATIE(__INTEGER nb_elements__CTIE)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__2ZEH,a__B0EH,new_size__3ZEH,new_size2__4ZEH,a__Q1GH;
+  __UINTEGER_32 new_size__R1GH;
+  __POINTER result__1ZEH,ptr_table__CFKH,next__BFKH,result__DFKH;
+  void *result__GFKH;
+  __INTEGER Self__MRYE;
+  void **Result__PWNE;
+  sz__2ZEH=((__UINTEGER_32 )(__INTEGER)(nb_elements__CTIE * ((__INTEGER )(sizeof(void *)))));
+  result__1ZEH=((__POINTER )(NULL));
+  a__B0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__3ZEH=(__UINTEGER_32)((__UINTEGER_32)(sz__2ZEH + a__B0EH) & (__UINTEGER_32)(~ a__B0EH));
+  new_size2__4ZEH=(__UINTEGER_32)(new_size__3ZEH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__4ZEH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__Q1GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__R1GH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__4ZEH + a__Q1GH) & (__UINTEGER_32)(~ a__Q1GH));
+    ptr_table__CFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__R1GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__BFKH=((__POINTER )(NULL));
+    result__DFKH=((__POINTER *)ptr_table__CFKH)[ 0];
+    if ((result__DFKH == (void *)NULL)) {
+      result__DFKH=new_lab__ZPJ(new_size__R1GH);
+      next__BFKH=(void *)((unsigned long)result__DFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R1GH)));
+      ((__POINTER *)next__BFKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__CFKH)[ 0]=next__BFKH;
+    } else {
+      next__BFKH=((__POINTER *)result__DFKH)[ 0];
+      if ((next__BFKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DFKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__R1GH <<  1)) <=  4096)) {
+          next__BFKH=(void *)((unsigned long)result__DFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__R1GH)));
+        } else {
+          next__BFKH=new_lab__ZPJ(new_size__R1GH);
+        };
+        ((__POINTER *)next__BFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__CFKH)[ 0]=next__BFKH;
+      } else {
+        ((__POINTER *)result__DFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__DFKH=next__BFKH;
+      };
+    };
+    ((__POINTER *)result__DFKH)[ 0]=((__POINTER ) 3);
+    result__1ZEH=(void *)((unsigned long)result__DFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__GFKH=first_free__BCVB;
+    while ((((void *)result__GFKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__GFKH)->map_size_and_id__YTB &  4294967292LU) < new_size__3ZEH))) {
+      result__GFKH=((__MEMORY *)result__GFKH)->map_next_free__ZTB;
     };
-    if (((void *)result__3AKH == (void *)NULL)) {
-      result__3AKH=new_page__B24();
+    if (((void *)result__GFKH == (void *)NULL)) {
+      result__GFKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__GFKH,new_size__3ZEH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__GFKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__1ZEH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__GFKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__PWNE=((void **)result__1ZEH);
+  Self__MRYE=(__INTEGER)(nb_elements__CTIE -  1);
+  while ((Self__MRYE >=  0)) {
+    Result__PWNE[Self__MRYE]=NULL;
+    Self__MRYE=(__INTEGER)(Self__MRYE -  1);
   };
-  return(Result__LUNE);
+  return(Result__PWNE);
 }
 
-static void** create__FOQB(__INTEGER nb_elements__HOQB)
+static void** create__RPQB(__INTEGER nb_elements__TPQB)
 // ({INTEGER}) With resultNo recursive, No inlinable.
 {
-  __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 *))))));
+  __UINTEGER_32 sz__N0EH,a__S0EH,new_size__O0EH,new_size2__P0EH,a__P2GH;
+  __UINTEGER_32 new_size__Q2GH;
+  __POINTER result__M0EH,ptr_table__KFKH,next__JFKH,result__LFKH;
+  void *result__OFKH;
+  __INTEGER Self__N0MC;
+  void **Result__NJTB;
+  sz__N0EH=((__UINTEGER_32 )(__INTEGER)(nb_elements__TPQB * ((__INTEGER )(sizeof(void *)))));
+  result__M0EH=((__POINTER )(NULL));
+  a__S0EH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+  new_size__O0EH=(__UINTEGER_32)((__UINTEGER_32)(sz__N0EH + a__S0EH) & (__UINTEGER_32)(~ a__S0EH));
+  new_size2__P0EH=(__UINTEGER_32)(new_size__O0EH + ((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))));
+  if ((new_size2__P0EH <= ((__UINTEGER_32 )(MINIMUM_SIZE)))) {
+    a__P2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+    new_size__Q2GH=(__UINTEGER_32)((__UINTEGER_32)(new_size2__P0EH + a__P2GH) & (__UINTEGER_32)(~ a__P2GH));
+    ptr_table__KFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__Q2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+    next__JFKH=((__POINTER )(NULL));
+    result__LFKH=((__POINTER *)ptr_table__KFKH)[ 0];
+    if ((result__LFKH == (void *)NULL)) {
+      result__LFKH=new_lab__ZPJ(new_size__Q2GH);
+      next__JFKH=(void *)((unsigned long)result__LFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2GH)));
+      ((__POINTER *)next__JFKH)[ 0]=NULL;
+      ((__POINTER *)ptr_table__KFKH)[ 0]=next__JFKH;
+    } else {
+      next__JFKH=((__POINTER *)result__LFKH)[ 0];
+      if ((next__JFKH == (void *)NULL)) {
+        if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__LFKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__Q2GH <<  1)) <=  4096)) {
+          next__JFKH=(void *)((unsigned long)result__LFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__Q2GH)));
+        } else {
+          next__JFKH=new_lab__ZPJ(new_size__Q2GH);
+        };
+        ((__POINTER *)next__JFKH)[ 0]=NULL;
+        ((__POINTER *)ptr_table__KFKH)[ 0]=next__JFKH;
+      } else {
+        ((__POINTER *)result__LFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__JFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+        result__LFKH=next__JFKH;
+      };
+    };
+    ((__POINTER *)result__LFKH)[ 0]=((__POINTER ) 3);
+    result__M0EH=(void *)((unsigned long)result__LFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )((__INTEGER )(sizeof(void *))))));
   } else {
-    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;
+    result__OFKH=first_free__BCVB;
+    while ((((void *)result__OFKH != (void *)NULL) && ((__UINTEGER_32)(((__MEMORY *)result__OFKH)->map_size_and_id__YTB &  4294967292LU) < new_size__O0EH))) {
+      result__OFKH=((__MEMORY *)result__OFKH)->map_next_free__ZTB;
     };
-    if (((void *)result__FBKH == (void *)NULL)) {
-      result__FBKH=new_page__B24();
+    if (((void *)result__OFKH == (void *)NULL)) {
+      result__OFKH=new_page__K34();
     };
-    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)));
+    to_busy__index__4SFC(result__OFKH,new_size__O0EH,(__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)((__POINTER )((__MEMORY *)result__OFKH)) - (unsigned long)begin_memory__GUH)))) >>  26));
+    result__M0EH=(void *)((unsigned long)((__POINTER )((__MEMORY *)result__OFKH)) - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER ) 8)));
   };
-  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);
+  Result__NJTB=((void **)result__M0EH);
+  Self__N0MC=(__INTEGER)(nb_elements__TPQB -  1);
+  while ((Self__N0MC >=  0)) {
+    Result__NJTB[Self__N0MC]=NULL;
+    Self__N0MC=(__INTEGER)(Self__N0MC -  1);
   };
-  return(Result__BITB);
+  return(Result__NJTB);
 }
 
-static void* read_argument__OKP(__PARSER *Self__PKP)
+static void* read_argument__XLP(__PARSER *Self__YLP)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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())) {
+  void *result__0LP;
+  __POSITION p__ZFIH;
+  __ITM_READ *result__RFIH;
+  __POINTER ptr__SFIH,ptr_table__SFKH,next__RFKH,result__TFKH;
+  __POINTER ptr_table__XFKH,next__WFKH,result__YFKH;
+  __INTEGER typ_id__TFIH;
+  __UINTEGER_32 sz__UFIH,a__VFIH,new_size__WFIH,t__XFIH,a__YFIH;
+  __UINTEGER_32 new_size__0FKH,lab_type__ZFKH;
+  result__0LP=read_expr_primary__M1M(Self__YLP);
+  if ((((void *)result__0LP == (void *)NULL) && read_identifier__E4K())) {
     if (is_shorter__LZ) {
-      if ((! fast_has__Q5U(short_local__XCC,last_string__V0C))) {
+      if ((! fast_has__ZAV(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)));
+    p__ZFIH=current_position__AWF();
+    result__RFIH=NULL;
+    ptr__SFIH=((__POINTER )(NULL));
+    typ_id__TFIH= 0;
+    sz__UFIH=((__UINTEGER_32 )sizeof(__ITM_READ));
+    if ((sz__UFIH ==  0)) {
+      result__RFIH=ITM_READ__;
+    } else {
+      typ_id__TFIH=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__UFIH);
+      if ((typ_id__TFIH == (__INTEGER)(-  1))) {
+        a__VFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__WFIH=(__UINTEGER_32)((__UINTEGER_32)(sz__UFIH + a__VFIH) & (__UINTEGER_32)(~ a__VFIH));
+        ptr_table__SFKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__WFIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__RFKH=((__POINTER )(NULL));
+        result__TFKH=((__POINTER *)ptr_table__SFKH)[ 0];
+        if ((result__TFKH == (void *)NULL)) {
+          result__TFKH=new_lab__ZPJ(new_size__WFIH);
+          next__RFKH=(void *)((unsigned long)result__TFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFIH)));
+          ((__POINTER *)next__RFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__SFKH)[ 0]=next__RFKH;
+        } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__WFIH <<  1)) <=  4096)) {
+              next__RFKH=(void *)((unsigned long)result__TFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__WFIH)));
             } else {
-              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)));
+              next__RFKH=new_lab__ZPJ(new_size__WFIH);
+            };
+            ((__POINTER *)next__RFKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__SFKH)[ 0]=next__RFKH;
+          } else {
+            ((__POINTER *)result__TFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__TFKH=next__RFKH;
+          };
+        };
+        ptr__SFIH=result__TFKH;
+      } else {
+        t__XFIH=((__UINTEGER_32 )typ_id__TFIH);
+        a__YFIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__0FKH=(__UINTEGER_32)((__UINTEGER_32)(sz__UFIH + a__YFIH) & (__UINTEGER_32)(~ a__YFIH));
+        ptr_table__XFKH=((__POINTER )(&(table_type[(t__XFIH)])));
+        lab_type__ZFKH=(__UINTEGER_32)(t__XFIH |  1);
+        next__WFKH=((__POINTER )(NULL));
+        result__YFKH=((__POINTER *)ptr_table__XFKH)[ 0];
+        if ((result__YFKH == (void *)NULL)) {
+          result__YFKH=new_lab__ZPJ(lab_type__ZFKH);
+          next__WFKH=(void *)((unsigned long)result__YFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0FKH)));
+          ((__POINTER *)next__WFKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
+        } 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__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0FKH <<  1)) <=  4096)) {
+              next__WFKH=(void *)((unsigned long)result__YFKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0FKH)));
             } else {
-              next__NBKH=new_lab__QOJ(lab_type__QBKH);
+              next__WFKH=new_lab__ZPJ(lab_type__ZFKH);
             };
-            ((__POINTER *)next__NBKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__OBKH)[ 0]=next__NBKH;
+            ((__POINTER *)next__WFKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__XFKH)[ 0]=next__WFKH;
           } else {
-            ((__POINTER *)result__PBKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__NBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__PBKH=next__NBKH;
+            ((__POINTER *)result__YFKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WFKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__YFKH=next__WFKH;
           };
         };
-        ptr__JBIH=result__PBKH;
+        ptr__SFIH=result__YFKH;
       };
-      result__IBIH=((__ITM_READ *)ptr__JBIH);
-      *(result__IBIH) = *(ITM_READ__);
+      result__RFIH=((__ITM_READ *)ptr__SFIH);
+      *(result__RFIH) = *(ITM_READ__);
     };
-    ((__ITM_READ *)result__IBIH)->parent_itm_code__UDJ.parent_itm_object__FAE.position__RAJ=p__QBIH;
-    result__RKP=result__IBIH;
+    ((__ITM_READ *)result__RFIH)->parent_itm_code__3EJ.parent_itm_object__OBE.position__0BJ=p__ZFIH;
+    result__0LP=result__RFIH;
   };
-  return(result__RKP);
+  return(result__0LP);
 }
 
-static void* readlip_expr_binary__SK3B(__PARSER *Self__TK3B)
+static void* readlip_expr_binary__4L3B(__PARSER *Self__5L3B)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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:
+  void *right__CM3B,*result__BM3B;
+  __POSITION pos__FY0G,p__DGIH,p__QGIH;
+  __LIP_BINARY *result__0FIH,*Self__CGIH,*result__HGIH,*Self__PGIH;
+  __POINTER ptr__1FIH,ptr_table__CGKH,next__BGKH,result__DGKH;
+  __POINTER ptr_table__HGKH,next__GGKH,result__IGKH,ptr__IGIH;
+  __POINTER ptr_table__MGKH,next__LGKH,result__NGKH,ptr_table__RGKH;
+  __POINTER next__QGKH,result__SGKH;
+  __INTEGER typ_id__2FIH,typ_id__JGIH;
+  __UINTEGER_32 sz__3FIH,a__4FIH,new_size__5FIH,t__AGIH,a__BGIH;
+  __UINTEGER_32 new_size__KGKH,lab_type__JGKH,sz__KGIH,a__LGIH;
+  __UINTEGER_32 new_size__MGIH,t__NGIH,a__OGIH,new_size__UGKH;
+  __UINTEGER_32 lab_type__TGKH;
+  __BOOLEAN result__1FKH,__tmp__XM3B,result__4FKH;
+  __CHARACTER result__2FKH,result__5FKH;
+  right__CM3B=NULL;
+  result__BM3B=readlip_expr_unary__5X4B(Self__5L3B);
+  if (((void *)result__BM3B != (void *)NULL)) {
+    while_do__V25B:
     {
-      result__SBKH=FALSE__;
+      result__1FKH=FALSE__;
       if ((! read_space__KSD())) {
-        result__SBKH=FALSE__;
+        result__1FKH=FALSE__;
       } else {
-        result__TBKH='\0';
+        result__2FKH='\0';
         if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-          result__TBKH=((__CHARACTER )(( 0)));
+          result__2FKH=((__CHARACTER )(( 0)));
         } else {
-          result__TBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+          result__2FKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
         };
-        if ((result__TBKH == '-')) {
+        if ((result__2FKH == '-')) {
           position__CCC=(__INTEGER)(position__CCC +  1);
-          result__SBKH=TRUE__;
+          result__1FKH=TRUE__;
         };
       };
-      if (result__SBKH) {
-        __tmp__LL3B=TRUE__;
+      if (result__1FKH) {
+        __tmp__XM3B=TRUE__;
       } else {
-        result__VBKH=FALSE__;
+        result__4FKH=FALSE__;
         if ((! read_space__KSD())) {
-          result__VBKH=FALSE__;
+          result__4FKH=FALSE__;
         } else {
-          result__WBKH='\0';
+          result__5FKH='\0';
           if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-            result__WBKH=((__CHARACTER )(( 0)));
+            result__5FKH=((__CHARACTER )(( 0)));
           } else {
-            result__WBKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+            result__5FKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
           };
-          if ((result__WBKH == '+')) {
+          if ((result__5FKH == '+')) {
             position__CCC=(__INTEGER)(position__CCC +  1);
-            result__VBKH=TRUE__;
+            result__4FKH=TRUE__;
           };
         };
-        __tmp__LL3B=result__VBKH;
+        __tmp__XM3B=result__4FKH;
       };
-      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)) {
+      if (__tmp__XM3B) {
+        right__CM3B=readlip_expr_unary__5X4B(Self__5L3B);
+        if (((void *)right__CM3B == (void *)NULL)) {
+          pos__FY0G=current_position__AWF();
+          put_error__text__BMG( 0,(&__string_240));
+          put_position__LNG(pos__FY0G);
+          put_string__L0F(msg_err__GMG);
+          if ((type_error__FMG !=  2)) {
             exit(( 1));
           };
         };
-        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;
+        if (result__1FKH) {
+          p__DGIH=current_position__AWF();
+          result__0FIH=NULL;
+          ptr__1FIH=((__POINTER )(NULL));
+          typ_id__2FIH= 0;
+          sz__3FIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__3FIH ==  0)) {
+            result__0FIH=LIP_BINARY__;
+          } else {
+            typ_id__2FIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__3FIH);
+            if ((typ_id__2FIH == (__INTEGER)(-  1))) {
+              a__4FIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__5FIH=(__UINTEGER_32)((__UINTEGER_32)(sz__3FIH + a__4FIH) & (__UINTEGER_32)(~ a__4FIH));
+              ptr_table__CGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__5FIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__BGKH=((__POINTER )(NULL));
+              result__DGKH=((__POINTER *)ptr_table__CGKH)[ 0];
+              if ((result__DGKH == (void *)NULL)) {
+                result__DGKH=new_lab__ZPJ(new_size__5FIH);
+                next__BGKH=(void *)((unsigned long)result__DGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FIH)));
+                ((__POINTER *)next__BGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__CGKH)[ 0]=next__BGKH;
               } else {
-                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)));
+                next__BGKH=((__POINTER *)result__DGKH)[ 0];
+                if ((next__BGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__DGKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__5FIH <<  1)) <=  4096)) {
+                    next__BGKH=(void *)((unsigned long)result__DGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__5FIH)));
                   } else {
-                    next__YBKH=new_lab__QOJ(new_size__WBIH);
+                    next__BGKH=new_lab__ZPJ(new_size__5FIH);
                   };
-                  ((__POINTER *)next__YBKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ZBKH)[ 0]=next__YBKH;
+                  ((__POINTER *)next__BGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__CGKH)[ 0]=next__BGKH;
                 } else {
-                  ((__POINTER *)result__0BKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__YBKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__0BKH=next__YBKH;
+                  ((__POINTER *)result__DGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__BGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__DGKH=next__BGKH;
                 };
               };
-              ptr__SBIH=result__0BKH;
+              ptr__1FIH=result__DGKH;
             } else {
-              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;
+              t__AGIH=((__UINTEGER_32 )typ_id__2FIH);
+              a__BGIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__KGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__3FIH + a__BGIH) & (__UINTEGER_32)(~ a__BGIH));
+              ptr_table__HGKH=((__POINTER )(&(table_type[(t__AGIH)])));
+              lab_type__JGKH=(__UINTEGER_32)(t__AGIH |  1);
+              next__GGKH=((__POINTER )(NULL));
+              result__IGKH=((__POINTER *)ptr_table__HGKH)[ 0];
+              if ((result__IGKH == (void *)NULL)) {
+                result__IGKH=new_lab__ZPJ(lab_type__JGKH);
+                next__GGKH=(void *)((unsigned long)result__IGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KGKH)));
+                ((__POINTER *)next__GGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__HGKH)[ 0]=next__GGKH;
               } else {
-                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)));
+                next__GGKH=((__POINTER *)result__IGKH)[ 0];
+                if ((next__GGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__IGKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KGKH <<  1)) <=  4096)) {
+                    next__GGKH=(void *)((unsigned long)result__IGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KGKH)));
                   } else {
-                    next__3BKH=new_lab__QOJ(lab_type__ACKH);
+                    next__GGKH=new_lab__ZPJ(lab_type__JGKH);
                   };
-                  ((__POINTER *)next__3BKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__4BKH)[ 0]=next__3BKH;
+                  ((__POINTER *)next__GGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__HGKH)[ 0]=next__GGKH;
                 } else {
-                  ((__POINTER *)result__5BKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__3BKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__5BKH=next__3BKH;
+                  ((__POINTER *)result__IGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__GGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__IGKH=next__GGKH;
                 };
               };
-              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;
+              ptr__1FIH=result__IGKH;
+            };
+            result__0FIH=((__LIP_BINARY *)ptr__1FIH);
+            *(result__0FIH) = *(LIP_BINARY__);
+          };
+          Self__CGIH=((__LIP_BINARY *)result__0FIH);
+          Self__CGIH->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ=p__DGIH;
+          Self__CGIH->left__YXQD=result__BM3B;
+          Self__CGIH->right__1XQD=right__CM3B;
+          Self__CGIH->operator__4XQD='-';
+          result__BM3B=result__0FIH;
+        } else {
+          p__QGIH=current_position__AWF();
+          result__HGIH=NULL;
+          ptr__IGIH=((__POINTER )(NULL));
+          typ_id__JGIH= 0;
+          sz__KGIH=((__UINTEGER_32 )sizeof(__LIP_BINARY));
+          if ((sz__KGIH ==  0)) {
+            result__HGIH=LIP_BINARY__;
+          } else {
+            typ_id__JGIH=-1;
+            clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__KGIH);
+            if ((typ_id__JGIH == (__INTEGER)(-  1))) {
+              a__LGIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__MGIH=(__UINTEGER_32)((__UINTEGER_32)(sz__KGIH + a__LGIH) & (__UINTEGER_32)(~ a__LGIH));
+              ptr_table__MGKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__MGIH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+              next__LGKH=((__POINTER )(NULL));
+              result__NGKH=((__POINTER *)ptr_table__MGKH)[ 0];
+              if ((result__NGKH == (void *)NULL)) {
+                result__NGKH=new_lab__ZPJ(new_size__MGIH);
+                next__LGKH=(void *)((unsigned long)result__NGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGIH)));
+                ((__POINTER *)next__LGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__MGKH)[ 0]=next__LGKH;
               } else {
-                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)));
+                next__LGKH=((__POINTER *)result__NGKH)[ 0];
+                if ((next__LGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NGKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__MGIH <<  1)) <=  4096)) {
+                    next__LGKH=(void *)((unsigned long)result__NGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__MGIH)));
                   } else {
-                    next__CCKH=new_lab__QOJ(new_size__DCIH);
+                    next__LGKH=new_lab__ZPJ(new_size__MGIH);
                   };
-                  ((__POINTER *)next__CCKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__DCKH)[ 0]=next__CCKH;
+                  ((__POINTER *)next__LGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__MGKH)[ 0]=next__LGKH;
                 } else {
-                  ((__POINTER *)result__ECKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__CCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__ECKH=next__CCKH;
+                  ((__POINTER *)result__NGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__NGKH=next__LGKH;
                 };
               };
-              ptr__5BIH=result__ECKH;
+              ptr__IGIH=result__NGKH;
             } else {
-              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;
+              t__NGIH=((__UINTEGER_32 )typ_id__JGIH);
+              a__OGIH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+              new_size__UGKH=(__UINTEGER_32)((__UINTEGER_32)(sz__KGIH + a__OGIH) & (__UINTEGER_32)(~ a__OGIH));
+              ptr_table__RGKH=((__POINTER )(&(table_type[(t__NGIH)])));
+              lab_type__TGKH=(__UINTEGER_32)(t__NGIH |  1);
+              next__QGKH=((__POINTER )(NULL));
+              result__SGKH=((__POINTER *)ptr_table__RGKH)[ 0];
+              if ((result__SGKH == (void *)NULL)) {
+                result__SGKH=new_lab__ZPJ(lab_type__TGKH);
+                next__QGKH=(void *)((unsigned long)result__SGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UGKH)));
+                ((__POINTER *)next__QGKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__RGKH)[ 0]=next__QGKH;
               } else {
-                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)));
+                next__QGKH=((__POINTER *)result__SGKH)[ 0];
+                if ((next__QGKH == (void *)NULL)) {
+                  if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SGKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UGKH <<  1)) <=  4096)) {
+                    next__QGKH=(void *)((unsigned long)result__SGKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UGKH)));
                   } else {
-                    next__HCKH=new_lab__QOJ(lab_type__KCKH);
+                    next__QGKH=new_lab__ZPJ(lab_type__TGKH);
                   };
-                  ((__POINTER *)next__HCKH)[ 0]=NULL;
-                  ((__POINTER *)ptr_table__ICKH)[ 0]=next__HCKH;
+                  ((__POINTER *)next__QGKH)[ 0]=NULL;
+                  ((__POINTER *)ptr_table__RGKH)[ 0]=next__QGKH;
                 } else {
-                  ((__POINTER *)result__JCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-                  result__JCKH=next__HCKH;
+                  ((__POINTER *)result__SGKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QGKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                  result__SGKH=next__QGKH;
                 };
               };
-              ptr__5BIH=result__JCKH;
+              ptr__IGIH=result__SGKH;
             };
-            result__4BIH=((__LIP_BINARY *)ptr__5BIH);
-            *(result__4BIH) = *(LIP_BINARY__);
+            result__HGIH=((__LIP_BINARY *)ptr__IGIH);
+            *(result__HGIH) = *(LIP_BINARY__);
           };
-          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;
+          Self__PGIH=((__LIP_BINARY *)result__HGIH);
+          Self__PGIH->parent_lip_code__3NZB.parent_itm_object__WBE.position__0BJ=p__QGIH;
+          Self__PGIH->left__YXQD=result__BM3B;
+          Self__PGIH->right__1XQD=right__CM3B;
+          Self__PGIH->operator__4XQD='+';
+          result__BM3B=result__HGIH;
         };
-        goto while_do__J15B;
+        goto while_do__V25B;
       };
     };
   };
-  return(result__VK3B);
+  return(result__BM3B);
 }
 
-static void* readlip_expr_unary__TW4B(__PARSER *Self__UW4B)
+static void* readlip_expr_unary__5X4B(__PARSER *Self__AY4B)
 // ({PARSER}) With resultRecursive, No inlinable.
 {
-  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__;
+  void *result__CY4B,*result__0CFE;
+  void *nam__FY4B,*n__PHKH;
+  __POSITION pos__XZ0G,p__PA0C,p__OHKH,p__NDFE;
+  __LIP_UNARY *result__NPBD,*Self__MGSD;
+  __POINTER ptr__OPBD,ptr_table__2GKH,next__1GKH,result__3GKH;
+  __POINTER ptr_table__BHKH,next__AHKH,result__CHKH,ptr__GHKH;
+  __POINTER ptr_table__SHKH,next__RHKH,result__THKH,ptr_table__XHKH;
+  __POINTER next__WHKH,result__YHKH,ptr__0RLE,ptr_table__2HKH;
+  __POINTER next__1HKH,result__3HKH,ptr_table__BIKH,next__AIKH;
+  __POINTER result__CIKH;
+  __INTEGER typ_id__TPBD,typ_id__HHKH,typ_id__5RLE;
+  __UINTEGER_32 sz__QPBD,a__W2GH,new_size__X2GH,t__12GH,a__02GH;
+  __UINTEGER_32 new_size__EHKH,lab_type__DHKH,sz__IHKH,a__JHKH;
+  __UINTEGER_32 new_size__KHKH,t__LHKH,a__MHKH,new_size__0HKH;
+  __UINTEGER_32 lab_type__ZHKH,sz__2RLE,a__42GH,new_size__52GH,t__D3GH;
+  __UINTEGER_32 a__C3GH,new_size__EIKH,lab_type__DIKH;
+  __LIP_CALL *result__FHKH,*Self__NHKH,*result__ZRLE,*Self__TMWE;
+  __CHARACTER type__EY4B,result__WGKH,result__ZGKH;
+  __BOOLEAN result__VGKH,__tmp__QY4B,result__YGKH,__tmp__QZ4B;
+  result__CY4B=NULL;
+  type__EY4B='\0';
+  nam__FY4B=NULL;
+  result__VGKH=FALSE__;
   if ((! read_space__KSD())) {
-    result__MCKH=FALSE__;
+    result__VGKH=FALSE__;
   } else {
-    result__NCKH='\0';
+    result__WGKH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__NCKH=((__CHARACTER )(( 0)));
+      result__WGKH=((__CHARACTER )(( 0)));
     } else {
-      result__NCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__WGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__NCKH == '-')) {
+    if ((result__WGKH == '-')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__MCKH=TRUE__;
+      result__VGKH=TRUE__;
     };
   };
-  if (result__MCKH) {
-    __tmp__EX4B=TRUE__;
+  if (result__VGKH) {
+    __tmp__QY4B=TRUE__;
   } else {
-    result__PCKH=FALSE__;
+    result__YGKH=FALSE__;
     if ((! read_space__KSD())) {
-      result__PCKH=FALSE__;
+      result__YGKH=FALSE__;
     } else {
-      result__QCKH='\0';
+      result__ZGKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__QCKH=((__CHARACTER )(( 0)));
+        result__ZGKH=((__CHARACTER )(( 0)));
       } else {
-        result__QCKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__ZGKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__QCKH == '!')) {
+      if ((result__ZGKH == '!')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__PCKH=TRUE__;
+        result__YGKH=TRUE__;
       };
     };
-    __tmp__EX4B=result__PCKH;
+    __tmp__QY4B=result__YGKH;
   };
-  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)) {
+  if (__tmp__QY4B) {
+    result__CY4B=readlip_expr_unary__5X4B(Self__AY4B);
+    if (((void *)result__CY4B == (void *)NULL)) {
+      pos__XZ0G=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_240));
+      put_position__LNG(pos__XZ0G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    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)));
+    if (result__VGKH) {
+      type__EY4B='-';
+    } else {
+      type__EY4B='!';
+    };
+    p__PA0C=current_position__AWF();
+    result__NPBD=NULL;
+    ptr__OPBD=((__POINTER )(NULL));
+    typ_id__TPBD= 0;
+    sz__QPBD=((__UINTEGER_32 )sizeof(__LIP_UNARY));
+    if ((sz__QPBD ==  0)) {
+      result__NPBD=LIP_UNARY__;
+    } else {
+      typ_id__TPBD=-1;
+      clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__QPBD);
+      if ((typ_id__TPBD == (__INTEGER)(-  1))) {
+        a__W2GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__X2GH=(__UINTEGER_32)((__UINTEGER_32)(sz__QPBD + a__W2GH) & (__UINTEGER_32)(~ a__W2GH));
+        ptr_table__2GKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__X2GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+        next__1GKH=((__POINTER )(NULL));
+        result__3GKH=((__POINTER *)ptr_table__2GKH)[ 0];
+        if ((result__3GKH == (void *)NULL)) {
+          result__3GKH=new_lab__ZPJ(new_size__X2GH);
+          next__1GKH=(void *)((unsigned long)result__3GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2GH)));
+          ((__POINTER *)next__1GKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__2GKH)[ 0]=next__1GKH;
+        } else {
+          next__1GKH=((__POINTER *)result__3GKH)[ 0];
+          if ((next__1GKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3GKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__X2GH <<  1)) <=  4096)) {
+              next__1GKH=(void *)((unsigned long)result__3GKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__X2GH)));
             } else {
-              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)));
+              next__1GKH=new_lab__ZPJ(new_size__X2GH);
+            };
+            ((__POINTER *)next__1GKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2GKH)[ 0]=next__1GKH;
+          } else {
+            ((__POINTER *)result__3GKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1GKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__3GKH=next__1GKH;
+          };
+        };
+        ptr__OPBD=result__3GKH;
+      } else {
+        t__12GH=((__UINTEGER_32 )typ_id__TPBD);
+        a__02GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+        new_size__EHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__QPBD + a__02GH) & (__UINTEGER_32)(~ a__02GH));
+        ptr_table__BHKH=((__POINTER )(&(table_type[(t__12GH)])));
+        lab_type__DHKH=(__UINTEGER_32)(t__12GH |  1);
+        next__AHKH=((__POINTER )(NULL));
+        result__CHKH=((__POINTER *)ptr_table__BHKH)[ 0];
+        if ((result__CHKH == (void *)NULL)) {
+          result__CHKH=new_lab__ZPJ(lab_type__DHKH);
+          next__AHKH=(void *)((unsigned long)result__CHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHKH)));
+          ((__POINTER *)next__AHKH)[ 0]=NULL;
+          ((__POINTER *)ptr_table__BHKH)[ 0]=next__AHKH;
+        } else {
+          next__AHKH=((__POINTER *)result__CHKH)[ 0];
+          if ((next__AHKH == (void *)NULL)) {
+            if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CHKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EHKH <<  1)) <=  4096)) {
+              next__AHKH=(void *)((unsigned long)result__CHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EHKH)));
             } else {
-              next__XCKH=new_lab__QOJ(lab_type__0CKH);
+              next__AHKH=new_lab__ZPJ(lab_type__DHKH);
             };
-            ((__POINTER *)next__XCKH)[ 0]=NULL;
-            ((__POINTER *)ptr_table__YCKH)[ 0]=next__XCKH;
+            ((__POINTER *)next__AHKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BHKH)[ 0]=next__AHKH;
           } else {
-            ((__POINTER *)result__ZCKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XCKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-            result__ZCKH=next__XCKH;
+            ((__POINTER *)result__CHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+            result__CHKH=next__AHKH;
           };
         };
-        ptr__XNBD=result__ZCKH;
+        ptr__OPBD=result__CHKH;
       };
-      result__WNBD=((__LIP_UNARY *)ptr__XNBD);
-      *(result__WNBD) = *(LIP_UNARY__);
+      result__NPBD=((__LIP_UNARY *)ptr__OPBD);
+      *(result__NPBD) = *(LIP_UNARY__);
     };
-    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__;
+    Self__MGSD=((__LIP_UNARY *)result__NPBD);
+    Self__MGSD->parent_lip_code__MZ4B.parent_itm_object__WBE.position__0BJ=p__PA0C;
+    Self__MGSD->operator__Y0QD=type__EY4B;
+    Self__MGSD->value__V0QD=result__CY4B;
+    result__CY4B=result__NPBD;
+    __tmp__QZ4B=TRUE__;
   } else {
-    __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;
+    __tmp__QZ4B=FALSE__;
+  };
+  if ((! __tmp__QZ4B)) {
+    if (read_identifier__E4K()) {
+      nam__FY4B=last_string__V0C;
+      result__0CFE=NULL;
+      if (read_identifier__E4K()) {
+        p__OHKH=current_position__AWF();
+        n__PHKH=last_string__V0C;
+        result__FHKH=NULL;
+        ptr__GHKH=((__POINTER )(NULL));
+        typ_id__HHKH= 0;
+        sz__IHKH=((__UINTEGER_32 )sizeof(__LIP_CALL));
+        if ((sz__IHKH ==  0)) {
+          result__FHKH=LIP_CALL__;
+        } else {
+          typ_id__HHKH=-1;
+          clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__IHKH);
+          if ((typ_id__HHKH == (__INTEGER)(-  1))) {
+            a__JHKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__KHKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IHKH + a__JHKH) & (__UINTEGER_32)(~ a__JHKH));
+            ptr_table__SHKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__KHKH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+            next__RHKH=((__POINTER )(NULL));
+            result__THKH=((__POINTER *)ptr_table__SHKH)[ 0];
+            if ((result__THKH == (void *)NULL)) {
+              result__THKH=new_lab__ZPJ(new_size__KHKH);
+              next__RHKH=(void *)((unsigned long)result__THKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
+              ((__POINTER *)next__RHKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
             } 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__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)));
+              next__RHKH=((__POINTER *)result__THKH)[ 0];
+              if ((next__RHKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__THKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__KHKH <<  1)) <=  4096)) {
+                  next__RHKH=(void *)((unsigned long)result__THKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__KHKH)));
                 } else {
-                  next__IDKH=new_lab__QOJ(new_size__BDKH);
+                  next__RHKH=new_lab__ZPJ(new_size__KHKH);
                 };
-                ((__POINTER *)next__IDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__JDKH)[ 0]=next__IDKH;
+                ((__POINTER *)next__RHKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__SHKH)[ 0]=next__RHKH;
               } else {
-                ((__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;
+                ((__POINTER *)result__THKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__RHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__THKH=next__RHKH;
+              };
+            };
+            ptr__GHKH=result__THKH;
+          } else {
+            t__LHKH=((__UINTEGER_32 )typ_id__HHKH);
+            a__MHKH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+            new_size__0HKH=(__UINTEGER_32)((__UINTEGER_32)(sz__IHKH + a__MHKH) & (__UINTEGER_32)(~ a__MHKH));
+            ptr_table__XHKH=((__POINTER )(&(table_type[(t__LHKH)])));
+            lab_type__ZHKH=(__UINTEGER_32)(t__LHKH |  1);
+            next__WHKH=((__POINTER )(NULL));
+            result__YHKH=((__POINTER *)ptr_table__XHKH)[ 0];
+            if ((result__YHKH == (void *)NULL)) {
+              result__YHKH=new_lab__ZPJ(lab_type__ZHKH);
+              next__WHKH=(void *)((unsigned long)result__YHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HKH)));
+              ((__POINTER *)next__WHKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__XHKH)[ 0]=next__WHKH;
             } 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__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)));
+              next__WHKH=((__POINTER *)result__YHKH)[ 0];
+              if ((next__WHKH == (void *)NULL)) {
+                if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__YHKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__0HKH <<  1)) <=  4096)) {
+                  next__WHKH=(void *)((unsigned long)result__YHKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__0HKH)));
                 } else {
-                  next__NDKH=new_lab__QOJ(lab_type__QDKH);
+                  next__WHKH=new_lab__ZPJ(lab_type__ZHKH);
                 };
-                ((__POINTER *)next__NDKH)[ 0]=NULL;
-                ((__POINTER *)ptr_table__ODKH)[ 0]=next__NDKH;
+                ((__POINTER *)next__WHKH)[ 0]=NULL;
+                ((__POINTER *)ptr_table__XHKH)[ 0]=next__WHKH;
               } else {
-                ((__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)));
+                ((__POINTER *)result__YHKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__WHKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+                result__YHKH=next__WHKH;
+              };
+            };
+            ptr__GHKH=result__YHKH;
+          };
+          result__FHKH=((__LIP_CALL *)ptr__GHKH);
+          *(result__FHKH) = *(LIP_CALL__);
+        };
+        Self__NHKH=((__LIP_CALL *)result__FHKH);
+        Self__NHKH->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ=p__OHKH;
+        Self__NHKH->name__EMUE=n__PHKH;
+        Self__NHKH->argument__ZLUE=NULL;
+        result__0CFE=result__FHKH;
+      } else {
+        result__0CFE=readlip_expr_base__TDFE(Self__AY4B);
+      };
+      p__NDFE=current_position__AWF();
+      result__ZRLE=NULL;
+      ptr__0RLE=((__POINTER )(NULL));
+      typ_id__5RLE= 0;
+      sz__2RLE=((__UINTEGER_32 )sizeof(__LIP_CALL));
+      if ((sz__2RLE ==  0)) {
+        result__ZRLE=LIP_CALL__;
+      } else {
+        typ_id__5RLE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__2RLE);
+        if ((typ_id__5RLE == (__INTEGER)(-  1))) {
+          a__42GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__52GH=(__UINTEGER_32)((__UINTEGER_32)(sz__2RLE + a__42GH) & (__UINTEGER_32)(~ a__42GH));
+          ptr_table__2HKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__52GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__1HKH=((__POINTER )(NULL));
+          result__3HKH=((__POINTER *)ptr_table__2HKH)[ 0];
+          if ((result__3HKH == (void *)NULL)) {
+            result__3HKH=new_lab__ZPJ(new_size__52GH);
+            next__1HKH=(void *)((unsigned long)result__3HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52GH)));
+            ((__POINTER *)next__1HKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__2HKH)[ 0]=next__1HKH;
+          } else {
+            next__1HKH=((__POINTER *)result__3HKH)[ 0];
+            if ((next__1HKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__3HKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__52GH <<  1)) <=  4096)) {
+                next__1HKH=(void *)((unsigned long)result__3HKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__52GH)));
               } else {
-                next__SDKH=new_lab__QOJ(new_size__WYGH);
+                next__1HKH=new_lab__ZPJ(new_size__52GH);
               };
-              ((__POINTER *)next__SDKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__TDKH)[ 0]=next__SDKH;
+              ((__POINTER *)next__1HKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__2HKH)[ 0]=next__1HKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__3HKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__1HKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__3HKH=next__1HKH;
+            };
+          };
+          ptr__0RLE=result__3HKH;
+        } else {
+          t__D3GH=((__UINTEGER_32 )typ_id__5RLE);
+          a__C3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__EIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__2RLE + a__C3GH) & (__UINTEGER_32)(~ a__C3GH));
+          ptr_table__BIKH=((__POINTER )(&(table_type[(t__D3GH)])));
+          lab_type__DIKH=(__UINTEGER_32)(t__D3GH |  1);
+          next__AIKH=((__POINTER )(NULL));
+          result__CIKH=((__POINTER *)ptr_table__BIKH)[ 0];
+          if ((result__CIKH == (void *)NULL)) {
+            result__CIKH=new_lab__ZPJ(lab_type__DIKH);
+            next__AIKH=(void *)((unsigned long)result__CIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIKH)));
+            ((__POINTER *)next__AIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__BIKH)[ 0]=next__AIKH;
+          } else {
+            next__AIKH=((__POINTER *)result__CIKH)[ 0];
+            if ((next__AIKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__CIKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__EIKH <<  1)) <=  4096)) {
+                next__AIKH=(void *)((unsigned long)result__CIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__EIKH)));
               } else {
-                next__XDKH=new_lab__QOJ(lab_type__0DKH);
+                next__AIKH=new_lab__ZPJ(lab_type__DIKH);
               };
-              ((__POINTER *)next__XDKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__YDKH)[ 0]=next__XDKH;
+              ((__POINTER *)next__AIKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__BIKH)[ 0]=next__AIKH;
             } else {
-              ((__POINTER *)result__ZDKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__XDKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__ZDKH=next__XDKH;
+              ((__POINTER *)result__CIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__AIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__CIKH=next__AIKH;
             };
           };
-          ptr__RRLE=result__ZDKH;
+          ptr__0RLE=result__CIKH;
         };
-        result__QRLE=((__LIP_CALL *)ptr__RRLE);
-        *(result__QRLE) = *(LIP_CALL__);
+        result__ZRLE=((__LIP_CALL *)ptr__0RLE);
+        *(result__ZRLE) = *(LIP_CALL__);
       };
-      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;
+      Self__TMWE=((__LIP_CALL *)result__ZRLE);
+      Self__TMWE->parent_lip_code__4Z4B.parent_itm_object__WBE.position__0BJ=p__NDFE;
+      Self__TMWE->name__EMUE=nam__FY4B;
+      Self__TMWE->argument__ZLUE=result__0CFE;
+      result__CY4B=result__ZRLE;
     } else {
-      result__WW4B=readlip_expr_base__5CFE(Self__UW4B);
+      result__CY4B=readlip_expr_base__TDFE(Self__AY4B);
     };
   };
-  return(result__WW4B);
+  return(result__CY4B);
 }
 
-static void* readlip_expr_base__5CFE(__PARSER *Self__ADFE)
+static void* readlip_expr_base__TDFE(__PARSER *Self__UDFE)
 // ({PARSER}) With resultNo recursive, No inlinable.
 {
-  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__;
+  void *result__WDFE;
+  __POSITION pos__H00G,pos__J00G,pos__L00G,p__C2RE;
+  void *result__TUPE;
+  __LIP_VALUE *result__QUSE,*Self__5AXE;
+  __POINTER ptr__RUSE,ptr_table__MIKH,next__LIKH,result__NIKH;
+  __POINTER ptr_table__RIKH,next__QIKH,result__SIKH;
+  __INTEGER typ_id__WUSE;
+  __UINTEGER_32 sz__TUSE,a__G3GH,new_size__H3GH,t__L3GH,a__K3GH;
+  __UINTEGER_32 new_size__UIKH,lab_type__TIKH;
+  __BOOLEAN result__FIKH,result__IIKH,__tmp__AVPE,__tmp__QVPE;
+  __BOOLEAN result__JRQE,__tmp__FWPE;
+  __CHARACTER result__GIKH,result__JIKH;
+  result__WDFE=NULL;
+  result__FIKH=FALSE__;
   if ((! read_space__KSD())) {
-    result__2DKH=FALSE__;
+    result__FIKH=FALSE__;
   } else {
-    result__3DKH='\0';
+    result__GIKH='\0';
     if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-      result__3DKH=((__CHARACTER )(( 0)));
+      result__GIKH=((__CHARACTER )(( 0)));
     } else {
-      result__3DKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+      result__GIKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
     };
-    if ((result__3DKH == '(')) {
+    if ((result__GIKH == '(')) {
       position__CCC=(__INTEGER)(position__CCC +  1);
-      result__2DKH=TRUE__;
+      result__FIKH=TRUE__;
     };
   };
-  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)) {
+  if (result__FIKH) {
+    result__WDFE=readlip_expr_operator__NMZB(Self__UDFE);
+    if (((void *)result__WDFE == (void *)NULL)) {
+      pos__H00G=current_position__AWF();
+      put_error__text__BMG( 0,(&__string_240));
+      put_position__LNG(pos__H00G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
-    result__5DKH=FALSE__;
+    result__IIKH=FALSE__;
     if ((! read_space__KSD())) {
-      result__5DKH=FALSE__;
+      result__IIKH=FALSE__;
     } else {
-      result__AEKH='\0';
+      result__JIKH='\0';
       if ((position__CCC > ((__STRING *)source__5BC)->count__EGC)) {
-        result__AEKH=((__CHARACTER )(( 0)));
+        result__JIKH=((__CHARACTER )(( 0)));
       } else {
-        result__AEKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__23R)[(__INTEGER)(position__CCC -  1)];
+        result__JIKH=((__CHARACTER *)((__STRING *)source__5BC)->storage__F5R)[(__INTEGER)(position__CCC -  1)];
       };
-      if ((result__AEKH == ')')) {
+      if ((result__JIKH == ')')) {
         position__CCC=(__INTEGER)(position__CCC +  1);
-        result__5DKH=TRUE__;
+        result__IIKH=TRUE__;
       };
     };
-    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)) {
+    if ((! result__IIKH)) {
+      pos__J00G=current_position__AWF();
+      put_error__text__BMG( 2,(&__string_238));
+      put_position__LNG(pos__J00G);
+      put_string__L0F(msg_err__GMG);
+      if ((type_error__FMG !=  2)) {
         exit(( 1));
       };
     };
   } else {
-    result__4RPE=NULL;
-    if (read_integer__1XP()) {
-      result__4RPE=get__LRSE(LIP_INTEGER__,((__INTEGER )last_integer__UNO));
-      __tmp__LSPE=TRUE__;
+    result__TUPE=NULL;
+    if (read_integer__EZP()) {
+      result__TUPE=get__LTSE(LIP_INTEGER__,((__INTEGER )last_integer__3OO));
+      __tmp__AVPE=TRUE__;
     } else {
-      __tmp__LSPE=FALSE__;
+      __tmp__AVPE=FALSE__;
     };
-    if (__tmp__LSPE) {
-      __tmp__1SPE=TRUE__;
+    if (__tmp__AVPE) {
+      __tmp__QVPE=TRUE__;
     } else {
-      result__JPQE=read_string__GBQ();
-      if (result__JPQE) {
-        result__4RPE=get__PVFF(LIP_STRING__,last_string__V0C);
+      result__JRQE=read_string__PCQ();
+      if (result__JRQE) {
+        result__TUPE=get__GYFF(LIP_STRING__,last_string__V0C);
       };
-      __tmp__1SPE=result__JPQE;
+      __tmp__QVPE=result__JRQE;
     };
-    if ((! __tmp__1SPE)) {
-      if (read_cap_identifier__MWJ()) {
+    if ((! __tmp__QVPE)) {
+      if (read_cap_identifier__VXJ()) {
         if (((void *)last_string__V0C == (void *)(&__string_42))) {
-          result__4RPE=true__OOLF;
-          __tmp__QTPE=TRUE__;
+          result__TUPE=true__4RLF;
+          __tmp__FWPE=TRUE__;
         } else {
-          __tmp__QTPE=FALSE__;
+          __tmp__FWPE=FALSE__;
         };
-        if ((! __tmp__QTPE)) {
+        if ((! __tmp__FWPE)) {
           if (((void *)last_string__V0C == (void *)(&__string_43))) {
-            result__4RPE=LIP_BOOLEAN__;
+            result__TUPE=LIP_BOOLEAN__;
           } else {
-            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)) {
+            pos__L00G=current_position__AWF();
+            put_error__text__BMG( 0,(&__string_334));
+            put_position__LNG(pos__L00G);
+            put_string__L0F(msg_err__GMG);
+            if ((type_error__FMG !=  2)) {
               exit(( 1));
             };
           };
         };
       };
     };
-    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)));
+    if (((void *)result__TUPE != (void *)NULL)) {
+      p__C2RE=current_position__AWF();
+      result__QUSE=NULL;
+      ptr__RUSE=((__POINTER )(NULL));
+      typ_id__WUSE= 0;
+      sz__TUSE=((__UINTEGER_32 )sizeof(__LIP_VALUE));
+      if ((sz__TUSE ==  0)) {
+        result__QUSE=LIP_VALUE__;
+      } else {
+        typ_id__WUSE=-1;
+        clone_allocation_size__NTB=(__UINTEGER_32)(clone_allocation_size__NTB + sz__TUSE);
+        if ((typ_id__WUSE == (__INTEGER)(-  1))) {
+          a__G3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__H3GH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUSE + a__G3GH) & (__UINTEGER_32)(~ a__G3GH));
+          ptr_table__MIKH=((__POINTER )(&(table_size[((__UINTEGER_32)(new_size__H3GH / ((__UINTEGER_32 )((__INTEGER )(sizeof(void *))))))-1])));
+          next__LIKH=((__POINTER )(NULL));
+          result__NIKH=((__POINTER *)ptr_table__MIKH)[ 0];
+          if ((result__NIKH == (void *)NULL)) {
+            result__NIKH=new_lab__ZPJ(new_size__H3GH);
+            next__LIKH=(void *)((unsigned long)result__NIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3GH)));
+            ((__POINTER *)next__LIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__MIKH)[ 0]=next__LIKH;
+          } else {
+            next__LIKH=((__POINTER *)result__NIKH)[ 0];
+            if ((next__LIKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__NIKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__H3GH <<  1)) <=  4096)) {
+                next__LIKH=(void *)((unsigned long)result__NIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__H3GH)));
               } else {
-                next__CEKH=new_lab__QOJ(new_size__4YGH);
+                next__LIKH=new_lab__ZPJ(new_size__H3GH);
               };
-              ((__POINTER *)next__CEKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__DEKH)[ 0]=next__CEKH;
+              ((__POINTER *)next__LIKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__MIKH)[ 0]=next__LIKH;
             } else {
-              ((__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)));
+              ((__POINTER *)result__NIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__LIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__NIKH=next__LIKH;
+            };
+          };
+          ptr__RUSE=result__NIKH;
+        } else {
+          t__L3GH=((__UINTEGER_32 )typ_id__WUSE);
+          a__K3GH=(__UINTEGER_32)(((__UINTEGER_32 )((__INTEGER )(sizeof(void *)))) -  1);
+          new_size__UIKH=(__UINTEGER_32)((__UINTEGER_32)(sz__TUSE + a__K3GH) & (__UINTEGER_32)(~ a__K3GH));
+          ptr_table__RIKH=((__POINTER )(&(table_type[(t__L3GH)])));
+          lab_type__TIKH=(__UINTEGER_32)(t__L3GH |  1);
+          next__QIKH=((__POINTER )(NULL));
+          result__SIKH=((__POINTER *)ptr_table__RIKH)[ 0];
+          if ((result__SIKH == (void *)NULL)) {
+            result__SIKH=new_lab__ZPJ(lab_type__TIKH);
+            next__QIKH=(void *)((unsigned long)result__SIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIKH)));
+            ((__POINTER *)next__QIKH)[ 0]=NULL;
+            ((__POINTER *)ptr_table__RIKH)[ 0]=next__QIKH;
+          } else {
+            next__QIKH=((__POINTER *)result__SIKH)[ 0];
+            if ((next__QIKH == (void *)NULL)) {
+              if (((__UINTEGER_32)((__UINTEGER_32)(((__UINTEGER_32 )((unsigned int)((void *)((unsigned long)result__SIKH - (unsigned long)begin_memory__GUH)))) &  4095) + (__UINTEGER_32)(new_size__UIKH <<  1)) <=  4096)) {
+                next__QIKH=(void *)((unsigned long)result__SIKH - (unsigned long)(void *)((unsigned long)((__POINTER ) 0) - (unsigned long)((__POINTER )new_size__UIKH)));
               } else {
-                next__HEKH=new_lab__QOJ(lab_type__KEKH);
+                next__QIKH=new_lab__ZPJ(lab_type__TIKH);
               };
-              ((__POINTER *)next__HEKH)[ 0]=NULL;
-              ((__POINTER *)ptr_table__IEKH)[ 0]=next__HEKH;
+              ((__POINTER *)next__QIKH)[ 0]=NULL;
+              ((__POINTER *)ptr_table__RIKH)[ 0]=next__QIKH;
             } else {
-              ((__POINTER *)result__JEKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__HEKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
-              result__JEKH=next__HEKH;
+              ((__POINTER *)result__SIKH)[ 0]=(void *)((unsigned long)((__POINTER *)next__QIKH)[ 0] & (unsigned long)((__POINTER )(__INTEGER)(~  3)));
+              result__SIKH=next__QIKH;
             };
           };
-          ptr__RSSE=result__JEKH;
+          ptr__RUSE=result__SIKH;
         };
-        result__QSSE=((__LIP_VALUE *)ptr__RSSE);
-        *(result__QSSE) = *(LIP_VALUE__);
+        result__QUSE=((__LIP_VALUE *)ptr__RUSE);
+        *(result__QUSE) = *(LIP_VALUE__);
       };
-      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;
+      Self__5AXE=((__LIP_VALUE *)result__QUSE);
+      Self__5AXE->parent_lip_code__4EFE.parent_itm_object__WBE.position__0BJ=p__C2RE;
+      Self__5AXE->value__DWUE=result__TUPE;
+      result__WDFE=result__QUSE;
     };
   };
-  return(result__CDFE);
+  return(result__WDFE);
 }
 
 //==========================//
diff --git a/lib2/collection/low_level/native_array.li b/lib2/collection/low_level/native_array.li
index 1205c4e..e6635a3 100644
--- a/lib2/collection/low_level/native_array.li
+++ b/lib2/collection/low_level/native_array.li
@@ -145,7 +145,7 @@ Section Public
   [ ...
     +? {element = item index}; 
   ];
-  
+    
   //
   // Displacement
   //
diff --git a/src/parser.li b/src/parser.li
index 4c99289..9d7f0e8 100644
--- a/src/parser.li
+++ b/src/parser.li
@@ -214,8 +214,8 @@ Section Private
       posold := position;
             
       // Skip spaces :            
-      {(last_character = 0.to_character) || {last_character > ' '}}.until_do {
-        (is_shorter2).if {
+      {(last_character = 0.to_character) || {last_character > ' '}}.until_do {        
+        ((is_shorter2) || {is_shorter}).if {
           (last_character = '\n').if {
             (stat)
             .when 0 then { stat := 1; }
@@ -228,7 +228,7 @@ Section Private
       
       (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;          
 	  { 
@@ -251,6 +251,15 @@ Section Private
             .when 0 or 1 then { string_tmp3.add_last '\n'; }
             .when 2      then { string_tmp4.add_last '\n'; };
           };
+          (is_shorter).if {
+            (stat)
+            .when 0 or 1 then {
+              short (ALIAS_STR.short_comment_slot_line) token pos2 to position;
+            }
+            .when 2 then {
+              short (ALIAS_STR.short_comment_line) token pos2 to position;
+            };
+          };
           position := position + 1;
 	};
       };
diff --git a/src/shorter.li b/src/shorter.li
index fc721f5..9b20d47 100644
--- a/src/shorter.li
+++ b/src/shorter.li
@@ -88,21 +88,21 @@ Section Private
   \  shorter <input_file[.li]> [Options]                       \n\
   \                                                            \n\
   \Options:                                                    \n\
-  \  -o <output>      : output file or directory               \n\
+  \  -o <output>      : output file or directory    <DEPRECATED> \n\
   \                     (default: <input_file.ext>)            \n\
   \  -p               : include `Section Private'              \n\
-  \  -c               : include code source                    \n\
-  \  -r               : recursive builder documentation        \n\
+  \  -c               : include code source         <DEPRECATED> \n\
+  \  -r               : recursive builder documentation <DEPRECATED> \n\
   \  -f <format_file> : formatting description file            \n\
   \                     (see `/lisaac/shorter/')               \n\
   \  -d               : Lisaac doc style (no -c, -r)           \n\
   \                                                            \n\
   \Examples:                                                   \n\
   \  * Output format file:                                     \n\
-  \    shorter -c -p -f latex hello_world.li                   \n\ 
+  \    shorter -c -p -f latex hello_world.li  <DEPRECATED>     \n\ 
   \                                                            \n\
   \  * Build html documentation:                               \n\
-  \    shorter -r -f html ~/lisaac/lib                         \n\
+  \    shorter -r -f html ~/lisaac/lib        <DEPRECATED>     \n\
   \                                                            \n\
   \  * Build html documentation style JavaDoc:                 \n\
   \    shorter -d -f javadoc ~/lisaac/lib                         \n\

-- 
Lisaac compiler



More information about the Lisaac-commits mailing list